matrix.asm

一个本人自己编写的在TI公司开发的CCS操作环境下的矩阵转换程序。

        .title  "matrix.asm"
        .mmregs
STACK	.usect "STACK",10h
        .bss x,16
        .bss z,16
y      .usect "y",16
        .def  _c_int00
        .data
table1:  
    .word  1,2,3,4
	.word  2,3,4,5
	.word  3,4,5,6
	.word  4,5,6,7
table2:
	.word  2,4,3,1
	.word  4,6,3,2
	.word  6,8,4,3
	.word  8,10,5,4
	.text
_c_int00:  STM  #0,SWWSR
        STM  #STACK+10h,SP
        STM  #x,AR0
        RPT  #15
        MVPD table1,*AR0+ 
        STM  #y,AR0
        RPT  #15
        MVPD table2,*AR0+
    
    stm #4,ar0
    stm #3,ar1
    stm #x,ar2
    stm #y,ar3  
    stm #z,ar4
    stm #16,bk
    
loop:
   stm #3,brc
   rptb next-1
   rptz A,#3
   mac *ar2+, *ar3+0%,a
   stl a,*ar4+
   mar *ar2-0 
   mar *ar3+ 
next:
   mar *ar2+0
   mar *ar3-0 
   banz loop,*ar1-
   
end: b end
.end