home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / BBS / BDAYMAX1.ZIP / SETUP.MEC < prev    next >
INI File  |  1995-06-25  |  12KB  |  371 lines
  1. [moreoff][cls]
  2. [white on red]  [nocolour]-[endcolour] BDAY_MAX 1.01 [nocolour]-[endcolour]  [white][colour]  [endcolour][grey](c) 1994 by John Medland 1:250/840
  3.  
  4. [ifexist]bday\failage.bbs [goto ach]
  5.  [white]A[grey])[cyan]ge checking       [lightgrey]OFF
  6. [goto noach][/ach] [white]A[grey])[cyan]ge checking       [yellow]ON
  7. [/noach][ifexist]bday\failchek.bbs [goto sch]
  8.  [white]S[grey])[cyan]ecurity checking  [lightgrey]OFF
  9. [goto nosch][/sch] [white]S[grey])[cyan]ecurity checking  [yellow]ON
  10. [/nosch][ifexist]bday\failchek.bbs [goto notdef]
  11. [ifexist]bday\failage.bbs [goto notdef]
  12.  [white]B[grey])[cyan]irth date (once)  [yellow]ON
  13. [goto ydef][/notdef] [white]B[grey])[cyan]irth date (once)  [lightgrey]OFF
  14. [/ydef] [white]T[grey])[cyan]oday's birthdays
  15.  [white]R[grey])[cyan]un in Test Mode
  16.  [white]C[grey])[cyan]onfigure editor
  17.  [white]E[grey])[cyan]dit DAT file
  18.  [white]U[grey])[cyan]ser editor
  19.  [white]?[grey])[cyan]help
  20.  [white]Q[grey])[cyan]uit
  21.  
  22. [white]Select: [yellow][menu]casbquert|?
  23. [choice]?[goto help]
  24. [choice]t[down][dos]COMMAND.COM /E:512 /Cbday\findbday.bat nocredit
  25. [choice]t[ifexist]bday\noshow [yellow][link]bday\noshow
  26. [choice]t[ifexist]bday\noshow [down white enter][delete]bday\noshow
  27. [choice]t[link]bday\greeting
  28. [choice]t[ifexist]bday\today.bbs [top]
  29. [choice]t[down down down][white]Done![pause top]
  30. [choice]q[quit]
  31. [choice]u[menu_cmd User_Editor][top]
  32. [choice]c[goto noed]
  33. [choice]s[goto security]
  34. [choice]b[delete]bday\failchek.bbs
  35. [choice]b[delete]bday\failage.bbs
  36. [choice]b
  37. [choice]b[white]Done![pause][top]
  38. [choice]a[goto age18]
  39. [choice]r[goto test]
  40. [isremote][choice]e[down][yellow]Sorry, editor can't be run from remote.[pause][pause][top]
  41. [choice]e[ifexist]bday\editor.bbs [goto goed]
  42. [choice]e[goto noed]
  43. [top]
  44. [/test]
  45. [delete]bday\saveinfo.bbs
  46. [open]bday\saveinfo.bbs
  47. [eq s][write][setpriv S]
  48. [eq a][write][setpriv A]
  49. [eq c][write][setpriv C]
  50. [eq e][write][setpriv E]
  51. [eq f][write][setpriv F]
  52. [eq p][write][setpriv P]
  53. [eq w][write][setpriv W]
  54. [eq n][write][setpriv N]
  55. [eq l][write][setpriv L]
  56. [eq d][write][setpriv D]
  57. [eq t][write][setpriv T]
  58. [open]nul:
  59. [eq s][key_poke]SysOp
  60. [eq a][key_poke]AsstSysop
  61. [eq c][key_poke]Clerk
  62. [eq e][key_poke]Extra
  63. [eq f][key_poke]Favoured
  64. [eq p][key_poke]Privil
  65. [eq w][key_poke]Worthy
  66. [eq n][key_poke]Normal
  67. [eq l][key_poke]Limited
  68. [eq d][key_poke]Disgrace
  69. [eq t][key_poke]Twit
  70. [readln]
  71. [open]bday\results.tst
  72. [write][white]
  73. [write][white on red] BEFORE TEST [white]
  74. [write][white]
  75. [write]PRIV: %J
  76. [clear_stacked]
  77. [ifkey]1 [key_poke]1
  78. [ifkey]2 [key_poke]2
  79. [ifkey]3 [key_poke]3
  80. [ifkey]4 [key_poke]4
  81. [ifkey]5 [key_poke]5
  82. [ifkey]6 [key_poke]6
  83. [ifkey]7 [key_poke]7
  84. [ifkey]8 [key_poke]8
  85. [ifkey]a [key_poke]a
  86. [ifkey]b [key_poke]b
  87. [ifkey]c [key_poke]c
  88. [ifkey]d [key_poke]d
  89. [ifkey]e [key_poke]e
  90. [ifkey]f [key_poke]f
  91. [ifkey]g [key_poke]g
  92. [ifkey]h [key_poke]h
  93. [ifkey]i [key_poke]i
  94. [ifkey]j [key_poke]j
  95. [ifkey]k [key_poke]k
  96. [ifkey]l [key_poke]l
  97. [ifkey]m [key_poke]m
  98. [ifkey]n [key_poke]n
  99. [ifkey]o [key_poke]o
  100. [ifkey]p [key_poke]p
  101. [ifkey]q [key_poke]q
  102. [ifkey]r [key_poke]r
  103. [ifkey]s [key_poke]s
  104. [ifkey]t [key_poke]t
  105. [ifkey]u [key_poke]u
  106. [ifkey]v [key_poke]v
  107. [ifkey]w [key_poke]w
  108. [ifkey]x [key_poke]x
  109. [nostacked][write]KEYS:
  110. [nostacked][goto notkeys]
  111. [readln]KEYS
  112. [write]
  113. [write][white on red] AFTER TEST [yellow]
  114. [open]nul:
  115. [open]bday\saveinfo.bbs
  116. [write][keyoff]12345678abcdefghijklmnopqrstuvwx
  117. [write][keyon]%J
  118. [/notkeys][open]nul:
  119. [link]bday\birthday
  120. [open]bday\results.tst
  121. [eq s][key_poke]SysOp
  122. [eq a][key_poke]AsstSysop
  123. [eq c][key_poke]Clerk
  124. [eq e][key_poke]Extra
  125. [eq f][key_poke]Favoured
  126. [eq p][key_poke]Privil
  127. [eq w][key_poke]Worthy
  128. [eq n][key_poke]Normal
  129. [eq l][key_poke]Limited
  130. [eq d][key_poke]Disgrace
  131. [eq t][key_poke]Twit
  132. [readln]PRIV
  133. [clear_stacked]
  134. [ifkey]1 [key_poke]1
  135. [ifkey]2 [key_poke]2
  136. [ifkey]3 [key_poke]3
  137. [ifkey]4 [key_poke]4
  138. [ifkey]5 [key_poke]5
  139. [ifkey]6 [key_poke]6
  140. [ifkey]7 [key_poke]7
  141. [ifkey]8 [key_poke]8
  142. [ifkey]a [key_poke]a
  143. [ifkey]b [key_poke]b
  144. [ifkey]c [key_poke]c
  145. [ifkey]d [key_poke]d
  146. [ifkey]e [key_poke]e
  147. [ifkey]f [key_poke]f
  148. [ifkey]g [key_poke]g
  149. [ifkey]h [key_poke]h
  150. [ifkey]i [key_poke]i
  151. [ifkey]j [key_poke]j
  152. [ifkey]k [key_poke]k
  153. [ifkey]l [key_poke]l
  154. [ifkey]m [key_poke]m
  155. [ifkey]n [key_poke]n
  156. [ifkey]o [key_poke]o
  157. [ifkey]p [key_poke]p
  158. [ifkey]q [key_poke]q
  159. [ifkey]r [key_poke]r
  160. [ifkey]s [key_poke]s
  161. [ifkey]t [key_poke]t
  162. [ifkey]u [key_poke]u
  163. [ifkey]v [key_poke]v
  164. [ifkey]w [key_poke]w
  165. [ifkey]x [key_poke]x
  166. [nostacked][write]KEYS:
  167. [nostacked][goto nokeys]
  168. [readln]KEYS
  169. [/nokeys][open]nul:
  170. [ifexist]bday\noshow [yellow][link]bday\noshow
  171. [ifexist]bday\noshow [down][white enter][key_poke]|
  172. [ifexist]bday\noshow [delete]bday\noshow
  173. [cls][link]bday\results.tst
  174. [link]bday\hungup.flg
  175. [delete]bday\hungup.flg
  176. [delete]bday\results.tst
  177.  
  178. [white][enter]
  179.  
  180. [lightcyan]Restoring KEY and PRIV settings...[pause]
  181. [link]bday\saveinfo.bbs
  182. [delete]bday\saveinfo.bbs
  183. [up up]Done![pause]
  184. [top]
  185. [/noed][cls]
  186. [white on red]  [nocolour]-[endcolour] BDAY_MAX 1.01 [nocolour]-[endcolour]  [white][colour]  [endcolour][grey](c) 1994 by John Medland 1:250/840
  187.  
  188. [yellow]Text Editor Configuration
  189.  
  190. [white]PATH\NAME of your text editor?: [yellow][readln]
  191. [ifentered] [ifexist]bday\editor.bbs [top]
  192. [ifentered] [top]
  193. [ifexist]%J [goto oked]
  194. [yellow]Program not found![pause][pause]
  195. [moreoff][up cleol][up cleol][up cleol][up]
  196. [goto noed]
  197. [/oked]
  198. [delete]bday\editor.bbs
  199. [open]bday\editor.bbs
  200. [write][key_poke]%J
  201. [open]nul
  202. [white]Done![pause]
  203. [top]
  204. [/goed]
  205. [link]bday\editor.bbs
  206. [readln]
  207. [cls][Xtern_dos]%J \max\bday\birthday.dat
  208. [top]
  209. [/security][delete]bday\failchek.bbs
  210. [cls]
  211. [white on red]  [nocolour]-[endcolour] BDAY_MAX 1.01 [nocolour]-[endcolour]  [white][colour]  [endcolour][grey](c) 1994 by John Medland 1:250/840
  212.  
  213. [yellow]If user input does NOT match record, set to:
  214.  
  215.  [white]E[grey])[cyan]xtra
  216.  [white]F[grey])[cyan]avoured
  217.  [white]P[grey])[cyan]rivil
  218.  [white]W[grey])[cyan]orthy
  219.  [white]N[grey])[cyan]ormal
  220.  [white]L[grey])[cyan]imited
  221.  [white]D[grey])[cyan]isgrace
  222.  [white]T[grey])[cyan]wit
  223.  
  224. [white]Select: [yellow][menu]epndftlw|
  225. [choice]|[goto setkey]
  226. [open]bday\failchek.bbs
  227. [choice]e[write][setpriv e]
  228. [choice]e[write][up][log]!Priv Level set to: EXTRA
  229. [choice]l[write][setpriv l]
  230. [choice]l[write][up][log]!Priv Level set to: LIMITED
  231. [choice]w[write][setpriv w]
  232. [choice]w[write][up][log]!Priv Level set to: WORTHY
  233. [choice]f[write][setpriv f]
  234. [choice]f[write][up][log]!Priv Level set to: FAVOURED
  235. [choice]p[write][setpriv p]
  236. [choice]p[write][up][log]!Priv Level set to: PRIVIL
  237. [choice]n[write][setpriv n]
  238. [choice]n[write][up][log]!Priv Level set to: NORMAL
  239. [choice]d[write][setpriv d]
  240. [choice]d[write][up][log]!Priv Level set to: DISGRACE
  241. [choice]t[write][setpriv t]
  242. [choice]t[write][up][log]!Priv Level set to: TWIT
  243. [open]nul:
  244. [/setkey]
  245. [white]Turn which key(s) ON? [yellow][clear_stacked][readln]
  246. [ifentered] [goto noneon]
  247. [ifexist]bday\failchek.bbs [open]bday\failchek.bbs  [goto Aerf]
  248. [open]bday\failchek.bbs
  249. [write]
  250. [/Aerf][write][keyon]%J
  251. [write][up][log]!KEYS turned ON: %J
  252. [open]nul:
  253. [/noneon]
  254. [white]Turn which key(s) OFF? [yellow][clear_stacked][readln]
  255. [ifentered] [goto hup]
  256. [ifexist]bday\failchek.bbs [open]bday\failchek.bbs  [goto Serf]
  257. [open]bday\failchek.bbs
  258. [write]
  259. [/serf][write][keyoff]%J
  260. [write][up][log]!KEYS turned OFF: %J
  261. [open]nul:
  262. [/hup]
  263. [white]Hangup on user? [[y,N] [yellow][menu]yn|
  264. [choice]n[goto naw]
  265. [choice]|[goto naw]
  266. [ifexist]bday\failchek.bbs [open]bday\failchek.bbs [goto zerf]
  267. [open]bday\failchek.bbs
  268. [/zerf][write][ifexist]bday\saveinfo.bbs [log]!Hanging up! (test mode)
  269. [write][ifexist]bday\saveinfo.bbs [open]bday\hungup.flg
  270. [write][ifexist]bday\saveinfo.bbs [write]Disconnected!
  271. [write][ifexist]bday\saveinfo.bbs [ifexist]bday\failage.bbs [write][brown]Age not checked.
  272. [write][ifexist]bday\saveinfo.bbs [open]nul:
  273. [write][ifexist]bday\saveinfo.bbs [pause][pause][quit]
  274. [write][up][log]!Hanging up!
  275. [write][lightred]You are about to be disconnected.[pause]
  276. [write][down][cyan]Leave a message for the SysOp? [white][[Y,n] [menu]|yn
  277. [write][Choice]y[leave_comment]
  278. [write][Choice]|[leave_comment]
  279. [write][white][cls]Quote for the day:
  280. [write][lightgreen][quote]
  281. [write][down][yellow]Bye, [white][fname][yellow].  Thanks for calling [sys_name].
  282. [write][hangup]
  283. [open]nul:
  284. [/naw][ifexist]bday\failchek.bbs [open]bday\failchek.bbs
  285. [ifexist]bday\failchek.bbs [write][islocal][pause][pause]
  286. [open]nul:
  287.  
  288. [white]Done![pause][top]
  289. [/age18][delete]bday\failage.bbs
  290. [cls]
  291. [white on red]  [nocolour]-[endcolour] BDAY_MAX 1.01 [nocolour]-[endcolour]  [white][colour]  [endcolour][grey](c) 1994 by John Medland 1:250/840
  292.  
  293. [yellow]If user is under 18 years of age, set to:
  294.  
  295.  [white]E[grey])[cyan]xtra
  296.  [white]F[grey])[cyan]avoured
  297.  [white]P[grey])[cyan]rivil
  298.  [white]W[grey])[cyan]orthy
  299.  [white]N[grey])[cyan]ormal
  300.  [white]L[grey])[cyan]imited
  301.  [white]D[grey])[cyan]isgrace
  302.  [white]T[grey])[cyan]wit
  303.  
  304. [white]Select: [yellow][menu]epfndltrw|
  305. [choice]|[goto setk]
  306. [open]bday\failage.bbs
  307. [choice]e[write][setpriv e]
  308. [choice]e[write][up][log]!Priv Level set to: EXTRA
  309. [choice]f[write][setpriv f]
  310. [choice]f[write][up][log]!Priv Level set to: FAVOURED
  311. [choice]p[write][setpriv p]
  312. [choice]p[write][up][log]!Priv Level set to: PRIVIL
  313. [choice]w[write][setpriv w]
  314. [choice]w[write][up][log]!Priv Level set to: WORTHY
  315. [choice]n[write][setpriv n]
  316. [choice]n[write][up][log]!Priv Level set to: NORMAL
  317. [choice]l[write][setpriv l]
  318. [choice]l[write][up][log]!Priv Level set to: LIMITED
  319. [choice]d[write][setpriv d]
  320. [choice]d[write][up][log]!Priv Level set to: DISGRACE
  321. [choice]t[write][setpriv t]
  322. [choice]t[write][up][log]!Priv Level set to: TWIT
  323. [open]nul:
  324. [/setk]
  325. [white]Turn which key(s) ON? [yellow][clear_stacked][readln]
  326. [ifentered] [goto nonea]
  327. [ifexist]bday\failage.bbs [open]bday\failage.bbs  [goto derf]
  328. [open]bday\failage.bbs
  329. [write]
  330. [/derf][write][keyon]%J
  331. [write][up][log]!KEYS turned ON: %J
  332. [open]nul:
  333. [/nonea]
  334. [white]Turn which key(s) OFF? [yellow][clear_stacked][readln]
  335. [ifentered] [goto out]
  336. [ifexist]bday\failage.bbs [open]bday\failage.bbs  [goto berf]
  337. [open]bday\failage.bbs
  338. [write]
  339. [/berf][write][keyoff]%J
  340. [write][up][log]!KEYS turned OFF: %J
  341. [open]nul:
  342. [/out][ifexist]bday\failage.bbs [open]bday\failage.bbs
  343. [ifexist]bday\failage.bbs [write][pause]
  344. [open]nul:
  345.  
  346. [white]Done![pause][top]
  347. [/help][moreon][white on red] Setup HELP [white]
  348. [cls][lightcyan]
  349.  
  350. Age Checking       [save][cyan]Choose PRIV level and KEYS for callers who are under 18.[load]
  351.  
  352. Security Checking  [cyan]Choose PRIV level, KEYS and disconnect options for
  353.                    callers who fail to enter the birth date they entered
  354.                    on a previous call.[load]
  355.  
  356. Birth date (once)  [cyan]Asks for a birth date from any caller not in the DAT file.[load]
  357.  
  358. Today's Birthdays  [cyan]Creates a bulletin of Today's Birthdays. Normally called
  359.                    from your daily maintenance batch file.[load]
  360.  
  361. Run in Test Mode   [cyan]Runs the program, shows results, then returns your PRIV
  362.                    level and KEYS to pre-test settings.[load]
  363.  
  364. Configure Editor   [cyan]Sets up the text editor you'll use to edit the DAT file.[load]
  365.  
  366. Edit DAT file      [cyan]Runs your editor and loads the DAT file.[load]
  367.  
  368. User Editor        [cyan]Runs the Maximus User Editor.
  369.  
  370. [white][enter][top]
  371.