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

📄 bsp1.asm

📁 dsp5000
💻 ASM
字号:
           .def  _c_int00
DXR10          .set     023h


SPSA0           .set    038h
SPSD0           .set    039h

SPCR1           .set    00h
SPCR2           .set    01h
RCR1            .set    02h
RCR2            .set    03h
XCR1            .set    04h
XCR2            .set    05h
SRGR1           .set    06h
SRGR2           .set    07h
PCR             .set    0Eh
TCR1            .set    32h 

;N         .set   2
Q_FACT    .set   32768
;Q_FACT    .set   16384
          .bss   d,3*2+2
          .bss   X,1
          .bss   Y,1 
          
          .sect  ".table"
          
table:
    ;second-order  section #01
           
          .word    03682h;;037h;;0da0h ;01fch    ;b2
          .word    09782h;; 0ffa0h;;0eaddh  ;02c8h    ;b1
          .word    03682h;;  037h; ;01fch    ;b0
          .word     08374h;; 0c27ch;;08574h;0a36fh   ;a2                
          .word    07cb7h;; 03ebah;;07cb7h;6ae8h    ;a1/2
          
    ;second-order  section #02
       
          .word     0h;  065fh;;0h;10c1h      ;b2
          .word     030ceh;;  0f381h;;030ch ;0fbc0h     ;b1
          .word     030ceh;;  065fh;;030ch;10c1h      ;b0
          .word      0h;; 0c1c3h;;0 ;9969h      ;a2
          .word      79e6h;;03efeh;;03cfch;64aah      ;a1/2
     
     .mmregs
     .text 
     
_c_int00:
 
     STM  #0FFA0H,PMST
     STM  #2300H,ST1
     STM  #0,SWWSR
     SSBX OVM 
     SSBX    FRCT 
     SSBX SXM  
                        
    

     STM     #d,AR3 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     RPTZ    A,#7
     STL     A,*AR3+     
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     STM     #2,AR0  
     
    
    stm SPCR1,SPSA0  
    nop
    stm #0000h,SPSD0   ;interrupt
    nop           
    
    stm SPCR2,SPSA0  
    nop
    stm #00h,SPSD0  
    nop
    
    stm RCR1,SPSA0  
    nop
    stm #0080h,SPSD0  
    nop
    
    stm RCR2,SPSA0    
    nop
    stm #0001h,SPSD0 
    nop 
    
    stm XCR1,SPSA0  
    nop
    stm #0080h,SPSD0  
    nop
    
    stm XCR2,SPSA0  
    nop
    stm #0001h,SPSD0  
    nop
    
    stm SRGR1,SPSA0
    nop
    stm #0017h,SPSD0
    nop
    
    stm SRGR2,SPSA0
    nop
    stm #02003h,SPSD0
    nop
    
    stm PCR,SPSA0
    nop
    stm #0f0ch,SPSD0
    nop
    
    stm SPCR1,SPSA0
    nop
    stm #1800h,SPSD0
    nop
    
    stm SPCR1,SPSA0
    nop
    stm #01001h,SPSD0
    rpt #6
    nop
    
               
    stm SPCR2,SPSA0  
    nop
    stm #02c0h,SPSD0   
    nop           
    
    
    stm SPCR2,SPSA0  
    nop
    stm #02c1h,SPSD0  
    rpt #6
    nop  
     

   
     stm   #2501h,AR7
     
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     ST      #0,*AR7 
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     ST      #2010H,AR2
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
         
;LOOP1: 
                 
    STM   #2,DXR10 
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP 
    stm   #20h,AR1
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    LD    *AR1,A
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    stm   #21h,AR5
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    ld    *AR5,B
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    nop
    
    ld    A,14,A
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    and    #0fffch,B    
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    ld    B,-2,B   
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    or   B,A  
   NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
       LD   #0,A  
       NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
       
LOOP1:   ; SUB  #32768,A 
    STM  #2400H,AR6 
    NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP       
 ;   STL  A,*AR6    
     ST  #32767,*AR6
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
INLOOP:
          STM     #d+7,AR3          
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          STM     #table,AR4          
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MPY     *AR4+,*AR3-,A 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
           
           
          MAC     *AR4+,*AR3,A 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          
          DELAY   *AR3-
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MAC     *AR4+,*AR3,A
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
             
          DELAY   *AR3             
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          ST      #2400H,AR5      ;          
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MVDD    *AR5,*AR3   ;INPUT         
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          LD      *AR3,B         
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          STH     B,7,*AR3-         
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     ;    STM     #N-2,BRC        
     ;     RPTB    ELOOP-1
          ld      a,-2,a             
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
LOOP:
         ; rpt      #2
          MAC     *AR4,*AR3,A
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MAC     *AR4,*AR3,A
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MAC     *AR4,*AR3,A 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MAC     *AR4+,*AR3-,A      ;a2
          NOP
    
         NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP 
          RPT     #6       
          MAC     *AR4,*AR3,A 
          NOP
           NOP
     NOP
     NOP
     NOP
     NOP
     NOP
                  ;a1 
                  
          MAC     *AR4+,*AR3-,A 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          ld      a,-2,a        
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          STH     A,*AR3+0         
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MPY     *AR4+,*AR3-,A       ;b2  
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MAC     *AR4+,*AR3,A           ;b1
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          DELAY   *AR3-         
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          MAC     *AR4+,*AR3,A            ;b0
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
                 
          DELAY   *AR3- 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          ld      a,-4,a
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP

     
                  
ELOOP:  
         
         
          MAC     *AR4+,*AR3-,A
               NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP  
       RPT  #14      
          MAC     *AR4,*AR3,A
              NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP                 
     
          MAC     *AR4+,*AR3,A  
               NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
                        
          ld      a,-4,a 
               NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          DELAY   *AR3 
               NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
          STH     A,*AR3 
               NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP          
                                  
         LD     A,-7,B 
              NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP          
       ;   ld     A,-11,B
         NOP
         NOP
         ADD    #32768,B 
              NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
           
          STL    B,*AR2+
               NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
         
 
    
    stl  B,-3,*AR6 
         NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
    nop
    nop
    portw *AR6,#01h 
         NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
   
     ADDM    #1,*AR7 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     LD      *AR7,A
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     LD      #1000,B
     MAX     A
     NOP
     NOP
     NOP
     BC     next,C 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     ;;  CMPM    *AR7,#03E8H
     ; ;  BC      next,NTC
     ST     #0,*AR7 
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     
     STM     #2010H,AR2
          NOP
     NOP
     NOP
     NOP
     NOP
     NOP
     NOP

next:          
   
    RPT   #06h 
    NOP
    B     LOOP1    
          
    SSBX    OVM         
    SSBX    CPL 
        
    STM     #010H,IMR  
    STM #0010h,TCR
    stm #0010h,TCR1
     
    POPM  AR7
     POPM  AR6
     POPM  AR1  
     rsbx  INTM
    ret          
    .end
    
    
    
    

⌨️ 快捷键说明

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