C-4
; AD50–EVM this can be achieved by writing 1 to i/o port 1, bit 0 before a primary
; communication and clearing port 1 afterwards.
; Once slave devices have been specified using reg 3, then a separate secondary
; communication (interleaved with normal communications) takes place for each
; device in turn.
AC01INIT:
ar2 = #1302h
; workspace for storing value to be output to AD50–EVM
*ar2 = #0010b
; switch on one AD50 and hold it in reset
port(0) = *ar2
; write the data to i/o port 0
repeat(#50)
; hold reset low for at least 6 mclk cycles
nop
; ( 4 DSP clock cycles == 1 MCLK cycle )
;;
xf = 0
; reset ac01
intm = 1
; disable all int service routines
tcr = #10h
; stop timer
imr = #280h
; wakeup from idle when TDM Xmt int
tspc = #0008h
; stop TDM serial port
tdxr = #0h
; send 0 as first xmit word
tspc = #00c8h
; reset and start TDM serial port
;;
xf = 1
; release ac01 from reset
*ar2 = #0011b ; bring ad50 out of reset with 1 channel selected
port(0) = *ar2
;
––––––––––––––– Register init’s ––––––––––––––––––––––––––––––
.eval
REGISTER & 1h, SELECT
; if REG1 then include this source
.if SELECT = 1h
;
a = #REG1
; load Acc A with REG1 value
call REQ2
; Call REQ2 subroutine
.endif
.eval
REGISTER & 2h, SELECT
; if REG2 then include this source
.if SELECT = 2h
a = #REG2
call REQ2
.endif
.eval
REGISTER & 8h, SELECT
; if REG4 then include this source
.if SELECT = 8h
a = #REG4
call REQ2
.endif
; Note that AD50 register 3 must be programmed last!
.eval
REGISTER & 4h, SELECT
; if REG3 then include this source
.if SELECT = 4h
a = #REG3
call REQ2
.endif
; Code for registers not used by AD50 deleted
return
REQ2
ifr = #080h
; clear flag from IFR
tdxr = #03h
; request secondary when AC01 starts
call waitfortdx
; wait for primary to xmit
tdxr = a
; send register value to serial port
Содержание SLAU039
Страница 6: ...vi ...
Страница 16: ...1 6 ...
Страница 26: ...2 10 ...
Страница 34: ...3 8 ...
Страница 40: ...4 6 ...
Страница 47: ...Circuit Diagrams A 7 Installing the AD50 EVM A 4 Circuit Diagrams ...
Страница 48: ...A 8 ...
Страница 49: ...A 9 Installing the AD50 EVM ...
Страница 50: ...A 10 ...
Страница 51: ...PCB Diagrams A 11 Installing the AD50 EVM A 5 PCB Diagrams Top Side Silkscreen ...
Страница 52: ...A 12 1 Top Side Tracks Top Side Tracks ...
Страница 53: ...A 13 Installing the AD50 EVM Bottom Side Tracks ...
Страница 54: ...A 14 Ground plane ...
Страница 55: ...A 15 Installing the AD50 EVM Power plane ...
Страница 56: ...A 16 ...