Listing of file='TXSER.MAC;03' on disk='vmedia/asm_utility_4-sideB-sector.ccvf'
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; TXSER - TRANSMIT TO THE SERIAL PORT ; ; VALUES ON ENTRY: ; E - CHARACTER TO SEND ; ; RETURNS: ; NOTHING ; ; DESTROYS: ; A REG ONLY ; ENTRY TXSER TXSER: IN 03H ;EXACT COPY OF ROM ROUTINE ;SHOWS CLEAR-TO-SEND HANDSHAKE ANI 10H ;TX BUFFER EMPTY? JZ TXSER ; NO IN 01H ;CLEAR TO SEND OK? ANI 80H JZ TXSER ; NO MOV A,E ;SEND IT OUT 06H RET END