home *** CD-ROM | disk | FTP | other *** search
/ vsiftp.vmssoftware.com / VSIPUBLIC@vsiftp.vmssoftware.com.tar / FREEWARE / FREEWARE40.ZIP / xscreensaver-126 / src / setup.com < prev    next >
Text File  |  1995-12-27  |  987b  |  32 lines
  1. $! Xscreensaver - definition of various DCL symbols
  2. $ set NOON
  3. $ set def [.HACKS]
  4. $ mydisk = f$trnlmn("SYS$DISK")
  5. $ mydir  = mydisk+f$directory()
  6. $ attrac*tion :== $'mydir'attraction
  7. $ blitspin    :== $'mydir'blitspin
  8. $ decays*creen:== $'mydir'decayscreen
  9. $ flame       :== $'mydir'flame
  10. $ greyne*tic  :== $'mydir'greynetic
  11. $ halo        :== $'mydir'halo
  12. $ helix       :== $'mydir'helix
  13. $ hopalong    :== $'mydir'hopalong
  14. $ hypercube   :== $'mydir'hypercube
  15. $ imsmap      :== $'mydir'imsmap
  16. $ lmorph      :== $'mydir'lmorph
  17. $ maze        :== $'mydir'maze
  18. $ noseguy     :== $'mydir'noseguy
  19. $ pedal       :== $'mydir'pedal
  20. $ pyro        :== $'mydir'pyro
  21. $ qix         :== $'mydir'qix
  22. $ rocks       :== $'mydir'rocks
  23. $ rorsch*ach  :== $'mydir'rorschach
  24. $ slidescr*een:== $'mydir'slidescreen
  25. $ xroger      :== $'mydir'xroger
  26. $ set def [-.DRIVER]
  27. $ mydir  = mydisk+f$directory()
  28. $ xscreensaver :== $'mydir'xscreensaver
  29. $ xscreen*command :== $'mydir'xscreensaver-command
  30. $ set def [-]
  31. $ exit 
  32.