Íð¿ô¤Ç¸ºß¤¬Äê¤á¤é¤ì¤¿Ä¾Àþ¤ò¡¢Â¿¿ô£²¼¡¸µ¾å¤Çɽ¼¨¤¹¤ëºÝ¤Ërandomize¤¬¤¢¤ë¤È²¿¤È¤Ê
¤¯µ¬Â§À¤¬¤¢¤ë¤è¤ÊÉÁ²è¤¬¤µ¤ì¤Þ¤·¤¿¡£µÕ¤Ërandomize¤¬¤Ê¤¤¤ÈRPG¡ÊFF¾¡Ë¤È¤«¤Ë¤¢¤ëÀï
Æ®²èÌ̤ËÆÍÆþ¤¹¤ë»þ¤Î¤è¤¦¤ËÉÔµ¬Â§À¤ËÉÁ²è¤µ¤ì¤Þ¤·¤¿¡£Íð¿ô¤È¤·¤ÆŬÀڤʤâ¤Î¤Ï²Ì¤¿¤·
¤Æ¤É¤Î¤è¤¦¤Ê¤â¤Î¤¬Îɤ¤¤Î¤«¡¦¡¦¡¦¡Ê¾Ð¡Ë±ü¿¼¤¤¤â¤Î¤Ç¤¹¡£
screen 0,100,100 objsize 100,20 pos 10,10 : combox RANDCOM,100,"randomize¤¢¤ê\nrandomize¤Ê¤·" pos 10,40 : combox WAITCOM,100,"wait 1\nwait 2\nwait 3\nwait 4\nwait 5\nwait 6\nwait 7\nwait 8\nwait 9\nwait 10" pos 10,70 : button "OK",*SCSTART stop *SCSTART gsel 0,-1 win_x=ginfo(20) : win_y=ginfo(21) RNDX=win_x-100 : RNDY=win_y-100 screen 1,win_x-100,win_y-100,,win_x/2-(win_x-100)/2,win_y/2-(win_y-100)/2-25 cls 4 color 255,255,0 repeat 1000 pos LINX,LINY if RANDCOM=0:randomize LINX=rnd(RNDX) : LINY=rnd(RNDY) line LINX,LINY wait WAITCOM+1 loop stop