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