; ( -- ) ; R( -- ) ; init rs485 pins early in startup VE_RS485_INIT: .dw $ff0a .db "rs485.init" .dw VE_HEAD .set VE_HEAD = VE_RS485_INIT XT_RS485_INIT: .dw PFA_RS485_INIT PFA_RS485_INIT: in_ temp0, (RS485_RW_PORT-1) ; set DDR bit (pin_output) ori temp0, exp2(RS485_RW_PIN) out_ (RS485_RW_PORT-1), temp0 ; in_ temp0, RS485_RW_PORT ; set PORT bit low (receive) andi temp0, low(~(exp2(RS485_RW_PIN))) out_ RS485_RW_PORT, temp0 ; rjmp DO_NEXT