mirror of https://github.com/marketideas/qasm.git
85 lines
2.0 KiB
ArmAsm
85 lines
2.0 KiB
ArmAsm
^RESTOREHANDLE MAC
|
|
PHL ]1
|
|
Tool $B02
|
|
<<<
|
|
^CHECKHANDLE MAC
|
|
PHL ]1
|
|
Tool $1E02
|
|
<<<
|
|
^SETPURGE MAC
|
|
PHWL ]1;]2
|
|
Tool $2402
|
|
<<<
|
|
^NEWHANDLE MAC
|
|
P2SL ]1
|
|
PxW ]2;]3
|
|
PHL ]4
|
|
Tool $902
|
|
<<<
|
|
^GETNEWID MAC
|
|
P1SW ]1
|
|
Tool $2003
|
|
<<<
|
|
PHWL MAC
|
|
PHW ]1
|
|
PHL ]2
|
|
<<<
|
|
PXW MAC
|
|
DO ]0/1
|
|
PHW ]1
|
|
DO ]0/2
|
|
PHW ]2
|
|
DO ]0/3
|
|
PHW ]3
|
|
DO ]0/4
|
|
PHW ]4
|
|
FIN
|
|
FIN
|
|
FIN
|
|
FIN
|
|
<<<
|
|
P2SL MAC
|
|
PHA
|
|
PHA
|
|
IF #=]1
|
|
PEA ^]1
|
|
ELSE
|
|
PHW ]1+2
|
|
FIN
|
|
PHW ]1
|
|
<<<
|
|
PHL MAC
|
|
IF #=]1
|
|
PEA ^]1
|
|
ELSE
|
|
PHW ]1+2
|
|
FIN
|
|
PHW ]1
|
|
<<<
|
|
P1SW MAC
|
|
PHA
|
|
IF #=]1
|
|
PEA ]1
|
|
ELSE
|
|
IF MX/2
|
|
LDA ]1+1
|
|
PHA
|
|
FIN
|
|
LDA ]1
|
|
PHA
|
|
FIN
|
|
<<<
|
|
PHW MAC
|
|
IF #=]1
|
|
PEA ]1
|
|
ELSE
|
|
IF MX/2
|
|
LDA ]1+1
|
|
PHA
|
|
FIN
|
|
LDA ]1
|
|
PHA
|
|
FIN
|
|
<<<
|
|
|