|
|
1.1 ! root 1: .global main ! 2: .type main, @function ! 3: main: ! 4: clearf nzvc ! 5: setf nzv ! 6: bcc 0f ! 7: addq 1, $r3 ! 8: jump dofail ! 9: ! 10: 0: ! 11: clearf nzvc ! 12: setf nzv ! 13: bcs dofail ! 14: addq 1,$r3 ! 15: ! 16: clearf nzvc ! 17: setf ncv ! 18: bne 1f ! 19: addq 1, $r3 ! 20: ! 21: fail: ! 22: dofail: ! 23: jump _fail ! 24: ! 25: 1: ! 26: clearf nzvc ! 27: setf ncv ! 28: beq dofail ! 29: addq 1,$r3 ! 30: ! 31: clearf nzvc ! 32: setf ncz ! 33: bvc 2f ! 34: addq 1,$r3 ! 35: jump dofail ! 36: ! 37: 2: ! 38: clearf nzvc ! 39: setf ncz ! 40: bvs dofail ! 41: addq 1,$r3 ! 42: ! 43: clearf nzvc ! 44: setf vcz ! 45: bpl 3f ! 46: addq 1,$r3 ! 47: jump fail ! 48: 3: ! 49: clearf nzvc ! 50: setf vcz ! 51: bmi dofail ! 52: addq 1,$r3 ! 53: ! 54: clearf nzvc ! 55: setf nv ! 56: bls dofail ! 57: addq 1,$r3 ! 58: ! 59: clearf nzvc ! 60: setf nv ! 61: bhi 4f ! 62: addq 1,$r3 ! 63: jump dofail ! 64: ! 65: 4: ! 66: clearf nzvc ! 67: setf zc ! 68: bge 5f ! 69: addq 1,$r3 ! 70: jump dofail ! 71: ! 72: 5: ! 73: clearf nzvc ! 74: setf zc ! 75: blt dofail ! 76: addq 1,$r3 ! 77: ! 78: clearf nzvc ! 79: setf c ! 80: bgt 6f ! 81: addq 1,$r3 ! 82: jump fail ! 83: ! 84: 6: ! 85: clearf nzvc ! 86: setf c ! 87: ble dofail ! 88: addq 1,$r3 ! 89: ! 90: ;;;;;;;;;; ! 91: ! 92: setf nzvc ! 93: clearf nzv ! 94: bcc dofail ! 95: addq 1,$r3 ! 96: ! 97: setf nzvc ! 98: clearf nzv ! 99: bcs 0f ! 100: addq 1,$r3 ! 101: jump fail ! 102: ! 103: 0: ! 104: setf nzvc ! 105: clearf ncv ! 106: bne dofail ! 107: addq 1,$r3 ! 108: ! 109: setf nzvc ! 110: clearf ncv ! 111: beq 1f ! 112: addq 1,$r3 ! 113: jump fail ! 114: ! 115: 1: ! 116: setf nzvc ! 117: clearf ncz ! 118: bvc dofail ! 119: addq 1,$r3 ! 120: ! 121: setf nzvc ! 122: clearf ncz ! 123: bvs 2f ! 124: addq 1,$r3 ! 125: jump fail ! 126: ! 127: 2: ! 128: setf nzvc ! 129: clearf vcz ! 130: bpl dofail ! 131: addq 1,$r3 ! 132: ! 133: setf nzvc ! 134: clearf vcz ! 135: bmi 3f ! 136: addq 1,$r3 ! 137: jump fail ! 138: ! 139: 3: ! 140: setf nzvc ! 141: clearf nv ! 142: bls 4f ! 143: addq 1,$r3 ! 144: jump fail ! 145: ! 146: 4: ! 147: setf nzvc ! 148: clearf nv ! 149: bhi dofail ! 150: addq 1,$r3 ! 151: ! 152: setf zvc ! 153: clearf nzc ! 154: bge dofail ! 155: addq 1,$r3 ! 156: ! 157: setf nzc ! 158: clearf vzc ! 159: blt 5f ! 160: addq 1,$r3 ! 161: jump fail ! 162: ! 163: 5: ! 164: setf nzvc ! 165: clearf c ! 166: bgt dofail ! 167: addq 1,$r3 ! 168: ! 169: setf nzvc ! 170: clearf c ! 171: ble 6f ! 172: addq 1,$r3 ! 173: jump fail ! 174: ! 175: 6: ! 176: ; do a forward branch. ! 177: ba 2f ! 178: nop ! 179: .fill 100 ! 180: 1: ! 181: ba 3f ! 182: nop ! 183: .fill 800 ! 184: 2: ! 185: ba 1b ! 186: nop ! 187: .fill 1024 ! 188: 3: ! 189: ! 190: moveq 31, $r0 ! 191: 1: bne 1b ! 192: subq 1, $r0 ! 193: ! 194: jsr pass ! 195: moveq 0, $r10 ! 196: ret ! 197: nop
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.