Category : Assembly Language Source Code
Archive   : CUG292.ZIP
Filename : T6801S.ASM
.area DIRECT
.blkb 0x12
dirpag: ; direct page location
ext = 0x1234 ; extended address
.area AS6801
.setdp 0,DIRECT
.hd6303
; 00
nop ; 01
; 02
; 03
lsrd ; 04
asld ; 05
tap ; 06
tpa ; 07
inx ; 08
dex ; 09
clv ; 0A
sev ; 0B
clc ; 0C
sec ; 0D
cli ; 0E
sei ; 0F
sba ; 10
cba ; 11
; 12
; 13
; 14
; 15
tab ; 16
tba ; 17
xgdx ; 18 hd6303
daa ; 19
slp ; 1A hd6303
aba ; 1B
; 1C
; 1D
; 1E
; 1F
.page
bra . ; 20 FE
brn . ; 21 FE
bhi . ; 22 FE
bls . ; 23 FE
bcc . ; 24 FE
bcs . ; 25 FE
bne . ; 26 FE
beq . ; 27 FE
bvc . ; 28 FE
bvs . ; 29 FE
bpl . ; 2A FE
bmi . ; 2B FE
bge . ; 2C FE
blt . ; 2D FE
bgt . ; 2E FE
ble . ; 2F FE
tsx ; 30
ins ; 31
pula ; 32
pulb ; 33
des ; 34
txs ; 35
psha ; 36
pshb ; 37
pulx ; 38
rts ; 39
abx ; 3A
rti ; 3B
pshx ; 3C
mul ; 3D
wai ; 3E
swi ; 3F
.page
nega ; 40
; 41
; 42
coma ; 43
lsra ; 44
; 45
rora ; 46
asra ; 47
asla ; 48
rola ; 49
deca ; 4A
; 4B
inca ; 4C
tsta ; 4D
; 4E
clra ; 4F
negb ; 50
; 51
; 52
comb ; 53
lsrb ; 54
; 55
rorb ; 56
asrb ; 57
aslb ; 58
rolb ; 59
decb ; 5A
; 5B
incb ; 5C
tstb ; 5D
; 5E
clrb ; 5F
.page
neg ,x ; 60 00
aim #2, 4,x ; 61 02 04 hd6303
oim #2, 4,x ; 62 02 04 hd6303
com ,x ; 63 00
lsr ,x ; 64 00
eim #2, 4,x ; 65 02 04 hd6303
ror ,x ; 66 00
asr ,x ; 67 00
asl ,x ; 68 00
rol ,x ; 69 00
dec ,x ; 6A 00
tim #2, 4,x ; 6B 02 04 hd6303
inc ,x ; 6C 00
tst ,x ; 6D 00
jmp ,x ; 6E 00
clr ,x ; 6F 00
neg ext ; 70 12 34
aim #2, *dirpag ; 71 02 12 hd6303
oim #2, *dirpag ; 72 02 12 hd6303
com ext ; 73 12 34
lsr ext ; 74 12 34
eim #2, *dirpag ; 75 02 12 hd6303
ror ext ; 76 12 34
asr ext ; 77 12 34
asl ext ; 78 12 34
rol ext ; 79 12 34
dec ext ; 7A 12 34
tim #2, *dirpag ; 7B 02 12 hd6303
inc ext ; 7C 12 34
tst ext ; 7D 12 34
jmp ext ; 7E 12 34
clr ext ; 7F 12 34
.page
suba #1 ; 80 01
cmpa #1 ; 81 01
sbca #1 ; 82 01
subd #1 ; 83 00 01
anda #1 ; 84 01
bita #1 ; 85 01
ldaa #1 ; 86 01
; 87
eora #1 ; 88 01
adca #1 ; 89 01
oraa #1 ; 8A 01
adda #1 ; 8B 01
cpx #1 ; 8C 00 01
bsr . ; 8D FE
lds #1 ; 8E 00 01
; 8F
suba *dirpag ; 90 12
cmpa *dirpag ; 91 12
sbca *dirpag ; 92 12
subd *dirpag ; 93 12
anda *dirpag ; 94 12
bita *dirpag ; 95 12
ldaa *dirpag ; 96 12
staa *dirpag ; 97 12
eora *dirpag ; 98 12
adca *dirpag ; 99 12
oraa *dirpag ; 9A 12
adda *dirpag ; 9B 12
cpx *dirpag ; 9C 12
jsr *dirpag ; 9D 12
lds *dirpag ; 9E 12
sts *dirpag ; 9F 12
.page
suba 4,x ; A0 04
cmpa 4,x ; A1 04
sbca 4,x ; A2 04
subd 4,x ; A3 04
anda 4,x ; A4 04
bita 4,x ; A5 04
ldaa 4,x ; A6 04
staa 4,x ; A7 04
eora 4,x ; A8 04
adca 4,x ; A9 04
oraa 4,x ; AA 04
adda 4,x ; AB 04
cpx 4,x ; AC 04
jsr 4,x ; AD 04
lds 4,x ; AE 04
sts 4,x ; AF 04
suba ext ; B0 12 34
cmpa ext ; B1 12 34
sbca ext ; B2 12 34
subd ext ; B3 12 34
anda ext ; B4 12 34
bita ext ; B5 12 34
ldaa ext ; B6 12 34
staa ext ; B7 12 34
eora ext ; B8 12 34
adca ext ; B9 12 34
oraa ext ; BA 12 34
adda ext ; BB 12 34
cpx ext ; BC 12 34
jsr ext ; BD 12 34
lds ext ; BE 12 34
sts ext ; BF 12 34
.page
subb #1 ; C0 01
cmpb #1 ; C1 01
sbcb #1 ; C2 01
addd #1 ; C3 00 01
andb #1 ; C4 01
bitb #1 ; C5 01
ldab #1 ; C6 01
; C7
eorb #1 ; C8 01
adcb #1 ; C9 01
orab #1 ; CA 01
addb #1 ; CB 01
ldd #1 ; CC 00 01
; CD
ldx #1 ; CE 00 01
; CF
subb *dirpag ; D0 12
cmpb *dirpag ; D1 12
sbcb *dirpag ; D2 12
addd *dirpag ; D3 12
andb *dirpag ; D4 12
bitb *dirpag ; D5 12
ldab *dirpag ; D6 12
stab *dirpag ; D7 12
eorb *dirpag ; D8 12
adcb *dirpag ; D9 12
orab *dirpag ; DA 12
addb *dirpag ; DB 12
ldd *dirpag ; DC 12
std *dirpag ; DD 12
ldx *dirpag ; DE 12
stx *dirpag ; DF 12
.page
subb dirpag,x ; E0 12
cmpb dirpag,x ; E1 12
sbcb dirpag,x ; E2 12
addd dirpag,x ; E3 12
andb dirpag,x ; E4 12
bitb dirpag,x ; E5 12
ldab dirpag,x ; E6 12
stab dirpag,x ; E7 12
eorb dirpag,x ; E8 12
adcb dirpag,x ; E9 12
orab dirpag,x ; EA 12
addb dirpag,x ; EB 12
ldd dirpag,x ; EC 12
std dirpag,x ; ED 12
ldx dirpag,x ; EE 12
stx dirpag,x ; EF 12
subb ext ; F0 12 34
cmpb ext ; F1 12 34
sbcb ext ; F2 12 34
addd ext ; F3 12 34
andb ext ; F4 12 34
bitb ext ; F5 12 34
ldab ext ; F6 12 34
stab ext ; F7 12 34
eorb ext ; F8 12 34
adcb ext ; F9 12 34
orab ext ; FA 12 34
addb ext ; FB 12 34
ldd ext ; FC 12 34
std ext ; FD 12 34
ldx ext ; FE 12 34
stx ext ; FF 12 34
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/