あーたんサンプル。10分ほどで作成、動作未確認(笑) acls:n=10:v=2:x=10:y=10:vx=v*cos(pi()/4):vy=v*sin(pi()/4) spset 0,0 sphome 0,7.5,7.5 spcol 0,-5,-5,10,10,true,&H1 spfunc 0,"act" for i=1 to n spset i,1 sphome i,7.5,7.5 spofs i,30+randf()*340,30+rndf()*180 spcol i,-5,-5,10,10,true,&H1 next repeat:vsync:call sprite:until button(2) ~続~