git.hungrycats.org Git - xscreensaver/blob - setup.com

   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 $ bouboule    :== $'mydir'bouboule
   9 $ braid       :== $'mydir'braid
  10 $ bubbles     :== $'mydir'bubbles
  11 $ decays*creen:== $'mydir'decayscreen
  12 $ deco        :== $'mydir'deco
  13 $ drift       :== $'mydir'drift
  14 $ flag        :== $'mydir'flag
  15 $ flame       :== $'mydir'flame
  16 $ forest      :== $'mydir'forest
  17 $ fract       :== $'mydir'fract
  18 $ galaxy      :== $'mydir'galaxy
  19 $ goop        :== $'mydir'goop
  20 $ grav        :== $'mydir'grav
  21 $ greyne*tic  :== $'mydir'greynetic
  22 $ halo        :== $'mydir'halo
  23 $ helix       :== $'mydir'helix
  24 $ hopalong    :== $'mydir'hopalong
  25 $ hypercube   :== $'mydir'hypercube
  26 $ imsmap      :== $'mydir'imsmap
  27 $ ifs         :== $'mydir'ifs
  28 $ julia       :== $'mydir'julia
  29 $ kaleidescope:== $'mydir'kaleidescope
  30 $ laser       :== $'mydir'laser
  31 $ lightning   :== $'mydir'lightning
  32 $ lisa        :== $'mydir'lisa
  33 $ lmorph      :== $'mydir'lmorph
  34 $ maze        :== $'mydir'maze
  35 $ moire       :== $'mydir'moire
  36 $ munch       :== $'mydir'munch
  37 $ noseguy     :== $'mydir'noseguy
  38 $ pedal       :== $'mydir'pedal
  39 $ penrose     :== $'mydir'penrose
  40 $ pyro        :== $'mydir'pyro
  41 $ qix         :== $'mydir'qix
  42 $ rocks       :== $'mydir'rocks
  43 $ rorsch*ach  :== $'mydir'rorschach
  44 $ sierpinski  :== $'mydir'sierpinski
  45 $ slidescr*een:== $'mydir'slidescreen
  46 $ slip        :== $'mydir'slip
  47 $ sphere      :== $'mydir'sphere
  48 $ spiral      :== $'mydir'spiral
  49 $ starfish    :== $'mydir'starfish
  50 $ strange     :== $'mydir'strange
  51 $ swirl       :== $'mydir'swirl
  52 $ xroger      :== $'mydir'xroger
  53 $ set def [-.DRIVER]
  54 $ mydir  = mydisk+f$directory()
  55 $ xscreensaver :== $'mydir'xscreensaver
  56 $ xscreen*command :== $'mydir'xscreensaver-command
  57 $ set def [-]
  58 $ exit