yunsuanfu.cod

为PL0编译器

=== COMPILE PL0 ===
  0 PROGRAM EX01; 
  0 VAR A,B,C,D; 
  1 BEGIN 
  2   A:=10; 
  4   B:=10; 
  6   C:=5; 
  8   D:=5; 
 10   A++; 
 14   B--; 
 18   C+=A++; 
 26   D-=B; 
 30   WRITE(A); 
 33   WRITE(B); 
 36   WRITE(C); 
 39   WRITE(D); 
 42   A:=A++; 
 48   B:=B--; 
 54   C+=A+A*B; 
 62   D-=A-A/B; 
 70   WRITE(A); 
 73   WRITE(B); 
 76   WRITE(C); 
 79   WRITE(D) 
 81 END. 
  0  JMP   0   1
  1  INI   0   7
  2  LIT   0  10
  3  STO   0   3
  4  LIT   0  10
  5  STO   0   4
  6  LIT   0   5
  7  STO   0   5
  8  LIT   0   5
  9  STO   0   6
 10  LOD   0   3
 11  LIT   0   1
 12  OPR   0   2
 13  STO   0   3
 14  LOD   0   4
 15  LIT   0   1
 16  OPR   0   3
 17  STO   0   4
 18  LOD   0   5
 19  LOD   0   3
 20  LIT   0   1
 21  OPR   0   2
 22  STO   0   3
 23  LOD   0   3
 24  OPR   0   2
 25  STO   0   5
 26  LOD   0   6
 27  LOD   0   4
 28  OPR   0   3
 29  STO   0   6
 30  LOD   0   3
 31  OPR   0  14
 32  OPR   0  15
 33  LOD   0   4
 34  OPR   0  14
 35  OPR   0  15
 36  LOD   0   5
 37  OPR   0  14
 38  OPR   0  15
 39  LOD   0   6
 40  OPR   0  14
 41  OPR   0  15
 42  LOD   0   3
 43  LIT   0   1
 44  OPR   0   2
 45  STO   0   3
 46  LOD   0   3
 47  STO   0   3
 48  LOD   0   4
 49  LIT   0   1
 50  OPR   0   3
 51  STO   0   4
 52  LOD   0   4
 53  STO   0   4
 54  LOD   0   5
 55  LOD   0   3
 56  LOD   0   3
 57  LOD   0   4
 58  OPR   0   4
 59  OPR   0   2
 60  OPR   0   2
 61  STO   0   5
 62  LOD   0   6
 63  LOD   0   3
 64  LOD   0   3
 65  LOD   0   4
 66  OPR   0   5
 67  OPR   0   3
 68  OPR   0   3
 69  STO   0   6
 70  LOD   0   3
 71  OPR   0  14
 72  OPR   0  15
 73  LOD   0   4
 74  OPR   0  14
 75  OPR   0  15
 76  LOD   0   5
 77  OPR   0  14
 78  OPR   0  15
 79  LOD   0   6
 80  OPR   0  14
 81  OPR   0  15
 82  OPR   0   0
~~~ RUN PL0 ~~~
12
9
17
-4
13
8
134
-12
~~~ END PL0 ~~~