オリジナルのshのソースコード（C言語）
http://x68000.q-e-d.net/~68user/unix/pickup?sh

略
#define IF if(
#define THEN ){
#define ELSE } else {
#define ELIF } else if (
#define FI ;}
略

　IF input>0
　THEN　Ldup(input,INIO);
　　input=INIO;
　FI

略

（C言語）