Mercurial > hg > Members > kono > nitros9-code

comparison level1/modules/boot_1773.asm @ 1166:bb618bed0bdc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Miscellaneous source improvements
author boisy
date Mon, 19 May 2003 11:06:54 +0000
parents 30655a7845f7
children 4e235f213651
comparison
equal deleted inserted replaced
1165:b91cc65dbe4a 1166:bb618bed0bdc
59 lbsr L01A7 59 lbsr L01A7
60 lda ,x 60 lda ,x
61 lda #$FF 61 lda #$FF
62 sta u0004,u 62 sta u0004,u
63 leax >NMIRtn,pcr 63 leax >NMIRtn,pcr
64 ifgt Level-1 64 IFGT Level-1
65 stx <D.NMI 65 stx <D.NMI
66 lda #$09 66 lda #$09
67 else 67 ELSE
68 stx >$010A 68 stx >$010A
69 lda #$7E 69 lda #$7E
70 sta >$0109 70 sta >$0109
71 lda #$08 71 lda #$08
72 endc 72 ENDC
73 sta >DPort 73 sta >DPort
74 74
75 * delay loop 75 * delay loop
76 ifgt Level-1 76 IFGT Level-1
77 ldd #$C350 77 ldd #$C350
78 else 78 ELSE
79 ldd #$61A8 79 ldd #$61A8
80 endc 80 ENDC
81 L003A nop 81 L003A nop
82 nop 82 nop
83 subd #$0001 83 subd #$0001
84 bne L003A 84 bne L003A
85 85
113 pshs x 113 pshs x
114 ldd #256 114 ldd #256
115 ldu u0002,u 115 ldu u0002,u
116 os9 F$SRtMem 116 os9 F$SRtMem
117 ldd $02,s 117 ldd $02,s
118 ifgt Level-1 118 IFGT Level-1
119 os9 F$BtMem 119 os9 F$BtMem
120 else 120 ELSE
121 os9 F$SRqMem 121 os9 F$SRqMem
122 endc 122 ENDC
123 puls x 123 puls x
124 bcs L00AA 124 bcs L00AA
125 stu $02,s 125 stu $02,s
126 ldu $06,s 126 ldu $06,s
127 ldd $02,s 127 ldd $02,s
143 puls b,a 143 puls b,a
144 bra L00AC 144 bra L00AC
145 L00A8 leas $04,s 145 L00A8 leas $04,s
146 L00AA leas $02,s 146 L00AA leas $02,s
147 L00AC 147 L00AC
148 ifgt Level-1 148 IFGT Level-1
149 sta >$FFD9 149 sta >$FFD9
150 endc 150 ENDC
151 puls u,y,x 151 puls u,y,x
152 leas size,s 152 leas size,s
153 rts 153 rts
154 154
155 L00B4 lda #$29 155 L00B4 lda #$29
274 L01A5 bsr L019C 274 L01A5 bsr L019C
275 L01A7 lbsr L01AA 275 L01A7 lbsr L01AA
276 L01AA lbsr L01AD 276 L01AA lbsr L01AD
277 L01AD rts 277 L01AD rts
278 278
279 ifgt Level-1 279 IFGT Level-1
280 280
281 rts 281 rts
282 rts 282 rts
283 rts 283 rts
284 rts 284 rts
285 rts 285 rts
286 rts 286 rts
287 rts 287 rts
288 rts 288 rts
289 rts 289 rts
290 rts 290 rts
291 rts 291 rts
292 rts 292 rts
293 rts 293 rts
294 rts 294 rts
295 rts 295 rts
296 rts 296 rts
297 rts 297 rts
298 rts 298 rts
299 rts 299 rts
300 rts 300 rts
301 rts 301 rts
302 rts 302 rts
303 rts 303 rts
304 rts 304 rts
305 rts 305 rts
306 rts 306 rts
307 rts 307 rts
308 rts 308 rts
309 rts 309 rts
310 rts 310 rts
311 rts 311 rts
312 312
313 endc 313 ENDC
314 314
315 emod 315 emod
316 eom equ * 316 eom equ *
317 end 317 end