mirror of
https://github.com/marketideas/qasm.git
synced 2026-10-25 13:02:45 +00:00
Move the assembler to src/qasm. qlink links OMF 1.0 and 2.0 from a script. makeBin flattens a load file, qomf dumps OMF, and qpro builds ProDOS volumes. APW and MPW assemble through the ORCA front end. Relocatable modules emit OMF objects. Listings stay off unless -l is set. make boot assembles the GS/OS 6.0.1 ProDOS 8 kernel and BASIC.SYSTEM into an 800K volume. BASIC.SYSTEM accepts ls and pfx, and its splash reports PRODOS BASIC 2.0, copyright 1983-2026. IIGS.601.SRC is the source and the BASIC.SYSTEM oracle that image is built from.
1 line
420 B
Plaintext
1 line
420 B
Plaintext
MACRO
|
|
&lab both &l
|
|
IF &l='short' GOTO .a
|
|
&lab rep #$30
|
|
longa on
|
|
longi on
|
|
mexit
|
|
.a
|
|
&lab sep #$30
|
|
longa off
|
|
longi off
|
|
mend
|
|
MACRO
|
|
&LAB MEM_Long
|
|
IF '&L'='short' GOTO .A
|
|
&lab rep #$20
|
|
longa on
|
|
mend
|
|
MACRO
|
|
&Lab Mem_Short
|
|
&lab sep #$20
|
|
longa off
|
|
mend
|
|
|
|
|
|
macro
|
|
&lab index &l
|
|
IF &l='short' GOTO .a
|
|
&lab rep #$10
|
|
longi on
|
|
mexit
|
|
.a
|
|
&lab sep #$10
|
|
longi off
|
|
mend
|