;redcode-b ;name Hammermill 4.0 ;author Matt Lewinski ;strategy BDECWT Round 4 Multiwarrior ;strategy q^2 => Replicator ;strategy not sure how much the q^2 helps in multi, but left it on ;strategy anyway. ;assert CORESIZE==8000 org start boota spl.b $1 , <1000 spl.b $1 , <1500 mov.i $-1 , $0 pbomba equ 1180 rangea equ 4260 milla spl.b $rangea , $0 mov.i >-1 , }-1 mov.i $hammera , >pbomba mov.i $hammera , }pbomba add.a #50 , milla jmp.b $milla , fast , }qb+qs*4+qd/2 seq.i $qb+qs*5 , $qb+qs*5+qd jmp.b $slow , }qb+qs*5+qd/2 seq.i $qb+qs*6 , $qb+qs*6+qd jmp.b $slow , {tab seq.i $qb+qs*7 , $qb+qs*7+qd jmp.b $slow , }tab seq.i $qb+qs*10 , $qb+qs*10+qd jmp.b >fast , fast , >tab seq.i $qb+qs*24 , $qb+qs*24+qd jmp.b $slow , >tab seq.i $qb+qs*17 , $qb+qs*17+qd jmp.b $slow , {fast seq.i $qb+qs*8 , $qb+qs*8+qd jmp.b tab seq.i $qb+qs*28 , $qb+qs*28+qd jmp.b $tab , >tab seq.i $qb+qs*30 , $qb+qs*30+qd jmp.b $tab , }tab paper spl.b $boota , <500 pbomb equ 780 range equ 2860 boot spl.b $1 , <1000 spl.b $1 , <1500 mov.i $-1 , $0 mill spl.b $range , $0 mov.i >-1 , }-1 mov.i $hammer , >pbomb mov.i $hammer , }pbomb add.a #50 , $mill jmp.b $mill ,