;redcode-94 ;name Mirage 2 ;author Anton Marsden ;strategy Faster version, boot and decoy, no pspace ;assert CORESIZE==8000 ;kill Mirage 2 ORG scan step EQU 3024; mod-16 ptr: dat.f >0,$step dat.f >0,$btm-ptr+3 cc: spl.a #1,$btm-ptr+4 top: mov.i $cc,>ptr scan: seq.i $2*step+8,$2*step mov.b $scan,$ptr a: add.f $inc,$scan jmn.b $top,$scan inc: spl.a #step,>step mov.i @1,>ptr btm: djn.b $-1,{cc