From 9be74a872a58acc58009b43e60a3da9b9c3d22fa Mon Sep 17 00:00:00 2001
From: Miteruzo <matuda.miteruzo@gmail.com>
Date: Wed, 12 Jul 2023 00:45:37 +0900
Subject: [PATCH] =?UTF-8?q?=E8=A8=AD=E5=AE=9A=E6=A9=9F=E8=83=BD?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 main.hsp                |  6 +++++-
 modules/setting.mod.hsp | 37 +++++++++++++++++++++++++++++++++++++
 modules/user.mod.hsp    |  8 ++++----
 3 files changed, 46 insertions(+), 5 deletions(-)
 create mode 100644 modules/setting.mod.hsp

diff --git a/main.hsp b/main.hsp
index 322dc30..1ddd4c7 100644
--- a/main.hsp
+++ b/main.hsp
@@ -34,6 +34,7 @@
 #include "./modules/chat.mod.hsp"
 #include "./modules/char.mod.hsp"
 #include "./modules/keyboard.mod.hsp"
+#include "./modules/setting.mod.hsp"
 
 
 #ifdef _DEBUG
@@ -76,6 +77,9 @@
 	; ゴートうインスタンス生成
 	Goatoh = New@Goatoh (960, 800, DIRECTION_LEFT)
 
+	; 設定読込み
+	Load@Setting
+
 	; サウンド読込み
 	MMLoad "mumumumu.wav", SOUND_MUMUMUMU
 	MMLoad "MusMus-BGM-097.mp3", SOUND_BGM, MM_REPEAT
@@ -101,7 +105,7 @@
 			Draw@Char
 			Draw@Keyboard
 
-			a = GetChar@Keyboard ()
+			Print GetChar@Keyboard () != False
 			text@Char.Text = text@Keyboard
 		ReDraw True
 
diff --git a/modules/setting.mod.hsp b/modules/setting.mod.hsp
new file mode 100644
index 0000000..9f34211
--- /dev/null
+++ b/modules/setting.mod.hsp
@@ -0,0 +1,37 @@
+#module \
+Setting
+
+#define FILE_NAME	("setting.dat")
+
+; ユーザ ID
+#const USER_ID_OFFSET	0
+#const USER_ID_SIZE	4
+
+; ユーザのパスコード
+#const USER_PASSCODE_OFFSET	(USER_ID_OFFSET + USER_ID_SIZE)
+#const USER_PASSCODE_SIZE	16
+
+#deffunc local \
+Load
+	userId = 0
+	SDim userPasscode, USER_PASSCODE_SIZE
+
+	Exist FILE_NAME
+	If strSize < 0 {
+		Return
+	}
+
+	BLoad FILE_NAME, userId, USER_ID_SIZE, USER_ID_OFFSET
+	BLoad FILE_NAME, userPasscode, USER_PASSCODE_SIZE, USER_PASSCODE_OFFSET
+
+	Return
+
+#deffunc local \
+Save
+	BSave FILE_NAME, userId, USER_ID_SIZE, USER_ID_OFFSET
+	BSave FILE_NAME, userPasscode, USER_PASSCODE_SIZE, USER_PASSCODE_OFFSET
+
+	Return
+
+#global
+
diff --git a/modules/user.mod.hsp b/modules/user.mod.hsp
index 49101a6..7e37ce9 100644
--- a/modules/user.mod.hsp
+++ b/modules/user.mod.hsp
@@ -1,7 +1,7 @@
 #module \
 User
 
-#define URL	(CONFIG_SERVER_URL + "/make_user.php")
+#define URL	(CONFIG_SERVER_URL + "/create_user.php")
 
 #defcfunc local \
 New
@@ -13,11 +13,11 @@ New
 	Return insNum - 1
 
 #deffunc local \
-Make \
+Create \
 		int	p_insId,\
-		local	data
+		local	l_data
 	HTTPLoad URL
-	HTTPInfo data
+	HTTPInfo l_data
 
 	id.p_insId = 0
 	pass.p_insId = ""