HSPTV!掲示板

以下のスクリプトを実行すると
システムエラーになってしまいました!!!

notesel a
noteload "a"
notesel a1
noteget a,0
notesel a2
noteget a,1

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

notesel a2

noteget a,1

の部分で、変数a2には何も読み込まれていないのが原因です。

ファイル「datafile.txt」を読み込んで、それを変数に代入するには、こうします。

notesel data

noteload "datafile.txt"
noteget a.0,0 //１行目取得
noteget a.1,1 //２行目取得
mes a.0
mes a.1

ちなみに、datafile.txtはこんな感じだとします。

aaa

bbb
ccc
ddd

なんか...できませーん!!!

なのでスクリプトを詳しくします

*label
notesel a
noteload "a"
notesel a1
noteget a,0
notesel a2
noteget a,1
cls
mes "パスワードを入力して下さい\r"
p=""
objmode 2:font "fontname",15,1
input b1,200,20,5
objmode 0
button goto "OK",*bv001
stop
*bv001
a2=int(a2)
a2=a2-999999999999
if b1!a2:dialog "パスワードが違います!!!",1,"":goto *label
picload "background 001.bmp"
mes "ようこそ!"+a1+"さん!"
stop

ここのところをへんこーしてくださいませんか?

つ [参考にどうぞ]

#define FileName		"test.txt"			// ファイル名を宣言しておく(書き換え不可)
//
//
//
*label
	sdim dummy,64								// 文字列
	exist FileName : if (strsize != -1) {		// ファイルを探す。(ある = -1より大きい, ない = -1
		;
		notesel a								// 変数aの操作をします。
			noteload FileName					// 変数aにファイルの内容を読み込む
			;
			noteget user,0						// 変数aの0行目の内容を変数userに代入
			noteget pass,1						// 変数aの1行名の内容を変数passに代入
			;
		noteunsel								// 変数aの操作をここで終わらせる
		;
	} else {dialog "パスワードファイルがありません。"}
	;
	cls											// ウィンドウ初期化
	font msgothic,15,1							// フォント指定(MS ゴシック)
	;
	objmode 2 : objsize 100,20					// オブジェクトをフォント順次、サイズ指定
		pos 10,10 : mes "パスワードを入力して下さい\n"
		pos 10,30 : input dummy,200,20,8
		pos (200+10),30 : button goto "OK",*bv001
stop
//
//
//
*bv001
	if (dummy != pass) {dialog "パスワードが違います!!!",1,"" : goto *label}
	pos 10,50 : mes "ようこそ!"+user+"さん!"
stop

なんとなーく分かったような...
では!!!