KUBES modules 75: ; Receive single character 76: ; ======================== 77: REC L REC_RUN FBM01.06 ; (255 =receive char., 0=ackn.) 78: CMP 255 79: JP END_REC 80: L REC_CHR FBM01.05 ; (received character) 81: C8T1 A00.00 ; show REC_CHR at outputs 82: CLR REC_RUN FBM01.06 ; (255 =char. received, 0=ackn.) 83: END_REC NOP 84: 85: 86: ; End of communication program 87: ; ============================ 88: END_COM NOP 82