plusminus.cod

PL/0语言是Pascal语言的一个子集

=== COMPILE PL0 ===
  0 PROGRAM PLUSMINUS; 
  0 VAR A,B,C,D; 
  1 BEGIN 
  2   A:=88;   
  4   C:=33; 
  6   C:=++C-A--; 
 19  WRITE(A); 
 22   WRITE(C) 
 24 END. 
  0  JMP   0   1
  1  INI   0   7
  2  LIT   0  88
  3  STO   0   3
  4  LIT   0  33
  5  STO   0   5
  6  LOD   0   5
  7  LIT   0   1
  8  LOD   0   5
  9  OPR   0   2
 10  STO   0   5
 11  LOD   0   5
 12  LOD   0   3
 13  LOD   0   3
 14  LIT   0   1
 15  OPR   0   3
 16  STO   0   3
 17  OPR   0   3
 18  STO   0   5
 19  LOD   0   3
 20  OPR   0  14
 21  OPR   0  15
 22  LOD   0   5
 23  OPR   0  14
 24  OPR   0  15
 25  OPR   0   0
~~~ RUN PL0 ~~~
87
-54
~~~ END PL0 ~~~