home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1995 November / PCWK1195.iso / inne / podstawy / dos / 4dos / 4uzytki / ez-btm11.exe / MASTHELP.BTM < prev    next >
Text File  |  1994-04-03  |  920b  |  35 lines
  1. :: MASTHELP.BTM
  2. :: This is a "master HELP" procedure. It runs only as a subsidiary file
  3. :: for another batch file for displaying any lines between the number
  4. :: saved on a variable (default is 3rd line) and a blank line in the
  5. :: primary file.
  6. :: The idea is to use this feature for displaying a HELP text.
  7. :: -------------------
  8. :: Type HELPTEXT to see how it works with both internal and external
  9. :: procedures.
  10. :: -------------------
  11. :: For further instructions and explanations read HELPTEXT.BTM, and
  12. :: this file (%@filename[%@search[%0]]).
  13.  
  14. setlocal
  15.  
  16. iff %_batch==1 then
  17. set lnumber=0
  18. set source=%@search[%0]
  19. goto help
  20. endiff
  21.  
  22. :help
  23. if .%lnumber==. set lnumber=2
  24. cls^screen 2 0
  25. set num=%lnumber
  26.     do forever
  27.        set hl=%@instr[3,70,%@line[%source,%num]]
  28.        set num=%@eval[%num+1]
  29.      if "%hl"=="" leave
  30.        screen %@eval[%_row+1] 4 %hl
  31.     enddo
  32. endlocal
  33. echo.
  34. quit
  35.