@MAÊ°ÄÏ°¸�ì�¬ kerokero9696
--track0:‘¾‚³,1,100,6,1
--track1:‘å‚«‚³,1,1000,50,0.1
--track2:�cŒW�”,1,1000,100,1
--track3:‰¡ŒW�”,1,1000,100,1
--check0:½ÃÝÄÞ¸Þ×½•—,0
--dialog:•`‰æ–§“x,ik=1.00;XŒW�”,xcoef=16;YŒW�”1,ycoef1=13;YŒW�”2,ycoef2=4;YŒW�”3,ycoef3=2;Color/col,col=0xff6a00;seed,sd=100;—̈æŒW�”,ss=40;
------------------------------------set
t0=math.floor(obj.track0)
t1=obj.track1/10
t2=obj.track2/100
t3=obj.track3/100
sw=obj.screen_w
sh=obj.screen_h
------------------------------------script
obj.setoption("drawtarget","tempbuffer",t1*ss*t3,t1*ss*t2)
for i=0,359,ik do
 r=math.rad(i)
 dx=xcoef*math.sin(r)^3
 dy=ycoef1*math.cos(r)-ycoef2*math.cos(r*2)-ycoef3*math.cos(3*r)-math.cos(4*r)

 if(obj.check0)then
  rnd=obj.rand(1,1000,i,sd)
  colR=obj.rand(0,255,sd+i,i*rnd)
  colB=obj.rand(0,255,sd+i*2,i*rnd)
  colG=obj.rand(0,255,sd+i*3,i*rnd)
  col=RGB(colR,colG,colB)
 end
 
 dx=dx*t1*t3
 dy=dy*t1*t2
 obj.load("figure","‰~",col,t0)
 obj.setoption("blend","alpha_add")
 obj.draw(dx,dy)
end
------------------------------------
obj.load("tempbuffer")
obj.rz=obj.rz+180

@MA•s’èŒ`•úŽË‘f�Þ kerokero9696
--track0:ŒÂ�”,1,100,5,1
--track1:»²½Þ,1,1000,15,1
--track2:‘¬“x,0,1000,50,0.01
--track3:•`‰æ–§“x,1,120,8,1
--check0:Info,1
--dialog:ŒÂ•ÊŠÔŠu,pp1=1.10;—̈æŒW�”,ryo=1.50;�}Œ`‘I‘ð/fig,fig="‰~";Color/col,col=0xffffff;
------------------------------------set
t0=obj.track0-1
t1=obj.track1
t2=obj.track2
t3=obj.track3
sw=obj.screen_w
sh=obj.screen_h
ogvz=obj.getvalue("zoom")/100
count1=math.floor(obj.time/t0*100)/100--Žw’è’l•ª‚Ì1”{‘¬
count2=math.floor(obj.time%t0*100)/100--Žw’è’l•b‚²‚Æ‚É0
bpm=math.sin(120*obj.time/60*math.pi*2)
if(bpm>0)then bpm=bpm else  bpm=0 end
------------------------------------set2
fgs1=t1
len=t0
dst0=fgs1*pp1
dst1=dst0*(len+1)*ryo
spd=t2
jk=t3
------------------------------------script
if(obj.check0)then
obj.setoption("drawtarget","tempbuffer",dst1*2+fgs1,dst1*2+fgs1)
obj.load("figure",fig,col,fgs1)
for j=0,359,jk do
 for i=0,len do
  dst=(i+j)*dst0+obj.time*spd
  ang0=0
  r=math.rad(j-90)
  cs=math.cos(r)
  sn=math.sin(r)
  dx=dst%dst1*cs
  dy=dst%dst1*sn
  rz=j-i
  obj.setoption("blend","alpha_add")
  obj.draw(dx,dy,0,1,1,0,0,rz)
 end
end
------------------------------------
obj.load("tempbuffer")
else
 font="‚µ‚Ë‚«‚á‚Õ‚µ‚å‚ñ"
 fs=18 dmd=0
 col1=col col2=col
 obj.setfont(font,fs,dmd,col1,col2)
 info="Šeƒgƒ‰ƒbƒNƒo�[‚ƌ•ʊԊu�A—̈æŒW�”‚Ì�”’l‚ð˜M‚è\n�w‚Ú‚©‚µ�{ƒ¿�x‚Æ‘g‚Ý�‡‚킹‚é‚Æ\n–Ê”’‚¢‚±‚Æ‚É‚È‚é‚©‚à‚µ‚ê‚Ü‚¹‚ñ�B"
 obj.load("text",info)
 obj.draw(-sw/2+string.len(info/3)*fs/2,0)
end

@MA—¼’[’²�®‹È�ü•`‰æ kerokero9696
--track0:‘¾‚³,0,100,10,1
--track1:±Ý¶°,4,16,5,1
--track2:–§“x,1,1000,100,1
--track3:‘¬“x,1,9999,1000,1
--check0:•`‰æ,0
--dialog:�}Œ`‘I‘ð/fig,fig="‰~";Color/col,col=0xffc800;�À•W,pos={-300,0,-150,-100,0,100,150,-100,300,-0};
------------------------------------set
t0=math.floor(obj.track0)
t1=math.floor(obj.track1)
t2=math.floor(obj.track2)
t3=obj.track3/10
------------------------------------script
if(xx==null)then xx={} end
if(yy==null)then yy={} end
anc=t1
obj.setanchor("pos",anc,"line")
--�À•W‚ð’è‹`
for i=1,anc do
 xx[i]=pos[2*i-1]
 yy[i]=pos[2*i]
end

if(#xx>anc)then
 for i=anc+1,#xx do
  xx[i]=null
  yy[i]=null
 end
end

--•âŠÔ‹È�ü‚Ì•`‰æ
obj.load("figure",fig,col,t0)
nidx=0
n=t2
ik=1
for j=1,anc do
 for i=0,n,ik do
  tm=1/n*i
  dx,dy=obj.interpolation(tm,xx[j],yy[j],xx[j+1],yy[j+1],xx[j+2],yy[j+2],xx[j+3],yy[j+3])
  if(obj.check0)then
   if(nidx<obj.time*t3+1)then
    obj.draw(dx,dy)
   end
   nidx=nidx+1
  else
   obj.draw(dx,dy)
  end
 end
end

--[[http://madeinpc.blog50.fc2.com/]]--