files update~

Taromati2/ghost/master/dic/_loading_order.txt

@@ -0,0 +1,8 @@
+includeEX, aya/_loading_order.txt
+dicdir, system
+dicdir, dev
+dicdir, nurturance
+dicdir, communicate
+dicdir, story
+dicdir, games
+dicdir, other

Taromati2/ghost/master/dic/aya/_loading_order.txt

@@ -0,0 +1,2 @@
+dicdir, base
+dicdir, master

Taromati2/ghost/master/dic/aya/base/QuickStart.dic

@@ -0,0 +1,10 @@
+//by steve02081504
+#globaldefine	QuickStartVersion	1
+NeedUpdate{
+	'\0\s[8]很遗憾\w9，这个功能需要线上更新后才能使用\w9\w9\n/
+	\q[◇开始更新,OnUpdate]\n/
+	\q[◇并不需要,Cancel]'
+}
+NeedUpdateText{
+	'线上更新后可用'
+}

Taromati2/ghost/master/dic/aya/base/compatible.dic

@@ -0,0 +1,150 @@
+//******************************************************************************
+//SHIORI/3.0制御スクリプト for AYA
+//互換処理
+//******************************************************************************
+//aya5.dll設定（旧）
+#globaldefine	AYAINFO_VERSION	0
+#globaldefine	AYAINFO_CHARSET	1
+#globaldefine	AYAINFO_PATH	2
+#globaldefine	AYAINFO_NAME	3
+#globaldefine	AYAINFO_AUTHOR	4
+//旧互換性保持のためのシステム関数補完（読み替えのみで対応可能なもの）
+#globaldefine	SETSEPARATOR	SETDELIM
+#globaldefine	TONUMBER2		TOINT
+#globaldefine	TOSTRING2		TOSTR
+#globaldefine	TONUMBER		CVINT
+#globaldefine	TOSTRING		CVSTR
+#globaldefine	ISFUNCTION		ISFUNC
+#globaldefine	BINSTRTONUM		BINSTRTOI
+#globaldefine	HEXSTRTONUM		HEXSTRTOI
+#globaldefine	ERASEVARIABLE	ERASEVAR
+#globaldefine	MSTRLEN			STRLEN
+#globaldefine	MSTRSTR			STRSTR
+#globaldefine	MSUBSTR			SUBSTR
+#globaldefine	MERASE			ERASE
+#globaldefine	MINSERT			INSERT
+#globaldefine	NAMETOVALUE		EVAL
+#globaldefine	CALLBYNAME		EVAL
+//******************************************************************************
+//文 version 4 システム関数 / システム変数の補完
+//汎用関数
+//******************************************************************************
+ASC{
+	if !_argc;								' '
+	elseif GETTYPE(_argv[0]) != 1;			' '
+	elseif _argv[0] < 0 || _argv[0] > 0x7f; ' '
+	else;									CHR(_argv[0])
+}
+//----
+IASC{
+	if !_argc;						-1
+	elseif GETTYPE(_argv[0]) != 3;	-1
+	elseif !STRLEN(_argv[0]);		-1
+	else;							CHRCODE(_argv[0])
+}
+//----
+ISINSIDE{
+	if _argc < 3;												0
+	elseif (_argv[1] <= _argv[0] && _argv[0] <= _argv[2]) || /
+	(_argv[2] <= _argv[0] && _argv[0] <= _argv[1]);				1
+	else;														0
+}
+//----
+ISREAL{
+	if !_argc;						0
+	elseif GETTYPE(_argv[0]) == 2;	1
+	else;							0
+}
+//----
+ISINTEGER{
+	if !_argc;						0
+	elseif GETTYPE(_argv[0]) == 1;	1
+	else;							0
+}
+//******************************************************************************
+//文 version 4 システム関数 / システム変数の補完
+//REQ系関数
+//******************************************************************************
+//----
+REQ.KEY{
+	if !_argc; return
+	switch GETTYPE(_i = _argv[0]) {
+		//エラー
+		''
+		//位置指定
+		var.req.key[_i]
+		//位置指定（実数）　整数化して処理
+		var.req.key[TOINT(_i)]
+		//文字列はエラー
+		''
+	}
+}
+//----
+REQ.HEADER{
+	REQ.KEY(_argv)
+}
+//----
+REQ.VALUE{
+	if !_argc; return
+	switch GETTYPE(_i = _argv[0]) {
+		//エラー
+		''
+		//位置指定
+		var.req.value[_i]
+		//位置指定（実数）　整数化して処理
+		var.req.value[TOINT(_i)]
+		//名前指定
+		{
+			_sz = ARRAYSIZE(var.req.key)
+			for _j = 0; _j < _sz; _j++ {
+				if var.req.key[_j] == _i {
+					var.req.value[_j]
+					break
+				}
+			}
+		}
+	}
+}
+//******************************************************************************
+//文 version 4 システム関数 / システム変数の補完
+//LIB系関数
+//******************************************************************************
+LIB.KEY{
+	if !_argc; return
+	switch GETTYPE(_i = _argv[0]) {
+		//エラー
+		''
+		//位置指定
+		var.lib.key[_i]
+		//位置指定（実数）　整数化して処理
+		var.lib.key[TOINT(_i)]
+		//文字列はエラー
+		''
+	}
+}
+//----
+LIB.HEADER{
+	LIB.KEY(_argv)
+}
+//----
+LIB.VALUE{
+	if !_argc; return
+	switch GETTYPE(_i = _argv[0]) {
+		//エラー
+		''
+		//位置指定
+		var.lib.value[_i]
+		//位置指定（実数）　整数化して処理
+		var.lib.value[TOINT(_i)]
+		//名前指定
+		{
+			_sz = ARRAYSIZE(var.lib.key)
+			for _j = 0; _j < _sz; _j++ {
+				if var.lib.key[_j] == _i {
+					var.lib.value[_j]
+					break
+				}
+			}
+		}
+	}
+}

Taromati2/ghost/master/dic/aya/base/config.dic

@@ -0,0 +1,50 @@
+/*---------------------------------------------------------------------------------------
+*  SHIORI/3.0設定スクリプト for AYA
+* --------------------------------------------------------------------------------------*/
+/*---------------------------------------------------------------------------------------
+*  初期設定値
+* --------------------------------------------------------------------------------------*/
+/* AIトーク関連 -------------------------------------------------------------------------*/
+/*
+TALK_INTERVAL	AIトーク間隔の初期値[秒]
+COM_RATIO		AIトーク中に占めるコミュニケート開始の割合[%]
+*/
+#globaldefine	TALK_INTERVAL	180
+#globaldefine	COM_RATIO		0
+/* インストール済みゴーストリスト構築関連 -----------------------------------------------*/
+/*
+IGLIST_ACCEL
+*	1にするとSSP/CROW時にはNOTIFY installedghostnameで
+*	インストール済ゴーストリストを構築するようになります。
+*	sakura/kero名リストは作成されませんが高速です
+*	0だとファイル走査にて構築します。
+*	インストール済みゴーストが多いと時間がかかります。
+IGLIST_MAX
+*	ファイル走査にてゴーストリストを構築する際、取得する
+*	数の上限を指定します。-1で制限なし（すべて取得）です。
+*	0とすると取得しません。
+*/
+#globaldefine	SHIORI_FW.IGLIST_ACCEL	0
+#globaldefine	SHIORI_FW.IGLIST_MAX	-1
+/* リクエスト解析・レスポンス構築関連 ---------------------------------------------------*/
+/*
+SHIORI_FW.REQUEST_LINES_LIMIT
+*	リクエスト文字列を解析する最大行数です。
+*	減らすと起動等が高速になりますが、完全にインストール
+*	済のゴーストリストを取れなくなったりします。
+*	0ですべての行を取得します。
+SHIORI_FW.RES_REF_MAX
+*	res_referenceの上限
+SHIORI_FW.AUTO_DATA_CONVERT
+*	1にするとAYA5と同等の処理になります。
+*	-SAORIの戻り値などの自動タイプ変換・自動的に\0x01をカンマにする等の処理が入ります。
+*	0にするとそれらの処理を行いません。
+SHIORI_FW.REF_ACCEL
+*	1にすると、reference0 といった変数を作成せず、reference[0] という形で
+*	アクセスするようになります。若干のスピードアップが見込めます。
+*	0にすると、reference0 といった変数を作成します（過去互換処理）
+*/
+#globaldefine	SHIORI_FW.REQUEST_LINES_LIMIT	0
+#globaldefine	SHIORI_FW.RES_REF_MAX			32
+#globaldefine	SHIORI_FW.AUTO_DATA_CONVERT		1
+#globaldefine	SHIORI_FW.REF_ACCEL				0

Taromati2/ghost/master/dic/aya/base/other_defs.dic

@@ -0,0 +1,4 @@
+//by steve02081504
+//
+#globaldefine GETTYPE.string(( GETTYPE.to_string(GETTYPE(
+//))))

Taromati2/ghost/master/dic/aya/base/path_def.dic

@@ -0,0 +1,35 @@
+//by steve02081504
+//
+#globaldefine SHIORI_NAME			aya
+#globaldefine _DIC_DIRS_			'dic'
+//
+#globaldefine _OLD_SAVE_FILES_		'aya_variable.cfg,yaya_variable.cfg,SHIORI_PATH/yaya_variable.cfg'
+#globaldefine SAVE_FILE				SHIORI_PATH/_SAVE_file
+#globaldefine _SAVE_file			aya_variable.cfg
+//
+#globaldefine EMERGENCYMODEDICDIR	VAR_PATH/last_work_able_dic
+//
+#globaldefine DATA_PATH				BASE_PATH/_DATA_path
+#globaldefine IMG_PATH				BASE_PATH/_IMG_path
+#globaldefine SOUND_PATH			BASE_PATH/_SOUND_path
+#globaldefine SAORI_PATH			BASE_PATH/_SAORI_path
+#globaldefine SHIORI_PATH			BASE_PATH/_SHIORI_path
+#globaldefine PROFILE_PATH			BASE_PATH/_PROFILE_path
+#globaldefine PSEUDO_AI_PATH		BASE_PATH/_PSEUDO_AI_path
+#globaldefine VAR_PATH				BASE_PATH/_VAR_path
+#globaldefine SHIORI_BACKUP_PATH	BASE_PATH/_SHIORI_BACKUP_path
+//
+#globaldefine UN_SAORI_path			..
+//
+#globaldefine _DATA_path			data
+#globaldefine _IMG_path				img
+#globaldefine _SOUND_path			sound
+#globaldefine _SAORI_path			saori
+#globaldefine _SHIORI_path			shiori
+#globaldefine _PROFILE_path			profile
+#globaldefine _PSEUDO_AI_path		pseudoAI
+#globaldefine _VAR_path				var
+#globaldefine _SHIORI_BACKUP_path	shiori_backup
+//
+#globaldefine BASE_PATH				.
+//

Taromati2/ghost/master/dic/aya/master/ERRORLOG.dic

@@ -0,0 +1,30 @@
+//E:\ssp\ghost\Taromati2\ghost\master\dic\system\ERRORLOG.dic(17) : error E0041 : 'for'のループ式が異常です.
+ErrorList.SPLIT{
+	_L=SPLIT(RE_REPLACEEX(_argv[0],'\((\d+|-)\) : ',',$1,'),',',3)
+	//("E:\ssp\ghost\Taromati2\ghost\master\dic\system\ERRORLOG.dic","17","error E0041 : 'for'のループ式が異常です.")
+	_L[2]=SPLIT(RE_REPLACEEX(_L[2],' *([WEN])(\d+|-)( *: |：)',',$1,$2,'),',',4)
+	//("E:\ssp\ghost\Taromati2\ghost\master\dic\system\ERRORLOG.dic","17","error","E","0041","'for'のループ式が異常です.")
+	_L
+}
+ErrorList.Gene{
+	ErrorList.filename=IARRAY
+	ErrorList.linenum=IARRAY
+	ErrorList.type=IARRAY
+	ErrorList.typecode=IARRAY
+	ErrorList.code=IARRAY
+	ErrorList.Info=IARRAY
+
+	_l=GETERRORLOG
+	foreach _l;_i{
+		_t=ErrorList.SPLIT(_i)
+		ErrorList.filename,=_t[0]
+		ErrorList.linenum,=TOINT(_t[1])
+		ErrorList.type,=_t[2]
+		ErrorList.typecode,=_t[3]
+		ErrorList.code,=TOINT(_t[4])
+		ErrorList.Info,=_t[5]
+	}
+}
+ClearErrorListVar{
+	ERASEALLVARBEGINAS('ErrorList.')
+}

Taromati2/ghost/master/dic/aya/master/LOADVAR.dic

@@ -0,0 +1,4 @@
+//by steve02081504
+LOADVAR{
+	RESTOREVAR(_argv)
+}

Taromati2/ghost/master/dic/aya/master/array.dic

@@ -0,0 +1,76 @@
+//by steve02081504
+
+ARRAY.GETMIN{
+	if !(_argc>1)
+		_argv=_argv[0]
+	_min=_argv[0]
+	foreach _argv;_i{
+		if _i<_min
+			_min=_i
+	}
+	_min
+}
+ARRAY.GETMAX{
+	if !(_argc>1)
+		_argv=_argv[0]
+	_max=_argv[0]
+	foreach _argv;_i{
+		if _i>_max
+			_max=_i
+	}
+	_max
+}
+ARRAY.BeginAs{
+	_begin=_argv[0]
+	_argv[0]=IARRAY
+	_size=STRLEN(_begin)
+	_aret=IARRAY
+	foreach _argv;_i{
+		if _begin==SUBSTR(TOSTR(_i),0,_size)
+			_aret,=_i
+	}
+	_aret
+}
+INARRAY{
+	_aret=0
+	_t=''
+	if _argc>2{
+		_t=_argv[_argc-1]
+		_argv[_argc-1]=IARRAY
+		ASEARCH(_t,_argv)!=-1
+		return
+	}
+	else{
+		_t=_argv[1]
+		_argv=_argv[0]
+	}
+	foreach _argv;_i{
+		if _t==_i
+			_aret=1
+	}
+	_aret
+}
+ARRAY.GetIndex{
+	_aret=0
+	_t=''
+	if _argc>2{
+		_t=_argv[_argc-1]
+		_argv[_argc-1]=IARRAY
+		ASEARCH(_t,_argv)
+		return
+	}
+	else{
+		_t=_argv[1]
+		_argv=_argv[0]
+	}
+	_size=ARRAYSIZE(_argv)
+	while _aret<_size{
+		if _t==_argv[_aret]
+			break
+		_aret++
+	}
+	if _aret==_size
+		-1
+	else
+		_aret
+}