6502单片机编程代码

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

Play_laba:                               

  LDA #7     
  LDX #0
  JSR F_PlaySpeechCh1
    
    over?:        
            %TestCh1
    BCS over?
    
   LDA #7     
  LDX #0
  JSR F_PlaySpeechCh1
    
    overDOUBLE?:        
            %TestCh1
    BCS overDOUBLE?
RTS

;;==============================================================================
;;  亮/灭大灯
;;==============================================================================
Led_dadeng:
   
  LDA P_0EH_IOC_Buffer
  EOR #%00001000 
  STA P_0EH_IOC_Buffer

  RTS

;;==============================================================================
;;  亮尾灯
;;==============================================================================
Ledweideng:                    
  LDA P_0EH_IOC_Buffer
  EOR #%00000001
  STA P_0EH_IOC_Buffer
 
  RTS
                 
  
 

;;==============================================================================
;;  灭左转灯
;;==============================================================================
Led_zhuoDown:  
  LDA P_0EH_IOC_Buffer
  AND #%11111101
  STA P_0EH_IOC_Buffer
  
  RTS
  

;;==============================================================================
;;  灭右转灯
;;==============================================================================
Led_youDown:  
  LDA P_0EH_IOC_Buffer
  AND #%11111011
  STA P_0EH_IOC_Buffer
  
  RTS  

;;==============================================================================
;;  闪左转灯
;;==============================================================================
Flash_zhuo:                     
  LDA R_zhuozhuancount
  BNE endif?
  LDA #50
  STA R_zhuozhuancount
  
  LDA   P_0EH_IOC_Buffer
  EOR   #%00000010
  STA   P_0EH_IOC_Buffer 
  
  endif?:
  
  RTS

 
;;==============================================================================
;;  闪右转灯
;;=============================================================================          
 
Flash_you:                   
  LDA R_youzhuancount
  BNE li4
  
  LDA #50
  STA R_youzhuancount
       
  LDA P_0EH_IOC_Buffer
  EOR #%00000100
  STA P_0EH_IOC_Buffer
  
  li4:
  
  RTS

;;==============================================================================
;;  灭尾灯
;;==============================================================================
Led_weidengDown:  
  LDA P_0EH_IOC_Buffer
  AND #%11111110
  STA P_0EH_IOC_Buffer
    
  RTS

;;==============================================================================
;;  播放倒车 (尾灯)
;;============================================================================= 
Play_daoche:           ;(daoche)
  
  ;;加速中不播放倒车
  LDA R_jiashu01over
  BNE nextZ
  LDA R_jiashu02over
  BNE nextZ
  
  LDA R_daochecount
  BNE nextZ
  
  
  
  LDA P_0EH_IOC_Buffer    ;;;;;;;;;;尾灯亮
  ORA #%00000001
  STA P_0EH_IOC_Buffer
  
  
   LDA #3   
   LDX #1
   JSR F_PlaySpeechCh1
    overE:
     %TestCh1
    BCS   overE
  
 

  LDA #100
  STA R_daochecount
  
  LDA #1
  STA R_daoche_Flag

  nextZ:
RTS

;;==============================================================================
;;  播放启动(启动一次不再启动)
;;============================================================================= 
Play_qidong:                                        
  ;;;;;;;;;;;;启动一次不再启动
  LDA #1
  CMP R_qidongover
  BEQ nextQ
               
  LDA #8 
  LDX #0
  JSR F_PlaySpeechCh1

  ;;;;;;;;;;;;;启动完R_qidongover = 1
  LDA #1
  STA R_qidongover
  nextQ:
  
  RTS                  
    
         
;;==============================================================================
;;  播放加速01
;;============================================================================= 

Play_jiashu01:
  
   LDA R_jiashu01alltime
   BNE qian
   
   LDA #4
   LDX #0
   JSR F_PlaySpeechCh1
   
   LDA #1
   STA R_jiashu01alltime
   qian:
 
RTS

;;==============================================================================
;;  播放加速02
;;============================================================================= 
 
Play_jiashu02:
  
   LDA R_jiashu02alltime
   BNE Bqian
   
   LDA #4
   LDX #1
   JSR F_PlaySpeechCh1
   
   LDA #1
   STA R_jiashu02alltime
   Bqian:
 
RTS

;;==============================================================================
;;  播放空车
;;============================================================================= 
Play_kongche:    
  %TestCh1    
  BCS overB?
   LDA     #6
   LDX     #0
   JSR F_PlaySpeechCh1
 overB?: 
    
 RTS   
        
                
      
;;==============================================================================
;;  播放刹车
;;============================================================================= 
Play_shache:    
   LDA P_0EH_IOC_Buffer
   ORA #%00000001
   STA P_0EH_IOC_Buffer
  
   LDA #2
   LDX #0
   JSR F_PlaySpeechCh1
   
   LDA #1
   STA R_Downweideng_Flag
   
   LDA #100
   STA R_DownweidengCount
     
  
RTS
;;==============================================================================
;;  播放加速01B
;;============================================================================= 
Play_jiashu01B:
 
 %TestCh1
 BCS tryW 
  LDA #5
  LDX #0
  JSR F_PlaySpeechCh1
  
  
 tryW:
 
  

RTS
;;==============================================================================
;;  播放加速02B
;;============================================================================= 
Play_jiashu02B:
 
 %TestCh1
 BCS tryBW 
  LDA #5
  LDX #1
  JSR F_PlaySpeechCh1
    
 tryBW:
 
RTS