;redcode-b ;name Hint Test v6 ;author M R Bremer ;strategy Original code based on Scott Manley's Mutagen ;strategy Once through scan --> spl spl dat dat coreclear ;strategy Core_Warrior_ #2: compressed code ;strategy Core_Warrior_ #4: improved scanner ;strategy Core_Warrior_ #6: pspaced with small bomber ;kill Hint ;assert CORESIZE==8000 org start dist equ 98 scan equ dist*2 begin SPL b1+2 jmp a for 20 dat 0, 0 rof a add d,c c cmp a+2*dist,a+dist slt.a #dist+ptr2-a, c djn.f a,<7000 mov s, *c x mov m, @c jmn a,a s spl #-dist+1, <0 jmp b1 d dat