out.txt

扩充C0文法编译器 1.安装 直接将compiler.exe文件拷贝到指定文件夹即可。 2.编译和运行 采用命令行的方式。运行cmd

   ALLOCATE 1
   LOADI 45
   STO <0,4>
   ALLOCATE 1
   LOADI 27
   STO <0,5>
   ALLOCATE 1
   LOADI 99
   STO <0,6>
   ALLOCATE 1
   ALLOCATE 1
   ALLOCATE 1
   JSR main
add: 
   ALLOCATE 2
   STO <1,1>
   STO <1,5>
   STO <1,4>
   ALLOCATE 1
   LOAD <1,4>
   LOAD <1,5>
   ADD
   STO <1,6>
   WRITES x=
   LOAD <1,4>
   WRITEI
   WRITES \ny=
   LOAD <1,5>
   WRITEI
   WRITES \n
   LOAD <1,6>
   RETURN
dummy: 
   STO <1,1>
   LOADI 1
   RETURN
func: 
   STO <1,1>
   ALLOCATE 1
   LOADI 1
   STO <1,4>
   ALLOCATE 1
   LOADI 59
   STO <1,5>
   ALLOCATE 1
   ALLOCATE 1
   LOADI 3
   LOADI 5
   LOADI 9
   LOADI 3
   DIV
   MULT
   ADD
   STO <1,6>
   LOADI 10
   STO <1,7>
   LOADI 99
   LOADI 2
   LOADI 3
   LOADI 0
   JSR add
0: 
   ADD
   RETURN
charfunc: 
   ALLOCATE 2
   STO <1,1>
   STO <1,5>
   STO <1,4>
   ALLOCATE 1
   LOAD <1,4>
   LOAD <1,5>
   ADD
   STO <1,6>
   LOAD <1,6>
   RETURN
swap: 
   STO <1,1>
   ALLOCATE 1
   LOAD <0,7>
   STO <1,4>
   LOAD <0,8>
   STO <0,7>
   LOAD <1,4>
   STO <0,8>
   WRITES \nmax=
   LOAD <0,7>
   WRITEI
   RETURN
main: 
   LOADI -1
   STO <1,1>
   ALLOCATE 1
   LOADI 55
   STO <1,4>
   ALLOCATE 1
   ALLOCATE 1
   ALLOCATE 1
   ALLOCATE 1
   LOADI 44
   STO <0,9>
   LOADI 97
   STO <1,8>
   WRITES 只用于测试，该程序没有实际意义\n
   WRITES char abcd is 
   LOAD <1,8>
   WRITEC
   WRITES \n
   WRITES      
   WRITES \n
   LOADI 46
   STO <1,8>
   WRITES char abcd is 
   LOAD <1,8>
   WRITEC
   WRITES \n
   WRITES      
   LOAD <1,4>
   STO <0,8>
   LOAD <0,5>
   STO <0,7>
   LOADI 45
   LOADI 52
   LOADI 1
   JSR charfunc
1: 
   STO <1,7>
   READ
   STO <1,7>
   WRITES cccc=
   LOAD <1,7>
   WRITEC
   WRITES \n
   LOADI 5
   LOADI 2
   LOADI 3
   LOADI 3
   JSR add
3: 
   LOADI 3
   LOADI 2
   JSR add
2: 
   ADD
   LOADI 3.500000
   LOADI 4
   JSR func
4: 
   MULT
   CONVER $top
   ADD
   LOADI 100.432404
   ADD
   STO <1,5>
   WRITES tem=
   LOAD <1,5>
   WRITEF
   WRITES \n
   LOADI 88888
   WRITEI
   LOADI 5
   JSR swap
5: 
   WRITES \nmin=
   LOAD <0,8>
   WRITEI
   WRITES \n
   LOADI 2
   LOADI 3
   LOADI 6
   JSR add
6: 
   STO <1,5>
   READ
   STO <1,6>
   LOAD <1,6>
   WRITEI
   WRITES \n
   LOAD <1,6>
   LOAD $Top
   LOADI 0
   EQ
   BRF 8
   LOADI 123
   WRITEI
   BR 7
8: 
   LOAD $Top
   LOADI 49
   EQ
   BRF 9
   LOADI 456
   WRITEI
   BR 7
9: 
   LOAD $Top
   LOADI 2
   EQ
   BRF 10
   LOADI 789
   WRITEI
   BR 7
10: 
   LOAD $Top
   LOADI -3
   EQ
   BRF 11
   LOADI 100
   WRITEI
   BR 7
11: 
   WRITES tem1 is not valid
   LOADI 123456
   WRITEI
7: 
   POP
   WRITES \n
   LOAD <1,5>
   LOADI 3
   CONVER $top
   GE
   BRF 12
   LOAD <1,5>
   LOADI 1
   CONVER $top-1
   ADD
   STO <1,5>
   BR 13
12: 
   LOAD <1,5>
   LOADI 1
   CONVER $top-1
   SUB
   STO <1,5>
13: 
   WRITES tem is not valid
   LOAD <1,5>
   WRITEF
   LOADI 32000
   STO <0,7>
   WRITES \n
   LOAD <0,7>
   WRITEI
   RETURN