*RS-485_SEND_READ _VAR data_len cmnd_txt$=mrc_src$+hensu_shu$+str_adr$+bit_ichi$+yoso_su$+setteichi$ COMPOWAY node_no sub_adr sid cmnd_txt$ snd$ PRINT# 5 COMPOWAY snd$ INPUT# 5 COMPOWAY rcv$ IF rse_!=0 THEN /* WHEN rse_ is 4 , BCC error happend , OTHER cases indicates RS-232c errors PRINT "communication error" END_IF COMPOWAY rcv$ node_no sub_adr end_code res$ ptr_=res$+4 res_code=HEX(PTR$(4)) ptr_=res$+8 res_data$=PTR$(data_len) RETURN |