full_duplex_serial.S File Reference

Macros
#define	buffersize   256
#define	buffermask   (buffersize - 1)
#define	Local   523052

Variables
section full_duplex_serial	cog
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ	Bufsiz
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ	Bufmsk
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov	T1Local
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong	T2Local
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov	Rxmask
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov	Txmask
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong	Rxtxmode
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong	Bitticks
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong	Rxbuff
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov	Txbuff
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or	OUTA
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or	DIRA
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov	Txcode
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret	Rxcode
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov	Rxbits
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov	Rxcnt
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr	Rxdata
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong	T3
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte	Txdata
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov	Txbits
section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov	Txcnt

Macro Definition Documentation

#define buffermask   (buffersize - 1)

#define buffersize   256

#define Local   523052

Variable Documentation

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong Bitticks

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ Bufmsk

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ Bufsiz

section full_duplex_serial cog

section mcp3208 ax global MCP3208_Entry compress off MCP3208_Entry start org mov PAR call mov T2 call mov T2 call mov T2 call mov T3 call if_c or T2 if_c movs T3 if_c movi shr call if_c or T2 if_c movs T3 if_c movi or Cmask or Smask Main_loop mov mov PAR mov Enables mov Cloop shr if_nc jmp test muxnc mov Command or Smask or Dmask mov Bloop test muxc Dmask cmp if_z andn DIRA

section mcp3208 ax global MCP3208_Entry compress off MCP3208_Entry start org mov PAR call mov T2 call mov T2 call mov T2 call mov T3 call if_c or T2 if_c movs T3 if_c movi shr call if_c or T2 if_c movs T3 if_c movi or Cmask or Smask Main_loop mov mov PAR mov Enables mov Cloop shr if_nc jmp test muxnc mov Command or Smask or Dmask mov Bloop test muxc Dmask cmp if_z andn Dmask andn Cmask mov PAR add rdlong T4 add rdlong T4 or Cmask test INA wc rcl andn OUTA

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz Rxbits

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong Rxbuff

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Rxcnt

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Rxcode

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte Rxdata

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test Rxmask

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov CNT Transmit bit test test Rxtxmode

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov CNT Transmit bit test test if_z_and_c xor shr if_z muxc Txmask if_nz muxnc Txmask add Bitticks Transmit wait jmpret Rxcode mov Txcnt sub CNT cmps T1Local

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T2Local

section mcp3208 ax global MCP3208_Entry compress off MCP3208_Entry start org mov PAR call mov T2 call mov T2 call mov T2 call mov T3 call if_c or T2 if_c movs T3 if_c movi shr call if_c or T2 if_c movs T3 if_c movi or Cmask or Smask Main_loop mov mov PAR mov Enables mov Cloop shr if_nc jmp test muxnc mov Command or Smask or Dmask mov Bloop test muxc Dmask cmp if_z andn Dmask andn Cmask mov PAR add rdlong T4 add rdlong T4 or Cmask test INA wc rcl andn Smask djnz and Mask12 wrword T1 Skip add add djnz wrlong T1 add jmp Param rdlong T1 add Param2 mov shl T3 test T3

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov CNT Transmit bit test test if_z_and_c xor shr if_z muxc Txmask if_nz muxnc Txmask add Bitticks Transmit wait jmpret Rxcode mov Txcnt sub CNT cmps if_nc jmp djnz Txbits

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add Txbuff

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov CNT Transmit bit test test if_z_and_c xor shr if_z muxc Txmask if_nz muxnc Txmask add Txcnt

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov CNT Transmit bit test test if_z_and_c xor shr if_z muxc Txmask if_nz muxnc Txmask add Bitticks Transmit wait jmpret Txcode

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl T2Local add rdlong T1Local add rdlong T1Local add rdlong T1Local mov Rxbuff add test test if_z_ne_c or Txmask if_z or Txmask mov Receive jmpret Txcode test test INA wc if_z_eq_c jmp mov mov Bitticks shr add CNT Receive bit add Bitticks Receive wait jmpret Txcode mov Rxcnt sub CNT cmps if_nc jmp test INA wc rcr djnz shr and test if_nz xor rdlong PAR add Rxbuff wrbyte T2Local sub Rxbuff add and wrlong PAR jmp Transmit jmpret Rxcode mov PAR add rdlong T1Local add rdlong T1Local cmp T3 wz if_z jmp add Txbuff rdbyte T3 sub Txbuff add and wrlong T1Local or shl or mov mov CNT Transmit bit test test if_z_and_c xor shr Txdata

section full_duplex_serial ax global FullDuplexSerial_Entry compress off equ buffersize equ buffermask FullDuplexSerial_Entry start org mov PAR add rdlong T1Local mov shl T2Local add rdlong T1Local mov shl Txmask