home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 8 / FreshFishVol8-CD1.bin / useful / sys / s / useful-startup < prev    next >
Encoding:
Text File  |  1995-01-25  |  3.5 KB  |  121 lines
  1. ;===========================================================================
  2. ; This script is executed from your S:User-Startup script in order to
  3. ; set up the USEFUL environment.  All assigns are made relative to "USEFUL:",
  4. ; which has to be assigned prior to running this script.  This would normally
  5. ; be done like:
  6. ;
  7. ;    assign USEFUL: FreshFish-Vol8a:Useful
  8. ;    execute USEFUL:Sys/S/Useful-Startup
  9. ;
  10. ;===========================================================================
  11.  
  12. ; Tools should search LOCAL: for files that the user may have added, since
  13. ; he obviously can't add them to directories on the CD-ROM.  If no LOCAL:
  14. ; is already defined, supply a default assignment to T:, which we know
  15. ; exists.  This assignment can be later overridden in the user's startup.
  16.  
  17. assign LOCAL: exists >NIL:
  18. if WARN
  19.   assign LOCAL: T:
  20. endif
  21.  
  22. ; Add various directories under USEFUL: that supplement the normal
  23. ; system logical defines, like "C:", "LIBS:", "L:", etc.  Note that
  24. ; the standard assignment for HELP: in SYS:S/Startup-Sequence uses
  25. ; the "DEFER" keyword, which means we can't do an ADD to it until
  26. ; after we do something with it, which is what the "dir" command
  27. ; below does.
  28.  
  29. dir HELP: >NIL:
  30.  
  31. assign SYS:    USEFUL:Sys        ADD
  32. assign C:    USEFUL:Sys/C        ADD
  33. assign CLASSES:    USEFUL:Sys/Classes    ADD
  34. assign DEVS:    USEFUL:Sys/Devs        ADD
  35. assign FONTS:    USEFUL:Sys/Fonts    ADD
  36. assign HELP:    USEFUL:Sys/Locale/Help    ADD
  37. assign L:    USEFUL:Sys/L        ADD
  38. assign LIBS:    USEFUL:Sys/Libs        ADD
  39. assign LIBS:    USEFUL:Sys/Classes    ADD
  40. assign LOCALE:    USEFUL:Sys/Locale    ADD
  41. assign S:    USEFUL:Sys/S        ADD
  42.  
  43. assign BIN:    USEFUL:Sys/C        ADD
  44.  
  45. path USEFUL:Sys/C ADD
  46.  
  47. ; Install PasTeX
  48. ; Set the TeX: PKVol: and MF: assignments to the CDROM version.
  49.  
  50. if not EXISTS USEFUL:text/tex/PasTeX
  51.     echo "Warning - PasTex not found."
  52. else
  53.     assign TeX:   USEFUL:text/tex/PasTeX
  54.     assign PKVol: TeX:pk TeX:pk/180x180 TeX:pk/300x300 TeX:pk/360x360
  55.     assign MF:    TeX:mf
  56.     assign REXX:  TeX:rexx add
  57.     path TeX:bin  MF:bin add 
  58. endif
  59.  
  60. ; Install Amiga E.
  61.  
  62. if not EXISTS USEFUL:dev/e/Amiga_E
  63.     echo "Warning - Amiga_E not found."
  64. else
  65.     assign EMODULES: USEFUL:dev/e/Amiga_E/Modules
  66.     path USEFUL:dev/e/Amiga_E/bin add
  67. endif
  68.  
  69. ; Install ACE; an Amiga BASIC compiler.
  70.  
  71. if not EXISTS USEFUL:dev/lang/ACE
  72.     echo "Warning - ACE not found."
  73. else
  74.     assign ACE: USEFUL:dev/lang/ACE
  75.     path ACE:bin add
  76.     assign ACElib:    ACE:lib    ; bas finds scanned libraries here.
  77.     assign ACEbmaps:    ACE:bmaps    ; ace looks here for .bmap files.
  78.     assign ACEinclude:    ACE:include    ; app uses this for include files.
  79. endif
  80.  
  81. ; Find MUI things
  82.  
  83. if not EXISTS USEFUL:dev/gui/MUI
  84.     echo "Warning - MUI not found."
  85. else
  86.     assign MUI: USEFUL:dev/gui/MUI
  87.     assign LIBS: MUI:libs add
  88.     assign LOCALE: MUI:Locale add
  89.     assign HELP: MUI:Docs add
  90. endif
  91.  
  92. ; Add the local datatypes from USEFUL:sys/devs/datatypes.  Apparently
  93. ; just adding the devs directory to the DEVS: assign with a multiassign
  94. ; is not enough, nor is "AddDataTypes REFRESH".  Also supply a default
  95. ; assignment for JPEGTMP: if one does not exist.  This can be overridden
  96. ; later by the user.
  97.  
  98. if exists c:AddDataTypes
  99.   c:AddDataTypes FILES USEFUL:sys/devs/datatypes/GIF
  100.   c:AddDataTypes FILES USEFUL:sys/devs/datatypes/JPEG
  101.   assign JPEGTMP: exists >NIL:
  102.   if WARN
  103.     assign JPEGTMP: T:
  104.   endif
  105. endif
  106.  
  107. ; Make Oberon ready to run.
  108.  
  109. Assign OBERON-A: USEFUL:dev/obero/Oberon-A
  110. Assign FPE:      OBERON-A:
  111. Assign OLIB:     OBERON-A:OLIB
  112. ;
  113. ; Add Oberon-A stuff to system assigns
  114. ;
  115. Assign LIBS:     OBERON-A:LIBS ADD
  116. Assign REXX:     OBERON-A:REXX ADD
  117. ;
  118. ; Make Oberon-A programs visible
  119. ;
  120. Path OBERON-A: OBERON-A:C ADD
  121.