home *** CD-ROM | disk | FTP | other *** search
- \\
- \\ PCBoards script by Lee Breeden
- \\
-
- \\ This script automates logons to PC-BOARD type Bulletin Boards.
- \\ You must set the following macros with BOYAN's configuration module:
- \\ \! = Macro # 111 = Your first name
- \\ \@ = Macro # 112 = Your last name
- \\ You must set a back quote character one space after your first
- \\ name. ie: Lee `
- \\ Script by: Lee Breeden
-
- \DM[CONNECTED TO PC-BOARD!]
- |LOGON
- \SVN[]\SVF[]\SVG[]\SVM[]\SVQ[]\SVS[]\SVU[]
- \SVY[%SC]\SVI[%SN]
- \gb[menu]
-
-
- |menu
- \BL[NAME]
- \BL[QUEST]
- \BL[FILES]
- \EB
-
- |name
- \IE+%VN,X[\eb]
- \wp[]\dm21[Starting to log name onto %SN]
- \\CA-[\gs[script;calback]\eb] \\ Checks carrier
- \if+Press Escape twice[^[~^[{\gb[name]] \\ looks for prompt
- \if+raphics[n q NS{\gb[name]] \\ looks for prompt
- \if+irst[\! \@{\gb[name]] \\ looks for prompt
- \if+logon[\! \@{\gb[name]] \\ looks for prompt
- \if+ast[\@{\gb[name]] \\ looks for prompt
- \if+required[{\gb[name]] \\ looks for prompt
- \if+Is this correct[{\gb[name]] \\ looks for prompt
- \if+(C) to continue logon as a new user?[\gs[newreg]]
- \if+Re-enter your name[r{\gb[name]] \\ error messages
- \if+assword[%PW{\svn[x]\eb] \\ looks for prompt
- {\pa[1]\gb[name]
-
- |QUEST
- \IE+%VQ,X[\eb]
- \\WP[1]\\CA-[\AB]
- \DM[Script running - connected to %SN]
- \IF+(NS)[n{\GB[quest]]
- \IF+ontinue[{\GB[quest]]
- \IF+add a Oneliner?[N{\GB[quest]]
- \IF+mail[{\GB[quest]]
- \IF+(NS)non-stop?[n{\GB[quest]]
- \IF+Command?[{\SVQ[X]\EB]
- \IF+(Enter)[N{\GB[quest]]
- \IF+ (Enter)=none?[{\GB[quest]]
- \IF+ore[n{\GB[quest]]
- \IF+respond[{\GB[quest]]
- \if+Main[{\SVQ[X]\eb]
- \if+assword[%PW{]
- \WP[]^K{\GB[quest]
- \IF+ommand[{\SVQ[X]\EB]
- \EB
-
- |FILES
- \\IE+%VF,X[\eb] \RC \lvi[8]
- \II+ ,%VI[\LVi[%IM]]
- \lvi[8]\svi[%Vi.dow]
- \FE+%S:%VI[\sc[script;dowlst]]
- \dm[Scaning for new files]
- \to[20]\WP[1]\CA-[\EB]
- \wf[ommand]N S ` \II+Broadcaster,%SN[55 | A]` NS{~\LD+[%B:files.new]
- \SVF[X]\EB
- \IF+ore[{]
- \SVQ[X]\EB
-
- |logoff
- \dm[Getting ready to logoff]{
- \CA-[\AB]
- \ko[0]
- \wf[]g{
- \pa[4]
- \EB
-
-