; Mine code. Not very good, but it functions.
3:
scan relative 1
-- explain
if value #x_pos = #enemy_x then goto
same_x_ #cur_head -- explain
if value #y_pos = #enemy_y then goto
same_y_ #cur_head -- explain
cmath v1 = ((#cur_head-2) * (#cur_head-3) * (#cur_head-4)
* (#y_pos-#enemy_y)/-6)
+ ((#cur_head-1) * (#cur_head-3) * (#cur_head-4) * (#enemy_x-#x_pos)/2)
+ ((#cur_head-1) * (#cur_head-2) * (#cur_head-4) * (#enemy_y-#y_pos)/-2)
+ ((#cur_head-1) * (#cur_head-2) * (#cur_head-3) * (#x_pos-#enemy_x)/6)
-- explain
cmath v2 = ((#cur_head-2) * (#cur_head-3) * (#cur_head-4)
* (#x_pos-#enemy_x)/-6)
+ ((#cur_head-1) * (#cur_head-3) * (#cur_head-4) * (#y_pos-#enemy_y)/2)
+ ((#cur_head-1) * (#cur_head-2) * (#cur_head-4) * (#x_pos-#enemy_x)/-2)
+ ((#cur_head-1) * (#cur_head-2) * (#cur_head-3) * (#y_pos-#enemy_y)/6)
-- explain
if missile ready then if value #scan <> 0 then
if value ~v2 >= -1 then if value ~v2 <= 1 then if value ~v1 = 2
then goto gotcha__ 2
-- explain
if value ~v1 >= 0 then if value #scan <> 0
then goto barrier
-- explain
math v2 = #x_pos - #enemy_x - #enemy_x * #x_pos
/ #enemy_x + #enemy_x * #enemy_x / #y_pos + #y_pos - #enemy_y - #enemy_y
* #y_pos / #enemy_y + #enemy_y * #enemy_y -- explain
if value ~v2 < 3 then if value #enemy_x <>
0 then if value ~v9 = ~v9 then goto
2 --
explain
lay mines off
if value ~v1 >= 0 then move forward
-- explain
if value ~v1 >= 0 then if value #inbound = 0 then
if value #enemy_y <> #y_pos then if value #x_pos <> #enemy_x then
goto start_ #cur_head
-- explain
if value #x_pos = #enemy_x then goto
same_x_ #cur_head -- explain
if value #y_pos = #enemy_y then goto
same_y_ #cur_head -- explain
if value #inbound <> 0 then goto
locked_ #cur_head #inbound --
explain
goto
err_ #cur_head -- explain