home *** CD-ROM | disk | FTP | other *** search
/ In'side Shareware 1994/1995 January / ish194-95.iso / dfu / gocis / gocis.tpl < prev    next >
Text File  |  1993-11-19  |  20KB  |  615 lines

  1. ;***************************************************************
  2. ;* GoCIS Commands Commands                                    *
  3. ;***************************************************************
  4. ;
  5. ; REMOVE or SET ACTION flags for forum as tasks are completed
  6. ; REMOVEACTION &&FORUMNAME Join.Forum
  7. ; SETACTION    &&FORUMNAME Set.Defaults
  8. ;
  9. ; Valid action flags
  10. ; Join.Forum
  11. ; Set.Defaults
  12. ; Update.Sections
  13. ; Read.Announcements
  14. ; Scan.New.Messages
  15. ; Read.Messages
  16. ; Send.Replies
  17. ; Read.New.Messages
  18. ; Read.Waiting.Messages
  19. ; Scan.Libraries
  20. ; Download.Files
  21. ; Upload.FIles
  22. ;
  23. ;
  24. ;
  25. ;  GO           forum_name
  26. ;  RESET
  27. ;  KILLFILE     filename
  28. ;  KILLDIR      directory
  29. ;  MAKEDIR      directory
  30. ;  LIB          library_number
  31. ;
  32. ;  SCANMES
  33. ;  SCANTHR
  34. ;  SCANLIB
  35. ;  QSCNLIB
  36. ;
  37. ;  JOIN
  38. ;
  39. ;  DOWNLOAD     filename pathname
  40. ;
  41. ;  READSEC
  42. ;  READMES
  43. ;  READTHR
  44. ;  READANN
  45. ;  READMAIL
  46. ;
  47. ;  RECORD
  48. ;
  49. ;  DO           scriptfile
  50. ;
  51. ;  LOGOFF
  52. ;  OFF
  53. ;  QUIT
  54. ;
  55. ;  S
  56. ;  SE
  57. ;  SEND         text
  58. ;
  59. ;  U
  60. ;  W
  61. ;  WA
  62. ;  WAIT         text
  63. ;
  64. ;  P
  65. ;  PA
  66. ;  PAUSE        number_of_seconds
  67. ;
  68. ;  C
  69. ;  CA
  70. ;  CAPTURE      filename
  71. ;
  72. ;  PR
  73. ;  PRINT        ON, or OFF
  74. ;
  75. ;  LOG          text
  76. ;
  77. ;  EC
  78. ;  ECHO         text
  79. ;               ON, or OFF
  80. ;
  81. ;  EN
  82. ;  END
  83. ;
  84. ;  N
  85. ;  NA
  86. ;  NAME
  87. ;
  88. ;  US
  89. ;  USER
  90. ;  USERID
  91. ;  RET
  92. ;  RETURN
  93. ;
  94. ;  DEBUG        ON, or OFF
  95. ;***************************************************************
  96. ;* GoCIS Variables                                            *
  97. ;***************************************************************
  98. ;       GoCIS Variables are denoted by a single & characters &
  99. ;       these variables are replaced with string values at the
  100. ;       time GoCIS executes the script.
  101. ;
  102. ; "&USERID"             CompuServe      UserID
  103. ; "&NAME"                               UserName
  104. ; "&PASSWORD"                           User Password
  105. ; "&GATEWAY"            Current Gateway
  106. ; "&FORUM"              Current Forum
  107. ;
  108. ;***************************************************************
  109. ;* GoCIS Conditional Commands                                 *
  110. ;***************************************************************
  111. ;
  112. ;
  113. ;     '%', '?' or '@'   are prefix condition characters that can
  114. ;                       prefix any command in order to make the
  115. ;                       command conditional on the success of any
  116. ;                       prior command.
  117. ;
  118. ;       Each occurrence of these prefix conditions denotes a
  119. ;       level of nesting that should be considered prior to
  120. ;       executing the command. Up to 10 levels of nesting
  121. ;       (or 10 prefix conditions) can be checked.
  122. ;
  123. ;       Basically processing proceeds as follows:
  124. :
  125. ;       For each Prefix condition:
  126. ;
  127. ;       For I = 0 to the Number-of-Prefix-Conditions
  128. ;               If The_Condition_At(I) = FALSE Then Skip This Command
  129. ;       Next
  130. ;
  131. ;       All Conditions are true So Perform the command and save the return code...
  132. ;
  133. ;       ReturnCode = Command()
  134. ;
  135. ;       If the command worked then ReturnCode = TRUE Else ReturnCode  = FALSE
  136. ;
  137. ;       Now set the next higher condition to the value of the ReturnCode so that
  138. ;       Other commands can be based on the success of the command just executed
  139. ;
  140. ;       Set The_Condition_At(Number-Of-Prefix-Conditions + 1) = ReturnCode
  141. ;
  142. ;
  143. ;       The Prefix Conditions Denote the following conditions
  144. ;
  145. ;
  146. ;      %   Defines a TRUE  condition at this error level
  147. ;      @   Defines a FALSE condition at this error level
  148. ;      ?   Defines a Don't Care Condition at this  error level
  149. ;
  150. ;
  151. ;       The following is an example of some of the concepts presented:
  152. ;
  153. ;
  154. ;       GO FORUM
  155. ;       ; This command will always be executed since there are no
  156. ;       ; prefix conditions.  If GoCIS successfully enters the FORUM
  157. ;       ; then the condition at level 1 will be set to TRUE otherwise it
  158. ;       ; will be set to FALSE
  159. ;
  160. ;       %ECHO We entered the FORUM successfully
  161. ;       ; The ECHO command will execute only if the condition at level 1 is TRUE
  162. ;       ; The ECHO Command does not return a condition and therefore does not
  163. ;       ; affect the condition at level 2
  164. ;
  165. ;       %LIB 1
  166. ;       ; We will only go to library 1 if the condition at level 1 is TRUE
  167. ;       ; this of course depends on that success of the GO FORUM Command
  168. ;       ; If the command is executed it will set the condition at Level 2
  169. ;
  170. ;       %%SCANLIB KEY:PROGRAMS LIB:ALL
  171. ;       ; Scanning for programs will depend of the success of getting to the Library Prompt
  172. ;       ; Therefore this command depends of the success of both the GO FORUM and LIB 1
  173. ;       ; commands.  Here we test 2 levels of prefix conditions denoted by the fact that
  174. ;       ; there are 2 '%' characters prefixing the SCANLIB Command
  175. ;       ; If the command is executed it will set the condition at Level 3
  176. ;
  177. ;       %@ECHO Can't Enter library 1 of the FORUM
  178. ;       ; This command will only be executed if we successfully entered the forum
  179. ;       ; and were unable to enter the library.  Since the first prefix_condition is
  180. ;       ; an % the condition at level 1 must be true, this was set by the value returned
  181. ;       ; by the GO FORUM command. If GO FORUM was not successful the command would be skipped
  182. ;       ; The second prefix_condition @ indicates that the condition at level 2 must be FALSE
  183. ;       ; this condition was last established by the %LIB 1 command.
  184. ;       ; The ECHO Command does not return a condition and therefore does not
  185. ;       ; affect the condition at level 3
  186. ;
  187. ;       @ECHO Can't Enter the FORUM
  188. ;       ; This command will only be executed if the GO FORUM command was unsuccessful
  189. ;       ; the @ indicates that the condition at level 1 must be FALSE.  This of course
  190. ;       ; was last set by the GO FORUM command.
  191. ;
  192. ;
  193. ;***************************************************************
  194. ;* Template Variables                                          *
  195. ;***************************************************************
  196. ;
  197. ;       Template Variables are denoted by the characters &&
  198. ;       these variables are replaced with string values at the
  199. ;       time GoCIS generates the script.  Don't confuse template
  200. ;       variables with script variables.  Script variables are
  201. ;       evaluated when the script is executed by GoCIS
  202. ;
  203. ;
  204. ;
  205. ; "&&USERID"        CompuServe UserID
  206. ; "&&USERNAME"                 UserName
  207. ; "&&PHONENUMBER"              PhoneNumber
  208. ; "&&LOGONSCRIPT"              LogonScript
  209. ;
  210. ; "&&GATEWAY"         Forum    Gateway
  211. ; "&&FORUMNAME"                Name
  212. ; "&&FORUMTITLE",              Title
  213. ; "&&CONTROLPATH"     Path For Control Files
  214. ; "&&DOWNLOADPATH"             Downloads
  215. ; "&&MESSAGEPATH"              Messages
  216. ; "&&SCRIPTPATH"               Scripts
  217. ;
  218. ; "&&LIBRARY"         Library  Number
  219. ; "&&DOWNLOADFILE"    Download FileName
  220. ; "&&DOWNLOADSIZE"             Filesize
  221. ; "&&DOWNLOADDATE"             Filedate
  222. ; "&&DOWNLOADCOUNT"            #DownLoads
  223. ; "&&DOWNLOADUPLD"             Uploaded by this CIS User
  224. ; "&&DOWNLOADTITLE"            Title Description of File
  225. ;
  226. ; "&&SCANFILE"        LibraryScan FileName
  227. ; "&&SCANAGE"                     Days old or age
  228. ; "&&SCANLIBS"                    Libraries to scan through
  229. ; "&&SCANKEYWORDS"                Keywords to look for
  230. ; "&&SCANTYPE"                    Short or long descriptions
  231. ; "&&SCANDESC"                    Description of this scan
  232. ;
  233. ; "&&READMSGSECTION"  ReadMessage Section Number
  234. ; "&&READMSGNUMBNER"              Thread or Message Number
  235. ;
  236. ; "&&VERSION"         GoCIS Version Number
  237. ; "&&DATE"            Date script was created
  238. ; "&&TIME"            Time script was created
  239. ;
  240. ;
  241. ;
  242. ;
  243. [PROLOG]
  244. ;
  245. ; This script file was created on &&DATE at &&TIME by &&USERNAME.
  246. ;
  247. ;***********************************************************************
  248. ;       GoCIS &&VERSION
  249. ;       Copyright(C) 1992
  250. ;       Larry Lee (76670,1471)
  251. ;       16038 Augusta Drive
  252. ;       Chino Hills, Ca 91709
  253. ;***********************************************************************
  254. ;
  255. ;
  256. WAIT !
  257. SEND SET BRIEF YES^M
  258. WAIT !
  259. SEND SET PAGED NO^M
  260. WAIT !
  261. SEND SET BLANK YES^M
  262. WAIT !
  263. SEND SET WIDTH 80^M
  264. WAIT !
  265. ;
  266. [EPILOG]
  267. ;
  268. ;***********************************************************************
  269. ; All Done, Just Log off CompuServe
  270. ;***********************************************************************
  271. ;
  272. LOGOFF
  273.  
  274. [READ MAIL]
  275. ;
  276. ; Read Any Waiting CompuServe Mail
  277. ;
  278.  IF MAILWAITING
  279.   @REMOVEACTION MAIL Read.Waiting
  280.   %ECHO Reading CompuServe Mail
  281.   %READMAIL &&SYSMESSAGEPATHMAIL.MSG
  282.     %%ECHO CompuServe Mail Read Complete!
  283.     %%REMOVEACTION MAIL Read.Waiting
  284.     %@ECHO Unable to Read your CompuServe Mail!
  285.  
  286.  
  287. [SEND MAIL]
  288. ;
  289. ; Send Any Waiting CompuServe Mail
  290. ;
  291.   IF FILEEXISTS &&SYSMESSAGEPATHMAIL.SND
  292.   @REMOVEACTION MAIL Send.Replies
  293.   %ECHO Sending CompuServe Mail
  294.   %SENDMAIL  &&SYSMESSAGEPATHMAIL.SND
  295.     %@ECHO Unable to Send your CompuServe Mail!
  296.     %%ECHO CompuServe Mail Send Complete!
  297.     %%REMOVEACTION MAIL Send.Replies
  298.  
  299. [PROMPT MAIL OUTBOX]
  300. ;
  301. ; Ask what about Overwriting to the Mail OutBox
  302. ;
  303.      %%ASK OVERWRITE? &&SYSMESSAGEPATHMAIL.MOX  Do you want to save your outgoing Mail in &&SYSMESSAGEPATHMAIL.MOX
  304.      %%%ECHO Saving Your Out Going Mail to &&SYSMESSAGEPATHMAIL.MOX
  305.      %%%FILEMARK &&SYSMESSAGEPATHMAIL.MOX MAIL_SENT CIS:MAIL
  306.      %%%COPYFILE &&SYSMESSAGEPATHMAIL.SND &&SYSMESSAGEPATHMAIL.MOX
  307. ; At This point the Mail File Is No Longer Needed
  308.      %%KILLFILE &&SYSMESSAGEPATHMAIL.SND
  309.  
  310.  
  311. [APPEND MAIL OUTBOX]
  312. ;
  313. ; Append Queued Mail to the Mail OutBox
  314. ;
  315.    %%ECHO Appending your outgoing Mail to &&SYSMESSAGEPATHMAIL.MOX
  316.    %%FILEMARK &&SYSMESSAGEPATHMAIL.MOX MAIL_SENT &&FORUMNAME
  317.    %%COPYFILE &&SYSMESSAGEPATHMAIL.SND &&SYSMESSAGEPATHMAIL.MOX
  318. ; At This point the Mail File Is No Longer Needed
  319.    %%%KILLFILE &&SYSMESSAGEPATHMAIL.SND
  320.  
  321. [OVERWRITE MAIL OUTBOX]
  322. ;
  323. ; Overwrite Queued Mail to the &&FORUMNAME OutBox
  324. ;
  325.    %%ECHO Saving your outgoing Mail in &&SYSPATH&&FORUMNAME.MOX
  326.    %%KILLFILE &&SYSMESSAGEPATHMAIL.MOX
  327.    %%FILEMARK &&SYSMESSAGEPATHMAIL.MOX MAIL_SENT &&FORUMNAME
  328.    %%COPYFILE &&SYSMESSAGEPATHMAIL.SND &&SYSMESSAGEPATHMAIL.MOX
  329. ; At This point the Message File Is No Longer Needed
  330.    %%%KILLFILE &&SYSMESSAGEPATHMAIL.SND
  331.  
  332. [DELETE MAIL OUTBOX]
  333. ;
  334. ; Never Save Queued Mail to the Mail OutBox
  335. ;
  336.    %%ECHO Deleting outgoing Mail: &&SYSMESSAGEPATHMAIL.SND
  337. ; At This point the Mail File Is No Longer Needed
  338.    %%KILLFILE &&SYSMESSAGEPATHMAIL.SND
  339.  
  340. [GO FORUM]
  341. ;
  342. ;***********************************************************************
  343. ; Lets enter the &&FORUMNAME forum, &&FORUMTITLE
  344. ;***********************************************************************
  345. ECHO Going to &&FORUMNAME, &&FORUMTITLE
  346. GO &&GATEWAY:&&FORUMNAME
  347. ;
  348. ; Join Forum If Required!
  349. ;
  350.   %IF NOT JOINED
  351.     %@REMOVEACTION &&FORUMNAME Join.Forum       
  352.     %%ECHO Attempting to Join &&FORUMNAME, &&FORUMTITLE
  353.     %%JOIN
  354.     %%%ECHO Successfully Joined &&FORUMNAME, &&FORUMTITLE
  355.     %%%REMOVEACTION &&FORUMNAME Join.Forum  
  356.     %%WAIT !
  357.     %%@ECHO Sorry, unable to Join &&FORUMNAME, &&FORUMTITLE
  358.     %%@SETERRORLEVEL 0 FALSE
  359. ;
  360. ; Set Session Defaults to Command Mode for Forum Processing
  361. ;
  362.   %ECHO Setting Temporary Session Defaults in &&FORUMNAME, &&FORUMTITLE
  363.   %SEND OPT;INI;1;MOD;3;EDI EDIT;PAU N;REP LIST;TYPE N;SKIP N;CHAR;SEC ALL;M;M;S^M
  364.   %WAIT New prompt:
  365.   %%SEND ^^G^M
  366.   %WAIT FORUM !
  367.     %@SETERRORLEVEL 0 FALSE
  368. ;
  369.   @ECHO Sorry, unable to enter the &&FORUMNAME Forum!
  370.   %ECHO Now in &&FORUMNAME, &&FORUMTITLE
  371. ;
  372. ; Check for Waiting Messages in the &&FORUMNAME Forum
  373. ;
  374.   %IF MESSAGESWAITING
  375.     %@ECHO No Messages Waiting to be Read On &&FORUMNAME, &&FORUMTITLE
  376.     %@REMOVEACTION &&FORUMNAME Read.Waiting.Messages
  377.     %%ECHO Reading Waiting Messages of &&FORUMNAME, &&FORUMTITLE
  378.     %%SCAN &&MESSAGEPATH&&FORUMNAME.MSG READ WAIT
  379.     %%REMOVEACTION &&FORUMNAME Read.Waiting.Messages
  380. ;
  381.  
  382. [GO LIB]
  383. ;
  384. ; Lets enter Library #&&LIBRARY of &&FORUMNAME
  385.   %LIB &&LIBRARY
  386. ;
  387. ; If something goes wrong... Inform the user and bypass this Library!
  388. ;   Otherwise all is well... Continue processing (downloads, catalogs, etc)
  389. ;
  390.     %@ECHO Sorry, unable to enter Library #&&LIBRARY of &&FORUMNAME, &&FORUMTITLE
  391.     %%ECHO Now In &&FORUMNAME, &&FORUMTITLE Libraries
  392. ;
  393.  
  394. [JOIN FORUM]
  395. ;
  396. ; Commented Out Since It's Done at GO FORUM Automatically
  397. ; Join The Forum
  398. ;
  399. ;  %IF NOT JOINED
  400. ;    %@REMOVEACTION &&FORUMNAME Join.Forum
  401. ;    %%ECHO Attempting to Join &&FORUMNAME, &&FORUMTITLE
  402. ;    %%JOIN
  403. ;       %%%ECHO Successfully Joined &&FORUMNAME, &&FORUMTITLE
  404. ;       %%%REMOVEACTION &&FORUMNAME Join.Forum
  405. ;       %%@ECHO Sorry, unable to Join &&FORUMNAME Forum!
  406.  
  407. [SET FORUM DEFAULTS]
  408. ;
  409. ; Set Permanent Session Defaults to Command Mode for Forum Processing
  410. ;
  411.   %ECHO Setting Permanent Session Defaults in &&FORUMNAME, &&FORUMTITLE
  412.   %SEND OPT;INI;1;MOD;3;EDI EDIT;PAU N;REP LIST;TYPE N;SKIP N;P^M
  413.   %WAIT FORUM !
  414.   %REMOVEACTION &&FORUMNAME Set.Defaults
  415.  
  416.  
  417. [UPDATE FORUM SECTIONS]
  418. ;
  419. ; Read the Section Descriptions
  420. ;
  421.   %ECHO Updating &&FORUMNAME, &&FORUMTITLE Message And Library Descriptions
  422.   %KILLFILE &&CONTROLPATH&&FORUMNAME.SEC
  423.   %READ &&CONTROLPATH&&FORUMNAME.SEC NAM;1;2;M
  424.   %REMOVEACTION &&FORUMNAME Update.Sections
  425.  
  426. [READ FORUM ANNOUNCEMENTS]
  427. ;
  428. ; Read the &&FORUMNAME Forum Announcements
  429. ;
  430.   %ECHO Reading &&FORUMNAME, &&FORUMTITLE Announcements
  431.   %READANN &&MESSAGEPATH&&FORUMNAME.MSG
  432.   %REMOVEACTION &&FORUMNAME Read.Announcements
  433.  
  434. [GO MESSAGES]
  435. ;
  436. ; Enter Message Area of the &&FORUMNAME Forum
  437. ;
  438.   %MESSAGES
  439. ;
  440. ; If something goes wrong... Inform the user and bypass the Message Area!
  441. ;   Otherwise all is well... Continue processing (READS, SCANS, ...)
  442. ;
  443.    %@ECHO Sorry, unable to enter Message Area of &&FORUMNAME, &&FORUMTITLE
  444.    %%ECHO Now In &&FORUMNAME, &&FORUMTITLE Message Area
  445. ;
  446.  
  447. [READ FORUM MESSAGES]
  448.     %%READ &&MESSAGEPATH&&FORUMNAME.MSG READ THR NUM:&&READMSGNUMBER
  449.  
  450. [RESET READ FORUM MESSAGES]
  451. ;
  452. ;  At this point no messages need to be read so Kill Then Read Msg Index
  453.     %%REMOVEACTION &&FORUMNAME Read.Messages
  454.     %%KILLFILE &&CONTROLPATH&&FORUMNAME.MXS
  455.  
  456. [READ WAITING FORUM MESSAGES]
  457. ;
  458. ; Commented Out Since It's Done at GO FORUM Automatically
  459. ; Check for Waiting Messages in the &&FORUMNAME Forum
  460. ;
  461. ;  %%IF MESSAGESWAITING
  462. ;    %%@REMOVEACTION &&FORUMNAME Read.Waiting.Messages
  463. ;    %%@ECHO No Messages Waiting to be Read On &&FORUMNAME, &&FORUMTITLE
  464. ;    %%%ECHO Reading Waiting Messages of &&FORUMNAME, &&FORUMTITLE
  465. ;    %%%SCAN &&MESSAGEPATH&&FORUMNAME.MSG READ WAIT
  466. ;    %%%REMOVEACTION &&FORUMNAME Read.Waiting.Messages
  467.  
  468. [READ NEW FORUM MESSAGES]
  469. ;
  470. ; Read New Messages in the &&FORUMNAME Forum
  471. ;
  472.     %%ECHO Reading New Messages of &&FORUMNAME, &&FORUMTITLE in Sections &&MSGSECTIONS
  473.     %%SCAN &&MESSAGEPATH&&FORUMNAME.MSG READ NEW &&MSGSECTIONS
  474.     %%REMOVEACTION &&FORUMNAME Read.New.Messages
  475.  
  476. [QUICKSCAN FORUM MESSAGE HEADERS]
  477. ;
  478. ; Scan For New Messages Threads in the &&FORUMNAME Forum and Overwrite existing File
  479. ;
  480.     %%ECHO Scanning For New Threads of &&FORUMNAME, &&FORUMTITLE in Sections &&MSGSECTIONS
  481.     %%KILLFILE &&CONTROLPATH&&FORUMNAME.MQS
  482.     %%SCAN &&CONTROLPATH&&FORUMNAME.MQS SCAN QUICK NEW &&MSGSECTIONS;T
  483.     %%REMOVEACTION &&FORUMNAME Scan.New.Messages
  484.  
  485. [SEND FORUM MESSAGE]
  486. ;
  487. ; Sending Queued Messages and Replies to the &&FORUMNAME Forum
  488. ;
  489.     %%ECHO Sending Queued Messages and Replies to &&FORUMNAME, &&FORUMTITLE
  490.     %%SENDMSGS &&MESSAGEPATH&&FORUMNAME.SND
  491.  
  492. [PROMPT MESSAGE OUTBOX]
  493. ;
  494. ; Ask what to do about copying the OutGoing Messages
  495. ;
  496.    %%%ASK OVERWRITE? &&CONTROLPATH&&FORUMNAME.MOX  Do you want to save your outgoing &&FORUMNAME Messages in &&MESSAGEPATH&&FORUMNAME.MOX?
  497.    %%%%ECHO Saving your outgoing Messages to &&MESSAGEPATH&&FORUMNAME.MOX
  498.    %%%%FILEMARK  &&MESSAGEPATH&&FORUMNAME.MOX MESSAGES_SENT &&FORUMNAME
  499.    %%%%COPYFILE  &&MESSAGEPATH&&FORUMNAME.SND &&MESSAGEPATH&&FORUMNAME.MOX
  500. ; At This point the Message File Is No Longer Needed
  501.    %%%REMOVEACTION &&FORUMNAME Send.Replies
  502.    %%%KILLFILE &&MESSAGEPATH&&FORUMNAME.SND
  503.  
  504.  
  505. [APPEND MESSAGE OUTBOX]
  506. ;
  507. ; Append Queued Messages and Replies to the &&FORUMNAME Forum OutBox
  508. ;
  509.    %%%ECHO Appending your outgoing &&FORUMNAME Messages to &&MESSAGEPATH&&FORUMNAME.MOX
  510.    %%%FILEMARK &&MESSAGEPATH&&FORUMNAME.MOX MESSAGES_SENT &&FORUMNAME
  511.    %%%COPYFILE &&MESSAGEPATH&&FORUMNAME.SND &&MESSAGEPATH&&FORUMNAME.MOX
  512. ; At This point the Message File Is No Longer Needed
  513.    %%%%REMOVEACTION &&FORUMNAME Send.Replies
  514.    %%%%KILLFILE &&MESSAGEPATH&&FORUMNAME.SND
  515. ;
  516. [OVERWRITE MESSAGE OUTBOX]
  517. ;
  518. ; Overwrite Queued Messages and Replies to the &&FORUMNAME Forum OutBox
  519. ;
  520.    %%%ECHO Saving your outgoing &&FORUMNAME Messages in &&MESSAGEPATH&&FORUMNAME.MOX
  521.    %%%%KILLFILE &&MESSAGEPATH&&FORUMNAME.MOX
  522.    %%%FILEMARK  &&MESSAGEPATH&&FORUMNAME.MOX MESSAGES_SENT &&FORUMNAME
  523.    %%%COPYFILE  &&MESSAGEPATH&&FORUMNAME.SND &&MESSAGEPATH&&FORUMNAME.MOX
  524. ; At This point the Message File Is No Longer Needed
  525.    %%%%REMOVEACTION &&FORUMNAME Send.Replies
  526.    %%%%KILLFILE &&MESSAGEPATH&&FORUMNAME.SND
  527.  
  528. [DELETE MESSAGE OUTBOX]
  529. ;
  530. ; Never Save Queued Messages to the &&FORUMNAME Forum OutBox
  531. ;
  532.    %%%ECHO Deleting outgoing Messages: &&MESSAGEPATH&&FORUMNAME.SND
  533. ; At This point the Mail File Is No Longer Needed
  534.    %%%REMOVEACTION &&FORUMNAME Send.Replies
  535.    %%%KILLFILE &&MESSAGEPATH&&FORUMNAME.SND
  536.  
  537. [SET HIGH MESSAGE COUNTER]
  538. ;
  539. ; Set The High Message Counter to High Values
  540. ;
  541.     %%SEND HIGH;L^M
  542.     %%WAIT !
  543.  
  544. [OVERWRITE MESSAGES]
  545. ;
  546. ; Create New or Erase Existing &&FORUMNAME.MSG File if found to exist.
  547. ;
  548.     %%KILLFILE &&MESSAGEPATH&&FORUMNAME.MSG
  549.  
  550. [PROMPT CATALOG]
  551. ;
  552. ; Ask what to do if a Library Catalog exists for this Forum on Disk
  553. ;
  554.    %%IF FILEEXISTS &&CONTROLPATH&&FORUMNAME.LBR
  555.    %%%ASK OVERWRITE? &&CONTROLPATH&&FORUMNAME.LBR  Do you want to Overwrite or Append to the &&FORUMNAME Catalog File?^M^J&&CONTROLPATH&&FORUMNAME.LBR
  556.    %%%@SETERRORLEVEL 3 FALSE
  557.    %%@SETERRORLEVEL 3 TRUE
  558.  
  559. [APPEND CATALOG]
  560. ;
  561. ; Append to Existing Library Catalog
  562. ;
  563.    %%SETERRORLEVEL 3 TRUE
  564.  
  565. [OVERWRITE CATALOG]
  566. ;
  567. ; Overwrite the existing Catalog
  568. ;
  569.    %%KILLFILE &&CONTROLPATH&&FORUMNAME.LBR
  570.    %%SETERRORLEVEL 3 TRUE
  571.  
  572. [SHORT CATALOG SCAN]
  573. ;
  574. ; Requesting Download Information on &&SCANDESC
  575. ;
  576.     %%%ECHO Scanning Libraries of &&FORUMNAME, &&FORUMTITLE
  577.     %%%SCAN &&CONTROLPATH&&FORUMNAME.LBR LIST &&SCANFILE &&SCANLIBS &&SCANAGE &&SCANKEYWORDS
  578. ;
  579.  
  580. [FULL CATALOG SCAN]
  581. ;
  582. ; Requesting Download Information on &&SCANDESC
  583. ;
  584.     %%%ECHO Scanning Libraries of &&FORUMNAME, &&FORUMTITLE
  585.     %%%SCAN &&CONTROLPATH&&FORUMNAME.LBR SCAN &&SCANFILE DES &&SCANLIBS &&SCANAGE &&SCANKEYWORDS
  586. ;
  587.  
  588. [RESET SCAN CATALOG]
  589. ;
  590. ;  At this Point Library Scans are Complete so Kill Then Search Pattern Index
  591. ;
  592.     %%%REMOVEACTION &&FORUMNAME Scan.Libraries
  593.     %%%KILLFILE &&CONTROLPATH&&FORUMNAME.LXC
  594.  
  595. [DOWNLOAD FILES]
  596.     %%DOWNLOAD &&DOWNLOADFILE &&DOWNLOADPATH &&DOWNLOADUPLD
  597. ;          Title: &&DOWNLOADTITLE
  598. ;          Library# &&LIBRARY, &&DOWNLOADSIZE Bytes, As of &&DOWNLOADDATE
  599. ;
  600.  
  601. [RESET DOWNLOAD FILES]
  602. ;
  603. ;  At this Point Downloads are Complete so Kill Then Download Tag List
  604. ;
  605.     %%REMOVEACTION &&FORUMNAME Download.Files   
  606.     %%KILLFILE &&CONTROLPATH&&FORUMNAME.LXR
  607.  
  608. [UPLOAD FILES]
  609. ;
  610. ; Sending Files
  611. ;                           <To be defined>
  612.     %REMOVEACTION &&FORUMNAME Upload.Files      
  613. ;
  614.