mirror of https://github.com/marketideas/qasm.git
Merge branch 'master' of github.com:marketideas/qasm
This commit is contained in:
commit
e74f463a1e
2
asm.h
2
asm.h
|
@ -1,6 +1,6 @@
|
|||
#pragma once
|
||||
#include "app.h"
|
||||
|
||||
//
|
||||
#define OPHANDLER(ACB) std::bind(ACB, this, std::placeholders::_1, std::placeholders::_2)
|
||||
|
||||
#define MODE_6502 0
|
||||
|
|
|
@ -2418,7 +2418,11 @@ addmode php
|
|||
beq :skipq
|
||||
cmp #$22 ; "
|
||||
beq :skipq
|
||||
and #$5f
|
||||
cmp #'A'
|
||||
beq :a
|
||||
jmp :index
|
||||
|
||||
:force8 lda #amforce8
|
||||
tsb myvalue
|
||||
jmp :index
|
||||
|
@ -2435,6 +2439,14 @@ addmode php
|
|||
tsb myvalue
|
||||
jmp :index
|
||||
|
||||
* 'a' (no modifier) is ignored
|
||||
:a iny
|
||||
lda [lineptr],y
|
||||
cmp #' '+1
|
||||
jlt :zero
|
||||
dey
|
||||
jmp :index
|
||||
|
||||
* skip over quoted operand component.
|
||||
:skipq sta :q
|
||||
:skipq1 iny
|
||||
|
|
|
@ -0,0 +1,10 @@
|
|||
*
|
||||
* explicit a operand (inc a, etc) is dropped.
|
||||
*
|
||||
|
||||
inc a
|
||||
dec a
|
||||
lsr a
|
||||
asl a
|
||||
rol a
|
||||
ror a
|
Loading…
Reference in New Issue