mirror of
				https://github.com/deater/dos33fsprogs.git
				synced 2025-10-31 09:16:03 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			103 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			103 lines
		
	
	
		
			2.4 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| ;; HARDWARE LOCATIONS
 | |
| 
 | |
| KEYPRESS	=	$C000
 | |
| KEYRESET	=	$C010
 | |
| 
 | |
| ;; SOFT SWITCHES
 | |
| CLR80COL	=	$C000	; PAGE1/PAGE2 normal
 | |
| SET80COL	=	$C001	; PAGE1/PAGE2 switches PAGE1 in Aux instead
 | |
| EIGHTYCOLOFF	=	$C00C
 | |
| EIGHTYCOLON	=	$C00D
 | |
| VBLANK		=	$C019	; IIe *not* RDVBL (VBL low), IIgs opposite 
 | |
| RSTVBL		=	$C019	; reset VBLANK interrupt (iic)
 | |
| RDVBLBAR	=	$C019
 | |
| TBCOLOR		=	$C022	; IIgs text foreground / background colors
 | |
| NEWVIDEO	=	$C029	; IIgs graphics modes
 | |
| SPEAKER		=	$C030
 | |
| CLOCKCTL	=	$C034	; bits 0-3 are IIgs border color
 | |
| RDVBLMSK	=	$C041	; read VBL interrupt (bit 7)
 | |
| SET_GR		=	$C050
 | |
| SET_TEXT	=	$C051
 | |
| FULLGR		=	$C052
 | |
| TEXTGR		=	$C053
 | |
| PAGE1		=	$C054
 | |
| PAGE2		=	$C055
 | |
| LORES		=	$C056	; Enable LORES graphics
 | |
| HIRES		=	$C057	; Enable HIRES graphics
 | |
| CLRAN1		=	$C05A	; clear annunciator 1 (if IOUDIS off)
 | |
| DISVBL		=	$C05A	; disable VBLANK (iic) (if IOUDIS on)
 | |
| SETAN1		=	$C05B	; set annunciator 1   (if IOUDIS off)
 | |
| ENVBL		=	$C05B	; enable VBLANK (iic)  (if IOUDIS on)
 | |
| AN3		=	$C05E	; Annunciator 3
 | |
| PADDLE_BUTTON0	=	$C061
 | |
| PADDL0		=	$C064
 | |
| PTRIG		=	$C070	; Analog input reset
 | |
| VBLINT		=	$C070	; Analog input reset + reset vblank (iic)
 | |
| IOUDISON	=	$C07E	; iic
 | |
| IOUDISOFF	=	$C07F	; iic
 | |
| 
 | |
| ;; 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
 | |
| ROM_TEXT2COPY = $F962		;; iigs
 | |
| TEXT	= $FB36
 | |
| TABV	= $FB5B			;; VTAB to A
 | |
| ROM_MACHINEID = $FBB3		;; iigs
 | |
| BELL	= $FBDD			;; ring the bell
 | |
| BASCALC	= $FBC1			;;
 | |
| VTAB	= $FC22			;; VTAB to CV
 | |
| HOME	= $FC58			;; Clear the text screen
 | |
| WAIT	= $FCA8			;; delay 1/2(26+27A+5A^2) us
 | |
| CROUT1	= $FD8B
 | |
| SETINV	= $FE80			;; INVERSE
 | |
| SETNORM	= $FE84			;; NORMAL
 | |
| COUT	= $FDED			;; output A to screen
 | |
| COUT1	= $FDF0			;; output A to screen
 | |
| 
 | |
| 
 | |
| 
 | |
| 
 | |
| 
 | |
| 
 | |
| 
 | |
| 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
 | |
| 
 |