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

📄 rem.lst

📁 10首儿歌音乐的程序源码
💻 LST
📖 第 1 页 / 共 5 页
字号:
 374  00D0                      ;           CLR     WDT                                                
 375  00D0                      ;           SDZ     RAMC
 376  00D0                      ;           JMP     FA500HZ            
 377  00D0                      ;  FA1KHZ:
 378  00D0                      ;           SET     REM            ; NO FA                 
 379  00D0                      ;           MOV     A,20D     
 380  00D0                      ; YS500A:                         
 381  00D0                      ;           SDZ     ACC
 382  00D0                      ;           JMP     YS500A         ; [3*(A-1)+2+1] * 4/455 =500  fact=501.9(19D)
 383  00D0                      ;           CLR     WDT 
 384  00D0                      ;           CLR     REM            ; YES FA                 
 385  00D0                      ;           MOV     A,16D     
 386  00D0                      ; YS500B:                         
 387  00D0                      ;           SDZ     ACC
 388  00D0                      ;           JMP     YS500B         ; [3*(A-1)+2+5] * 4/455 =500  fact=509.9(16D)
 389  00D0                      ;           CLR     WDT
 390  00D0                      ;           SDZ     RAMB           ; n ge 1kHz
 391  00D0                      ;           JMP     FA1KHZ                                                                  
 392  00D0                      ;           SDZ     RAMD
 393  00D0                      ;           JMP     STACAR         ; 10/8 CYCLES  
 394  00D0                      ; CAREND:
 395  00D0                      ;           SET     REM            ; END CLOSE REM 
 396  00D0                      ;           RET
 397  00D0                      ; **** 4P30 SA3010 & PT2210 CODE FA 
 398  00D0               SAT_BIT1:                         ; START BITE 11B
 399  00D0  3016                SET     REM
 400  00D1                  SAT_BIT1_PRO:                  ; 1.778/2=888us->101x4/455=888us cycle "LOW"
 401  00D1  0F21                MOV     A,033D             ; [(3*32)+2+3]=101
 402  00D2                  SAT_BIT1P1:
 403  00D2  1785                SDZ     ACC
 404  00D3  2800     R          JMP     SAT_BIT1P1
 405  00D4  0001                CLR     WDT        
 406  00D5  0000                NOP
 407  00D6  3416                CLR     REM                ; 888us->102 cycle "HIGH"
 408  00D7  0F21                MOV     A,033D             ; [(3*32)+2+3]=101
 409  00D8                  SAT_BIT1P2:
 410  00D8  1785                SDZ     ACC
 411  00D9  2800     R          JMP     SAT_BIT1P2
 412  00DA  0001                CLR     WDT
 413  00DB  0000                NOP
 414  00DC               SAT_BIT2:                         ; START BITE 11B
 415  00DC  3016                SET     REM
 416  00DD                  SAT_BIT2_PRO:                  ; 888uS->102 cycle "LOW"
 417  00DD  0F21                MOV     A,033D             ; [(3*32)+2+3]=101
 418  00DE                  SAT_BIT2P1:
 419  00DE  1785                SDZ     ACC
File: REM.ASM       Holtek Cross-Assembler  Version 2.86      Page 8

 420  00DF  2800     R          JMP     SAT_BIT2P1
 421  00E0  0001                CLR     WDT        
 422  00E1  0000                NOP
 423  00E2  3416                CLR     REM                ; 888uS->102 cycle "HIGH"
 424  00E3  0F20                MOV     A,032D             ; [(3*31)+2+6]=101
 425  00E4                  SAT_BIT2P2:
 426  00E4  1785                SDZ     ACC
 427  00E5  2800     R          JMP     SAT_BIT2P2
 428  00E6  0001                CLR     WDT
 429  00E7  0000                NOP
 430  00E8                  SEND_CRT:                      ; SEND CONTROL BIT  110 OR 111
 431  00E8  3C38                SZ      CONBIT_DAT.0
 432  00E9  2800     R          JMP     CRT_BIT0_PRO
 433  00EA  3016                SET     REM
 434  00EB  2800     R          JMP     CRT_BIT1_PRO
 435  00EC                  CRT_BIT0_PRO:
 436  00EC  3416                CLR     REM
 437  00ED                  CRT_BIT1_PRO:                  ; 888uS->102 cycle "LOW"
 438  00ED  0F21                MOV     A,033D             ; [(3*31)+2+6]=101
 439  00EE                  CRT_BIT1P1:
 440  00EE  1785                SDZ     ACC
 441  00EF  2800     R          JMP     CRT_BIT1P1
 442  00F0  0001                CLR     WDT
 443  00F1  0000                NOP
 444  00F2  0196                CPL     PC                 ; /PC0
 445  00F3  0F1F                MOV     A,031D             ; 888uS->102 cycle   "LOW"[(3*30)+2+8]=101
 446  00F4                  CRT_BIT1P2:
 447  00F4  1785                SDZ     ACC
 448  00F5  2800     R          JMP     CRT_BIT1P2
 449  00F6  0001                CLR     WDT
 450  00F7                   ; == Send 5BIT SYSTEM Code ==
 451  00F7  0F05                MOV     A,005D
 452  00F8  00A9                MOV     RAMD,A             ; SAVE AS LSRAM
 453  00F9                SYS_CODE_PRO:
 454  00F9  18B7                RL      REM_SYSCODE
 455  00FA  3C37                SZ      REM_SYSCODE.0      ; MSB -->  LSB
 456  00FB  2800     R          JMP     SYS_CP1
 457  00FC  3416                CLR     REM
 458  00FD  2800     R          JMP     SYS_CP2
 459  00FE                 SYS_CP1:
 460  00FE  3016                SET     REM
 461  00FF                 SYS_CP2:                        ; 888uS->102 cycle "LOW"
 462  00FF  0F20                MOV     A,32D              ; [(3*32)+2+3]=101
 463  0100                 SYS_BIT1P1:
 464  0100  1785                SDZ     ACC
 465  0101  2800     R          JMP     SYS_BIT1P1        
 466  0102  0000                NOP
 467  0103  0001                CLR     WDT                
 468  0104  0196                CPL     PC                 ; 888uS->102 cycle "LOW"
 469  0105  0F1D                MOV     A,29D              ; [(3*28)+2+15]=101
 470  0106                 SYS_BIT1P2:
 471  0106  1785                SDZ     ACC
 472  0107  2800     R          JMP     SYS_BIT1P2
 473  0108  0001                CLR     WDT
 474  0109  0000                NOP
 475  010A  17A9                SDZ     RAMD
 476  010B  2800     R          JMP     SYS_DELAY
 477  010C  2800     R          JMP     SEND_CMD
 478  010D                 SYS_DELAY:
 479  010D  2800     R          NOP2                       ; NOP+NOP    JMP $+1
File: REM.ASM       Holtek Cross-Assembler  Version 2.86      Page 9

 480  010E  2800     R          JMP     SYS_CODE_PRO
 481  010F                 ; == Send COMMAND Code ==
 482  010F                SEND_CMD:
 483  010F  0F06                MOV     A,006D
 484  0110  00A9                MOV     RAMD,A
 485  0111  0001                CLR     WDT
 486  0112                COM_CODE_PRO:
 487  0112  18B6                RL      REM_DATCODE
 488  0113  3C36                SZ      REM_DATCODE.0
 489  0114  2800     R          JMP     COM_CP1
 490  0115  3416                CLR     REM
 491  0116  2800     R          JMP     COM_CP2
 492  0117                COM_CP1:
 493  0117  3016                SET     REM
 494  0118                COM_CP2:                         ; 895uS->102 cycle "LOW"
 495  0118  0F20                MOV     A,32D              ; [(3*32)+2+3]=101
 496  0119               COM_BIT1P1:
 497  0119  1785                SDZ     ACC
 498  011A  2800     R          JMP     COM_BIT1P1
 499  011B  0001                CLR     WDT
 500  011C  0000                NOP
 501  011D  0196                CPL     PC                 ; 895uS->102 cycle "LOW"
 502  011E  0F1E                MOV     A,30D              ; [(3*29)+2+12]=101
 503  011F               COM_BIT1P2:
 504  011F  1785                SDZ     ACC
 505  0120  2800     R          JMP     COM_BIT1P2
 506  0121  0001                CLR     WDT
 507  0122  2800     R          NOP2                       ; NOP+NOP JMP $+1
 508  0123  17A9                SDZ     RAMD
 509  0124  2800     R          JMP     COM_CODE_PRO
 510  0125  3016                SET     REM                ; END CLOSE REM
 511  0126                  ; == Repeat Frame Delay Time Process TOTAL64-2-1-5-6= 50(X1.7777)=88.8888MS
 512  0126  0F10                MOV     A,016D             ; Repetition time=113.77777ms (12288 cycle)
 513  0127  00A9                MOV     RAMD,A             ; Scan Key = 2471 cycle=21.72MS ; Send Repeat Code = 2872 cycle
 514  0128               REP_DELAY_02:                     ; 12286-2471-2872=6945
 515  0128  0F6B                MOV     A,107D             ; [(4*107)+5]*16=6928
 516  0129  0085                MOV     ACC,A
 517  012A                 REP_DELAY_03:               
 518  012A  0001                CLR     WDT
 519  012B  1785                SDZ     ACC
 520  012C  2800     R          JMP     REP_DELAY_03
 521  012D  0001                CLR     WDT
 522  012E  17A9                SDZ     RAMD
 523  012F  2800     R          JMP     REP_DELAY_02
 524  0130  0F82                MOV     A,130D              ; origin: 004d
 525  0131  0085                MOV     ACC,A               ; 129x4+3=15
 526  0132                 REP_DELAY_04:
 527  0132  0001                CLR     WDT
 528  0133  1785                SDZ     ACC                 ; [m]
 529  0134  2800     R          JMP     REP_DELAY_04
 530  0135  0001                CLR     WDT
 531  0136                 CODE31_END:
 532  0136  0003                RET
 533  0137               ; ***** Up is rem ok,Down is Tv Call  rem ****
 534  0137              
 535  0137               
 536  0137              
 537  0137              
 538  0137               ;  =====   ===  TV  CALL  REMOTE   ===      ======    
 539  0137               
File: REM.ASM       Holtek Cross-Assembler  Version 2.86      Page 10

 540  0137              REMCALL:                           ; IF NO,TO Anjian check ,ex-pb1=0 not wake
 541  0137  1F3A                 CLR     RAMR              ; Jishu
 542  0138  0714                 MOV     A,PB
 543  0139  00BD                 MOV     RAMLS,A           ; Ls Save
 544  013A  0F1E                 MOV     A,030D
 545  013B  00BB                 MOV     RAMS,A            ; Ys Ram 3MS/8.79US=341.25
 546  013C               YS3MS:                            ; 3ms Have 2-7 changes
 547  013C  0714                 MOV     A,PB
 548  013D  043D                 XOR     A,RAMLS           ; Yihuo last time -> A
 549  013E  3C05                 SZ      ACC.0             ; = Is 0 ; <> Is 1  
 550  013F  2800     R           JMP     BUTONG
 551  0140  2800     R           NOP2                      ; 12X(?-1)+11+10 = 342 --> Shiji=3.244MS
 552  0141  2800     R           NOP2
 553  0142  0001                 CLR     WDT               ; WDT=2048X8.79US=18MS       
 554  0143                OVERY:     
 555  0143  17BB                 SDZ     RAMS              ; = XIANGTONG [m]
 556  0144  2800     R           JMP     YS3MS
 557  0145                CALT:                            ; Lilun=3-6 changes Fast judge
 558  0145  073A                 MOV     A,RAMR
 559  0146  0A01                 SUB     A,001D
 560  0147  3C0A                 SZ      STA_C             ; C-FLAG=0 A<2 
 561  0148  2800     R           JMP     DAYD3             ; C=1 A>=2

⌨️ 快捷键说明

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