 18 abs or

''''''''''''''''''''''''  Gene:  1 Begins at position  4  '''''''''''''''''''''''
 start
 << or
 *.poisoned .setaim store
 true
 -53 .up inc
 clear dec
 !%=
 >> 9 *.aimright not
 clearbool
 14 over -26
''''''''''''''''''''''''  Gene:  1 Ends at position  24  '''''''''''''''''''''''
''''''''''''''''''''''''  Gene:  2 Begins at position  25  '''''''''''''''''''''''
 start
 .shoot dec
 >=
 angle rnd -7 -406 rnd store
 store
 -1119 swapbool
 mod
''''''''''''''''''''''''  Gene:  2 Ends at position  38  '''''''''''''''''''''''
''''''''''''''''''''''''  Gene:  3 Begins at position  39  '''''''''''''''''''''''
 cond
 ^ start
 ~=
 dec
 pow *-136 floor dist overbool
 drop .dn dec
 and
''''''''''''''''''''''''  Gene:  3 Ends at position  52  '''''''''''''''''''''''
