スパゲッティ化してそう・・・ NEXTがいっぱい・・・

for が一段深くなるたびに、行頭に一つずつスペース入れると見やすくなりますよ。 def yomikomi dim a$, .. for y2=0 to .. for x2=0 to .. for y=0+y2 to .. read a$ for x=0 .. (略) next next next next end

とくにまだスパゲティーとは思わないですが、MIKIさんの言うようにブロック毎にスペースをいれていくと見やすくなると思いますよ。 それを字下げ（インデント）と言って、プログラムでは一般的な手法だったりします。