HSPTV!掲示板

HSPで初回のみ「利用規約」を表示させたい場合はどうすれば良いですか？
初回の場合
「スタートボタンで開始」
↓
「利用規約」
↓
本プログラム開始

こんな感じのプロセスです。
一方「利用規約」に同意した場合は次起動するときに表示されない
「スタートボタンで開始」
↓
本プログラム開始

という形にしたいです。

始めはこんな感じでやるといいかなと思います。

	//	デスクトップに[TestProgram]というフォルダを作成
dirlist s, dir_desktop + "\\TestProgram",5
if stat = 0 {
	mkdir dir_desktop + "\\TestProgram"
	chdir dir_desktop + "\\TestProgram"
}else{
	chdir dir_desktop + "\\TestProgram"
}


text = "利用規約の中身を書く"

screen 0,400,200,4,(ginfo(20)/2)-200,(ginfo(21)/2)-100

pos 100,80
objsize 200,40 : button "スタート",*Start
objsize 80,20 : pos 320,180 : button "設定リセット",*Reset ; 利用規約を同意した場合[rule.ini]というファイルが生成されるのでリセットする場合はファイルを削除
stop

*Start
	exist "rule.ini"
	if strsize = -1 {
		clrobj ; オブジェクト削除
		font "メイリオ",15
		pos 10,10 : mes " - 利用規約"
		pos 10,40 : mesbox text,380,100
		objsize 200,40 : pos 100,150 : button "同意",*ini_save
	}else{
		goto*Main
	}

stop


*Reset
exist "rule.ini" ; [rule.ini]というファイルがあるか調べる
if strsize ! -1 : delete "rule.ini" ; ファイルがない場合はstrsizeに-1が入る -1じゃない場合は[rule.ini]を削除

dialog "設定をリセットしました"

stop


*ini_save
	//	利用規約に同意したので[rule.ini]を生成
	
	FileSave = ""
	notesel FileSave
	notesave "rule.ini"
	noteunsel

*Main
	clrobj
	syscolor 17 : boxf : color 255,255,255
	pos 100,100 : mes "本プログラム"