;redcode-94nop ;author Lukasz Grabun ;name Candy II ;assert CORESIZE==8000 ;strategy Q^4 -> Stone/Imp org qGo sStp equ 4289 sTme equ 1217 sHop equ 17 sDjn equ 4000 sAway equ 6000 bOff equ 6 iStp equ 2667 iAway equ 4779-3 qBomb dat {qOff , qF bBot mov sBmb , sAway-CURLINE+bOff spl }2 , }qC qTab2 spl *1 , }qD spl 0 , }qE mov sHop , >1 ;Uninvited's Imps iPmp spl #iImp , #iImp+1 sub.f #-iStp-1 , iJmp mov iImp , }iPmp iJmp jmp iImp-2*(iStp+1) , >iImp+2*iStp-1 iImp mov.i #iStp , *0 for 50 dat 0 , 0 rof qX equ 1034 qA equ 2665 qB equ 3362 qC equ 6483 qD equ 7180 qE equ 7877 qF equ 5089 qStep equ 7 qTime equ 16 qOff equ 87 qGo seq qPtr+qX , qPtr+qX+qD jmp qSkip , {qPtr+qX+qStep sne qPtr+qX*qE , qPtr+qX*qE+qE seq