home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ring.yamanashi.ac.jp/pub/pc/freem/action/
/
action.zip
/
baku100.zip
/
baku100
/
Usr
/
ef07.tonyu
< prev
next >
Wrap
Text File
|
2011-08-25
|
243b
|
15 lines
extends DxChar;
y=rnd(100)+100;
scalex=rnd();
zorder=scalex+100;
da=angle($zk01.x-x,$zk01.y-rc);
angle=90;
dd=rnd(360);
vy=rnd()-0.5;
while(1) {
x+=vy*cos(dd);
y+=vy*sin(dd);
if($zk01.x-400>x){$hk--;die();}
update();
}