;redcode-94 ;name Imperfection v3.1 ;author Michael Constant ;kill Imperfection ;strategy standard stone/spiral ;macro DIST equ 2500 STEP equ 889 IMPBOOT equ 400 org boot foo decoy for 74 spl.i #500+(decoy*3), #decoy+1 rof boot mov stone, stone+DIST mov stone+1,stone+1+DIST mov stone+2,stone+2+DIST mov stone+3,stone+3+DIST mov stone+4,stone+4+DIST mov bar, stone+DIST+4+76 mov bar, stone+DIST+4+75 spl stone+DIST, <-2000 spl stone+DIST, <-3000 launch mov imp, imp+IMPBOOT spl 1, <-2000 mov -1, 0 mov -1, 0 mov -1, 0 spl 1, <-3000 spl 1, <-4000 spl 2, <3000 jmp @0, imp+IMPBOOT add #STEP, -1 bar dat #1, #10 stone mov.i 76 imp mov.i #0, STEP