OPLObjectFile** LOC::A:\OPL\BACKUP.OPL STACK% ATTR% VERSION$ LPCHAND% LPOHAND% SCRIPTF$ LISTF$ USELIST% HADLIST% PROTO% PROTO$ BAUD% DATABIT% STOPBIT% PARITY% IGNORE% XONXOFF% RTSCTS% DSRDTR% DRIVEA% DRIVEB% DRIVEM% MODIF% RESET% DEFAULTS GETOPT WSETUP PULL$ ATTGET% ADDLIST ATTSET% SWRITE LOC::B:\O LOC::A:\O LOC::M:\O )O2O2(| Scanning for files in: Can't open PATH$ gettingK Abort+ IgnoreW8 J)O \O @`[ J)O \O @\[ backup.scrW backup.scoW settingK Abort+ IgnoreW8 quitO Backup script created. SWRITE LISTF$ HADLIST% PROTO$ PROTO% transmit " ", "K PULL$ STACK% Too many paths to back up!W8 Not enough memory!W8 STACK% USELIST% PATH$' MBUTTON ABUTTON BBUTTON JBUTTON RBUTTON WBUTTON ABOUT PROTO% BAUD% DATABIT% STOPBIT% PARITY% IGNORE% XONXOFF% RTSCTS% DSRDTR% SCRIPTF$ LISTF$ DRIVEM% DRIVEA% DRIVEB% MODIF% RESET% USELIST% OPhOP OPhOP B A C K U P B A C K U P B A C K U P B A C K U P File+ Script file...Of+ List file...Ol Options+ Protocol...Op+ Serial port...Os+ Flow control...Oc Special+ GoOg+ Help...Oh+ About...Oa+ ExitOx Transfer Protocol +GXmodem,Xmodem CRC,Xmodem 1K,Ymodem,Ymodem 1K,Ymodem/G,Ymodem/G 1K,ASCII Serial Port + Baud rate+!19200,9600,4800,2400,1200,600,300 + Data bits+ + Stop bits+ Parity+ None,Even,Odd Ignore parity+ No,Yes Flow Control Xon/Xoff+ Off,On Rts/Cts+ Off,On Dsr/Dtr+ Off,On Off,On Script file + List file OM@`[ OA@`[ OB@`[ OO@`[ OR@`[ OW@`[ H@`[9 LIGHT DRIVEM% drive MO LIGHT DRIVEA% drive AO LIGHT DRIVEB% drive BO LIGHT MODIF% Only changedO LIGHT RESET% Reset changedO LIGHT USELIST% Write listO VERSION$ + Backup v ++`Backup' is for when you need to send files +-to a remote computer via the serial link. It +.lists files on a disk(s), and creates a script +)file which can be translated and executed ++by the `Comms' application, and presto! all +&all your files are sent automatically. v+ Backup v +(Select `only changed' to send only files +'which have recently changed, and `reset +*changed' if you want to use `only changed' ++next time. Select `write list' to create a list file for use by `Restore'. VERSION$ About Backup v +.Backup was written to save me time and fingers +-when backing up files to my non-PC-compatible +'machine. I hope you find it as useful! +5Contact: Andrew Giddings, 71 Tyrone Road, += Thorpe Bay, Essex SS1 3HD, England. 1994 UK Andrew Giddings SWRITE BAUD% DATABIT% STOPBIT% PARITY% IGNORE% XONXOFF% RTSCTS% DSRDTR% port "TTY:A"O setup (O baud=) X{U}O data=O stop= parity=noneO parity=evenO parity=oddO fail=parityO + fail=noneO XonXoff,K RtsCts,K Dsr,K Dcd,K handshake= HADLIST% PROTO$ XMCRC YMDMG ASCII PROTO% BAUD% XONXOFF% RTSCTS% DSRDTR% DATABIT% STOPBIT% PARITY% IGNORE% DRIVEM% DRIVEA% MODIF% RESET% SCRIPTF$ LISTF$ loc::a:\scr\backup.scr loc::a:\backup.lst MAIN8 SWRITE SADD) PULL$ ATTGET% ATTSET%7 ADDLIST GETOPT MBUTTONS ABUTTON BBUTTON JBUTTONG RBUTTON WBUTTON LIGHTN ABOUTI WSETUP DEFAULTS