home *** CD-ROM | disk | FTP | other *** search
- .key file
- .bra {
- .ket }
- ;this script shows the object "file" opening four Dust-windows
-
- echo >T:Dust.script "load(1,{file})"
- echo >>T:Dust.script "closebreakwin"
- echo >>T:Dust.script "window(1,0,0,200,wire,0,0,1.0,true,false)"
- echo >>T:Dust.script "window(1,210,0,200,wire,0,90,1.0,true,false)"
- echo >>T:Dust.script "window(1,0,160,200,wire,90,0,1.0,true,false)"
- echo >>T:Dust.script "window(1,210,160,200,color,30,30,1.0,true,false)"
- echo >>T:Dust.script "request(Exit program ?,Jein,Freilich)"
- stack 100000
- hd1:dust/dust t:Dust.script
- delete >NIL: T:Dust.script
-