home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / progm / ebl.zip / BATDOC.BAT < prev    next >
DOS Batch File  |  1988-10-11  |  20KB  |  533 lines

  1. bat /p * Loading HELP and DOCUMENTATION ..... (Non-IBM systems, read NOTE below)
  2.  
  3. *           Written by F.Canova 10/5/83 through 8/8/88
  4. *   (c) Copyright 1983, 1985, 1986 by Seaware Corp. all rights reserved.
  5. *   This batch file REQUIRES EBL Version 3.10 or higher for proper execution!
  6. *
  7.          **** NOTE! NOTE! NOTE! NOTE! ****
  8.  RAM    |* <-----Change 'RAM' to 'BIOS' if PC isn't 100% IBM Compatible!
  9.  
  10.  if %G = .goto. then %G = | goto -%F
  11.  else goto -vercheck
  12.  
  13.  
  14. -header * Routine prints general purpose header for help text
  15.     stack.purge            |*  remove any pre-typed keystrokes.
  16.     %n = %i $ 1 ( %i # - 2 ) & . & ( %i $ ( %i # - 1 ) 2 ) |* extract section # from page #
  17.     cls begtype
  18. \17╔══════════════════════════════════════════════════════════════════════════════╗\1F
  19.     \%H                  Page \%n              \17
  20. ╚══════════════════════════════════════════════════════════════════════════════╝\07
  21.     Press:  PGDN for next page,   PGUP for prev page,  HOME for main menu.
  22.  
  23. end
  24.     return
  25.  
  26. -scroll * Routine accepts key for scrolling help text
  27.     %e = 0
  28.     inkey %k
  29.     if %k = KEY003         goto -opt0 |* Break key
  30.     if %k = KEY01B %i = 0       | goto -line0    |* ESC    key
  31.     if %k = KEY147 %i = 0       | goto -line0    |* Home key
  32.     if %k = KEY149 %i = %i - 1 | cls | %F = line%i | goto -%F |* PgUp key
  33.     if %k = KEY151 %i = %i + 1 | cls | %F = line%i | goto -%F |* PgDn key
  34.     goto -scroll |* ignore any other key.
  35.  
  36. -line1405
  37. -line099
  38. -line0
  39.     %e = 0
  40.     cls begtype
  41. \1F╔════════════════ BATDOC ═══════════════════╗\07       \17┌─────────────────────────┐\07
  42. \1F║     Menu driven HELP and DOCUMENTATION.   ║\07       \17│ User supported software │\07
  43. \1F╙───────────────────────────────────────────╜\07       \17│      by        │\07
  44.                              \17│              │\07
  45.     \4fGENERAL:\07                       \17│ Seaware Corp.        │\07
  46. 1.    Introduction and how to use this Help.         \17│ P.O. Box 1656       │\07
  47. 2.    The user supported concept.             \17│ Delray Beach, FL 33444  │\07
  48. 3.    How to register & what you get             \17│ 407/392-2046          │\07
  49. 4.    What EBL is... an introduction!          \17│              │\07
  50. 5.    Version 3: The inside story!             \17│ Order your registered   │\07
  51.                              \17│ copy for $49 from us      │\07
  52.     \4fEXTENDED BATCH LANGUAGE Version 3\07           \17│ directly,or our order    │\07
  53. 6.    Printing to display.                 \17│ line at 800/634-8188      │\07
  54. 7.    Reading data from users.             \17│              │\07
  55. 8.    Controlling program flow             \17│              │\07
  56. 9.    Using the keyboard stack.             \17│ Please copy and share   │\07
  57. 10.    Sensing program's results.                   \17│ BAT.COM, BATFUNC1.COM,  │\07
  58. 11.    Assignment statements.                 \17│ BATDOC.BAT, BATDEMO.BAT │\07
  59. 12.    Debugging aids.                  \17│ for non-commercial uses │\07
  60. 13.    Extended functions.                 \17│ only.           │\07
  61. 14.    Additional information.              \17└─────────────────────────┘\07
  62.  
  63. 0.    Exit.
  64.  
  65. end
  66. -entry0
  67.     %o =
  68.     read Enter the number of your selection. > %A
  69.     if / = %a & / then %a = 1
  70.     if %a < 15 if %a > '1/' cls %F = opt%a | goto -%F
  71.     if %a < :  if %a >  /    cls %F = opt%a | goto -%F
  72.     beep begtype
  73. I DON'T KNOW THAT OPTION!
  74. Just enter a number 0 to 14 and press the ─┘ key.
  75.  
  76. end
  77.     goto -entry0
  78.  
  79. -opt0    cls begtype
  80. Ready to leave on-line help! Press a key:
  81.  
  82. <\0FS\07>ystem    <\0FD\07>emo    <\0FH\07>elp
  83. end
  84. -exiting    inkey %a
  85.         if %a = S    exit
  86.         if %a = H    goto -line0
  87.         if %a = D    stack BATDEMO | exit
  88.         beep goto -exiting
  89.  
  90. -line100
  91. -opt1    %h = INTRODUCTION | %i = 100 | call -header
  92.     begtype
  93.     This program will provide you with help information on the use of
  94. the EXTENDED BATCH LANGUAGE version 3.0.  It is designed to allow for
  95. easy access and retrieval of information that would be harder to find
  96. by more conventional means.
  97.  
  98.     The information is broken up into multiple sections.  Each section
  99. may have several pages.  To access each page in order, just keep
  100. pressing the PGDN key.    At the top of your screen is the name of the
  101. section which you are in and the page number.
  102.  
  103. \0FNote:\07
  104.  
  105.     If you wish to directly enter another section now, press the \0fHOME\07
  106. key to return to the main menu, enter the proper \0fsection number\07 and
  107. press the \0f─┘\07 key.
  108.  
  109. end
  110.      goto -scroll
  111. -line101 call -header | begtype
  112. While in any of these sections, there are just three keys needed:
  113.  
  114. PGDN -    This key will advance to the next page of any section. If
  115.     there are no more pages in the section, then it will advance
  116.     to the next section.
  117.  
  118. PGUP -    This key will back up to a previous page within a section.
  119.     If there are no more previous pages within a section, it
  120.     will backup to the previous section.
  121.  
  122. HOME or ESC - Either of these keys will return directly to the
  123.     main menu. From the menu, any section can be looked at
  124.     directly by entering the section number and pressing ─┘.
  125. end
  126.     goto -scroll
  127. -line199 %i = 102
  128. -line102 call -header | begtype
  129.   There are several sections where you will be given questions and answers.
  130. If you would like to peek and see answer without specifically answering it,
  131. you can press the space bar to reveal the answer letter by letter.
  132.  
  133.     One interesting facet you should know while using this on-line help
  134. and documentation is that you are using the EXTENDED BATCH LANGUAGE
  135. program to display and control these menus.
  136.  
  137.     Never before has a batch language been so powerful on the IBM
  138. personal computer as to be able to provide a facility like this.  In
  139. the following pages of description, we hope that you will see, as we
  140. did, that this program has extraordinary capability which does much
  141. more than just expand the capability of DOS.  In fact, it gives new
  142. power to your system by providing capabilities never before possible.
  143. end
  144.     goto -scroll
  145. -opt2
  146. -line103 %i = 200
  147. -line200 %H = "User Supported Concept" | call -header | begtype
  148.  
  149.  ╓─                                     ─╖
  150.  ║      The license fee for Extended Batch Language is $49.          ║
  151.  ║                                      ║
  152.  ║ You are encouraged to copy and share BAT.COM, BATFUNC1.COM, BATDOC.BAT ║
  153.  ║ and BATDEMO.BAT for non-commercial purposes only. You must not modify  ║
  154.  ║ any of these files or make a profit from their distribution.       ║
  155.  ║                                      ║
  156.  ║ In appreciation of your support, you will be provided with many more   ║
  157.  ║ powerful extensions to the language (including source code), examples, ║
  158.  ║ and detailed documentation. All registered users can also access the   ║
  159.  ║ BAT-BBS, a hot-line for assistance, tips, and updates.          ║
  160.  ║                                      ║
  161.  ╙─        (c) Copyright 1982-1988 by Seaware Corp.         ─╜
  162.               All rights reserved.
  163.  
  164.   Seaware Corp.                            407/392-2046
  165.   Post Office Box 1656                           800/634-8188
  166.   Delray Beach, FL 33444
  167. end
  168.     goto -scroll
  169. -line299 %i = 201
  170. -line201 call -header | begtype
  171. For $49, you will be provided with a detailed users guide.  This hardcopy
  172. manual has almost 400 pages of descriptions, examples, useful utilities,
  173. and tips on this program's use.  You will also receive a diskette
  174. containing the latest program version, useful utilities, all examples from
  175. the manual ready to try out, and a 'Executive Menu System' which allows you
  176. to design and customize your own application menus.  All users are also
  177. invited to use the BAT-BBS, an on-line forum for user's ideas, tips,
  178. programs, and assistance.  (See next section for more information).  Our
  179. users have signed on thousands of times and testified that this service has
  180. helped make Extended Batch Language one of their best supported programs on
  181. their system.
  182.  
  183. The concept of excellent user support is buried deep in our roots.  Much of
  184. our philosophy was founded by Andrew Fugleman at Headlands Press, Inc.    I
  185. would like to thank Andrew for his inspiration and help.  Because I feel
  186. that good software should have someone standing behind it, we at Seaware
  187. want to put your patronage directly into support for you as our thanks of
  188. your support of us.  You will find it well worth it.
  189.  
  190.  
  191. Seaware Corp. ≡≡≡≡ Post Office Box 1656 ≡≡≡≡ Delray Beach, FL 33444
  192. end
  193.      goto -scroll
  194. -opt3
  195. -line202 %i = 300
  196. -line300 %H = "Registering for EBL" | call -header | begtype
  197.  
  198. There are many benefits to making your EBL purchase. We have received
  199. comments from users all over the world to make this a better product
  200. for you. Making your purchase will give you access to all the useful
  201. tools and improvements that have been made.
  202.  
  203. Look at the following list for the benefits of registering...
  204. end
  205.     goto -scroll
  206. -line301 call -header | begtype
  207.  
  208. \0f    Registered EBL package                Non-registered\07
  209.        ┌──────────────────────────────────────────┐    ┌──────────────┐
  210.        │BAT.COM      - Latest version          │    │BAT.COM       │
  211.        │BATDOC         - DEMO programs          │    │BATDOC          │
  212.        │BATDEMO                   │    │BATDEMO       │
  213.        │BATFUNC1     - String functions       │    │BATFUNC1      │
  214.        │                      │    └──────────────┘
  215.        │BATFUNC2     - System functions       │
  216.        │BATMATH3     - Floating point          │
  217.        │BATXV         - Extended Variables & Arrays│
  218.        │                      │
  219.        │EXAMPLES     - Library of examples      │
  220.        │                      │
  221.        │Users Guide  - Apx 400 page printed manual│
  222.        │BBS support  - On-Line assistance      │
  223.        └──────────────────────────────────────────┘
  224.  
  225.      You get these benefits and more when you register for EBL.
  226. end
  227.     goto -scroll
  228. -line302 call -header | begtype
  229.  
  230. \0eProvided to registered users only:\07
  231.  
  232. One of the additional services we provide to EXTENDED BATCH LANGUAGE
  233. users is through a communication medium called "BAT-BBS". This is
  234. a direct link from you to other users, as well as Seaware.
  235.  
  236.  
  237. The following list shows the many things that
  238.  
  239.     BAT-BBS can provide .  .  .
  240.  
  241. end
  242.     goto -scroll
  243. -line303 call -header | begtype
  244. FOR USERS WITH A MODEM:
  245.  
  246.     * Receive program updates as soon as they are available!
  247.  
  248.     * BAT-BBS is a hotline for your questions!
  249.  
  250.     * Directly access our computer at Seaware via phone.
  251.  
  252.     * It will be ready to give helpful ideas.
  253.  
  254.     * Programs and Utilities are available to download.
  255.  
  256.     * Users are welcome to upload their programs/ideas.
  257.  
  258.     * Tips and techniques are on-line.
  259.  
  260.     * Converse with other users and program author via
  261.         electronic mail.
  262. end
  263.     goto -scroll
  264. -line304 call -header | begtype
  265.  
  266. IF YOU DON'T HAVE A MODEM:
  267.  
  268.     * You can still phone the BAT-BBS if you wish to
  269.       have your questions answered via voice.  A
  270.       recorder will take your message.
  271. end
  272.     goto -scroll
  273. -line305 call -header | begtype
  274.  
  275. You can access the bulletin board service by using any 300 baud or 1200
  276. baud modem with your computer.    You can use 8,N,1 or 7,E,1 protocols.
  277.  
  278. You will also need a communication program such as PC-TALK III, CROSSTALK,
  279. QMODEM, or SmartCom.  Contact your local computer store if you need more
  280. information or help with communication equipment or software.
  281.  
  282. Service is available 24 Hours a day.  Your personal password will be
  283. supplied when you register.
  284.  
  285. end
  286. goto -scroll
  287. -line399 %i = 306
  288. -line306 call -header | begtype
  289. To access BAT-BBS by modem:
  290.  
  291.  
  292. The BAT-BBS phone number is 407/395-2816.
  293.  
  294. You can call it at any time to get the latest EBL version,
  295. and when you register your copy of EBL you will get full
  296. access to the BAT-BBS for tips, information, and utilities.
  297. end
  298.      goto -scroll
  299. -opt4
  300. -line307 %i = 400
  301. -line400 %H = Introduction | call -header | begtype
  302.     BAT is short for Extended Batch Language.  BAT is a powerful
  303. productivity tool for the IBM Personal Computer.  It represents a
  304. significant advance in providing a comprehensive yet easy to learn and use
  305. facility for controlling tasks you give your computer.    It can even give
  306. you on-line documentation SUCH AS THIS!
  307.  
  308.   BAT is a command programming language.  It is a high level language that
  309. can be used as a direct replacement or in conjunction with DOS batch files.
  310. It can operate with IBM DOS versions 2.0 through 3.x.    Compared with
  311. standard DOS batch files, BAT has superior control structures, string
  312. handling, and user interfaces.    It also has tracing facilities, and is easy
  313. to learn and use.  Many aspects of the language are like BASIC.  Users of
  314. VM/370 will also find it similar to EXEC2.  It seems that both "end users"
  315. and programmers find BAT a simple and effective language.
  316.  
  317. end
  318.     goto -scroll
  319. -line401 call -header | begtype
  320. With Extended Batch Language, you can have:
  321.  
  322. -    Better control of messages to the screen
  323.  
  324. -    Accept responses from the user and create responses to programs
  325.  
  326. -    String handling operations (substring, length, etc.)
  327.  
  328. -    Arithmetic expressions and assignments
  329.  
  330. -    Comparisons and program return codes
  331.  
  332. -    Search for files or tell if they exist
  333.  
  334. -    Complete freedom to mix DOS and BAT commands within the same control file
  335.  
  336.  
  337. Let's look at how it measures up to today's DOS......
  338. end
  339.     goto -scroll
  340. -line402 call -header | begtype
  341. Function    DOS 1.1     DOS 2.0 or 3.0    Extended Batch Lang.
  342. ----------    -------     --------------    --------------------
  343. BEEP                        X
  344. CALL/RTN                    X
  345. CLS                X        X
  346. BEGSTACK                    X
  347. BEGTYPE                     X
  348. EXIT                X        X
  349. GOTO                X        X
  350. IF                Limited     X
  351. INKEY                        X
  352. READ                        X
  353. READSCRN                    X
  354. SKIP                        X
  355. STATEOF             Limited     X
  356. STACK                        X
  357. TYPE        Limited     X        X
  358. Assignments                    X
  359. TRACE                        X
  360. DOS Vars    X        X        X
  361. Global Vars                    X
  362. Return Codes            X        X
  363. end
  364.     goto -scroll
  365. -line403 call -header | begtype
  366.   As you can see from the previous chart, Extended Batch Language has more
  367. power and enhanced capabilities than any version of DOS!.  This
  368. program uses these capabilities to solve common problems for......
  369.  
  370.   The system programmer - who needs to do long sequences of tasks between
  371. linker, compilers, debuggers, and editors.  He can now create an
  372. intelligent link between these programs.  For instance, he may wish to do a
  373. link depending on if the previous compile was successful.  He can also
  374. respond automatically from a keyboard "stack" into various utilities.
  375.  
  376.   The secretary - who has several types of tasks to perform (word
  377. processing, accounting packages, etc) and requires a simple way of changing
  378. from one type of task to another, perhaps with optional help text.
  379.  
  380.   The student - who wishes to go from one game to another without having to
  381. learn the system commands required to make each available.
  382.  
  383.   Testers - who wish to automate long, boring tests and procedures on the
  384. personal computer. An excellent tool for a manufacturing line.
  385. end
  386.     goto -scroll
  387. -line499 %i = 404
  388. -line404 call -header | begtype
  389.  
  390.     The effect of using BAT is to put "covers" on the programs and system
  391. that it controls.  In UNIX they call it shells, in VM they call it EXECs,
  392. but to you it simply makes things friendly.  Described in these pages is a
  393. solution to batch files through the use of Extended Batch Language.  A
  394. friendly interface to you can now be easily created.
  395.  
  396.   Once you have looked over the descriptions of each command, browse
  397. through the BATDEMO.BAT file and look at the commands in operation.  By
  398. trying out some sample programs, you should be able to gain a full
  399. understand of how to write some powerful batch files by using Extended
  400. Batch Language.
  401.  
  402.  
  403.  
  404. Copyright (c) 1982, 1983, 1984, 1986 by Seaware Corp.  Program by
  405. All Rights reserved by Seaware Corp.               Frank Canova
  406.  
  407. end
  408.      goto -scroll
  409. -opt5
  410. -line405 %i = 500
  411. -line500 %H = "Version 3: The inside story!" | call -header| begtype
  412. We threw the book at it!  Almost everything you could possible have is now
  413. in Extended Batch Language Version 3.  We took time in getting everyone's
  414. suggestions into it, and used very little memory in doing it.  Here's some
  415. of the highlights:
  416.  
  417.      *     Menus are  easy to create.  Just use the "Executive Menu
  418.      Facility" to create customized menus the way YOU want to
  419.      see  them.  This  automatic  procedure,  written in EBL,
  420.      will create a    custom    menu  without ever having to know
  421.      any  details  about  the  EBL    Language or batch  files.
  422.      Using your PC couldn't be easier.
  423.  
  424.      *     Complete freedom with    all variables.    Strings can be up
  425.      to 127 characters mixed  case, numbers to 19 digits.  If
  426.      the built in  variables  aren't enough for you, you  can
  427.      now have as many as you want!    Reserve from 0 to  64K of
  428.      memory  for  "extended  variables"  that  can  have long
  429.      descriptive names, do indexing, create arrays, and more.
  430.      For floating point arithmetic?  Just load  the  optional
  431.      float point math extensions!
  432. end
  433.     goto -scroll
  434. -line501 call -header | begtype
  435.      *     Extended functions give you  additional  power where you
  436.      need    it.  Intended  for  programmers  needing  special
  437.      capabilities,    several types of functions are available:
  438.      DOS  support (CHDIR,  MKDIR,  REBOOT), low  level system
  439.      support  (PEEK,  POKE,  INT86), string  support  (STRIP,
  440.      LOWER, UPPER), math support (FLOAT, INT, FRAC), and MUCH
  441.      more!
  442.  
  443.      *     Add your own functions to EBL.  If  you  have additional
  444.      requirements for the EBL language,  you  can create them
  445.      using    MASM,  C,  Pascal,  etc.  The    source    code  for
  446.      Seaware's  extended functions (written  in Turbo Pascal)
  447.      is provided as an example to registered users.
  448.  
  449.      *     Full support for many more environments like PC Network,
  450.      TopView, Windows, DESQview and of course DOS 2 and DOS3.
  451.      Also,    a  flexible  interrupt mechanism  was added  that
  452.      makes EBL work with even more programs than ever before.
  453. end
  454.     goto -scroll
  455. -line599 %i = 502
  456. -line502 call -header | begtype
  457.      *     File I/O is  easy within EBL Version 3. Use it to  setup
  458.      printers,  keep  configuration  information,  initialize
  459.      programs, or even create other batch files!
  460.  
  461.      *     Error recovery is now available  within batch files!  In
  462.      cases where  an error    is  detected  while the EBL batch
  463.      file  is  running,  you  can  now  include a  routine to
  464.      recover gracefully from the problem.
  465. end
  466.      goto -scroll
  467.  
  468. -on.error-
  469.     %e = %e + 1 | if %e > 2 then %L = ? | skip 6
  470.     if %R <> 6 then skip 5
  471.     %G = .goto.
  472.     color 8f | type Loading part 2 ...
  473.     color 07 | type
  474.     leave
  475.     batdoc2
  476.  
  477. begtype
  478. \0f
  479.     Unexpected error \%S%R in line \%S%L !
  480. \07
  481.     This batch file was error free when it was distributed
  482.     by Seaware. An error indicates that it was most likely
  483.     modified by someone improperly. To get an updated demo
  484.     diskette send $10 to Seaware directly or call 800/634-8188
  485.     to register for $49+$3s/h to get the complete EBL, utilities,
  486.     examples, executive menu system, manual, and BBS support.
  487.  
  488.  
  489.             Seaware Corp.
  490.              Post Office Box 1656
  491.             Delray Beach, FL 33444
  492. end
  493. %G =
  494. %E = 0
  495. exit
  496.  
  497. -vercheck
  498.     if version() = "version()" then %f = "unknown." | skip 2
  499.     parse version() %g %f %g
  500.     if %f > 3.10a then goto -line0
  501.     cls begtype
  502. \1f┌───────────────── YOU ARE RUNNING WITH AN OLD COPY OF EBL! ────────────────┐\0f
  503.  
  504. EBL is constantly being improved.  Because many batch files will take
  505. advantage of the powerful new features of EBL, new batch files may give
  506. errors for things older EBLs didn't recognize.  You should at least be
  507. running with version 3.10b or better!  Unfortunately, your current version
  508. is \%f
  509. end
  510.     call -showhow
  511.     inkey Press any key to start BATDOC....
  512.     goto -line0
  513.  
  514. -showhow begtype
  515.  
  516. To get the latest EBL Version:\0e
  517.  - For $49\07 + $3 s/h: Write us or call 800/634-8188 to \0fregister\07 for
  518.     the latest EBL, all utilities, examples, manual, executive menu
  519.     system, and BBS support. Visa/MC accepted.\0e
  520.  - For $10: \07Write us for the latest \0fshareware\07 disk of EBL and demos.\0e
  521.  - For registered users: \07Send $10 + your serial number to get an \0fupdate\07, or
  522.     call the BAT-BBS with the password in the back of your manual for Free!
  523.     The many other files for registrants will then be available.\0e
  524.  - For overseas users: \07We accept Visa/MC to make your payment easy or send
  525.     check from US bank. Please remember to include $12 overseas shipping.\0f
  526.  
  527.             Seaware Corp.
  528.              Post Office Box 1656
  529.             Delray Beach, FL 33444
  530. \1f└───────────────────────────────────────────────────────────────────────────┘\0f
  531. end
  532. return
  533.