home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 February / Chip_2001-02_cd1.bin / bonus / demos / CS / kos / 17 / scene17.plg < prev    next >
Text File  |  2000-12-15  |  1KB  |  34 lines
  1. <const.plg>
  2. #
  3. bkg=texture(in=titbkg.png);
  4. bkgcpy=mixer(tex=bkg,op=copy);
  5. eva=texture(in=tit1.png);
  6. jan=texture(in=tit2.png);
  7. ptr=texture(in=tit3.png);
  8. osk=texture(in=tit4.png);
  9. dan=texture(in=tit5.png);
  10. #
  11. clk=oscilator(fce=clock,freq=1);
  12. oint=path(time=clk,type=linear_opened,num=25,
  13. y=255,0,0,0,255,255,0,0,0,255,255,0,0,0,255,255,0,0,0,255,255,0,0,0,255);
  14. #
  15. meva=mixer(in=weva,tex=eva,op=translusparency,int=oint);
  16. weva=window(in=bkgcpy,win=meva,x=263,y=191,w=243,h=65);
  17. #
  18. mjan=mixer(in=wjan,tex=jan,op=translusparency,int=oint);
  19. wjan=window(in=bkgcpy,win=mjan,x=295,y=191,w=212,h=65);
  20. #
  21. mptr=mixer(in=wptr,tex=ptr,op=translusparency,int=oint);
  22. wptr=window(in=bkgcpy,win=mptr,x=244,y=191,w=264,h=65);
  23. #
  24. mosk=mixer(in=wosk,tex=osk,op=translusparency,int=oint);
  25. wosk=window(in=bkgcpy,win=mosk,x=256,y=191,w=250,h=65);
  26. #
  27. mdan=mixer(in=wdan,tex=dan,op=translusparency,int=oint);
  28. wdan=window(in=bkgcpy,win=mdan,x=160,y=191,w=346,h=65);
  29. #
  30. tfork=fork(time=clk,type=timer,num=5,
  31. s1=weva,s2=wjan,s3=wptr,s4=wosk,s5=wdan,t1=0,t2=5,t3=10,t4=15,t5=20);
  32. #
  33. output:screen(in=tfork,xres=640,yres=480,pal=my.pal);
  34. #