;redcode-94 ;name Geist v0.1 ;author Ben Ford ;assert CORESIZE==8000 ;optimax clr ORG START DAT.F $ 0, $ 20 DAT.F $ 0, $ 0 DAT.F $ 0, $ 0 DAT.F $ 0, $ 0 DAT.F $ 0, $ 0 DAT.F $ 0, $ 0 DAT.F $ 1, $ 14 SPL.B # 93, $ 14 DAT.F $ 0, $ 0 SPL.B # -25, > -25 MOV.I * -4, > -10 MOV.I * -5, > -11 DJN.F $ -2, } -5 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 SUB.F $ -16, $ 2 MOV.I $ 15, * 1 SNE.I * -3880, $ 100 DJN.F $ -3, < -2689 ADD.B $ -2, $ -29 JMP.B $ -21, > 3000 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 MOV.I $ 3990, $ 1 START MOV.I { 3748, < 3750 MOV.I { 3750, < 3752 MOV.I { 3752, < 3754 MOV.I { 3754, < 3756 DJN.F $ -20, { 3743 JMP.B $ -21, { 3738 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 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 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 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