;redcode-94nop ;name Fast Action V ;author Christian Schmidt ;strategy qscan, stone/imp-paper ;assert CORESIZE==8000 sOff equ 959 pStep1 equ 4683 bStep equ 1941 pAwa equ 5600 impsize equ 2667 step equ 2777 time equ 1425 hop equ 31 bOff equ 5 zero equ qbomb qtab3 equ qbomb qbomb dat >qoff, >qc2 dat 0,0 pGo spl 2, pStep1 mov }-1 , >-1 spl @0 , -1 mov.i #1 , {1 imp mov.i #bStep , impsize sSpl spl #0 , #0 ptr mov bomb , }-(step*time)+1 mov bomb , @ptr a add #step , @-1 sLoo djn.f ptr , {-1500 for 3 dat 0,0 rof dat zero - 1, qa1 qtab1 dat zero - 1, qa2 bomb dat >hop , >1 for 15 dat 0, 0 rof bBoot mov sSpl , sOff-6-CURLINE mov bomb , sOff+5-CURLINE spl 2 qTab1 spl 2 sDst spl 1 , sOff-CURLINE mov qptr, qptr + qz + (qb2-1) jmp q2,