?? basal_fmradio.s01
字號:
NAME basal_fmradio(17)
RSEG MOD_BS_FMRADIO(0)
RSEG RCODE(0)
EXTERN BankSwitch
EXTERN FM_Exit
EXTERN FM_GetStatus
EXTERN FM_Init
EXTERN FM_MUTE
EXTERN FM_Search
EXTERN FM_SetFreq
EXTERN FM_Standby
EXTERN FM_VolumeSet
EXTERN abs
PUBLIC d_FMStatus
PUBLIC fmSendCommand
PUBLIC m_FMPlaystatus
PUBLIC m_FMStationTab
EXTERN ?CLZ80B_4_04_L00
EXTERN ?SL_RSH_L03
EXTERN ?C_V_SWITCH_L06
EXTERN ?BANK_CALL_DIRECT_L08
EXTERN ?BANK_FAST_LEAVE_L08
RSEG MOD_BS_FMRADIO
fmSendCommand:
; 1. /*
; 2. *******************************************************************************
; 3. * ACTOS AP
; 4. * FM tunner basal module implementation
; 5. *
; 6. * (c) Copyright Actions Co,Ld.
; 7. *
; 8. * $Id: basal_fmradio.c,v 1.1.1.1 2006/05/22 03:24:00 selina Exp $
; 9. *******************************************************************************
; 10. */
; 11. #include "actos.h"
; 12. #include "fmradio.h"
; 13. //-----basal module ----
; 14. #pragma memory=dataseg(RCODE)
; 15. WORD m_FMStationTab[20]; //電臺頻率對照表(注:頻率范圍87M-108M 以K為精度要三位數(shù)，但由于最高位都是1，所以就可不記錄,只記中低位就可以了).
; 16. fm_play_status_t m_FMPlaystatus; //當前電臺信息
; 17. FMStatus_Tab_t d_FMStatus; //從FM硬件讀取的當前頻率和聲道信息
; 18. #pragma memory=default
; 19.
; 20. #pragma codeseg(MOD_BS_FMRADIO)
; 21.
; 22.
; 23. BOOL fmSendCommand(BYTE cmd, int param)
; 24. {
PUSH IY
PUSH IX
LD IX,0
ADD IX,SP
PUSH BC
PUSH DE
PUSH AF
; 25. int i;
; 26. uchar k;
; 27.
; 28. switch(cmd)
CALL LWRD ?C_V_SWITCH_L06
DEFW 18
DEFB 1
DEFB 2
DEFB 4
DEFB 7
DEFB 9
DEFB 10
DEFB 11
DEFB 12
DEFB 17
DEFB 18
DEFB 64
DEFB 68
DEFB 69
DEFB 83
DEFB 85
DEFB 86
DEFB 131
DEFB 132
DEFW ?0000
DEFW ?0093
DEFW ?0084
DEFW ?0101
DEFW ?0094
DEFW ?0080
DEFW ?0083
DEFW ?0082
DEFW ?0081
DEFW ?0112
DEFW ?0111
DEFW ?0106
DEFW ?0060
DEFW ?0059
DEFW ?0034
DEFW ?0003
DEFW ?0057
DEFW ?0110
DEFW ?0001
?0001:
; 29. {
; 30. case MC_OPEN:
; 31. BankSwitch(address_24_of(FM_Init) >> 16);
LD HL,FM_Init
LD C,BYTE3 FM_Init
CALL LWRD ?0139
; 32. return FM_Init(m_FMPlaystatus.mode,(BYTE)param);
LD DE,(m_FMPlaystatus+5)
CALL LWRD FM_Init
JP LWRD ?0126
; 33. case MC_PLAY:
?0002:
; 34. BankSwitch(address_24_of(FM_SetFreq) >> 16);
; 35. FM_SetFreq(m_FMPlaystatus.freq);
; 36. break;
?0003:
; 37.
; 38. case MC_STEP:
; 39. if(m_FMPlaystatus.station_count==0)return FALSE;
LD A,(m_FMPlaystatus+4)
OR A
JP Z,?0128
?0004:
?0005:
; 40. k=0;
LD (IX-6),0
; 41. switch(param)
LD A,1
XOR C
OR B
JR NZ,?0020
?0007:
; 42. {
; 43. case UP: //找到下一電臺頻率
; 44. if(m_FMPlaystatus.station==m_FMPlaystatus.station_count)m_FMPlaystatus.station=0;
LD A,(m_FMPlaystatus+4)
LD B,A
LD A,(m_FMPlaystatus+3)
CP B
JR NZ,?0009
?0008:
XOR A
LD (m_FMPlaystatus+3),A
?0009:
; 45. m_FMPlaystatus.station++;
LD HL,m_FMPlaystatus+3
INC (HL)
; 46. for(i=0;i<20;i++)
LD IY,0
?0011:
LD BC,32788
PUSH IY
POP HL
LD A,B
XOR H
LD H,A
SBC HL,BC
JR NC,?0010
?0012:
; 47. {
; 48. if(m_FMStationTab[i]!=0)
PUSH IY
POP HL
ADD HL,HL
LD BC,m_FMStationTab
ADD HL,BC
LD A,(HL)
INC HL
OR (HL)
JR Z,?0017
?0014:
; 49. {
; 50. k++;
INC (IX-6)
; 51. if(k==m_FMPlaystatus.station)break;
LD A,(m_FMPlaystatus+3)
LD B,A
LD A,(IX-6)
CP B
JR Z,?0010
?0016:
?0017:
?0015:
INC IY
JR ?0011
?0010:
; 52. }
; 53.
; 54. }
; 55. if(i>=20) // 如沒有找到電臺,重新設置電臺數(shù)
LD BC,32788
PUSH IY
POP HL
LD A,B
XOR H
LD H,A
SBC HL,BC
JR C,?0032
?0018:
; 56. {
; 57. m_FMPlaystatus.station_count = k - 1;
LD A,(IX-6)
ADD A,255
LD (m_FMPlaystatus+4),A
; 58. m_FMPlaystatus.station = 1;
LD A,1
JR ?0129
?0019:
; 59. }
; 60. break;
?0020:
LD A,C
OR B
JR NZ,?0032
; 61. case DOWN: //找到上一電臺頻率
; 62. if(m_FMPlaystatus.station==1)m_FMPlaystatus.station=m_FMPlaystatus.station_count+1;
LD A,(m_FMPlaystatus+3)
DEC A
JR NZ,?0022
?0021:
LD A,(m_FMPlaystatus+4)
INC A
LD (m_FMPlaystatus+3),A
?0022:
; 63. m_FMPlaystatus.station--;
LD HL,m_FMPlaystatus+3
DEC (HL)
; 64. for(i=0;i<20;i++)
LD IY,0
?0024:
LD BC,32788
PUSH IY
POP HL
LD A,B
XOR H
LD H,A
SBC HL,BC
JR NC,?0023
?0025:
; 65. {
; 66. if(m_FMStationTab[i]!=0)
PUSH IY
POP HL
ADD HL,HL
LD BC,m_FMStationTab
ADD HL,BC
LD A,(HL)
INC HL
OR (HL)
JR Z,?0030
?0027:
; 67. {
; 68. k++;
INC (IX-6)
; 69. if(k==m_FMPlaystatus.station)break;
LD A,(m_FMPlaystatus+3)
LD B,A
LD A,(IX-6)
CP B
JR Z,?0023
?0029:
?0030:
?0028:
INC IY
JR ?0024
?0023:
; 70. }
; 71. }
; 72. if(i>=20) // 如沒有找到電臺,重新設置電臺數(shù)
LD BC,32788
PUSH IY
POP HL
LD A,B
XOR H
LD H,A
SBC HL,BC
JR C,?0032
?0031:
; 73. {
; 74. m_FMPlaystatus.station = m_FMPlaystatus.station_count = k +1;
LD B,(IX-6)
INC B
LD A,B
LD (m_FMPlaystatus+4),A
?0129:
LD (m_FMPlaystatus+3),A
?0032:
; 75. }
; 76. break;
?0033:
; 77. default:
; 78. break;
?0006:
; 79. }
; 80. m_FMPlaystatus.freq=m_FMStationTab[i];
PUSH IY
POP HL
ADD HL,HL
LD BC,m_FMStationTab
ADD HL,BC
LD B,(HL)
INC HL
LD H,(HL)
LD L,B
JP LWRD ?0118
; 81. BankSwitch(address_24_of(FM_SetFreq) >> 16);
; 82. FM_SetFreq(m_FMPlaystatus.freq);
; 83. return TRUE;
; 84.
; 85. case MC_STEPGRID:
?0034:
; 86. switch(param)
LD A,1
XOR C
OR B
JR NZ,?0047
?0036:
; 87. {
; 88. case UP:
; 89. if(((m_FMPlaystatus.freq+100)>0xa5e0+20)&&
; 90. (m_FMPlaystatus.mode==0))m_FMPlaystatus.freq=0x53d8;
LD HL,(m_FMPlaystatus+1)
LD BC,100
ADD HL,BC
LD C,L
LD B,H
LD HL,42484
AND A
SBC HL,BC
JR NC,?0038
LD A,(m_FMPlaystatus+5)
OR A
JR NZ,?0038
?0040:
?0039:
?0037:
LD HL,21464
JR ?0118
?0038:
; 91. else if(((m_FMPlaystatus.freq+100)>0x5f90+20)&&
; 92. (m_FMPlaystatus.mode==1))m_FMPlaystatus.freq=0x28e0;
LD HL,(m_FMPlaystatus+1)
LD BC,100
ADD HL,BC
LD C,L
LD B,H
LD HL,24484
AND A
SBC HL,BC
JR NC,?0043
LD A,(m_FMPlaystatus+5)
DEC A
JR NZ,?0043
?0045:
?0044:
?0042:
LD HL,10464
JR ?0118
; 93. else
?0043:
; 94. m_FMPlaystatus.freq+=100;
LD HL,m_FMPlaystatus+1
LD A,(HL)
ADD A,100
LD (HL),A
JR NC,?0057
INC HL
INC (HL)
?0046:
?0041:
; 95. break;
JR ?0057
?0047:
LD A,C
OR B
JR NZ,?0057
; 96. case DOWN:
; 97. if(((m_FMPlaystatus.freq-100)<0x53d8-20)&&
; 98. (m_FMPlaystatus.mode==0))m_FMPlaystatus.freq=0xa5e0;
LD HL,(m_FMPlaystatus+1)
LD BC,65436
ADD HL,BC
LD BC,21444
AND A
SBC HL,BC
JR NC,?0049
LD A,(m_FMPlaystatus+5)
OR A
JR NZ,?0049
?0051:
?0050:
?0048:
LD HL,42464
JR ?0118
?0049:
; 99. else if(((m_FMPlaystatus.freq-100)<0x28e0-20)&&
; 100. (m_FMPlaystatus.mode==1))m_FMPlaystatus.freq=0x5f90;
LD HL,(m_FMPlaystatus+1)
LD BC,65436
ADD HL,BC
LD BC,10444
AND A
SBC HL,BC
JR NC,?0054
LD A,(m_FMPlaystatus+5)
DEC A
JR NZ,?0054
?0056:
?0055:
?0053:
LD HL,24464
?0118:
LD (m_FMPlaystatus+1),HL
; 101. else
JR ?0057
?0054:
; 102. m_FMPlaystatus.freq-=100;
LD HL,m_FMPlaystatus+1
LD A,(HL)
ADD A,156
LD (HL),A
INC HL
LD A,(HL)
ADC A,255
LD (HL),A
?0057:
?0052:
; 103. break;
?0058:
; 104. default:
; 105. break;
?0035:
; 106. }
; 107. BankSwitch(address_24_of(FM_SetFreq) >> 16);
LD HL,FM_SetFreq
LD C,BYTE3 FM_SetFreq
CALL LWRD ?0140
; 108. FM_SetFreq(m_FMPlaystatus.freq);
LD DE,(m_FMPlaystatus+1)
CALL LWRD FM_SetFreq
; 109. return TRUE;
JP LWRD ?0000
; 110.
; 111.
; 112. case MC_SEARCH:
?0059:
; 113. FM_MUTE(SetMUTE);
LD E,1
CALL LWRD FM_MUTE
; 114. BankSwitch(address_24_of(FM_Search) >> 16);
LD HL,FM_Search
LD C,BYTE3 FM_Search
CALL LWRD ?0139
; 115. return FM_Search(m_FMPlaystatus.freq,param);
LD DE,(m_FMPlaystatus+1)
CALL LWRD FM_Search
?0126:
LD L,A
; 116.
; 117. case MC_SAVESTATION:
JP LWRD ?0114
?0060:
; 118. if(m_FMPlaystatus.station!=0) //當前電臺在電臺表中有保存的情況
LD A,(m_FMPlaystatus+3)
OR A
JR Z,?0062
?0061:
; 119. {
; 120. k=0;
; 121. for(i=0;i<20;i++)
LD (IX-6),0
LD IY,0
?0064:
LD BC,32788
PUSH IY
POP HL
LD A,B
XOR H
LD H,A
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -