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