FOR I=0 TO 6000 GX=GX+60 GY=GY+60 GLINE 0,0,GX,GY NEXT これでフリーズしますよ！