; Compiled by CAT Version 0.1, a tiny C compiler for AT-Robots ; Tamas Dunaszegi, dunasz@mail.datanet.hu JMP !main #config scanner=4 #config weapon=1 #config armor=0 #config engine=5 #config heatsinks=2 !main MOV @0128,5 MOV ax,1 INT 3 CALL !start !2 OPO 11,100 MOV @510,2 SAL @510,@0128 OPO 17,@510 IPO 7,@510 MOV @0132,@510 CMP @0132,5000 JGE !3 CMP @0132,300 JGE !4 MOV ax,1 INT 4 JMP !5 !4 CMP @0132,500 JLE !6 MOV ax,0 INT 4 !6 !5 MOV @510,[3] SAL @510,@0128 MOV @0129,@510 CMP @0133,0 JEQ !7 MOV @510,@0129 MOV @509,@0129 SAR @509,1 ADD @510,@509 ADD @510,@0130 OPO 12,@510 CALL !fire MOV @510,@0129 SAR @510,1 NEG @510 OPO 12,@510 MOV @510,@0129 SAR @510,1 MOV @0130,@510 JMP !8 !7 MOV @510,@0129 ADD @510,@0130 OPO 12,@510 MOV @510,@0129 SAR @510,1 MOV @0130,@510 !8 CMP @0128,1 JLE !9 SUB @0128,1 !9 MOV @0133,1 JMP !10 !3 CMP @0128,5 JGE !11 ADD @0128,1 JMP !12 !11 OPO 12,128 !12 MOV @0130,0 MOV @0133,0 !10 CALL !move JMP !2 MOV @512,@512 RET !move INT 2 CMP [1],32 JGE !14 CMP fx,250 JGE !15 JMP !16 !15 JMP !17 !14 CMP [1],96 JGE !18 CMP ex,750 JLE !19 JMP !16 !19 JMP !20 !18 CMP [1],160 JGE !21 CMP fx,750 JLE !22 JMP !16 !22 JMP !23 !21 CMP [1],224 JGE !24 CMP ex,250 JGE !25 JMP !16 !25 !24 !23 !20 !17 IPO 1,@510 CMP @510,5 JGE !26 OPO 14,@0134 !26 MOV @512,@512 RET !16 MOV @0135,[2] OPO 13,@0134 OPO 17,16 IPO 7,@510 CMP @510,5000 JGE !27 OPO 14,@0134 OPO 14,@0134 NEG @0134 NEG @0130 JMP !28 !27 OPO 14,@0134 SAR @0130,1 !28 OPO 13,@0135 MOV @0133,0 MOV @512,@512 RET !start MOV @0134,64 INT 2 OPO 11,100 IPO 3,@510 NEG @510 OPO 12,@510 OPO 17,32 IPO 7,@510 CMP @510,5000 JGE !30 CMP ex,500 JLE !31 IPO 3,@510 NEG @510 SUB @510,64 OPO 14,@510 CMP fx,500 JGE !32 MOV @0134,-64 !32 JMP !33 !31 IPO 3,@510 NEG @510 ADD @510,64 OPO 14,@510 CMP fx,500 JLE !34 MOV @0134,-64 !34 !33 JMP !35 !30 OPO 12,128 IPO 7,@510 CMP @510,5000 JGE !36 CMP ex,500 JLE !37 IPO 3,@510 NEG @510 SUB @510,64 OPO 14,@510 CMP fx,500 JGE !38 MOV @0134,-64 !38 JMP !39 !37 IPO 3,@510 NEG @510 ADD @510,64 OPO 14,@510 CMP fx,500 JLE !40 MOV @0134,-64 !40 !39 JMP !41 !36 CMP fx,500 JGE !42 IPO 3,@510 MOV @509,@510 MOV @510,128 SUB @510,@509 OPO 14,@510 CMP ex,500 JGE !43 MOV @0134,-64 !43 JMP !44 !42 IPO 3,@510 NEG @510 OPO 14,@510 CMP ex,500 JLE !45 MOV @0134,-64 !45 !44 !41 !35 MOV @512,@512 RET !fire CMP @0128,2 JGR !48 IPO 2,@510 CMP @510,300 JLS !49 !48 JMP !47 !49 MOV ax,0 INT 4 OPO 15,1 OPO 15,-1 OPO 15,0 !47 MOV @512,@512 RET