mirror of
https://github.com/nathanriggs/AppleIIAsm-Collection.git
synced 2025-01-09 13:32:35 +00:00
9b12b6fd9b
- getting ready for major changes for 0.6.0. - be sure to download the 0.5.0 release to ensure proper functionality, as these rountines will not work together in the SRC or BIN folder during the transition - Beginning to significantly alter documentation
27 lines
635 B
NASM
27 lines
635 B
NASM
PUT MIN.HEAD.REQUIRED
|
|
USE MIN.MAC.REQUIRED
|
|
PUT HOOKS.LORES
|
|
CYC ON
|
|
]Y1 EQU WPAR1
|
|
]Y2 EQU WPAR1+1
|
|
]X1 EQU BPAR1
|
|
]COLOR EQU BPAR2
|
|
]X EQU VARTAB+6
|
|
]Y EQU VARTAB+8
|
|
LRVLINE
|
|
LDA ]X1
|
|
STA ]X
|
|
LDY ]Y1
|
|
STY ]Y
|
|
:LOOP
|
|
LDA ]COLOR
|
|
LDX ]X
|
|
LDY ]Y
|
|
JSR LOCPLOT
|
|
INC ]Y
|
|
LDY ]Y
|
|
CPY ]Y2
|
|
BNE :LOOP ; LOOP
|
|
:EXIT
|
|
RTS
|