TS940.10

MSG#101 04/03/90  15:05:16 FROM WB0SEN TO ALL
XT.MOD
Subject: TS 940 married to IBM XT/AT
Here below is a program that can coontrl the
TS940 to run under IBM XT.
; **********************************************************
; TS-940 remote control programm for IBM-PC/AT/XT
; 1988/05Southern NET
;   MBBIOS and MBMODE must be run before execute.
;   Com port 1-6(A-F) allowed.
;       Usage....... 940set_(port)_(parameter)(parameter)...
;       example         940set a FA00014073000;MD1;
; ***********************************************************
NUL= 00h
TAB= 09h
CR= 0dh
LF= 0ah
BEEP= 07h
error= 1
noerror= 0
printmacro string
movax,data
movds,ax
leadx,string
movah,09h
int21h
endm
putchmacroch
movdl,ch
movah,02h
int21h
endm
mggroupcode,data
datasegment
no_cndbBEEP,"Not channel [A-F]$",CR,LF
cmd_e_msgdbBEEP,"ommamd error .Usage (channel) (parameter)",CR,LF,"$"
no_biosdbBEEP,"Not loadedMBBIOS.$"
dataends
codsegment
assumecs:code;ds:code
org81h
channellabelbyte
org82h
cmdlinelabelbyte
CONTINUED IN FILE TS940.13