> 10 rem ｼﾞﾝｺｳ ﾁﾉｳ ﾌﾟﾛｸﾞﾗﾑ
> 100 print"ｱｰ､ﾊﾗﾍｯﾀ";
> 110 gosub 1000
> 120 print"ｱﾆﾒｱﾆﾒ";
> 130 gosub 1000
> 140 print"ﾏﾝｺｼﾃｴ";
> 150 gosub 1000
> 900 end
> 1000 for a=0 to 9999:next
> 1010 return

デクリメントのほうが速いらしいよ

参考：2011/05/06(金)01時17分40秒