?? doram.asm
字號(hào):
.title "ex9"
.global _c_int00
.mmregs
.def cos_generate,end_of_cose
.def d_cos_delay1,d_cos_delay2,d_theta,d_cosx
d_cos_delay1 .usect "cos_vars",1
d_cos_delay2 .usect "cos_vars",1
d_theta .usect "cos_vars",1
d_cosx .usect "cos_vars",1
k_cos_delay1 .set 06602h ;cos(0.5)*0.8
k_cos_delay2 .set 064d8h ;cos(10)*0.8
k_cos_theta .set 07f83h ;cos(5)
k_2 .set 2h
k_256 .set 256
COSDATA .usect "cos_data",256
DR_ADDR .set 8FFFh ;double ram address
AD_ADDR .set 9003h
DA_ADDR .set 9100h ;CS,LDAC .WR+IOSTRB->L1. LDAC WRITE;CS CHIP SELECT; L1
JT_ADDR .set 1001h
RAMADDR .set 8000h
SM_ADDR .set 1003h
FG_ADDR .set 1002H
DR_DATA .set 60h ;double ram data
AD_DATA .set 61h
DA_DATA .set 62h
;=====================================================================
.sect ".vectors"
reset: B _c_int00
NOP
NOP
.space 4*128
.text
_c_int00:
LD #0h,DP
STM #3000h,SP
RSBX INTM
STM #07FFFh,SWWSR
SSBX XF ;XF=1
ST #1007h,CLKMD ;工作在20MHz
RPT #0FFh
NOP
STM #0ffffh,IFR
ORM #000h,IMR
RSBX SXM
;CALL LOOP
CALL SINMAIN
; CALL COSLOOP
;********** 正旋波***********
SINMAIN ST #0,AD_DATA
STM #2000H,AR0
SINLOOP MVDK *AR0+,DA_DATA
ADDM #30000,DA_DATA
PORTW DA_DATA, DA_ADDR
RPT #200
NOP
ADDM #1,AD_DATA
CMPM AD_DATA,#128
BC SINLOOP,NTC
SINLOOP1; STM #2135,AR0
SINLOOP2 MVDK *AR0+,DA_DATA
LD DA_DATA,A
SUB #30000,A
STL A,DA_DATA
PORTW DA_DATA, DA_ADDR
RPT #200
NOP
ADDM #1,AD_DATA
CMPM AD_DATA,#246
BC SINLOOP2,NTC
B SINMAIN
;**********三 角 波 *********************
LOOP ST #0H,DA_DATA
LOOP1 NOP
PORTW DA_DATA, DA_ADDR
ADDM #300,DA_DATA
CMPM DA_DATA,#60000
BC LOOP2,TC
B LOOP1
LOOP2 PORTW DA_DATA,DA_ADDR
LD DA_DATA,A
SUB #300,A
STL A,DA_DATA
CMPM DA_DATA,#0000H
BC LOOP,TC
B LOOP2
NOP
BANZ LOOP1,*AR5-
ST #1000h,AR5
B LOOP
delay STM #0f0h,AR7 ;延時(shí)子程序
BANZ $,*AR7-
BANZ delay,*AR6-
RET
;************ 矩形波***************
COSLOOP ST #0,AD_DATA
COSLOOP1 ST #50000,DA_DATA
PORTW DA_DATA,DA_ADDR
ADDM #1,AD_DATA
CMPM AD_DATA,#1300 ;;;;;;;;
BC COSLOOP2,TC
B COSLOOP1
COSLOOP2
ST #0,DA_DATA
PORTW DA_DATA,DA_ADDR
ADDM #1,AD_DATA
CMPM AD_DATA,#2600 ;;;;;;;;
BC COSLOOP3,TC
B COSLOOP2
COSLOOP3 B COSLOOP
coshapp SSBX FRCT
ST COSDATA,AR5
NOP
;STM #600H,SP
LD #d_cos_delay1,DP
NOP
STM #d_cos_delay1,ar3
STM #d_theta,AR4
RPTZ A,#3
STL A,*AR3+
STM #1,AR0
STM #d_cosx,AR2
STM #k_2,BK
;STM #k_256-1,BRC
NOP
STM #d_cos_delay1,AR3
ST #k_cos_delay1,*AR3+
ST #k_cos_delay2,*AR3
STM #d_cos_delay1,AR3
ST #k_cos_theta,d_cosx
cos_generate
; RPTB end_of_cose
MPY *AR2,*AR3+0%,A
SUB *AR3,15,A
SFTA A,1,A
STH A,*AR3
sth a,COSDATA
rpt #400
nop
PORTW COSDATA,DA_ADDR
; MVDD *AR3,*AR5+
NOP
end_of_cose
B cos_generate
cosend ret
.data
;SINVAL ; Index Angle Sin(Angle)
STABLE .word 0 ; 0 0 0.0000
.word 804 ; 1 1.41 0.0245
.word 1608 ; 2 2.81 0.0491
.word 2410 ; 3 4.22 0.0736
.word 3212 ; 4 5.63 0.0980
.word 4011 ; 5 7.03 0.1224
.word 4808 ; 6 8.44 0.1467
.word 5602 ; 7 9.84 0.1710
.word 6393 ; 8 11.25 0.1951
.word 7179 ; 9 12.66 0.2191
.word 7962 ; 10 14.06 0.2430
.word 8739 ; 11 15.47 0.2667
.word 9512 ; 12 16.88 0.2903
.word 10278 ; 13 18.28 0.3137
.word 11039 ; 14 19.69 0.3369
.word 11793 ; 15 21.09 0.3599
.word 12539 ; 16 22.50 0.3827
.word 13279 ; 17 23.91 0.4052
.word 14010 ; 18 25.31 0.4276
.word 14732 ; 19 26.72 0.4496
.word 15446 ; 20 28.13 0.4714
.word 16151 ; 21 29.53 0.4929
.word 16846 ; 22 30.94 0.5141
.word 17530 ; 23 32.34 0.5350
.word 18204 ; 24 33.75 0.5556
.word 18868 ; 25 35.16 0.5758
.word 19519 ; 26 36.56 0.5957
.word 20159 ; 27 37.97 0.6152
.word 20787 ; 28 39.38 0.6344
.word 21403 ; 29 40.78 0.6532
.word 22005 ; 30 42.19 0.6716
.word 22594 ; 31 43.59 0.6895
.word 23170 ; 32 45.00 0.7071
.word 23731 ; 33 46.41 0.7242
.word 24279 ; 34 47.81 0.7410
.word 24811 ; 35 49.22 0.7572
.word 25329 ; 36 50.63 0.7730
.word 25832 ; 37 52.03 0.7883
.word 26319 ; 38 53.44 0.8032
.word 26790 ; 39 54.84 0.8176
.word 27245 ; 40 56.25 0.8315
.word 27683 ; 41 57.66 0.8449
.word 28105 ; 42 59.06 0.8577
.word 28510 ; 43 60.47 0.8701
.word 28898 ; 44 61.88 0.8819
.word 29268 ; 45 63.28 0.8932
.word 29621 ; 46 64.69 0.9040
.word 29956 ; 47 66.09 0.9142
.word 30273 ; 48 67.50 0.9239
.word 30571 ; 49 68.91 0.9330
.word 30852 ; 50 70.31 0.9415
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -