MOV AL, 37H OUT DX, AL MOV DI, 3000H CX,100 LI: MOV DX, 141H ANd AL, OlH MOV DX, 140H MOv AL, [DI] OUT DX, AL LOOP LI MOV AX, 4C00H INT 21H 接收程序: BEGIN MOV DX, 141H MOV AL, 7BH OUT DX, AL MOV AL, 14H OUT DX, AL MOV SI, 2000H L2: MOV DX, 141H AL, DX TEST AL, 38H JNZ ERI AND AL, 02H MOV DX, 140H MOV [SI, AL ERR: CALL ERR OUT(略) L3: MOV AX, 4C00H INTMOV AL，37H OUT DX，AL MOV DI，3000H MOV CX，100 L1：MOV DX，141H IN AL，DX AND AL，01H JZ L1 MOV DX，140H MOV AL，［DI］ OUT DX，AL INC DI LOOP L1 MOV AX，4C00H INT 21H 接收程序： BEGIN： MOV DX，141H MOV AL，7BH OUT DX，AL MOV AL，14H OUT DX，AL MOV SI，2000H MOV CX，100 L2：MOV DX，141H IN AL，DX TEST AL，38H JNZ ERR AND AL，02H MOV DX，140H IN AL，DX MOV ［SI］，AL INC SI LOOP L2 JMP L3 ERR：CALL ERR＿OUT（略） L3：MOV AX，4C00H INT 21H