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