rpc2a-000-dil Radiometrix Ltd, rpc2a-000-dil Datasheet - Page 25

• Manufacturer Part Number: rpc2a-000-dil
• Description: Uhf Radio Packet Controller
• Manufacturer: Radiometrix Ltd

**********************************************************************
* SUBROUTINE: OUT_BYTE
**********************************************************************
*This subroutine will output of one byte to the RPC2A. Register X
*should contain the address of the memory location of the byte to be *send.
*Note: that register X has to be pre-loaded before entering this *
subroutine.
OUT_BYTE
WAIT_ACC
WAIT_REQ
WAIT_TXA1
WAIT_TXR1
**********************************************************************
* SUBROUTINE: LISTEN TO BUS
*********************************************************************
*
*This will turn the RPC2A host to listen mode again and should
*be called when the whole packet has been sent to the RPC2A
*
LISTEN_BUS
*********************************************************************
Radiometrix Ltd, RPC2A
LDAA
ANDA
LDAB
ANDB
STAB
LDAB
BITB
BNE
LDAB
STAB
ORAA
STAA
LDAB
ORAB
STAB
LDAB
BITB
BEQ
LDAA
LSRA
LSRA
LSRA
LSRA
LDAB
ANDB
STAB
LDAB
BITB
BNE
ORAA
STAA
LDAB
ORAB
STAB
LDAB
BITB
BEQ
RTS
LDAA
STAA
RTS
0,X
#%00001111
PORTC
#%11101111
PORTC
PORTC
#%00100000
WAIT_ACC
#%10011111
DDRC
#%10000000
PORTC
PORTC
#%00010000
PORTC
PORTC
#%00100000
WAIT_REQ
0,X
PORTC
#%11101111
PORTC
PORTC
#%00100000
WAIT_TXA1
#%10000000
PORTC
PORTC
#%00010000
PORTC
PORTC
#%00100000
WAIT_TXR1
#%10010000
DDRC
;GET THE BYTE TO SEND TO RPC2A
;PREPARE LEAST SIGNIFICANT NIBBLE
;FORCE TX-REQUEST LOW
;WAIT FOR TX ACCEPT TO GO LOW
;CHANGE DATA DDRC TO OUTPUT
;TURN BUS DRIVE ON
;MAKE SURE RXA IS HIGH
;OUTPUT DATA
;FORCE TX-REQUEST HIGH
;WAIT FOR TX_ACCEPT TO GO HIGH
;PREPARE MOST SIGNIFICANT NIBBLE
;BY SWAPPING THE LS- & MS-NIBBLE
;FORCE TX-REQUEST LOW
;WAIT FOR TX-ACCEPT TO GO LOW
;OUTPUT DATA
;FORCE TX-REQUEST HIGH
;WAIT FOR TX_ACCEPT TO GO HIGH
;PUT PORT BACK TO LISTEN
page 25