#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 opo 22, 12 opo 22, 12 mov ax, 1 int 3 !64-nt opo 12, 128 je 64 jne 64 :64 call !heat64 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 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 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 opo 17, 2 ipo 7, bx cmp bx, 2000 jgr 4 cmp @7, 10 jls !FIRE call !heatob opo 15, @3 opo 15, @3 opo 12, @3 opo 18, 0 je 2 jne 2 !FIRE opo 15, @3 opo 15, @3 opo 15, @3 opo 15, @3 opo 15, @3 opo 15, @3 opo 15, @3 je 4 jne 4 !heat64-nt opo 12, 128 !heat64 call !m1 ipo 2, bx cmp bx, 200 jls 99 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 99 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 99 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 jgr 98 :99 ret :98 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 bx, 64 sub bx, ax opo 14, bx ret !mright ipo 3, ax mov bx, 192 sub bx, ax opo 14, bx opo 11, 100 ret !mdown ipo 3, ax mov bx, 0 sub bx, ax opo 14, bx opo 11, 100 ret !mup ipo 3, ax mov bx, 128 sub bx, ax opo 14, bx opo 11, 100 ret !mclear opo 11, 100 mov ax, @2 add ax, 16 opo 14, ax ret mov axnd, @3 shl axnd, 3 add ax, axnd