code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:反発刻印(3以上=会話不能)(4以上はバグ
;TCVAR:烂醉(1=通常成功or大失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_300
;指令共通メッセージ(TRAIN_MESSAGE)
;削除すると「～说着话。」とかが消えます
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K112_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
	            PRINTFORMW 「哎呀，这不是%CALLNAME:MASTER%吗」
				PRINTFORMW 「今天想要做些什么？」
				PRINTFORMW 纯狐脸上带着明朗的笑容走了过来
		SELECTCASE RAND:4
			CASE 3
				PRINTFORML 「怎么样，感觉如何？」
				PRINTFORMW 纯狐将自己做的蛋糕递了过来
				PRINTFORMW 然而，只是刚吃了一口，%CALLNAME:MASTER%就呛到吐了出来。
				PRINTFORMW 「专门纯化了甜味哦，味道不错吧」
				PRINTFORMW 眼角含着泪水转过头来，看到的是一脸坏笑的纯狐
;※※※※※※※※※※※※※※※※※※※※※※※
			CASE 2
				PRINTFORML
				PRINTFORMW 「说起来的话，%CALLNAME:MASTER%当初与我结识的时候，有没有想过会有一天变成这样呢」
				PRINTFORMW 纯狐自顾自的靠在墙上，随口问道
		$INPUT_LOOP0
		PRINTL [0]完全没想过会发展成恋人
		PRINTL [1]当时就明白恋人非你莫属
		INPUT
		SELECTCASE RESULT
		CASE 0
	PRINTFORMW 「哈，我想也是，毕竟谁也想不到当时认识的一个女性朋友将来会发展成这样」
	PRINTFORMW 「倒不如说，能发展成现在这样出乎了当时我们两个人的意料啊」
	PRINTFORMW 纯狐有些感慨的样子。
	PRINTFORMW 「当时被羿那个混蛋背叛的时候，我觉得永远也不会再有丈夫，恋人什么的」
	PRINTFORMW 「嘛，就算是现在你也不算是我的丈夫就是了。」
	PRINTFORMW 「今后也请多多关照了」
;		CFLAG:90:1300 = 1
			CASE 1
	PRINTFORMW 「哎？当时就觉得能成为恋人吗？」
	PRINTFORMW 纯狐有些惊讶的样子。
	PRINTFORMW 「原来你那时那些在我眼里算是朋友的举动其实是在追求我？」
		PRINTL [0]那是自然了
		PRINTL [1]其实当时也没有那么多考虑
		INPUT
		SELECTCASE RESULT
		CASE 0
	PRINTFORMW 「原来当时被蒙在鼓里的人是我啊」
	PRINTFORMW 「当时我还以为我才是主导方，原来是被你牵着鼻子走啊」
	PRINTFORMW 纯狐笑了笑，一边摇着头一边用带有一些嬉笑和无奈的语气说道
	PRINTFORMW 「没有那回事？嘛，反正我现在也无所谓了。」
	PRINTFORMW 「现在的这个结果，我和%CALLNAME:MASTER%都很满意对吧」
	PRINTFORMW 「那不就很好吗，只要结果是好的，过程什么的其实也无所谓」
	PRINTFORMW 说到这里时，纯狐的眼神黯淡了一下
	PRINTFORMW 「复仇也是一样，不是吗」
	PRINTFORMW 「好了，先不说那些话题了，聊点轻松的吧」
;		CFLAG:90:1300 = 1
			CASE 1
	PRINTFORMW 「那这么看来，当时我不是完全的被当傻瓜耍的啊。」
	PRINTFORMW 「没有那种事？哈，没关系啦。」
	PRINTFORMW 「反正结果不管是对%CALLNAME:MASTER%来说，还是对我来说，都算好事吧。」
	PRINTFORMW 「嘛，顶多就是赫卡她有点不太開心而已」
	PRINTFORMW 「所以，接下来的日子，也请多多关照了啊」
	PRINTFORMW 纯狐開心的笑了笑。
;		CFLAG:90:1301 = 1
		CASEELSE
		GOTO INPUT_LOOP0
		ENDSELECT
	PRINTFORMW 「和%CALLNAME:MASTER%聊了好多啊。」
	PRINTFORMW 「接下来要干什么事呢？」
;		CFLAG:90:1301 = 1
		CASEELSE
		GOTO INPUT_LOOP0
		ENDSELECT
RETURN 1
;※※※※※※※※※※※※※※※※※※※※※※※
			CASE 1
				PRINTFORML
			CASE 0
				PRINTFORML
		ENDSELECT
	ELSEIF TALENT:恋慕
	        PRINTFORMW 「来了吗，来，慢慢聊吧」
			PRINTFORMW 纯狐仿佛早就知道了%CALLNAME:MASTER%的到来，脸色有点复杂的走了过来。
		SELECTCASE RAND:3
			CASE 2
				PRINTFORML 「……有时候我在思考一些事」
				PRINTFORMW 纯狐眼神有点惆怅。
				PRINTFORMW 「或许，我该试试接受？但是我真的不想再体验一次了……哎」
				PRINTFORMW %CALLNAME:MASTER%听的一头雾水
			CASE 1
				PRINTFORML 「实际上，我和月之都的大部分人都没有什么仇」
				PRINTFORMW 「我真正想要杀掉的，只有一个人而已，剩下的都只是连带罢了」
				PRINTFORMW 「但我唯独想要杀的这个人却是永生不死的，你说可笑吗」
				PRINTFORMW 纯狐微微叹了口气。
			CASE 0
				PRINTFORML 「有时候我在想啊，如果当时没能认识%CALLNAME:MASTER%，现在又会是怎样呢」
				PRINTFORMW 纯狐看向这边的眼神带上了一丝复杂的意味。
				PRINTFORMW 「大概会失去一个挚友？也是呢。」
				PRINTFORMW 纯狐轻轻笑了两声，随后扭过头去了。
				PRINTFORMW 一副纠结但是又不想让他人担心的样子。
		ENDSELECT
	ELSEIF TALENT:思慕
	    PRINTFORMW 「啊，又来找我聊天了吗？」
		PRINTFORMW 纯狐点了点头，悠闲的和%CALLNAME:MASTER%聊起天来。
		SELECTCASE RAND:3
			CASE 2
				PRINTFORML 「说起来的话%CALLNAME:MASTER%总是来找我，不会腻吗？」
				PRINTFORMW 「像你这样的年纪不是应该去找一些靓丽的少女吗？」
				PRINTFORMW 「但你天天都来找我玩呢，赫卡都有点不乐意了。」
				PRINTFORMW 纯狐比起一開始显得随意了许多，言语间也是将%CALLNAME:MASTER%当做了真正的朋友。
			CASE 1
				PRINTFORML 「嗯，嗯，说到出去玩的地点的话，果然还是要妖怪之山或者人间之里吧，旧地狱也不错」
				PRINTFORMW 「其他的地方都没有什么特别靓丽的景色或者特别热闹的氛围，去玩的话也不是不可以，但是比起这三个来说还是缺少了一点氛围啊」
				PRINTFORMW 很难从纯狐身上看到架子或者威严什么的气质，只能看出悠然与随和。
			CASE 0
				PRINTFORML
		ENDSELECT
	ELSE
		PRINTFORMW 「想和我说说话？」
		PRINTFORMW 「可以啊」
		PRINTFORMW 和有些无所事事的纯狐聊起天来了……
		SELECTCASE RAND:6
		    CASE 5
			    PRINTFORML
				PRINTFORMW 「神灵会有生活上的需求吗？」
				PRINTFORMW 纯狐摇了摇头
				PRINTFORMW 「我毕竟不是人类或者妖怪，没有什么必需的生活需求」
				PRINTFORMW 「但平时也会吃饭喝水，以此保留一种生活的乐趣。」
				PRINTFORMW 「但在必要的时候，我是并不需要这种需求的。」
		    CASE 4
			    PRINTFORML
				PRINTFORMW 「说起来，我之前去人间之里游玩的时候，看到过一些小孩呢」
				PRINTFORMW 「好像是寺子屋那位白泽的学生」
				PRINTFORMW 纯狐没注意%CALLNAME:MASTER%的反应，自顾自的说了下去
				PRINTFORMW 「他们确实很可爱呢，我看了很久他们追逐打闹的样子，临走时听到他们说他们的球没气了，我就顺手帮了他们一把」
				PRINTFORMW 「呵呵，现在那个球估计一直到他们的重孙辈都不会没气了呢。」
				PRINTFORMW 纯狐说到孩子的时候，神色有些向往的样子。
			CASE 3
				PRINTFORML
				PRINTFORMW 「嗯？我为什么怨恨着月之都吗……」
				PRINTFORMW 纯狐听到%CALLNAME:MASTER%的话愣了一下。
				PRINTFORMW 「……很抱歉，关于这方面的话题，我现在并不是很想提起」
				PRINTFORMW 纯狐有些僵硬的更换了一个话题
			CASE 2
				PRINTFORML
				PRINTFORMW 「时常见到我和赫卡提亚或者克劳恩皮丝在一起？」
				PRINTFORMW 纯狐稍微思考了一下。
				PRINTFORMW 「我和赫卡提亚算是不错的朋友吧，皮丝她比较喜欢热闹，一般我或者赫卡出去的时候她都很喜欢跟着」
				PRINTFORMW 「是个很可爱的孩子啊」
				PRINTFORMW 纯狐似乎搞错了重点，一提到关于孩子的话题，她好像就有些魂不在焉，为什么呢。
			CASE 1
				PRINTFORML
				PRINTFORMW 「我的年龄吗？」
				PRINTFORMW 纯狐有些吃惊，但很快回答了%CALLNAME:MASTER%的问题
				PRINTFORMW 「呵呵，虽然根据你们的话说，女孩子的年龄是一个禁忌的话题，但是我对这方面并不在意，活了多久就是多久，没什么不能说的」
				PRINTFORMW 「我大概是活了五千年左右吧，具体的岁数我也答不上来，到了一定程度以后，很少有人会在意自己细致的年龄了」
				PRINTFORMW 说着，她似笑非笑的看向了%CALLNAME:MASTER%
				PRINTFORMW 「至于%CALLNAME:MASTER%，拥有超人类的能力的人一般都是相当长寿的，我相信你很快也会理解这种感受的。」
			CASE 0
				PRINTFORML
				PRINTFORMW 「啊，我的服装吗？」
				PRINTFORMW 纯狐微微笑了笑。
				PRINTFORMW 「这是我参考了古中国各种朝代的服饰编织而成的」
				PRINTFORMW 「怎么，对我这种神灵还会编织感到不可思议吗」
				PRINTFORMW 「呵呵，别忘了，我在成为神灵之前有相当一段时间是人类」
				PRINTFORMW 「做饭，洗衣这些琐事我自认还是没有问题的」
				PRINTFORMW 「只不过，现在也基本没有什么机会用上就是了呢」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,泡茶
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		SELECTCASE RAND:2
			CASE 1
				PRINTFORML
			CASE 0
				PRINTFORML
		ENDSELECT
	ELSEIF TALENT:恋慕
		SELECTCASE RAND:2
			CASE 1
				PRINTFORML 「啊，茶吗」
				PRINTFORMW 「最近这段时间%CALLNAME:MASTER%常常给我泡茶，多谢了。」
				PRINTFORMW 纯狐用看似有些不以为意的语气问道
				PRINTFORMW 「难不成%CALLNAME:MASTER%是想永远都能给我泡茶吗？」
				PRINTFORMW 「嘛，開玩笑的，不用当真。」
			CASE 0
				PRINTFORML 「嗯，每次和%CALLNAME:MASTER%喝茶时都总是很轻松呢」
				PRINTFORMW 「谁让这段时间%CALLNAME:MASTER%天天来找我呢？」
				PRINTFORMW 纯狐的调笑让%CALLNAME:MASTER%挠了挠鼻头。
				PRINTFORMW 「没关系，我不介意」
				PRINTFORMW 微微抿了一口茶，纯狐满足的眯着眼微笑着说道。
				PRINTFORMW %CALLNAME:MASTER%敏捷的察觉出纯狐眼里的纠结。
		ENDSELECT
	ELSEIF TALENT:思慕
		SELECTCASE RAND:2
			CASE 1
				PRINTFORML
				PRINTFORMW 「说真的，我其实喜欢淡一点的绿茶。」
				PRINTFORMW 「%CALLNAME:MASTER%的茶艺倒是不错，只不过我比较喜欢清淡一些的感觉呢」
				PRINTFORMW 纯狐跟%CALLNAME:MASTER%诉说着自己的建议。
			CASE 0
				PRINTFORML
				PRINTFORMW 「红茶吗？」
				PRINTFORMW 纯狐笑了笑，接过茶杯。
				PRINTFORMW 「是红魔馆那边的红茶吧，我以前去那边的时候被那里的女仆招待过」
				PRINTFORMW 纯狐一边品着茶一边随意的和%CALLNAME:MASTER%聊起天来。
				PRINTFORMW 「或许是那个小吸血鬼的原因或者别的什么原因，他们的红茶一直有一种独特的香味」
		ENDSELECT
	ELSE
		SELECTCASE RAND:2
			CASE 1
				PRINTFORML
				PRINTFORMW 「啊，茶吗？」
				PRINTFORMW 「呵呵，感谢你的好意呢。」
				PRINTFORMW 纯狐脸上带着笑容接过了%CALLNAME:MASTER%手中的茶
				PRINTFORMW 「刚好也微微有些口渴」
				PRINTFORMW 一边这么说着，纯狐一边開始品起了茶水。
				PRINTFORMW 「泡的很不错呢，有心了。」
			CASE 0
				PRINTFORML
				PRINTFORMW 「唔，茶水吗？」
				PRINTFORMW 「谢谢」
				PRINTFORMW 纯狐毫不客气的接过了%CALLNAME:MASTER%手中的茶。
				PRINTFORMW 「味道很好呢，%CALLNAME:MASTER%以前练习过这方面的技巧吗？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;302,身体接觸
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL

	IF TALENT:恋人
		SELECTCASE RAND:4
			CASE 3
				PRINTFORML

			CASE 2
				PRINTFORML
			CASE 1
				PRINTFORML
			CASE 0
				PRINTFORML
		ENDSELECT
	ELSEIF TALENT:恋慕
		SELECTCASE RAND:4
			CASE 3
				PRINTFORML 「还有啊，人里那边的那个烧烤屋，口味实在是太重了……」
				PRINTFORMW %CALLNAME:MASTER%将手放在纯狐肩膀上，纯狐只是微微颤抖了一下，就继续若无其事的说了下去
				PRINTFORMW 只不过她的眼角闪过了一丝犹豫和落寞。
			CASE 2
				PRINTFORML 「太亲密了吧，这样被别人看到可是会找不到女朋友的」
				PRINTFORMW 将手搂在纯狐腰上，纯狐没有什么反应的样子，只是摸了摸%CALLNAME:MASTER%的头。
				PRINTFORMW 「而且这样……你……哎，算了，没什么」
				PRINTFORMW 纯狐突然有点烦躁的样子，见状%CALLNAME:MASTER%连忙收回了手道歉。
				PRINTFORMW 「没关系，和你无关，是我自己有些不太舒服。」
			CASE 1
				PRINTFORML 「」
			CASE 0
				PRINTFORML
		ENDSELECT
	ELSEIF TALENT:思慕
		SELECTCASE RAND:4
			CASE 3
				PRINTFORML
				PRINTFORMW 「啊！」
				PRINTFORMW %CALLNAME:MASTER%把手随手放到了纯狐的肩膀上，纯狐吓了一跳的样子。
				PRINTFORMW 纯狐有些责怪的看了%CALLNAME:MASTER%一眼。
				PRINTFORMW 「虽然我并不是多么介意，但是最少说一声吧。」
				PRINTFORMW 看起来纯狐并不介意%CALLNAME:MASTER%把手放到她肩膀上的行为。
			CASE 2
				PRINTFORML
			CASE 1
				PRINTFORML
				PRINTFORMW 「想要摸一摸我的背……？」
				PRINTFORMW 纯狐看起来很惊讶的样子。
				PRINTFORMW 「……」
				PRINTFORMW 就在气氛尴尬到%CALLNAME:MASTER%都想说是个玩笑的时候，纯狐開口了
				PRINTFORMW 「好吧，仅此一次」
				PRINTFORMW 纯狐微微叹了一口气
			CASE 0
				PRINTFORML
				PRINTFORMW 「嗯，%CALLNAME:MASTER%的技术还是很不错的呢」
				PRINTFORMW 纯狐感受着%CALLNAME:MASTER%的按摩眯起了眼。
				PRINTFORMW 「老是让%CALLNAME:MASTER%揉肩，总觉得有点不好意思呢，下次让我来吧。」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		    CASE 2
			    PRINTFORML
				PRINTFORMW 「嗯？揉肩？」
				PRINTFORMW 纯狐微微有些困扰的样子。
				PRINTFORMW 「在我那个时代，这一般是女人服务男人的事情之一……」
				PRINTFORMW 「啊，不必在意，请吧」
				PRINTFORMW 纯狐微微叹了一口气。
				PRINTFORMW 「毕竟是已经被淘汰的过去式呢，现在的人好像也并不在意」
				PRINTFORMW 「是我有些古板了，不好意思。」
				PRINTFORMW %CALLNAME:MASTER%轻轻的按摩着纯狐的肩膀。
				PRINTFORMW 有些冰凉，而且有种很柔嫩的感觉，就像是一块豆腐一样。
			CASE 1
				PRINTFORML
				PRINTFORMW 「呵呵，我的长发吗？」
				PRINTFORMW 纯狐看着%CALLNAME:MASTER%抚摸着她头发的动作微微笑了笑。
				PRINTFORMW 「以前并不是这种颜色的，但自从我成为神灵以后，头发就慢慢的变成了这种颜色呢」
				PRINTFORMW 纯狐背过身去好让%CALLNAME:MASTER%看的清楚一点，继续说着。
				PRINTFORMW 「一開始的时候还吓了一跳呢，只不过也不是什么大问题。慢慢的就习惯了呢。」
				PRINTFORMW 幻想乡似乎没有几个人的头发颜色是正常的呢。
			CASE 0
				PRINTFORML
				PRINTFORMW 「哦？在意我的手吗？」
				PRINTFORMW 纯狐对%CALLNAME:MASTER%轻轻抓起她的手的动作微微有些不满的甩開，但很快又释然了。
				PRINTFORMW 「哈，也不是什么见不得人的东西，请吧，刚才真是不好意思。」
				PRINTFORMW 这么说着的纯狐微微抬起了手，让%CALLNAME:MASTER%能看清楚她的手。
				PRINTFORMW 「因为一些习惯的原因，我总是有种保守的感觉，我已经在试着适应这个时代了，但%CALLNAME:MASTER%在做这种事之前最好先告诉我一声。」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,道歉
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 0,1,2
		PRINTFORMW %CALLNAME:MASTER%低下头对着纯狐道着歉
		PRINTFORMW 「……啊，算了，反正也不是什么大不了的事，不是吗。」
		PRINTFORMW 纯狐微微摇了摇头。
	CASEELSE
		PRINTFORMW %CALLNAME:MASTER%因为之前的非礼行为对着纯狐不断的道歉着
		PRINTFORMW 「%CALLNAME:MASTER%，你不觉得你之前的行为着实有些过分吗」
		PRINTFORMW 纯狐的脸色很冷，像是寒冬一样。
		PRINTFORMW 「我觉得你并没有在真正的反省，还是好好反思一下吧。」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;304,幫忙干活
;==================================================
@M_KOJO_MESSAGE_COM_K112_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;305,索求膝枕
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:体型 > TALENT:体型 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:親密(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_MESSAGE_COM_K112_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
	ELSEIF TALENT:恋慕
		PRINTFORML
	ELSEIF TALENT:思慕
		PRINTFORML 「嗯，说起来的话，你倒是第一个能享受到我膝枕的人」
		PRINTFORMW 纯狐微微揉乱了%CALLNAME:MASTER%的头发。
		PRINTFORMW
	ELSE
        PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;TFLAG:193(1=ABL:親密6以上かつ妊娠時 0=成功 -1=ABL:親密5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K112_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:恋慕(受け入れつつ笑顔でやり返す
	;ABL:親密(6以上=怯生生地やり返す
	;ABL:従順(5以上=されるがまま
;==================================================
@M_KOJO_MESSAGE_COM_K112_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;非表示！
;-------------------------------------------------
IF LOCAL && !FLAG:70
	IF TALENT:恋人
		PRINTFORML
	ELSEIF ABL:親密 > 5
		PRINTFORML 「干嘛啊，手别乱碰」
		PRINTFORMW 微微捏住纯狐的脸蛋，纯狐有些不開心的打掉了%CALLNAME:MASTER%的手
		PRINTFORMW 「真是的……这可不怎么有礼貌」
	ELSE
		PRINTFORML
		PRINTFORMW 「哈？」
		PRINTFORMW %CALLNAME:MASTER%的手刚刚碰到纯狐的脸，就被她面色不快的甩開了。
		PRINTFORMW 还是等关系更深一点再说吧。
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;陪睡中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:TARGET:睡眠
		IF TALENT:恋人
			PRINTFORML
		ELSEIF TALENT:恋慕
			PRINTFORML
		ELSE
			PRINTFORML
		ENDIF
	ELSE
		IF TALENT:恋人
			PRINTFORML
		ELSEIF TALENT:恋慕
			PRINTFORML
		ELSEIF TALENT:思慕
			PRINTFORML
		ELSE
			PRINTFORML
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;309,摸頭
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:親密(6以上=通常成功時分岐
;==================================================
@M_KOJO_MESSAGE_COM_K112_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70
	IF TALENT:恋人

	ELSEIF TALENT:恋慕

		ELSEIF TALENT:思慕
			PRINTFORML 「我头上有什么脏东西？」
			PRINTFORMW 「那就拜托%CALLNAME:MASTER%了。」
			PRINTFORMW 纯狐无所谓的耸了耸肩，将头饰抱在胸前。
			PRINTFORMW 「%CALLNAME:MASTER%真的是在替我清理吗？怎么像是纯粹的在摸我的头呢？」
		ELSE
			PRINTFORML
			PRINTFORMW 「嗯？」
			PRINTFORMW 把手放在纯狐的头上以后她有些吃惊的样子。
			PRINTFORMW 「想体验一下我头发的触感？」
			PRINTFORMW 纯狐似乎会错了意的样子。
			PRINTFORMW 「可以是可以，但是不要把我的头发弄乱了。」
			PRINTFORMW 纯狐一边这么说着一边拿下了头饰。
			PRINTFORMW 阴差阳错之下%CALLNAME:MASTER%还是摸到了纯狐的头。
		ENDIF
	ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;332,勸酒
;TFLAG:193(0=不會喝喝酒成功 -1=不會喝喝酒失敗 -2=不會喝喝酒大失敗 -5=不會喝喝酒あきらめ)
;TFLAG:194(51=濁酒 52=清酒 53=鬼殺酒)
;ALCOHOL_TASTE(TFLAG:194)(15以上=気に入る 9以下=口に合わない)
;==================================================
@M_KOJO_MESSAGE_COM_K112_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;非表示！
;-------------------------------------------------
IF LOCAL
    IF TALENT:恋人
		PRINTFORML
	ELSEIF TALENT:恋慕
		PRINTFORML
	ELSEIF TALENT:思慕
		PRINTFORML
	ELSE
		PRINTFORML
		PRINTFORMW 「哈？」
		PRINTFORMW %CALLNAME:MASTER%的手刚刚碰到纯狐的脸，就被她面色不快的甩開了。
		PRINTFORMW 「虽然我对身体接触并不是很介意，可%CALLNAME:MASTER%做的未免有些过了吧。」
		PRINTFORMW 还是等关系更深一点再说吧。
	ENDIF
ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3
		;大成功
		CASE 2
		;成功
		CASE 1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,碰杯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:妊娠自覚状態(1=吃飯)
;TALENT:酒耐性(-2=吃飯)
;==================================================
@M_KOJO_MESSAGE_COM_K112_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
	   PRINTFORML
	ELSEIF TALENT:恋慕
	   PRINTFORML
	ELSEIF TALENT:思慕
	   PRINTFORML
	ELSE
	SELECTCASE TFLAG:193
		CASE 1,0
       PRINTFORMW 「虽然依然还不能拿她怎样，但享受酒席不也是一大乐事吗。」
	   PRINTFORMW 纯狐笑着举起酒杯与%CALLNAME:MASTER%轻轻碰杯。
	   PRINTFORMW 「呵呵，看看今晚的月亮吧，也许很快它就会有所变化，又或者永远都不会有所变化了」
	   PRINTFORMW 纯狐将杯里的酒水一饮而尽，看着天上的月亮像是自言自语又像是对着%CALLNAME:MASTER%说话。
		CASE -1
       PRINTFORMW 「来找我了吗？」
	   PRINTFORMW 纯狐注意到%CALLNAME:MASTER%，微笑着举起酒杯轻轻地碰了个杯，随后将酒水一饮而尽。
	   PRINTFORMW 「呵呵，玩的尽兴一点哦？」
	ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;335,照料
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕
;ABL:親密(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:膝枕した)(44以下=失敗
;==================================================
@M_KOJO_MESSAGE_COM_K112_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 > 0
	;寝ちゃった
	ELSE
	;それ以外
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,推倒（時姦時猥褻
;TFLAG:194 (0=成功 1=人目がある　2=野外は嫌でござりまする　3=多人数プレイは勘弁　4=合意があっても情緒が足りぬ）
;TCVAR:初次拥抱　1=普通に合意ゲット　2=先に接吻ぐらいしろよ　3=媚薬or発情には勝てなかったよお…　4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
;5=強引に迫られると断れぬ(素質膽怯持ち専用) 6=まんざらでもない　7=駄目　8=論外
;==================================================
@M_KOJO_MESSAGE_COM_K112_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;非表示！
;-------------------------------------------------
IF LOCAL
		IF TALENT:恋人
			PRINTFORML
		ELSEIF TALENT:恋慕
			PRINTFORML
		ELSEIF TALENT:思慕
			PRINTFORML
		ELSE
			PRINTFORML
		ENDIF
	ENDIF
RETURN 1
;==================================================
;351,帯出去
;==================================================
@M_KOJO_MESSAGE_COM_K112_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K112_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:同行 == 60
		IF TALENT:恋人
			PRINTFORML
			PRINTFORMW 「一起出去？那走吧？」
			PRINTFORMW 纯狐稍微整理了一下仪容就跟在了%CALLNAME:MASTER%的身后，脸上带着温和的笑容
			PRINTFORMW 「这次%CALLNAME:MASTER%打算去哪里玩呢？」
			PRINTFORMW 「啊，反正去哪里我也无所谓，除非%CALLNAME:MASTER%把我领到月都那边去」
			PRINTFORMW 纯狐半開玩笑的说道
		ELSEIF TALENT:恋慕
			PRINTFORML
			PRINTFORMW 「出去玩吗……好。」
			PRINTFORMW 「希望只是出去玩」
			PRINTFORMW 纯狐一副心事重重的样子跟了上来。
		ELSEIF TALENT:思慕
			PRINTFORML
			PRINTFORMW 「哦？邀请我出去玩吗？」
			PRINTFORMW 纯狐点了点头跟在你身后。
		ELSE
			PRINTFORML
			PRINTFORMW 「嗯？想带着我出去转转？」
			PRINTFORMW 纯狐犹豫了一下，点了点头跟在你身后
			PRINTFORMW 「偶尔出去转转确实是不错的选择呢，走吧」
		ENDIF
RETURN 1
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;FLAG:甲斐性無(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
	IF TFLAG:193
		PRINTFORML
		PRINTFORML 「有什么话想说吗……？」
		PRINTFORML  纯狐微微点了点头，等待着%CALLNAME:MASTER%的回答
		PRINTFORML  会被厌恶吗？或许会。
		PRINTFORMW  会被讨厌吗？或许会。
		PRINTFORMW  会不会连朋友都做不成？或许会。
		PRINTFORML  深吸了一口气，%CALLNAME:MASTER%转过头来，直视着纯狐的双眼。
		PRINTFORML  ————但比起那些所谓后果来，%CALLNAME:MASTER%更想揭示自己的心意。
		PRINTFORMW  在与纯狐相处的过程中，%CALLNAME:MASTER%已经明白了自己对于纯狐的感情。
		PRINTFORMW  纯狐，我喜欢你
		PRINTFORML  「……」
		PRINTFORMW  听到这个回答，纯狐原本淡定的表情微微变了一下。
        PRINTFORMW  「%CALLNAME:MASTER%，你说，你喜欢我，是吗？」
		PRINTFORMW  「——那么，现在呢？」
		PRINTFORMW  纯狐身上突然爆发出一股灵力，将%CALLNAME:MASTER%震倒在地，而纯狐则是瞬间掐住了%CALLNAME:MASTER%的脖子，缓缓将他提了起来。
        PRINTFORMW  「你的性命就在我的一念之间，而现在的你，还有胆量说一遍刚才的话吗？」
		PRINTFORMW  纯狐微微放松了握住脖子的手，让%CALLNAME:MASTER%得以喘息
		PRINTFORMW  这个答案不会变的，我喜欢你
        PRINTFORMW  「哼，无可救药」
        PRINTFORMW  纯狐微微眯起了眼，将%CALLNAME:MASTER%扔到了地上。
		PRINTFORMW  「你明白的吧，我是神灵，你是人类，我想杀了你不过在一念之间罢了，如果你现在害怕了的话，逃跑吧，我不会追的。」
		PRINTFORMW  纯狐微微浮在空中，眼神有点冰冷的盯着%CALLNAME:MASTER%
		PRINTFORMW  气势全開的纯狐露出了她真正的威严，与平日里和善好说话的她不同，此刻的她，光是看一眼就让人想要臣服。
		PRINTFORMW  那五千年所积累下来的底蕴，从未消失，而只是被她藏了起来罢了。
		PRINTFORMW  %CALLNAME:MASTER%承受着这股威严，站了起来，拍了拍衣服上的尘土。
		PRINTFORMW  不会逃的，已经到了这地步了，就算逃了又如何？后悔一生？
		PRINTFORMW  「……」
		PRINTFORMW  「混蛋……」
		PRINTFORMW  纯狐抿着嘴，没有再理%CALLNAME:MASTER%，而是自顾自的闭上了眼。
		PRINTFORMW  「混蛋，混蛋，混蛋！为什么！啊！」
		PRINTFORMW  纯狐睁開了眼，怨恨的怒吼着，飞到了高高的空中。
		PRINTFORMW  %CALLNAME:MASTER%根本没有看到一点人影，只能看到铺天盖地的弹幕朝着四周的地上轰去。
		PRINTFORMW  地表在震颤着，漫天尘土飞扬，几乎是肉眼可见的威力，如果被擦到了边，恐怕%CALLNAME:MASTER%必定尸骨无存。
		PRINTFORMW  这是源自五千年前的仙灵的最纯粹的怨恨。
		PRINTFORMW  但，哪怕是最近的轰击也在%CALLNAME:MASTER%的百米開外。
        PRINTFORMW  过了一会，纯狐脸色平静的从天空中飞了下来，一番发泄过后，冷静了下来的样子。
		PRINTFORMW 「想听听我的故事吗？」
		PRINTFORMW  说完，纯狐根本没理%CALLNAME:MASTER%，目光飘逸，自顾自的開始叙述起了自己的过去。
		PRINTFORMW  孩子被自己的丈夫亲手杀掉，这是最初的怨恨，之后接二连三的打击，足够让常人绝望或者疯狂。
		PRINTFORMW  但纯狐心中的怨恨令她没有被击垮，而是成为了神灵。
		PRINTFORMW 「我杀了羿，但是没能杀掉嫦娥，但那也没关系」
		PRINTFORMW 「正如同我所说过的：这场复仇大戏会一次接一次的上演，也许这场戏永远不会结束，又或许下一次就会永恒的落下帷幕」
		PRINTFORMW  %CALLNAME:MASTER%不知道自己该说什么，只能默默的点着头。
        PRINTFORMW 「正是如此，所以，我不想就这样生活下去。」
        PRINTFORMW 「这场复仇会一直，一直上演下去，演到最后的那一刻为止」
        PRINTFORMW  等到你复仇完了以后，再谈论这些，可以吗。
		PRINTFORMW 「你？等到我复仇完以后再和我说这些？」
		PRINTFORMW  纯狐微微仰起头，注视着天空。
        PRINTFORMW 「想法很好，但，不可能，复仇完了以后，我的怨恨也就没有根源了，等到那时，我就会成为普通的灵，到地狱去转世投胎吧。」
        PRINTFORMW  %CALLNAME:MASTER%想劝说纯狐，但是又发现他没有任何一个立场去劝纯狐任何事。
		PRINTFORMW 「……你明白我说的了吗？今天，就这样吧，你再来找我我也欢迎，但是，今天这种情况，就……尽量不要发生了。」
		PRINTFORMW  说完，纯狐微微闭上了眼，然后步伐有些摇晃的准备离開。
		PRINTFORMW  如果你永远都要复仇的话，我就永远帮你吧
		PRINTFORMW 「帮我？」
		PRINTFORMW  纯狐转过身来，像是听到了什么笑话一样，笑了起来。
		PRINTFORMW  先是轻笑，然后是大笑，好像这是世间最好笑的笑话一样。
		PRINTFORMW 「你要怎么帮我？嗯？就连那对绵月姐妹都有轻松干掉你的实力，时间停止又能如何？」
		PRINTFORMW 「你参与进去，无非就是在找死而已。」
		PRINTFORMW  即便如此，我也想要参与进去。
		PRINTFORMW 「……为什么？」
		PRINTFORMW  因为那是你的愿望
		PRINTFORMW  事情进展到这里，%CALLNAME:MASTER%尽管并未放下心中的爱意，但依然选择了另一个答案。
		PRINTFORMW 「……」
		PRINTFORMW  纯狐沉默了
		PRINTFORMW 「你会死，明白吗？」
		PRINTFORMW 我知道
		PRINTFORMW 「那你为何还要帮我？」
		PRINTFORMW 刚才就说了，那是你的愿望，这就够了。
		PRINTFORMW 「……哼，是这样吗……」
		PRINTFORMW 纯狐转过身深吸了一口气，再转过来时，已经恢复到了正常的状态。
		PRINTFORML 但%CALLNAME:MASTER%敏捷的注意到纯狐脸边的两行淡淡的泪痕。
		PRINTFORMW 「那我还有什么理由去拒绝一个连死都不怕的人呢？」
		PRINTFORMW 「接下来干什么？」
		PRINTFORMW 「以及……请多关照了？」
		PRINTFORMW 「当时还真是没想到，将来的我居然还会有接受他人告白的时候啊……」
	ELSE
	    IF TALENT:恋慕
            PRINTFORMW 没什么
			PRINTFORMW 这样回答纯狐以后，%CALLNAME:MASTER%扭过了头。
			PRINTFORMW 或许，还是早了点，又或者，其实时候已到，只是%CALLNAME:MASTER%恐惧着被拒绝后的后果而已。
			PRINTFORMW 「没什么……吗，啊，也好，那么接下来干什么？」
			PRINTFORMW 听到这个答复，纯狐的眼神中带上了一丝复杂的情緒。
			PRINTFORMW 那是庆幸，失望，惆怅等等情緒混在了一起的眼神。
			PRINTFORMW 平复了一下心情，两人不约而同的没有提起刚才的事，而是讨论起了下一步的安排。
		ELSEIF TALENT:思慕
			PRINTFORML
			PRINTFORMW 「有事吗？」
			PRINTFORMW 纯狐脸色平静的转过头来，眼神淡定无比，像是提前知道了你要说什么。
			PRINTFORML %CALLNAME:MASTER%注视着身边正在等待着答复的纯狐，咬了咬牙下定了决心试着告白了。
			PRINTFORML 「玩起了人间之里最近流行起来的那个游戏吗？」
			PRINTFORMW 纯狐脸色平静的吓人的看着%CALLNAME:MASTER%。
			PRINTFORMW 什么游戏？人间之里有这个游戏吗？完全没有听说过的%CALLNAME:MASTER%有些疑惑。
			PRINTFORML 「就是那个向关系不错的女性表白然后看对方反应的游戏」
			PRINTFORMW 「虽然感觉有些不尊重女性，但是也不是不能理解，这次我就原谅你了，可别有下次了哦。」
			PRINTFORMW 「人里很多玩了这个游戏的男性，到最后都会失去几个女性朋友呢」
			PRINTFORMW 纯狐微微的对着%CALLNAME:MASTER%笑了一下。
			PRINTFORMW 原来如此，这个游戏根本不存在，是纯狐在用委婉的方式婉拒和警告，%CALLNAME:MASTER%一下子明白了。
		ELSE
			PRINTFORML
			PRINTFORML 「嗯？到底怎么了？」
			PRINTFORMW 纯狐注意到了有些犹豫的%CALLNAME:MASTER%，疑惑的这么问道。
			PRINTFORML 现在告白的话，是不是太早了？
			PRINTFORML %CALLNAME:MASTER%有些生硬的换了一个话题。
			PRINTFORMW 纯狐虽然疑惑，但是并没有多想。
			PRINTFORMW 「我带了点零食，想尝尝吗，是人间的甜品屋做的糕点。」
		ENDIF
	ENDIF
RETURN 1
;==================================================
;353,猥褻
;FLAG:甲斐性無(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_353_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_353_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;354,陪睡（相手は起きて被窝に招く感じ）
;CFLAG:衰弱(1以上=起きない
;CFLAG:招待(0以外=起きない
;==================================================
@M_KOJO_MESSAGE_COM_K112_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;355,時止め（地の文の改変程度に留めるべき
;==================================================
@M_KOJO_MESSAGE_COM_K112_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_355_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_355_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;360,任憑擺佈
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K112_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;363,朗読（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:陪睡中(1=被窝orベッドの中で本を読む
;MASTERがTARGETより大柄の場合,膝の上にTARGETを乗せる
;==================================================
@M_KOJO_MESSAGE_COM_K112_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_363_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_363_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;364,撒豆子(萃香,勇儀,斯喀雷特姉妹用
;TFLAG:193(撒豆子に参加してる人数
;==================================================
@M_KOJO_MESSAGE_COM_K112_364
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_364_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_364_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;365,向守矢神社移動(早苗,神奈子,諏訪子用
;==================================================
@M_KOJO_MESSAGE_COM_K112_365
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_365_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_365_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;402,就寝
;==================================================
@M_KOJO_MESSAGE_COM_K112_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K112_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:睡眠(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K112_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_403_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML 「休息？」
		PRINTFORMW 纯狐点了点头，掏出了一个袋子扔向%CALLNAME:MASTER%
		PRINTFORMW %CALLNAME:MASTER%接住以后看了一眼，是人间之里的甜品
		PRINTFORMW 「既然要休息的话，那就休息的舒服一点吧」
	ELSEIF TALENT:恋慕
				PRINTFORML
		PRINTFORML 「说起来的话，我其实一直很好奇，%CALLNAME:MASTER%难不成是在追求我吗？」
		PRINTFORMW 纯狐脸上带着一丝笑容，但%CALLNAME:MASTER%却感觉像是皮笑肉不笑。
		PRINTFORMW 这里要怎么回答呢……
		$INPUT_LOOP0
		PRINTL [0]只是把你当朋友
		PRINTL [1]当然是在追求你啦（玩笑语气）
		PRINTL [2]是在追求你（认真语气）
		INPUT
		SELECTCASE RESULT
		CASE 0
			PRINTFORMW 「说的也是呢，把很好的朋友当成暗恋什么的」
			PRINTFORMW 「嘛，还真是有点自恋过头了呢」
			PRINTFORMW 纯狐轻轻笑了一下，将头转了过去。
;			CFLAG:90:1300 = 1
		CASE 1
			PRINTFORMW 「嚯嚯，原来%CALLNAME:MASTER%是在追求我吗？」
			PRINTFORMW 听出了%CALLNAME:MASTER%的玩笑意味，纯狐的语气也变得有些缓和下来
			PRINTFORMW 「那你可要加把劲了哦？我的追求者可是很多的」
			PRINTFORMW 「開玩笑的，就算是朋友，我现在也只有两三个罢了，哪来什么追求者」
			PRINTFORMW 「不过，这样也挺好的」
			PRINTFORMW 纯狐脸上的神色很释然，但%CALLNAME:MASTER%却读出了一股不一样的感觉
;			CFLAG:90:1300 = 1
		CASE 2
			PRINTFORMW 「追求我？」
			PRINTFORMW 「我劝你趁早放弃吧，当个朋友，也挺好的。」
			PRINTFORMW 纯狐脸上一副复杂的表情，像是早知如此，却又像是出乎意料
			PRINTFORMW 「好了，刚才的话，我就当玩笑听了，接下来干些什么？」
;			CFLAG:90:1301 = 1
		CASEELSE
			GOTO INPUT_LOOP0
		ENDSELECT

RETURN 1
	ELSEIF TALENT:思慕
		PRINTFORMW 「累了吗？」
		PRINTFORMW 纯狐笑了笑，坐到了%CALLNAME:MASTER%的身边。
		PRINTFORMW 「既然如此的话，那就休息一下吧」
		PRINTFORMW 「一闲下来的话，感觉和%CALLNAME:MASTER%一起的时候都很開心啊。」
		PRINTFORMW 纯狐看上去有些感慨的样子，但不知为何。
		PRINTFORMW %CALLNAME:MASTER%听出了一丝寂寞的感觉。
    ELSE
		PRINTFORML
		PRINTFORMW 「想休息一会了？刚好我也微微有些疲乏了。」
		PRINTFORMW 纯狐干脆的点了点头，找了把椅子坐了下去。
		PRINTFORMW 注意到%CALLNAME:MASTER%视线的纯狐坦然的耸了耸肩。
		PRINTFORMW 「那个年代可没有什么好的休息条件，当时随便找个不怎么脏的地方坐下去都不少见。」
		PRINTFORMW 从她身上很难看到已经活了五千年的长者的气质呢。
	ENDIF
ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会
;条件が厄介なので,COMF405 外出.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K112_405
;外出にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K112_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGETと约会
	IF CFLAG:同行
	;TARGET以外と约会
	ELSEIF CFLAG:MASTER:同行
	;お出かけお見送り
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:現在位置)(野外掃除（冬は扫雪
;==================================================
@M_KOJO_MESSAGE_COM_K112_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML 「扫除吗，那就一起吧」
		PRINTFORMW 「话说经常能看到%CALLNAME:MASTER%在扫除，不会累吗？」
		PRINTFORMW 纯狐一边清扫着地面，一边悠闲的说道
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORML
		PRINTFORMW 「哦？打扫卫生吗」
		PRINTFORMW 纯狐点了点头，也找来了一些清扫工具。
		PRINTFORMW 「看着%CALLNAME:MASTER%在旁边打扫，而我却在旁边休息的话那可不太好。」
		PRINTFORMW 「那么，那边的地面就交给我了」
	ELSE
		PRINTFORML
		PRINTFORMW 「打扫房间吗。」
		PRINTFORMW 纯狐若有所思的想了想
		PRINTFORMW 「不介意我来帮个忙吧」
		PRINTFORMW 「以前那段时光这种小家务是我经常干的呢。」
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K112_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
	ELSEIF TALENT:恋慕
		PRINTFORML
	ELSEIF TALENT:思慕
		PRINTFORML 「哦？想要变得更强吗？」
		PRINTFORMW 纯狐认可的点了点头。
		PRINTFORMW 「战力不管在哪个时代，永远都是最重要的标准之一。」
		PRINTFORMW 「嗯，基础有些不足啊……」
		PRINTFORMW 「先试试对我进行攻击，我看看你对灵力有没有什么运用错误」
		PRINTFORMW 纯狐专心的对%CALLNAME:MASTER%细心教导着
    ELSE
		PRINTFORMW 「想要变强？」
		PRINTFORMW 纯狐点了点头。
		PRINTFORMW 「先从闪避開始吧」
		PRINTFORMW 「接下来我会開始攻击%CALLNAME:MASTER%，%CALLNAME:MASTER%尽力闪躲就好。」
		PRINTFORMW 纯狐開始跟%CALLNAME:MASTER%交代起了接下来的训练计划。
	ENDIF
ENDIF
RETURN 1
;==================================================
;412,學習
;ABL:教養(ABL:MASTER:教養より大=MASTERが教えてもらう ABL:MASTER:教養より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K112_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
    IF ABL:MASTER:教養 >= ABL:TARGET:教養
		IF TALENT:恋人
			SELECTCASE RAND:3
			CASE 2
				PRINTFORMW
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		PRINTFORMW
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		ELSE
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		ENDIF
	ELSE
		IF TALENT:恋人
			SELECTCASE RAND:3
			CASE 2
				PRINTFORMW
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「想要学习知识吗？」
				PRINTFORMW 纯狐看向%CALLNAME:MASTER%的眼光充满了欣赏。
				PRINTFORMW 「我还以为我记得的那些知识或许这辈子都没人能学到呢。」
				PRINTFORMW 「如果没有特别想学的话，我就慢慢讲吧」
				PRINTFORMW 「五千多年前的青铜器的花纹看似没有太大区别，实则很有讲究……」
				PRINTFORMW 纯狐找了个位子招呼%CALLNAME:MASTER%坐下，慢慢的讲了起来。
				PRINTFORMW 与其说是教导，倒不如说更像闲聊。
			CASE 0
				PRINTFORMW 「嗯，来找我学知识？」
				PRINTFORMW 纯狐点了点头，招呼%CALLNAME:MASTER%在面前坐下。
				PRINTFORMW 「有什么十分想学的东西吗？嘛，我也不一定回答的上来就是了」
				PRINTFORMW 「哦，没有想学的知识吗，那我就随便挑挑我最熟悉的东西讲讲了。」
				PRINTFORMW 「我那个时代是比较注重礼仪的，我们用餐前的礼仪也很复杂，只不过当时我不喜欢，现在也不喜欢就是了……」
				PRINTFORMW 纯狐侃侃而谈起来。
			CASE 3
				PRINTFORMW 「想要学点什么东西吗？」
				PRINTFORMW 纯狐微微一笑。
				PRINTFORMW 「当然可以，活了那么久，我自认对大部分事情还是略知一二的」
				PRINTFORMW 「在我还是人类时的遥远的过去，我们一般都是修建草屋做建筑，木屋甚至是华贵的象征……」
				PRINTFORMW 纯狐随意的摆了摆手，開始说起过去的常识。但对现在来说也是少见的知识了。
			ENDSELECT
	    ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=甜点 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K112_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;414,吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:194(1=没穿内裤涮涮鍋 2=禁断のメニュー 31=興奮劑高湯 30=奶酪番茄沙拉 34=金吉獣料理
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K112_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_414_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K112_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;416,演奏
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:使用楽器(1=電子琴 2=鋼琴 3=吉他 4=小號 5=小提琴)
;==================================================
@M_KOJO_MESSAGE_COM_K112_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
    IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORML
		PRINTFORMW 听到%CALLNAME:MASTER%要演奏音乐，纯狐高兴的点了点头。
		PRINTFORMW 「请吧，我很想听听%CALLNAME:MASTER%的音乐会有多么动听」
	ELSE
		PRINTFORML
		PRINTFORMW 「想要给我演奏一首音乐吗？」
        PRINTFORMW 纯狐微微的点了点头，眼里一片欣然。
		PRINTFORMW 「没问题，我以前就很喜欢听音乐，虽然不了解，但是依然是我一大兴趣爱好」
		PRINTFORMW 「那么，请吧」
ENDIF
ENDIF
	SELECTCASE TFLAG:193
	CASE 1
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:思慕
	    PRINTFORMW 「非常美妙！」
		PRINTFORMW 纯狐一边站起身来鼓掌一边夸奖道。
		PRINTFORMW 「%CALLNAME:MASTER%的演奏给了我一种错觉，哪怕是纯化也不可能纯化的更美妙。」
		PRINTFORMW 「呵呵，虽然用纯化肯定能够变得更动听，可是那样反而失去了音乐的本质。」
	ELSE
		PRINTFORML
		PRINTFORMW 演奏完毕，%CALLNAME:MASTER%什么还没来得及说，纯狐就哗哗的鼓起掌来
		PRINTFORMW 「十分的美妙，比我听过的九成以上的曲子都动人，%CALLNAME:MASTER%的音乐真的是出神入化了。」
		PRINTFORMW 纯狐口中的赞美之词滔滔不绝，显然十分欣赏%CALLNAME:MASTER%的音乐。
	  ENDIF
		CASE 0
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSE
		PRINTFORML
		PRINTFORMW 「很不错的一次演奏呢，虽然我不懂音乐，也能听到%CALLNAME:MASTER%在这方面还是用了心的」
		PRINTFORMW 纯狐听着音乐称赞起了%CALLNAME:MASTER%
	  ENDIF
		CASE -1
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORML
		PRINTFORMW 纯狐皱着眉头听完了%CALLNAME:MASTER%的演奏
		PRINTFORMW 「抱歉，虽然有点失礼，但是这次%CALLNAME:MASTER%的发挥可不怎么好」
		PRINTFORMW 「%CALLNAME:MASTER%你也有所察觉吧，下次我希望能够听到更美妙的曲子而不是这种……有失水准的音乐。」
	ELSE
		PRINTFORML
		PRINTFORMW 「嗯……那个」
		PRINTFORMW 纯狐微微有些犹豫的開口了
		PRINTFORMW 「虽然有些失礼，但是我觉得这次的演奏，%CALLNAME:MASTER%的发挥有失水准啊。」
	ENDIF
	ENDSELECT
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORML
		PRINTFORMW 「十分精彩啊，%CALLNAME:MASTER%的曲子真的很耐听呢」
		PRINTFORMW 「呵呵，现在就開始期待起下一次的演奏了呢。」
	ELSE
		PRINTFORML
		PRINTFORMW 「以后也来经常的演奏点曲子给我听听哦」
		PRINTFORMW 「我很期待啊。」
	ENDIF
RETURN 1
;==================================================
;417,午睡をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔に接吻された 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処or阴茎揉み)
;CFLAG:陪睡中(1=一緒に寝ている)
;==================================================
@M_KOJO_MESSAGE_COM_K112_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_417_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;421,祈願する
;条件が複雑なので,COMF421 祈願.ERBおよび,EVENT_MESSAGE_COM400.ERBの祈願するの項を参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K112_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;431,在浴室里放鬆
;TFLAG:209(4=人間之里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;TFLAG:194(1=連続入浴不可(表示しない可能性あり？
;==================================================
@M_KOJO_MESSAGE_COM_K112_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;432,在浴室里放鬆
;表示タイミングは入浴後なので,お浴室上がりでの
;TFLAG:209(4=人間之里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;==================================================
@M_KOJO_MESSAGE_COM_K112_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_432_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_432_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;440,等待
;==================================================
@M_KOJO_MESSAGE_COM_K112_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_440_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_440_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;441,聽課(慧音専用
;==================================================
@M_KOJO_MESSAGE_COM_K112_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_441_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_441_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;442,伐採（未実装
;==================================================
@M_KOJO_MESSAGE_COM_K112_442
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_442_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_442_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;442以降の指令は,実行しても口上はおそらく表示されないので貂プレでもスルー
;==================================================

;※※※※※※※※※※※※※※※※※※※※※※※※※
;约会系指令
;约会系口上は文字街道外出先で発生
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,约会会話
;==================================================
@M_KOJO_MESSAGE_COM_K112_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_600_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_600_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K112_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_601_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_601_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_MESSAGE_COM_K112_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_602_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_602_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,牽手
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗でもふりほどかれたりはしません
;==================================================
@M_KOJO_MESSAGE_COM_K112_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
	ELSEIF TALENT:恋慕
		PRINTFORML
	ELSEIF TALENT:思慕
		PRINTFORMW
        ELSE
		PRINTFORMW 「唔，牵手吗」
		PRINTFORMW 纯狐微微有些犹豫的把手递给了%CALLNAME:MASTER%
		PRINTFORMW 「我那个时代，这种事一般是恋人才会做的事。」
		PRINTFORMW 「不过幻想乡里似乎很少有人在意，倒是我有些老古董了，呵呵。」
		PRINTFORMW 尽管牵着纯狐的手，纯狐依然看似不在意的跟%CALLNAME:MASTER%侃侃而谈。
		PRINTFORMW 但是不是真的不在意貌似还有待商榷。
	ENDIF
ENDIF
RETURN 1

;==================================================
;604,散步
;约会中の場合,CFLAG:現在位置に移動先の場所が既に入ってる
;==================================================
@M_KOJO_MESSAGE_COM_K112_604
;散步にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K112_604_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_604_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;605,繞道
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_MESSAGE_COM_K112_605
;繞道にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K112_605_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_605_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;610,請吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K112_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORMW 「啊，邀请我吃饭是吗」
		PRINTFORMW 纯狐点了点头。
		PRINTFORMW 「正好也有些饿了，那我就不客气了。」
		PRINTFORMW 「这边的话我记得在往北走两百米有一家很不错的烤肉店」
		PRINTFORMW 「西南边四百米的话也有个很安静但是服务很好的酒馆」
		PRINTFORMW 「再远点的话，往东边走个七八百米有一条美食街，食物花样很多也很好吃」
		PRINTFORMW 纯狐仿佛本地人一样对周边的环境熟悉无比的指路。
    ELSE
		PRINTFORML
		PRINTFORMW 「吃饭？」
		PRINTFORMW 纯狐想了想，赞同了%CALLNAME:MASTER%的想法
		PRINTFORMW 「谢谢了，刚好也有些饿了。」
		PRINTFORMW %CALLNAME:MASTER%领着纯狐往%CALLNAME:MASTER%印象中不错的饭馆走了过去。。
	ENDIF
ENDIF
RETURN 1

;==================================================
;613,賺錢（オミットされました
;==================================================
@M_KOJO_MESSAGE_COM_K112_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_613_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_613_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;614,採購食材
;TFLAG:193(1=購入＆約會経験UP 0=購入 -1=非購入)
;==================================================
@M_KOJO_MESSAGE_COM_K112_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_614_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;615,吃便當
;実行可能場所　地蔵小路,倒垂的柳樹下,霧之湖,玄武之澤,大蛤蟆之池,絶景之丘,山之湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:料理技能(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_MESSAGE_COM_K112_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_615_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_MESSAGE_COM_K112_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_MESSAGE_COM_K112_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_618_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;620,鈴奈庵
;TFLAG:193(1=貸し出しOK 0=貸し出し不可
;ITEM:10X (X=1戦術指南書 X=2調理指南書 X=3字典 X=4御伽草子
;==================================================
@M_KOJO_MESSAGE_COM_K112_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_620_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;660,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K112_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;698,進入房間
;TARGETの進入房間場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K112_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_698_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_698_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;699,外出
;==================================================
@M_KOJO_MESSAGE_COM_K112_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K112_699_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K112_699_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;前ターン膝枕後身体接觸指令
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_MESSAGE_SCOM_K112_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K112_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K112_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;61,抱枕
;(TARGET睡眠時間or衰弱)陪睡中,前ターン抱きつく後就寝指令
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K112_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K112_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K112_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;62,亲額頭
;前ターン頭撫で後接吻
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:欲望(5以上=物足りない
;ABL:親密(5以上=照れる
;==================================================
@M_KOJO_MESSAGE_SCOM_K112_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K112_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K112_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;前ターン接吻後接吻
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_MESSAGE_SCOM_K112_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K112_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K112_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
	ELSE
		PRINTFORML
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;约会出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_SCOM_K112_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K112_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K112_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示,1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋人
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
	ELSEIF TALENT:思慕
		PRINTFORML
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
	ELSE
		PRINTFORML
		PRINTFORMW 「啊，有急事吗，若是没事的话不必这么着急的」
		PRINTFORMW 纯狐皱着眉头看着拉着她手赶路的%CALLNAME:MASTER%，眼里微微有些不悦。
		PRINTFORMW 「欣赏一下路边的风景不也是一种乐趣吗，没有必要这么着急。」
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【112】纯狐 自制/M_KOJO_K112_日常系コマンド.ERB


code:
;-------------------------------------------------
;赫卡提亚UPDATE関数
;-------------------------------------------------
;
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K113
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等の角色変数を使用場合、角色番号の指定が必要になります

;有多个本人物口上可能存在时，担心出BUG请把LOCAL置为1
LOCAL = 1

IF LOCAL && CFLAG:113:1999 == 0
	PRINTFORML
	PRINTFORML 你正在UPDATE 赫卡提亚 口上
	CALL COLORMESSAGE("   Version： Alpha_20230121_除夕版",0xE0404A,2,0)
	PRINTFORMW
	PRINTFORMDW 在本口上中、赫卡提亚的三种形态会有不同的颜色、分别是：
	CALL COLORMESSAGE("  赫卡提亚-月球形态（在梦之世界可见）",0xFFF8D3,2,0)
	CALL COLORMESSAGE("  赫卡提亚-地球形态（在其他地区可见）",0x65E3F9,2,0)
	CALL COLORMESSAGE("  赫卡提亚-异界形态（各处可见）",0xFE66BB,2,0)
	PRINTFORMDW 同样，根据形态不同、也会有不同的个性、属性和对话内容
	SETCOLOR C_RED
	PRINTFORML （Alpha版本尚未完善此功能，在游玩过程中可能出现各种问题）
	RESETCOLOR
	PRINTFORMDL 例如：换形态停不下来、一直不换形态、形态人设OOC等问题
	PRINTFORMDL 如果出现问题、请详读readme、并在贴吧或论坛进行反馈
	PRINTFORMDL 如果出现问题、请详读readme、并在贴吧或论坛进行反馈
	PRINTFORMDL 如果出现问题、请详读readme、并在贴吧或论坛进行反馈
	PRINTFORMW
	$UPDATE_INPUT_LOOP1
	PRINTFORMDL 如果你之前正在使用我的赫卡提亚口上，则可以直接覆盖更新
	SETCOLOR C_RED
	PRINTFORMW 否则，请在这里初始化赫卡提亚的状态
	PRINTFORML
	RESETCOLOR
	PRINTFORML 初始化吗？
	PRINTFORMDL [0]进行初始化
	PRINTFORMDL [1]暂时先不初始化、我赌不会有BUG！
	PRINTFORMDL [1]不需要、而且以后也不再需要
	INPUT
	SELECTCASE RESULT
		CASE 0
			PRINTFORMDL 真的要初始化吗？
			PRINTL
			PRINTFORMDL [0]确认
			PRINTFORMDL [1]果然还是算了
			$UPDATE_INPUT_LOOP2
			INPUT
			SELECTCASE RESULT
				CASE 0
					CALL UPDATE_RESET_K113()
					PRINTFORMDW 初始化成功
				CASE 1
					GOTO UPDATE_INPUT_LOOP1
				CASEELSE
				    PRINTFORMDW 你输入的是什么√8？再输一遍
					GOTO UPDATE_INPUT_LOOP2
			ENDSELECT
		CASE 1
			PRINTFORMDW 好吧……如果你遇到了恶性BUG、请再回来尝试
		CASE 2
			PRINTFORMDW 此选项以后不会再次出现
			CFLAG:113:1999 = 1
		CASEELSE
		    PRINTFORMDW 你输入的是什么√8？
			GOTO UPDATE_INPUT_LOOP2
	ENDSELECT
ENDIF
RETURN 1

;-------------------------------------------------
;@UPDATE_RESET_K113()
;初導入時に赫卡提亚の面識状況・好感度・信賴度・陥落状況・能力・経験をリセット
;兒童関連と恋人は結構やばそう。要検証
;-------------------------------------------------
;
@UPDATE_RESET_K113()
    MAXBASE:113:0 = 2400
	MAXBASE:113:1 = 2400
	MAXBASE:113:10 = 1500
	MAXBASE:113:11 = 1000

	CLEARBIT CFLAG:113:既成事實 , 1
	CFLAG:113:好感度 = 0
	CFLAG:113:信賴度 = 0
	CFLAG:113:掌握把柄 = 0
	CFLAG:113:被掌握把柄 = 0
	CFLAG:113:允许无套 = 0
	CFLAG:113:面識 = 0
	CFLAG:113:清い交際 = 0
	CFLAG:113:オナバレ = 0
	CFLAG:113:ブチギレ = 0
	CFLAG:113:心情不快 = 0
	CFLAG:113:眠姦発覚 = 0
	;CFLAG:113:出産経過日 = 0
	CFLAG:113:育児人数 = 0
	CFLAG:113:兒童人数 = 0
	IF TALENT:113:恋人 == 1 && TALENT:MASTER:恋人 == 1
		TALENT:113:恋人 = 0
		TALENT:MASTER:恋人 = 0
	ENDIF

	;累計精液経験
	CFLAG:113:累計膣内精液 = 0
	CFLAG:113:累計肛門精液 = 0
	CFLAG:113:累計精飲 = 0
	CFLAG:113:累計精浴 = 0

	;初吻系 接吻経験無し、無接吻経験の素質が那个ば他は初期化しなくても問題ないっぽい？
	TALENT:113:無接吻経験 = 1

	;陥落
	TALENT:113:把柄 = 0
	TALENT:113:恋慕 = 0
	TALENT:113:思慕 = 0
	TALENT:113:淫乱 = 0
	TALENT:113:愛欲 = 0
	TALENT:113:炮友 = 0
	;TALENT:113:妊娠 = 0
	;TALENT:113:育児中 = 0

	;淫乱系
	TALENT:113:受虐狂 = 0
	TALENT:113:自慰狂 = 0
	TALENT:113:淫壺 = 0
	TALENT:113:尻穴狂 = 0
	TALENT:113:淫乳 = 0
	TALENT:113:接吻魔 = 0
	TALENT:113:子宮口性感 = 0

	;キャンディ
	TALENT:113:処女 = 1
	TALENT:113:性別 = 1
	TALENT:113:動物耳 = 0

	TALENT:113:12 = 1
	TALENT:113:23 = 1
	TALENT:113:10 = 1
	TALENT:113:小悪魔 = 0
	TALENT:113:傲嬌 = 0
	TALENT:113:羞恥心 = 0
	TALENT:113:服従 = 0

	;刻印
	MARK:113:時姦刻印 = 0
	MARK:113:反発刻印 = 0
	MARK:113:苦痛刻印 = 0
	MARK:113:快楽刻印 = 0
	MARK:113:不埒刻印 = 0

	;ABL初期化
	CALL INI_K113("ABL")
	;初期能力
	ABL:113:0 = 2
	ABL:113:1 = 1
	ABL:113:2 = 1
	ABL:113:3 = 2
	ABL:113:11 = 1
	ABL:113:16 = 2
	ABL:113:17 = 2
	ABL:113:42 = 6
	ABL:113:43 = 4

	;EXP初期化
	CALL INI_K113("EXP")
	;初期経験
	EXP:113:0 = 15
	EXP:113:3 = 10
	EXP:113:10 = 10
	EXP:113:22 = 20
	EXP:113:51 = 50
	EXP:113:74 = 100

	;宝珠
	CALL INI_K113("JUEL")

RETURN 1

;-------------------------------------------------
;@INI_K113(ARGS)
;ARGS = ABLでABL初期化、EXPでEXP初期化、JUELでJUEL初期化
;存在しない場所まで初期化してるけど・・・
;-------------------------------------------------
;
@INI_K113(ARGS)
	IF ARGS == "ABL"
		FOR LOCAL, 0, 56
			ABL:113:LOCAL = 0
		NEXT
	ELSEIF ARGS == "EXP"
		FOR LOCAL, 0, 111
			EXP:113:LOCAL = 0
		NEXT
	ELSEIF ARGS == "JUEL"
		FOR LOCAL, 0, 33
			JUEL:113:LOCAL = 0
		NEXT
		JUEL:113:100 = 0
	ENDIF
RETURN 1

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【113】赫卡提亚口上/M_KOJO_K113_UPDATE处理.ERB

license: unknown