13行目　PRG2$=MID$(PRG$、K,M-K+1) 19行目　K=K+LEN(PRG2$) INSTR関数は文字列変数の指定位置から検索して指定文字が 何文字目にあるかを返してくるんでこの数値をMID$関数で 文字数に指定したりKに足すとおかしな動作になってしまいます。