home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1995 November / PCWK1195.iso / inne / podstawy / dos / 4dos / 4uzytki / ez-btm11.exe / LOADER.ZIP / NB.BTM < prev    next >
Text File  |  1993-12-08  |  3KB  |  65 lines
  1. : NB.BTM
  2. : This is a batch file to load Nota Bene. It can be used as a model
  3. : for loading various applications, if you need the following:
  4. : (*) Retain the history created during shells from the application
  5. :     (otherwise, 4DOS will retain only the history created before
  6. :     the application was loaded, and the history created while
  7. :     you shell, but not when you shell again). This new history
  8. :     is also retained when the application is quitted.
  9. : NOTE: This is no longer a problem in 4dos 5.x. Fixed accordingly.
  10. : (*) Have the name of the currently loaded application(s) for the
  11. :     4DOS prompt (defined in 4START.BAT). 
  12. :     For Nota Bene, you will have the following prompt:
  13. :     [#1: nb]_D:path
  14. :     ('#1' meaning 'shell level')
  15. :     If you use the same method for other applications, when you load
  16. :     any of these then shell, all relevant application names
  17. :     will be indicated. For example, if SHEZ was loaded:
  18. :     [#2: shez(nb)]_D:path
  19. : (*) Be able to type NB (instead of 'exit') while Nota Bene is loaded
  20. :     without a resulting second loading of Nota Bene.
  21. : (*) Be able to pass various parameters to the application upon loading.
  22. :     In this batch, the switch 'M' will show the Multiset HELP feature,
  23. :     while 'B' will switch you back to the subdirectory from which you
  24. :     started Nota Bene (otherwise, Nota Bene stays in \NB).
  25. : (*) Load Nota Bene via Shroom, a memory manager which can switch Nota Bene
  26. :     off to ramdrive if a large application is run during shell. This
  27. :     saves, of course, the loading-quitting-reloading chain.
  28. C:
  29. if %pgm==nb exit
  30.  
  31. if not %$d == %_lastdisk set $d=%_lastdisk
  32. if %_4ver lt 5 (history > %$d:\history.log ^ history /f)
  33. :Cd \nb
  34. set pgm=nb
  35.  
  36. rem    KSTACK.COM must be loaded via AUTOEXEC.BAT for the following
  37. :      switches to work.
  38. :        Switches:
  39. :      'M' shows Multiset (Even-Zohar HELP feature)
  40. :      'B' switches back to the subdirectory from which you
  41. :          started Nota Bene (otherwise, Nota Bene stays in \NB).
  42.  
  43. :set sh=lh shroom -q -s d:\
  44.  
  45. iff "%1"=="M" then
  46. keystack F1 right right right right right ^ %sh c:\nb\NB.EXE
  47. elseIff "%1"=="B" then
  48. keystack "cd %_cwd" enter ^ %sh c:\nb\NB.EXE
  49.   else
  50. %sh c:\nb\NB.EXE
  51.   endiff
  52. :---------------------------quitting NB---------------------------------
  53. @echo off
  54. set pgm=
  55. if %_4ver lt 5 gosub history
  56. quit
  57.  
  58. :history        ;; Only for versions prior to 5.x
  59. iff exist %$d:\history.log then
  60. history /f
  61. history /r %$d:\history.log
  62. del /q %$d:\history.log
  63. endiff
  64. return
  65.