?? flash_write_or_erase_program.asm
字號(hào):
;**************************************
; FLASH ERASE AND PROGRAM
;**************************************
.title "flash.asm"
.mmregs
.def start ; ftw,inform_ch
.data
;*********************************************************************
write_word: ;待寫(xiě)入內(nèi)容
.word 0x10AA,0x7FFF,0xF800,0x0000,0x0080,0x00EC,0x0000,0x0180,0x7718,0x3A00,0x7758,0x0000
;*********************************************************************
sector_erase_sfd:
.byte 0AAh
.byte 055h
.byte 080h
.byte 0AAh
.byte 055h
.byte 030h ;sector erase
block_erase_sfd:
.byte 0AAh
.byte 055h
.byte 080h
.byte 0AAh
.byte 055h
.byte 050h ;block erase
chip_erase_sfd:
.byte 0AAh
.byte 055h
.byte 080h
.byte 0AAh
.byte 055h
.byte 010h ;chip erase
word_prog_sfd:
.byte 0AAh
.byte 055h
.byte 0A0h
softwareid_entry_sfd:
.byte 0AAh
.byte 055h
.byte 090h
cfi_query_entry_sfd:
.byte 0AAh
.byte 055h
.byte 098h
mode_exit_sfd:
.byte 0AAh
.byte 055h
.byte 0F0h ;exit other mode
;**************************************
erase_sfd_adr:
.word 0D555h
.word 0AAAAh
.word 0D555h
.word 0D555h
.word 0AAAAh
.word 0D555h
common_adr:
.word 0D555h
.word 0AAAAh
.word 0D555h
;erase_sfd_adr .set
;common_adr .set
write_word_adr .set 4000h
;write_word_adr .set 0FFFFh
;data_tab_adr .set 2000h
;prog_tab_adr .set 2050h
;f_adr_tab_adr .set 2021h
;**************************************
size .set 64
length .set 64
stack .set 400h ;.usect"STK",size
offset .set 8000h
SPSA0 .set 38h ;McBSP子地址寄存器
SPSA1 .set 48h ;McBSP子地址寄存器
SPSD0 .set 39h ;子塊數(shù)據(jù)寄存器映射位置
SPSD1 .set 49h ;子塊數(shù)據(jù)寄存器映射位置
GPIOCR .set 3Ch
GPIOSR .set 3Dh
TIM1 .set 30h
PRD1 .set 31h
TCR1 .set 32h
.text
;**************************************
; dsp_init
;**************************************
start:
stm #stack+size,SP
stm #3CF0h,PMST
stm #0h,CLKMD
nop
nop
stm #4007h,CLKMD
stm #0,GPIOSR
stm #0FFh,GPIOCR ;通用I/0設(shè)為輸出
;ovly=1 in PMST
;
stm #0AFFFh,SWWSR ;I/O 軟等待數(shù)為#X
; stm #1101101101101101B,SWWSR
; stm #0010011011011011B,SWWSR ;I/O 軟等待數(shù)為#X
; stm #SWSM,SWCR ;等待數(shù)*2
;**************************************
;
;**************************************
ld #0h,A
stm #0h,AR7
stm #0h,AR6
stm #0h,AR5
stm #0h,AR4
stm #0h,AR3
stm #0h,AR2
stm #0h,AR1
stm #write_word,AR5 ;
stm #write_word_adr,AR6 ;
main_prog:
; call #exit_mode
nop
nop
nop
call #delay_150ns
; call #erase_chip
nop
nop
nop
call #delay_100ms
nop
loop:
nop
nop
call #write_one_word
call #delay_150ns
b loop
;**************************************
exit_mode:
stm #mode_exit_sfd,AR1 ;exit any mode
stm #common_adr,AR2 ;commond address
; rpt #(3-1)
; mvdp *AR1+,*AR2+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ret
;**************************************
erase_chip:
stm #chip_erase_sfd,AR1 ;erase commond
stm #erase_sfd_adr,AR2 ;erase commond address
; rpt #(6-1)
; mvdp *AR1+,*AR2+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ld #0h,A
or *AR2+,A
ld *AR1,B
writa *AR1+
ret
;**************************************
write_one_word:
stm #word_prog_sfd,AR3 ;program one word commond
stm #common_adr,AR4 ;commond address
; stm #write_word,AR5 ;defined in AR5 before call subprogram
; stm #write_word_adr,AR6 ;defined in AR6 before call subprogram
; rpt #(3-1)
; mvdd *AR3+,*AR4+
; mvdd *AR5+,*AR6+
ld #0h,A
or *AR4+,A
ld *AR3,B
writa *AR3+
ld #0h,A
or *AR4+,A
ld *AR3,B
writa *AR3+
ld #0h,A
or *AR4+,A
ld *AR3,B
writa *AR3+
ld #0h,A ;write one word
; or *AR6+,A
ldm AR6,A
ld *AR5,B
writa *AR5+
add #1,A
stlm A,AR6
NOP
NOP
NOP
ret
;**************************************
;delay_150ns
;**************************************
delay_150ns
ld #200,B
loop_delay10
sub #1,B ;20MHz = 50*4*200ns=40us
nop
bc loop_delay10,BNEQ
nop
nop
nop
ret
;**************************************
;delay_100ms
;**************************************
delay_100ms
ld #400,A
loop_delay1
ld #5000,B
loop_delay11
sub #1,B ;20MHz = 50*4*5000ns=1ms
nop
bc loop_delay11,BNEQ
sub #1,A ;20MHz = 1ms*100=100ms
bc loop_delay1,ANEQ
nop
ret
;**************************************
;delay_20ms
;**************************************
delay_20ms
ld #20,A
loop_delay2
ld #5000,B
loop_delay21
sub #1,B ;20MHz = 50*4*5000ns=1ms
nop
bc loop_delay21,BNEQ
sub #1,A ;20MHz = 1ms*20=20ms
bc loop_delay2,ANEQ
nop
nop
nop
ret
;**************************************
.end
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -