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 $ ant           :== $'mydir'ant
   7 $ attraction    :== $'mydir'attraction
   8 $ blitspin      :== $'mydir'blitspin
   9 $ bouboule      :== $'mydir'bouboule
  10 $ braid         :== $'mydir'braid
  11 $ bubbles       :== $'mydir'bubbles
  12 $ coral         :== $'mydir'coral
  13 $ decayscreen   :== $'mydir'decayscreen
  14 $ deco          :== $'mydir'deco
  15 $ drift         :== $'mydir'drift
  16 $ fadeplot      :== $'mydir'fadeplot
  17 $ flag          :== $'mydir'flag
  18 $ flame         :== $'mydir'flame
  19 $ forest        :== $'mydir'forest
  20 $ galaxy        :== $'mydir'galaxy
  21 $ goop          :== $'mydir'goop
  22 $ grav          :== $'mydir'grav
  23 $ greynetic     :== $'mydir'greynetic
  24 $ halo          :== $'mydir'halo
  25 $ helix         :== $'mydir'helix
  26 $ hopalong      :== $'mydir'hopalong
  27 $ hypercube     :== $'mydir'hypercube
  28 $ ifs           :== $'mydir'ifs
  29 $ imsmap        :== $'mydir'imsmap
  30 $ julia         :== $'mydir'julia
  31 $ kaleidescope  :== $'mydir'kaleidescope
  32 $ laser         :== $'mydir'laser
  33 $ lightning     :== $'mydir'lightning
  34 $ lisa          :== $'mydir'lisa
  35 $ lissie        :== $'mydir'lissie
  36 $ lmorph        :== $'mydir'lmorph
  37 $ maze          :== $'mydir'maze
  38 $ moire         :== $'mydir'moire
  39 $ mountain      :== $'mydir'mountain
  40 $ munch         :== $'mydir'munch
  41 $ noseguy       :== $'mydir'noseguy
  42 $ pedal         :== $'mydir'pedal
  43 $ penrose       :== $'mydir'penrose
  44 $ puzzle        :== $'mydir'puzzle
  45 $ pyro          :== $'mydir'pyro
  46 $ qix           :== $'mydir'qix
  47 $ rd-bomb       :== $'mydir'rd-bomb
  48 $ rocks         :== $'mydir'rocks
  49 $ rorschach     :== $'mydir'rorschach
  50 $ rotor         :== $'mydir'rotor
  51 $ sierpinski    :== $'mydir'sierpinski
  52 $ slidescreen   :== $'mydir'slidescreen
  53 $ slip          :== $'mydir'slip
  54 $ sphere        :== $'mydir'sphere
  55 $ spiral        :== $'mydir'spiral
  56 $ starfish      :== $'mydir'starfish
  57 $ strange       :== $'mydir'strange
  58 $ swirl         :== $'mydir'swirl
  59 $ triangle      :== $'mydir'triangle
  60 $ vines         :== $'mydir'vines
  61 $ worm          :== $'mydir'worm
  62 $ xjack         :== $'mydir'xjack
  63 $ xlyap         :== $'mydir'xlyap
  64 $ xroger        :== $'mydir'xroger
  65 $ set def [-.DRIVER]
  66 $ mydir  = mydisk+f$directory()
  67 $ xscreensaver :== $'mydir'xscreensaver
  68 $ xscreen*command :== $'mydir'xscreensaver-command
  69 $ set def [-]
  70 $ exit