「WHILE 1」「WEND」を取り除けばいいです。機会があれば、「WHILE~WEND」について、ヘルプをご覧ください。