;redcode-94 ;assert CORESIZE==8000 && MAXPROCESSES==8000 && MAXCYCLES==80000 ;assert MAXLENGTH==100 && MINDISTANCE==100 ;name Lucky 3 ;author Stefan Strack ;strategy imps(6), stone(-98,108,>clear), wimp ;strategy Submitted: @date@ ;kill Lucky AWAY equ 2503 start mov stone+3, stone+3+AWAY mov stone+2, -1 wimp jmp #1965,<-3 for 7 num for 7 dat num,num rof rof stone spl.b #98,>-108 ;52 mov.i >2-98,stone+108 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