• ; 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