;redcode-DS ;name Ghauskadenge ;author Maezumo ;assert 1 ;evolved with -=< Maezumo >=- ;evolved:13:07:09 01-28-2011 ;origin Paper 98 ;generation 0 ;benchscore 145.37 (94nopWilfiz 200 rounds) org qgo ;------------ Qscan Constant --------------- zero equ qbomb qtab3 equ qbomb qz equ 2108 qy equ 243 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) qoff equ -88 qstep equ -7 qtime equ 20 ;------------------------------------------- sOff equ 4728 sStep equ 10 sDelet equ 205 ;------------------------------------------- dat 0, 0 qbomb dat >qoff, >qc2 ;------ 45 instructions -------------------- spl.b $ 1 ,> 2748 spl.b $ 1 ,< -3093 mov.i $ -1 ,# 3068 spl.b @ 0 ,> 362 mov.i } -1 ,> -1 mov.i { -2 ,< 1 jmz.a @ 0 ,$ -1984 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 dat.f $ 0 ,$ 0 for 25 dat 0, 0 rof ;------------------------------------------- dat 0, qptr, qptr+qz+(qb2-1) jmp q2,