mirror of
https://github.com/RevCurtisP/C02.git
synced 2024-12-01 14:51:52 +00:00
51 lines
1.8 KiB
Plaintext
51 lines
1.8 KiB
Plaintext
|
; C02 library hires.h02 assembly language subroutines
|
||
|
; Requires Thomas Magnusson's HIRES Package loaded at $1C00
|
||
|
|
||
|
;void hrinit() - Initialize High Resolution Graphics
|
||
|
HRINIT EQU $1C00 ;Aliased to Initialize Routine
|
||
|
|
||
|
;void hrfclr() - Set Foreground Color
|
||
|
HRFCLR EQU $1C2E ;Set Dot Color Routine Alternate Entry Point
|
||
|
|
||
|
;void hrclrs() - Clear High Resolution Screen
|
||
|
HRCLRS EQU $1C37 ;Aliased to Clear Screen Routine
|
||
|
|
||
|
;void hrsetp(x, y) - Set Pixel to Foreground Color
|
||
|
HRSETP JSR HRSTRT ;Store X and Y Coordinates
|
||
|
JMP $1CB2 ;Execute Draw Dot Routine
|
||
|
|
||
|
;void hrrstp(x, y) - Reset Pixel to Background Color
|
||
|
HRRSTP JSR HRSTRT ;Store X and Y Coordinates
|
||
|
JMP $1CC0 ;Execute Clear Dot Routine
|
||
|
|
||
|
;char hrgetp(x, y) - Get Pixel Status
|
||
|
HRGETP JSR HRSTRT ;Store X and Y Coordinates
|
||
|
JMP $1CCD ;Execute Get Dot Routine
|
||
|
|
||
|
HRSTRX STX 2 ;Store A, Y, and X Registers
|
||
|
;void hrstrt(x, y) - Set Start Point
|
||
|
HRSTRT STA 0 ;Store X Coordinate
|
||
|
STY 1 ;Store Y Coordianate
|
||
|
RTS
|
||
|
|
||
|
;void hrdrto(x, y) - Draw To Point
|
||
|
HRDRTO STA 2 ;Store Ending X Coordinate
|
||
|
STY 3 ;Store Ending Y Coordinate
|
||
|
JMP $1D98 ;Execute Draw Line Routine
|
||
|
|
||
|
;void hrclto(x, y) - Clear to Point
|
||
|
HRCLTO STA 2 ;Store Ending X Coordinate
|
||
|
STY 3 ;Store Ending Y Coordinate
|
||
|
JMP $1D98 ;Execute Draw Line Routine
|
||
|
|
||
|
;void hrsave() - Save Image from Tape
|
||
|
HRSAVE EQU $1DA8 ;Aliased to Save ROutine
|
||
|
|
||
|
;void hrload(f, r, b) - Load Image from Tape
|
||
|
HRLOAD JSR HRSTRX ;Store A, Y and X Registers
|
||
|
JMP $1DBA ;Execute Load Routine
|
||
|
|
||
|
;void hrsetc(f, r, b) - Set Screen Colors
|
||
|
HRSETC JSR HRSTRX ;Store A, Y and X Registers
|
||
|
JMP $1DCC ;Execute Set Screen Colors Routine
|