;redcode-94x ;assert CORESIZE==55440 && MAXPROCESSES==10000 && MAXCYCLES==500000 ;assert MAXLENGTH==200 && MINDISTANCE==200 ;name Lucky 13 ;author Stefan Strack ;strategy imps(26), stone(-4766,188,>clear) ;kill Lucky AWAY equ 17013 start mov stone+3, stone+3+AWAY mov stone+2, -188 ;52 mov.i >2-4766,stone+188 sub.f stone,-1 djn.f -2,<-100 for 8 dat 1,1 rof for 12 dat 0,0 rof imp mov.i #1994, step