Mercurial > hg > Members > kono > os9 > sbc09
comparison examples/input.asm @ 57:2088fd998865
sbc09 directry clean up
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 23 Jul 2018 16:07:12 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
56:4fa2bdb0c457 | 57:2088fd998865 |
---|---|
1 ;6809 Benchmark program. | |
2 | |
3 org $100 | |
4 | |
5 lds #$100 | |
6 | |
7 ldb #'a' | |
8 jsr outc | |
9 | |
10 | |
11 ldx #40 | |
12 inloop jsr inc | |
13 jsr outc | |
14 leax -1,x | |
15 bne inloop | |
16 | |
17 ldb #'b' | |
18 jsr outc | |
19 jmp realexit | |
20 | |
21 error ldb #'e' | |
22 jsr outc | |
23 jmp realexit | |
24 | |
25 outc swi2 | |
26 rts | |
27 | |
28 inc swi3 | |
29 rts | |
30 | |
31 realexit sync | |
32 | |
33 enddata | |
34 | |
35 end |