melody.dat

asm.rar 拉斯维加丝盘源代码 ASM51

R_DacCh1:       DS      1       ;PCM data for channel 1
R_DacCh2:       DS      1       ;PCM data for channel 2
R_QIndexCh1:    DS      1
R_QIndexCh2:    DS      1
R_EncodedCh1:   DS      1
R_EncodedCh2:   DS      1

R_TempoCnt:             DS      1               ;Counting tempo
R_BeatCnt:              DS      1               ;BeatCnt result for 1/8 beat time base
                                                ;pointer to both melody or rhythm data
R_InstCh1:              DS      1               ;instrument number of ch1
R_InstCh2:              DS      1               ;instrument number of ch2
                                                ;b7..b0 : instrument number
R_TempoPreLoad:         DS      1               ;preload data for tempo counter
R_TempoDataIndex:       DS      1
;;==========================================================================/
;;    Melody Module                                                        =/
;;           Service routine part                                          =/
;;==========================================================================/

P_BankSel       EQU     P_BankSwitch
;;P_TimerCh1L:    EQU     P_Timer0_Low
;;P_TimerCh1H:    EQU     P_Timer0_High
P_LoadTimerCh1: EQU     P_Timer0_High
P_TimerCh2L:    EQU     P_Timer1_Low
P_TimerCh2H:    EQU     P_Timer1_High
P_LoadTimerCh2: EQU     P_Timer1_High
;;P_DacCh1:       EQU     P_PWM_Ch0Data
;;P_DacCh2:       EQU     P_PWM_Ch1Data
;;D_TimerCh1:     EQU     00010000B
;;D_TimerCh2:     EQU     00100000B
P_CntCtrl       EQU     P_TimerCntControl
P_CH1_PWM_Ctrl: EQU     P_PWM_Ch0Control
P_CH2_PWM_Ctrl: EQU     P_PWM_Ch1Control

CH_SPEECH       EQU     %00000000
CH_TONE         EQU     %01000000
CH_Dirctory     EQU     %10000000

;;D_RampDownValue:EQU     80H

EnableTimer     EQU     %00000000
TM0_SUR_ROSC    EQU     %00100000
TM1_SUR_ROSC    EQU     %00000001
TM0_SUR_C32K    EQU     %01000000
TM1_SUR_C32K    EQU     %00000010

R_IntFlags      EQU     R_InterruptImage
P_Ints          EQU     P_InterruptStatus
;;R_Temp1:        DS      1
;;R_MelodyStatus: DS      1               ;Status for melody
;;D_MelodyEnable:       EQU     %10000000       ;If melody object is active
D_OctaveCh1:          EQU     %00000111
D_OctaveCh2:          EQU     %00111000
;;R_MelodyCtrl:   DS      1
D_ChActiveCh1:        EQU     %10000000
D_ChActiveCh2:        EQU     %01000000
D_M_ChActiveCh1       EQU     %00100000
D_M_ChActiveCh2       EQU     %00010000
;;-------------------------------------