⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hou.asm

📁 10首儿歌音乐的程序源码
💻 ASM
📖 第 1 页 / 共 4 页
字号:
 YSFRE:  
          SDZ     ACC
          JMP     YSFRE
          CLR     WDT
          SDZ     RAMS
          JMP     SPKON
          CLR     WDT              ; 1Cycles
           MOV     A,00000001B     ; KEEP Goon
           XORM    A,PA       
             SET     PA1            ; Have call vcc  
           MOV     A,RAMD
           MOV     RAMS,A          ; 1
           MOV     A,00000001B     ; 2
         ;    SNZ     PB0 
             CLR     CALLNUM
           ANDM    A,PA            ; PA0 NO CHAGE,PA1-PA7=0           
           MOV     A,PB                    
           OR      A,11000001B     ; PB7/PB6=1,PB0=1          
             SET   PA1             
           SIZA    ACC             ; FF+1=0 NO ANJIAN            
           JMP     YWAKEMID        ; <>FFH,YOU ANJIAN           
           MOV     A,RAMT                       
           SUB     A,006D          ; 3+3+3+3+3 TOTAL=12 (SUB A-2)X4         
         ;    SNZ   PB0
             CLR   CALLNUM
          SDZ     RAMLS
          JMP     YSFRE            ; CLR  SPK   No noise
  MUSICON:
           CLR     WDT
           CLR     SPK           
           INC     RAMR                                

           SNZ     PB0       
           JMP     ANJA
           JMP     LOOPMCA         ; NO ANJIAN
ANJA:                    
           INC     MUSICTIM        ; PB0=0 Have key  NEXT SONGS 
           clr     ramr           
 ZPD:      
           clr     wdt
           SNZ     PB0
           JMP     ZPD             ; PB0 =0 ANJIAN
           JMP     REMCALL         ; NEXT SONGS


           SNZ     PB0
           JMP     LOOPMCA         ; CLR     SPK
           INC     CALLNUM         ; Quren tv no call
           MOV     A,CALLNUM 
           SUB     A,008D          ; 0.15S(0.3S) X 15=4.5S
           SNZ     STA_C           ; C-FLAG=1 A>=xxxD
           JMP     LOOPMC          ; C=0 A<xxxD,TV NO CALL,CLR SPK
           SZ      PB0
           JMP     REMCALL           
 LOOPMCA:
           CLR     CALLNUM
           JMP     LOOPMC                
          

            


  
 ; =====  Remote Table Array ====== DW 14BIT  MAX: 3FFFH
        ORG     1CEH
  ;    --000000 00000000
  ;      ||       ||||||
  ;      ||       ++++++-> 6 bit Data code
  ;      |+++++->          5 bit System code    START BIT (11 & 10)
  ;      0 4P30(PT2210)  1 REMOTE CAR 4GE500HZ(3/4)@8BIT 1KHZ(1/2) RIGHT: 2040H(--10 0000 0100 0000)
        DW      00FFH              ; Key x0 :                  :00
        DW      000CH              ; Key 10 :                  :10
        DW      00FFH              ; Key 11 :                  :11
        DW      002AH              ; Key 12 :                  :12
        DW      0001H              ; Key 13 :                  :13
        DW      001DH              ; Key 14 :  ALLTIME-00FF    :14     
        DW      0004H              ; Key 18 :                  :18
        DW      002FH              ; Key 19 :                  :19
        DW      0015H              ; Key 20 :                  :20
        DW      0005H              ; Key 21 :                  :21
        DW      0010H              ; Key 22 :  ALLTIME-00FF    :22        
        DW      0007H              ; Key 26 :                  :26
        DW      000FH              ; Key 27 :                  :27
        DW      0016H              ; Key 28 : RHT  001A-HRS    :28
        DW      0000H              ; Key 29 :                  :29
        DW      000AH              ; Key 30 :  ALLTIME-00FF    :30        
        DW      0008H              ; Key 34 :                  :34
        DW      0009H              ; Key 35 :                  :35
        DW      0013H              ; Key 36 :  LFT 0019H-LTS   :36
        DW      0006H              ; Key 37 :                  :37
        DW      0011H              ; Key 38 :  ALLTIME-00FF    :38       
        DW      000BH              ; Key 42 :                  :42
        DW      001CH              ; Key 43 :                  :43
        DW      0014H              ; Key 44 :                  :44
        DW      0003H              ; Key 45 :                  :45
        DW      0017H              ; Key 46 :  ALLTIME-00FF    :46       
        DW      0018H              ; Key 50 :                  :50
        DW      0029H              ; Key 51 :                  :51
        DW      0028H              ; Key 52 :  BK  001CH-PB    :52
        DW      0012H              ; Key 53 :                  :53
        DW      0019H              ; Key 54 :  ALLTIME-00FF    :54        
        DW      000DH              ; Key 58 :                  :58
        DW      001AH              ; Key 59 :                  :59
        DW      0022H              ; Key 60 :                  :60
        DW      0002H              ; Key 61 :                  :61
        DW      000EH              ; Key 62 :  ALLTIME-00FF    :62
    

; ==== MUSIC ADR OFFSET ,True Adr is 02xxH & 03xxH ,This is xx =====
        ORG     1F2H
        DW      1096H
        DW      00D8H          ; MUSIC O     adr: 0228h
        DW      0023H          ; MUSIC 1     adr: 0258h
        DW      1067H          ; MUSIC 2     adr: 0298h
        DW      00ADH
        DW      1032H          ; MUSIC 3     adr: 02d0h
        DW      0002H          ; MUSIC 3 
        DW      1000H          ; MUSIC 4     adr: 0300h
        DW      004BH          ; MUSIC 5     adr: 0370h
        DW      0078H          ; MUSIC 6     adr: 0282h
       
       
      


         ORG     1FCH              ; CAN USE TABRDC
LOOPMC:
         MOV     A,RAMR
         MOV     TBLP,A            ; TABLE LOW 8BIT ADR   TABRDL=LAST PAGE 0300H 
         TABRDL  RAMS              ; RAMS=LOW      DAT8   MO REN       
         SNZ     RAMWA.4           ; 1-03xxH(TABRDL)  0-02xxH(TABRDC) 
         TABRDC  RAMS              ; Ramwa.4=1 is 03xxH     
         JMP     SPACE      
    
          ORG    202H
  ; =====  Music  Dat =====
  ;  ** Songs1 -->liang zhi lao hu **
        ;    --000000  00000000
        ;    00||||||  ||||||||
        ;    00||||||  ++++++++-> 8 bit Jipai
        ;    00++++++->           6 bit  Fre
        ;        low fre              
        DW        2215H;1A17H            
        DW        1E16H;1719H            
        DW        1B17H;151AH             
        DW        2215H;1A17H                 
        DW        2215H;1A17H            
        DW        1E16H;1719H            
        DW        1B17H;151AH            
        DW        2215H;1A17H                 
        DW        1B17H;151AH             
        DW        1918H;131BH           
        DW        1624H;1128H                   
        DW        1B17H;151AH            
        DW        1918H;131BH             
        DW        1624H;1128H                 
        DW        1616H;1118H           
        DW        140DH;0F0FH            
        DW        1616H;1118H             
        DW        190CH;130DH            
        DW        1B17H;151AH             
        DW        2215H;1A17H                  
        DW        1616H;1118H          
        DW        140DH;0F0FH           
        DW        1616H;1118H             
        DW        190CH;130DH           
        DW        1B17H;151AH            
        DW        2215H;1A17H                
        DW        1E16H;1A17H            
        DW        2E12H;111CH            
        DW        221DH;1A21H               
        DW        1E16H;1A17H           
        DW        2E12H;111CH            
        DW        221DH;1A21H                           
        DW       0180H              ;  1XXX XXXX  80H is over              
       
           
        ORG      223H
  ;  ** Songs --> * Xian qi ni de gai tou lai * 
        DW        1616H        
        DW        220DH             
        DW        220DH    
        DW        2212H         
        DW        190FH   
        DW        1B0EH       
        DW        1E17H
        DW        190FH     
        DW        1B1CH      
        DW        161BH     
        DW        220DH        
        DW        2212H    
        DW        190FH
        DW        1B0EH    
        DW        1E17H 
        DW        190FH
        DW        1B12H
         DW      01C3H           ; STOP 0.3
        DW        1B0EH
        DW        1E0DH         
        DW        1B0EH 
        DW        1E0DH       
        DW        1B12H         
        DW        1B0EH   
        DW        1E0DH       
        DW        1B0EH
        DW        190FH     
        DW        1B0EH      
        DW        1E0DH     
        DW        2212H
        DW        2212H    
        DW        1E13H
        DW        1E0DH    
        DW        190FH       
        DW        1B14H
        DW        1B0EH
        DW        1E0DH
        DW        2212H 
        DW        00E5H             ;  E=1110 <=> 0180  00 go to 03E5H 
      
        ORG      24BH
  ;  ** Songs3 -->Mai tang yuan **
        DW        1B12H;1B15H    
        DW        1415H;1419H
        DW        1B1AH;1B1EH    
        DW        1415H;1419H 
        DW        1316H;131AH      
        DW        1B1AH;1B1EH       
        DW        140FH;1411H    
        DW        1310H;1313H         
        DW        140FH;1411H   
        DW        160EH;1611H       
        DW        1415H;1419H     
        DW        140FH;1411H      
        DW        140FH;1411H     
        DW        1B0DH;1B0FH 
        DW        160EH;1611H    
        DW        1B12H;1B15H
        DW        2915H;2919H               ; 0 XIUZHIFU 0.5S
        DW        1B16H;1B1AH    
        DW        1B0DH;1B0FH 
        DW        1415H;1419H      
        DW        1415H;1419H       
        DW        1B0DH;1B0FH    
        DW        160EH;1611H         
        DW        160EH;1611H   
        DW        1B0DH;1B0FH 
        DW        1E18H;1E1DH       
        DW        1B16H;1B1AH     
        DW        1B0DH;1B0FH  
        DW        1415H;1419H      
        DW        1415H;1419H     
        DW        1B0DH;1B0FH    
        DW        160EH;1611H 
        DW        160EH;1611H
        DW        1B0DH;1B0FH      
        DW        1E18H;1E1DH       
        DW        1B12H;1B15H
        DW        290FH;2912H    
        DW        1B12H;1B15H         
        DW        290FH;2912H   
        DW        1B0DH;1B0FH       
        DW        1E0CH;1E0EH
        DW        220BH;220EH     
        DW        240BH;240DH      
        DW        2915H;2919H            
        DW       0180H             ; OVER!    

     ;       ORG      278H
  ;  ** Songs6 -->Du  shu lang **
        DW        2917H 
        DW        1E0FH      
        DW        2913H       
        DW        1619H
        DW        2917H      
        DW        1E0FH     
        DW        291BH 
        DW        2913H;0F1EH
        DW        290DH;0F15H   
        DW        220FH;1A10H 
        DW        1E16H;1719H      
        DW        1B17H;151AH       
        DW        1E16H;1719H
        DW        2215H;1A17H    
        DW        291BH;0F2AH
        DW        2917H;0F25H
        DW        220FH;1A10H 
        DW        1B20H;1524H      
        DW        1B17H;151AH 
        DW        1E0FH;1711H       
        DW        1B10H;1512H
        DW        1619H;111CH      
        DW        1B17H;151AH     
        DW        141AH;0F1EH    
        DW        1413H;0F15H
        DW        1413H;0F15H
        DW        1413H;0F15H
        DW        1612H;1114H 
        DW        1B17H;151AH      
        DW        1E2CH;1731H       
        DW        1420H;0F25H
        DW        1413H;0F15H      
        DW        141AH;0F1EH       
        DW        141AH;0F1EH
        DW        141AH;0F1EH       
        DW        1413H;0F15H      
        DW        1612H;1114H    
        DW        1B17H;151AH
        DW        1E16H;1719H
        DW        1E1BH;171EH
        DW        1B10H;1512H      
        DW        1619H;111CH       
        DW        1B17H;151AH
        DW        1619H;111CH      
        DW        1425H;0F2AH     
        DW        1612H;1114H    
        DW        1B10H;1512H 
        DW        1E16H;1719H      
        DW        1B17H;151AH       
        DW        1E16H;1719H
        DW        2215H;1A17H    
        DW        2926H;0F31H       
        DW       0180H              ;  1XXX XXXX  80H is over  
         
        ORG     2ADH  
;  ** Songss -->Gong xi gong xi **
        DW        2913H      
        DW        2414H
        DW        2215H
        DW        1E16H         
        DW        1918H   
        DW        1B17H 
        DW        1B20H    
        DW        1B17H
        DW        141AH    
        DW        141AH 
        DW        1B17H      
        DW        1B17H       
        DW        1E16H    
        DW        1E1FH         
        DW        1B17H   
        DW        1918H     
        DW        1B17H

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -