From http://www.jwz.org/xscreensaver/xscreensaver-5.34.tar.gz
[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 $ abstractile   :== $'mydir'abstractile
7 $ anemone       :== $'mydir'anemone
8 $ anemotaxis    :== $'mydir'anemotaxis
9 $ apollonian    :== $'mydir'apollonian
10 $ apple2        :== $'mydir'apple2
11 $ attraction    :== $'mydir'attraction
12 $ barcode       :== $'mydir'barcode
13 $ binaryring    :== $'mydir'binaryring
14 $ blaster       :== $'mydir'blaster
15 $ blitspin      :== $'mydir'blitspin
16 $ bouboule      :== $'mydir'bouboule
17 $ boxfit        :== $'mydir'boxfit
18 $ braid         :== $'mydir'braid
19 $ bsod          :== $'mydir'bsod
20 $ bumps         :== $'mydir'bumps
21 $ ccurve        :== $'mydir'ccurve
22 $ celtic        :== $'mydir'celtic
23 $ cloudlife     :== $'mydir'cloudlife
24 $ compass       :== $'mydir'compass
25 $ coral         :== $'mydir'coral
26 $ crystal       :== $'mydir'crystal
27 $ cwaves        :== $'mydir'cwaves
28 $ cynosure      :== $'mydir'cynosure
29 $ decayscreen   :== $'mydir'decayscreen
30 $ deco          :== $'mydir'deco
31 $ deluxe        :== $'mydir'deluxe
32 $ demon         :== $'mydir'demon
33 $ discrete      :== $'mydir'discrete
34 $ distort       :== $'mydir'distort
35 $ drift         :== $'mydir'drift
36 $ epicycle      :== $'mydir'epicycle
37 $ eruption      :== $'mydir'eruption
38 $ euler2d       :== $'mydir'euler2d
39 $ fadeplot      :== $'mydir'fadeplot
40 $ fiberlamp     :== $'mydir'fiberlamp
41 $ fireworkx     :== $'mydir'fireworkx
42 $ flame         :== $'mydir'flame
43 $ flow          :== $'mydir'flow
44 $ fluidballs    :== $'mydir'fluidballs
45 $ fontglide     :== $'mydir'fontglide
46 $ fuzzyflakes   :== $'mydir'fuzzyflakes
47 $ galaxy        :== $'mydir'galaxy
48 $ goop          :== $'mydir'goop
49 $ grav          :== $'mydir'grav
50 $ greynetic     :== $'mydir'greynetic
51 $ halftone      :== $'mydir'halftone
52 $ halo          :== $'mydir'halo
53 $ helix         :== $'mydir'helix
54 $ hexadrop      :== $'mydir'hexadrop
55 $ hopalong      :== $'mydir'hopalong
56 $ ifs           :== $'mydir'ifs
57 $ imsmap        :== $'mydir'imsmap
58 $ interaggregate        :== $'mydir'interaggregate
59 $ interference  :== $'mydir'interference
60 $ intermomentary        :== $'mydir'intermomentary
61 $ julia         :== $'mydir'julia
62 $ kaleidescope  :== $'mydir'kaleidescope
63 $ kumppa        :== $'mydir'kumppa
64 $ lcdscrub      :== $'mydir'lcdscrub
65 $ loop          :== $'mydir'loop
66 $ m6502         :== $'mydir'm6502
67 $ maze          :== $'mydir'maze
68 $ memscroller   :== $'mydir'memscroller
69 $ metaballs     :== $'mydir'metaballs
70 $ moire         :== $'mydir'moire
71 $ moire2        :== $'mydir'moire2
72 $ mountain      :== $'mydir'mountain
73 $ munch         :== $'mydir'munch
74 $ nerverot      :== $'mydir'nerverot
75 $ noseguy       :== $'mydir'noseguy
76 $ pacman        :== $'mydir'pacman
77 $ pedal         :== $'mydir'pedal
78 $ penetrate     :== $'mydir'penetrate
79 $ penrose       :== $'mydir'penrose
80 $ petri         :== $'mydir'petri
81 $ phosphor      :== $'mydir'phosphor
82 $ piecewise     :== $'mydir'piecewise
83 $ polyominoes   :== $'mydir'polyominoes
84 $ pong          :== $'mydir'pong
85 $ popsquares    :== $'mydir'popsquares
86 $ pyro          :== $'mydir'pyro
87 $ qix           :== $'mydir'qix
88 $ rd-bomb       :== $'mydir'rd-bomb
89 $ ripples       :== $'mydir'ripples
90 $ rocks         :== $'mydir'rocks
91 $ rorschach     :== $'mydir'rorschach
92 $ rotzoomer     :== $'mydir'rotzoomer
93 $ shadebobs     :== $'mydir'shadebobs
94 $ sierpinski    :== $'mydir'sierpinski
95 $ slidescreen   :== $'mydir'slidescreen
96 $ slip          :== $'mydir'slip
97 $ speedmine     :== $'mydir'speedmine
98 $ spotlight     :== $'mydir'spotlight
99 $ squiral       :== $'mydir'squiral
100 $ starfish      :== $'mydir'starfish
101 $ strange       :== $'mydir'strange
102 $ substrate     :== $'mydir'substrate
103 $ swirl         :== $'mydir'swirl
104 $ tessellimage  :== $'mydir'tessellimage
105 $ thornbird     :== $'mydir'thornbird
106 $ triangle      :== $'mydir'triangle
107 $ truchet       :== $'mydir'truchet
108 $ twang         :== $'mydir'twang
109 $ vermiculate   :== $'mydir'vermiculate
110 $ wander        :== $'mydir'wander
111 $ webcollage-helper     :== $'mydir'webcollage-helper
112 $ whirlwindwarp :== $'mydir'whirlwindwarp
113 $ wormhole      :== $'mydir'wormhole
114 $ xanalogtv     :== $'mydir'xanalogtv
115 $ xflame        :== $'mydir'xflame
116 $ xjack         :== $'mydir'xjack
117 $ xlyap         :== $'mydir'xlyap
118 $ xmatrix       :== $'mydir'xmatrix
119 $ xrayswarm     :== $'mydir'xrayswarm
120 $ xspirograph   :== $'mydir'xspirograph
121 $ zoom          :== $'mydir'zoom
122 $ set def [-.DRIVER]
123 $ mydir  = mydisk+f$directory()
124 $ xscreensaver :== $'mydir'xscreensaver
125 $ xscreen*command :== $'mydir'xscreensaver-command
126 $ set def [-]
127 $ exit