FOR I=0 TO 99~NEXTのところですよ~? 改造していると行番号は変わるので元に戻して見直してみてください。