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