あーたんサンプル。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)
~続~
1そうだね プレイ済み