interlace: some missing files

This commit is contained in:
Vince Weaver 2019-06-18 18:32:35 -04:00
parent 00479ac953
commit 0a7e5547a4
2 changed files with 193 additions and 0 deletions

View File

@ -0,0 +1,91 @@
;; Firmware Routines and Hardware Locations
KEYPRESS = $C000
KEYRESET = $C010
;; SOFT SWITCHES
CLR80COL = $C000 ; PAGE0/PAGE1 normal
SET80COL = $C001 ; PAGE0/PAGE1 switches PAGE0 in Aux instead
EIGHTYCOL = $C00D
SPEAKER = $C030
SET_GR = $C050
SET_TEXT = $C051
FULLGR = $C052
TEXTGR = $C053
PAGE0 = $C054
PAGE1 = $C055
LORES = $C056 ; Enable LORES graphics
HIRES = $C057 ; Enable HIRES graphics
AN3 = $C05E ; Annunciator 3
PADDLE_BUTTON0 = $C061
PADDL0 = $C064
PTRIG = $C070
;; BASIC ROUTINES
NORMAL = $F273
;; MONITOR ROUTINES
HLINE = $F819 ;; HLINE Y,$2C at A
VLINE = $F828 ;; VLINE A,$2D at Y
CLRSCR = $F832 ;; Clear low-res screen
CLRTOP = $F836 ;; clear only top of low-res screen
SETCOL = $F864 ;; COLOR=A
TEXT = $FB36
TABV = $FB5B ;; VTAB to A
BASCALC = $FBC1 ;;
VTAB = $FC22 ;; VTAB to CV
HOME = $FC58 ;; Clear the text screen
WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us
SETINV = $FE80 ;; INVERSE
SETNORM = $FE84 ;; NORMAL
COUT = $FDED ;; output A to screen
COUT1 = $FDF0 ;; output A to screen
CROUT = $FD8E ;; send a RETURN
CROUT1 = $FD8B ;; send a RETURN and clear end of line
PRBYTE = $FDDA
PRHEX = $FDE3
;; Applesoft routines
HCLR = $F3F2
;HGR_PAGE = $E6
COLOR_BLACK = 0
COLOR_RED = 1
COLOR_DARKBLUE = 2
COLOR_PURPLE = 3
COLOR_DARKGREEN = 4
COLOR_GREY = 5
COLOR_MEDIUMBLUE = 6
COLOR_LIGHTBLUE = 7
COLOR_BROWN = 8
COLOR_ORANGE = 9
COLOR_GREY2 = 10
COLOR_PINK = 11
COLOR_LIGHTGREEN = 12
COLOR_YELLOW = 13
COLOR_AQUA = 14
COLOR_WHITE = 15
COLOR_BOTH_BLACK = $00
COLOR_BOTH_RED = $11
COLOR_BOTH_DARKBLUE = $22
COLOR_BOTH_DARKGREEN = $44
COLOR_BOTH_GREY = $55
COLOR_BOTH_MEDIUMBLUE = $66
COLOR_BOTH_LIGHTBLUE = $77
COLOR_BOTH_BROWN = $88
COLOR_BOTH_ORANGE = $99
COLOR_BOTH_PINK = $BB
COLOR_BOTH_LIGHTGREEN = $CC
COLOR_BOTH_YELLOW = $DD
COLOR_BOTH_AQUA = $EE
COLOR_BOTH_WHITE = $FF
AUX_BOTH_MEDIUMBLUE = $33 ; 0011 0011
AUX_BOTH_GREY = $AA ; 1010 1010

102
interlace_demo/zp.inc Normal file
View File

@ -0,0 +1,102 @@
;; Zero page monitor routines addresses
WNDLFT = $20
WNDWDTH = $21
WNDTOP = $22
WNDBTM = $23
CH = $24
CV = $25
GBASL = $26
GBASH = $27
BASL = $28
BASH = $29
BAS2L = $2A
BAS2H = $2B
H2 = $2C
V2 = $2D
MASK = $2E
LASTIN = $3F
COLOR = $30
MODE = $31
INVFLG = $32
PROMPT = $33
YSAV = $34
YSAV1 = $35
CSWL = $36 ; address of COUT1 routine
CSWH = $37
KSWL = $38 ; key in routine
KSWH = $39
SEEDL = $4E
SEEDH = $4F
; dos33 zero page = 26-2f, 35-38, 3e 3f 40-4d
; overlap applesoft 67-6a,6f,70,af,b0,ca-cd,d8
; DOS33: Confirmed kills $68
;RWTSL = $60
;RWTSH = $61
;DOSBUFL = $62
;DOSBUFH = $63
;FILEML = $64
;FILEMH = $65
AY_REGISTERS = $50
A_FINE_TONE = $50
A_COARSE_TONE = $51
B_FINE_TONE = $52
B_COARSE_TONE = $53
C_FINE_TONE = $54
C_COARSE_TONE = $55
NOISE = $56
ENABLE = $57
A_VOLUME = $58
B_VOLUME = $59
C_VOLUME = $5A
ENVELOPE_FINE = $5B
ENVELOPE_COARSE = $5C
ENVELOPE_SHAPE = $5D
PATTERN_L = $00
PATTERN_H = $01
ORNAMENT_L = $02
ORNAMENT_H = $03
SAMPLE_L = $04
SAMPLE_H = $05
WHICH_FILE = $63
LOOP = $64
MB_ADDRL = $65
MB_ADDRH = $66
DONE_PLAYING = $67
DONE_SONG = $68
FIRE_FB_L = $69
FIRE_FB_H = $6A
FIRE_FB2_L = $6B
FIRE_FB2_H = $6C
FIRE_FB_LINE = $6D
FIRE_Q = $6E
FIRE_Y = $6F
FIRE_X = $70
DISP_PAGE = $71
DRAW_PAGE = $72
XPOS = $73
YPOS = $74
namlo = $76
namhi = $77
step = $78 ; state for stepper motor
tmptrk = $79 ; temporary copy of current track
phase = $7a ; current phase for /seek
TEMP = $7A
TEMPY = $7B
INL = $7C
INH = $7D
OUTL = $7E
OUTH = $7F
; 80+ = 120 bytes of NOTE data