#config scanner=4 #config weapon=3 #config armor=0 #config engine=0 #config heatsinks=5 #def speedOkay #def evadeDirection MOV evadeDirection, 60 OUT P_MINELAYER 20 OUT P_MINELAYER 10 INC AX INT I_KEEPSHIFT MOV speedOkay 1000 !checkSpeed CMP @0 100 JEQ speedOkay CMP OUT P_THROTTLE 100 JEQ speedOkay !lost :1000 MOV speedOkay 1064 OUT P_SCANARC 64 :1064 OUT P_STEERING 5 IN P_SCAN AX MOV BX 642 ADD BX @3 JEQ BX :642 ; 0 CMP AX MAXINT JNE !SetScan16 OUT P_OFS_TURRET 128 JEQ !checkSpeed !SetScan16 CMP JEQ !Scan16 :644 ; 2 OUT P_OFS_TURRET 56 JEQ !Scan8 :640 ; -2 OUT P_OFS_TURRET -56 JEQ !Scan8 :643 ; 1 OUT P_OFS_TURRET 32 JEQ !Scan16 :641 ; -1 OUT P_OFS_TURRET -32 JEQ !Scan16 !Scan16 OUT P_SCANARC 16 :1016 IN P_SCAN AX MOV BX 162 ADD BX @3 JEQ BX :162 ; 0 JEQ !Scan4 :164 ; 2 OUT P_OFS_TURRET 14 JEQ !Scan4 :160 ; -2 OUT P_OFS_TURRET -14 :163 ; 1 OUT P_OFS_TURRET 8 JEQ !Scan4 :161 ; -1 OUT P_OFS_TURRET -8 JEQ !Scan4 !Scan8 OUT P_SCANARC 8 :108 IN P_SCAN AX MOV BX 82 ADD BX @3 JEQ BX :82 ; 0 JEQ !Scan4 :84 ; 2 OUT P_OFS_TURRET 7 JEQ !Scan4 :80 ; -2 OUT P_OFS_TURRET -7 JEQ !Scan4 :83 ; 1 OUT P_OFS_TURRET 4 JEQ !Scan4 :81 ; -1 OUT P_OFS_TURRET -4 JEQ !Scan4 !Scan4 OUT P_SCANARC 4 MOV speedOkay 104 :104 CMP @8 JEQ !goEvade MOV @8 0 NEG evadeDirection !goEvade MOV AX @2 ADD AX evadeDirection OUT P_STEERING AX IN P_HEAT BX CMP BX 340 JGE 104 CMP IN P_SCAN AX JEQ @3 *-2,0,0,2 OUT P_OFS_TURRET -3 JEQ !checkSpeed *-1,0,0,2 OUT P_FIRE -3 JEQ !checkSpeed *0,0,0,2 CMP AX MAXINT JEQ !lost CMP OUT P_FIRE 0 JEQ !checkSpeed *1,0,0,2 OUT P_FIRE 3 JEQ !checkSpeed *2,0,0,2 OUT P_OFS_TURRET 3 JEQ !checkSpeed