-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathADDQ.L68
190 lines (186 loc) · 9.6 KB
/
ADDQ.L68
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
00001000 Starting Address
Assembler used: EASy68K Editor/Assembler v5.16.01
Created On: 5/29/2019 2:39:03 PM
00000000 1 *-----------------------------------------------------------
00000000 2 * Title :
00000000 3 * Written by :
00000000 4 * Date :
00000000 5 * Description:
00000000 6 *-----------------------------------------------------------
00002500 7 ORG $2500
00002500 8
00002500 9 IF_ADDQ
00002500 360C 10 MOVE.W A4,D3
00002502 11
00002502 12 ;Get the register
00002502 C67C 0FFF 13 AND.W #$0FFF,D3
00002506 E743 14 ASL.W #3,D3
00002508 3803 15 MOVE.W D3,D4
0000250A C8BC 0000F000 16 AND.L #$0000F000,D4
00002510 E95C 17 ROL.W #4,D4
00002512 2844 18 MOVE.L D4,A4 ;data
00002514 19
00002514 B8FC 0000 20 CMP.W #$0,A4
00002518 6100 0118 21 BSR SET_TO_EIGHT
0000251C 22
0000251C 23 ;Get the opmode
0000251C C67C 0FFF 24 AND.W #$0FFF,D3
00002520 E743 25 ASL.W #3,D3
00002522 3803 26 MOVE.W D3,D4
00002524 C8BC 0000F000 27 AND.L #$0000F000,D4
0000252A E95C 28 ROL.W #4,D4
0000252C 2A44 29 MOVE.L D4,A5 ;size
0000252E 30
0000252E 31 ;Get the effective mode
0000252E C67C 0FFF 32 AND.W #$0FFF,D3
00002532 E743 33 ASL.W #3,D3
00002534 3803 34 MOVE.W D3,D4
00002536 C8BC 0000F000 35 AND.L #$0000F000,D4
0000253C E95C 36 ROL.W #4,D4
0000253E 2C44 37 MOVE.L D4,A6 ;effective mode
00002540 38
00002540 39 ;Get the effective register
00002540 C67C 0FFF 40 AND.W #$0FFF,D3
00002544 E743 41 ASL.W #3,D3
00002546 3803 42 MOVE.W D3,D4
00002548 C8BC 0000F000 43 AND.L #$0000F000,D4
0000254E E95C 44 ROL.W #4,D4 ;effective register
00002550 45
00002550 143C 0010 46 MOVE.B #16,D2
00002554 103C 000F 47 MOVE.B #15,D0
00002558 48
00002558 6000 0002 49 BRA DISPLAY_ADDQ
0000255C 50
0000255C 51 DISPLAY_ADDQ
Line 52 ERROR: Undefined symbol
0000255C 43F9 004DBD16 52 LEA ADDQ_OUTPUT,A1
00002562 103C 000E 53 MOVE.B #14,D0
00002566 4E4F 54 TRAP #15
00002568 55
00002568 6000 0002 56 BRA DISPLAY_ADDQ_SIZE
0000256C 57
0000256C 58 DISPLAY_ADDQ_SIZE
0000256C BAFC 0000 59 CMP.W #%00,A5
00002570 6700 0016 60 BEQ DISPLAY_ADDQ_BYTE
00002574 61
00002574 BAFC 0001 62 CMP.W #%01,A5
00002578 6700 001E 63 BEQ DISPLAY_ADDQ_WORD
0000257C 64
0000257C BAFC 0002 65 CMP.W #%10,A5
00002580 6700 0026 66 BEQ DISPLAY_ADDQ_LONG
00002584 67
Line 68 ERROR: Undefined symbol
00002584 6000 9790 68 BRA IF_INVALID_OP
00002588 69
00002588 70 DISPLAY_ADDQ_BYTE
Line 71 ERROR: Undefined symbol
00002588 43F9 004DBD16 71 LEA B_OUTPUT,A1
0000258E 103C 000E 72 MOVE.B #14,D0
00002592 4E4F 73 TRAP #15
00002594 6000 0022 74 BRA DISPLAY_ADDQ_COMMA
00002598 75
00002598 76 DISPLAY_ADDQ_WORD
Line 77 ERROR: Undefined symbol
00002598 43F9 004DBD16 77 LEA W_OUTPUT,A1
0000259E 103C 000E 78 MOVE.B #14,D0
000025A2 4E4F 79 TRAP #15
000025A4 6000 0012 80 BRA DISPLAY_ADDQ_COMMA
000025A8 81
000025A8 82 DISPLAY_ADDQ_LONG
Line 83 ERROR: Undefined symbol
000025A8 43F9 004DBD16 83 LEA L_OUTPUT,A1
000025AE 103C 000E 84 MOVE.B #14,D0
000025B2 4E4F 85 TRAP #15
000025B4 6000 0002 86 BRA DISPLAY_ADDQ_COMMA
000025B8 87
000025B8 88 DISPLAY_ADDQ_COMMA
Line 89 ERROR: Undefined symbol
000025B8 123C 0016 89 MOVE.B #NUM,D1
000025BC 103C 0006 90 MOVE.B #6,D0
000025C0 4E4F 91 TRAP #15
000025C2 92
Line 93 ERROR: Undefined symbol
000025C2 123C 0016 93 MOVE.B #HEX,D1
000025C6 103C 0006 94 MOVE.B #6,D0
000025CA 4E4F 95 TRAP #15
000025CC 96
000025CC 143C 0010 97 MOVE.B #16,D2
000025D0 103C 000F 98 MOVE.B #15,D0
000025D4 220C 99 MOVE.L A4,D1
000025D6 4E4F 100 TRAP #15
000025D8 101
Line 102 ERROR: Undefined symbol
000025D8 123C 0016 102 MOVE.B #COMMA,D1
000025DC 103C 0006 103 MOVE.B #6,D0
000025E0 4E4F 104 TRAP #15
000025E2 105
Line 106 ERROR: Undefined symbol
000025E2 6100 9732 106 BSR GET_EFFECTIVE_ADDRESS_ea
Line 107 ERROR: Undefined symbol
000025E6 6000 972E 107 BRA ITERATE
000025EA 108
000025EA 109 ;subroutine;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
000025EA 110 GET_EFFECTIVE_ADDRESS_ea_NO_DATA
000025EA BCFC 0000 111 CMP.W #%000,A6
Line 112 ERROR: Undefined symbol
000025EE 6700 9726 112 BEQ DISPLAY_Dn_ea
000025F2 113
000025F2 BCFC 0001 114 CMP.W #%001,A6
Line 115 ERROR: Undefined symbol
000025F6 6700 971E 115 BEQ DISPLAY_An_ea
000025FA 116
000025FA BCFC 0002 117 CMP.W #%010,A6
Line 118 ERROR: Undefined symbol
000025FE 6700 9716 118 BEQ DISPLAY_An_ADDRESS_ea
00002602 119
00002602 BCFC 0003 120 CMP.W #%011,A6
Line 121 ERROR: Undefined symbol
00002606 6700 970E 121 BEQ DISPLAY_An_ADDRESS_INCREMENT_ea
0000260A 122
0000260A BCFC 0004 123 CMP.W #%100,A6
Line 124 ERROR: Undefined symbol
0000260E 6700 9706 124 BEQ DISPLAY_An_ADDRESS_DECREMENT_ea
00002612 125
00002612 BCFC 0007 126 CMP.W #%111,A6
00002616 6700 0006 127 BEQ DISPLAY_ADDRESS_ea
0000261A 128
Line 129 ERROR: Undefined symbol
0000261A 6000 96FA 129 BRA IF_INVALID_OP
0000261E 130
0000261E 131 DISPLAY_ADDRESS_ea
0000261E BCFC 0000 132 CMP.W #%000,A6
Line 133 ERROR: Undefined symbol
00002622 6700 96F2 133 BEQ DISPLAY_ADDRESS_WORD_ea
00002626 134
00002626 BCFC 0001 135 CMP.W #%001,A6
Line 136 ERROR: Undefined symbol
0000262A 6700 96EA 136 BEQ DISPLAY_ADDRESS_LONG_ea
0000262E 137
Line 138 ERROR: Undefined symbol
0000262E 6000 96E6 138 BRA IF_INVALID_OP
00002632 139
00002632 140
00002632 141 ;subroutine;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
00002632 142 SET_TO_EIGHT
00002632 7808 143 MOVE.L #$8,D4
00002634 4E75 144 RTS
00002636 145
00002636 146
00002636 147
00002636 148
Line 149 WARNING: END directive missing, starting address not set
19 errors detected
1 warning generated
SYMBOL TABLE INFORMATION
Symbol-name Value
-------------------------
DISPLAY_ADDQ 255C
DISPLAY_ADDQ_BYTE 2588
DISPLAY_ADDQ_COMMA 25B8
DISPLAY_ADDQ_LONG 25A8
DISPLAY_ADDQ_SIZE 256C
DISPLAY_ADDQ_WORD 2598
DISPLAY_ADDRESS_EA 261E
GET_EFFECTIVE_ADDRESS_EA_NO_DATA 25EA
IF_ADDQ 2500
SET_TO_EIGHT 2632