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