mirror of https://github.com/g012/l65.git
739 lines
10 KiB
Plaintext
739 lines
10 KiB
Plaintext
require 'scv'
|
|
location(0x8000, 0x8FFF)
|
|
section{"rom", org=0x8000}
|
|
dc.b 'H'
|
|
@main
|
|
block
|
|
calb
|
|
ei
|
|
daa
|
|
di
|
|
ex
|
|
exx
|
|
halt
|
|
jb
|
|
nop
|
|
ret
|
|
reti
|
|
rets
|
|
sio
|
|
softi
|
|
stm
|
|
table
|
|
dcr a
|
|
dcr b
|
|
dcr c
|
|
inr a
|
|
inr b
|
|
inr c
|
|
dcx sp
|
|
inx sp
|
|
mvi a,0xca
|
|
mvi b,0xfe
|
|
mvi c,0xbe
|
|
mvi d,0xef
|
|
mvi e,0xf0
|
|
mvi h,0x0d
|
|
mvi l,0x78
|
|
mvi v,0x01
|
|
aci a,0x0f
|
|
adi a,0x1e
|
|
adinc a,0x2d
|
|
ani a,0x3c
|
|
eqi a,0x4b
|
|
gti a,0x5a
|
|
lti a,0x69
|
|
nei a,0x87
|
|
offi a,0x96
|
|
oni a,0xa5
|
|
ori a,0xb4
|
|
sbi a,0xc3
|
|
sui a,0xd2
|
|
suinb a,0xe1
|
|
xri a,0xf0
|
|
lxi bc,0xabcd
|
|
lxi de,0xbeef
|
|
lxi hl,0xcafe
|
|
lxi sp,0xf00d
|
|
call 0xd701
|
|
jmp 0x8e07
|
|
clc
|
|
pen
|
|
per
|
|
pex
|
|
rld
|
|
rrd
|
|
stc
|
|
mov a,b
|
|
mov a,c
|
|
mov a,d
|
|
mov a,e
|
|
mov a,h
|
|
mov a,l
|
|
mov b,a
|
|
mov c,a
|
|
mov d,a
|
|
mov e,a
|
|
mov h,a
|
|
mov l,a
|
|
@l0 jre l0
|
|
@l1 nop
|
|
jre l1
|
|
@l2 nop nop
|
|
jre l2
|
|
@l3 nop nop nop
|
|
jre l3
|
|
@l4 nop nop nop nop
|
|
jre l4
|
|
jre l5
|
|
@l5 jre l6
|
|
nop
|
|
@l6 jre l7
|
|
nop nop
|
|
@l7 jre l8
|
|
nop nop nop
|
|
@l8 jre l9
|
|
nop nop nop nop
|
|
@l9
|
|
ldax (bc)
|
|
ldax (de)
|
|
ldax (hl)
|
|
stax (bc)
|
|
stax (de)
|
|
stax (hl)
|
|
inrw (v,0x01)
|
|
ldaw (v,0x23)
|
|
dcrw (v,0x45)
|
|
staw (v,0x67)
|
|
bit0 (v,0x89)
|
|
bit1 (v,0xab)
|
|
bit2 (v,0xcd)
|
|
bit3 (v,0xef)
|
|
bit4 (v,0xfe)
|
|
bit5 (v,0xdc)
|
|
bit6 (v,0xba)
|
|
bit7 (v,0x98)
|
|
dcx bc
|
|
dcx de
|
|
dcx hl
|
|
inx bc
|
|
inx de
|
|
inx hl
|
|
mvix (bc),0xf9
|
|
mvix (de),0xe8
|
|
mvix (hl),0xd7
|
|
mviw (v,0x9a),0x3f
|
|
eqiw (v,0xc5),0x1b
|
|
ldaxd (de)
|
|
ldaxi (de)
|
|
ldaxd (hl)
|
|
ldaxi (hl)
|
|
staxd (de)
|
|
staxi (de)
|
|
staxd (hl)
|
|
staxi (hl)
|
|
push bc
|
|
push de
|
|
push hl
|
|
pop hl
|
|
pop de
|
|
pop bc
|
|
push va
|
|
pop va
|
|
rll a
|
|
rlr a
|
|
rll c
|
|
rlr c
|
|
sll a
|
|
slr a
|
|
sll c
|
|
slr c
|
|
skc
|
|
skz
|
|
sknc
|
|
sknz
|
|
skit f0
|
|
skit ft
|
|
skit f1
|
|
skit f2
|
|
skit fs
|
|
sknit f0
|
|
sknit ft
|
|
sknit f1
|
|
sknit f2
|
|
sknit fs
|
|
in 0x00
|
|
in 0xa7
|
|
in 0xbf
|
|
out 0x00
|
|
out 0x5a
|
|
out 0xbf
|
|
mov a,pa
|
|
mov a,pb
|
|
mov a,pc
|
|
mov a,mk
|
|
mov a,mb
|
|
mov a,mc
|
|
mov a,tm0
|
|
mov a,tm1
|
|
mov a,s
|
|
mov pa,a
|
|
mov pb,a
|
|
mov pc,a
|
|
mov mk,a
|
|
mov mb,a
|
|
mov mc,a
|
|
mov tm0,a
|
|
mov tm1,a
|
|
mov s,a
|
|
ana v,a
|
|
ana a,a
|
|
ana b,a
|
|
ana c,a
|
|
ana d,a
|
|
ana e,a
|
|
ana h,a
|
|
ana l,a
|
|
xra v,a
|
|
xra a,a
|
|
xra b,a
|
|
xra c,a
|
|
xra d,a
|
|
xra e,a
|
|
xra h,a
|
|
xra l,a
|
|
ora v,a
|
|
ora a,a
|
|
ora b,a
|
|
ora c,a
|
|
ora d,a
|
|
ora e,a
|
|
ora h,a
|
|
ora l,a
|
|
addnc v,a
|
|
addnc a,a
|
|
addnc b,a
|
|
addnc c,a
|
|
addnc d,a
|
|
addnc e,a
|
|
addnc h,a
|
|
addnc l,a
|
|
gta v,a
|
|
gta a,a
|
|
gta b,a
|
|
gta c,a
|
|
gta d,a
|
|
gta e,a
|
|
gta h,a
|
|
gta l,a
|
|
subnb v,a
|
|
subnb a,a
|
|
subnb b,a
|
|
subnb c,a
|
|
subnb d,a
|
|
subnb e,a
|
|
subnb h,a
|
|
subnb l,a
|
|
lta v,a
|
|
lta a,a
|
|
lta b,a
|
|
lta c,a
|
|
lta d,a
|
|
lta e,a
|
|
lta h,a
|
|
lta l,a
|
|
add v,a
|
|
add a,a
|
|
add b,a
|
|
add c,a
|
|
add d,a
|
|
add e,a
|
|
add h,a
|
|
add l,a
|
|
adc v,a
|
|
adc a,a
|
|
adc b,a
|
|
adc c,a
|
|
adc d,a
|
|
adc e,a
|
|
adc h,a
|
|
adc l,a
|
|
sub v,a
|
|
sub a,a
|
|
sub b,a
|
|
sub c,a
|
|
sub d,a
|
|
sub e,a
|
|
sub h,a
|
|
sub l,a
|
|
nea v,a
|
|
nea a,a
|
|
nea b,a
|
|
nea c,a
|
|
nea d,a
|
|
nea e,a
|
|
nea h,a
|
|
nea l,a
|
|
sbb v,a
|
|
sbb a,a
|
|
sbb b,a
|
|
sbb c,a
|
|
sbb d,a
|
|
sbb e,a
|
|
sbb h,a
|
|
sbb l,a
|
|
eqa v,a
|
|
eqa a,a
|
|
eqa b,a
|
|
eqa c,a
|
|
eqa d,a
|
|
eqa e,a
|
|
eqa h,a
|
|
eqa l,a
|
|
ana a,v
|
|
ana a,a
|
|
ana a,b
|
|
ana a,c
|
|
ana a,d
|
|
ana a,e
|
|
ana a,h
|
|
ana a,l
|
|
xra a,v
|
|
xra a,a
|
|
xra a,b
|
|
xra a,c
|
|
xra a,d
|
|
xra a,e
|
|
xra a,h
|
|
xra a,l
|
|
ora a,v
|
|
ora a,a
|
|
ora a,b
|
|
ora a,c
|
|
ora a,d
|
|
ora a,e
|
|
ora a,h
|
|
ora a,l
|
|
addnc a,v
|
|
addnc a,a
|
|
addnc a,b
|
|
addnc a,c
|
|
addnc a,d
|
|
addnc a,e
|
|
addnc a,h
|
|
addnc a,l
|
|
gta a,v
|
|
gta a,a
|
|
gta a,b
|
|
gta a,c
|
|
gta a,d
|
|
gta a,e
|
|
gta a,h
|
|
gta a,l
|
|
subnb a,v
|
|
subnb a,a
|
|
subnb a,b
|
|
subnb a,c
|
|
subnb a,d
|
|
subnb a,e
|
|
subnb a,h
|
|
subnb a,l
|
|
lta a,v
|
|
lta a,a
|
|
lta a,b
|
|
lta a,c
|
|
lta a,d
|
|
lta a,e
|
|
lta a,h
|
|
lta a,l
|
|
add a,v
|
|
add a,a
|
|
add a,b
|
|
add a,c
|
|
add a,d
|
|
add a,e
|
|
add a,h
|
|
add a,l
|
|
ona a,v
|
|
ona a,a
|
|
ona a,b
|
|
ona a,c
|
|
ona a,d
|
|
ona a,e
|
|
ona a,h
|
|
ona a,l
|
|
adc a,v
|
|
adc a,a
|
|
adc a,b
|
|
adc a,c
|
|
adc a,d
|
|
adc a,e
|
|
adc a,h
|
|
adc a,l
|
|
offa a,v
|
|
offa a,a
|
|
offa a,b
|
|
offa a,c
|
|
offa a,d
|
|
offa a,e
|
|
offa a,h
|
|
offa a,l
|
|
sub a,v
|
|
sub a,a
|
|
sub a,b
|
|
sub a,c
|
|
sub a,d
|
|
sub a,e
|
|
sub a,h
|
|
sub a,l
|
|
nea a,v
|
|
nea a,a
|
|
nea a,b
|
|
nea a,c
|
|
nea a,d
|
|
nea a,e
|
|
nea a,h
|
|
nea a,l
|
|
sbb a,v
|
|
sbb a,a
|
|
sbb a,b
|
|
sbb a,c
|
|
sbb a,d
|
|
sbb a,e
|
|
sbb a,h
|
|
sbb a,l
|
|
eqa a,v
|
|
eqa a,a
|
|
eqa a,b
|
|
eqa a,c
|
|
eqa a,d
|
|
eqa a,e
|
|
eqa a,h
|
|
eqa a,l
|
|
ani v,0x00
|
|
ani a,0x01
|
|
ani b,0x02
|
|
ani c,0x03
|
|
ani d,0x04
|
|
ani e,0x05
|
|
ani h,0x06
|
|
ani l,0x07
|
|
xri v,0x08
|
|
xri a,0x09
|
|
xri b,0x0a
|
|
xri c,0x0b
|
|
xri d,0x0c
|
|
xri e,0x0d
|
|
xri h,0x0e
|
|
xri l,0x0f
|
|
ori v,0x10
|
|
ori a,0x11
|
|
ori b,0x12
|
|
ori c,0x13
|
|
ori d,0x14
|
|
ori e,0x15
|
|
ori h,0x16
|
|
ori l,0x17
|
|
adinc v,0x18
|
|
adinc a,0x19
|
|
adinc b,0x1a
|
|
adinc c,0x1b
|
|
adinc d,0x1c
|
|
adinc e,0x1d
|
|
adinc h,0x1e
|
|
adinc l,0x1f
|
|
gti v,0x20
|
|
gti a,0x21
|
|
gti b,0x22
|
|
gti c,0x23
|
|
gti d,0x24
|
|
gti e,0x25
|
|
gti h,0x26
|
|
gti l,0x27
|
|
suinb v,0x28
|
|
suinb a,0x29
|
|
suinb b,0x2a
|
|
suinb c,0x2b
|
|
suinb d,0x2c
|
|
suinb e,0x2d
|
|
suinb h,0x2e
|
|
suinb l,0x2f
|
|
lti v,0x30
|
|
lti a,0x31
|
|
lti b,0x32
|
|
lti c,0x33
|
|
lti d,0x34
|
|
lti e,0x35
|
|
lti h,0x36
|
|
lti l,0x37
|
|
adi v,0x38
|
|
adi a,0x39
|
|
adi b,0x3a
|
|
adi c,0x3b
|
|
adi d,0x3c
|
|
adi e,0x3d
|
|
adi h,0x3e
|
|
adi l,0x4f
|
|
oni v,0x40
|
|
oni a,0x41
|
|
oni b,0x42
|
|
oni c,0x43
|
|
oni d,0x44
|
|
oni e,0x45
|
|
oni h,0x46
|
|
oni l,0x47
|
|
aci v,0x48
|
|
aci a,0x49
|
|
aci b,0x4a
|
|
aci c,0x4b
|
|
aci d,0x4c
|
|
aci e,0x4d
|
|
aci h,0x4e
|
|
aci l,0x4f
|
|
offi v,0x50
|
|
offi a,0x51
|
|
offi b,0x52
|
|
offi c,0x53
|
|
offi d,0x54
|
|
offi e,0x55
|
|
offi h,0x56
|
|
offi l,0x57
|
|
sui v,0x58
|
|
sui a,0x59
|
|
sui b,0x5a
|
|
sui c,0x5b
|
|
sui d,0x5c
|
|
sui e,0x5d
|
|
sui h,0x5e
|
|
sui l,0x5f
|
|
nei v,0x60
|
|
nei a,0x61
|
|
nei b,0x62
|
|
nei c,0x63
|
|
nei d,0x64
|
|
nei e,0x65
|
|
nei h,0x66
|
|
nei l,0x67
|
|
sbi v,0x68
|
|
sbi a,0x69
|
|
sbi b,0x6a
|
|
sbi c,0x6b
|
|
sbi d,0x6c
|
|
sbi e,0x6d
|
|
sbi h,0x6e
|
|
sbi l,0x6f
|
|
eqi v,0x70
|
|
eqi a,0x71
|
|
eqi b,0x72
|
|
eqi c,0x73
|
|
eqi d,0x74
|
|
eqi e,0x75
|
|
eqi h,0x76
|
|
eqi l,0x77
|
|
ani pa,0x78
|
|
ani pb,0x79
|
|
ani pc,0x7a
|
|
ani mk,0x7b
|
|
xri pa,0x7c
|
|
xri pb,0x7d
|
|
xri pc,0x7e
|
|
xri mk,0x7f
|
|
ori pa,0x80
|
|
ori pb,0x81
|
|
ori pc,0x82
|
|
ori mk,0x83
|
|
adinc pa,0x84
|
|
adinc pb,0x85
|
|
adinc pc,0x86
|
|
adinc mk,0x87
|
|
gti pa,0x88
|
|
gti pb,0x89
|
|
gti pc,0x8a
|
|
gti mk,0x8b
|
|
suinb pa,0x8c
|
|
suinb pb,0x8d
|
|
suinb pc,0x8e
|
|
suinb mk,0x8f
|
|
lti pa,0x90
|
|
lti pb,0x91
|
|
lti pc,0x92
|
|
lti mk,0x93
|
|
adi pa,0x94
|
|
adi pb,0x95
|
|
adi pc,0x96
|
|
adi mk,0x97
|
|
oni pa,0x98
|
|
oni pb,0x99
|
|
oni pc,0x9a
|
|
oni mk,0x9b
|
|
aci pa,0x9c
|
|
aci pb,0x9d
|
|
aci pc,0x9e
|
|
aci mk,0x9f
|
|
offi pa,0xa0
|
|
offi pb,0xa1
|
|
offi pc,0xa2
|
|
offi mk,0xa3
|
|
sui pa,0xa4
|
|
sui pb,0xa5
|
|
sui pc,0xa6
|
|
sui mk,0xa7
|
|
nei pa,0xa8
|
|
nei pb,0xa9
|
|
nei pc,0xaa
|
|
nei mk,0xab
|
|
sbi pa,0xac
|
|
sbi pb,0xad
|
|
sbi pc,0xae
|
|
sbi mk,0xaf
|
|
eqi pa,0xb0
|
|
eqi pb,0xb1
|
|
eqi pc,0xb2
|
|
eqi mk,0xb3
|
|
anaw (v,0xf0)
|
|
xraw (v,0xe1)
|
|
oraw (v,0xd2)
|
|
addncw (v,0xc3)
|
|
gtaw (v,0xb4)
|
|
subnbw (v,0xa5)
|
|
ltaw (v,0x96)
|
|
addw (v,0x87)
|
|
onaw (v,0x78)
|
|
adcw (v,0x69)
|
|
offaw (v,0x5a)
|
|
subw (v,0x4b)
|
|
neaw (v,0x3c)
|
|
sbbw (v,0x2d)
|
|
eqaw (v,0x1e)
|
|
sspd (0x8000)
|
|
lspd (0x8001)
|
|
sbcd (0x8010)
|
|
lbcd (0x8011)
|
|
sded (0x8100)
|
|
lded (0x8101)
|
|
shld (0x8110)
|
|
lhld (0x8111)
|
|
mov (0xab00),v
|
|
mov (0xbc01),a
|
|
mov (0xde02),b
|
|
mov (0xfa03),c
|
|
mov (0xeb04),d
|
|
mov (0xdc05),e
|
|
mov (0xcd06),h
|
|
mov (0xbe07),l
|
|
mov v,(0x000f)
|
|
mov a,(0x00f0)
|
|
mov b,(0x00ff)
|
|
mov c,(0x0f00)
|
|
mov d,(0x0f0f)
|
|
mov e,(0x0ff0)
|
|
mov h,(0x0fff)
|
|
mov l,(0xf000)
|
|
anax (bc)
|
|
xrax (bc)
|
|
orax (bc)
|
|
addncx (bc)
|
|
gtax (bc)
|
|
subnbx (bc)
|
|
ltax (bc)
|
|
addx (bc)
|
|
onax (bc)
|
|
adcx (bc)
|
|
offax (bc)
|
|
subx (bc)
|
|
neax (bc)
|
|
sbbx (bc)
|
|
eqax (bc)
|
|
anax (de)
|
|
xrax (de)
|
|
orax (de)
|
|
addncx (de)
|
|
gtax (de)
|
|
subnbx (de)
|
|
ltax (de)
|
|
addx (de)
|
|
onax (de)
|
|
adcx (de)
|
|
offax (de)
|
|
subx (de)
|
|
neax (de)
|
|
sbbx (de)
|
|
eqax (de)
|
|
anax (hl)
|
|
xrax (hl)
|
|
orax (hl)
|
|
addncx (hl)
|
|
gtax (hl)
|
|
subnbx (hl)
|
|
ltax (hl)
|
|
addx (hl)
|
|
onax (hl)
|
|
adcx (hl)
|
|
offax (hl)
|
|
subx (hl)
|
|
neax (hl)
|
|
sbbx (hl)
|
|
eqax (hl)
|
|
anaxi (de)
|
|
xraxi (de)
|
|
oraxi (de)
|
|
addncxi (de)
|
|
gtaxi (de)
|
|
subnbxi (de)
|
|
ltaxi (de)
|
|
addxi (de)
|
|
onaxi (de)
|
|
adcxi (de)
|
|
offaxi (de)
|
|
subxi (de)
|
|
neaxi (de)
|
|
sbbxi (de)
|
|
eqaxi (de)
|
|
anaxi (hl)
|
|
xraxi (hl)
|
|
oraxi (hl)
|
|
addncxi (hl)
|
|
gtaxi (hl)
|
|
subnbxi (hl)
|
|
ltaxi (hl)
|
|
addxi (hl)
|
|
onaxi (hl)
|
|
adcxi (hl)
|
|
offaxi (hl)
|
|
subxi (hl)
|
|
neaxi (hl)
|
|
sbbxi (hl)
|
|
eqaxi (hl)
|
|
anaxd (de)
|
|
xraxd (de)
|
|
oraxd (de)
|
|
addncxd (de)
|
|
gtaxd (de)
|
|
subnbxd (de)
|
|
ltaxd (de)
|
|
addxd (de)
|
|
onaxd (de)
|
|
adcxd (de)
|
|
offaxd (de)
|
|
subxd (de)
|
|
neaxd (de)
|
|
sbbxd (de)
|
|
eqaxd (de)
|
|
anaxd (hl)
|
|
xraxd (hl)
|
|
oraxd (hl)
|
|
addncxd (hl)
|
|
gtaxd (hl)
|
|
subnbxd (hl)
|
|
ltaxd (hl)
|
|
addxd (hl)
|
|
onaxd (hl)
|
|
adcxd (hl)
|
|
offaxd (hl)
|
|
subxd (hl)
|
|
neaxd (hl)
|
|
sbbxd (hl)
|
|
eqaxd (hl)
|
|
|
|
writebin(filename .. '.bin')
|