home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 February / Chip_2001-02_cd1.bin / bonus / demos / CS / pin / pinokijo.plg < prev    next >
Text File  |  2000-05-05  |  23KB  |  671 lines
  1. ###########################################################
  2. #### pinokijo / movsd -> sagvan script by redox^movsd  ####
  3. ###########################################################
  4. #
  5. ############ const.plg ############
  6. const.plg:script{
  7. #
  8. # Std. constants database by redox^movsd
  9. #
  10. sinus=constant(k=1);
  11. square=constant(k=2);
  12. saw=constant(k=0);
  13. timer=constant(k=3);
  14. clock=constant(k=4);
  15. solid=constant(k=0);
  16. rgb=constant(k=1);
  17. opened=constant(k=0);
  18. closed=constant(k=1);
  19. copy=constant(k=2);
  20. add=constant(k=3);
  21. alpha=constant(k=6);
  22. invert=constant(k=12);
  23. stream=constant(k=0);
  24. bump=constant(k=8);
  25. left=constant(k=0);
  26. right=constant(k=1);
  27. center=constant(k=2);
  28. texture=constant(k=1);
  29. transluency=constant(k=4);
  30. transparency=constant(k=5);
  31. translusparency=constant(k=9);
  32. sqrtdiv=constant(k=0);
  33. sqrt=constant(k=1);
  34. div=constant(k=2);
  35. sqrtdiv_add=constant(k=3);
  36. sqrt_add=constant(k=4);
  37. div_add=constant(k=5);
  38. clear=constant(k=7);
  39. ver_blur=constant(k=10);
  40. hor_blur=constant(k=11);
  41. blur=constant(k=21);
  42. quarter=constant(k=2);
  43. hor_half=constant(k=0);
  44. ver_half=constant(k=1);
  45. flip=constant(k=3);
  46. clip=constant(k=0);
  47. resize=constant(k=1);
  48. tunnel=constant(k=1);
  49. plane=constant(k=0);
  50. sphere=constant(k=2);
  51. shaded=constant(k=1);
  52. normal=constant(k=0);
  53. shaded_plane=constant(k=3);
  54. shaded_tunnel=constant(k=4);
  55. shaded_sphere=constant(k=5);
  56. flat=constant(k=1);
  57. wire=constant(k=0);
  58. phong=constant(k=2);
  59. glenz=constant(k=3);
  60. vector=constant(k=4);
  61. gouraud=constant(k=5);
  62. texture=constant(k=6);
  63. env=constant(k=7);
  64. phong_texture=constant(k=8);
  65. gouraud_texture=constant(k=9);
  66. #
  67. };
  68. ############ end.plg ############
  69. end.plg:script{
  70. #
  71. <const.plg>
  72. movsd_png=texture(in=movsd.png);
  73. movsd=mixer(tex=movsd_png);
  74. pclk=oscilator(fce=clock);
  75. spc=path(time=pclk,num=6,y=200,150,100,50,25,0);
  76. c_sin=oscilator(amp=32,add=192);
  77. title:text(b=c_sin,in=movsd,str=redox_._dement_._strejda_._osk_._filipes_._adamj,x=320,y=360,
  78. org=center,space=spc,font=winds.fnt);
  79. #
  80. bint=path(time=pclk,num=6,y=50,30,15,10,5,0);
  81. blur=mixer(in=bwin,op=hor_blur,int=bint);
  82. bwin=window(in=title,win=blur,x=170,y=315,w=290,h=40);
  83. output:screen(in=bwin,xres=640,yres=480,x=0,y=90,w=640,h=300);
  84. #
  85. };
  86. ############ hodiny.plg ############
  87. hodiny.plg:script{
  88. #
  89. <const.plg>
  90. <osc.plg>
  91. hodiny_png=texture(in=hodiny.png);
  92. hodiny=mixer(tex=hodiny_png);
  93. #
  94. sachy=texture(in=sachy.png);
  95. zclk=oscilator(fce=clock,freq=1000);
  96. map:mapper(tex=sachy,z=zclk,a=3.14,c=1.57,b=1.57,type=shaded_plane);
  97. inv_map:mixer(in=map,op=invert);
  98. map_win=window(in=hodiny,win=inv_map,x=200,y=100,w=200,h=120);
  99. #
  100. alfa2a:oscilator(fce=0,amp=6.28,freq=0.3);
  101. alfa2b:oscilator(fce=0,amp=6.28,freq=0.1);
  102. alfa1a:oscilator(fce=0,amp=6.28,freq=0.4);
  103. alfa1b:oscilator(fce=0,amp=6.28,freq=0.5);
  104. #
  105. box1a=object(in=hodiny_win,obj=hod1.vec,bb=-16,z=-50,b=alfa1a,type=wire);
  106. box1b=object(in=box1a,obj=hod1.vec,bb=-32,z=-50,b=alfa1b,type=wire);
  107. box2a=object(in=box1b,obj=hod2.vec,bb=-16,z=-50,b=alfa2a,type=wire);
  108. box2b=object(in=box2a,obj=hod2.vec,bb=-32,z=-50,b=alfa2b,type=wire);
  109. hodiny_win=window(in=map_win,win=box2b,x=0,y=100,w=200,h=300);
  110. #
  111. film=mpeg(in=lid_low.mpg);
  112. film_win=window(in=hodiny_win,win=film,x=220,y=240,w=160,h=120);
  113. #
  114. cls:mixer(op=clear);
  115. comm=voxel(in=cls,b=255,x=x_inf,y=x_inf,a=oalfa);
  116. ckal=mirror(tex=comm,level_hor_half);
  117. cinv=mixer(in=ckal,op=invert);
  118. roto=zoomer(tex=cinv,x=128,y=128,rot=192);
  119. roto_win=window(in=film_win,win=roto,x=425,y=90,w=200,h=300);
  120. #
  121. pclk=oscilator(fce=clock);
  122. ryp=path(time=pclk,num=5,y=-105,-50,0,120,105);
  123. rodinka=texture(in=rodinka.png);
  124. rodinka_mix=mixer(in=rodinka_win,tex=rodinka,op=transluency,int=128);
  125. rodinka_win=window(in=roto_win,win=rodinka_mix,x=425,y=ryp,w=200,h=200);
  126. #
  127. ram_rot1=oscilator(amp=0.2);
  128. ram_rot2=oscilator(amp=0.2,phase=1.57);
  129. ram1=object(in=rodinka_win,obj=ram.vec,z=-160,x=-40,y=-120,bb=-64,a=1.57,b=ram_rot1,type=wire);
  130. ram2=object(in=ram1,obj=ram.vec,z=-160,x=-40,y=-120,bb=-64,a=1.57,b=ram_rot2,type=wire);
  131. #
  132. xp1=oscilator(amp=125,add=125,freq=0.5);
  133. xp2=oscilator(amp=125,add=125,freq=0.5,phase=1.57);
  134. xp3=oscilator(amp=125,add=125,freq=0.5,phase=3.14);
  135. li1=light(i=128,x=xp1,y=25,type=div);
  136. li2=light(i=128,in=li1,x=xp2,y=25,type=div_add);
  137. li3=light(i=128,in=li2,x=xp3,y=25,type=div_add);
  138. l_inv=mixer(in=li3,op=invert);
  139. l_mix=mixer(in=l_win,tex=l_inv,op=transluency,int=128);
  140. l_win=window(in=ram2,win=l_mix,x=400,y=325,w=250,h=50);
  141. #
  142. spc=oscilator(amp=5,add=5,freq=0.25);
  143. title:text(b=0,in=l_win,str=progressive_family,x=520,y=345,
  144. org=center,space=spc,font=wind.fnt);
  145. #
  146. output:screen(in=title,xres=640,yres=480,x=0,y=90,w=640,h=300);
  147. };
  148. ############ intro.plg ############
  149. intro.plg:script{
  150. #
  151. <const.plg>
  152. <osc.plg>
  153. pino=texture(in=pinokijo.png);
  154. #
  155. xp1=oscilator(amp=90,add=160,freq=0.8);
  156. yp1=oscilator(amp=20,add=50,freq=0.8,phase=1.54);
  157. io1=oscilator(amp=200,add=512,freq=0.8);
  158. ialfa:oscilator(fce=saw,amp=6.28,freq=1);
  159. iy_sin:oscilator(fce=saw,amp=700,freq=1);
  160. pclk:oscilator(fce=clock,freq=0.25,phase=-1.5);
  161. pint:path(time=pclk,num=3,y=255,128,0);
  162. pspace:path(time=pclk,num=4,y=640,200,100,20);
  163. #
  164. li1=light(i=io1,x=xp1,y=yp1,type=sqrtdiv);
  165. comm=voxel(in=li1,b=0,x=x_inf,y=x_inf,a=oalfa);
  166. #cloop=loop(in=comm);
  167. cinv=mixer(in=comm,op=invert);
  168. cfli=mirror(tex=cinv,level=flip);
  169. #hkal=mirror(tex=cfli,level=hor_half);
  170. #vkal=mirror(tex=hkal,level=ver_half);
  171. i3d=object(in=cfli,obj=intro.vec,bb=-32,x=-200,x=200,z=-100,a=1.57,b=ialfa,type=wire);
  172. p3d=object(in=i3d,obj=penta.vec,bb=64,y=iy_sin,x=-200,z=-200,a=1.57,b=1.57,type=wire);
  173. kal=mirror(tex=p3d,level=quarter);
  174. iwin=window(win=kal,x=0,y=90,w=640,h=300);
  175. pmix=mixer(in=pwin,tex=pino,op=transluency,int=pint);
  176. pwin=window(in=iwin,win=pmix,x=264,y=140,w=112,h=200);
  177. #
  178. title_cls=mixer(tex=title_win,op=transluency,int=128);
  179. title:text(b=0,in=title_cls,str=pinokijo,x=320,y=2,
  180. org=center,space=pspace,font=wind.fnt);
  181. #title_mix=mixer(in=title,op=transluency,int=pint);
  182. title_win=window(in=pwin,win=title,x=0,y=350,w=640,h=15);
  183. #
  184. output:screen(in=title_win,xres=640,yres=480,x=0,y=90,w=640,h=300);
  185. #
  186. };
  187. ############ komin3d.plg ############
  188. komin3d.plg:script{
  189. #
  190. <const.plg>
  191. <kopac.plg>
  192. pat=texture(in=pat.png);
  193. komin_png=texture(in=komin.png);
  194. komin=mixer(tex=komin_png);
  195. alfa:oscilator(fce=0,amp=6.28,freq=0.1);
  196. #
  197. komin3d=object(in=komin_win,obj=valec.vec,bb=-32,z=400,x=-200,y=300,a=-0.78,b=alfa,c=0.56,type=wire);
  198. komin_win=window(in=komin,win=komin3d,x=0,y=92,w=180,h=300);
  199. #
  200. freq_clk=oscilator(fce=clock,phase=-11,freq=0.5);
  201. freqp=path(time=freq_clk,num=4,y=0.1,0.05,0.01,0.005);
  202. frame_saw=oscilator(fce=saw,amp=500,freq=freqp);
  203. bodaky=scene(idx=0,b3d=bodaky.b3d,key=bodaky.key,
  204. xfov=175,yfov=-120,frame=frame_saw);
  205. bodaky_win=window(in=komin_win,win=bodaky,x=220,y=190,w=320,h=200);
  206. kk_mix=mixer(in=k_win,tex=k_trans,op=transluency,int=128);
  207. pclk=oscilator(fce=clock);
  208. kxp=path(time=pclk,num=5,y=640,550,500,450,470);
  209. k_win=window(in=bodaky_win,win=kk_mix,x=kxp,y=90,w=204,h=204);
  210. #
  211. yclk=oscilator(fce=clock,freq=100);
  212. zzoom=zoomer(tex=pat,y=yclk);
  213. zz_mix=mixer(in=z_win,tex=zzoom,op=transluency,int=128);
  214. z_win=window(in=k_win,win=zz_mix,x=200,y=90,w=40,h=300);
  215. #
  216. xp1=oscilator(amp=50,add=125,freq=0.5;
  217. yp1=oscilator(amp=40,add=50,freq=0.4,phase=1.54);
  218. io1=oscilator(amp=200,add=512,freq=0.1);
  219. #
  220. li1=light(i=io1,x=xp1,y=yp1,type=sqrtdiv);
  221. #li2=light(in=li1,i=io1,x=xp1,y=yp1,type=sqrtdiv_add);
  222. ll_mix=mixer(in=l_win,tex=li1,op=transluency,int=128);
  223. l_win=window(in=z_win,win=ll_mix,x=270,y=120,w=250,h=100);
  224. #
  225. ialfa1:oscilator(fce=saw,amp=6.28,freq=2);
  226. ialfa2:oscilator(fce=saw,amp=6.28,freq=4);
  227. star3d1=object(in=l_win,obj=star.vec,bb=0,x=830,y=-300,a=1.57,b=ialfa1,type=glenz);
  228. star3d2=object(in=star3d1,obj=star.vec,bb=-32,x=830,y=-300,a=1.57,b=ialfa2,type=wire);
  229. #
  230. spc=path(time=pclk,num=5,y=150,100,50,25,10);
  231. title:text(b=255,in=star3d2,str=working_together,x=380,y=370,
  232. org=center,space=spc,font=wind.fnt);
  233. #
  234. output:screen(in=title,xres=640,yres=480,x=0,y=90,w=640,h=300);
  235. #
  236. };
  237. ############ kopac.plg ############
  238. kopac.plg:script{
  239. #
  240. <const.plg>
  241. k0=texture(in=k0.png);
  242. k1=texture(in=k1.png);
  243. k2=texture(in=k2.png);
  244. k3=texture(in=k3.png);
  245. k0b=mixer(tex=k0);
  246. k1b=mixer(tex=k1);
  247. k2b=mixer(tex=k2);
  248. k3b=mixer(tex=k3);
  249. #
  250. k_clk:oscilator(fce=saw,amp=8,freq=0.75);
  251. k_trans_int:oscilator(add=128,amp=128,phase=-1.57,freq=1.5);
  252. #
  253. k_t1:oscilator(time=k_clk,fce=timer,amp=6);
  254. k_t2:oscilator(time=k_clk,fce=timer,amp=4);
  255. k_t3:oscilator(time=k_clk,fce=timer,amp=2);
  256. #
  257. k_mix1a=mixer(in=k_mix2a,tex=k0,op=k_t1);
  258. k_mix2a=mixer(in=k_mix3a,tex=k2,op=k_t2);
  259. k_mix3a=mixer(in=k0,tex=k2,op=k_t3);
  260. #
  261. k_mix1b=mixer(in=k_mix2b,tex=k3b,op=k_t1);
  262. k_mix2b=mixer(in=k_mix3b,tex=k3b,op=k_t2);
  263. k_mix3b=mixer(in=k1b,tex=k1b,op=k_t3);
  264. #
  265. k_trans=mixer(in=k_mix1b,tex=k_mix1a,op=transluency,int=k_trans_int);
  266. #
  267. #k_win=window(win=k_trans,x=250,y=138,w=204,h=204);
  268. #output:screen(in=k_win,xres=640,yres=480);
  269. #
  270. };
  271. ############ lights.plg ############
  272. lights.plg:script{
  273. #
  274. <const.plg>
  275. #
  276. io1=oscilator(amp=32,add=64,freq=0.25);
  277. io2=oscilator(amp=32,add=64,freq=0.25,phase=0.78);
  278. io3=oscilator(amp=32,add=64,freq=0.25,phase=1.57);
  279. io4=oscilator(amp=32,add=64,freq=0.25,phase=2.35);
  280. io5=oscilator(amp=32,add=64,freq=0.25,phase=3.14);
  281. io6=oscilator(amp=32,add=64,freq=0.25,phase=3.92);
  282. #
  283. li1=light(       i=io1,x=15,y=40,type=sqrtdiv);
  284. li2=light(in=li1,i=io2,x=14,y=70,type=sqrtdiv_add);
  285. li3=light(in=li2,i=io3,x=13,y=100,type=sqrtdiv_add);
  286. li4=light(in=li3,i=io4,x=12,y=130,type=sqrtdiv_add);
  287. li5=light(in=li4,i=io5,x=11,y=160,type=sqrtdiv_add);
  288. li6=light(in=li5,i=io6,x=10,y=190,type=sqrtdiv_add);
  289. li_inv=mixer(in=li6,op=invert);
  290. #li_win=window(win=li_inv,x=0,y=90,w=30,h=220);
  291. #output=screen(in=li_win,xres=640,yres=480);
  292. #
  293. };
  294. ############ mamina.plg ############
  295. mamina.plg:script{
  296. #
  297. <const.plg>
  298. m0=texture(in=m0.png);
  299. m1=texture(in=m1.png);
  300. m2=texture(in=m2.png);
  301. m3=texture(in=m1.png);
  302. m0b=mixer(tex=m0);
  303. m1b=mixer(tex=m1);
  304. m2b=mixer(tex=m2);
  305. m3b=mixer(tex=m3);
  306. #
  307. m_clk:oscilator(fce=saw,amp=8,freq=0.5);
  308. m_trans_int:oscilator(add=128,amp=128,phase=-1.57);
  309. #
  310. m_t1:oscilator(time=m_clk,fce=timer,amp=6);
  311. m_t2:oscilator(time=m_clk,fce=timer,amp=4);
  312. m_t3:oscilator(time=m_clk,fce=timer,amp=2);
  313. #
  314. m_mix1a=mixer(in=m_mix2a,tex=m0,op=m_t1);
  315. m_mix2a=mixer(in=m_mix3a,tex=m2,op=m_t2);
  316. m_mix3a=mixer(in=m0,tex=m2,op=m_t3);
  317. #
  318. m_mix1b=mixer(in=m_mix2b,tex=m3b,op=m_t1);
  319. m_mix2b=mixer(in=m_mix3b,tex=m3b,op=m_t2);
  320. m_mix3b=mixer(in=m1b,tex=m1b,op=m_t3);
  321. #
  322. m_trans=mixer(in=m_mix1b,tex=m_mix1a,op=transluency,int=m_trans_int);
  323. #
  324. #m_win=window(win=m_trans,x=118,y=138,w=116,h=192);
  325. #output:screen(in=m_win,xres=640,yres=480);
  326. #
  327. };
  328. ############ osc.plg ############
  329. osc.plg:script{
  330. # begin
  331. rl=oscilator(fce=saw,amp=255,freq=0.5);
  332. rr=oscilator(fce=saw,amp=-255,freq=0.5);
  333. x_inf=oscilator(fce=clock,freq=1);
  334. x_sin=oscilator(amp=128,freq=0.5);
  335. f1_sin=oscilator(amp=1,add=1,freq=0.5);
  336. f2_sin=oscilator(amp=1,add=1,freq=1);
  337. f_sin=oscilator(amp=1,freq=0.01);
  338. r_sin=oscilator(amp=127,add=127,freq=0.1);
  339. g_sin=oscilator(amp=127,add=127,freq=0.5);
  340. b_sin=oscilator(amp=127,add=127,freq=0.7);
  341. oalfa:oscilator(fce=saw,amp=6.28,freq=0.1);
  342. zooming1=oscilator(amp=128,add=256,freq=0.2);
  343. zooming2=oscilator(amp=256,add=256,freq=0.2,phase=1.57);
  344. ox=oscilator(amp=20,freq=0.05);
  345. oy=oscilator(amp=-20,freq=0.05,phase=0.5);
  346. odx=oscilator(amp=128,freq=0.2);
  347. ody=oscilator(amp=128,freq=0.1,phase=0.75);
  348. oamp=oscilator(amp=10,freq=0.01);
  349. # end
  350. };
  351. ############ sagvan.plg ############
  352. sagvan.plg:script{
  353. <const.plg>
  354. #
  355. clss=mixer(op=clear);
  356. #
  357. alfa1=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=0);
  358. alfa2=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=0.78);
  359. alfa3=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=1.57);
  360. alfa4=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=2.35);
  361. alfa5=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=3.14);
  362. alfa6=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=3.92);
  363. alfa7=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=4.70);
  364. alfa8=oscilator(fce=0,amp=6.28,add=0,freq=0.1,phase=5.48);
  365. #
  366. dist0=oscilator(fce=1,amp=100,add=1000,freq=0.25,phase=0);
  367. dist1=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=0);
  368. dist2=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=0.78);
  369. dist3=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=1.57);
  370. dist4=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=2.35);
  371. dist5=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=3.14);
  372. dist6=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=3.92);
  373. dist7=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=4.70);
  374. dist8=oscilator(fce=1,amp=150,add=1000,freq=0.5,phase=5.48);
  375. #
  376. pap1=object(in=clss,obj=sag3.vec,x=320,y=150,z=dist1,a=-1.57,b=3.14,c=alfa1,type=vector);
  377. pap2=object(in=pap1,obj=sag3.vec,x=320,y=150,z=dist2,a=-1.57,b=3.14,c=alfa2,type=vector);
  378. pap3=object(in=pap2,obj=sag3.vec,x=320,y=150,z=dist3,a=-1.57,b=3.14,c=alfa3,type=vector);
  379. pap4=object(in=pap3,obj=sag3.vec,x=320,y=150,z=dist4,a=-1.57,b=3.14,c=alfa4,type=vector);
  380. pap5=object(in=pap4,obj=sag3.vec,x=320,y=150,z=dist5,a=-1.57,b=3.14,c=alfa5,type=vector);
  381. pap6=object(in=pap5,obj=sag3.vec,x=320,y=150,z=dist6,a=-1.57,b=3.14,c=alfa6,type=vector);
  382. pap7=object(in=pap6,obj=sag3.vec,x=320,y=150,z=dist7,a=-1.57,b=3.14,c=alfa7,type=vector);
  383. pap8=object(in=pap7,obj=sag3.vec,x=320,y=150,z=dist8,a=-1.57,b=3.14,c=alfa8,type=vector);
  384. kruh=object(in=pap8,obj=sag2.vec,x=320,y=150,z=dist0,a=-1.57,b=3.14,c=alfa1,type=vector);
  385. _s_=object(in=kruh,obj=sag_s.vec,x=320,y=150,z=dist0,a=-1.57,b=0,c=alfa1,type=vector);
  386. #
  387. blurr=mixer(tex=_s_,op=transluency,int=128);
  388. bwin=window(win=blurr,x=0,y=90,w=640,h=300);
  389. title=text(b=255,in=bwin,str=powered_by_sagvan,
  390. x=320,y=335,org=center,font=winds.fnt);
  391. #
  392. output=screen(in=title,xres=640,yres=480,x=0,y=90,w=640,h=300);
  393. #
  394. };
  395. ############ schody.plg ############
  396. schody.plg:script{
  397. #
  398. <const.plg>
  399. <vlajka.plg>
  400. <lights.plg>
  401. schody_png=texture(in=schody.png);
  402. schody=mixer(tex=schody_png);
  403. zsin=oscilator(amp=50,add=100,freq=0.2);
  404. ssin=oscilator(amp=50,add=128,freq=0.2);
  405. #
  406. schody3d=object(in=schody_win,obj=schody.vec,
  407. x=100,bb=16,z=zsin,y=-350,a=0.15,skew=ssin,type=wire);
  408. schody_win=window(in=schody,win=schody3d,x=425,y=92,w=210,h=300);
  409. #
  410. film=mpeg(in=let_low.mpg);
  411. film_win=window(in=schody_win,win=film,x=260,y=265,w=160,h=120);
  412. #
  413. cls=mixer(op=clear);
  414. zzsin=oscilator(add=1000,amp=400,freq=0.5,phase=1.57);
  415. rrl=oscilator(fce=saw,amp=255,freq=0.5);
  416. zooming=oscilator(amp=256,add=512,freq=0.3);
  417. zoom=zoomer(in=cls,tex=o3d,x=128,y=128,scale=zooming,rot=rrl);
  418. #
  419. alfa1=oscilator(fce=saw,amp=6.28,freq=0.3);
  420. o3d=object(in=blurr,obj=krychle.vec,
  421. z=zzsin,a=alfa1,b=alfa1,c=alfa1,type=glenz);
  422. blurr=mixer(in=feed,op=blur,int=1);
  423. zinv=mixer(in=zoom,op=invert);
  424. kkal=mirror(tex=zinv,level=quarter);
  425. feed=loop(in=kkal);
  426. #
  427. vclk=oscilator(fce=clock);
  428. vyp=path(time=vclk,num=5,y=-50,40,70,120,90);
  429. li_win=window(in=film_win,win=li_inv,x=0,y=90,w=30,h=233);
  430. fwin=window(in=li_win,win=feed,x=245,y=92,w=180,h=170);
  431. fv_mix=mixer(in=v_win,tex=v_trans,op=transluency,int=128);
  432. v_win=window(in=fwin,win=v_trans,x=25,y=vyp,w=221,h=233);
  433. #
  434. ram_rot=oscilator(amp=0.1,freq=0.2);
  435. ram=object(in=sp_win,obj=ram2.vec,x=30,
  436. z=-120,y=-200,bb=-32,a=0.3,b=ram_rot,type=wire);
  437. #
  438. pat=texture(in=pat.png);
  439. alfa=oscilator(fce=saw,amp=6.28,freq=0.1);
  440. sp:mapper(tex=pat,x=32,skew=200,a=alfa,b=alfa,c=alfa,type=shaded_plane);
  441. inv_sp:mixer(in=sp,op=invert);
  442. sp_win=window(in=v_win,win=inv_sp,x=2,y=325,w=240,h=60);
  443. #
  444. pclk=oscilator(fce=clock,phase=-1);
  445. spc=path(time=pclk,num=4,y=100,50,25,2);
  446. title:text(in=ram,str=fractal_dimension,x=130,y=302,b=0,
  447. org=center,space=spc,font=wind.fnt);
  448. #
  449. output=screen(in=title,xres=640,yres=480,x=0,y=90,w=640,h=300);
  450. #
  451. };
  452. ############ setkani.plg ############
  453. setkani.plg:script{
  454. #
  455. <const.plg>
  456. s0=texture(in=s0.png);
  457. s1=texture(in=s1.png);
  458. s2=texture(in=s2.png);
  459. s3=texture(in=s3.png);
  460. s0b=mixer(tex=s0);
  461. s1b=mixer(tex=s1);
  462. s2b=mixer(tex=s2);
  463. s3b=mixer(tex=s3);
  464. #
  465. s_clk:oscilator(fce=saw,amp=8,freq=0.25);
  466. s_trans_int:oscilator(add=128,amp=128,phase=-1.57,freq=0.5);
  467. #
  468. s_t1:oscilator(time=s_clk,fce=timer,amp=6);
  469. s_t2:oscilator(time=s_clk,fce=timer,amp=4);
  470. s_t3:oscilator(time=s_clk,fce=timer,amp=2);
  471. #
  472. s_mix1a=mixer(in=s_mix2a,tex=s0,op=s_t1);
  473. s_mix2a=mixer(in=s_mix3a,tex=s2,op=s_t2);
  474. s_mix3a=mixer(in=s0,tex=s2,op=s_t3);
  475. #
  476. s_mix1b=mixer(in=s_mix2b,tex=s3b,op=s_t1);
  477. s_mix2b=mixer(in=s_mix3b,tex=s3b,op=s_t2);
  478. s_mix3b=mixer(in=s1b,tex=s1b,op=s_t3);
  479. #
  480. s_trans=mixer(in=s_mix1b,tex=s_mix1a,op=transluency,int=s_trans_int);
  481. #
  482. #s_win=window(win=s_trans,x=118,y=138,w=186,h=213);
  483. #output:screen(in=s_win,xres=640,yres=480);
  484. #
  485. };
  486. ############ valec3d.plg ############
  487. valec3d.plg:script{
  488. #
  489. <osc.plg>
  490. <const.plg>
  491. <setkani.plg>
  492. valec_png=texture(in=valec.png);
  493. valec=mixer(tex=valec_png);
  494. alfa:oscilator(fce=0,amp=6.28,freq=0.1);
  495. #
  496. valec3d=object(in=valec_win,obj=valec.vec,bb=-32,z=150,b=alfa,type=wire);
  497. valec_win=window(in=valec,win=valec3d,x=425,y=92,w=210,h=300);
  498. #
  499. #fov_clk=oscilator(fce=clock,phase=-11,freq=0.5);
  500. #xfovp=path(time=fov_clk,num=4,y=150,250,300,100);
  501. #yfovp=path(time=fov_clk,num=4,y=-120,-250,-300,-100);
  502. freq_clk=oscilator(fce=clock,phase=-11,freq=0.5);
  503. freqp=path(time=freq_clk,num=4,y=0.1,0.2,0.3,0.005);
  504. frame_saw=oscilator(fce=saw,amp=500,freq=freqp);
  505. krychle=scene(idx=1,b3d=krychle.b3d,key=krychle.key,
  506. xfov=175,yfov=-120,frame=frame_saw);
  507. star=object(in=krychle,obj=star.vec,
  508. x=500,y=-300,bb=64,b=alfa,a=1.57,type=wire);
  509. krychle_win=window(in=valec_win,win=star,x=100,y=100,w=320,h=200);
  510. #
  511. sclk=oscilator(fce=clock);
  512. sxp=path(time=sclk,num=5,y=-300,-150,-50,0,-40);
  513. ss_mix=mixer(in=s_win,tex=s_trans,op=transluency,int=64);
  514. s_win=window(in=krychle_win,win=ss_mix,x=sxp,y=177,w=186,h=213);
  515. #
  516. pclk=oscilator(fce=clock,phase=-1);
  517. spc=path(time=pclk,num=4,y=100,50,25,0);
  518. title:text(b=255,in=s_win,str=dee_makes_it_possible,x=260,y=280,
  519. org=center,space=spc,font=wind.fnt);
  520. #
  521. map=texture(in=bump.png);
  522. sach=texture(in=sachy_b.png);
  523. pat=texture(in=pat.png);
  524. #
  525. lx1_sin=oscilator(amp=130,add=135,freq=0.4);
  526. ly1_sin=oscilator(amp=30,add=34,freq=0.5,phase=1.57);
  527. #
  528. lx2_sin=oscilator(amp=130,add=135,freq=0.2);
  529. ly2_sin=oscilator(amp=30,add=34,freq=0.5,phase=0.78);
  530. #
  531. l0:light(x=lx1_sin,y=ly1_sin,type=sqrtdiv);
  532. l1:light(in=l0,x=lx2_sin,y=ly2_sin,type=sqrtdiv_add);
  533. sachy=mixer(tex=sach);
  534. bmp:mixer(in=sachy,tex=l1,bump=map,op=bump,int=2);
  535. #
  536. oval_z1=oscilator(add=-50,amp=50);
  537. oval_z2=oscilator(add=-50,amp=50,phase=1.57);
  538. oval1=object(in=bmp,obj=oval.vec,z=oval_z1,bb=64,a=1.57,type=wire);
  539. oval2=object(in=oval1,obj=oval.vec,z=oval_z2,bb=64,a=1.57,type=wire);
  540. #
  541. b_win=window(in=title,win=oval2,x=152,y=310,w=270,h=68);
  542. #
  543. rrint=texture(in=rrinti.png);
  544. int_mix:mixer(in=int_win,tex=rrint,op=add,int=255);
  545. int_win=window(in=b_win,win=int_mix,x=130,y=100,w=270,h=70);
  546. #
  547. alfa:oscilator(fce=saw,amp=6.28,freq=0.5);
  548. zclk=oscilator(fce=clock,freq=500);
  549. tun:mapper(tex=pat,x=32,z=zclk,c=alfa,type=shaded_tunnel);
  550. inv_tun:mixer(in=tun,op=invert);
  551. tun_win=window(in=int_win,win=inv_tun,x=5,y=95,w=90,h=80);
  552. #
  553. zpat=texture(in=zpat.png);
  554. zoom:zoomer(tex=zpat,x=128,y=128,scale=zooming1,rot=rl);
  555. zoom_mix:mixer(in=zoom_win,tex=zoom,op=transluency,int=128);
  556. zoom_win=window(in=tun_win,win=zoom_mix,x=105,y=90,w=20,h=300);
  557. #
  558. output:screen(in=zoom_win,xres=640,yres=480,x=0,y=90,w=640,h=300);
  559. #
  560. };
  561. ############ vlajka.plg ############
  562. vlajka.plg:script{
  563. #
  564. <const.plg>
  565. v0=texture(in=v0.png);
  566. v1=texture(in=v1.png);
  567. v2=texture(in=v2.png);
  568. v3=texture(in=v1.png);
  569. v0b=mixer(tex=v0);
  570. v1b=mixer(tex=v1);
  571. v2b=mixer(tex=v2);
  572. v3b=mixer(tex=v3);
  573. #
  574. v_clk:oscilator(fce=saw,amp=8,freq=0.5);
  575. v_trans_int:oscilator(add=128,amp=128,phase=-1.57);
  576. #
  577. v_t1:oscilator(time=v_clk,fce=timer,amp=6);
  578. v_t2:oscilator(time=v_clk,fce=timer,amp=4);
  579. v_t3:oscilator(time=v_clk,fce=timer,amp=2);
  580. #
  581. v_mix1a=mixer(in=v_mix2a,tex=v0,op=v_t1);
  582. v_mix2a=mixer(in=v_mix3a,tex=v2,op=v_t2);
  583. v_mix3a=mixer(in=v0,tex=v2,op=v_t3);
  584. #
  585. v_mix1b=mixer(in=v_mix2b,tex=v3b,op=v_t1);
  586. v_mix2b=mixer(in=v_mix3b,tex=v3b,op=v_t2);
  587. v_mix3b=mixer(in=v1b,tex=v1b,op=v_t3);
  588. #
  589. v_trans=mixer(in=v_mix1b,tex=v_mix1a,op=transluency,int=v_trans_int);
  590. #
  591. #v_win=window(win=v_trans,x=118,y=138,w=221,h=233);
  592. #output:screen(in=v_win,xres=640,yres=480);
  593. #
  594. };
  595. ############ zena.plg ############
  596. zena.plg:script{
  597. #
  598. <osc.plg>
  599. <const.plg>
  600. <mamina.plg>
  601. zena_png=texture(in=zena.png);
  602. zena=mixer(tex=zena_png);
  603. alfa:oscilator(fce=0,amp=6.28,freq=0.1);
  604. #
  605. xr_sin=oscilator(freq=0.2);
  606. yr_sin=oscilator(freq=0.5,phase=1.57);
  607. xg_sin=oscilator(freq=0.1,phase=2.31);
  608. yg_sin=oscilator(freq=0.3,phase=0.78);
  609. xb_sin=oscilator(freq=0.4,phase=1.02);
  610. yb_sin=oscilator(freq=0.2,phase=0.57);
  611. #
  612. plaz=plazma(xr=xr_sin,yr=yr_sin,xg=xg_sin,yg=yg_sin,xb=xb_sin,yb=yb_sin);
  613. #
  614. wkal=mirror(tex=plaz,level=quarter);
  615. wrap=warper(tex=wkal,x=ox,y=oy,dx=odx,dy=ody,amp=oamp);
  616. skal=mirror(tex=wrap,level=hor_half);
  617. sinv=mixer(in=skal,op=invert);
  618. sw_mix1=mixer(in=swin1,tex=sinv,op=transluency,int=32);
  619. sw_mix2=mixer(in=swin2,tex=sinv,op=transluency,int=32);
  620. sw_mix3=mixer(in=swin3,tex=sinv,op=transluency,int=32);
  621. swin1=window(in=zena,win=sw_mix1,x=10,y=100,w=400,h=40);
  622. swin2=window(in=swin1,win=sw_mix2,x=10,y=150,w=400,h=40);
  623. swin3=window(in=swin2,win=sw_mix3,x=10,y=200,w=400,h=40);
  624. #
  625. zena3d=object(in=zena_win,obj=destnik.vec,
  626. bb=32,y=200,z=100,a=0.6,b=alfa,c=0.2,type=wire);
  627. zena_win=window(in=swin3,win=zena3d,x=450,y=100,w=180,h=200);
  628. #
  629. bow=object(tex=pat,obj=val2.vec,z=zzs,
  630. a=alfa,b=alfa,c=alfa,type=phong_texture);
  631. bowkal=mirror(tex=bow,level=quarter);
  632. b_win=window(in=zena_win,win=bowkal,x=18,y=285,w=100,h=100);
  633. #
  634. dclk=oscilator(fce=clock);
  635. dxp=path(time=dclk,num=5,y=-100,-50,0,50,10);
  636. m_mix=mixer(in=m_win,tex=m_trans,op=transluency,int=64);
  637. m_win=window(in=b_win,win=m_mix,x=dxp,y=100,w=116,h=192);
  638. #
  639. deti=texture(in=deti.png);
  640. pat=texture(in=zpat.png);
  641. zzs=oscilator(add=-150,amp=50);
  642. dyp=path(time=dclk,num=5,y=300,250,200,150,190);
  643. d_mix=mixer(in=d_win,tex=deti,op=transluency,int=32);
  644. d_win=window(in=m_win,win=deti,x=220,y=dyp,w=197,h=200);
  645. #
  646. a1=oscilator(amp=3.14,freq=0.2);
  647. a2=oscilator(amp=3.14,phase=0.39,freq=0.2);
  648. a3=oscilator(amp=3.14,phase=0.78,freq=0.2);
  649. a4=oscilator(amp=3.14,phase=1.17,freq=0.2);
  650. cls:mixer(op=clear);
  651. val1=object(in=cls,obj=val2.vec,y=-220,bb=0,b=a1,type=phong);
  652. val2=object(in=val1,obj=val2.vec,y=-70,bb=0,b=a2,type=phong);
  653. val3=object(in=val2,obj=val2.vec,y=70,bb=0,b=a3,type=phong);
  654. val4=object(in=val3,obj=val2.vec,y=220,bb=0,b=a4,type=phong);
  655. v_mix=mixer(in=val4,op=blur,int=1);
  656. v_inv=mixer(in=v_mix,op=invert);
  657. v_kal=mirror(tex=v_inv,level=quarter);
  658. v_win=window(in=d_win,win=v_kal,x=170,y=90,w=50,h=300);
  659. #
  660. radio=object(in=v_win,obj=radio.vec,
  661. x=-750,y=-400,bb=-64,z=250,a=1.57,b=alfa,type=wire);
  662. #
  663. pclk=oscilator(fce=clock,phase=-1);
  664. spc=path(time=pclk,num=5,y=150,100,50,25,0);
  665. title:text(b=0,in=radio,str=advanced_generation,
  666. x=320,y=193,org=center,space=spc,font=wind.fnt);
  667. #
  668. output:screen(in=title,xres=640,yres=480,x=0,y=90,w=640,h=300);
  669. #
  670. };
  671. ############### end ##############