@‰~E‰~Œ`”z’u kerokero9696 --track0:‰~Žü,-7200,7200,360,1 --track1:ƒTƒCƒY,0,4096,15,1 --track2:–§“x,1,100,10,1 --track3:”¼Œa,1,1000,100,1 --dialog:X•â³,xx=10;Y•â³,yy=10;•`‰æ–§“x,fk=1;ƒTƒCƒY—/chk,chk1=1;‡¬[0-12],md=12;Color/col,col=0xffffff;seed,sd=100; ------------------------------------set t0=obj.track0 t1=obj.track1 t2=obj.track2 t3=obj.track3 ot=math.floor(obj.time*100)/100 count1=math.floor(obj.time/t2*100)/100--Žw’è’l•ª‚Ì1”{‘¬ ------------------------------------fig fig="‰~" col=col fgs2=100 ------------------------------------script lng=t0 fk=10/t2 for i=0,math.abs(lng),fk do if(chk1==0)then fgs1=t1 else fgs1=obj.rand(0,t1,sd,i+10) end obj.load("figure",fig,col,fgs1,fgs2) r=math.pi/180*(i+obj.rz) if(t0<0)then r=-r end cs=math.cos(r) sn=math.sin(r) rnd1=obj.rand(-xx,xx,sd,i*2) rnd2=obj.rand(-yy,yy,sd,i+2) dx=t3*cs+rnd1 dy=t3*sn+rnd2 al=1 obj.setoption("blend",md) obj.draw(dx,dy,0,1,al) end @(™Í™)‰~Œ´Œ^1 kerokero9696 --track0:–§“x,1,1000,10,1 --track1:’·‚³,1,360,360,1 --track2:’P‘Ì–§“x,1,360,60,1 --track3:”¼Œa,1,4096,150,1 --dialog:Œü‚«/chk,chk2=0;ƒTƒCƒY,fgs=5;XŠgŽU”͈Í,xx=20;YŠgŽU”͈Í,yy=20;üŽí/chk,chk1=1;Color/col,col=0xffffff;seed,sd=100;•â‘«,aaa="‡¬ƒ‚[ƒhF·•ªAƒAƒ‹ƒtƒ@ƒ`ƒƒƒ“ƒlƒ‹•t‚«ƒV[ƒ“ƒIƒuƒWƒFƒNƒg‚Æ‚µ‚ÄŽg—pBƒV[ƒ“‚̒ljÁƒtƒBƒ‹ƒ^‚Í‚Ú‚©‚µAƒOƒ[‚̇B" ------------------------------------set t0=10/obj.track0 t1=obj.track1 t2=obj.track2 t3=obj.track3 ------------------------------------fig fig="‰~" col=col fgs2=100 function draw(x,y,sd1) for i=1,360,t2 do local fgs1=obj.rand(2,fgs,sd1,i*5) obj.load("figure",fig,col,fgs1,fgs2) local r=math.deg(i) local cs=math.cos(r) local sn=math.sin(r) local dx=cs*obj.rand(-xx,xx,sd1,i*3)+x local dy=sn*obj.rand(-yy,yy,sd1,i*4)+y obj.draw(dx,dy) end end for j=0,t1,t0 do if(chk2==0)then r=math.rad(j+obj.rz) else r=-math.rad(j+obj.rz) end cs=math.cos(r) sn=math.sin(r) dx=t3*cs dy=t3*sn if(chk1==1)then draw(dx,dy,j*sd) else draw(dx,dy,sd) end end @(™Í™)‰~Œ´Œ^2 kerokero9696 --track0:–§“x,1,1000,10,1 --track1:’·‚³,1,3600,360,1 --track2:’P‘Ì–§“x,1,360,60,1 --track3:”¼Œa,1,4096,150,1 --dialog:Œü‚«/chk,chk2=0;ƒTƒCƒY,fgs=5;XŠgŽU”͈Í,xx=50/(obj.time+1);YŠgŽU”͈Í,yy=50/(obj.time+1);üŽí/chk,chk1=1;Color/col,col=0xffffff;seed,sd=100;ŽcŸæ,nk=0;•â‘«,aaa="‡¬ƒ‚[ƒhF·•ªAƒAƒ‹ƒtƒ@ƒ`ƒƒƒ“ƒlƒ‹•t‚«ƒV[ƒ“ƒIƒuƒWƒFƒNƒg‚Æ‚µ‚ÄŽg—pBƒV[ƒ“‚̒ljÁƒtƒBƒ‹ƒ^‚Í‚Ú‚©‚µAƒOƒ[‚̇B" ------------------------------------set t0=10/obj.track0 t1=obj.track1 t2=obj.track2 t3=obj.track3 ------------------------------------fig fig="‰~" col=col fgs2=100 function draw(x,y,sd1,nn) if(nn<350)then imx=360-nn else imx=10 end for i=1,imx,t2 do local fgs1=obj.rand(2,fgs,sd1,i*5) obj.load("figure",fig,col,fgs1,fgs2) local r=math.deg(i) local cs=math.cos(r) local sn=math.sin(r) local dx=cs*obj.rand(-xx,xx,sd1,i*3)+x local dy=sn*obj.rand(-yy,yy,sd1,i*4)+y obj.draw(dx,dy) end end for j=0,t1,t0 do if(chk2==0)then r=math.rad(j+obj.rz) else r=-math.rad(j+obj.rz) end cs=math.cos(r) sn=math.sin(r) dx=t3*cs dy=t3*sn n1=(t1-j)*nk if(chk1==1)then draw(dx,dy,j*sd,n1) else draw(dx,dy,sd,n1) end end @ƒ‚[ƒ‹ƒXM† kerokero9696 --track0:Size,1,1000,18,1 --track1:Speed,1,1000,10,1 --track2:X,-4096,4096,0,0.1 --track3:Y,-4096,4096,0,0.1 --dialog:•¶Žš“ü—Í,str="Ä×Ä×Ä×";‹æØ‚è,kugiri=" ";‹L†i’·j,f1="[";‹L†i’Zj,f2="E";Font,font="‚µ‚Ë‚«‚á‚Õ‚µ‚å‚ñ";Mode,dmd=3;Color1/col,col1=0x000000;Color2/col,col2=0xffffff;time,tm=obj.time;seed,sd=100; ------------------------------------set t0=obj.track0 t1=obj.track1 t2=obj.track2 t3=obj.track3 ------------------------------------txt obj.setfont(font,t0,dmd,col1,col2) ------------------------------------script pmols="" sl=string.len(str) function aa(n) --long local st=string.rep(f1,n) return (st) end function as(m) --short local st=string.rep(f2,m) return (st) end for i=1,sl do str0=string.sub(str,i,i) if(str0=="±")then mols=aa(2)..as(1)..aa(2) elseif(str0=="²")then mols=as(1)..aa(1) elseif(str0=="³")then mols=as(2)..aa(1) elseif(str0=="´")then mols=aa(1)..as(1)..aa(3) elseif(str0=="µ")then mols=as(1)..aa(1)..as(3) elseif(str0=="¶")then mols=as(1)..aa(1)..as(2) elseif(str0=="·")then mols=aa(1)..as(1)..aa(1)..as(2) elseif(str0=="¸")then mols=as(3)..aa(1) elseif(str0=="¹")then mols=aa(1)..as(1)..aa(2) elseif(str0=="º")then mols=aa(4) elseif(str0=="»")then mols=aa(1)..as(1)..aa(1)..as(1)..aa(1) elseif(str0=="¼")then mols=aa(2)..as(1) elseif(str0=="½")then mols=aa(3)..as(1)..aa(1) elseif(str0=="¾")then mols=as(1)..aa(3)..as(1) elseif(str0=="¿")then mols=aa(3)..as(1) elseif(str0=="À")then mols=aa(1)..as(1) elseif(str0=="Á")then mols=as(2)..aa(1)..as(1) elseif(str0=="Â")then mols=as(1)..aa(2)..as(1) elseif(str0=="Ã")then mols=as(1)..aa(1)..as(1)..aa(2) elseif(str0=="Ä")then mols=as(2)..aa(1)..as(2) elseif(str0=="Å")then mols=as(1)..aa(1)..as(1) elseif(str0=="Æ")then mols=aa(1)..as(1)..aa(1)..as(1) elseif(str0=="Ç")then mols=as(4) elseif(str0=="È")then mols=aa(2)..as(1)..aa(1) elseif(str0=="É")then mols=as(2)..aa(2) elseif(str0=="Ê")then mols=aa(1)..as(3) elseif(str0=="Ë")then mols=aa(2)..as(2)..aa(1) elseif(str0=="Ì")then mols=aa(2)..as(2) elseif(str0=="Í")then mols=as(1) elseif(str0=="Î")then mols=aa(1)..as(2) elseif(str0=="Ï")then mols=aa(1)..as(2)..aa(1) elseif(str0=="Ð")then mols=as(2)..aa(1)..as(1)..aa(1) elseif(str0=="Ñ")then mols=aa(1) elseif(str0=="Ò")then mols=aa(1)..as(3)..aa(1) elseif(str0=="Ó")then mols=aa(1)..as(2)..aa(1)..as(1) elseif(str0=="Ô")then mols=as(1)..aa(2) elseif(str0=="Õ")then mols=aa(1)..as(2)..aa(2) elseif(str0=="Ö")then mols=aa(2) elseif(str0=="×")then mols=as(3) elseif(str0=="Ø")then mols=aa(2)..as(1) elseif(str0=="Ù")then mols=aa(1)..as(1)..aa(2)..as(1) elseif(str0=="Ú")then mols=aa(3) elseif(str0=="Û")then mols=as(1)..aa(1)..as(1)..aa(1) elseif(str0=="Ü")then mols=aa(1)..as(1)..aa(1) elseif(str0=="ƒ")then mols=as(1)..aa(1)..as(2)..aa(1) elseif(str0=="¦")then mols=as(1)..aa(3) elseif(str0=="ƒ‘")then mols=as(1)..aa(2)..as(2) elseif(str0=="Ý")then mols=as(1)..aa(1)..as(1)..aa(1)..as(1) elseif(str0=="Þ")then mols=as(2) elseif(str0=="ß")then mols=as(2)..aa(2)..as(1) elseif(str0=="‚Œ")then mols=as(1)..aa(2)..as(1)..aa(1) elseif(str0=="„¤")then mols=as(1)..aa(1)..as(1)..aa(1)..as(2) elseif(str0=="A")then mols=as(1)..aa(1)..as(1)..aa(1)..as(1)..aa(1) elseif(str0=="i")then mols=aa(1)..as(1)..aa(2)..as(1)..aa(1) elseif(str0=="j")then mols=as(1)..aa(1)..as(2)..aa(1)..as(1) elseif(str0=="˜a•¶’ù³")then mols=as(3)..aa(1)..as(1) elseif(str0=="A")then mols=as(1)..aa(1) elseif(str0=="B")then mols=aa(1)..as(3) elseif(str0=="C")then mols=aa(1)..as(1)..aa(1)..as(1) elseif(str0=="D")then mols=aa(1)..as(2) elseif(str0=="E")then mols=as(1) elseif(str0=="F")then mols=as(2)..aa(1)..as(1) elseif(str0=="G")then mols=aa(2)..as(1) elseif(str0=="H")then mols=as(4) elseif(str0=="I")then mols=as(2) elseif(str0=="J")then mols=as(1)..aa(3) elseif(str0=="K")then mols=aa(1)..as(1)..aa(1) elseif(str0=="L")then mols=as(1)..aa(1)..as(2) elseif(str0=="M")then mols=aa(2) elseif(str0=="N")then mols=aa(1)..as(1) elseif(str0=="O")then mols=aa(3) elseif(str0=="P")then mols=as(1)..aa(2)..as(1) elseif(str0=="Q")then mols=aa(2)..as(1)..aa(1) elseif(str0=="R")then mols=as(1)..aa(1)..as(1) elseif(str0=="S")then mols=as(3) elseif(str0=="T")then mols=aa(1) elseif(str0=="U")then mols=as(2)..aa(1) elseif(str0=="V")then mols=as(3)..aa(1) elseif(str0=="W")then mols=as(1)..aa(2) elseif(str0=="X")then mols=aa(1)..as(2)..aa(1) elseif(str0=="Y")then mols=aa(1)..as(1)..aa(2) elseif(str0=="Z")then mols=aa(2)..as(2) elseif(str0==".")then mols=as(1)..aa(1)..as(1)..aa(1)..as(1)..aa(1) elseif(str0==",")then mols=aa(2)..as(2)..aa(2) elseif(str0==":")then mols=aa(3)..as(3) elseif(str0=="?")then mols=as(2)..aa(2)..as(2) elseif(str0=="'")then mols=as(1)..aa(4)..as(1) elseif(str0=="-")then mols=aa(1)..as(4)..aa(1) elseif(str0=="(")then mols=aa(1)..as(1)..aa(2)..as(1) elseif(str0==")")then mols=aa(1)..as(1)..aa(2)..as(1)..aa(1) elseif(str0=="/")then mols=aa(1)..as(2)..aa(1)..as(1) elseif(str0=="=")then mols=aa(1)..as(3)..aa(1) elseif(str0=="+")then mols=as(1)..aa(1)..as(1)..aa(1)..as(1) elseif(str0=="\"")then mols=as(1)..aa(1)..as(2)..aa(1)..as(1) elseif(str0=="*")then mols=aa(1)..as(2)..aa(1) elseif(str0=="@")then mols=as(1)..aa(2)..as(1)..aa(1)..as(1) elseif(str0=="‰¢•¶’ù³")then mols=as(8) elseif(str0=="1")then mols=as(1)..aa(4) elseif(str0=="2")then mols=as(2)..aa(3) elseif(str0=="3")then mols=as(3)..aa(2) elseif(str0=="4")then mols=as(4)..aa(1) elseif(str0=="5")then mols=as(5) elseif(str0=="6")then mols=aa(1)..as(4) elseif(str0=="7")then mols=aa(2)..as(3) elseif(str0=="8")then mols=aa(3)..as(2) elseif(str0=="9")then mols=aa(4)..as(1) elseif(str0=="0")then mols=aa(5) else mols="ERROR" end if(i==1)then pmols=mols else pmols=pmols..kugiri..mols end end obj.load("text",pmols,t1,tm) dx=t2 dy=t3 obj.effect() obj.draw(dx,dy) ------------------------------------ @ƒ‰ƒ“ƒ_ƒ€ƒJƒEƒ“ƒgƒAƒbƒv kerokero9696 --track0:Min,0,9999,0,1 --track1:Max,0,9999,10,1 --track2:Speed,1,10000,100,1 --track3:Œ…,1,1000,12,1 --dialog:Speed,spd=2;Font,font="‚µ‚Ë‚«‚á‚Õ‚µ‚å‚ñ";SIZE,fs=24;MODE,dmd=3;Color/col,col1=0x000000;Color/col,col2=0xffffff;seed,sd=os.time(); ------------------------------------set t0=math.floor(obj.track0) t1=math.floor(obj.track1) spd=obj.track2/1000 t3=obj.track3 ot=math.floor(obj.time*100)/100 if(t0>=t1)then t1=t0 end ------------------------------------txt obj.setfont(font,fs,dmd,col1,col2) ------------------------------------script if(obj.frame == (0 or 1))then idx=0 end count=ot%spd if(count==0)then idx=idx+obj.rand(t0,t1,sd,obj.frame) end str="%0"..t3.."d" info=string.format(str,idx) it={} for i=1,string.len(info) do if((string.len(info)-i)%3==0)then if(i==string.len(info))then it[i]=string.sub(info,i,i) else it[i]=string.sub(info,i,i).."," end else it[i]=string.sub(info,i,i) end end output="" for i=1,#it do output=output..it[i] end obj.load("text",output) obj.draw() ---------------------------------------- @ƒJƒŒƒ“ƒ_[ kerokero9696 --track0:ƒTƒCƒY,0,100,34,1 --track1:‚¸‚炵,0,6,3,1 --track2:“–“ú,0,31,0,1 --track3:ŒŽ––,28,31,31,1 --dialog:Font,font="‚µ‚Ë‚«‚á‚Õ‚µ‚å‚ñ";Color1/col,col1=0xff0000;Color2/col,col2=0x00b4ff;Color3/col,col3=0xffffff; ------------------------------------set fs=math.floor(obj.track0) t1=math.floor(obj.track1) t2=math.floor(obj.track2) t3=math.floor(obj.track3) ------------------------------------fig fig="‰~" fgs1=fs*1.3 fgs2=fs/10 ------------------------------------script day=t3+t1 nn=7 ------------------------------------ for i=1,day do dx=fs*(nn-(nn-i)%nn+1)-fs*5 dy=fs*math.ceil(i/nn)-fs*3 if(i%7==1)then col=col1 elseif(i%7==0)then col=col2 else col=col3 end if(i-t1<=0)then output="" else output=i-t1 end if(t2==0)then elseif(t2==i-t1)then obj.load("figure",fig,col,fgs1,fgs2) obj.draw(dx,dy+fgs1/12) end obj.setfont(font,fs,0,col,col) obj.load("text",output) obj.draw(dx,dy) end yobi={"“ú","ŒŽ","‰Î","…","–Ø","‹à","“y"} for i=1,7 do dx=fs*i-fs*4 dy=-fs*3 if(i==1)then col=col1 elseif(i==7)then col=col2 else col=col3 end obj.setfont(font,fs,0,col,col) obj.load("text",yobi[i]) obj.draw(dx,dy) end ------------------------------ @Œ•‘MiŠg’£•`‰æjkerokero9696 --track0:ƒTƒCƒY,0,4000,300,1 --track1:“®‚«,-2000,2000,0,0.1 --track2:c‰¡”ä,-100,100,30,0.01 --track3:ˆÊ’u•â³,-5000,5000,100,0.01 --dialog:color1/col,col=0xffffff;MŒW”,a=1.3;G‹­‚³,gty=100;G臒l,gs=30;G‚Ú‚©‚µ,gb=15;GrŒ^,gt=3;n‚µ‚«‚¢’l,ns=40;nƒ^ƒCƒv,nt=3;nŽüŠúX,nsx=40;nŽüŠúY,nsy=0;b”͈Í,bh=5; t0=obj.track0 t1=obj.track1 t2=obj.track2/100 t3=obj.track3 obj.effect() obj.load("figure","‰~",col,t0,4000) obj.aspect=t2 obj.cx=-t0/2 obj.effect("ƒ}ƒXƒN","X",t3,"y",0.5,"ƒTƒCƒY",t0*a,"c‰¡”ä",t2,"ƒ}ƒXƒN‚Ì”½“]",1,"type",1) obj.effect("ƒmƒCƒY","ŽüŠúX",nsx,"ŽüŠúY",nsy,"type",nt,"‚µ‚«‚¢’l",ns) obj.effect("ƒOƒ‰ƒf[ƒVƒ‡ƒ“","’†SY",t1,"•",t0*2/3,"type",gt,"blend",3) obj.effect("ƒOƒ[","‹­‚³",gty,"‚µ‚«‚¢’l",gs,"‚Ú‚©‚µ",gb) obj.effect("‚Ú‚©‚µ","”͈Í",bh) @‰Ô‰Î2D kerokero9696 --track0:ŽžŠÔ,0,100,3,0.01 --track1:‹——£,0,4000,150,0.01 --track2:Šp“x,1,360,150,1 --track3:d—Í,0,100,9.8,0.1 --dialog:–§“x,t3=5;}Œ`/fig,fig="¯Œ^";ƒTƒCƒY,fs1=10;•,fs2=2000;color1/col,col=0xffffff;Seed,sd=99;Frame,fr=100;Min,mn=10;Max,mx=350;‰ŠúŠp“x,ang0=-15; ------------------------------------- t0=obj.track0 t1=obj.track1/1000 t2=obj.track2 g=obj.track3 ------------------------------------- t=obj.time math.randomseed(sd) sd=math.random(1,10000) rndlen1=obj.rand(mn/10,mn,sd,fr) --length1 rndlen2=obj.rand(mn,mx,sd,fr) --length2 ------------------------------------- idx=0 obj.load("figure",fig,col,fs1,fs2) for i=rndlen1*t3,rndlen2*t3 do rndang=obj.rand(0,t2,sd,i) --Angle r=-math.rad(rndang-ang0) sn=math.sin(r) cs=math.cos(r) tct=t/t0 dx=cs*i*t1*tct dy=sn*i*t1*tct+1/2*g*t^2 if(idx==0)then obj.effect() idx=idx+1 end obj.draw(dx/t3,dy/t3) end ------------------------------------- @‰Ô‰Î3D kerokero9696 --track0:ŽžŠÔ,0.01,100,2,0.01 --track1:‹——£,0,4000,150,1 --track2:Šp“x,1,360,150,1 --track3:d—Í,0,100,9.8,0.1 --dialog:–§“x,t3=5;}Œ`/fig,fig="‰~";ƒTƒCƒY,fs1=6;•,fs2=10;color1/col,col=0xffffff;Seed,sd=99;Frame,fr=100;Min,mn=10;Max,mx=350;‰ŠúŠp“x,ang0=-15;zŒW”,zz=2;ÁŽ¸ŒW”,alt=0.5; ------------------------------------- t0=obj.track0 t1=obj.track1/1000 t2=obj.track2 g=obj.track3 ------------------------------------- t=obj.time math.randomseed(sd) sd=math.random(1,10000) rndlen1=obj.rand(mn/10,mn,sd,fr) --length1 rndlen2=obj.rand(mn,mx,sd,fr) --length2 if(zz<=0)then zz=1 end ------------------------------------- obj.load("figure",fig,col,fs1,fs2) idx=0 for i=rndlen1*t3,rndlen2*t3 do rndang=obj.rand(0,t2,sd,i) --Angle r=-math.rad(rndang-ang0) sn=math.sin(r) cs=math.cos(r) tct=t/t0 dx=cs*i*t1*tct dy=sn*i*t1*tct+1/2*g*t^2 dz=-sn*(rndlen2*t3-i/zz)*t1*tct*rand(-100,100,sd,i)/100 if(t<=t0)then al=(t/t0)^4 elseif(t>t0)then al=(obj.totaltime-t-t0)*alt/math.sqrt(obj.totaltime) if(al>=1)then al=1 end end if(idx==0)then obj.effect() idx=idx+1 end obj.draw(dx/t3,dy/t3,dz/t3,1,al) end ------------------------------------- @“®‰æƒTƒ€ƒlƒCƒ‹ kerokero9696 --track0:ŒÂ”,1,100,4,1 --track1:‰¡MAX,1,100,2,1 --track2:X•â³,0,1000,320,0.01 --track3:Y•â³,0,9999,180,0.01 --check0:Info,1 --dialog:File,file="R:\\TEMP\\932.mp4";Ķ‘¬“x,ot=obj.time;“ÇžƒYƒŒ,tk=10; ------------------------------------set t0=obj.track0 t1=obj.track1 t2=obj.track2 t3=obj.track3/2 sw=obj.screen_w sh=obj.screen_h ------------------------------------img&mov for i=1,t0 do if(obj.check0)then fs=24 obj.setfont("‚µ‚Ë‚«‚á‚Õ‚µ‚å‚ñ",fs,3,0x000000,0xffffff) obj.load("text",i) zm=1 else time=ot+i*tk alpha=0 obj.load("movie",file,time,alpha) zm=1/t1 end dx=((i-1)%t1)*t2 dy=((i-1)-((i-1)%t1))*t3 obj.draw(dx,dy,0,zm) end ------------------------------------- --[[http://madeinpc.blog50.fc2.com/]]--