|
|
1.1 ! root 1: .text ! 2: .globl _main ! 3: .align 2 ! 4: _main:link a6,#-80 ! 5: moveml #0x24d8,a6@(-72) ! 6: clrl d6 ! 7: L2: ! 8: clrl d7 ! 9: L6: ! 10: movl #1000,d4 ! 11: mulsl d6,d4 ! 12: addl d7,d4 ! 13: movl d6,d3; asll #4,d3 ! 14: lea @(_x:l,d3:l:1),a2 ! 15: movl d4,a2@(0,d7:l:4) ! 16: L7: ! 17: addql #1,d7 ! 18: cmpl #4,d7; jlt L6 ! 19: movl d6,d4; asll #4,d4 ! 20: lea @(_x:l,d4:l:1),a2 ! 21: movl a2,@(_y:l,d6:l:4) ! 22: L3: ! 23: addql #1,d6 ! 24: cmpl #3,d6; jlt L2 ! 25: jbsr _f:l ! 26: clrl d6 ! 27: L10: ! 28: movl d6,d4; asll #4,d4 ! 29: lea a6@(-48,d4:l:1),a2 ! 30: movl a2,a5 ! 31: movl a2,@(_y:l,d6:l:4) ! 32: clrl d7 ! 33: L14: ! 34: movl d6,d4; asll #4,d4 ! 35: lea @(_x:l,d4:l:1),a2 ! 36: movl a2@(0,d7:l:4),a5@(0,d7:l:4) ! 37: L15: ! 38: addql #1,d7 ! 39: cmpl #4,d7; jlt L14 ! 40: L11: ! 41: addql #1,d6 ! 42: cmpl #3,d6; jlt L10 ! 43: lea a6@(-48),a2 ! 44: movl a2,sp@ ! 45: movl #_y,sp@(4) ! 46: jbsr _g:l ! 47: clrl d0 ! 48: L1: ! 49: moveml a6@(-72),#0x24d8 ! 50: unlk a6 ! 51: rts ! 52: .globl _f ! 53: .align 2 ! 54: _f:link a6,#-24 ! 55: moveml #0x4d0,a6@(-16) ! 56: clrl d6 ! 57: L19: ! 58: clrl d7 ! 59: L23: ! 60: movl #L27,sp@ ! 61: movl d6,d4; asll #4,d4 ! 62: lea @(_x:l,d4:l:1),a2 ! 63: movl a2@(0,d7:l:4),sp@(4) ! 64: jbsr _printf:l ! 65: L24: ! 66: addql #1,d7 ! 67: cmpl #4,d7; jlt L23 ! 68: L20: ! 69: addql #1,d6 ! 70: cmpl #3,d6; jlt L19 ! 71: movl #L28,sp@ ! 72: jbsr _printf:l ! 73: clrl d6 ! 74: L29: ! 75: clrl d7 ! 76: L33: ! 77: movl #L27,sp@ ! 78: movl @(_y:l,d6:l:4),a2 ! 79: movl a2@(0,d7:l:4),sp@(4) ! 80: jbsr _printf:l ! 81: L34: ! 82: addql #1,d7 ! 83: cmpl #4,d7; jlt L33 ! 84: L30: ! 85: addql #1,d6 ! 86: cmpl #3,d6; jlt L29 ! 87: movl #L28,sp@ ! 88: jbsr _printf:l ! 89: L18: ! 90: moveml a6@(-16),#0x4d0 ! 91: unlk a6 ! 92: rts ! 93: .globl _g ! 94: .align 2 ! 95: _g:link a6,#-32 ! 96: moveml #0x34d0,a6@(-24) ! 97: movl a6@(8),a5 ! 98: movl a6@(12),a4 ! 99: clrl d6 ! 100: L38: ! 101: clrl d7 ! 102: L42: ! 103: movl #L27,sp@ ! 104: movl d6,d4; asll #4,d4 ! 105: movl d4,a2; addl a5,a2 ! 106: movl a2@(0,d7:l:4),sp@(4) ! 107: jbsr _printf:l ! 108: L43: ! 109: addql #1,d7 ! 110: cmpl #4,d7; jlt L42 ! 111: L39: ! 112: addql #1,d6 ! 113: cmpl #3,d6; jlt L38 ! 114: movl #L28,sp@ ! 115: jbsr _printf:l ! 116: clrl d6 ! 117: L46: ! 118: clrl d7 ! 119: L50: ! 120: movl #L27,sp@ ! 121: movl a4@(0,d6:l:4),a2 ! 122: movl a2@(0,d7:l:4),sp@(4) ! 123: jbsr _printf:l ! 124: L51: ! 125: addql #1,d7 ! 126: cmpl #4,d7; jlt L50 ! 127: L47: ! 128: addql #1,d6 ! 129: cmpl #3,d6; jlt L46 ! 130: movl #L28,sp@ ! 131: jbsr _printf:l ! 132: L37: ! 133: moveml a6@(-24),#0x34d0 ! 134: unlk a6 ! 135: rts ! 136: .bss ! 137: .globl _y ! 138: .comm _y,12 ! 139: .globl _x ! 140: .comm _x,48 ! 141: .text ! 142: .align 2; L28:.byte 10,0 ! 143: .align 2; L27:.ascii " %d\000"
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.