6502
/
l65
mirror of https://github.com/g012/l65.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

PUSH V and POP V were changed to PUSH VA and POP VA.

This commit is contained in:
mooz 2018-11-11 22:29:06 +01:00
parent 636b5297c1
commit 711fe67574
3 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
l7801.lua
View File

@ -52,7 +52,7 @@ local Keywords_7801 = {
local Registers_7801 = { local Registers_7801 = {
a=8,b=8,c=8,d=8,e=8,h=8,l=8,v=8, a=8,b=8,c=8,d=8,e=8,h=8,l=8,v=8,
bc=16,de=16,hl=16,sp=16 bc=16,de=16,hl=16,sp=16,va=16
} }
local function syntax7801(on) local function syntax7801(on)
@ -116,13 +116,14 @@ local opcode_reg_list = {
e = lookupify{'mvi'}, e = lookupify{'mvi'},
h = lookupify{'mvi'}, h = lookupify{'mvi'},
l = lookupify{'mvi'}, l = lookupify{'mvi'},
v = lookupify{'inrw','ldaw','dcrw','eqiw','mvi','mviw','pop','push','staw', v = lookupify{'inrw','ldaw','dcrw','eqiw','mvi','mviw','staw',
'bit0','bit1','bit2','bit3','bit4','bit5','bit6','bit7', 'bit0','bit1','bit2','bit3','bit4','bit5','bit6','bit7',
}, },
bc = lookupify{'ldax','lxi','mvix','pop','push','stax'}, bc = lookupify{'ldax','lxi','mvix','pop','push','stax'},
de = lookupify{'ldax','ldaxd','ldaxi','lxi','mvix','pop','push','stax','staxd','staxi'}, de = lookupify{'ldax','ldaxd','ldaxi','lxi','mvix','pop','push','stax','staxd','staxi'},
hl = lookupify{'dcx','inx','ldax','ldaxd','ldaxi','lxi','mvix','pop','push','stax','staxd','staxi'}, hl = lookupify{'dcx','inx','ldax','ldaxd','ldaxi','lxi','mvix','pop','push','stax','staxd','staxi'},
sp = lookupify{'dcx','inx','lxi'}, sp = lookupify{'dcx','inx','lxi'},
va = lookupify{'pop','push'},
} }
local opcode_reg_reg_list = { local opcode_reg_reg_list = {

4
samples/scv_test.l65
View File

@ -138,6 +138,6 @@ section{"rom", org=0x8000}
pop hl pop hl
pop de pop de
pop bc pop bc
push v push va
pop v pop va
writebin(filename .. '.bin') writebin(filename .. '.bin')

4
uPD7801.lua
View File

@ -329,11 +329,11 @@ local op48r16={
pushbc=M.op(0x1e,17), pushbc=M.op(0x1e,17),
pushde=M.op(0x2e,17), pushde=M.op(0x2e,17),
pushhl=M.op(0x3e,17), pushhl=M.op(0x3e,17),
pushv=M.op(0x0e,17), pushva=M.op(0x0e,17),
popbc=M.op(0x1f,15), popbc=M.op(0x1f,15),
popde=M.op(0x2f,15), popde=M.op(0x2f,15),
pophl=M.op(0x3f,15), pophl=M.op(0x3f,15),
popv=M.op(0x0f,15), popva=M.op(0x0f,15),
} M.op48r16 = op48r16 } M.op48r16 = op48r16
for k,v in pairs(op48r16) do for k,v in pairs(op48r16) do
M[k] = function() M[k] = function()