1;redcode-94 2;name Baseline Deluxe 3;author Ken Espiritu 4;strategy q^3 -> imp/stone 5;strategy overhauled everything 6;strategy needs some tuning 7;assert 1 8;optimax sbi 9; -+)>] 0/1 cycles [(<+- 10; -+>)] 2 cycles [(<+- 11 ORG START 12 SPL.B # 0, # 0 13 SPL.B # 214, > -214 14 MOV.I { 214, { -213 15 ADD.F $ -2, $ -1 16 DJN.F @ 0, { -2 17 SPL.B # 0, > 2 18 SUB.F # -2668, $ 2 19 MOV.I $ -502, $ -503 20 DJN.F $ 2163, { -1817 21 MOV.I # -1, $ 2667 22 MOV.I $ -1, $ -1972 23 MOV.I { -1, < 10 24 MOV.I { -2, < 9 25 MOV.I { -3, < 8 26 MOV.I { -4, < 7 27 MOV.I { -5, { 6 28 MOV.I { -6, { 5 29 MOV.I { -7, { 4 30 MOV.I { -8, { 3 31 MOV.I { -9, { 2 32 SPL.B @ 1, } -3295 33 JMP.B $ 2143, $ -1479 34 DAT.F $ 0, $ 0 35 DAT.F $ 0, $ 0 36 DAT.F $ 0, $ 0 37 DAT.F $ 0, $ 0 38 DAT.F $ 0, $ 0 39 DAT.F $ 0, $ 0 40 DAT.F $ 0, $ 0 41 DAT.F $ 0, $ 0 42 DAT.F $ 0, $ 0 43 DAT.F $ 0, $ 0 44 DAT.F $ 0, $ 0 45 DAT.F $ 0, $ 0 46 DAT.F $ 0, $ 0 47 DAT.F $ 0, $ 0 48 DAT.F $ 0, $ 0 49 DAT.F $ 0, $ 0 50 DAT.F $ 0, $ 0 51 DAT.F $ 0, $ 0 52 DAT.F $ 0, $ 0 53 DAT.F $ 0, $ 0 54 DAT.F $ 0, $ 0 55 DAT.F $ 0, $ 0 56 DAT.F $ 0, $ 0 57 DAT.F $ 0, $ 0 58 DAT.F $ 0, $ 0 59 DAT.F $ 0, $ 0 60 DAT.F $ 0, $ 0 61 DAT.F $ 0, $ 0 62 DAT.F $ 0, $ 0 63 DAT.F $ 0, $ 0 64 DAT.F $ 0, $ 0 65 DAT.F $ 0, $ 0 66 DAT.F $ 0, $ 0 67 DAT.F $ 0, $ 0 68 DAT.F $ 0, $ 0 69 DAT.F $ 0, $ 0 70START SEQ.I $ 437, $ 337 71 JMP.B $ 33, { 443 72 SEQ.I $ 1935, $ 1835 73 JMP.B $ 30, { 1941 74 SEQ.I $ 1633, $ 1533 75 JMP.B $ 28, < 36 76 SEQ.I $ 2231, $ 2131 77 JMP.B $ 26, > 34 78 SEQ.I $ 2829, $ 2729 79 DJN.B $ 24, { 24 80 SEQ.I $ 3127, $ 3027 81 JMP.B $ 22, { 22 82 SEQ.I $ 1025, $ 925 83 JMP.B > 20, { 1031 84 SEQ.I $ 723, $ 623 85 JMP.B > 18, { 17 86 SEQ.I $ 1321, $ 1221 87 JMP.B > 16, } 15 88 SEQ.I $ 3719, $ 3619 89 JMP.B $ 13, { 13 90 SEQ.I $ -3383, $ -3483 91 JMP.B $ 11, < 20 92 SEQ.I $ -1585, $ -1685 93 JMP.B $ 9, > 18 94 SEQ.I $ -687, $ -787 95 JMP.B $ 7, } 7 96 SEQ.I $ 211, $ 111 97 DJN.B $ 5, { 6 98 SEQ.I $ 1109, $ 1009 99 JMP.B $ 3, { 4 100 SNE.I $ -2493, $ -2593 101 JMZ.F $ -79, $ -2504 102 MUL.AB # 3, $ 5 103 MUL.B $ 8, @ -1 104 SNE.I > 3456, @ 3 105 ADD.AB # 100, $ 2 106 MOV.I $ 5, @ 1 107 MOV.I $ 4, * 300 108 SUB.AB # 7, $ -1 109 DJN.B $ -3, # 11 110 JMP.B $ -88, > 10 111 DAT.F { 67, { 6 112 113