»ä¤Î¤ä¤êÊý¤Ç¤Ï¡¢¾®¿ôÂ裶°Ì¤Þ¤Ç¡Ö£°¡×¤¬É½¼¨¤µ¤ì¤ë¤Î¤Ç
mes a
¤ÎÁ°¤Ë¡¡
a=int(a)
¤òÉÕ¤±¤Æ¡¡repeat 25 ¤Ë¤¹¤ë¤È¡¢·×»»¤Ç¤¤ë¤Î¤Ï£±£°²¯¤Þ¤Ç¤Ç¡¢
É¥»¥ó¥Á¥á¡¼¥È¥ë¤µ¤ó¤Î¸À¤ï¤ì¤ë¤è¤¦¤Ë¡¢¤½¤ì°Ê¾å¤Ï°·¤¨¤Ê¤¯¤Ê¤ê¤Þ¤¹¡£
¤µ¤é¤Ë¡¢£±£°£°£°Ëü¤Îɽ¼¨¤¬¡¢£±¤Ä¾¯¤Ê¤¤£¹£¹£¹£¹£¹£¹¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£
a = "¥ë¡¼¥×¡¡·å¿ô "
b = 1
flg = 0
y = 0
repeat
color 255,255,255
boxf 0,y*16,640,y*16+16
y += ( flg = 0 ) - ( flg > 0 )
flg = ( flg = 0 and y >= 29 ) + flg
color 0,0,0
pos 0,y*16:mes a
if flg != 0 {
a += "" + b + "¢ª"
b *=10
}
wait 10
if y < 0 :break
loop
pos 0,0 : mes "end"