opo 22, 12 #config armor=2 ; consumes 2 points #config scanner=3 ; gives us 5 points #config engine=3 ; gives us 2 points #config heatsinks=1 ; gives us 1 point #config weapon=3 ; gives us 2 points #def axnd #msg I WILL WIN!!! opo 11, 100 mov ax, 1 int 3 opo 22, 12 !64-nt opo 12, 128 je 64 jne 64 :64 call !heat64 :642 opo 17, 64 ipo 7, bx cmp bx, 2000 jgr !64-nt mov fx, @3 shl fx, 5 opo 12, fx opo 15 :16 call !heat16 :162 opo 17, 16 ipo 7, bx cmp bx, 2000 jgr 64 mov fx, @3 shl fx, 3 opo 12, fx opo 15 :4 call !heat4 :42 opo 17, 4 ipo 7, bx cmp bx, 2000 jgr 16 mov fx, @3 shl fx, 1 opo 12, fx opo 15 :2 call !heat2 :22 opo 17, 2 ipo 7, bx cmp bx, 2000 jgr 4 call !heatob opo 15, @3 opo 15, @3 opo 12, @3 opo 18, 0 je 2 jne 2 !heat64-nt opo 12, 128 !heat64 call !m1 ipo 2, bx cmp bx, 200 jls 642 opo 17, 64 ipo 7, bx cmp bx, 2000 jgr !heat64-nt mov fx, @3 shl fx, 5 opo 12, fx !heat16 call !m1 ipo 2, bx cmp bx, 200 jls 162 opo 17, 16 ipo 7, bx cmp bx, 2000 jgr !heat64 mov fx, @3 shl fx, 3 opo 12, fx !heat4 call !m1 ipo 2, bx cmp bx, 200 jls 42 opo 17, 4 ipo 7, bx cmp bx, 2000 jgr !heat16 mov fx, @3 shl fx, 1 opo 12, fx !heat2 call !m1 ipo 2, bx cmp bx, 200 jls 22 ipo 7, bx cmp bx, 2000 jgr !heat4 opo 12, @3 je !heat2 jne !heat2 !heatob ipo 2, ax cmp ax, 180 jgr !heat-2big opo 18, 1 !heat-2big ret !m1 !move opo 11, 100 int 2 cmp ex, 100 jls !mleft cmp ex, 900 jgr !mright cmp fx, 100 jls !mup cmp fx, 900 jgr !mdown je !mclear jne !mclear !mleft ipo 3, ax mov dx, 64 sub dx, ax opo 14, dx ret !mright ipo 3, ax mov dx, 192 sub dx, ax opo 14, dx opo 11, 100 ret !mdown ipo 3, ax mov dx, 0 sub dx, ax opo 14, dx opo 11, 100 ret !mup ipo 3, ax mov dx, 128 sub dx, ax opo 14, dx opo 11, 100 ret !mclear opo 11, 100 cmp bx, 2000 jgr 1337 opo 14, 32 ret :1337 cmp bx 50 jls 1332 ipo 10, ax opo 14, ax ret :1332 mov ax, @2 add ax, 16 opo 14, ax ret