home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 February
/
Chip_2001-02_cd1.bin
/
bonus
/
demos
/
CS
/
kos
/
07
/
scene07.plg
< prev
next >
Wrap
Text File
|
2000-12-15
|
849b
|
24 lines
<const.plg>
#
clk=oscilator(fce=clock);
kosil_clk=oscilator(add=1,amp=1,freq=0.3);
pes_clk=oscilator(fce=saw,amp=6,freq=0.5);
slunce_clk=oscilator(fce=saw,amp=2,freq=0.1);
kclk=oscilator(fce=clock,freq=2);
kocka_p=path(time=kclk,type=linear_opened,num=5,y=0,1,2,3,4);
kocka_s=oscilator(add=4.5,amp=0.5,freq=-0.5);
kocka_clk=selector(time=clk,type=timer,
num=2,t1=0,t2=2.5,v1=kocka_p,v2=kocka_s);
#
bkg=texture(in=scene07.png);
bkgcpy=mixer(tex=bkg,op=copy);
#
slunce=blender(in=bkgcpy,ani=slunce.ani,frame=slunce_clk);
kocka=blender(in=slunce,ani=kocka2m.ani,frame=kocka_clk);
pes=blender(in=kocka,ani=pes2m.ani,x=-20,frame=pes_clk);
kosil=blender(in=pes,ani=kosil3m.ani,frame=kosil_clk);
#
okrajt=texture(in=okraj.png);
okraj=mixer(in=kosil,tex=okrajt,op=transparency);
output:screen(in=okraj,xres=640,yres=480,pal=my.pal);
#