;redcode-94 ;name New Eclipse ;author G.Labarga ;assert CORESIZE==8000 ;strategy Q^3-> twin anti-imp paper ;--------- Anti B-imp paper constants --- DEST1 EQU 6037 *8 DEST2 EQU 2294 *8 DEST3 EQU 6004 *8 AT1 EQU 7569 AT2 EQU 7907 *8 ;--------- Anti A-imp paper constants --- DEST4 EQU 7286 *8 DEST5 EQU 7033 *8 DEST6 EQU 6409 *8 AT3 EQU 6007 AT4 EQU 7256 ;----- AILOC EQU 5239 BILOC EQU 857 ;----- LCH: SPL 1,{900 SPL 1,{1801 SPL 1,{3702 MOV PAP1 PAP2: SPL @0,PAP2 MOV.I <-AT1,PAP4 PAP5: SPL @0,PAP5 MOV.I #1,{1 MOV.I <-AT3,qTab sne qd+qf+17*qs , qf+17*qs seq qf+16*qs ,