mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-24 01:28:06 +11:00
b2b556911f
Also, I've run VE on the TRS-80 for the first time! It doesn't work well though. Screen is mostly blank all the time. I removed instructions from the recipe which became obsolete when Collapse OS became 100% bootstrapped. Also, I've updated instructions to change the NL override which is necessary for blkup to work.
17 lines
315 B
Plaintext
17 lines
315 B
Plaintext
CODE (key)
|
|
A 0x01 LDrn, ( @KEY )
|
|
0x28 RSTn,
|
|
PUSHA,
|
|
;CODE
|
|
CODE (emit)
|
|
BC POPqq, ( c == @DSP arg ) chkPS,
|
|
A 0x02 LDrn, ( @DSP )
|
|
0x28 RSTn,
|
|
;CODE
|
|
CODE AT-XY
|
|
DE POPqq, H E LDrr, ( Y )
|
|
DE POPqq, L E LDrr, ( X ) chkPS,
|
|
A 0x0f LDrn, ( @VDCTL ) B 3 LDrn, ( setcur )
|
|
0x28 RSTn,
|
|
;CODE
|