間違えている所 ・WHILE に対する WENDがないのでエラー ・BUTTON（）がWHILE〜WENDの中にないので、一瞬で操作できなくなる ・9,10行目の >0 の意図がよく分からない ・9,10行目、Y+2,Y+4ではなくY=Y+2,Y=Y+4 ・YYが際限なく増えていくので、カーソルが画面外に出てしまう ・QQ,AAにLOCATEは入らない このあたりを直せばとりあえずエラーはなくなると思いますが、要求通り動かすにはもっと手直しが必要ですね