#config scanner=0
#config weapon=2
#config armor=5
#config engine=0
#config mines=0
#config heatsinks=5
#config shield=0

#def aa
#def bb
#def cc

!center
mov ex 500
mov fx 500
int 7
mov aa ax
ipo 3 bb
cmp bb aa
jls !lessthan
jgr !greaterthan
jeq !equal
jmp !center

!lessthan
err 1
sub bb aa
opo 14 aa
opo 11 94
del 100
ipo 2 cc
cmp cc 200
jgr !cooldown
jmp !fire

!greaterthan
err 99
sub aa bb
opo 14 bb
opo 11 94
del 100
ipo 2 cc
cmp cc 200
jgr !cooldown
jmp !fire

!equal
err 0
opo 11 94
del 100
ipo 2 cc
cmp cc 200
jgr !cooldown
jmp !fire

!cooldown
del 1000
jmp !center

!fire
do 6
:1
opo 12 32
opo 15 4
loop 1
get ax 10
err ax
opo 12 ax
del 100
jmp !center