;redcode-94nop ;name Gargantuan ;author Roy van Rijn ;strategy qScan into impPaper & coreclearingPaper & stone ;strategy Fat little bastard warrior ;strategy Basicly Maelstrom with stone... ;assert 1 bDist1 equ 6552 bDist2 equ 7274 zero equ qbomb qtab3 equ qbomb qbomb dat >qoff , >qc2 dat 0 , 0 pGo spl 1 , -1 pStone spl #0 mov bomb , >ptr add.x imp , ptr ptr jmp imp-iStep*8 , >sStep-6 bomb dat >1 , }1 imp mov.i #sStep-1 , iStep for 3 dat 0 , 0 rof nstep1 equ 783 cstep1 equ 4584 tstep1 equ 3908 pap spl @8 , }tstep1 mov.i }-1 , >-1 nothA spl cstep1 , 0 mov.i >-1 , }-1 nothB spl @0 , }nstep1 mov.i }-1 , >-1 mov.i #6780 , <1 djn.b -2 , #6781;7023 for 4 dat 0 , 0 rof hStep equ 3039 hTime equ 3360 hDjn equ 2813 hOff equ 5 sOff equ 742;6882 bBoot mov stone , sOff-6-CURLINE mov hBomb , sOff+5-CURLINE spl 2 , >301 spl 2 , >7704 sDst spl 1 , sOff-CURLINE mov 1 for 2 dat 0 , 0 rof qc2 equ ((1+(qtab3-qptr)*qy)%CORESIZE) qb1 equ ((1+(qtab2-1-qptr)*qy)%CORESIZE) qb2 equ ((1+(qtab2-qptr)*qy)%CORESIZE) qb3 equ ((1+(qtab2+1-qptr)*qy)%CORESIZE) qa1 equ ((1+(qtab1-1-qptr)*qy)%CORESIZE) qa2 equ ((1+(qtab1-qptr)*qy)%CORESIZE) qz equ 2108 qy equ 243 ;qy*(qz-1)=1 ;q0 mutation qgo sne qptr+qz*qc2 , qptr+qz*qc2+qb2 seq qptr , qptr+qz+(qb2-1) jmp q2 ,