-=.cod

来自「pl0语言拓展」· COD 代码 · 共 26 行

=== COMPILE PL0 ===
  0 PROGRAM MAIN; 
  0 CONST A=10; 
  1 VAR B; 
  1 BEGIN  
  2 B:=A; 
  4 B-=1; 
  8 WRITE(B); 
 11 END. 
  0  JMP   0   1
  1  INI   0   4
  2  LIT   0  10
  3  STO   0   3
  4  LOD   0   3
  5  LIT   0   1
  6  OPR   0   3
  7  STO   0   3
  8  LOD   0   3
  9  OPR   0  14
 10  OPR   0  15
 11  OPR   0   0
~~~ RUN PL0 ~~~
9
~~~ END PL0 ~~~