#config scanner=3 #config weapon=2 #config engine=3 #config armor=2 #config heatsinks=2 mov ax, 2 int 3 ;------------------ Stand Back and Shoot Mode ----------------------------- !nt opo 12, 64 call !move !32 opo 17, 32 ipo 7, fx cmp fx, 2000 jgr !nt mov bx, @3 shl bx, 4 opo 12, bx !8 opo 11, 100 opo 17, 8 ipo 7, fx cmp fx, 2000 jgr !32 cmp fx, 300 jls !mode2 !mode1 call !move mov bx, @3 shl bx, 2 opo 12, bx ipo 2, bx cmp bx, 200 jgr !8 opo 15 je !8 jne !8 !move int 2 cmp @9, 100 jls !clear cmp ex, 100 jls !mleft cmp ex, 900 jgr !mright cmp fx, 100 jls !mup cmp fx, 900 jgr !mdown opo 14, 64 !clear opo 11, 100 ret !mleft int 19 ipo 3, bx mov dx, 64 sub dx, bx opo 14, dx opo 11, 100 ret !mright int 19 ipo 3, bx mov dx, 192 sub dx, bx opo 14, dx opo 11, 100 ret !mdown int 19 ipo 3, bx mov dx, 0 sub dx, bx opo 14, dx opo 11, 100 ret !mup int 19 ipo 3, bx mov dx, 128 sub dx, bx opo 14, dx opo 11, 100 ret ;----------------------- Run Around Mode -------------------------------- !nt-2 opo 12, 64 !32-2 opo 11, 100 opo 17, 32 ipo 7, fx cmp fx, 2000 jgr !nt-2 mov bx, @3 shl bx, 4 opo 12, bx !8-2 opo 11, 100 opo 17, 8 ipo 7, fx cmp fx, 2000 jgr !32 cmp fx, 300 jgr !mode1 !mode2 call !move-2 mov bx, @3 shl bx, 2 opo 12, bx ipo 2, bx cmp bx, 200 jgr !8-2 opo 15 je !8-2 jne !8-2 !move-2 int 2 cmp @9, 100 jls !clear-2 cmp ex, 100 jls !mleft cmp ex, 900 jgr !mright cmp fx, 100 jls !mup cmp fx, 900 jgr !mdown mov bx, @2 add bx, 32 opo 14, bx opo 14, 5 !clear-2 opo 11, 100 ret