【SH_REC】 ファイル選択で「キーを押すとその文字で始まるファイルに移動」という便利な機能を付けた。 ただし、その文字で始まるファイルがないとフリーズします。面倒。

結構便利なので、ファイル選択画面だけ取り出して、素材として配布するよ、たぶん

文字で始まるファイルがないとフリーズ（正確には無限ループ）する仕組み 1.次の文字を見つける 2.進み過ぎた、戻ろう 3.前の文字を見つける 4.戻り過ぎた、進もう ループ

FILESで一覧だけ取得してからLEFT$()==SEARCH$とかやればいいんじゃ DIM FILE$[0] VAR SEARCH$ {SEARCHに何か入力する} FILES "DAT:", FILE$ FOR I%=0 TO LEN(FILE$)-1 CASH$ = SHIFT(FILE$) IF LEFT$(CASH$,LEN(SEARCH$))==SEARCH$ THEN PUSH FILE$, CASH$ ENDIF NEXT 先頭から削り取った要素を末尾に追加するところがポイント

ふむ（ややこしそう）

先生「ファイルくんたち～並んでね～」 FILES「並ばせましたー」 ※繰り返し開始 先生「じゃあ、先頭の子来てね～」 IF条件式「うーん、この子違う」 先生「じゃあ帰ってよし！」 先生「じゃあ、次の先頭の子来てね～」 IF条件式「あ、この子条件に一致してるよ」 先生「じゃあ、最高尾に並んでね～」 ※繰り返し終了 先生「これで全員かな？今残ってる人が必要なファイルくんね」

もう解決しているかと思いますが、単純に現在位置の前と後に分けて、 次を検索の場合、 １．現在位置の次から、リストの最後まで検索 　見つかったら、その位置を返す。 ２．リストの先頭から現在位置まで検索 　見つかったら、その位置を返す。 ３．見つからなかったら、現在位置を返す。 のような感じでいのでは？

ふむふむ ちなみに文字コード順前提で前か後ろの一方のみ検索してます

プチコンエディタの検索みたいな動きをさせればいいのかな、と考えました。