1;redcode-94nop 2;name Lord of the imp-rings II 3;author Neogryzor 4;assert CORESIZE==8000 5;strategy MiniQ^3->paper/imp 6;strategy Improved and optimized version of the Lord, (not at all...) 7;optimax pwi 8; cut and pasted Qscan: 9; -+)>] 0/1 cycles [(<+- 10; -+>)] 2 cycles [(<+- 11 ORG START 12 SPL.B $ 1, { 0 13 SPL.B $ 1, } 0 14 SPL.B $ 1, $ 0 15 SPL.B $ 6, $ 0 16 SPL.B $ 3, $ 0 17 MOV.I < 1, { 1 18 JMP.B $ -1696, $ 12 19 MOV.I < 1, { 1 20 JMP.B $ 969, $ 10 21 MOV.I < 1, { 1 22 JMP.B $ 3633, $ 8 23 SPL.B @ 0, $ 1071 24 MOV.I } -1, > -1 25 SPL.B $ 2575, $ 0 26 MOV.I > -1, } -1 27 MOV.I < -2, < 1 28 SPL.B @ 0, $ 1180 29 MOV.I # 0, $ 2667 30 DAT.F $ 0, $ 0 31 DAT.F $ 0, $ 0 32 DAT.F $ 0, $ 0 33 DAT.F $ 0, $ 0 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 $ 358, $ 251 71 JMP.B $ 33, { 364 72 SEQ.I $ 1426, $ 1319 73 JMP.B $ 30, { 1432 74 SEQ.I $ 1210, $ 1103 75 JMP.B $ 28, < 36 76 SEQ.I $ 1636, $ 1529 77 JMP.B $ 26, > 34 78 SEQ.I $ 2062, $ 1955 79 DJN.B $ 24, { 24 80 SEQ.I $ 2274, $ 2167 81 JMP.B $ 22, { 22 82 SEQ.I $ 774, $ 667 83 JMP.B > 20, { 780 84 SEQ.I $ 558, $ 451 85 JMP.B > 18, { 17 86 SEQ.I $ 984, $ 877 87 JMP.B > 16, } 15 88 SEQ.I $ 2694, $ 2587 89 JMP.B $ 13, { 13 90 SEQ.I $ 3334, $ 3227 91 JMP.B $ 11, < 20 92 SEQ.I $ -3384, $ -3491 93 JMP.B $ 9, > 18 94 SEQ.I $ -2744, $ -2851 95 JMP.B $ 7, } 7 96 SEQ.I $ -2104, $ -2211 97 DJN.B $ 5, { 6 98 SEQ.I $ -1464, $ -1571 99 JMP.B $ 3, { 4 100 SNE.I $ 3966, $ 3859 101 JMZ.F $ -89, $ 3955 102 MUL.AB # 3, $ 5 103 MUL.B $ 8, @ -1 104 SNE.I > 3456, @ 3 105 ADD.AB # 107, $ 2 106 MOV.I $ 5, @ 1 107 MOV.I $ 4, * 214 108 SUB.AB # 7, $ -1 109 DJN.B $ -3, # 11 110 JMP.B $ -98, > 10 111 DAT.F { 67, { 6 112 113