6502單片機(jī)編程代碼

;; 2007.7.2 F1_Function 播放喇叭
;;==============================================================================

Play_laba:

LDA#7
LDX#0
JSRF_PlaySpeechCh1

over?:
%TestCh1
BCS over?

LDA#7
LDX#0
JSRF_PlaySpeechCh1

overDOUBLE?:
%TestCh1
BCS overDOUBLE?
RTS

;;==============================================================================
;; 亮/滅大燈
;;==============================================================================
Led_dadeng:

LDAP_0EH_IOC_Buffer
EOR#%00001000
STAP_0EH_IOC_Buffer

RTS

;;==============================================================================
;; 亮尾燈
;;==============================================================================
Ledweideng:
LDAP_0EH_IOC_Buffer
EOR#%00000001
STAP_0EH_IOC_Buffer

RTS

;;==============================================================================
;; 滅左轉(zhuǎn)燈
;;==============================================================================
Led_zhuoDown:
LDAP_0EH_IOC_Buffer
AND#%11111101
STAP_0EH_IOC_Buffer

RTS

;;==============================================================================
;; 滅右轉(zhuǎn)燈
;;==============================================================================
Led_youDown:
LDAP_0EH_IOC_Buffer
AND#%11111011
STAP_0EH_IOC_Buffer

RTS

;;==============================================================================
;; 閃左轉(zhuǎn)燈
;;==============================================================================
Flash_zhuo:
LDAR_zhuozhuancount
BNEendif?
LDA#50
STAR_zhuozhuancount

LDA P_0EH_IOC_Buffer
EOR #%00000010
STA P_0EH_IOC_Buffer

endif?:

RTS

;;==============================================================================
;; 閃右轉(zhuǎn)燈
;;=============================================================================

Flash_you:
LDAR_youzhuancount
BNEli4

LDA#50
STAR_youzhuancount

LDAP_0EH_IOC_Buffer
EOR#%00000100
STAP_0EH_IOC_Buffer

li4:

RTS

;;==============================================================================
;; 滅尾燈
;;==============================================================================
Led_weidengDown:
LDAP_0EH_IOC_Buffer
AND#%11111110
STAP_0EH_IOC_Buffer

RTS

;;==============================================================================
;; 播放倒車 (尾燈)
;;=============================================================================
Play_daoche: ;(daoche)

;;加速中不播放倒車
LDAR_jiashu01over
BNEnextZ
LDAR_jiashu02over
BNEnextZ

LDAR_daochecount
BNEnextZ



LDAP_0EH_IOC_Buffer ;;;;;;;;;;尾燈亮
ORA#%00000001
STAP_0EH_IOC_Buffer


LDA #3
LDX #1
JSR F_PlaySpeechCh1
overE:
%TestCh1
BCS overE

LDA#100
STAR_daochecount

LDA#1
STAR_daoche_Flag

nextZ:
RTS

;;==============================================================================
;; 播放啟動(啟動一次不再啟動)
;;=============================================================================
Play_qidong:
;;;;;;;;;;;;啟動一次不再啟動
LDA#1
CMPR_qidongover
BEQnextQ

LDA#8
LDX#0
JSRF_PlaySpeechCh1

;;;;;;;;;;;;;啟動完R_qidongover = 1
LDA#1
STAR_qidongover
nextQ:

RTS


;;==============================================================================
;; 播放加速01
;;=============================================================================

Play_jiashu01:

LDAR_jiashu01alltime
BNEqian

LDA#4
LDX#0
JSRF_PlaySpeechCh1

LDA#1
STAR_jiashu01alltime
qian:

RTS

;;==============================================================================
;; 播放加速02
;;=============================================================================

Play_jiashu02:

LDAR_jiashu02alltime
BNEBqian

LDA#4
LDX#1
JSRF_PlaySpeechCh1

LDA#1
STAR_jiashu02alltime
Bqian:

RTS

;;==============================================================================
;; 播放空車
;;=============================================================================
Play_kongche:
%TestCh1
BCSoverB?
LDA #6
LDX #0
JSRF_PlaySpeechCh1
overB?:

RTS



;;==============================================================================
;; 播放剎車
;;=============================================================================
Play_shache:
LDAP_0EH_IOC_Buffer
ORA#%00000001
STAP_0EH_IOC_Buffer

LDA#2
LDX#0
JSRF_PlaySpeechCh1

LDA#1
STAR_Downweideng_Flag

LDA#100
STAR_DownweidengCount


RTS
;;==============================================================================
;; 播放加速01B
;;=============================================================================
Play_jiashu01B:

%TestCh1
BCStryW
LDA#5
LDX#0
JSRF_PlaySpeechCh1


tryW:

RTS
;;==============================================================================
;; 播放加速02B
;;=============================================================================
Play_jiashu02B:

%TestCh1
BCStryBW
LDA#5
LDX#1
JSRF_PlaySpeechCh1

tryBW:

RTS