:改変詳細/置換文字列タグ追加(MMA独自)

Last-modified: 2012-12-30 (日) 03:59:17

変更履歴

2012/12/30T(人柱)版の変更内容

・カスタムメッセージに個数を含まない使用中アイテム名と対象アイテム名を表示する{ciname1}、{tiname1}を使用できるように
・カスタムメッセージで{phis}、{chis}、{this}が日本語モードでも英語になってたのを修正
・カスタムメッセージに{player}、{snpc}、{npc}の性別に対応するhis/hers(日本語モードでは彼の/彼女の)への置換文字列{phis2}、{chis2}、{this2}を使用できるように

2012/12/26T(人柱)版の変更内容

・カスタムメッセージに{snpc}、{npc}の性別に対応する{兄}への置換文字列{cnii}、{tnii}を使用できるように
  ・英語モードで使用するための{兄}互換のタグ{nii}も使用できるように
・カスタムメッセージに{player}、{snpc}、{npc}の性別に対応する妹の呼び名への置換文字列{bro}、{cbro}、{tbro}を使用できるように
  ・{bro}、{cbro}、{tbro}の呼び名は妹と店主妹のみ作戦から個別に設定できる(兄くん、兄上様など)
・カスタムメッセージに{player}、{snpc}、{npc}の性別に対応するhe/she(日本語モードでは彼/彼女)への置換文字列{phe}、{che}、{the}を使用できるように
・カスタムメッセージに{player}、{snpc}、{npc}の性別に対応するhis/her(日本語モードでは彼の/彼女の)への置換文字列{phis}、{chis}、{this}を使用できるように
・カスタムメッセージに{player}、{snpc}、{npc}の性別に対応するhim/her(日本語モードでは彼/彼女)への置換文字列{phim}、{chim}、{thim}を使用できるように
・カスタムメッセージに{player}、{snpc}、{npc}が信仰中の宗派への置換文字列{pgod}、{cgod}、{tgod}を使用できるように
・カスタムメッセージに{player}、{snpc}、{npc}が信仰中の神への置換文字列{psgod}、{csgod}、{tsgod}を使用できるように
  ・{pgod}、{cgod}、{tgod}は機械のマニなど、{psgod}、{csgod}、{tsgod}はマニなどに変換される(カスタムゴッドの名前も含む)

2012/12/24T(人柱)版の変更内容

・カスタムメッセージに{player}、{snpc}、{npc}の性別に対応する{psex}、{csex}、{tsex}を使用できるように

2012/12/22T(人柱)版の変更内容

・カスタムメッセージで{nnpc}、{nsnpc}がCNPC名に対応しないのを修正(omakeからの問題)
  ・英語名の処理にも一応対応("○○の××"に対する"×× the ○○")
・カスタムメッセージに使用中アイテム名と対象アイテム名を表示する{ciname}、{tiname}を使用できるように

変更箇所

(5545行目付近:his関数)PC以外の視点から描写するを考慮して「あなたの/your」を返さない性別のみの関数を新規作成

		return "your"
	}
	if ( cdata(8, prm_V20120618_358) == 0 ) {
		return "his"
	}
	return "her"
// MMA 20121225T START
#defcfunc his2 int prm_M20121225T_N001, int prm_M20121225T_N002
	if ( prm_M20121225T_N002 ) {
		if ( jp ) {
			if ( cdata(8, prm_M20121225T_N001) == 0 ) {
				return "彼の"
			}
			else {
				return "彼女の"
			}
		}
		if ( cdata(8, prm_M20121225T_N001) == 0 ) {
			return "his"
		}
		else {
			return "her"
		}
	}
	if ( prm_M20121225T_N001 < 0 | prm_M20121225T_N001 >= 245 ) {
		return "its"
	}
	if ( synccheck(prm_M20121225T_N001, -1) == 0 ) {
		return "its"
	}
	if ( cdata(8, prm_M20121225T_N001) == 0 ) {
		return "his"
	}
	return "her"
// MMA 20121225T END
// MMA 20121228T START
#defcfunc his3 int prm_M20121228T_N001, int prm_M20121228T_N002
	if ( prm_M20121228T_N002 ) {
		if ( jp ) {
			if ( cdata(8, prm_M20121228T_N001) == 0 ) {
				return "彼の"
			}
			else {
				return "彼女の"
			}
		}
		if ( cdata(8, prm_M20121228T_N001) == 0 ) {
			return "his"
		}
		else {
			return "hers"
		}
	}
	if ( prm_M20121228T_N001 < 0 | prm_M20121228T_N001 >= 245 ) {
		return "its"
	}
	if ( synccheck(prm_M20121228T_N001, -1) == 0 ) {
		return "its"
	}
	if ( cdata(8, prm_M20121228T_N001) == 0 ) {
		return "his"
	}
	return "hers"
// MMA 20121228T END
#defcfunc him int prm_V20120618_360, int prm_V20120618_361
	if ( prm_V20120618_361 ) {
		if ( jp ) {
			if ( cdata(8, prm_V20120618_360) == 0 ) {
				return "彼"

(5957行目付近:text_set関数)性別関係の定数拡張

	if ( jp ) {
		_sex2 = "男", "女"
	}
	if ( en ) {
		_sex2 = "boy", "girl"
	}
	if ( jp ) {
		_onii = "お兄", "お姉"
	}
// MMA 20121119T START
	if ( en ) {
		_onii = "elder brother", "elder sister"
	}
// MMA 20121119T END
	if ( jp ) {
		_nii = "兄", "姉"
	}
// MMA 20121119T START
	if ( en ) {
		_nii = "brother", "sister"
	}
	dim _onii2, 13, 2
// MMA 20121119T END
	if ( jp ) {
// MMA 20121119T START
//		_onii2 = "", "お兄ちゃん", "お兄ちゃま", "あにぃ", "お兄様", "おにいたま", "兄上様", "にいさま", "アニキ", "兄くん", "兄君さま", "兄チャマ", "兄や"
		_onii2(0, 0) = "お兄ちゃん", "お兄ちゃん", "お兄ちゃま", "あにぃ", "お兄様", "おにいたま", "兄上様", "にいさま", "アニキ", "兄くん", "兄君さま", "兄チャマ", "兄や"
		_onii2(0, 1) = "お姉ちゃん", "お姉ちゃん", "お姉ちゃま", "おねぇ", "お姉様", "おねえたま", "姉上様", "ねえさま", "アネキ", "姉くん", "姉君さま", "姉チャマ", "姉や"
// MMA 20121119T END
	}
// MMA 20121119T START
	if ( en ) {
		_onii2(0, 0) = "my brother", "big brother", "brother", "big bro", "dear brother", "bro-bro", "brother mine", "elder brother", "bro", "brother darling", "beloved brother", "brother dearest", "mon frere"
		poke _onii2(12, 0), 6, 232	// e`のアクサングラーブ付加
		_onii2(0, 1) = "my sister", "big sister", "sister", "big sis", "dear sister", "sis-sis", "sister mine", "elder sister", "sis", "sister darling", "beloved sister", "sister dearest", "ma soeur"
	}
// MMA 20121119T END
	dim _onii3, 6, 2
	if ( jp ) {
		_onii3(0, 0) = "お兄ちゃん!", "お兄ちゃ~ん", "お兄ちゃんっ", "お兄ちゃん?", "お兄~ちゃん", "お兄ちゃん♪"
		_onii3(0, 1) = "お姉ちゃん!", "お姉ちゃ~ん", "お姉ちゃんっ", "お姉ちゃん?", "お姉~ちゃん", "お姉ちゃん♪"
	}
// MMA 20121119T START
	if ( en ) {
		_onii3(0, 0) = "My brother!", "My brother :)", "My brother :D", "My brother?", "My brother :P", "My brother XD"
		_onii3(0, 1) = "My sister!", "My sister :)", "My sister :D", "My sister?", "My sister :P", "My sister XD"
	}
	if ( jp ) {
		_onii4 = "おにい", "おねえ"
	}
	if ( en ) {
		_onii4 = "bro", "sis"
	}
// MMA 20121119T END
	if ( jp ) {
		_syujin = "ご主人様", "お嬢様"
	}
// MMA 20121119T START
	if ( en ) {
		_syujin = "my master", "my lady"
	}
// MMA 20121119T END
	if ( jp ) {
		strhint1 = "カーソル [選択]  "
		strhint2 = "" + key_pageup + "," + key_pagedown + " [ページ切替]  "

(9887行目付近:convert_word関数){psex}{csex}{tsex}置換文字列タグ追加

			if ( s == "sex" ) {
				s = _sex2(cdata(8, prm_V20120618_435))
				break
			}
// MMA 20121222T START
			if ( s == "psex" ) {
				s = _sex2(cdata(8, 0))
				break
			}
			if ( s == "csex" ) {
				s = _sex2(cdata(8, prm_V20120618_435))
				break
			}
			if ( s == "tsex" ) {
				s = _sex2(cdata(8, prm_V20120618_436))
				break
			}
// MMA 20121222T END
			if ( s == "player" ) {
				s = cdatan(0, 0)
				break
			}

(9899行目付近:convert_wordタグ){nnpc}のCNPCと英語名対応

			if ( s == "npc" ) {
				s = cdatan(0, prm_V20120618_436)
				break
			}
			if ( s == "nnpc" ) {
// MMA 20121219T START
//				namae = refchara(cdata(27, prm_V20120618_436), 2, 1) + "の"
				if ( cdata(27, prm_V20120618_436) != 343 ) {
					namae = lang("", " the ") + refchara(cdata(27, prm_V20120618_436), 2, 1) + lang("の", "")
				}
				else {
					namae = lang("", " the ") + userdatan(1, cdata(157, prm_V20120618_436)) + lang("の", "")
				}
// MMA 20121219T END
				if ( instr(cdatan(0, prm_V20120618_436), 0, namae) != (-1) ) {
					s = cdatan(0, prm_V20120618_436)
					delstr s, namae
				}

(9914行目付近:convert_wordタグ){nsnpc}のCNPCと英語名対応

			if ( s == "snpc" ) {
				s = cdatan(0, prm_V20120618_435)
				break
			}
			if ( s == "nsnpc" ) {
// MMA 20121219T START
//				namae = refchara(cdata(27, prm_V20120618_435), 2, 1) + "の"
				if ( cdata(27, prm_V20120618_435) != 343 ) {
					namae = lang("", " the ") + refchara(cdata(27, prm_V20120618_435), 2, 1) + lang("の", "")
				}
				else {
					namae = lang("", " the ") + userdatan(1, cdata(157, prm_V20120618_435)) + lang("の", "")
				}
// MMA 20121219T END
				if ( instr(cdatan(0, prm_V20120618_435), 0, namae) != (-1) ) {
					s = cdatan(0, prm_V20120618_435)
					delstr s, namae
				}

(9933行目付近:convert_word関数){ciname}{tiname}置換文字列タグ追加

			if ( s == "calcadv" ) {
				s = str(calchireadv(prm_V20120618_436))
				break
			}
// MMA 20121219T START
			if ( s == "ciname" ) {
				s = ""
				if ( ci != (-1) ) {
					s = itemname(ci)
				}
				break
			}
			if ( s == "tiname" ) {
				s = ""
				if ( ti != (-1) ) {
					s = itemname(ti)
				}
				break
			}
// MMA 20121219T END
// MMA 20121228T START
			if ( s == "ciname1" ) {
				s = ""
				if ( ci != (-1) ) {
					s = itemname(ci, 1)
				}
				break
			}
			if ( s == "tiname1" ) {
				s = ""
				if ( ti != (-1) ) {
					s = itemname(ti, 1)
				}
				break
			}
// MMA 20121228T END
			if ( s == "n" ) {
				s = "#n#"
				break
			}

(9961行目付近:convert_word関数){た}置換文字列タグ追加

			if ( s == "よ" ) {
				s = _yo(3)
				break
			}
// MMA 20121105T START
			if ( s == "た" ) {
				s = _ta(3)
				break
			}
// MMA 20121105T END
			if ( s == "だな" ) {
				s = _dana(3)
				break
			}

(9973行目付近:convert_word関数){のか}置換文字列タグ追加

			if ( s == "る" ) {
				s = _ru(3)
				break
			}
// MMA 20121225T START
			if ( s == "のか" ) {
				s = _noka(3)
				break
			}
// MMA 20121225T END
			if ( s == "のだ" ) {
				s = _nda(3)
				break
			}

(9997行目付近:convert_word関数)置換文字列タグ追加

			if ( s == "兄" ) {
				s = _nii(cdata(8, 0))
				break
			}
// MMA 20121225T START
			if ( s == "nii" ) {
				s = _nii(cdata(8, 0))
				break
			}
			if ( s == "cnii" ) {
				s = _nii(cdata(8, prm_V20120618_435))
				break
			}
			if ( s == "tnii" ) {
				s = _nii(cdata(8, prm_V20120618_436))
				break
			}
// MMA 20121225T END
// MMA 20121105T START
			if ( s == "よろしく" ) {
				s = _yoro(3)
				break
			}
			if ( s == "どうぞ" ) {
				s = _dozo(3)
				break
			}
			if ( s == "ありがとう" ) {
				s = _thanks(3)
				break
			}
			if ( s == "やめて" ) {
				s = _rob(3)
				break
			}
// MMA 20121105T END
// MMA 20121225T START
			if ( s == "bro" ) {
				if ( ( cdata(27, prm_M20121029_N101) == 176 | cdata(27, prm_M20121029_N101) == 249 ) & ocdata(49, prm_M20121029_N101) > 0 & ocdata(49, prm_M20121029_N101) < length(_onii2) ) {
					s = _onii2(ocdata(49, prm_M20121029_N101), cdata(8, 0))
				}
				else {
					s = _onii2(0, cdata(8, 0))
				}
				break
			}
			if ( s == "cbro" ) {
				if ( ( cdata(27, prm_M20121029_N101) == 176 | cdata(27, prm_M20121029_N101) == 249 ) & ocdata(49, prm_M20121029_N101) > 0 & ocdata(49, prm_M20121029_N101) < length(_onii2) ) {
					s = _onii2(ocdata(49, prm_M20121029_N101), cdata(8, prm_V20120618_435))
				}
				else {
					s = _onii2(0, cdata(8, prm_V20120618_435))
				}
				break
			}
			if ( s == "tbro" ) {
				if ( ( cdata(27, prm_M20121029_N101) == 176 | cdata(27, prm_M20121029_N101) == 249 ) & ocdata(49, prm_M20121029_N101) > 0 & ocdata(49, prm_M20121029_N101) < length(_onii2) ) {
					s = _onii2(ocdata(49, prm_M20121029_N101), cdata(8, prm_V20120618_436))
				}
				else {
					s = _onii2(0, cdata(8, prm_V20120618_436))
				}
				break
			}
#ifdef CGOD
// カスタムゴッド導入環境
			if ( s == "pgod" ) {
				s = godname(godcheck(0))
				break
			}
			if ( s == "cgod" ) {
				s = godname(godcheck(prm_V20120618_435))
				break
			}
			if ( s == "tgod" ) {
				s = godname(godcheck(prm_V20120618_436))
				break
			}
			if ( s == "psgod" ) {
				s = sgodname(godcheck(0))
				break
			}
			if ( s == "csgod" ) {
				s = sgodname(godcheck(prm_V20120618_435))
				break
			}
			if ( s == "tsgod" ) {
				s = sgodname(godcheck(prm_V20120618_436))
				break
			}
#else
// カスタムゴッド非導入環境
			if ( s == "pgod" ) {
				s = godname(cdata(61, 0))
				break
			}
			if ( s == "cgod" ) {
				s = godname(cdata(61, prm_V20120618_435))
				break
			}
			if ( s == "tgod" ) {
				s = godname(cdata(61, prm_V20120618_436))
				break
			}
			if ( s == "psgod" ) {
				s = sgodname(cdata(61, 0))
				break
			}
			if ( s == "csgod" ) {
				s = sgodname(cdata(61, prm_V20120618_435))
				break
			}
			if ( s == "tsgod" ) {
				s = sgodname(cdata(61, prm_V20120618_436))
				break
			}
#endif
			if ( s == "phe" ) {
				s = he(0, 1)
				break
			}
			if ( s == "che" ) {
				s = he(prm_V20120618_435, 1)
				break
			}
			if ( s == "the" ) {
				s = he(prm_V20120618_436, 1)
				break
			}
			if ( s == "phis" ) {
// MMA 20121228T START
//				s = his2(0)
				s = his2(0, 1)
// MMA 20121228T END
				break
			}
			if ( s == "chis" ) {
// MMA 20121228T START
//				s = his2(prm_V20120618_435)
				s = his2(prm_V20120618_435, 1)
// MMA 20121228T END
				break
			}
			if ( s == "this" ) {
// MMA 20121228T START
//				s = his2(prm_V20120618_436)
				s = his2(prm_V20120618_436, 1)
// MMA 20121228T END
				break
			}
			if ( s == "phim" ) {
				s = him(0, 1)
				break
			}
			if ( s == "chim" ) {
				s = him(prm_V20120618_435, 1)
				break
			}
			if ( s == "thim" ) {
				s = him(prm_V20120618_436, 1)
				break
			}
// MMA 20121225T END
// MMA 20121228T START
			if ( s == "phis2" ) {
				s = his3(0, 1)
				break
			}
			if ( s == "chis2" ) {
				s = his3(prm_V20120618_435, 1)
				break
			}
			if ( s == "this2" ) {
				s = his3(prm_V20120618_436, 1)
				break
			}
// MMA 20121228T END
// MMA 20120912T3 START
//			s = "Unknown Code"
			s = ""
// MMA 20120912T3 END
		loop
		buff = s(1) + s + s(2)
	loop

(144682行目付近)神の短縮名定義を追加(カスタムゴッド非導入環境の場合)

	godname(6) = lang("癒しのジュア", "Jure of Healing")
	godname(7) = lang("収穫のクミロミ", "Kumiromi of Harvest")
// MMA 20121225T START
	sdim sgodname, 20, 8
	sgodname(0) = lang("エイス", "Eyth")
	sgodname(1) = lang("マニ", "Mani")
	sgodname(2) = lang("ルルウィ", "Lulwy")
	sgodname(3) = lang("イツパロトル", "Itzpalt")
	sgodname(4) = lang("エヘカトル", "Ehekatl")
	sgodname(5) = lang("オパートス", "Opatos")
	sgodname(6) = lang("ジュア", "Jure")
	sgodname(7) = lang("クミロミ", "Kumiromi")
// MMA 20121225T END
	return

(144682行目付近)神の短縮名定義を追加(カスタムゴッド非導入環境でベースがElonaPlusの場合)

	godname(6) = lang("癒しのジュア", "Jure of Healing")
	godname(7) = lang("収穫のクミロミ", "Kumiromi of Harvest")
	godname(8) = lang("富のヤカテクト", "Yacatect of Wealth")
// MMA 20121225T START
	sdim sgodname, 20, 9
	sgodname(0) = lang("エイス", "Eyth")
	sgodname(1) = lang("マニ", "Mani")
	sgodname(2) = lang("ルルウィ", "Lulwy")
	sgodname(3) = lang("イツパロトル", "Itzpalt")
	sgodname(4) = lang("エヘカトル", "Ehekatl")
	sgodname(5) = lang("オパートス", "Opatos")
	sgodname(6) = lang("ジュア", "Jure")
	sgodname(7) = lang("クミロミ", "Kumiromi")
	sgodname(8) = lang("ヤカテクト", "Yacatect")
// MMA 20121225T END
	return

(153540行目付近)妹の作戦設定を男女別定義配列に対応

	if ( ocbit(0, cc) == 0 ) {
		if ( cdata(27, cc) == 176 ) {
			inhact = "呼び方"
// MMA 20121119T START
//			choice = "いつも通り", "お兄ちゃん", "お兄ちゃま", "あにぃ", "お兄様", "おにいたま", "兄上様", "にいさま", "アニキ", "兄くん", "兄君さま", "兄チャマ", "兄や"
			choice = "いつも通り"
			if ( en ) {
				inhact = "Way of calling"
				choice = "default"
			}
			repeat length(_onii2) - 1, 1
				choice(cnt) = _onii2(cnt, cdata(8, 0))
			loop
// MMA 20121119T END
		}

(153559行目付近)店主妹の作戦設定を定義配列変数に対応

		if ( cdata(27, cc) == 249 ) {
			inhact = "呼び方"
// MMA 20121119T START
//			choice = "いつも通り", "お兄ちゃん", "お兄ちゃま", "あにぃ", "お兄様", "おにいたま", "兄上様", "にいさま", "アニキ", "兄くん", "兄君さま", "兄チャマ", "兄や"
			choice = "いつも通り"
// MMA 20121119T END
			inhact2 = "妹召喚"
			choice2 = "いい", "だめ"
// MMA 20121119T START
			if ( en ) {
				inhact = "Way of calling"
				choice = "default"
				inhact2 = "Summon sister"
				choice2 = "Use", "Don't use"
			}
			repeat length(_onii2) - 1, 1
				choice(cnt) = _onii2(cnt, cdata(8, 0))
			loop
// MMA 20121119T END
		}

(226752行目付近)妹の%txtCalmのメッセージ処理

	if ( dbid == 176 ) {
		if ( dbmode == 100 ) {
			if ( jp ) {
				if ( ocdata(49, cc) == 0 ) {
					txtmore
					txtef 9
					txtvalid = 0
					txt_select "「" + _onii(cdata(8, 0)) + "ちゃんー」", "「" + _onii(cdata(8, 0)) + "ちゃん!」", "「" + _onii(cdata(8, 0)) + "ちゃ~ん」", "「" + _onii(cdata(8, 0)) + "ちゃんっ」", "「" + _onii(cdata(8, 0)) + "ちゃん?」", "「" + _onii(cdata(8, 0)) + "~ちゃん」", "「" + _onii(cdata(8, 0)) + "ちゃん♪」", "", ""
				}
				else {
					txtmore
					txtef 9
					txtvalid = 0
// MMA 20121119T START
//					txt_select "「" + _onii2(ocdata(49, cc)) + "ー」", "「" + _onii2(ocdata(49, cc)) + "!」", "「" + _onii2(ocdata(49, cc)) + "~」", "「" + _onii2(ocdata(49, cc)) + "っ」", "「" + _onii2(ocdata(49, cc)) + "?」", "「" + _onii2(ocdata(49, cc)) + "~」", "「" + _onii2(ocdata(49, cc)) + "♪」", "", ""
					txt_select "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "ー」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "!」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "~」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "っ」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "?」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "~」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "♪」", "", ""
// MMA 20121119T END
				}

(226784行目付近)妹の%txtWelcomeのメッセージ処理

					txtvalid = 0
					txt_select "「おかえり、" + _onii(cdata(8, 0)) + "ちゃん!」", "「おかえりなさーい、" + _onii(cdata(8, 0)) + "ちゃん♪」", "「待ってたよ、" + _onii(cdata(8, 0)) + "ちゃん」", "", "", "", "", "", ""
				}
				else {
					txtmore
					txtef 9
					txtvalid = 0
// MMA 20121119T START
//					txt_select "「おかえり、" + _onii2(ocdata(49, tc)) + "!」", "「おかえりなさーい、" + _onii2(ocdata(49, tc)) + "♪」", "「待ってたよ、" + _onii2(ocdata(49, tc)) + "」", "", "", "", "", "", ""
					txt_select "「おかえり、" + _onii2(ocdata(49, tc), cdata(8, 0)) + "!」", "「おかえりなさーい、" + _onii2(ocdata(49, tc), cdata(8, 0)) + "♪」", "「待ってたよ、" + _onii2(ocdata(49, tc), cdata(8, 0)) + "」", "", "", "", "", "", ""
// MMA 20121119T END
				}

(226891行目付近)店主妹の%txtCalmのメッセージ処理

	if ( dbid == 249 ) {
		if ( dbmode == 100 ) {
			if ( jp ) {
				if ( ocdata(49, cc) == 0 ) {
					txtmore
					txtef 9
					txtvalid = 0
					txt_select "「" + _onii(cdata(8, 0)) + "ちゃんー」", "「" + _onii(cdata(8, 0)) + "ちゃん!」", "「" + _onii(cdata(8, 0)) + "ちゃ~ん」", "「" + _onii(cdata(8, 0)) + "ちゃんっ」", "「" + _onii(cdata(8, 0)) + "ちゃん?」", "「" + _onii(cdata(8, 0)) + "~ちゃん」", "「" + _onii(cdata(8, 0)) + "ちゃん♪」", "", ""
				}
				else {
					txtmore
					txtef 9
					txtvalid = 0
// MMA 20121119T START
//					txt_select "「" + _onii2(ocdata(49, cc)) + "ー」", "「" + _onii2(ocdata(49, cc)) + "!」", "「" + _onii2(ocdata(49, cc)) + "~」", "「" + _onii2(ocdata(49, cc)) + "っ」", "「" + _onii2(ocdata(49, cc)) + "?」", "「" + _onii2(ocdata(49, cc)) + "~」", "「" + _onii2(ocdata(49, cc)) + "♪」", "", ""
					txt_select "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "ー」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "!」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "~」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "っ」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "?」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "~」", "「" + _onii2(ocdata(49, cc), cdata(8, 0)) + "♪」", "", ""
// MMA 20121119T END
				}

(226923行目付近)店主妹の%txtWelcomeのメッセージ処理

					txtvalid = 0
					txt_select "「おかえり、" + _onii(cdata(8, 0)) + "ちゃん!」", "「おかえりなさーい、" + _onii(cdata(8, 0)) + "ちゃん♪」", "「待ってたよ、" + _onii(cdata(8, 0)) + "ちゃん」", "", "", "", "", "", ""
				}
				else {
					txtmore
					txtef 9
					txtvalid = 0
// MMA 20121119T START
//					txt_select "「おかえり、" + _onii2(ocdata(49, tc)) + "!」", "「おかえりなさーい、" + _onii2(ocdata(49, tc)) + "♪」", "「待ってたよ、" + _onii2(ocdata(49, tc)) + "」", "", "", "", "", "", ""
					txt_select "「おかえり、" + _onii2(ocdata(49, tc), cdata(8, 0)) + "!」", "「おかえりなさーい、" + _onii2(ocdata(49, tc), cdata(8, 0)) + "♪」", "「待ってたよ、" + _onii2(ocdata(49, tc), cdata(8, 0)) + "」", "", "", "", "", "", ""
// MMA 20121119T END
				}

(新規追加)神の短縮名取得関数を追加(カスタムゴッド導入環境の場合)

// MMA 20121225T START
#defcfunc sgodname str prm_M20121225T_N003
	_switch_val = prm_M20121225T_N003
	if ( 0 ) {
		_switch_sw++
	}
	if ( _switch_val == "mani" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("マニ", "Mani")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "lulwy" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("ルルウィ", "Lulwy")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "itzpalt" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("イツパロトル", "Itzpalt")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "ehekatl" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("エヘカトル", "Ehekatl")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "opatos" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("オパートス", "Opatos")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "jure" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("ジュア", "Jure")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "kumiromi" | _switch_sw ) {
		_switch_sw = 0
		namet = lang("クミロミ", "Kumiromi")
		goto *label_M20121225_N001
		_switch_sw++
	}
	if ( _switch_val == "elder brother" | _switch_sw ) {
		_switch_sw = 0
		namet = _onii(cdata(8, 0)) + lang("ちゃん", "")
		goto *label_M20121225_N001
	}
	if ( 1 ) {
		namet = lang("エイス", "Eyth")
	}
*label_M20121225_N001
	if ( findcgodno(prm_M20121225T_N003) != (-1) ) {
		god_no = stat
		namet = lang(usergoddatan(3, god_no), cnven(usergoddatan(2, god_no)))
	}
	return namet
// MMA 20121225T END