source: thomson/code/3rdparty/sources1-hmel/ESS6800.ASM@ ceffc47

main
Last change on this file since ceffc47 was ceffc47, checked in by Adrien Destugues <pulkomandy@…>, 10 years ago

Add that collection of 3rdparty source I had lying on my disk for some time...

git-svn-id: ​svn://localhost/thomson@51 85ae3b6b-dc8f-4344-a89d-598714f2e4e5
  • Property mode set to 100644
File size: 3.8 KB
Line 
1****************************************
2* *
3* Essai de l'assembleur croisé 6800 *
4* *
5****************************************
6
7 TITLE ESSAIASM6800
8
9LED EQU 3 bit commande led
10SWITCH EQU 7 bit interrupteur
11PORTB EQU $0001
12PORTF EQU $ABCD
13FLG SET 50
14
15 ORG $0010 ram
16
17MEMPT RMB 2
18VAR RMB 1
19
20 PAGE
21 ORG $0080 rom
22
23CNST1 FCB 10
24CNST2 FDB $1234
25MESS FCC 'SALUTOHBRICOLEUR'
26* INCLUD FILE include mis en
27* commentaire !!
28
29
30* Assemblage type 0
31*
32* adressage inherent
33*---------------------------------------
34
35T0 ABA
36 CLRA
37 CLRB
38 CBA
39 COMA
40 COMB
41 NEGA
42 NEGB
43 DAA
44 DECA
45 DECB
46 INCA
47 INCB
48 PSHA
49 PSHB
50 PULA
51 PULB
52 ROLA
53 ROLB
54 RORA
55 RORB
56 ASLA
57 ASLB
58 ASRA
59 ASRB
60 LSRA
61 LSRB
62 LSLA *
63 LSLB *
64 SBA
65 TAB
66 TBA
67 TSTA
68 TSTB
69 DEX
70 DECX *
71 DES
72 DECS *
73 INX
74 INCX *
75 INS
76 INCS *
77 TXS
78 TSX
79 NOP
80 RTI
81 RTS
82 SWI
83 WAI
84 WAIT *
85 CLC
86 CLI
87 CLV
88 SEC
89 SEI
90 SEV
91 TAP
92 TPA
93
94
95* Assemblage type 1
96*
97* adressage PC relatif -128..+127
98*
99* BRA LABEL
100* BRA LABEL+1
101* BRA *+25
102*---------------------------------------
103
104T1 BRA *
105 BCC T10
106 BCS T1
107 BEQ *
108 BGE *
109 BGT *
110 BHI *
111 BLE *
112 BLS *
113 BLT *
114 BMI *
115 BNE *
116 BVC *
117 BVS *
118 BPL *
119T10 BSR *
120
121
122* Assemblage type 2
123*
124* CLR [<]<exp. 8 bits>,X indexe offset
125* sur 8 bits
126* CLR [>]<exp.16 bits>
127*---------------------------------------
128
129T2 CLR VAR,X
130 CLR <VAR,X
131 CLR VAR
132 CLR >VAR
133 COM VAR
134 NEG VAR
135 DEC VAR
136 INC VAR
137 ROL VAR
138 ROR VAR
139 ASL VAR
140 ASR VAR
141 LSR VAR
142 LSL VAR *
143 TST VAR
144 JMP PORTF
145 JSR T1
146
147
148* Assemblage type 3
149*
150* STAA [<]<exp. 8 bits> direct
151* STAA [<]<exp. 8 bits>,X indexe offset
152* 8 bits
153* STAA [>]<exp.16 bits>
154*
155* si '>' impose mode étendu
156* si '>' impose mode étendu
157* si rien fait au mieux selon expres
158*---------------------------------------
159
160T3 STAA VAR
161 STAA PORTF
162 STAA <VAR
163 STAA >VAR
164 STAA VAR,X
165 STAA <VAR,X
166 STA VAR *
167 STAB VAR
168 STB VAR *
169 STX VAR
170 STS VAR
171
172
173* Assemblage type 4 et 5
174*
175* ADDA #<exp. 8/16 bits>
176* ADDA [<]<exp. 8 bits>
177* ADDA [<]<exp. 8 bits>,X
178* ADDA [>]<exp. 16 bits>
179*
180* si '>' impose mode étendu
181* si '>' impose mode étendu
182* si rien fait au mieux selon expres
183*---------------------------------------
184
185T45 ADDA #CNST1
186 ADDA #25
187 ADDA #$23
188 ADDA VAR
189 ADDA PORTF
190 ADDA <VAR
191 ADDA >VAR
192 ADDA VAR,X
193 ADDA <$12,X
194 ADDB #25
195 ADCA #25
196 ADCB #25
197 ANDA #25
198 ANDB #25
199 BITA #25
200 BITB #25
201 CMPA #25
202 CMPB #25
203 EORA #25
204 EORB #25
205 LDAA #25
206 LDA #25 *
207 LDAB #25
208 LDB #25 *
209 ORAA #25
210 ORA #25 *
211 ORAB #25
212 ORB #25 *
213 SUBA #25
214 SUBB #25
215 SBCA #25
216 SBCB #25
217 CPX #25
218 CMPX #25 *
219 LDX #25
220 LDS #25
221
222FINPRG EQU *
223 END
Note: See TracBrowser for help on using the repository browser.