/i オプション追加

UTF-8スクリプト対応

README.md

@@ -4,7 +4,6 @@
 [HSP](http://hsp.tv/)スクリプトをコンパイル・実行するためのツールです。
 標準のHSPスクリプトエディタのコンパイル機能に加え、以下の機能があります。
 
-- 文字列データを UTF-8 に変換したコンパイル
 - start.ax 作成時にファイルのサイズ表示（差分あり）
 - 拡張定義によるコンパイル対象変更
 
@@ -56,7 +55,9 @@
 
 - **`/r`** : コンパイルの結果レポートを表示します。実行はされません。
 
-- **`/u`** : 文字列データを UTF-8 に変換してコンパイルします。
+- **`/i`** : UTF-8 で記述されたスクリプトをコンパイルします。
+
+- **`/u`** : 文字列データを Shift_JIS から UTF-8 に変換してコンパイルします。
 
 - **`/me`** : 実行ファイルを作成します。
 

make.hsp

@@ -3,7 +3,7 @@
 ; #define global CONSOLE
 
 #define global CAPTION  "Cmptage"
-#define global VERSION  "v.0.6.1.0"
+#define global VERSION  "v.0.7.0.0"
 #define global AUTHOR   "K-s (@skymonsters_Ks)"
 
 #ifdef CONSOLE

src/main.hsp

@@ -7,13 +7,26 @@
 #include "kernel32.as"
 #include "user32.as"
 
+#define ctype ERR_DIALOG(%1) dispDialog %1, 1
+#define ctype INFO_DIALOG(%1) dispDialog %1
+
+#module
+
+#deffunc dispDialog str msg, int type
+
+	if (type) {
+		s = "Error - "
+	} else {
+		s = "Info - "
+	}
 #ifdef CONSOLE
-#define ctype ERR_DIALOG(%1) mes CAPTION + " Error - " + %1
-#define ctype INFO_DIALOG(%1) mes CAPTION + " Info - " + %1
+	mes CAPTION + " " + s + msg
 #else
-#define ctype ERR_DIALOG(%1) dialog %1, 1, "Error - " + CAPTION
-#define ctype INFO_DIALOG(%1) dialog %1, , "Info - " + CAPTION
+	dialog msg, type, s + CAPTION
 #endif
+	return
+
+#global
 
 #define DEFAULT_RUNTIME "hsp3.exe"
 #define SOURCE_CONVERTER "hsp3cnv.exe"
@@ -207,7 +220,8 @@
 	report_disp = 0  ; ���ʃ��|�[�g�\���t���O
 	cmdline_use = 0  ; �R�}���h���C���E�B���h�E�g�p�t���O
 	exmacro_use = 1  ; HSP�g���}�N���g�p�t���O
-	cnvutf8_use = 0  ; UTF-8�R���p�C���t���O
+	inputf8_use = 0  ; UTF-8���̓t���O
+	cnvutf8_use = 0  ; UTF-8�ϊ��t���O
 	make_file_id = 0  ; �t�@�C�������t���O�iMAKE_xxx�j
 	exdefine_use = 0  ; �g����`�g�p�t���O
 	hwnd_tpEdit = 0  ; hsptmp�g�p�t���O�iTeraPad�G�f�B�b�g�R���g���[���̃n���h���j
@@ -254,7 +268,18 @@
 					}
 				}
 				continue
+			case "i"
+				if (cnvutf8_use) {
+					ERR_DIALOG("�I�v�V���� /i �� /u �͕��p�ł��܂���")
+					end
+				}
+				inputf8_use = 1
+				continue
 			case "u"
+				if (inputf8_use) {
+					ERR_DIALOG("�I�v�V���� /u �� /i �͕��p�ł��܂���")
+					end
+				}
 				cnvutf8_use = 1
 				continue
 			case "ma"
@@ -480,7 +505,7 @@
 	hsc_ini scrName
 	hsc_refname scrName_err
 	hsc_objname scrDir + objName
-	hsc_comp debug_info | (cnvutf8_use << 2), (exmacro_use ^ 1) | ((make_file_id == MAKE_EXE) << 2), debug_disp
+	hsc_comp debug_info | (cnvutf8_use << 2), (exmacro_use ^ 1) | ((make_file_id == MAKE_EXE) << 2) | (inputf8_use << 5), debug_disp
 	if (stat != 0) {
 		goto *dispReport
 	}