The Evolution of a Programmer

从初学者到专家,本文通过展示不同阶段程序员编写的“Hello World”程序,幽默地描绘了技术成长的过程,涉及多种编程语言和技术。
 High School/Jr.High

 
          10 PRINT "HELLO WORLD"
          20 END
      
First year in College

          program Hello(input, output)
            begin
              writeln('Hello World')
            end.
      
Senior year in College

          (defun hello
            (print
              (cons 'Hello (list 'World))))
      
New professional

          #include <stdio.h>
          void main(void)
          {
            char *message[] = {"Hello ", "World"};
            int i;
 
            for(i = 0; i < 2; ++i)
              printf("%s", message[i]);
            printf("\n");
          }
      
Seasoned professional

          #include <iostream.h>
          #include <string.h>
 
          class string
          {
          private:
            int size;
            char *ptr;
 
          public:
            string() : size(0), ptr(new char('\0')) {}
 
            string(const string &s) : size(s.size)
            {
              ptr = new char[size + 1];
              strcpy(ptr, s.ptr);
            }
 
            ~string()
            {
              delete [] ptr;
            }
 
            friend ostream &operator <<(ostream &, const string &);
            string &operator=(const char *);
          };
 
          ostream &operator<<(ostream &stream, const string &s)
          {
            return(stream << s.ptr);
          }
 
          string &string::operator=(const char *chrs)
          {
            if (this != &chrs)
            {
              delete [] ptr;
             size = strlen(chrs);
              ptr = new char[size + 1];
              strcpy(ptr, chrs);
            }
            return(*this);
          }
 
          int main()
          {
            string str;
 
            str = "Hello World";
            cout << str << endl;
 
            return(0);
          }
      
Master Programmer

          [
          uuid(2573F8F4-CFEE-101A-9A9F-00AA00342820)
          ]
          library LHello
          {
              // bring in the master library
              importlib("actimp.tlb");
              importlib("actexp.tlb");
 
              // bring in my interfaces
              #include "pshlo.idl"
 
              [
              uuid(2573F8F5-CFEE-101A-9A9F-00AA00342820)
              ]
              cotype THello
           {
           interface IHello;
           interface IPersistFile;
           };
          };
 
          [
          exe,
          uuid(2573F890-CFEE-101A-9A9F-00AA00342820)
          ]
          module CHelloLib
          {
 
              // some code related header files
              importheader(<windows.h>);
              importheader(<ole2.h>);
              importheader(<except.hxx>);
              importheader("pshlo.h");
              importheader("shlo.hxx");
              importheader("mycls.hxx");
 
              // needed typelibs
              importlib("actimp.tlb");
              importlib("actexp.tlb");
              importlib("thlo.tlb");
 
              [
              uuid(2573F891-CFEE-101A-9A9F-00AA00342820),
              aggregatable
              ]
              coclass CHello
           {
           cotype THello;
           };
          };
 
          #include "ipfix.hxx"
 
          extern HANDLE hEvent;
 
          class CHello : public CHelloBase
          {
          public:
              IPFIX(CLSID_CHello);
 
              CHello(IUnknown *pUnk);
              ~CHello();
 
              HRESULT  __stdcall PrintSz(LPWSTR pwszString);
 
          private:
              static int cObjRef;
          };
 
          #include <windows.h>
          #include <ole2.h>
          #include <stdio.h>
          #include <stdlib.h>
          #include "thlo.h"
          #include "pshlo.h"
          #include "shlo.hxx"
          #include "mycls.hxx"
 
          int CHello::cObjRef = 0;
 
          CHello::CHello(IUnknown *pUnk) : CHelloBase(pUnk)
          {
              cObjRef++;
              return;
          }
 
          HRESULT  __stdcall  CHello::PrintSz(LPWSTR pwszString)
          {
              printf("%ws\n", pwszString);
              return(ResultFromScode(S_OK));
          }
 
          CHello::~CHello(void)
          {
 
          // when the object count goes to zero, stop the server
          cObjRef--;
          if( cObjRef == 0 )
              PulseEvent(hEvent);
 
          return;
          }
 
          #include <windows.h>
          #include <ole2.h>
          #include "pshlo.h"
          #include "shlo.hxx"
          #include "mycls.hxx"
 
          HANDLE hEvent;
 
           int _cdecl main(
          int argc,
          char * argv[]
          ) {
          ULONG ulRef;
          DWORD dwRegistration;
          CHelloCF *pCF = new CHelloCF();
 
          hEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
 
          // Initialize the OLE libraries
          CoInitializeEx(NULL, COINIT_MULTITHREADED);
 
          CoRegisterClassObject(CLSID_CHello, pCF, CLSCTX_LOCAL_SERVER,
              REGCLS_MULTIPLEUSE, &dwRegistration);
 
          // wait on an event to stop
          WaitForSingleObject(hEvent, INFINITE);
 
          // revoke and release the class object
          CoRevokeClassObject(dwRegistration);
          ulRef = pCF->Release();
 
          // Tell OLE we are going away.
          CoUninitialize();
 
          return(0);
          }
 
          extern CLSID CLSID_CHello;
          extern UUID LIBID_CHelloLib;
 
          CLSID CLSID_CHello = { /* 2573F891-CFEE-101A-9A9F-00AA00342820 */
              0x2573F891,
              0xCFEE,
              0x101A,
              { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 }
          };
 
          UUID LIBID_CHelloLib = { /* 2573F890-CFEE-101A-9A9F-00AA00342820 */
              0x2573F890,
              0xCFEE,
              0x101A,
              { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 }
          };
 
          #include <windows.h>
          #include <ole2.h>
          #include <stdlib.h>
          #include <string.h>
          #include <stdio.h>
          #include "pshlo.h"
          #include "shlo.hxx"
          #include "clsid.h"
 
          int _cdecl main(
          int argc,
          char * argv[]
          ) {
          HRESULT  hRslt;
          IHello        *pHello;
          ULONG  ulCnt;
          IMoniker * pmk;
          WCHAR  wcsT[_MAX_PATH];
          WCHAR  wcsPath[2 * _MAX_PATH];
 
          // get object path
          wcsPath[0] = '\0';
          wcsT[0] = '\0';
          if( argc > 1) {
              mbstowcs(wcsPath, argv[1], strlen(argv[1]) + 1);
              wcsupr(wcsPath);
              }
          else {
              fprintf(stderr, "Object path must be specified\n");
              return(1);
              }
 
          // get print string
          if(argc > 2)
              mbstowcs(wcsT, argv[2], strlen(argv[2]) + 1);
          else
              wcscpy(wcsT, L"Hello World");
 
          printf("Linking to object %ws\n", wcsPath);
          printf("Text String %ws\n", wcsT);
 
          // Initialize the OLE libraries
          hRslt = CoInitializeEx(NULL, COINIT_MULTITHREADED);
 
          if(SUCCEEDED(hRslt)) {
 
              hRslt = CreateFileMoniker(wcsPath, &pmk);
              if(SUCCEEDED(hRslt))
           hRslt = BindMoniker(pmk, 0, IID_IHello, (void **)&pHello);
 
              if(SUCCEEDED(hRslt)) {
 
           // print a string out
           pHello->PrintSz(wcsT);
 
           Sleep(2000);
           ulCnt = pHello->Release();
           }
              else
           printf("Failure to connect, status: %lx", hRslt);
 
              // Tell OLE we are going away.
              CoUninitialize();
              }
 
          return(0);
          }
      
Apprentice Hacker

          #!/usr/local/bin/perl
          $msg="Hello, world.\n";
          if ($#ARGV >= 0) {
            while(defined($arg=shift(@ARGV))) {
              $outfilename = $arg;
              open(FILE, ">" . $outfilename) || die "Can't write $arg: $!\n";
              print (FILE $msg);
              close(FILE) || die "Can't close $arg: $!\n";
            }
          } else {
            print ($msg);
          }
          1;
      
Experienced Hacker

          #include <stdio.h>
          #define S "Hello, World\n"
          main(){exit(printf(S) == strlen(S) ? 0 : 1);}
      
Seasoned Hacker

          % cc -o a.out ~/src/misc/hw/hw.c
          % a.out
      
Guru Hacker

          % cat
          Hello, world.
          ^D
      
New Manager

          10 PRINT "HELLO WORLD"
          20 END
      
Middle Manager

          mail -s "Hello, world." bob@b12
          Bob, could you please write me a program that prints "Hello, world."?
          I need it by tomorrow.
          ^D
      
Senior Manager

          % zmail jim
          I need a "Hello, world." program by this afternoon.
      
Chief Executive

          % letter
          letter: Command not found.
          % mail
          To: ^X ^F ^C
          % help mail
          help: Command not found.
          % damn!
          !: Event unrecognized
          % logout
      

 

原文地址:http://www.cs.bgu.ac.il/~omri/Humor/evolution.html

 

 

【博士论文复现】【阻抗建模、验证扫频法】光伏并网逆变器扫频与稳定性分析(包含锁相环电流环)(Simulink仿真实现)内容概要:本文档是一份关于“光伏并网逆变器扫频与稳定性分析”的Simulink仿真实现资源,重点复现博士论文中的阻抗建模与扫频法验证过程,涵盖锁相环和电流环等关键控制环节。通过构建详细的逆变器模型,采用小信号扰动方法进行频域扫描,获取系统输出阻抗特性,并结合奈奎斯特稳定判据分析并网系统的稳定性,帮助深入理解光伏发电系统在弱电网条件下的动态行为与失稳机理。; 适合人群:具备电力电子、自动控制理论基础,熟悉Simulink仿真环境,从事新能源发电、微电网或电力系统稳定性研究的研究生、科研人员及工程技术人员。; 使用场景及目标:①掌握光伏并网逆变器的阻抗建模方法;②学习基于扫频法的系统稳定性分析流程;③复现高水平学术论文中的关键技术环节,支撑科研项目或学位论文工作;④为实际工程中并网逆变器的稳定性问题提供仿真分析手段。; 阅读建议:建议读者结合相关理论教材与原始论文,逐步运行并调试提供的Simulink模型,重点关注锁相环与电流控制器参数对系统阻抗特性的影响,通过改变电网强度等条件观察系统稳定性变化,深化对阻抗分析法的理解与应用能力。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值