home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-387-Vol-3of3.iso
/
b
/
bgft302b.zip
/
BGFT300B.EXE
/
BGFTUXQM.SCR
< prev
next >
Wrap
Text File
|
1993-03-03
|
2KB
|
30 lines
; Version 3.02 BackGround File Transfer
; BGFTUXQM.SCR: Qmodem 4.52 script for BGFT Xmodem-CRC Upload.
; Copyright (c) 1991-1993 Dirac Systems
; Qmodem is a trademark of Mustang Software Inc.
;
CLRSCR
DISPLAYLN " "
DISPLAYLN "Copyright (c) 1991-1993 Dirac Systems \ /"
DISPLAYLN "------------------------------------- - o -"
DISPLAYLN " / \"
DISPLAYLN "BGFT Xmodem-CRC Upload External Protocol"
DISPLAYLN " "
ASSIGN 0 1 ; USER DEFINED COMM PORT.
ASSIGN 1 1200 ; USER DEFINED BAUD RATE (Qmodem $SPEED?).
ASSIGN 2 "BGFTOPT /Q" ; Quiet mode (don't print out results).
ASSIGN 3 " /A" ; Acknowledge error, if any.
ASSIGN 4 " /R" ; Reconnect COMM port.
ASSIGN 5 "$2$3$4$0" ; Concatenate the commands.
ASSIGN 6 " /B" ; Set baud rate.
DISPLAY "INPUT XMODEM-CRC UPLOAD FILE NAME: " ; Get filename for Xmodem.
GET 0 12 ; USER INPUT XMODEM FILENAME.
ASSIGN 7 " /U$0" ; Upload file entry.
ASSIGN 8 " /~" ; Set protocol.
ASSIGN 9 "1" ; USER DEFINED PROTOCOL (Xmodem-CRC Upload).
ASSIGN 2 " /S" ; Start file(s) transfer.
ASSIGN 3 "$5$6$1$7$8$9$2" ; DOS command.
DISPLAYLN "$3" ; Show the command.
DOS "$3" ; Run BGFTOPT.EXE with appropriate command.
SYSTEM X ; Exit QMODEM without hanging up.