HSPTV!掲示板

ファイル「○○○.txt」(○○○は1〜の数字)
をあるだけ読み込んで
各ファイルの1行目だけを変数「a」に代入して改行する
作業を無限ループで繰り返して
作業終了後結果を表示する
<<<ファイル数\r各ファイルの1行目の内容\r・・・>>>
です
---スクリプト---
////////////////////////////////////////
//読み込み//
////////////////////////////////////////
mes "/読み込んでいます..."
repeat
c1+1
exist ""+c1+".txt"
if strsize=-1:c1-1:break
notesel c2:noteload ""+c1+".txt"
notesel aa:noteget c2,0
a=""+a+"\r"+aa
wait 100
loop
cls
////////////////////////////////////////
//メイン//
////////////////////////////////////////
mes ""+c1+"\r"+a
stop
---スクリプト終わり---

よろしくお願いします!!!

 notesel c2:noteload ""+c1+".txt"

 notesel aa:noteget c2,0

ここ、おかしいと思うので、よくヘルプで調べてみてください。
( ヒント：noteselは基本的に一回 )

あと、下のほうのww302jpさんの書き込み、返信するか、解決チェック? したほうがいいですよ。

--------------------------
notesel c2:noteload ""+c1+".txt"
notesel aa:noteget c2,0
ここ、おかしいと思うので、よくヘルプで調べてみてください。
( ヒント：noteselは基本的に一回 )

あと、下のほうのww302jpさんの書き込み、返信するか、解決チェック? したほうがいいですよ。
--------------------------
やってみましたが何もわからなかったです...
教えてくれませんか???

協力してくれた方は名前を載せますとか自分で理解しながらプログラミングする気もなく人に作らせてばっかりだからサンプルも理解できないんじゃない？
サンプルばっかり求める人もいるけど理解しなかったらサンプルもただのガラクタ。ガラクタばかりいじってる人はずっとガラクタしか作れないよ。
サンプルをガラクタにするか宝物にするかは本人の自分のちからで理解して作ってやる！って気持ちがあるかないかの違い。
質問ばっかりして人につくらせるのもいいけどそうじゃない人にとっては不愉快な掲示板です。

そうですよね...
でもどうすればいいのか分かりません...
サンプルではなくて
どうすればいいのかを...

>>本人の自分のちからで理解して作ってやる！って気持ちがあるかないかの違い。
>どうすればいいのかを...

ＨＳＰ付属、プログラミング・マニュアルにある、
『メモリノートパッド命令』を読めば分かると思いますよ（＾＾
これで分からない場合は、たぶんアルゴリズムが把握できていないのかも、です（＾＾；

あと、repeat-loop間で、
c1はループ毎に増加するので、c1++　でいいと思います。
ファイル名は３桁なので、strf関数で桁数を揃えなきゃかな。

c1=1
repeat
   fname=""+strf("%03d",c1)+".txt"
   exist fname
   if strsize=-1 :break

   ・・・

   c1++
   wait 100
loop

notesel c2:noteload ""+c1+".txt"
notesel aa:noteget c2,0
a=""+a+"\r"+aa

このスクリプトですと、
Notegetの変数c2は、変数「AA」の一行目を取得しているため、空白のデータしか取れませんので、

notesel c2:noteload ""+c1+".txt":noteget aa,0
a=""+a+"\r"+aa

このようにして取得するか、
ノートパッドを活用して、

repeat
c1+1
exist ""+c1+".txt"
if strsize=-1:c1-1:break
notesel c2:noteload ""+c1+".txt":noteget aa,0
notesel a:noteadd aa,-1,0
await
loop

このようなスクリプトにするというのもどうでしょうか。

次回からは、できるだけヘルプを見てがんばってください。