An RS-485 Networkloop:
gosub serial_communications' Add other tasks here.goto loopserial_communications:select case network_statecase "r"
gosub receive_serial_datacase "d"
gosub check_response_delaycase "t"
gosub transmit_serial_datacase elseend select
return