mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-08 16:07:14 +00:00
114 lines
2.0 KiB
PHP
114 lines
2.0 KiB
PHP
.define EQU =
|
|
|
|
KEYPRESS EQU $C000
|
|
KEYRESET EQU $C010
|
|
|
|
;; SOFT SWITCHES
|
|
SET_GR EQU $C050
|
|
SET_TEXT EQU $C051
|
|
FULLGR EQU $C052
|
|
TEXTGR EQU $C053
|
|
PAGE0 EQU $C054
|
|
PAGE1 EQU $C055
|
|
LORES EQU $C056
|
|
HIRES EQU $C057
|
|
|
|
PADDLE_BUTTON0 EQU $C061
|
|
PADDL0 EQU $C064
|
|
PTRIG EQU $C070
|
|
|
|
;; BASIC ROUTINES
|
|
|
|
NORMAL EQU $F273
|
|
|
|
;; MONITOR ROUTINES
|
|
|
|
HLINE EQU $F819 ;; HLINE Y,$2C at A
|
|
VLINE EQU $F828 ;; VLINE A,$2D at Y
|
|
CLRSCR EQU $F832 ;; Clear low-res screen
|
|
CLRTOP EQU $F836 ;; clear only top of low-res screen
|
|
SETCOL EQU $F864 ;; COLOR=A
|
|
TEXT EQU $FB36
|
|
TABV EQU $FB5B ;; VTAB to A
|
|
BASCALC EQU $FBC1 ;;
|
|
VTAB EQU $FC22 ;; VTAB to CV
|
|
HOME EQU $FC58 ;; Clear the text screen
|
|
WAIT EQU $FCA8 ;; delay 1/2(26+27A+5A^2) us
|
|
SETINV EQU $FE80 ;; INVERSE
|
|
SETNORM EQU $FE84 ;; NORMAL
|
|
COUT EQU $FDED ;; output A to screen
|
|
COUT1 EQU $FDF0 ;; output A to screen
|
|
|
|
;; Zero page addresses
|
|
WNDLFT EQU $20
|
|
WNDWDTH EQU $21
|
|
WNDTOP EQU $22
|
|
WNDBTM EQU $23
|
|
CH EQU $24
|
|
CV EQU $25
|
|
GBASL EQU $26
|
|
GBASH EQU $27
|
|
BASL EQU $28
|
|
BASH EQU $29
|
|
H2 EQU $2C
|
|
V2 EQU $2D
|
|
MASK EQU $2E
|
|
COLOR EQU $30
|
|
INVFLG EQU $32
|
|
|
|
; Our zero-page addresses
|
|
; we try not to conflict with anything DOS, MONITOR or BASIC related
|
|
|
|
COLOR1 EQU $E0
|
|
COLOR2 EQU $E1
|
|
MATCH EQU $E2
|
|
XX EQU $E3
|
|
YY EQU $E4
|
|
YADD EQU $E5
|
|
LOOP EQU $E6
|
|
MEMPTRL EQU $E7
|
|
MEMPTRH EQU $E8
|
|
NAMEL EQU $E9
|
|
NAMEH EQU $EA
|
|
NAMEX EQU $EB
|
|
CHAR EQU $EC
|
|
DISP_PAGE EQU $ED
|
|
DRAW_PAGE EQU $EE
|
|
|
|
FIRST EQU $F0
|
|
LASTKEY EQU $F1
|
|
PADDLE_STATUS EQU $F2
|
|
XPOS EQU $F3
|
|
YPOS EQU $F4
|
|
TEMP EQU $FA
|
|
RUN EQU $FA
|
|
TEMP2 EQU $FB
|
|
TEMPY EQU $FB
|
|
INL EQU $FC
|
|
INH EQU $FD
|
|
OUTL EQU $FE
|
|
OUTH EQU $FF
|
|
|
|
|
|
|
|
COLOR_BLACK EQU 0
|
|
COLOR_RED EQU 1
|
|
COLOR_DARKBLUE EQU 2
|
|
COLOR_PURPLE EQU 3
|
|
COLOR_DARKGREEN EQU 4
|
|
COLOR_GREY EQU 5
|
|
COLOR_MEDIUMBLUE EQU 6
|
|
COLOR_LIGHTBLUE EQU 7
|
|
COLOR_BROWN EQU 8
|
|
COLOR_ORANGE EQU 9
|
|
COLOR_GREY2 EQU 10
|
|
COLOR_PINK EQU 11
|
|
COLOR_LIGHTGREEN EQU 12
|
|
COLOR_YELLOW EQU 13
|
|
COLOR_AQUA EQU 14
|
|
COLOR_WHITE EQU 15
|
|
|
|
COLOR_BOTH_DARKBLUE EQU $22
|
|
COLOR_BOTH_GREY EQU $55
|
|
COLOR_BOTH_MEDIUMBLUE EQU $66
|