home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / XBBS_118.ZIP / SAMPLES.ZIP / ANSIMAIN.XBS < prev    next >
Encoding:
Text File  |  1992-01-27  |  6.8 KB  |  404 lines
  1. a1p1
  2. LGlANSIOn
  3. blSkipANSI
  4. lANSIOn
  5. LAlANSIOn2
  6. blSkipANSI
  7. lANSIOn2
  8. Lb<2400 SkipANSI
  9. blStart
  10. lSkipANSI
  11. jMAIN.XBS
  12. lStart
  13. ;
  14. ;ANSI pull down main menu
  15. ;
  16. H"1HMsg: **   File: *$
  17. *^   *T mins leftH
  18. 0ABulls Read Scan Write Change_Areas
  19. S0<6 lSkipLast
  20. 1A LastUser_Msg
  21. 0|1
  22. lSkipLast
  23. 1AList New Find All_New Peeker Change_Areas Download Upload
  24. LnHector Plasmic,lDoMaint
  25. LnDave Hague,lDoMaint
  26. blDontMaint
  27. lDoMaint
  28. 2A Maintenance
  29. 1|2
  30. lDontMaint
  31. 2A
  32. 3ALibrary Userlist Chat Feedback Edit_Config Help! Select_Menu Read_News
  33. S<06 lNoWriteMain
  34. 4A Write_News
  35. 3|4
  36. lNoWriteMain
  37. 4ALogoff Oops!
  38. '9,11,The Pit's Main Menu,Msgs Files Doors Other Quit,0,0,c:\xbbs\menu\ansimain.hlp
  39. 8=e
  40. 9Al
  41. 9|81H"b@9
  42. l0
  43. jANSIMAIN.XBS
  44. l30
  45. S<06 lNotEnuff
  46. JANSIDOOR.XBS
  47. jANSIMAIN.XBS
  48. lNotEnuff
  49.  
  50. You only have access to one door...P3
  51. ESXDB.EXE dc:\xbbs\misc\ -c:\xbbs\misc\bbses G*G B*B T*T
  52. ~jANSIMAIN.XBS
  53. l11
  54. 1H
  55. *MSGAREAS.001 3
  56. blAfterMsgSelection
  57. l12
  58. 1Hr0,0
  59. blAfterMsgSelection
  60. l13
  61. 1Hr128,0
  62. blAfterMsgSelection
  63. l14
  64. 1HWrite msg in area **
  65. w0,130
  66. e>1 lAllCaps
  67. blAfterMsgSelection
  68. lAllCaps
  69.  
  70. You'll never get anywhere that way.  Your message is rejected.P3
  71. blAfterMsgSelection
  72. l15
  73. W10
  74. 1H
  75. ╒═Enter Msg Area Name (?):═╕
  76. │                          │
  77. ╘══════════════════════════╛3H                        3H0I24 0 0 0 14
  79.  
  80. 0C=
  81. lQuitFindMsg
  82. 0C!?
  83. lFindMsg
  84. p0╒═══════════════════════════╕
  85. │   Available Msg Areas:    │
  86. ╘═══════════════════════════╛
  87. &LMSGAREAS.001
  88. p1hW00
  89. lFindMsg
  90. 0t1 4096
  91. e>0 lFindStrMsg
  92. &mMSGAREAS.001,0
  93. blAfterFindMsg
  94. lFindStrMsg
  95. &MMSGAREAS.001,0
  96. lAfterFindMsg
  97. e>0 lError
  98. lQuitFindMsg
  99. 0=*
  100. &FFLSEARCH.001,0,0
  101. lAfterMsgSelection
  102.  
  103.  
  104. z8,QUOTES.XBS
  105.  
  106.       ** Messages:   y# available
  107. G0,14,1,Quit_to_Main Read Scan Write Change_Area Bulls
  108. 0C=Q
  109. lStart
  110. 0C=C
  111. l15
  112. 0C=B
  113. l11
  114. 0C=R
  115. l12
  116. 0C=S
  117. l13
  118. 0C=W
  119. l14
  120. jANSIMAIN.XBS
  121. lError
  122. Can't find msg area `0P'...blAfterMsgSelection
  123. l16
  124. 1HLast User Message...
  126. JLastMess.TXT
  127. hblAfterMsgSelection
  128. l21
  129. 1H9=$
  130. ff0,FILES.BBS
  131. blAfterFileSelection
  132. l22
  133. ff2,FILES.BBS
  134. blAfterFileSelection
  135. l23
  136. 1HSearch for a file...
  137. 9=$
  138. 6=*
  139.  
  140. Enter a filename to search for.  Don't include the extension; it may
  141. have been repackaged.  I'll check my upload/download directories to see
  142. if I have it, and let you know.  This is handy when you want to check on
  143. whether I already have a file you might like to upload.
  144.  
  145. Filename: 0I8 0 1 0 6
  146. 0C=
  147. lAfterFileSelection
  148. 0p1.
  149. 1C=
  150. lAfterFileSelection
  151.  
  152. 0A.*
  153. 1|0
  154. Searching for 1P...
  155. KN0FLSEARCH.001
  156. W10
  157. e=0
  158. Kn0FLSEARCH.001
  159. e>0 lThrough
  160.  
  161. Searching *$...
  162. 1c00FD
  163. e>0 lNoneFound
  164. ff4,FILES.BBS,01/01/1980,@0
  165. lNoneFound
  166. W00
  167. lThrough
  168. &FFLSEARCH.001,9,0
  169. &MMSGAREAS.001,6
  170. blAfterFileSelection
  171.  
  172. l24
  173. 1HNew files in all areas...
  174. 9=$
  175. 8=*
  176. KN0FLSEARCH.001
  177. W10
  178. e=0
  179. Kn0FLSEARCH.001
  180. e>0 lSearchDone
  181.  
  182. Searching *$...
  183. ff2,FILES.BBS
  184. e==4 lNoFILESBBS
  185. e>2 lSearchDone
  186. lNoFILESBBS
  187. W00
  188. lSearchDone
  189. Search complete.h
  190. &FFLSEARCH.001,9,0
  191. &MMSGAREAS.001,8
  192. blAfterFileSelection
  193. l25
  194. 1H9=$
  195. 1ASAFE.CTL
  196. LRlPeekAnyway
  197. Lk>10 lLeechPeek
  198. L#>10 lLeechPeek
  199. lPeekAnyway
  200. 1AFLSEARCH.001
  201. lLeechPeek
  202. 9=$
  203. ESPEEKER.EXE #10 T*T B*B G*G C*P DD:\IBM\ L*l S*s0 A*1 IG: XC:\XBBS\ARCTEMP EREAD.COM Z1024
  204. FExtracted Files, C:\XBBS\ARCTEMP\ C:\XBBS\ARCTEMP\ 3
  205. e<100 lSkipIt
  206. 1AC:\XBBS\ARCTEMP\XFILE.*
  207. 1F
  208. 1P
  209. e>0 lSkipIt
  210. ~
  211. Ready to send your archive...
  212. Kk1
  213. h
  214. lSkipIt
  215. &FFLSEARCH.001,9,0
  216. blAfterFileSelection
  217. l26
  218. W11
  219. 1H
  220. ╒═Enter File Area Name (?):═╕
  221. │                           │
  222. ╘═══════════════════════════╛3H                        3H0I24 0 0 0 14
  224.  
  225. 0C=
  226. lQuitFindFile
  227. 0C!?
  228. lFindFile
  229. p0╒════════════════════════════╕
  230. │   Available File Areas:    │
  231. ╘════════════════════════════╛
  232. &lFLSEARCH.001,,0
  233. p1hW01
  234. lFindFile
  235. 0t1 65535
  236. e>0 lFindStrFile
  237. 1A#
  238. 1|0
  239. 1c0
  240. lFindStrFile
  241. &FFLSEARCH.001,0,0
  242. e>0 lErrorFile
  243. 0=$
  244. &MMSGAREAS.001,0
  245. lQuitFindFile
  246. lAfterFileSelection
  247.  
  248.  
  249. z8,QUOTES.XBS
  250.  
  251.       *$ Files:
  252. G0,14,1,Quit_to_Main List New Find All_New Peeker Change_Areas Download Upload
  253. 0C=Q
  254. lStart
  255. 0C=L
  256. l21
  257. 0C=N
  258. l22
  259. 0C=F
  260. l23
  261. 0C=A
  262. l24
  263. 0C=P
  264. l25
  265. 0C=C
  266. l26
  267. 0C=D
  268. l27
  269. 0C=U
  270. l28
  271. jANSIMAIN.XBS
  272. lErrorFile
  273. Can't find file area `0P'...blAfterFileSelection
  274. l27
  275. 1H9=$
  276. LRlDownAnyway
  277. Lk>10 lLeechDL
  278. L#>10 lLeechDL
  279. lDownAnyway
  280. KDNULL 0 FLSEARCH.001
  281. blSkipDL
  282. lLeechDL
  283. 
  284. Number of uploads:   uu     Uploaded kilobytes:   uU  <───┐
  285. Number of downloads: ud     Downloaded kilobytes: uD  <───┘
  286.  
  287. Some areas are no longer available to you.
  288. 
  289. KDNULL 0 SAFE.CTL
  290. lSkipDL
  291. h
  292. lNope
  293. &FFLSEARCH.001,@9,0
  294. blAfterFileSelection
  295. l28
  296. 1HydD bytes free on upload disk.
  297. 9=*
  298. MNew Uploads,28676,50,6,6,999,Hector Plasmic
  299. Ku
  300. &MMSGAREAS.001,9
  301. blAfterFileSelection
  302. l29
  303. LnDave Hague,lPartMaint
  304. ESFILER2.EXE NOBELL -T999
  305. jANSIMAIN.XBS
  306. lPartMaint
  307. ESFILER2.EXE -T*t -B*B -G*G NOSYSOP NOBELL
  308. jANSIMAIN.XBS
  309. l41
  310. ~ESLibrary.EXE Dc:\xbbs\library G*G B*B T*T L*l W*w EREAD NC:\XBBS\LIBRARY\ENTRY.TXT
  311. lAfterOtherSelection
  312.  
  313.  
  314. z8,QUOTES.XBS
  315.  
  316.        Other:
  317. S<06 lNoWrite
  318. G0,14,1,Quit Libry Ulist Chat Fdbk Edit_Cfg Help Select Read_News Write_News
  319. blSkipNoWrite
  320. lNoWrite
  321. G0,14,1,Quit Library Userlist Chat Feedback Edit_Config Help Select Read_News
  322. lSkipNoWrite
  323. 0C=Q
  324. lStart
  325. 0C=L
  326. l41
  327. 0C=U
  328. l42
  329. 0C=C
  330. l43
  331. 0C=F
  332. l44
  333. 0C=E
  334. l45
  335. 0C=H
  336. l46
  337. 0C=S
  338. l47
  339. 0C=R
  340. l48
  341. 0C=W
  342. l49
  343. jANSIMAIN.XBS
  344. l42
  345. 1HQ0blAfterOtherSelection
  346. l43
  347. S<06 l52
  348. 1HChat request...
  349. JHeyhec.xbs
  350. cblAfterOtherSelection
  351. l44
  352. JFDBK.XBS
  353. blAfterOtherSelection
  354. l45
  355. JCONFIGUR.XBS
  356. jANSIMAIN.XBS
  357. l46
  358. ~|0HELP.HYP
  359. |1BBS
  360. |20
  361. blAfterOtherSelection
  362. l47
  363. jSelect.XBS
  364. l48
  365. 1H;
  366. lNewsHere
  367.  
  368. G0,10,1,List_News Read_News Quit_News
  369. 0C!R
  370. lDir
  371. fa .NWS C:\XBBS\NEWS\
  372. RlNewsHere
  373. lDir
  374. 0C!L
  375. lBack
  376. fr2 C:\XBBS\NEWS\*.NWS
  377. 
  378. h
  379. RlNewsHere
  380. lBack
  381. blAfterOtherSelection
  382. l49
  383. S<06 lAfterOtherSelection
  384.  
  385. EDNEWS.BAT *B *T *G *l *w *F *L *o
  386. blAfterOtherSelection
  387. l51
  388. 1HRemember to do your evil deed for the day...
  389.  
  390. S<06 lSkipLastUser
  391. lLastMess2
  392.  
  393. Wanna leave a message for the next user?
  394. G0,14,1,Nope Yep
  395. 0C!Y
  396. lSkipLastUser
  397. EDLASTMESS.BAT *B *T *G *l *w *F *L
  398. lSkipLastUser
  399. p0a1JGOODBYE2.XBS
  400. jGOODBYE.XBS
  401. x
  402. l52
  403. jANSIMAIN.XBS
  404.