1
0
mirror of https://github.com/sehugg/8bitworkshop.git synced 2024-11-27 01:51:35 +00:00
8bitworkshop/presets/vectrex/vectrex.inc

319 lines
15 KiB
PHP
Raw Normal View History

; this file is part of vectrex frogger, written by Christopher Salomon
; in March-April 1998 all stuff contained here is public domain (?)
;
; Fixed to compile with AS6809 by Joakim Larsson Edström 2015.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; this file contains includes for vectrex BIOS functions and variables ;
; it was written by Bruce Tomlin, slighte changed by Christopher Salomon ;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Vec_Snd_Shadow EQU $C800 ;Shadow of sound chip registers (15 bytes)
Vec_Btn_State EQU $C80F ;Current state of all joystick buttons
Vec_Prev_Btns EQU $C810 ;Previous state of all joystick buttons
Vec_Buttons EQU $C811 ;Current toggle state of all buttons
Vec_Button_1_1 EQU $C812 ;Current toggle state of stick 1 button 1
Vec_Button_1_2 EQU $C813 ;Current toggle state of stick 1 button 2
Vec_Button_1_3 EQU $C814 ;Current toggle state of stick 1 button 3
Vec_Button_1_4 EQU $C815 ;Current toggle state of stick 1 button 4
Vec_Button_2_1 EQU $C816 ;Current toggle state of stick 2 button 1
Vec_Button_2_2 EQU $C817 ;Current toggle state of stick 2 button 2
Vec_Button_2_3 EQU $C818 ;Current toggle state of stick 2 button 3
Vec_Button_2_4 EQU $C819 ;Current toggle state of stick 2 button 4
Vec_Joy_Resltn EQU $C81A ;Joystick A/D resolution ($80=min $00=max)
Vec_Joy_1_X EQU $C81B ;Joystick 1 left/right
Vec_Joy_1_Y EQU $C81C ;Joystick 1 up/down
Vec_Joy_2_X EQU $C81D ;Joystick 2 left/right
Vec_Joy_2_Y EQU $C81E ;Joystick 2 up/down
Vec_Joy_Mux EQU $C81F ;Joystick enable/mux flags (4 bytes)
Vec_Joy_Mux_1_X EQU $C81F ;Joystick 1 X enable/mux flag (=1)
Vec_Joy_Mux_1_Y EQU $C820 ;Joystick 1 Y enable/mux flag (=3)
Vec_Joy_Mux_2_X EQU $C821 ;Joystick 2 X enable/mux flag (=5)
Vec_Joy_Mux_2_Y EQU $C822 ;Joystick 2 Y enable/mux flag (=7)
Vec_Misc_Count EQU $C823 ;Misc counter/flag byte, zero when not in use
Vec_0Ref_Enable EQU $C824 ;Check0Ref enable flag
Vec_Loop_Count EQU $C825 ;Loop counter word (incremented in Wait_Recal)
Vec_Brightness EQU $C827 ;Default brightness
Vec_Dot_Dwell EQU $C828 ;Dot dwell time?
Vec_Pattern EQU $C829 ;Dot pattern (bits)
Vec_Text_HW EQU $C82A ;Default text height and width
Vec_Text_Height EQU $C82A ;Default text height
Vec_Text_Width EQU $C82B ;Default text width
Vec_Str_Ptr EQU $C82C ;Temporary string pointer for Print_Str
Vec_Counters EQU $C82E ;Six bytes of counters
Vec_Counter_1 EQU $C82E ;First counter byte
Vec_Counter_2 EQU $C82F ;Second counter byte
Vec_Counter_3 EQU $C830 ;Third counter byte
Vec_Counter_4 EQU $C831 ;Fourth counter byte
Vec_Counter_5 EQU $C832 ;Fifth counter byte
Vec_Counter_6 EQU $C833 ;Sixth counter byte
Vec_RiseRun_Tmp EQU $C834 ;Temp storage word for rise/run
Vec_Angle EQU $C836 ;Angle for rise/run and rotation calculations
Vec_Run_Index EQU $C837 ;Index pair for run
;* $C839 ;Pointer to copyright string during startup
Vec_Rise_Index EQU $C839 ;Index pair for rise
;* $C83B ;High score cold-start flag (=0 if valid)
Vec_RiseRun_Len EQU $C83B ;length for rise/run
;* $C83C ;temp byte
Vec_Rfrsh EQU $C83D ;Refresh time (divided by 1.5MHz)
Vec_Rfrsh_lo EQU $C83D ;Refresh time low byte
Vec_Rfrsh_hi EQU $C83E ;Refresh time high byte
Vec_Music_Work EQU $C83F ;Music work buffer (14 bytes, backwards?)
Vec_Music_Wk_A EQU $C842 ; register 10
;* $C843 ; register 9
;* $C844 ; register 8
Vec_Music_Wk_7 EQU $C845 ; register 7
Vec_Music_Wk_6 EQU $C846 ; register 6
Vec_Music_Wk_5 EQU $C847 ; register 5
;* $C848 ; register 4
;* $C849 ; register 3
;* $C84A ; register 2
Vec_Music_Wk_1 EQU $C84B ; register 1
;* $C84C ; register 0
Vec_Freq_Table EQU $C84D ;Pointer to note-to-frEQUency table (normally $FC8D)
Vec_Max_Players EQU $C84F ;Maximum number of players for Select_Game
Vec_Max_Games EQU $C850 ;Maximum number of games for Select_Game
Vec_ADSR_Table EQU $C84F ;Storage for first music header word (ADSR table)
Vec_Twang_Table EQU $C851 ;Storage for second music header word ('twang' table)
Vec_Music_Ptr EQU $C853 ;Music data pointer
Vec_Expl_ChanA EQU $C853 ;Used by Explosion_Snd - bit for first channel used?
Vec_Expl_Chans EQU $C854 ;Used by Explosion_Snd - bits for all channels used?
Vec_Music_Chan EQU $C855 ;Current sound channel number for Init_Music
Vec_Music_Flag EQU $C856 ;Music active flag ($00=off $01=start $80=on)
Vec_Duration EQU $C857 ;Duration counter for Init_Music
Vec_Music_Twang EQU $C858 ;3 word 'twang' table used by Init_Music
Vec_Expl_1 EQU $C858 ;Four bytes copied from Explosion_Snd's U-reg parameters
Vec_Expl_2 EQU $C859 ;
Vec_Expl_3 EQU $C85A ;
Vec_Expl_4 EQU $C85B ;
Vec_Expl_Chan EQU $C85C ;Used by Explosion_Snd - channel number in use?
Vec_Expl_ChanB EQU $C85D ;Used by Explosion_Snd - bit for second channel used?
Vec_ADSR_Timers EQU $C85E ;ADSR timers for each sound channel (3 bytes)
Vec_Music_Freq EQU $C861 ;Storage for base frEQUency of each channel (3 words)
;* $C85E ;Scratch 'score' storage for Display_Option (7 bytes)
Vec_Expl_Flag EQU $C867 ;Explosion_Snd initialization flag?
;* $C868...$C876 ;Unused?
Vec_Expl_Timer EQU $C877 ;Used by Explosion_Snd
;* $C878 ;Unused?
Vec_Num_Players EQU $C879 ;Number of players selected in Select_Game
Vec_Num_Game EQU $C87A ;Game number selected in Select_Game
Vec_Seed_Ptr EQU $C87B ;Pointer to 3-byte random number seed (=$C87D)
Vec_Random_Seed EQU $C87D ;Default 3-byte random number seed
;
;* $C880 - $CBEA is user RAM ;
;
Vec_Default_Stk EQU $CBEA ;Default top-of-stack
Vec_High_Score EQU $CBEB ;High score storage (7 bytes)
Vec_SWI3_Vector EQU $CBF2 ;SWI2/SWI3 interrupt vector (3 bytes)
Vec_SWI2_Vector EQU $CBF2 ;SWI2/SWI3 interrupt vector (3 bytes)
Vec_FIRQ_Vector EQU $CBF5 ;FIRQ interrupt vector (3 bytes)
Vec_IRQ_Vector EQU $CBF8 ;IRQ interrupt vector (3 bytes)
Vec_SWI_Vector EQU $CBFB ;SWI/NMI interrupt vector (3 bytes)
Vec_NMI_Vector EQU $CBFB ;SWI/NMI interrupt vector (3 bytes)
Vec_Cold_Flag EQU $CBFE ;Cold start flag (warm start if = $7321)
;
VIA_port_b EQU $D000 ;VIA port B data I/O register
;* 0 sample/hold (0=enable mux 1=disable mux)
;* 1 mux sel 0
;* 2 mux sel 1
;* 3 sound BC1
;* 4 sound BDIR
;* 5 comparator input
;* 6 external device (slot pin 35) initialized to input
;* 7 /RAMP
VIA_port_a EQU $D001 ;VIA port A data I/O register (handshaking)
VIA_DDR_b EQU $D002 ;VIA port B data direction register (0=input 1=output)
VIA_DDR_a EQU $D003 ;VIA port A data direction register (0=input 1=output)
VIA_t1_cnt_lo EQU $D004 ;VIA timer 1 count register lo (scale factor)
VIA_t1_cnt_hi EQU $D005 ;VIA timer 1 count register hi
VIA_t1_lch_lo EQU $D006 ;VIA timer 1 latch register lo
VIA_t1_lch_hi EQU $D007 ;VIA timer 1 latch register hi
VIA_t2_lo EQU $D008 ;VIA timer 2 count/latch register lo (refresh)
VIA_t2_hi EQU $D009 ;VIA timer 2 count/latch register hi
VIA_shift_reg EQU $D00A ;VIA shift register
VIA_aux_cntl EQU $D00B ;VIA auxiliary control register
;* 0 PA latch enable
;* 1 PB latch enable
;* 2 \ 110=output to CB2 under control of phase 2 clock
;* 3 > shift register control (110 is the only mode used by the Vectrex ROM)
;* 4 /
;* 5 0=t2 one shot 1=t2 free running
;* 6 0=t1 one shot 1=t1 free running
;* 7 0=t1 disable PB7 output 1=t1 enable PB7 output
VIA_cntl EQU $D00C ;VIA control register
;* 0 CA1 control CA1 -> SW7 0=IRQ on low 1=IRQ on high
;* 1 \
;* 2 > CA2 control CA2 -> /ZERO 110=low 111=high
;* 3 /
;* 4 CB1 control CB1 -> NC 0=IRQ on low 1=IRQ on high
;* 5 \
;* 6 > CB2 control CB2 -> /BLANK 110=low 111=high
;* 7 /
VIA_int_flags EQU $D00D ;VIA interrupt flags register
;* bit cleared by
;* 0 CA2 interrupt flag reading or writing port A I/O
;* 1 CA1 interrupt flag reading or writing port A I/O
;* 2 shift register interrupt flag reading or writing shift register
;* 3 CB2 interrupt flag reading or writing port B I/O
;* 4 CB1 interrupt flag reading or writing port A I/O
;* 5 timer 2 interrupt flag read t2 low or write t2 high
;* 6 timer 1 interrupt flag read t1 count low or write t1 high
;* 7 IRQ status flag write logic 0 to IER or IFR bit
VIA_int_enable EQU $D00E ;VIA interrupt enable register
;* 0 CA2 interrupt enable
;* 1 CA1 interrupt enable
;* 2 shift register interrupt enable
;* 3 CB2 interrupt enable
;* 4 CB1 interrupt enable
;* 5 timer 2 interrupt enable
;* 6 timer 1 interrupt enable
;* 7 IER set/clear control
VIA_port_a_nohs EQU $D00F ;VIA port A data I/O register (no handshaking)
Cold_Start EQU $F000 ;
Warm_Start EQU $F06C ;
Init_VIA EQU $F14C ;
Init_OS_RAM EQU $F164 ;
Init_OS EQU $F18B ;
Wait_Recal EQU $F192 ;
Set_Refresh EQU $F1A2 ;
DP_to_D0 EQU $F1AA ;
DP_to_C8 EQU $F1AF ;
Read_Btns_Mask EQU $F1B4 ;
Read_Btns EQU $F1BA ;
Joy_Analog EQU $F1F5 ;
Joy_Digital EQU $F1F8 ;
Sound_Byte EQU $F256 ;
Sound_Byte_x EQU $F259 ;
Sound_Byte_raw EQU $F25B ;
Clear_Sound EQU $F272 ;
Sound_Bytes EQU $F27D ;
Sound_Bytes_x EQU $F284 ;
Do_Sound EQU $F289 ;
Do_Sound_x EQU $F28C ;
Intensity_1F EQU $F29D ;
Intensity_3F EQU $F2A1 ;
Intensity_5F EQU $F2A5 ;
Intensity_7F EQU $F2A9 ;
Intensity_a EQU $F2AB ;
Dot_ix_b EQU $F2BE ;
Dot_ix EQU $F2C1 ;
Dot_d EQU $F2C3 ;
Dot_here EQU $F2C5 ;
Dot_List EQU $F2D5 ;
Dot_List_Reset EQU $F2DE ;
Recalibrate EQU $F2E6 ;
Moveto_x_7F EQU $F2F2 ;
Moveto_d_7F EQU $F2FC ;
Moveto_ix_FF EQU $F308 ;
Moveto_ix_7F EQU $F30C ;
Moveto_ix_b EQU $F30E ; Used to be named Moveto_ix_a but this is wrong.
Moveto_ix EQU $F310 ;
Moveto_d EQU $F312 ;
Reset0Ref_D0 EQU $F34A ;
Check0Ref EQU $F34F ;
Reset0Ref EQU $F354 ;
Reset_Pen EQU $F35B ;
Reset0Int EQU $F36B ;
Print_Str_hwyx EQU $F373 ;
Print_Str_yx EQU $F378 ;
Print_Str_d EQU $F37A ;
Print_List_hw EQU $F385 ;
Print_List EQU $F38A ;
Print_List_chk EQU $F38C ;
Print_Ships_x EQU $F391 ;
Print_Ships EQU $F393 ;
Mov_Draw_VLc_a EQU $F3AD ;count y x y x ...
Mov_Draw_VL_b EQU $F3B1 ;y x y x ...
Mov_Draw_VLcs EQU $F3B5 ;count scale y x y x ...
Mov_Draw_VL_ab EQU $F3B7 ;y x y x ...
Mov_Draw_VL_a EQU $F3B9 ;y x y x ...
Mov_Draw_VL EQU $F3BC ;y x y x ...
Mov_Draw_VL_d EQU $F3BE ;y x y x ...
Draw_VLc EQU $F3CE ;count y x y x ...
Draw_VL_b EQU $F3D2 ;y x y x ...
Draw_VLcs EQU $F3D6 ;count scale y x y x ...
Draw_VL_ab EQU $F3D8 ;y x y x ...
Draw_VL_a EQU $F3DA ;y x y x ...
Draw_VL EQU $F3DD ;y x y x ...
Draw_Line_d EQU $F3DF ;y x y x ...
Draw_VLp_FF EQU $F404 ;pattern y x pattern y x ... $01
Draw_VLp_7F EQU $F408 ;pattern y x pattern y x ... $01
Draw_VLp_scale EQU $F40C ;scale pattern y x pattern y x ... $01
Draw_VLp_b EQU $F40E ;pattern y x pattern y x ... $01
Draw_VLp EQU $F410 ;pattern y x pattern y x ... $01
Draw_Pat_VL_a EQU $F434 ;y x y x ...
Draw_Pat_VL EQU $F437 ;y x y x ...
Draw_Pat_VL_d EQU $F439 ;y x y x ...
Draw_VL_mode EQU $F46E ;mode y x mode y x ... $01
Print_Str EQU $F495 ;
Random_3 EQU $F511 ;
Random EQU $F517 ;
Init_Music_Buf EQU $F533 ;
Clear_x_b EQU $F53F ;
Clear_C8_RAM EQU $F542 ;never used by GCE carts?
Clear_x_256 EQU $F545 ;
Clear_x_d EQU $F548 ;
Clear_x_b_80 EQU $F550 ;
Clear_x_b_a EQU $F552 ;
Dec_3_Counters EQU $F55A ;
Dec_6_Counters EQU $F55E ;
Dec_Counters EQU $F563 ;
Delay_3 EQU $F56D ;30 cycles
Delay_2 EQU $F571 ;25 cycles
Delay_1 EQU $F575 ;20 cycles
Delay_0 EQU $F579 ;12 cycles
Delay_b EQU $F57A ;5*B + 10 cycles
Delay_RTS EQU $F57D ;5 cycles
Bitmask_a EQU $F57E ;
Abs_a_b EQU $F584 ;
Abs_b EQU $F58B ;
Rise_Run_Angle EQU $F593 ;
Get_Rise_Idx EQU $F5D9 ;
Get_Run_Idx EQU $F5DB ;
Get_Rise_Run EQU $F5EF ;
Rise_Run_X EQU $F5FF ;
Rise_Run_Y EQU $F601 ;
Rise_Run_Len EQU $F603 ;
Rot_VL_ab EQU $F610 ;
Rot_VL EQU $F616 ;
Rot_VL_Mode_a EQU $F61F ;
Rot_VL_Mode EQU $F62B ;
Rot_VL_dft EQU $F637 ;
Xform_Run_a EQU $F65B ;
Xform_Run EQU $F65D ;
Xform_Rise_a EQU $F661 ;
Xform_Rise EQU $F663 ;
Move_Mem_a_1 EQU $F67F ;
Move_Mem_a EQU $F683 ;
Init_Music_chk EQU $F687 ;
Init_Music EQU $F68D ;
Init_Music_x EQU $F692 ;
Select_Game EQU $F7A9 ;
Clear_Score EQU $F84F ;
Add_Score_a EQU $F85E ;
Add_Score_d EQU $F87C ;
Strip_Zeros EQU $F8B7 ;
Compare_Score EQU $F8C7 ;
New_High_Score EQU $F8D8 ;
Obj_Will_Hit_u EQU $F8E5 ;
Obj_Will_Hit EQU $F8F3 ;
Obj_Hit EQU $F8FF ;
Explosion_Snd EQU $F92E ;
Draw_Grid_VL EQU $FF9F ;
;
music1 EQU $FD0D ;
music2 EQU $FD1D ;
music3 EQU $FD81 ;
music4 EQU $FDD3 ;
music5 EQU $FE38 ;
music6 EQU $FE76 ;
music7 EQU $FEC6 ;
music8 EQU $FEF8 ;
music9 EQU $FF26 ;
musica EQU $FF44 ;
musicb EQU $FF62 ;
musicc EQU $FF7A ;
musicd EQU $FF8F ;