code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;==================================================
@M_KOJO_MESSAGE_COM_K44_300
;指令共通メッセージ(TRAIN_MESSAGE)
;削除すると「～说着话。」とかが消えます
;CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K44_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ && !MARK:反発刻印
	;失敗時は無し
	SIF TFLAG:193 <= -1 || (TCVAR:302 && !TALENT:恋慕)
	RETURN 1
	;おはよう会話
	IF CFLAG:MASTER:初期位置 == CFLAG:初期位置 && TIME:0 == CFLAG:起床時間 + 10
		PRINTFORML %CALLNAME:MASTER%与艾伦一起一边做早上的准备一边说着话
		TRYCALLFORM M_KOJO_COLOR_K44
		PRINTFORMW 「那么，今天也加油吧%UNICODE(0x2665)%」
		RETURN 1
	;仕事中会話
	ELSEIF CFLAG:325 == 5 && (CFLAG:職種 == 47 || CFLAG:職種 == 54) && (DAY:3 == 15 || DAY:3 == 30)
		;地の文
		PRINTFORM %CALLNAME:PLAYER%は%CALLNAME:TARGET%
		PRINTDATA
			DATAFORM と轻轻地说着话
			DATAFORM の闲暇时顺便搭话了
			DATAFORM に提出了问题
		ENDDATA
		PRINTFORML
		TRYCALLFORM M_KOJO_COLOR_K44
		SELECTCASE RAND:4
		CASE 1
			IF TCVAR:354 > 15
				IF TALENT:恋慕 || TALENT:恋人
					PRINTFORMW 「现在客人很多,等会儿再来吧%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「现在很忙，以后再继续吧」
				ENDIF
			ELSE
				PRINTFORMW 「——啊，客人来了 。　欢迎光临ー%UNICODE(0x2665)%」
			ENDIF
		CASEELSE
			PRINT 「啊，那是
			SELECTCASE RAND:4
			CASE 1
				PRINTW 增添自信的药 」
			CASE 2
				PRINTW 驱除妖精的魔法啊 」
			CASE 3
				PRINTW 驱除诅咒啊，要放到头上来使用」
			CASEELSE
				PRINTFORMW 防静电喷雾器哟，没有这个的话会有各种各样地麻烦 」
			ENDSELECT
		ENDSELECT
		RETURN 1
	ENDIF
	;特別な日なら確定
	SIF TCVAR:358 == 0
	CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK
	;特別会話が発生していれば省略
	IF TCVAR:358 == 2
		TCVAR:358 = 1
		RETURN 1
	ENDIF
	;一周年記念、分岐条件上一年目にあっていないと発生しない。すでに挂坠项链を貰ってる際の分岐も書きたいけど代わりをなににするか決まらないので保留、素材系はまだ未実装だし
	IF TALENT:恋人 && TALENT:恋慕 && DAY:2 == CFLAG:1001 && DAY:3 == CFLAG:1002 && CFLAG:MASTER:現在位置 == CFLAG:1003 && TCVAR:359 == 0 && DAY:0 > 124 && DAY:0 < 249 && !ITEM:399
		TRYCALLFORM M_KOJO_COLOR_K44
		IF ITEM:399
			PRINTFORMW 「今后也请多多指教%UNICODE(0x2665)%　%CALLNAME:MASTER%%UNICODE(0x2665)%%UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「今天呢，为了%CALLNAME:MASTER%准备了特别的东西」
			PRINTFORMDW 这么说来，艾伦从怀里取出了镶有紫色水晶的项链
			PRINTFORMW 是%UNICODE(0x2665)%为了纪念我们相遇一周年，给%CALLNAME:MASTER%礼物哟%UNICODE(0x2665)%
			PRINTFORMDW %CALLNAME:MASTER%得到了魔水晶垂饰！
			ITEM:399 ++
			PRINTFORMW 「为了%CALLNAME:MASTER%努力做出来的%UNICODE(0x2665)%如果你喜欢我就很高兴了%UNICODE(0x2665)%
		ENDIF
		PRINTFORMDW %CALLNAME:MASTER%对艾伦表示感谢，并打算回礼……
		;禮物未実装につき必ずこれ
		PRINTFORMDW ……没有什么可以给你的……　作为\@ TALENT:MASTER:性別 == 2 ? 男 # 女 \@子是何等耻辱…….
		PRINTFORMW 「哎呀，没回礼也没关系%UNICODE(0x2665)%」
		PRINTFORMW 「但是作为交换，请给予我你的爱%UNICODE(0x2665)%」
		PRINTL
		PRINTFORMDW 收到了送礼之后，%CALLNAME:MASTER%和艾伦拉着手并谈笑了…
		PRINTFORMW 「嘿嘿%UNICODE(0x2665)% 和%CALLNAME:MASTER%在一起真的好幸福啊%UNICODE(0x2665)%%UNICODE(0x2665)% 」
		PRINTFORMW 「希望这段时间能永远持续下去…… 」
		TCVAR:359 = 1
		TIME += 20
	;二周年以降
	ELSEIF TALENT:恋人 && TALENT:恋慕 && DAY:2 == CFLAG:1001 && DAY:3 == CFLAG:1002 && CFLAG:MASTER:現在位置 == CFLAG:1003 && TCVAR:359 == 0 && ITEM:399
		TRYCALLFORM M_KOJO_COLOR_K44
		PRINTFORMW 「讷、和%CALLNAME:MASTER%的初次会面是在这里吧」
		PRINTFORMW 「从那时起虽然已经过了很长一段时间了，但是总觉得就是最近才发生的事情 」
		TCVAR:359 = 1
	;心情不快時用
	;ELSEIF TALENT:心情 == -1
;		TRYCALLFORM M_KOJO_COLOR_K44
		;外か内か
;		IF (OUTROOF(CFLAG:TARGET:現在位置)) && RAND:3 > 0
;			;季節ごとに変化
;			IF DAY:2 == 1
;				SELECTCASE TIME:5
;				;晴天
;				CASE 0, 1
;					PRINTFORMW 「好不容易天气这么好，但今天心情不好呢 」
;				CASE 8 TO 13
;					PRINTFORMW 「什么啊这天气～！！ 」
;				CASEELSE
;					PRINTFORMW 「好不容易到了春天，这样的天气心情也会变差的 」
;				ENDSELECT
;			ELSEIF DAY:2 == 2
;				SELECTCASE TIME:5
;				;晴天
;				CASE 0, 1
;					PRINTFORMW 「啊——！太热了，太恶心了！ 」
;				;雨
;				CASE 4, 5
;					PRINTFORMW 「什么啊这湿气啊！简直就像水里一样！ 」
;				;雪など
;				CASE 8 TO 13
;					PRINTFORMW 「什么啊这天气～！！ 」
;				CASEELSE
;					PRINTFORMW 「 哎呀、真是的！」
;					PRINTFORMW 「为什么这么潮湿呢？ ！」
;				ENDSELECT
;			ELSEIF DAY:2 == 3
;				SELECTCASE TIME:5
;				;晴天
;				CASE 0, 1
;					PRINTFORMW 「总觉得心情不太好呢，好不容易到了秋天 」
;				;雪
;				CASE 8 TO 11
;					PRINTFORMW 「……秋天的话还很普通呢 」
;				;雨雪交加、冰雹
;				CASE 12, 13
;					PRINTFORMW 「什么啊这天气～！！ 」
;				CASEELSE
;					PRINTFORMW 「好不容易到了秋天，这样的天气心情也会变差的！ 」
;				ENDSELECT
;			ELSEIF DAY:2 == 4
;				SELECTCASE TIME:5
;				;晴天
;				CASE 0, 1
;					PRINTFORMW 「明明有阳光照射为何还这么冷 ！」
;				;雨
;				CASE 4, 5
;					PRINTFORMW 「不管怎么说太冷了！ 」
;				;雪
;				CASE 8 TO 11
;					PRINTFORMW 「雪倒是不错，不过之后得铲雪可不得了 」
;				;雨雪交加、冰雹
;				CASE 12, 13
;					PRINTFORMW 「什么啊这天气！ 」
;				CASEELSE
;					PRINTFORMW 「太阳公公也再稍微努力一下吧！ 」
;				ENDSELECT
;			ENDIF
;		ELSE
;			SELECTCASE RAND:3
;			CASE 1
;				PRINTFORMW 「真是的苏格拉底。　ぶつくさぶつくさ（牢骚牢骚）」
;			CASE 2
;				PRINTFORMW 「……嗯，发生了那样的事 」
;			CASEELSE
;				PRINTFORMW 「……哦」
;			ENDSELECT
;		ENDIF
	;妊娠用
	ELSEIF TALENT:妊娠 && CFLAG:無自覚妊娠 == 0 && CFLAG:1015 == 0 && GET_TARGETNUM() == 1 && TALENT:恋人 && TALENT:恋慕
		CALL M_KOJO_MESSAGE_EVENT_K44_NINSIN
	ELSE
		CALL TRAIN_MESSAGE
		SELECTCASE RAND:4
			;関係に応じて変化
			CASE 1
				;恋人時専用
				IF TALENT:恋人
					SELECTCASE RAND:3
					CASE 1
						IF TALENT:恋慕
							PRINTFORMW 「我做过一个很棒的恋爱梦,不过那个已经实现了 %UNICODE(0x2665)%来到这里真的好 %UNICODE(0x2665)%」
						ELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDIF
					CASE 2
						;朝
						IF TIME:2 == 1 || TIME:2 == 2
							PRINTFORMW 「那么，今天要做什么呢%UNICODE(0x2665)%好期待啊 %UNICODE(0x2665)%」
						;昼
						ELSEIF TIME:2 == 3 || TIME:2 == 4
							;夕方分岐
							IF TIME:0 >= 1020 && TIME:5 <= 1 && (MOON_WATCH_POINT(CFLAG:現在位置))
								PRINTFORMW 「阿拉%UNICODE(0x2665)% 喔，喂%CALLNAME:MASTER%、夕阳很美丽呢%UNICODE(0x2665)%」
								PRINTFORMW 「好棒啊 %UNICODE(0x2665)%」
								PRINTFORMDW %CALLNAME:MASTER%和艾伦一边看着美丽的晚霞一边谈笑……
							ELSE
								CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
							ENDIF
						;夜
						ELSEIF TIME:2 >= 5 && TIME:2 <= 7
							;赏月分岐
							IF (MOON_WATCH_POINT(CFLAG:現在位置)) && MOON_WATCH(DAY:3) >= 2
								PRINTFORMW 「今天月亮真漂亮啊%UNICODE(0x2665)%喂%CALLNAME:MASTER%%UNICODE(0x2665)% 」
								PRINTFORMDW %CALLNAME:MASTER%和艾伦看着浮在空中的月亮谈笑起来 …
							ELSE
								CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
							ENDIF
						ENDIF
					CASEELSE
						IF ((TIME:0 >=360 && TIME:0 <= 540) || (TIME:0 >=660 && TIME:0 <= 780) || (TIME:0 >=1020 && TIME:0 <= 1260)) && TIME_PROGRESS(TCVAR:空腹時刻) && TIME_PROGRESS(TCVAR:甜点空腹時刻) && !RAND:2
							SELECTCASE CFLAG:現在位置
							CASE 100 TO 109,200 TO 209,300 TO 309,400 TO 409,500 TO 509,600 TO 609,700 TO 709,800 TO 809,900 TO 909
								PRINTFORMW 「和%CALLNAME:MASTER%在一起的这段时间是最幸福的 %UNICODE(0x2665)%」
							CASEELSE
								PRINTFORMW 「肚子饿了，该去吃饭了吧？ 」
							ENDSELECT
						ELSE
							PRINTFORMW 「和%CALLNAME:MASTER%在一起的这段时间是最幸福的 %UNICODE(0x2665)%」
						ENDIF
					ENDSELECT
				;恋慕or準恋慕時専用
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
					SELECTCASE RAND:3
					CASE 1
						IF TALENT:恋慕
							PRINTFORMW 「讷%CALLNAME:MASTER%、%CALLNAME:MASTER%……不，没什么 只是叫下你的名字//」
						ELSE
							PRINTFORMW 「%CALLNAME:MASTER%最近有什么变化吗 ？」
						ENDIF
					CASE 2
						;朝
						IF TIME:2 == 1 || TIME:2 == 2
							PRINTFORMW 「%CALLNAME:MASTER%今天有什么事吗？要不要跟我一起去什么地方？ //」
						;昼
						ELSEIF TIME:2 == 3 || TIME:2 == 4
							;夕方分岐
							IF TIME:0 >= 1020 && TIME:5 <=1 && (MOON_WATCH_POINT(CFLAG:現在位置))
								PRINTFORMW 「阿拉%UNICODE(0x2665)% 喔，喂%CALLNAME:MASTER%、夕阳很美丽呢%UNICODE(0x2665)%」
								PRINTFORMW 「好棒啊 %UNICODE(0x2665)%」
								PRINTFORMDW %CALLNAME:MASTER%和艾伦一边看着美丽的晚霞一边谈笑……
							ELSE
								CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
							ENDIF
						;夜
						ELSEIF TIME:2 >= 5 && TIME:2 <= 7
							;赏月分岐
							IF (MOON_WATCH_POINT(CFLAG:現在位置)) && MOON_WATCH(DAY:3) >= 2
								PRINTFORMW 「今天的月亮真美啊 %UNICODE(0x2665)%　啊%CALLNAME:MASTER%%UNICODE(0x2665)%」
								PRINTFORMDW %CALLNAME:MASTER%和艾伦看着浮在空中的月亮谈笑起来 …
							ELSE
								CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
							ENDIF
						ENDIF
					CASEELSE
						PRINTFORMW 「呐，稍微靠近一点%CALLNAME:MASTER%可以吗？ //」
					ENDSELECT
				;思慕時専用
				ELSEIF TALENT:思慕
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「咦？为什么明明是魔法使却不怎么想使用魔法？ 」
						PRINTFORMW 「我啊，使用魔法的话头会带电的…这里不卖防静电喷雾器呢」
						PRINTFORMW 「就是因为这个体质被甩了多少次……、哭叽叽 」
					CASE 2
						PRINTFORMW 「讷讷，有没有因为魔法纠缠而感到为难的事呢？如果有的话，我会帮给你解决的特别降价哦。 %UNICODE(0x2665)%」
					CASEELSE
						PRINTFORMW 「啊哈哈%UNICODE(0x2665)% 和%CALLNAME:MASTER%说着话非常快乐 %UNICODE(0x2665)%」
					ENDSELECT
				;親密４以下時専用
				ELSE
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「啊…有没有帅气的人从天而降呢？」
					CASE 2
						PRINTFORMW 「话说%CALLNAME:MASTER%没有由于魔法纠绕感到为难的事吗？ 」
						PRINTFORMW 「如果有的话就去艾伦魔法店！真心诚意，解决烦恼 %UNICODE(0x2665)%」
					CASEELSE
						PRINTFORMW 「哈哈哈，%CALLNAME:MASTER%的话相当有趣啊%UNICODE(0x2665)%」
					ENDSELECT
				ENDIF
			;季節、天気、時間帯に応じて変化
			CASE 2
				;春
				IF DAY:2 == 1
					;朝
					IF TIME:2 == 1 || TIME:2 == 2
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								PRINTFORMW 「阳光真舒服啊 %UNICODE(0x2665)% %CALLNAME:MASTER%」
							ELSE
								PRINTFORMW 「今天也是个晴天%UNICODE(0x2665)%」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「好不容易才到春天，居然还阴天 」
									PRINTFORMW 「快点放晴吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雨的话就可以和%CALLNAME:MASTER%打一把伞。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊，好不容易才到春天啊 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇，好凉快 」
								SIF TIME:5 == 6
								PRINTFORMW 「衣服湿透了 …　快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「今天稍微有点冷呢 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								PRINTFORMW 「阳光真舒服啊 %UNICODE(0x2665)% %CALLNAME:MASTER%」
							ELSE
								PRINTFORMW 「今天也是个晴天%UNICODE(0x2665)%」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「好不容易才到春天，居然还阴天 」
									PRINTFORMW 「快点放晴吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雨的话就可以和%CALLNAME:MASTER%打一把伞。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊，好不容易才到春天啊 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇，好凉快 」
								SIF TIME:5 == 6
								PRINTFORMW 「衣服湿透了 …　快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「今天稍微有点冷呢 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;夜
					ELSEIF TIME:2 >= 5 && TIME:2 <= 7
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
							ELSE
								PRINTFORMW 「讷讷，出去看看月亮吧？  」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为阴天，所以看不到月亮和星星……」
								PRINTFORMW 「明天会不会是晴天呢 」
							ELSE
								PRINTFORMW 「天阴了，难得的夜晚 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「这样的话，即使没有月亮也会变得精神起来 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系 %UNICODE(0x2665)%　…虽然看不见月亮了」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
								PRINTFORMW 「这样就看不到月亮和星星了，真遗憾 」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为雾，月亮和星星都看不清楚…… 」
								PRINTFORMW 「明天会不会是晴天呢 」
							ELSE
								PRINTFORMW 「雾好大啊，难得的夜晚 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					ENDIF
				;夏
				ELSEIF DAY:2 == 2
					;朝
					IF TIME:2 == 1 || TIME:2 == 2
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「夏天真是热得不得了啊 」
								CASEELSE
									PRINTFORMW 「啊，衣服被汗水弄得粘糊糊的」
									SIF TALENT:恋人
									PRINTFORMW 「之后一起进入浴室擦汗吧 」
								ENDSELECT
							ELSE
								PRINTFORMW 「外面好像很热呢 」
								PRINTFORMW 「话说%CALLNAME:MASTER%耐热吗？ 」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「多亏阴天，稍微凉快了点 %UNICODE(0x2665)%」
									PRINTFORMW 「……但是相对的，有点潮湿呢 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雨的话就可以和%CALLNAME:MASTER%打一把伞。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊。不过，相对稍微凉快了一点也不错了。 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇哦%UNICODE(0x2665)% 凉快啊%UNICODE(0x2665)% 真舒服啊%UNICODE(0x2665)%」
								SIF TIME:5 == 6
								PRINTFORMW 「衣服湿透了 …　快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「今天真是少见地凉快啊 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「夏天真是热得不得了啊 」
								CASEELSE
									PRINTFORMW 「啊，衣服被汗水弄得粘糊糊的」
									SIF TALENT:恋人
									PRINTFORMW 「之后一起进入浴室擦汗吧 」
								ENDSELECT
							ELSE
								PRINTFORMW 「外面好像很热呢 」
								PRINTFORMW 「话说%CALLNAME:MASTER%耐热吗？ 」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「多亏阴天，稍微凉快了点 %UNICODE(0x2665)%」
									PRINTFORMW 「…但是就会很潮湿吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雪的话就可以打一把伞了。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊。不过，相对稍微凉快了一点也不错了。 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇哦%UNICODE(0x2665)% 凉快啊%UNICODE(0x2665)% 真舒服啊%UNICODE(0x2665)%」
								SIF TIME:5 == 6
								PRINTFORMW 「衣服湿透了 …　快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「今天真是少见地凉快啊 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;夜
					ELSEIF TIME:2 >= 5 && TIME:2 <= 7
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
							ELSE
								PRINTFORMW 「讷讷，出去看看月亮吧？  」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为阴天，所以看不到月亮和星星……」
								PRINTFORMW 「嗯，相对来说会稍微凉快一点还好了。 」
							ELSE
								PRINTFORMW 「多云啊。嘛，不过稍微凉快一点也不错了 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「这样的话，即使没有月亮也会变得精神起来 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系 %UNICODE(0x2665)%　…虽然看不见月亮了」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
								PRINTFORMW 「这样今天就看不到月亮和星星了 」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为雾，月亮和星星都看不清楚…… 」
								PRINTFORMW 「但这样很凉爽也不错 」
							ELSE
								PRINTFORMW 「雾好大啊，难得的夜晚 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					ENDIF
				;秋
				ELSEIF DAY:2 == 3
					;朝
					IF TIME:2 == 1 || TIME:2 == 2
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								PRINTFORMW 「阳光真舒服啊 %UNICODE(0x2665)% %CALLNAME:MASTER%」
							ELSE
								PRINTFORMW 「今天也是个晴天%UNICODE(0x2665)%」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「多云啊，快点晴天吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雪的话就可以打一把伞了。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊，总觉得心情很郁闷 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇，好冷 」
								SIF TIME:5 == 6
								PRINTFORMW 「衣服湿透了 …　快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「今天雾好大啊 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								PRINTFORMW 「阳光真舒服啊 %UNICODE(0x2665)% %CALLNAME:MASTER%」
							ELSE
								PRINTFORMW 「今天也是个晴天%UNICODE(0x2665)%」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「多云啊，快点晴天吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雪的话就可以打一把伞了。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊，总觉得心情很郁闷 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇，好冷 」
								SIF TIME:5 == 6
								PRINTFORMW 「衣服湿透了 …　快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「今天好冷啊，好怀念夏天啊 」
								PRINTFORMW 「……我先声明、刚才的话不是针对现在才说的」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;夜
					ELSEIF TIME:2 >= 5 && TIME:2 <= 7
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
							ELSE
								PRINTFORMW 「讷讷，出去看看月亮吧？  」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为阴天，所以看不到月亮和星星……」
								PRINTFORMW 「明天会不会是晴天呢 」
							ELSE
								PRINTFORMW 「天阴了，难得的夜晚 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「这样的话，即使没有月亮也会变得精神起来 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想…下雨总觉得好幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系 %UNICODE(0x2665)%　…虽然看不见月亮了」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
								PRINTFORMW 「这样今天就看不到月亮和星星了 」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为雾，月亮和星星都看不清楚…… 」
								PRINTFORMW 「明天会不会是晴天呢 」
							ELSE
								PRINTFORMW 「雾好大啊，难得的夜晚 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					ENDIF
				;冬
				ELSEIF DAY:2 == 4
					;朝
					IF TIME:2 == 1 || TIME:2 == 2
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								PRINTFORMW 「哇，好冷啊，呼气好白」
								PRINTFORMW 「已经是冬天了呢，真切地感受到时间的流逝 」
							ELSE
								PRINTFORMW 「今天也是个晴天%UNICODE(0x2665)%」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「多云啊，快点晴天吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雪的话就可以打一把伞了。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊，总觉得心情很郁闷 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想来，下雨真是幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊、本来就很冷了现在还要还要更冷 」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「又梦幻又美丽%UNICODE(0x2665)% 美极了%UNICODE(0x2665)%」
							ELSE
								PRINTFORMW 「今天雾好大啊，本来就很冷天却没有阳光照射，真冷啊 」
							ENDIF
						;吹雪
						CASE 9
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「已经站不稳了啊，得快点进建筑物里去。 」
							ELSE
								PRINTFORMW 「哇，外面下大风雪了。这样看来是不能外出的了」
							ENDIF
						;雪
						CASE 8, 10, 11
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「！ %UNICODE(0x2665)%　呐呐下雪了%UNICODE(0x2665)% 漂亮ー %UNICODE(0x2665)%」
								IF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW 「…呐，能和%CALLNAME:MASTER%紧紧拥抱一会吗？//」
								ELSE
;									PRINTFORMW 「…哎呀，下完雪后用铲雪什么的可是够呛的。」
;									PRINTFORMW 「尽管如此还是不得不说很開心%UNICODE(0x2665)%」
								ENDIF
							ELSE
								PRINTFORMW 「哇！%UNICODE(0x2665)%　呐呐下雪了%UNICODE(0x2665)% 真漂亮啊%UNICODE(0x2665)%」
							ENDIF
						;霙、霰
						CASE 12, 13
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哎呀！天气真糟糕啊 」
								PRINTFORMW 「快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「外边天气真糟糕，外出不了。 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;昼
					ELSEIF TIME:2 == 3 || TIME:2 == 4
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置)) || CFLAG:TARGET:現在位置 == 10
								PRINTFORMW 「哇，好冷啊，呼气好白」
								PRINTFORMW 「已经是冬天了呢，真切地感受到时间的流逝 」
							ELSE
								PRINTFORMW 「今天也是个晴天%UNICODE(0x2665)%」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「多云啊，快点晴天吧 」
								CASEELSE
									PRINTFORMW 「今天天气不好啊，别下雪就好了…… 」
									SIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW （但是仔细想想，如果下雪的话就可以打一把伞了。好极了 %UNICODE(0x2665)%）
								ENDSELECT
							ELSE
								PRINTFORMW 「多云啊，总觉得心情很郁闷 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想…下雨总觉得好幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系%UNICODE(0x2665)%」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊、本来就很冷了现在还要还要更冷 」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「真是又梦幻又漂亮呢 %UNICODE(0x2665)%　素敵%UNICODE(0x2665)%」
							ELSE
								PRINTFORMW 「今天雾好大啊，本来就很冷天却没有阳光照射，真冷啊 」
							ENDIF
						;吹雪
						CASE 9
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「已经站不稳了啊，得快点进建筑物里去。 」
							ELSE
								PRINTFORMW 「哇，外面下大风雪了。这样看来是不能外出的了」
							ENDIF
						;雪
						CASE 8, 10, 11
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「！ %UNICODE(0x2665)%　呐呐下雪了%UNICODE(0x2665)% 漂亮ー %UNICODE(0x2665)%」
								IF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW 「…呐，能和%CALLNAME:MASTER%紧紧拥抱一会吗？//」
								ELSE
;									PRINTFORMW 「…哎呀，下完雪后用铲雪什么的可是够呛的。」
;									PRINTFORMW 「尽管如此还是不得不说很開心%UNICODE(0x2665)%」
								ENDIF
							ELSE
								PRINTFORMW 「哇！%UNICODE(0x2665)%　呐呐下雪了%UNICODE(0x2665)% 真漂亮啊%UNICODE(0x2665)%」
							ENDIF
						;霙、霰
						CASE 12, 13
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哎呀！天气真糟糕啊 」
								PRINTFORMW 「快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「外边天气真糟糕，外出不了。 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					;夜
					ELSEIF TIME:2 >= 5 && TIME:2 <= 7
						SELECTCASE TIME:5
						;晴天
						CASE 0, 1
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
							ELSE
								PRINTFORMW 「讷讷，出去看看月亮吧？  」
							ENDIF
						;陰天
						CASE 2, 3
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为阴天，所以看不到月亮和星星……」
								PRINTFORMW 「明天会不会是晴天呢 」
							ELSE
								PRINTFORMW 「天阴了，难得的夜晚 」
							ENDIF
						;雨
						CASE 4, 5
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哇——！好大的雨呀  」
								;相合傘なら分岐
								IF TEQUIP:201 == 1
									IF TALENT:恋人
										PRINTFORMW 「嘛，多亏了这个，才有了相合伞。 %UNICODE(0x2665)%」
										PRINTFORMW 「这样的话，即使没有月亮也会变得精神起来 %UNICODE(0x2665)%」
									ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
										PRINTFORMW 「……但是，因为内衣雨，所以撑爱合伞吧 」
										PRINTFORMW 「这样想…下雨总觉得好幸福啊 %UNICODE(0x2665)%//」
									ELSE
										PRINTFORMW 「但是，因为有伞所以没关系 %UNICODE(0x2665)%　…虽然看不见月亮了」
									ENDIF
								ELSE
									PRINTFORMW 「快去有屋顶的地方吧！ 」
								ENDIF
							ELSE
								PRINTFORMW 「哇，外面好大的雨啊」
								PRINTFORMW 「这样今天就看不到月亮和星星了 」
							ENDIF
						;霧、霧雨
						CASE 6, 7
							;外か内か
							IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置))
								PRINTFORMW 「因为雾，月亮和星星都看不清楚…… 」
								PRINTFORMW 「明天会不会是晴天呢 」
							ELSE
								PRINTFORMW 「雾好大啊，难得的夜晚 」
							ENDIF
						;吹雪
						CASE 9
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「已经站不稳了啊，得快点进建筑物里去。 」
							ELSE
								PRINTFORMW 「哇，外面下大风雪了。这样看来是不能外出的了」
							ENDIF
						;雪
						CASE 8, 10, 11
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「！ %UNICODE(0x2665)%　呐呐下雪了%UNICODE(0x2665)% 漂亮ー %UNICODE(0x2665)%」
								IF TALENT:恋人
									PRINTFORMW 「夜里的雪真浪漫啊 %UNICODE(0x2665)%」
									PRINTFORMW 「和%CALLNAME:MASTER%一起看着这片风景，真是幸福啊 %UNICODE(0x2665)%」
								ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
									PRINTFORMW 「夜里的雪真浪漫啊 %UNICODE(0x2665)%」
									PRINTFORMW 「…呐，能和%CALLNAME:MASTER%紧紧拥抱一会吗？//」
								ELSE
;									PRINTFORMW 「…哎呀，下完雪后用铲雪什么的可是够呛的。」
;									PRINTFORMW 「尽管如此还是不得不说很開心%UNICODE(0x2665)%」
								ENDIF
							ELSE
								PRINTFORMW 「哇啊%UNICODE(0x2665)%　看啊下雪了%UNICODE(0x2665)% 积成了山 %UNICODE(0x2665)%」
;								PRINTFORMW 「……嘛，积雪的话得铲雪什么的就够呛了。 」
;								PRINTFORMW 「尽管如此还是不得不说很開心%UNICODE(0x2665)%」
							ENDIF
						;霙、霰
						CASE 12, 13
							;外か内か
							IF (OUTROOF(CFLAG:TARGET:現在位置))
								PRINTFORMW 「哎呀！天气真糟糕啊 」
								PRINTFORMW 「快去有屋顶的地方吧！ 」
							ELSE
								PRINTFORMW 「外边天气真糟糕，外出不了。 」
							ENDIF
						CASEELSE
							CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
						ENDSELECT
					ENDIF
				ENDIF
			;場所に応じて変化
			CASE 3
				SELECTCASE CFLAG:44:現在位置
				;约会道中
				CASE ROAD_TO(CFLAG:MASTER:约会中)
					IF TALENT:恋人 && TALENT:恋慕
						SELECTCASE RAND:2
						CASE 1
							PRINTFORMW 「即使只是走路 、和%CALLNAME:MASTER%一起的话也很快乐%UNICODE(0x2665)%」
						CASEELSE
							PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
						ENDSELECT
					ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
						PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
					ELSE
						PRINTFORMW 「离目的地还有多远？ 」
					ENDIF
				;妖怪之山
				CASE 710 TO 750, 810 TO 820
					PRINTFORMW 「果然是这样啊♪果然很開心～♪ 」
				;月
				CASE 1050 TO 1090
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「但是竟然能去月球 」
					CASEELSE
						PRINTFORMW 「虽然想把月亮的石头带回去…啊，不行吗 」
					ENDSELECT
				;破舊小屋は昔艾倫の店だったという脳内設定
				CASE 16
					IF FIRSTTIME(1003)
						;物覚えが悪いといってもどこに店を出していたかはちゃんと覚えている艾倫、こまめに記録しているのだろうか
						IF FLAG:住宿人物 == 44
							PRINTFORMW 「有一段时间没住在这里了 %UNICODE(0x2665)%」
						ELSEIF FLAG:116 > 2000
							PRINTFORMW 「咳咳，为什么只是稍微没住一会，就会积满灰尘呢 」
						ELSE
							PRINTFORM 「哎呀，比想象中的干净啊。……或许灵梦
							IF ABL:親密 > 2
								PRINTFORMW 和%CALLNAME:MASTER%有在扫除吗？」
							ELSE
								PRINTFORMW 有人在打扫吗？ 」
							ENDIF
						ENDIF
						PRINTFORML 「啊，这么说来还没和%CALLNAME:MASTER%说呢 」
						PRINTFORMW 「其实以前，我在这里做魔法屋%UNICODE(0x2665)%」
						;艾倫が住み込んでいる場合
						IF FLAG:住宿人物 == 44
							PRINTFORMW 「结果店移到了别的地方 」
							PRINTFORMW 「诶？为什么搬回神社了？」
							IF TALENT:恋人
								PRINTFORMW 「那当然是因为%CALLNAME:MASTER%在这里啊%UNICODE(0x2665)%」
							ELSE
								PRINTFORMW 「那是……因为喜欢%CALLNAME:MASTER%哦//」
								IF CFLAG:1004 == 0 && !TALENT:MASTER:恋人 && !(CFLAG:13 & 2) && BASE:情緒 >= 1000 && !MARK:反発刻印
									PRINTFORMW 「……这种时候才能说的话」
									PRINTFORMW 「我对%CALLNAME:MASTER%是喜欢着的、所以…//」
									PRINTFORMW 「能成为我的恋人吗？ //」
									PRINTFORMDL 艾倫的告白…
									PRINTFORMD [1] - 接受
									PRINTDL 　- 恋人最多只能有1个 -
									PRINTFORMD [2] - 拒绝
									$INPUT_LOOP
									INPUT
									IF RESULT > 2 || RESULT < 1
										CLEARLINE 1
										GOTO INPUT_LOOP
									ELSEIF RESULT == 1
										SETBIT CFLAG:既成事實 , 2
										SETBIT CFLAG:MASTER:既成事實, 2
										TALENT:MASTER:恋人 = 44
										TALENT:恋人 = 44
										TALENT:心情 = 1
										SETBIT CFLAG:13 , 1
										CALL KOJO_MESSAGE_SEND("SP_EVENT",2,44,RESULT)
										PRINTL
										PRINTFORMDW 和艾倫成为了恋人
									ELSE
										CALL KOJO_MESSAGE_SEND("SP_EVENT",2,44,RESULT)
									ENDIF
								ENDIF
							ENDIF
						;艾倫以外が住み込んでいる場合
						ELSEIF FLAG:住宿人物
							PRINTFORMW 「结果店迁移了到另外的地方,不过，现在%CALLNAME:(FLAG:住宿人物)%正在住着 」
							IF TALENT:恋慕
								PRINTFORMW 「其实我很想住在那呢 」
							ELSE
								PRINTFORMW 「算了，没关系。也许会返还回来也说不定呢 」
							ENDIF
						ELSE
							PRINTFORML 「虽然最后店搬到了别的地方，但是还有剩下点东西呢 」
							PRINTFORMW 「之后得要和霊夢道谢啊」
						ENDIF
					ELSEIF FLAG:住宿人物 == 44 && CFLAG:1016 == 1
						GOTO OMISE
					ELSE
						CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
					ENDIF
				CASE 202
					IF TIME_PROGRESS(TCVAR:甜点空腹時刻)
						PRINTFORMW 「广场上有好吃的甜食店，反正很近，去吗？」
					ELSE
						CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
					ENDIF
				CASE 334
					IF GET_TARGETNUM() == 1
						PRINTFORMW 「哇啊%UNICODE(0x2665)% 别墅哦%UNICODE(0x2665)%　好大%UNICODE(0x2665)% 有点破了%UNICODE(0x2665)% 但还是很漂亮%UNICODE(0x2665)%」
					ELSE
						CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
					ENDIF
				CASE OMANEKIBEYA(), 534
					$OMISE
					IF RAND:2 == 1
						IF TALENT:恋人
							PRINTFORMW 「我店里的感觉怎么样? %UNICODE(0x2665)%」
						ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
							PRINTFORMW 「呐呐、我店里的感觉怎么样?」
						ELSE
							PRINTFORMW 「我的店怎么样？」
						ENDIF
					ELSE
						SELECTCASE RAND:4
						CASE 1
							;８時～２１時ならお客が来る
							IF TIME:0 >= 480 && TIME:0 <= 1260
								PRINTFORMW 「——啊，客人来了 。　欢迎光临ー%UNICODE(0x2665)%」
							ELSE
								CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
							ENDIF
						CASEELSE
							PRINT 「啊，那是
							SELECTCASE RAND:4
							CASE 1
								PRINTW 增添自信的药 」
							CASE 2
								PRINTW 驱除妖精的魔法啊 」
							CASE 3
								PRINTW 驱除诅咒啊，要放到头上来使用」
							CASEELSE
								PRINTFORMW 防静电喷雾器哟，没有这个的话会有各种各样地麻烦 」
							ENDSELECT
						ENDSELECT
					ENDIF
				;未実装の場所は汎用に
				CASEELSE
					CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
				ENDSELECT
			CASEELSE
				CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;赏月用
@M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
;月虹
IF TIME:7 == 1
	IF !RAND:1
		PRINTFORMW 「多亏了彩虹，月光照在身上比平时更让人舒服%UNICODE(0x2665)%」
	ELSE
		PRINTFORML 「真漂亮啊……」
		PRINTFORMDW 艾伦一边眺望着月虹一边这样嘟哝着
	ENDIF
ELSE
	SELECTCASE MOON_WATCH(DAY:3)
	CASE 1
		PRINTFORMW 「明明看不见却说的像看的见一样，真是什么怪话呢」
		IF CFLAG:1013 == 0
			;据说在新月里许愿，事情就会像月圆一样进展。但因为很麻烦所以想马上实现
			PRINTFORMW 「难得一次，也向着月亮许愿吧%UNICODE(0x2665)%」
			$LOOP
			PRINTFORMDL 要许愿什么…
			PRINTDL [0] 想和艾伦更加亲密
			PRINTDL [1] 想要钱
			PRINTDL [2] 没有什么特别想要的
			INPUT
			IF RESULT == 0
				PRINTFORMDW %CALLNAME:MASTER%许下了想和艾伦更加亲密的愿望…
				;祈願をもろパクリ、ごめんなさい
				PRINTFORMDW 感觉和艾伦的关系加深了……
				CFLAG:2 += 10 + RAND:20
				CFLAG:4 += 10 + RAND:20
				;艾倫に恋慕か思慕が付いていれば更にプラス
				IF TALENT:恋慕
					CFLAG:2 += 20
					CFLAG:4 += 20
				ELSEIF TALENT:思慕
					CFLAG:2 += 10
					CFLAG:4 += 10
				ENDIF
			ELSEIF RESULT == 1
				PRINTFORMDW %CALLNAME:MASTER%许下了想要变得有钱的愿望…
				LOCAL:1 = RAND:2000
				LOCAL:1 += 1
				MONEY += LOCAL:1
			ELSEIF RESULT == 2
				PRINTFORMDW 没有特别想要的%CALLNAME:MASTER%只是随意摆出的样子……
			ELSE
				GOTO LOOP
			ENDIF
			PRINTFORMW 「愿望结束了吗？下次就看看天空一起享受月亮吧%UNICODE(0x2665)%」
			PRINTFORMDW %CALLNAME:MASTER%与艾伦一边仰望天空一边对话……
			IF LOCAL:1 > 0
				DRAWLINE
				PRINTFORMDW 和艾伦对话后，环顾四周{LOCAL:1}发现有钱在地上。也许是许愿的效果吧，%CALLNAME:MASTER%决定拿走。
			ENDIF
			CFLAG:1013 = 1
		ENDIF
	CASE 2, 3, 4, 5, 6, 7, 8
		PRINTFORMW 「月♪♪月♪蓝色的月亮♪月亮的力量化作水滴，滴在我胸前♪」
		PRINTFORML 「月亮充满了魔法的力量%UNICODE(0x2665)%」
		PRINTFORMW 「所以像我这样的魔法使，在月亮一明亮的时候就会变得精神起来%UNICODE(0x2665)%」
	CASE 9
		SELECTCASE RAND:2
		CASE 1
			PRINTFORML 「稍稍提个小问题、在%CALLNAME:MASTER%的眼中月亮是什么样子」
			RESETCOLOR
			CALL ASK_M("捣年糕的兔子",1,"净用石头洗衣服的女人的画",1,"捣药的兔子",1)
			TRYCALLFORM M_KOJO_COLOR_K44
			IF RESULT == 0
				PRINTFORMW 「嘿，在%CALLNAME:MASTER%看起来是那样的啊」
			ELSEIF RESULT == 1
				PRINTFORMW 「是吗，和我一样呢%UNICODE(0x2665)%」
			ELSEIF RESULT == 2
				PRINTFORMW 「药？不是年糕吗？」
				PRINTFORMW 「……诶，还有这样表现的啊」
			ENDIF
		CASEELSE
			PRINTFORMW 「月♪♪月♪蓝色的月亮♪月亮的力量化作水滴，滴在我胸前♪」
			PRINTFORMW 「果然月亮一明亮就变得精神了呢%UNICODE(0x2665)%」
		ENDSELECT
	CASE 10, 11, 12, 13, 14
		PRINTFORMW 「月♪♪月♪蓝色的月亮♪月亮的力量化作水滴，滴在我胸前♪」
		PRINTFORML 「月亮充满了魔法的力量%UNICODE(0x2665)%」
		PRINTFORMW 「所以像我这样的魔法使，在月亮一明亮的时候就会变得精神起来%UNICODE(0x2665)%」
	CASE -1, 0
		IF TIME:5 <= 1
			PRINTFORMW 「月亮还没出来呢」
		ELSE
			PRINTFORMW 「看不见月亮呢…真遗憾啊」
		ENDIF
	;一応
	CASEELSE
		CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
	ENDSELECT
ENDIF
RETURN 1

;はんよ～
@M_KOJO_MESSAGE_COM_K44_300_1_HANYO
IF RAND:10 == 1 && CFLAG:1007 == 0 && ABL:MASTER:教養 >= 3 && TALENT:MASTER:追加種族 != 2 && (TALENT:恋人 || TALENT:恋慕 || TALENT:思慕)
	PRINTFORMDW 关于艾伦和魔法的话题热烈起来……
	PRINTFORMDL ……说起魔法，她是魔法使。
	PRINTFORMDW 成为她弟子后也许可以使用魔法
	SIF TALENT:恋人 && !TALENT:MASTER:妖狐
	PRINTFORMDW 而且如果能成为长生不老的魔法使的话，就能和艾伦在一起更长时间！
	PRINTFORMD 无论是艾倫还是%CALLNAME:MASTER%都会幸福
	IF TALENT:恋人 && TALENT:恋慕
		PRINTD 从心底里非常喜欢你
	ELSEIF TALENT:恋慕
		PRINTD 对你抱着特别的感情
	ELSE
		PRINTD 对你有好感
	ENDIF
	PRINTFORMDW 、如果拜托的话会让我成为弟子的吧
	$LOOP
	PRINTFORMDL %CALLNAME:MASTER%决定……
	PRINTDL [0] 请求成为弟子
	PRINTDL [1] 还是算了吧
	INPUT
	IF RESULT == 0
		PRINTFORMDW 在与艾伦的对话中，%CALLNAME:MASTER%传达了想成为艾伦弟子的意思
		PRINTFORM 「啊？你想让成为我的徒弟吗？
		IF TALENT:恋人 || TALENT:恋慕
			PRINTFORMW 那就交给我了%UNICODE(0x2665)%　会让你成为出色的魔法使的%UNICODE(0x2665)%」
			SIF !TALENT:MASTER:妖狐
			PRINTFORMW 「然后……两个人一起享受各种各样的事情吧%UNICODE(0x2665)%%UNICODE(0x2665)%」
		ELSE
			LOCAL:1 = 0
			PRINTFORMW 嗯……、并没有想要收弟子呢」
			$OGAMI
			IF LOCAL:1 == 0
				PRINTDL [0] 请再考虑下！
			ELSEIF LOCAL:1 == 1
				PRINTDL [0] 拜托了！
			ELSEIF LOCAL:1 == 2
				PRINTDL [0] 做好了觉悟
			ELSEIF LOCAL:1 == 3
				PRINTDL [0] Yes Yes Yes
			ENDIF
			IF LOCAL:1 == 3
				PRINTDL [1] No No No
			ELSE
				PRINTDL [1] 死心吧
			ENDIF
			INPUT
			IF RESULT == 0
				IF LOCAL:1 == 0
					PRINTFORMW 「不管别人是怎么说……」
				ELSEIF LOCAL:1 == 1
					PRINTFORMW 「成为魔法使也不是那么轻松的，因为各种各样的事情都很辛苦」
				ELSEIF LOCAL:1 == 2
					PRINTFORMW 「真的吗？」
				ELSEIF LOCAL:1 == 3
					PRINTFORMW 「……知道了，别開生面地让你当徒弟」
				ENDIF
				LOCAL:1 ++
				SIF LOCAL:1 <= 3
				GOTO OGAMI
			ELSEIF RESULT == 1
				PRINTFORMW 「对不起啊」
				RETURN 1
			ELSE
				GOTO OGAMI
			ENDIF
;			PRINTFORMW 虽然没有收弟子的想法……%CALLNAME:MASTER%的话特别让你成为吧%UNICODE(0x2665)%」
;			PRINTFORMW 「但是，真的好吗？你的生活也没有困难，就算成为魔法师也不全是好事。」
;			PRINTFORMW 「…哎呀，还在烦恼的话就先算了吧。那么，麻利地走吧！」
		ENDIF
		PRINTFORMDL %CALLNAME:MASTER%得到了艾伦的认可成为了魔法使弟子！
		PRINTFORMDW 今后和艾伦一起学习可以学习魔法
		;艾倫の教養を你＋１に、師匠なのに弟子より教養が低いのは変だし
		ABL:教養 = (ABL:MASTER:教養 + 1)
		CFLAG:1007 = 1
		;你の戦闘能力に応じて初期経験にBOUNS
		CFLAG:1008 += (ABL:MASTER:戦闘能力 * 5)
		CFLAG:1009 += (ABL:MASTER:戦闘能力 * 5)
		CFLAG:1010 += (ABL:MASTER:戦闘能力 * 2)
	ELSEIF RESULT == 1
		PRINTFORMDW ……但是，只是一时的想法就成为魔法使可以吗，再考虑一下比较好。
	ELSE
		GOTO LOOP
	ENDIF
ELSEIF RAND:5 == 1 && ABL:親密 >= 5 && (BASE:MASTER:体力 <= 500 || BASE:MASTER:気力 <= 500)
	PRINTFORMW 「哎呀？……总觉得你好累啊」
	PRINTFORMDW 察觉到%CALLNAME:MASTER%的疲劳的艾伦，从怀里掏出了一个小瓶子
	PRINTFORMW 「就是为了这种时候！　我特意调配的药水哦%UNICODE(0x2665)%」
	PRINTFORMW 「喝了这个马上就会好的%UNICODE(0x2665)%」
	$LOOP_2
	PRINTFORMDL %CALLNAME:MASTER%看着药……
	PRINTDL [0] 喝了
	PRINTDL [1] 不喝
	INPUT
	IF RESULT == 0
		PRINTFORMDW %CALLNAME:MASTER%从艾伦那里接过小瓶，把里面的药含在嘴里
		PRINTFORMW 「来给你水」
		PRINTFORMDW ごくごく（吞咽的声音）
		PRINTFORMDW ……
		PRINTFORMDW …
		PRINTFORMDW ！！！
		PRINTDL
		PRINTFORMDL 　　ぱっぱらぱ～（恢复的声音）
		PRINTDW
		PRINTFORMDW %CALLNAME:MASTER%的体力和气力回复了1000！
		BASE:MASTER:体力 = MIN(BASE:MASTER:体力 + 1000 , MAXBASE:MASTER:体力)
		BASE:MASTER:気力 = MIN(BASE:MASTER:気力 + 1000 , MAXBASE:MASTER:気力)
		PRINTFORMW 「怎么样？有精神了吧%UNICODE(0x2665)%」
	ELSEIF RESULT == 1
		PRINTFORMW 「这样啊，嗯，那样的话就算了」
	ELSE
		GOTO LOOP_2
	ENDIF
;巣立った兒童を想う
ELSEIF CFLAG:兒童人数 - CFLAG:育児人数 > 0 && !RAND:8
	LOCAL:1 = RAND:(CFLAG:兒童人数) - CFLAG:育児人数
	SIF LOCAL:1 <= 0
	LOCAL:1 = 1
	PRINTFORMW 「%CHILDNAME:44:(LOCAL:1)%は元気でやってるかしら？」
ELSE
	LOCAL:1 = RAND:5
	SIF TALENT:思慕
	LOCAL:1 = RAND:10
	SIF TALENT:恋慕 || CFLAG:1014 == 1
	LOCAL:1 = RAND:12
	SELECTCASE LOCAL:1
	CASE 0
		;特別な日なら変化
		;大晦日
		IF DAY:2 == 4 && DAY:3 == 31
			PRINTFORMW 「有好好地引继今年到来年吗？」
		ELSE
			;入浴中か否かで分岐
			IF BATHROOM(CFLAG:現在位置)
				PRINTFORMW 「苏格拉底讨厌浴室呢，因为是猫吧」
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「不如说有喜欢浴室的猫吗？」
				CASE 2
					PRINTFORMW 「为什么猫讨厌浴室呢？明明是这么舒服」
				ENDSELECT
			ELSE
				PRINTFORMW 「——喂，喂！你打算去哪里？」
				PRINTFORMDW 艾伦在训斥打算逃跑的苏格拉底……
			ENDIF
		ENDIF
	CASE 1
		IF TALENT:恋慕 || CFLAG:1014 == 1
			PRINTFORMW 「非常有意思%UNICODE(0x2665)%再多讲给我听听%UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「在我居住的世界里，魔法一直是被否定的但也有肯定的哦」
			PRINTFORMW 「因为就算是魔法，只要有用的话也是一样的。」
		ENDIF
	CASE 2
		PRINTFORMW 「我以前住的地方是什么地方？是啊……」
		PRINTFORMW 「有很多科学的魔法啊。像电池的魔法啦，清晰的电视的魔法啦」
;		PRINTFORMW 「还有非常难以言喻未来的魔法，连食物都几乎全是合成物的世界」
	CASE 3
		PRINTFORML 「如果外面的世界还是由幻想事物汇集的世界
		PRINTFORMW 　也有进化了的猫支配的世界，或者周围一面西洋蒲公英的世界吗？」
	CASE 4
		IF TALENT:恋人
			PRINTFORMW 「和%CALLNAME:MASTER%的对话一直快乐又快活，不知不觉就忘记了时间的流逝%UNICODE(0x2665)%」
		ELSEIF TALENT:思慕 || TALENT:恋慕
			PRINTFORMW 「诶！？是吗？是吗？不知道啊…」
		ELSE
			PRINTFORMW 「啊，发生了那样的事」
		ENDIF
	CASE 5
;		IF TALENT:恋人
;			PRINTFORMW 「」
;		ELSE
			PRINTFORMW 「上次啊――」
;			PRINTFORMW 「话说、%CALLNAME:MASTER%知道小百合吗？」
;			PRINTFORMW 「从前，在外面的世界的时候看过和那个孩子相似的孩子。叫什么名字来着…」
;		ENDIF
	CASE 6
;		IF TALENT:恋人
;			PRINTFORMW 「」
;		ELSE
			PRINTFORMW 「话说、%CALLNAME:MASTER%知道叫理香子的孩子吗？」
			PRINTFORMW 「理香子实际上是拥有强大力量的魔法使！但是完全不使用魔法」
			PRINTFORMW 「科学也好魔法也好都是一样有用的我说了无数次都不听，那孩子为什么这么顽固呢」
;		ENDIF
	CASE 7
		PRINTFORMW 「幻想乡不卖防静电喷雾器，真让人头疼。特意到外面去买又费事……」
		SIF RAND:3 == 2
		PRINTFORMW 「……河童的话能做出来吗？？」
	CASE 8
		PRINTFORMW 「话说，我以前住的地方有个有趣的学校。」
		PRINTFORMW 「封印了贫穷神，住着座敷童子，校舍还是活着的，真是不可思议的学校。」
		PRINTFORMW 「确实如此…总之是个学校吧？」
	CASE 9
		PRINTFORMW 「这么说来，月亮并不是在天空上的画，直到最近我才明白。」
;	CASE 9
;		PRINTFORMW 「可是真遗憾电视在幻想乡不太普及。」
;		PRINTFORMW 「嘛，从外面的世界“噗—噗—”地带来就好了。但那样的话就看不到最新的漫画了…」
	CASE 10
		PRINTFORMW 「店铺的情况如何？　还算繁荣吧%UNICODE(0x2665)%」
	CASE 11
		PRINTFORMW 「啊哈哈%UNICODE(0x2665)%　和%CALLNAME:MASTER%说话真的很開心%UNICODE(0x2665)%」
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;301,泡茶
;==================================================
@M_KOJO_MESSAGE_COM_K44_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF TALENT:恋人
		PRINTFORMW 「好茶，谢谢%UNICODE(0x2665)%」
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		PRINTFORMW 「茶，谢谢%UNICODE(0x2665)% 那么我就趁热喝了」
	ELSE
		PRINTFORMW 「哎呀，你泡茶了啊，谢谢%UNICODE(0x2665)%」
	ENDIF
	PRINTFORMDL …
	IF TALENT:恋人
		IF  GET_TARGETNUM() == 1 && TFLAG:193 >= 0 && RAND:2 == 1
			IF (MOON_WATCH_POINT(CFLAG:TARGET:現在位置)) && TIME:2 >= 5 && TIME:2 <= 7

				SELECTCASE  MOON_WATCH(DAY:3)
				CASE -1, 0, 1
					PRINTFORMW 「能看到月亮的话就变成赏月茶了，有点遗憾啊」
					PRINTFORMW 「…不过，就算看不到月亮%CALLNAME:MASTER%泡的茶倒是挺好喝的%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「倒映在茶里的月亮也很美%UNICODE(0x2665)%」
				ENDSELECT
			ELSE
				PRINTFORMW 「两个人一起喝茶别有一番风味%UNICODE(0x2665)%」
			ENDIF
		ELSE
			IF TFLAG:193 == 1
				PRINTFORMW 「%CALLNAME:MASTER%给我泡的茶真好喝啊%UNICODE(0x2665)%」
			ELSEIF TFLAG:193 == -1
				PRINTFORMW 「虽然有点涩……但这是%CALLNAME:MASTER%给我泡的茶所以很好喝%UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「呼……平稳心情了呢%UNICODE(0x2665)%」
			ENDIF
		ENDIF
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		IF TFLAG:193 == 1
			PRINTFORMW 「绿茶是这么好喝…。太棒了%UNICODE(0x2665)%」
		ELSEIF TFLAG:193 == -1
			PRINTFORMW 「……等一下，太涩了吧」
		ELSE
			PRINTFORMW 「呼……心平气和了%UNICODE(0x2665)%」
		ENDIF
	ELSE
		IF TFLAG:193 == 1
			PRINTFORMW 「绿茶是这么好喝…。太棒了%UNICODE(0x2665)%」
		ELSEIF TFLAG:193 == -1
			PRINTFORMW 「等一下，这茶太苦了」
		ELSE
			PRINTFORMW 「呼……心情舒畅了」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;302,身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K44_302
SIF !BATHCHECK(CFLAG:MASTER:現在位置)
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ && !MARK:反発刻印
	;背中流し流され
	IF BATHCHECK(CFLAG:MASTER:現在位置) && IN_HOME(CFLAG:MASTER:現在位置)
	PRINTL 302
	PRINTL 身体接觸
	PRINTL ＜浴室PLAY中＞
	DRAWLINE
	TRYCALLFORM M_KOJO_COLOR_K44
		IF TALENT:恋人 && !RAND:2
			PRINTFORMDL %CALLNAME:PLAYER%让%CALLNAME:TARGET%为自己搓背
			IF TALENT:恋人 && TALENT:恋慕
				IF TALENT:MASTER:体型 > TALENT:体型 + 1 && !RAND:2
					PRINTFORMW 「哇，%CALLNAME:MASTER%的背真宽广%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「现在清洁%CALLNAME:MASTER%的背部了哦%UNICODE(0x2665)%」
				ENDIF
			ELSEIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人
				PRINTFORMW 「力度如何？舒服吗？」
			ELSE
				PRINTFORMW 「这么力度可以吗？」
			ENDIF
		ELSE
			PRINTFORMDL %CALLNAME:PLAYER%为%CALLNAME:TARGET%搓着背
			IF TALENT:恋人 && TALENT:恋慕
				PRINTFORMW 「帮喜欢的人冲洗后背，真好啊%UNICODE(0x2665)%」
			ELSEIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人
				PRINTFORMW （啊//）
			ELSE
				PRINTFORMW 「前面你自己洗哦」
				PRINTFORMW 「……别一脸遗憾额」
			ENDIF
		ENDIF
	;恋人かつ恋慕時専用
	ELSEIF TALENT:恋人 && TALENT:恋慕
		IF TFLAG:193 == -1
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「等等等等一下！太粘人了！我说真的//」
			CASEELSE
				PRINTFORMW 「等一下，不管怎么说都太过分了！简直了 //」
			ENDSELECT
		ELSE
			;入浴中か否かで分岐
			IF CFLAG:現在位置 == 13 || CFLAG:現在位置 == 24 || CFLAG:MASTER:現在位置 == 30 || CFLAG:MASTER:現在位置 == 39
				PRINTFORMW 「哈哈哈%UNICODE(0x2665)% 真痒啊%UNICODE(0x2665)%」
			ELSE
				SELECTCASE RAND:3
				CASE 1
					SIF TFLAG:193 == 0
					PRINTFORMDL 艾伦那边也积极地身体接触
					PRINTFORMW 「我也很喜欢%CALLNAME:MASTER% %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「哈哈哈%UNICODE(0x2665)% 真痒啊%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「和%CALLNAME:MASTER%在一起就已经很開心了%UNICODE(0x2665)%」
				ENDSELECT
			ENDIF
		ENDIF
	;恋慕or準恋慕or恋人時専用
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
		IF TFLAG:193 == -1
			PRINTFORMW 「等等等一下//　实在太粘人了一点吧//」
		ELSE
			;入浴中か否かで分岐
			IF CFLAG:現在位置 == 13 || CFLAG:現在位置 == 24 || CFLAG:MASTER:現在位置 == 30 || CFLAG:MASTER:現在位置 == 39
				PRINTFORMW （啊//）
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW （啊//）
				CASE 2
					PRINTFORMW 「哈哈哈%UNICODE(0x2665)% 真痒啊%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「哎嘿嘿嘿 %UNICODE(0x2665)%//」
				ENDSELECT
			ENDIF
		ENDIF
	;其他
	ELSEIF TALENT:思慕
		IF TFLAG:193 == -1
			PRINTFORMW 「等等等等一下！　不管怎么说太粘人了 ！」
		ELSE
			PRINTFORMW 「哈哈哈%UNICODE(0x2665)% 真痒啊%UNICODE(0x2665)%」
		ENDIF
	ELSE
		IF TFLAG:193 == -1
			PRINTFORMW 「虽然不太想被触碰…… 」
		ELSE
			PRINTFORMW 「真痒啊%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;303,道歉
;==================================================
@M_KOJO_MESSAGE_COM_K44_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70
	IF TALENT:恋慕 || TALENT:恋人
		IF TFLAG:193 >= 1
			PRINTFORMW 「啊哈哈 、已经不在意了没关系的 %UNICODE(0x2665)%」
		ELSEIF TFLAG:193 == 0
			PRINTFORMW 「莫，算了。这次饶了你,下次小心点儿 」
		ELSE
			PRINTFORMW 「对不起啊 、　现在还不能原谅%CALLNAME:MASTER%…」
		ENDIF
	ELSE
		IF TFLAG:193 >= 1
			PRINTFORMW 「啊哈哈 、已经不在意了没关系的 %UNICODE(0x2665)%」
		ELSEIF TFLAG:193 == 0
			PRINTFORMW 「莫，算了。这次饶了你,下次小心点儿 」
		ELSE
			PRINTFORMW 「不行啊！还不能原谅！ 」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;304,幫忙干活 地の文、客数処理も込み
;==================================================
@M_KOJO_MESSAGE_COM_K44_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70
	;魔法屋
	IF TCVAR:356 == 0 && CFLAG:350 <= 43 && (DAY:3 == 15 || DAY:3 == 30)
		;仕事手伝ったよ！
		TCVAR:364 ++
		;接客
		IF TCVAR:354 > 25
			;先にLOCALに突っ込んどく、成功時は－４～－２人
			LOCAL:1 = RAND:3
			LOCAL:1 += 2
			PRINTFORMDL %CALLNAME:PLAYER%帮助被接待客人追赶的艾伦
			IF TFLAG:193 == 1
				PRINTFORMDL 工作进展的很好的様子…
				;大成功時は－８～－６人
				LOCAL:1 += 4
				IF TALENT:恋人
					;どんとはお願いしない
					PRINTFORMW 「%CALLNAME:MASTER%这个那个那个和那个,哪个都拜托你了 %UNICODE(0x2665)%」
					;ラブラブパワーで更に＋２！
					LOCAL:1 += 2
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
					PRINTFORMW 「%CALLNAME:MASTER%托你的福工作进展得很顺利 %UNICODE(0x2665)% 谢谢了%UNICODE(0x2665)%」
				ELSEIF TALENT:思慕
					PRINTFORMW 「有%CALLNAME:MASTER%在，工作就会轻松。%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「啊啦%UNICODE(0x2665)% 帮大忙了%UNICODE(0x2665)%」
				ENDIF
			ELSEIF TFLAG:193 == -1
				PRINTFORMDL 似乎没能帮上什么忙…
				;失敗時は－１～０人
				LOCAL:1 = RAND:2
				IF TALENT:恋人
					PRINTFORMW 「哎呀，也有这种时候呢。不用在意 %UNICODE(0x2665)%」
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
					PRINTFORMW 「这点事儿总会有办法的,你不要介意 %UNICODE(0x2665)%」
				ELSEIF TALENT:思慕
					PRINTFORMW 「这点事儿总会有办法的,你不要介意 ね%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「嗯…没关系的%UNICODE(0x2665)%」
				ENDIF
			ELSE
				SELECTCASE RAND:2
				CASE 1
					IF TALENT:恋人
						PRINTFORMW 「%CALLNAME:MASTER%这个拜托你了 %UNICODE(0x2665)%」
					ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
						PRINTFORMW 「谢谢帮忙%UNICODE(0x2665)%」
					ELSEIF TALENT:思慕
						PRINTFORMW 「真是帮了大忙了 %UNICODE(0x2665)%」
					ELSE
						PRINTFORMW 「啊啦%UNICODE(0x2665)% 帮大忙了%UNICODE(0x2665)%」
					ENDIF
				CASEELSE
					IF TALENT:恋慕
						PRINT 「%CALLNAME:MASTER%那里是
						SELECTCASE RAND:6
						CASE 0
							PRINT 增强自信的药
						CASE 1
							PRINT 避開妖精的魔法
						CASE 2
							PRINT 诅咒停
						CASE 3
							PRINT 驱邪
						CASE 4
							PRINT 香草
						CASE 5
							PRINT 护身符
						ENDSELECT
						PRINTFORMW 拿出来吧%UNICODE(0x2665)%」
					ELSE
						PRINT 「从那里把
						SELECTCASE RAND:4
						CASE 0
							PRINT 增强自信的药
						CASE 1
							PRINT 避開妖精的魔法
						CASE 2
							PRINT 诅咒停
						CASE 3
							PRINT 驱邪
						ENDSELECT
						PRINTFORMW 请拿出来 」
					ENDIF
				ENDSELECT
			ENDIF
			;%CALLNAME:MASTER%の教養が低い場合効果が下がる
			SIF ABL:MASTER:教養 < 2
			LOCAL:1 -= 1
			;ここでTCVARに減算
			TCVAR:354 -= LOCAL:1
		;呼び込み
		ELSE
			;先にLOCALに突っ込んどく、成功時は＋３～５人
			LOCAL:1 = RAND:3
			LOCAL:1 += 3
			PRINTFORMD %CALLNAME:PLAYER%
			IF TALENT:恋人
				PRINTD 和艾伦一起
			ELSE
				PRINTD 与艾伦在不同的地方
			ENDIF
			PRINTDL 进行了揽客
			IF TFLAG:193 == 1
				PRINTFORMDL 客人接二连三地来了!
				;大成功時は＋８～１０人
				LOCAL:1 += 5
				IF TALENT:恋人
					PRINTFORMW 「呜哇、这么多客人吗%UNICODE(0x2665)%　我可不能输了！诶，不需要魔法屋吗？%UNICODE(0x2665)%」
					;ラブラブパワーで更に＋２！
					LOCAL:1 += 2
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
					PRINTFORMW 「哇！ %UNICODE(0x2665)% 这么多客人 %UNICODE(0x2665)%　%CALLNAME:MASTER%真了不起啊 %UNICODE(0x2665)%」
				ELSEIF TALENT:思慕
					PRINTFORMW 「哇！%UNICODE(0x2665)% 真厉害%UNICODE(0x2665)%　谢谢%CALLNAME:MASTER%%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「啊啦%UNICODE(0x2665)% 帮大忙了%UNICODE(0x2665)%」
				ENDIF
			ELSEIF TFLAG:193 == -1
				PRINTFORMDL 但是完全没有客人来……
				;失敗時は＋０～１人
				LOCAL:1 = RAND:2
				IF TALENT:恋人
					PRINTFORMW 「哎呀，也有这种时候呢。不用在意 %UNICODE(0x2665)%」
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
					PRINTFORMW 「哎呀，这是常有的事，别在意 %UNICODE(0x2665)%」
				ELSEIF TALENT:思慕
					PRINTFORMW 「嘛，这是常有的事，不要在意 %UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「哎呀，客人根本不来啊 」
				ENDIF
			ELSE
				PRINTFORMDL 客人一个接一个地来了
				IF TALENT:恋人
					PRINTFORMW 「有%CALLNAME:MASTER%一人就如同有了百人%UNICODE(0x2665)%　那么，我也要加油了 ！」
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
					PRINTFORMW 「谢谢帮忙%UNICODE(0x2665)%」
				ELSEIF TALENT:思慕
					PRINTFORMW 「谢谢帮忙%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「啊啦%UNICODE(0x2665)% 帮大忙了%UNICODE(0x2665)%」
				ENDIF
			ENDIF
			;天気がよろしくない場合は－２
			SIF TIME:5 > 3
			LOCAL:1 -= 2
			;%CALLNAME:MASTER%の話術技能が低い場合効果が下がる
			SIF ABL:MASTER:話術技能 < 2
			LOCAL:1 -= 2
			;もし増加数が减少になったら０にする
			SIF LOCAL:1 < 0
			LOCAL:1 = 0
			;ここでTCVARに加算
			TCVAR:354 += LOCAL:1
			TCVAR:355 += LOCAL:1
		ENDIF
	;採集
	ELSEIF CFLAG:職種 == 54
		;仕事手伝ったよ！
		TCVAR:364 ++
		;MASTERの採集量を計上　TWには採集技能がまだ無いので教養で代用
		LOCAL:1 = ABL:MASTER:教養 * 80 + RAND:51
		TCVAR:354 += LOCAL:1
		TCVAR:355 += LOCAL:1
	ENDIF
ENDIF
RETURN 1
;==================================================
;305,索求膝枕
;==================================================
@M_KOJO_MESSAGE_COM_K44_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF TALENT:恋人 && TALENT:恋慕 && TALENT:妊娠 && !RAND:2
		IF CFLAG:妊娠経過日数 >= 20
			PRINTFORMW 「会生出什么样的孩子呢 %UNICODE(0x2665)%」
		ELSEIF CFLAG:妊娠経過日数 >= 10
			PRINTFORMW 「怎么样？听到了吗？ 」
		ELSE
			PRINTFORMW 「呀，太心急了%UNICODE(0x2665)%」
		ENDIF
	ELSEIF TALENT:恋人 && TALENT:恋慕
		IF !RAND:2
			PRINTFORMW 「我的膝盖怎么样？舒服吗 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「在我的膝盖上好好休息吧 %UNICODE(0x2665)%」
		ENDIF
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
		PRINTFORMW 「下次希望让我枕着膝盖，之类的 //」
	ELSE
		PRINTFORMW 「稍微……膝盖好难受啊 」
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子　お腹っていいよね
;==================================================
@M_KOJO_MESSAGE_COM_K44_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF TALENT:恋人
		IF TALENT:妊娠 && CFLAG:身に覚え_母
			IF CFLAG:妊娠経過日数 >= 20 && RAND:2
				PRINTFORMW 「会生出什么样的孩子呢 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「欸嘿嘿嘿%UNICODE(0x2665)%」
			ENDIF
		ELSE
			PRINTFORMW 「虽然没什么关系 ……但为什么会喜欢摸肚子呢？ 」
		ENDIF
	ELSEIF ABL:親密 >= 6
		PRINTFORMW 「我猜……你喜欢肚子对吗？ 」
	ELSE
		PRINTFORMW 「摸哪里了！ 」
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;==================================================
@M_KOJO_MESSAGE_COM_K44_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF TALENT:恋人
		PRINTFORMW 「真有你的%UNICODE(0x2665)% 看我也来%UNICODE(0x2665)%」
	ELSEIF TALENT:恋慕
		PRINTFORMW 「欸嘿嘿%UNICODE(0x2665)%」
	ELSEIF ABL:親密 > 5
		PRINTFORMW 「回击了哟 %UNICODE(0x2665)%」
	ELSEIF ABL:従順 >= 5
		PRINTFORMW 「真是的，没办法啊 」
	ELSE
		PRINTFORMW 「你在干什么啊！ 」
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;==================================================
@M_KOJO_MESSAGE_COM_K44_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF TALENT:恋人
		IF TFLAG:193 == 1
			PRINTFORMW 「真有你的%UNICODE(0x2665)% 看我也来%UNICODE(0x2665)%」
		ELSEIF TFLAG:193 == -1
			PRINTFORMW 「现在没有那样的心情 」
		ELSE
			PRINTFORMW 「我的腮帮子怎么样 %UNICODE(0x2665)%」
		ENDIF
	ELSE
		IF TFLAG:193 == -1
			PRINTFORMW 「真是的，不要这么突然捅脸颊啊」
		ELSE
			PRINTFORMW 「欸嘿嘿%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;309,摸頭
;==================================================
@M_KOJO_MESSAGE_COM_K44_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF TALENT:恋人 && TALENT:恋慕
		IF TFLAG:193 == -1
			PRINTFORMW 「呃、已经有点过分了 」
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「随你喜欢的摸吧%UNICODE(0x2665)%」
			CASE 2
				PRINTFORMW 「欸嘿嘿%UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「总觉得好舒服啊 %UNICODE(0x2665)%」
			ENDSELECT
		ENDIF
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「我软绵绵的棉花糖发型的触感怎么样 %UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「欸嘿嘿//」
		ENDSELECT
	ELSEIF ABL:親密 > 5
		PRINTFORMW 「我软绵绵的棉花糖发型的触感怎么样 」
	ELSE
		IF TFLAG:193 == 1
			PRINTFORMW 「%CALLNAME:MASTER%很擅长摸头呢 」
		ELSE
			PRINTFORMW 「等一下！　你在干什么啊 //」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;310,摸屁股
;==================================================
@M_KOJO_MESSAGE_COM_K44_310
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ
	IF TALENT:恋人 && TALENT:恋慕
		IF (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
			PRINTFORMW 「等等等等一下//　要是有谁来了怎么办呢//」
		ELSE
			PRINTFORMW 「莫、%CALLNAME:MASTER%真是H啊…//」
		ENDIF
	ELSEIF TALENT:恋慕
		IF (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
			PRINTFORMW 「等等等等一下//　要是有谁来了怎么办呢//」
		ELSE
			PRINTFORMW 「真是的%CALLNAME:MASTER%啊。　…特别招待哦 //」
		ENDIF
	ELSEIF TFLAG:193 >= 2
		IF (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
			PRINTFORMW 「等等等等一下！//　在这种地方干什么呢 ！//」
		ELSE
			IF TFLAG:193 == 4
				PRINTFORMW 「真是的，有什么好開心的」
			ELSE
				PRINTFORMW 「怎、摸到哪里了！变态 ！//」
			ENDIF
		ENDIF
	ELSEIF !TALENT:風騷
		PRINTFORMW 「摸哪里了！这个变态 ！」
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,擁抱
;==================================================
@M_KOJO_MESSAGE_COM_K44_311
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ && !MARK:反発刻印
	IF CFLAG:诶嘿嘿 == 2
		PRINTFORMW 「诶嘿嘿//　真暖和…//」
	ELSEIF TALENT:恋慕 && TALENT:恋人
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「和%CALLNAME:MASTER%拥抱着总觉得很安心 %UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「诶嘿嘿%UNICODE(0x2665)% 真暖和%UNICODE(0x2665)%」
		ENDSELECT
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「诶嘿嘿へ//」
		CASEELSE
			PRINTFORMW （%CALLNAME:MASTER%的味道…总觉得很安心 //）
		ENDSELECT
	ELSEIF TALENT:思慕
		PRINTFORMW 「%CALLNAME:MASTER%真是的、…真没办法啦」
	ELSE
		PRINTFORMW 「等等等等一下！　干嘛突然拥抱啊！//」
	ENDIF
ENDIF
RETURN 1
;==================================================
;312,接吻 ありがとうおしゃぶり霊夢の人！そしてごめんなさい！
;==================================================
@M_KOJO_MESSAGE_COM_K44_312
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_312_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ && TFLAG:193 != 99 && !MARK:反発刻印
	IF EXP:接吻経験 == 1
		;ファーストキッス群
		IF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「诶嘿嘿//　恋人之间的接吻是如此的幸福啊 %UNICODE(0x2665)%」
			PRINTFORMW 「下次由我主动亲%UNICODE(0x2665)% ちゅっ%UNICODE(0x2665)%」
			EXP:接吻経験 += 4
			EXP:MASTER:接吻経験 += 4
			EXP:愛情経験 += 10
		ELSEIF TALENT:恋人 || TALENT:恋慕
			PRINTFORMW 「欸嘿嘿//　这回轮到我啦 %UNICODE(0x2665)% 哎%UNICODE(0x2665)%」
			EXP:接吻経験 += 1
			EXP:MASTER:接吻経験 += 1
		ELSEIF TALENT:思慕
			PRINTFORMW 「啊？诶！？诶诶诶诶！？ 」
			PRINTFORMW （没想到%CALLNAME:MASTER%会亲亲亲吻过来//）
			PRINTFORMW （%CALLNAME:MASTER%会亲我难难难难道是喜欢我吗！？//）
			PRINTFORMW （我我我我虽然是喜欢%CALLNAME:MASTER%但这只是作为朋友上的喜欢//）
			PRINTFORMW （我还以为%CALLNAME:MASTER%也是这么想的）
			PRINTFORMW （啊—呜—//）
			CFLAG:1014 = 1
			TALENT:羞恥心 = 1
		ELSE
			PRINTFORML 「……这可是我的初吻 ！！」
			PRINTFORMDW 艾伦哭着发怒……
			BASE:憤怒 += 500
			CFLAG:好感度 -= 300
			;减少にはならない
			SIF CFLAG:好感度 < 0
			CFLAG:好感度 = 0
		ENDIF
	ELSE
		IF TALENT:恋人 && TALENT:恋慕 && GET_TARGETNUM() == 1
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「下次由我来%UNICODE(0x2665)% 啾～%UNICODE(0x2665)%」
			CASE 2
				PRINTFORMW 「呐，再来一次 %UNICODE(0x2665)%」
			CASEELSE
				SELECTCASE CFLAG:积攒度
				CASE 0 TO 499
					PRINTFORMW 「啾%UNICODE(0x2665)%　啾%UNICODE(0x2665)%」
				CASE 500 TO 799
					PRINTFORMW 「啾……嗯//」
				CASE IS > 800
					PRINTFORMDW 艾伦兴高采烈地渴求%CALLNAME:MASTER%的嘴唇……
				ENDSELECT
			ENDSELECT
;			EXP:接吻経験 += 1
;			EXP:MASTER:接吻経験 += 1
		ELSEIF TALENT:恋慕 && (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
			PRINTFORMW 「啾…呼哈//　有点害羞呢 //」
		ELSEIF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「啾…呼哈。　诶嘿嘿 %UNICODE(0x2665)% %CALLNAME:MASTER%だあいすき%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「啾…呼哈。　诶嘿嘿 //」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;313,胸愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K44_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ
	IF TALENT:恋慕 && DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && TFLAG:400 && ABL:露出癖 < 5
		PRINTFORMW 「喂！//　快停下！//」
	ELSEIF TALENT:恋慕 && (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置)) && ABL:露出癖 < 5
		PRINTFORMW 「啊啊/谁谁谁谁看见了的话该怎么办啊 ！//」
	ELSEIF MARK:快楽刻印 < 2
		PRINTFORMDW 艾伦似乎有点讨厌……
	ENDIF
ENDIF
RETURN 1
;-------------------------------------------------
;314,肛門愛撫
;-------------------------------------------------
@M_KOJO_MESSAGE_COM_K44_314
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_314_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ
	IF TALENT:恋慕 && DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && TFLAG:400 && ABL:露出癖 < 5
		PRINTFORMW 「喂！//　快停下！//」
	ELSEIF TALENT:恋慕 && (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
		PRINTFORMW 「嗯//　谁谁谁谁看见了的话该怎么办啊 ！//」
	ELSEIF MARK:快楽刻印 < 2
		PRINTFORMDW 艾伦似乎有点讨厌……
	ENDIF
ENDIF
RETURN 1
;==================================================
;315,陰蒂愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K44_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ
	IF TALENT:恋慕 && DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && TFLAG:400 && ABL:露出癖 < 5
		PRINTFORMW 「喂！//　快停下！//」
	ELSEIF TALENT:恋慕 && (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
		PRINTFORMW 「啥//　谁谁谁谁看见了的话该怎么办啊 ！//」
	ELSEIF MARK:快楽刻印 < 2
		PRINTFORMDW 艾倫讨厌这样做…
	ENDIF
ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;==================================================
@M_KOJO_MESSAGE_COM_K44_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_316_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ
	IF TALENT:恋慕 && DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && TFLAG:400 && ABL:露出癖 < 5
		PRINTFORMW 「喂！//　快停下！//」
	ELSEIF TALENT:恋慕 && (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
		PRINTFORMW 「呀！//　谁谁谁谁看见了的话该怎么办啊 ！//」
	ELSEIF MARK:快楽刻印 < 2
		PRINTFORMDW 艾倫讨厌这样做…
	ENDIF
ENDIF
RETURN 1
;==================================================
;317,Ｖ腰を振る
;==================================================
@M_KOJO_MESSAGE_COM_K44_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_317_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;318,Ａ腰を振る
;==================================================
@M_KOJO_MESSAGE_COM_K44_318
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_318_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;330,掀裙子
;==================================================
@M_KOJO_MESSAGE_COM_K44_330
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ
	IF TALENT:恋慕 || TALENT:恋人
		IF (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
			PRINTFORMW 「等等等等一下//　如果被谁看见了怎么办啊 //」
		ELSE
			PRINTFORMW 「莫、%CALLNAME:MASTER%真是H啊…\/\/\/\/」
		ENDIF
	ELSEIF TALENT:思慕
		IF CFLAG:2 <= 3000
			PRINTFORMW 「等、等一下！　你在干什么啊 ！」
		ELSEIF CFLAG:2 >= 3001 && CFLAG:2 <= 5000
			PRINTFORMW 「真是的、%CALLNAME:MASTER%啊//」
		ELSEIF (OUTROOF(CFLAG:TARGET:現在位置)) || (OPENPLACE(CFLAG:TARGET:現在位置))
			PRINTFORMW 「等等等等一下//　在这种场所里你在干什么啊 ！」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%啊莫ー…//」
		ENDIF
	ELSE
		PRINTFORMW 「你在干什么啊 你！　我要使用魔法了啊！ ！」
	ENDIF
ENDIF
RETURN 1

;==================================================
;331,泡茶（下薬）
;==================================================
@M_KOJO_MESSAGE_COM_K44_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_331_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;332,勸酒
;==================================================
@M_KOJO_MESSAGE_COM_K44_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FIRSTTIME(SELECTCOM)
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:思慕
			PRINTFORMW 「谢谢啦%UNICODE(0x2665)% 那我開动这可不行的吧！%UNICODE(0x2665)%」
		ELSE
			IF TFLAG:98 == -1
				PRINTFORMW 「虽说并不是不好吃……」
			ELSE
				PRINTFORMW 「那咱们赶紧喝吧 」
			ENDIF
		ENDIF
	ELSEIF !TALENT:恋慕 && CFLAG:烂酔奸 == 2

	ELSE
		;恋慕かつ恋人
		IF TALENT:恋慕 && TALENT:恋人
			IF TFLAG:98 == -1
				PRINTFORMW 「嗯，不适合我啊 」
			ELSEIF BASE:酒気 > MAXBASE:酒気 / 2
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「好喝的酒啊 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMDL 醉了的艾伦 、\@ GET_TARGETNUM() > 1 ? 在众目睽睽下把 ず #  \@%CALLNAME:MASTER%抱住了
					PRINTFORMW 「%CALLNAME:MASTER%喜欢%UNICODE(0x2665)% 最喜欢了%UNICODE(0x2665)%%UNICODE(0x2665)%」
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「这次轮到我倒酒了 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「和%CALLNAME:MASTER%这样喝酒的话，太过幸福会忘记时间的流逝 %UNICODE(0x2665)%」
				ENDSELECT
			ENDIF
		;恋慕 or 準恋慕 or 恋人
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			IF TFLAG:98 == -1
				PRINTFORMW 「嗯，不适合我啊 」
			ELSEIF BASE:酒気 > MAXBASE:酒気 / 2
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「只有这点还不够%UNICODE(0x2665)% 再倒多点%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「阿勒？ 有两个%CALLNAME:MASTER%在？　…幻覚？」
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「啊哈哈//和%CALLNAME:MASTER%一起喝酒真是太幸福了  //」
				ENDSELECT
			ENDIF
		;思慕
		ELSEIF TALENT:思慕
			IF TFLAG:98 == -1
				PRINTFORMW 「嗯，不适合我啊 」
			ELSEIF BASE:酒気 > MAXBASE:酒気 / 2
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「啊哈哈 は%UNICODE(0x2665)% 再倒多一点%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「阿勒？ 有两个%CALLNAME:MASTER%在？　…幻覚？」
				ENDSELECT
			ELSE
				PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)% 来来、别客气%UNICODE(0x2665)%」
			ENDIF
		;それ以外
		ELSE
			IF TFLAG:98 == -1
				PRINTFORMW 「虽说并不是不好吃……」
			ELSE
				PRINTFORMW 「嗯，很好吃 %UNICODE(0x2665)%」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K44_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3, 2
			IF !RAND:10
				PRINTFORMW 「听我说！最近店里来了讨厌的客人 」
				PRINTFORMW 「那位客人呢……然后……而且…… 」
				PRINTFORMW 「……所以说，你不觉得很过分吗？还有…… 」
				PRINTFORMW 「…….是……然后…… 」
				PRINTFORMDW ………
				PRINTFORMDW ……
				PRINTFORMDW …
				IF TALENT:恋慕 || CFLAG:1014 == 1
					PRINTFORMW 「呼…呼…干脆利落说出来后舒服多了%UNICODE(0x2665)%」
					PRINTFORMW 「谢谢你陪我%UNICODE(0x2665)%还有…对不起啊」
				ELSE
					PRINTFORMW 「呼…呼…干脆利落说出来后舒服多了%UNICODE(0x2665)%」
					PRINTFORMW 「谢谢你陪我%UNICODE(0x2665)%」
				ENDIF
			ELSE
				IF TALENT:恋慕 || TALENT:思慕 || TALENT:恋人
					PRINTFORMW 「——再这样抱怨下去可不好啊 」
					PRINTFORMW 「所以这样就可以了，谢谢 %UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「呼…呼…干脆利落说出来后舒服多了%UNICODE(0x2665)%」
					PRINTFORMW 「%CSTR:90%谢谢你陪我%UNICODE(0x2665)%」
				ENDIF
			ENDIF
		CASE 1
			PRINTFORMW 「啊啊，回想起来就生气了！ 」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,料理を勧める/碰杯
;==================================================
@M_KOJO_MESSAGE_COM_K44_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	;宴会（妊娠していない）
	IF CFLAG:350 == 49 && CFLAG:妊娠自覚状態 != 1
		;半分以上残っている
		IF BASE:酒気 <= (MAXBASE:酒気 / 2)
			;まずは一杯
			IF TCVAR:356 <= 1
				IF TALENT:恋人 && TALENT:恋慕
					PRINTFORMW 「谢谢啦%UNICODE(0x2665)% 那我開动这可不行的吧！%UNICODE(0x2665)%」
				ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
					PRINTFORMW 「啊啦%UNICODE(0x2665)% 谢谢%UNICODE(0x2665)%」
				ELSEIF TALENT:思慕
					PRINTFORMW 「谢谢啦%CALLNAME:MASTER%%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「哎呀，真机灵 %UNICODE(0x2665)%」
				ENDIF
				TCVAR:356 = 2
			ELSE
				;4分の1の確率で会話に
				IF RAND:4 >= 1
					IF TALENT:恋人 && TALENT:恋慕
						SELECTCASE RAND:5
						CASE 1
							PRINTFORMW 「这次轮到我倒酒了 %UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「和%CALLNAME:MASTER%这样喝酒的话，太过幸福会忘记时间的流逝 %UNICODE(0x2665)%」
						CASE 3
							PRINTFORMW 「不仅仅是酒，也享受料理吧 %UNICODE(0x2665)%」
						CASE 4
							PRINTFORMW 「这个菜也很好吃 %UNICODE(0x2665)% %CALLNAME:MASTER%来一口怎样%UNICODE(0x2665)%」
						CASEELSE
							PRINTFORMW 「看起来很好吃的菜啊，可以给我一口吗？」
						ENDSELECT
					ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
						SELECTCASE RAND:4
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「啊哈哈//和%CALLNAME:MASTER%一起喝酒真是太幸福了  //」
						CASE 3
							PRINTFORMW 「这道菜真美味%UNICODE(0x2665)% %CALLNAME:MASTER%也吃……这不都吃上了？」
						CASEELSE
							PRINTFORMW 「看起来很好吃的菜啊，能给我一口吗？ 」
						ENDSELECT
					ELSEIF TALENT:思慕
						SELECTCASE RAND:4
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)% 来来、别客气%UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「酒だけじゃなくて料理も楽しまないとね%UNICODE(0x2665)%」
						CASE 3
							PRINTFORMW 「这道菜非常好吃哦%UNICODE(0x2665)% %CALLNAME:MASTER%你也尝尝吧？ 」
						CASEELSE
							PRINTFORMW 「哎呀，%CALLNAME:MASTER%吃的料理，总觉得好吃啊，能给我一口吗？ 」
						ENDSELECT
					ELSE
						SELECTCASE RAND:2
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)% 不需要客气 」
						CASEELSE
							PRINTFORMW 「哎呀，%CALLNAME:MASTER%的食物看起来很好吃啊，放在哪里了？ 」
						ENDSELECT
					ENDIF
				ELSE
					IF (MOON_WATCH_POINT(CFLAG:44:現在位置)) && TIME:5 <= 1 && RAND:3 >= 1
						CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
					ELSE
						CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
					ENDIF
				ENDIF
			ENDIF
		ELSE
			;心情愉快
			IF TALENT:心情 == 1
				SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「啊哈哈 ははは%UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「乍哈哈哈哈哈哈哈%UNICODE(0x2665)%」
				CASE 3
					PRINTFORMDL 或许是情緒高涨吧，艾伦突然唱起歌来
;					SELECTCASE RAND:3
;					CASE 1
;						;カラオケ版はトラウマ、裏面マジ鬼畜
;						PRINTFORMW 「やっまっあっるき～♪やっまっあっるき～♪　やっまっをある～こう♪やっまっあっるき～♪♪」
;					CASE 2
;						;うにと咖喱♪
;						PRINTFORMW 「だいなでだ～いなあ～いらん♪」
;					CASEELSE
;						;艾倫可愛的よ艾倫
;						PRINTFORMW 「わたしは软绵绵♪　た～ん～ぽぽ♪わ～た～がし♪♪」
;					ENDSELECT
				CASEELSE
					;関係に応じて分岐
					IF TALENT:恋人 && TALENT:恋慕
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「请再来一杯 %UNICODE(0x2665)%」
						CASE 2
							PRINTFORML 醉了的艾伦，不顾别人的目光%CALLNAME:MASTER%抱住了
							PRINTFORMW 「%CALLNAME:MASTER%喜欢%UNICODE(0x2665)% 最喜欢了%UNICODE(0x2665)%%UNICODE(0x2665)%」
						CASEELSE
							PRINTFORMW 「阿勒？ 有两个%CALLNAME:MASTER%在？　…幻覚？」
						ENDSELECT
					ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「只有这点还不够%UNICODE(0x2665)% 再倒多点%UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「和%CALLNAME:MASTER%一起的时间一直持续下去就好了 …」
						CASEELSE
							PRINTFORMW 「阿勒？ 有两个%CALLNAME:MASTER%在？　…幻覚？」
						ENDSELECT
					ELSEIF TALENT:思慕
						SELECTCASE RAND:2
						CASE 1
							PRINTFORMW 「啊哈哈 は%UNICODE(0x2665)% 再倒多一点%UNICODE(0x2665)%」
						CASEELSE
							PRINTFORMW 「哎呀，%CALLNAME:MASTER%吃的料理，总觉得好吃啊，能给我一口吗？ 」
						ENDSELECT
					ELSE
						SELECTCASE RAND:2
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)% 不需要客气 %UNICODE(0x2665)%」
						CASEELSE
							PRINTFORMW 「哎呀，%CALLNAME:MASTER%吃的料理，看起来很好吃，放在哪里了？ 」
						ENDSELECT
					ENDIF
				ENDSELECT
			;心情不快
			ELSEIF TALENT:心情 == -1
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「什么呀，不能喝我的酒吗？ 」
				CASE 2
					PRINTFORMW 「啊哈哈 ははは%UNICODE(0x2665)%」
				CASE 3
					PRINTFORMW 「我才没有喝醉呢 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「啊哈哈 は%UNICODE(0x2665)% 请再给我一杯%UNICODE(0x2665)%」
				ENDSELECT
			;ふつー
			ELSE
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「啊哈哈 ははは%UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「总觉得头晕呼呼」
				CASEELSE
					;関係に応じて分岐
					IF TALENT:恋人 && TALENT:恋慕
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「这次轮到我倒酒了 %UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「和%CALLNAME:MASTER%这样喝酒的话，太过幸福会忘记时间的流逝 %UNICODE(0x2665)%」
						CASEELSE
							;まだ4分の1以上残っている
							IF BASE:酒気 <= (MAXBASE:酒気 * 3 / 4)
								SELECTCASE RAND:3
								CASE 1
									PRINTFORMW 「不仅仅是酒，也享受料理吧 %UNICODE(0x2665)%」
								CASE 2
									PRINTFORMW 「这个菜也很好吃 %UNICODE(0x2665)% %CALLNAME:MASTER%来一口怎样%UNICODE(0x2665)%」
								CASEELSE
									PRINTFORMW 「看起来很好吃的菜啊，可以给我一口吗？」
								ENDSELECT
							ELSE
								;吃飯終了
								IF TCVAR:356 <= 2
									PRINTFORMW 「真是佳肴 %UNICODE(0x2665)% 我已经吃饱了%UNICODE(0x2665)%」
									PRINTFORMW 「吃完饭后，两个人边喝酒边聊吧 %UNICODE(0x2665)%」
									TCVAR:356 = 3
								ELSE
									IF (MOON_WATCH_POINT(CFLAG:44:現在位置)) && TIME:5 <= 1 && RAND:3 >= 1
										CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
									ELSE
										CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
									ENDIF
								ENDIF
							ENDIF
						ENDSELECT
					ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「啊哈哈 は//　和%CALLNAME:MASTER%一起喝酒真是幸福%UNICODE(0x2665)%」
						CASEELSE
							;まだ4分の1以上残っている
							IF BASE:酒気 <= (MAXBASE:酒気 * 3 / 4)
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「这道菜真美味%UNICODE(0x2665)% %CALLNAME:MASTER%也吃……这不都吃上了？」
								CASEELSE
									PRINTFORMW 「看起来很好吃的菜啊，能给我一口吗？ 」
								ENDSELECT
							ELSE
								;吃飯終了
								IF TCVAR:356 <= 2
									PRINTFORMW 「真是佳肴 %UNICODE(0x2665)% 肚子已经饱了 」
									PRINTFORMW 「吃完饭了，两个人悠闲地一边喝酒一边聊天怎么样？ //」
									TCVAR:356 = 3
								ELSE
									IF (MOON_WATCH_POINT(CFLAG:44:現在位置)) && TIME:5 <= 1 && RAND:3 >= 1
										CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
									ELSE
										CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
									ENDIF
								ENDIF
							ENDIF
						ENDSELECT
					ELSEIF TALENT:思慕
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)% 来来、别客气%UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「稍微有点困了呢…呼喵」
						CASEELSE
							;まだ4分の1以上残っている
							IF BASE:酒気 <= (MAXBASE:酒気 * 3 / 4)
								SELECTCASE RAND:2
								CASE 1
									PRINTFORMW 「这道菜非常好吃哦%UNICODE(0x2665)% %CALLNAME:MASTER%你也尝尝吧？ 」
								CASEELSE
									PRINTFORMW 「哎呀，%CALLNAME:MASTER%吃的料理，总觉得好吃啊，能给我一口吗？ 」
								ENDSELECT
							ELSE
								;吃飯終了
								IF TCVAR:356 <= 2
									PRINTFORMW 「真是佳肴 %UNICODE(0x2665)% 肚子已经饱了 」
									PRINTFORMW 「接下来，让我们边喝酒边聊天吧 %UNICODE(0x2665)%」
									TCVAR:356 = 3
								ELSE
									IF (MOON_WATCH_POINT(CFLAG:44:現在位置)) && TIME:5 <= 1 && RAND:3 >= 1
										CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
									ELSE
										CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
									ENDIF
								ENDIF
							ENDIF
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「这次轮到我来倒酒 %UNICODE(0x2665)% 不需要客气 %UNICODE(0x2665)%」
						CASE 2
							PRINTFORMW 「稍微有点困了呢…呼喵」
						CASEELSE
							PRINTFORMW 「哎呀，%CALLNAME:MASTER%吃的料理，看起来很好吃，放在哪里了？ 」
						ENDSELECT
					ENDIF
				ENDSELECT
			ENDIF
		ENDIF
	;宴会（妊娠している）
	ELSEIF CFLAG:350 == 49 && CFLAG:妊娠自覚状態 == 1
		;4分の1の確率で会話に
		IF RAND:4 >= 1
			IF TALENT:恋人 && TALENT:恋慕
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「和%CALLNAME:MASTER%一起吃着饭感觉比平时好吃 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「谢谢啦%UNICODE(0x2665)% 作为回礼 %CALLNAME:MASTER%我帮你把菜端到盘子里 %UNICODE(0x2665)%」
				CASE 3
					PRINTFORMW 「这个菜也很好吃 %UNICODE(0x2665)% %CALLNAME:MASTER%来一口怎样%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「看起来很好吃的菜啊，可以给我一口吗？」
				ENDSELECT
			ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「啊哈哈 は//　和%CALLNAME:MASTER%吃着饭总觉得好幸福啊 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「啊啦%UNICODE(0x2665)% 谢谢%UNICODE(0x2665)%」
				CASE 3
					PRINTFORMW 「这道菜真美味%UNICODE(0x2665)% %CALLNAME:MASTER%也吃……这不都吃上了？」
				CASEELSE
					PRINTFORMW 「看起来很好吃的菜啊，能给我一口吗 //」
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「这道菜非常好吃哦%UNICODE(0x2665)% %CALLNAME:MASTER%你也尝尝吧？ 」
				CASE 2
					PRINTFORMW 「哎呀%UNICODE(0x2665)%你帮我端菜了吧，谢谢%UNICODE(0x2665)% 」
				CASEELSE
					PRINTFORMW 「哎呀，%CALLNAME:MASTER%吃的料理，总觉得好吃啊，能给我一口吗？ 」
				ENDSELECT
			ENDIF
		ELSE
			IF (MOON_WATCH_POINT(CFLAG:44:現在位置)) && TIME:5 <= 1 && RAND:3 >= 1
				CALL M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH
			ELSE
				CALL M_KOJO_MESSAGE_COM_K44_300_1_HANYO
			ENDIF
		ENDIF
	ELSE
		PRINTFORMW 「应该没有留言、有的话告诉我吧」
	ENDIF
ENDIF
RETURN 1
;==================================================
;335,照料
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K44_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1, 0
			IF TALENT:恋人 && TALENT:恋慕
				PRINTFORMW 「谢谢你%UNICODE(0x2665)% 真是帮了大忙了 %UNICODE(0x2665)%」
			ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
				PRINTFORMW 「屑谢谢茄子 %UNICODE(0x2665)%//」
			ELSEIF TALENT:思慕
				PRINTFORMW 「谢谢%CALLNAME:MASTER%%UNICODE(0x2665)% 托你的福，我变得稍微轻松了点 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「谢谢了%UNICODE(0x2665)% 稍微轻松了一点 %UNICODE(0x2665)%」
			ENDIF
		CASE -1
			PRINTFORMW 「嗯，嗯 ……」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕
;ABL:親密(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:膝枕した)(44以下=失敗
;==================================================
@M_KOJO_MESSAGE_COM_K44_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 > 0
		IF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「欸嘿嘿%UNICODE(0x2665)% 真舒服……」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「欸嘿嘿……」
		ELSE
			PRINTFORMW 「Zzz……」
		ENDIF
	ELSE
		IF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「这样也不错呢 ……%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「啊呀//」
		ELSEIF TALENT:思慕
			PRINTFORMW 「朋友之间膝枕很平常吗？ 」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,推倒（時姦時猥褻）
;==================================================
@M_KOJO_MESSAGE_COM_K44_350
SIF TALENT:恋慕 || TALENT:恋人 || TALENT:風騷
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:ブチギレ && !TCVAR:烂醉
	;今は不让推倒
	IF TFLAG:不让推倒 && (TALENT:恋慕 || TALENT:恋人) && CFLAG:诶嘿嘿 != 2 && !MARK:反発刻印
		IF TCVAR:初次拥抱 == 6
			PRINTFORMW 「简直了，%CALLNAME:MASTER%真是的//」
		ELSEIF TCVAR:初次拥抱 == 7
			PRINTFORMW 「因为%CALLNAME:MASTER%喜欢…//　像这样的情緒……那个 …」
			PRINTFORMW 「总之不行！//」
		;恋人か恋慕あるならまずこれにはならんだろう、というわけで省略
		ELSEIF TCVAR:初次拥抱 == 8
			;PRINTFORMDW まだ暫定メッセージなり（・∀・）
		ELSE
			PRINTFORMW 「对不起，现在没有那种心情」
		ENDIF
	;状況が悪い
	ELSEIF TFLAG:194 >= 1 && (TALENT:恋人 || TALENT:恋慕) && !MARK:反発刻印
		IF TFLAG:194 == 1
			PRINTFORMW 「如果可以的话到两个人独处的地方比较好 //」
		ELSEIF TFLAG:194 == 2
			PRINTFORMW 「在这里做的稍微有点 …//」
		ELSEIF TFLAG:194 == 3
			PRINTFORMW 「多人数稍有点……讨厌」
		ELSEIF TFLAG:194 == 4
			PRINTFORMW 「对不起，现在没有那种心情」
		ENDIF
	;既に被逆推てるor被逆推て抜け出してから推倒
	ELSEIF TCVAR:371 == 1
		PRINTFORMW 「对不起，我无法忍耐。拜托了，尽情疼爱艾伦吧//」
		TCVAR:371 = 0
		TCVAR:372 = 1
	ELSEIF TALENT:恋人 && TALENT:恋慕
		IF FIRSTTIME(1021)
			PRINTFORMW 「我们，终于要H了 //」
			PRINTFORMW 「因为是第一次所以稍稍有些不安…但在这上是满心的欢喜，好開心 %UNICODE(0x2665)%」
			PRINTFORMW 「是怎样的欢喜？那当然是……各种各样的//」
			PRINTFORMW 「莫//　…呐%CALLNAME:MASTER%、可以温柔点来吗%UNICODE(0x2665)%//」
			EXP:愛情経験 += 50
		ELSEIF TALENT:処女 && EXP:Ｖ経験 == 0
			PRINTFORMW 「…这次想要做到最后 //」
		ELSEIF TALENT:妊娠 && (!TALENT:MASTER:濃厚精液 || BASE:MASTER:勃起 < 1200)
			PRINTFORMW 「因为对儿童不好，所以不想做…、%CALLNAME:MASTER%非常想要吗//」
			PRINTFORMW 「……知道了、可以做…但是…温柔一点 //」
		ELSEIF (OUTROOF(CFLAG:現在位置))
			PRINTFORMW 「诶诶诶诶！//　在外面做吗！？//」
			PRINTFORMW 「……虽然很害羞 、如果%CALLNAME:MASTER%真这么想要的话……可以//」
		ELSE
			IF PALAM:欲情 >= PALAMLV:10 && BASE:情緒 >= 1000
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「好呀。来吧 、%CALLNAME:MASTER%//」
				CASE 2
					PRINTFORMW 「那就来做吧。　%CALLNAME:MASTER%//」
				CASEELSE
					PRINTFORMW 「好好爱爱艾伦吧 //」
				ENDSELECT
			ELSEIF TALENT:MASTER:濃厚精液 && BASE:MASTER:勃起 >= 1200
				PRINTFORMW 「呃……想要……H了吗 //」
				PRINTFORMW 「……嗯，%CALLNAME:MASTER%的话可以 //」
				SIF TALENT:妊娠
				PRINTFORMW 「但是……不可以插入 」
			ELSE
				PRINTFORMW 「那个……H，那么想做吗 //」
				PRINTFORMW 「做的话也可以但是…、那个…//　温柔点//」
			ENDIF
		IF !TALENT:妊娠 && GET_TARGETNUM() == 1
			;スペシャルな
			SELECTCASE RAND:20
			;魔法の御香、決して可疑薬じゃないぞ！
			CASE 0
				;艾倫私室でのみ発生
				IF ((CFLAG:現在位置 == 16 && FLAG:住宿人物 == 44) || CFLAG:44:現在位置 == OMANEKIBEYA() || CFLAG:44:現在位置 == 535) && !TALENT:育児中
					IF FIRSTTIME(1029)
						PRINTFORMW 「今天准备了好东西 %UNICODE(0x2665)%//」
						PRINTFORMDW 艾伦一边这么说着，一边从架子上拿出香和香炉
						PRINTFORMW 「现在開始准备请稍等一下 」
						PRINTFORMDL …
						PRINTFORMW 「呼，这样就准备完了%UNICODE(0x2665)%还有就是等待香味扩散吧 %UNICODE(0x2665)%」
						PRINTFORMDW 在甜美中隐藏着淫靡的香味在艾伦的房间蔓延開来……
						PRINTFORMDW 香味刺激%CALLNAME:MASTER%，理性崩溃，从衣服上面也能明白的位置坚挺耸立着
						PRINTFORMDW 艾伦的脸红了，秘部被爱液浸湿了……
						PRINTFORMW 「……稍微，效果太强了吧/ 不只是%CALLNAME:MASTER%，我也稍微有点奇怪了… //」
						PRINTFORMW 「那么，開始吧/我会让你心情舒畅很多的。 //」
						;初回に限り更に欲望上昇
						ABL:欲望 += 1
						ABL:MASTER:欲望 += 1
						PALAM:欲情 += 20000
						PALAM:潤滑 += 7000
					;二回目以降は%CALLNAME:MASTER%が調合知識を獲得できるまで魔法各種経験を上げている必要あり
					ELSE
						PRINTFORMDW 无意中看了一下架子，那里放着那个时候的香剂。
						$LOOP
						PRINTFORMDL %CALLNAME:MASTER%决定……
						PRINTDL [0] 试着拜托艾伦
						PRINTDL [1] 直接用
						INPUT
						IF RESULT == 0
							PRINTFORMDW %CALLNAME:MASTER%请求艾伦使用那个香…
							IF CFLAG:1008 >= 100 && CFLAG:1009 >= 80 && CFLAG:1010 >= 50
								PRINTFORMW 「嘛，如果是现在的%CALLNAME:MASTER%的话没问题啦，好吧 %UNICODE(0x2665)%」
								PRINTFORMDL …
								PRINTFORMW 「呼，这样就准备完了%UNICODE(0x2665)%还有就是等待香味扩散吧 %UNICODE(0x2665)%」
								PRINTFORMDW 在甜美中隐藏着淫靡的香味在艾伦的房间蔓延開来……
								PRINTFORMDW 虽然香气仍刺激%CALLNAME:MASTER%，但也许是多亏了魔法的锻炼，或是身体习惯了，总之保持了理性
								PRINTFORMDW 艾伦似乎也没有那个时候那么兴奋，但脸红，秘部湿润。
								PRINTFORMW 「那么，開始吧/我会让你心情舒畅很多的。 //」
							ELSEIF CFLAG:1007
								IF FIRSTTIME(1033)
									PRINTFORMW 「不行啊！　%CALLNAME:MASTER%万一出什么事怎么办?！」
									PRINTFORMW 「……真是没办法啊。那麽%CALLNAME:MASTER%作为魔法使能使出某种程度的力量就行了 %UNICODE(0x2665)%」
								ELSE
									PRINTFORMW 「……现在的%CALLNAME:MASTER%应该还不能说完全没问题吧。所以这次就先交还给我吧！  」
									PRINTFORMDW 被艾伦拒绝了……
								ENDIF
								RETURN 1
							ELSE
								PRINTFORMW 「不行啊！　%CALLNAME:MASTER%万一出什么事怎么办?！」
								PRINTFORMDW 被艾伦拒绝了……
								RETURN 1
							ENDIF
						ELSEIF RESULT == 1
							PRINTFORMDW …就当没看见吧
							RETURN 1
						ELSE
							GOTO LOOP
						ENDIF
					ENDIF
					TIME += 10
					PALAM:欲情 += 80000
					PALAM:潤滑 += 8000
					TALENT:MASTER:濃厚精液 = 1
					BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
					BASE:MASTER:精力 = MAXBASE:MASTER:精力
					TCVAR:373 = 1
					ABL:欲望 += 2
					ABL:MASTER:欲望 += 3
				ENDIF
			;软绵绵胸部　？？「どっかで聞いたことがある」
			CASE 1, 2
				;艾倫が普乳以下のときのみ発生
				IF TALENT:胸圍 <= 0
					IF FIRSTTIME(1030)
						PRINTFORMW 「那个，今天带来了好东西 %UNICODE(0x2665)%//」
						PRINTFORMDW 艾伦从怀里拿出了一个装着发光粉末的小瓶子
						PRINTFORMW 「这里面有某种魔法。现在開始要用，稍微去外面等一会哦 」
						PRINTFORMDL %CALLNAME:MASTER%听艾伦的稍微出去了会
						PRINTFORMDL 艾伦准备万无一失地将小瓶子扔出去，两手摆出剪刀放在眼前，
						PRINTFORMDW 「哎」地念了一声咒语
						PRINTFORMDW 于是，光带从放下的小瓶中出现，包裹着艾伦的胸部……
						PRINTFORMDL …
						PRINTFORMDW 光线消失后，%CALLNAME:MASTER%的眼里跳进了两个大欧派
						PRINTFORMW 「哎疼、用了魔法就会这样。　…那么，这个怎么样 %UNICODE(0x2665)%」
;						PRINTFORMDW %CALLNAME:MASTER%像是要吞噬突然巨大化的艾伦的欧派般凝视着…………
						PRINTFORMDW 大小大概只有D杯吧，考虑到本来就等于没有了，真是涨幅之大啊。
						PRINTFORMDW 不知为什么衣服也随着胸部变大了……
						PRINTFORMW 「今天就用这个轻飘飘的胸部让你心情舒畅%UNICODE(0x2665)%//」
					ELSE
						PRINTFORMW 「今天准备了那个魔法%UNICODE(0x2665)%//」
						PRINTFORMDL 这么说来，从怀里取出了装着发光粉的小瓶子，和那时一样。
						PRINTFORMDW 敬请期待 ……
						PRINTFORMDL 艾伦准备万无一失地将小瓶子扔出去，两手摆出剪刀放在眼前，
						PRINTFORMDW 「哎」地念了一声咒语
						PRINTFORMDW 于是，光带从放下的小瓶中出现，包裹着艾伦的胸部……
						PRINTFORMDL …
						PRINTFORMW 「哎呀，脑袋啪嗒啪嗒的~ 」
						PRINTFORMW 「……好，停下了。今天也要用这个轻飘飘的胸部让你变舒服哦 %UNICODE(0x2665)%//」
					ENDIF
					TCVAR:374 = 1
					;胸の尺寸を記憶
					TCVAR:376 = TALENT:胸圍
					TALENT:胸圍 = 1
				ENDIF
			ENDSELECT
			ENDIF
		ENDIF
	ELSEIF (TALENT:恋人 || TALENT:恋慕) && !MARK:反発刻印
		IF FIRSTTIME(1021)
			PRINTFORMW 「我们、H…要做对吗//」
			PRINTFORMW 「因为是第一次所以稍稍有些不安…为了最喜欢的%CALLNAME:MASTER%会努力 %UNICODE(0x2665)%//」
			EXP:愛情経験 += 15
		ELSEIF TALENT:妊娠 && PALAM:欲情 < PALAMLV:10
			PRINTFORMW 「因为对儿童不好，所以不想做…、%CALLNAME:MASTER%非常想要吗//」
			PRINTFORMW 「没办法啊，可以啊…但是…温柔一点 //」
		ELSE
			PRINTFORMW 「那个……H，想做吗//」
			PRINTFORMW 「可以，但是……那个……//温柔一点吧 //」
		ENDIF
	;一定条件を満たしているなら
	ELSEIF TALENT:風騷 || TFLAG:妄想中 == 1 || (MARK:時姦刻印 >= 2 && CFLAG:合意判定 >= 抱き寄せ必要値() - MARK:時姦刻印 * 10) || (MARK:時姦刻印 >= 3 && BASE:理性 < 500) || TALENT:炮友 || TALENT:愛欲
		;FIRSTTIMEを消費させる
		IF FIRSTTIME(1021)
		ENDIF
		CALL TRAIN_MESSAGE
	;いずれも満たしていなければ拒絶される
	ELSEIF TALENT:思慕
		PRINTL 350
		PRINTL 推倒
		DRAWLINE
		CLEARBIT CFLAG:既成事實 , 1
		PRINTFORML %CALLNAME:PLAYER%像中奖了般确认周围没人后一把把艾伦抱住了
		TRYCALLFORM M_KOJO_COLOR_K44
		PRINTFORMW 「等等等等一下！//　你在干什么 ！」
		PRINTFORMDW 艾伦使劲地反抗着……
		$INPUT_LOOP_1
		PRINTDL [0]停止推倒
		PRINTDL [1]继续推倒
		INPUT
		IF RESULT == 0
			PRINTFORMDW %CALLNAME:MASTER%说是玩笑敷衍过去，放手了
			PRINTFORMW 「真是的，作为玩笑的爱好太差了。 」
			TFLAG:不让推倒 ++
			CFLAG:MASTER:诶嘿嘿 = 0
			CFLAG:诶嘿嘿 = 0
			RETURN 1
		ELSEIF RESULT == 1
			PRINTFORMDW %CALLNAME:MASTER%认为艾伦只是感到害羞，就那样持续了行动。
			PRINTFORMW 「所以别继续了！啊——！没办法啊！ 」
			PRINTFORMDW 　　　　　　po
			PRINTFORMW 「哎」
			PRINTFORMDW 　　　　　　boom！
			PRINTFORMDW 　　　　吧唧吧唧吧唧！
			PRINTFORMDW 艾伦使用魔法后产生了大量的静电，向%CALLNAME:MASTER% 袭击了
			PRINTFORMDW %CALLNAME:MASTER%在麻木的间隙，艾伦从%CALLNAME:MASTER%的怀抱中脱离出来……
			;比起带电引起头发的疼痛，对%CALLNAME:MASTER%的愤怒更加强烈
			PRINTFORMW 「没想到%CALLNAME:MASTER%竟然是这种人！」
			PRINTFORMDW 艾伦一边让头发带电一边激怒着 …
			CFLAG:好感度 -= 150
			CFLAG:信賴度 -= 50
			SIF CFLAG:好感度 < 0
			CFLAG:好感度 = 0
			SIF CFLAG:信賴度 < 0
			CFLAG:信賴度 = 0
			PALAM:反感 += 2000
			DOWNBASE:TARGET:体力 += 50
			DOWNBASE:TARGET:気力 += 100
			DOWNBASE:MASTER:体力 += 300
			TFLAG:不让推倒 ++
			CFLAG:MASTER:诶嘿嘿 = 0
			CFLAG:诶嘿嘿 = 0
			RETURN 1
		ELSE
			GOTO INPUT_LOOP_1
		ENDIF
	ELSE
		PRINTL 350
		PRINTL 推倒
		DRAWLINE
		CLEARBIT CFLAG:既成事實 , 1
		PRINTFORML %CALLNAME:PLAYER%像中奖了般确认周围没人后一把把艾伦抱住了
		TRYCALLFORM M_KOJO_COLOR_K44
		PRINTFORMW 「哎呀！我可是要用魔法了！ 」
		PRINTFORMDW 艾伦使劲地反抗着……
		$INPUT_LOOP_2
		PRINTDL [0]停止推倒
		PRINTDL [1]继续推倒
		INPUT
		IF RESULT == 0
			PRINTFORMDL %CALLNAME:MASTER%把艾伦放開了
			PRINTFORMW 「真实的」
			TFLAG:不让推倒 ++
			CFLAG:MASTER:诶嘿嘿 = 0
			CFLAG:诶嘿嘿 = 0
			RETURN 1
		ELSEIF RESULT == 1
			PRINTFORMDW %CALLNAME:MASTER%不在意艾伦的话，就那样持续行为的
			PRINTFORMW 「所以别继续了！啊——！没办法啊！ 」
			PRINTFORMDW 　　　　　　po
			PRINTFORMW 「哎」
			PRINTFORMDW 　　　　　　boom！
			PRINTFORMDW 　　　　吧唧吧唧吧唧！
			PRINTFORMDW 艾伦使用魔法后产生了大量的静电，向%CALLNAME:MASTER% 袭击了
			PRINTFORMDW %CALLNAME:MASTER%在麻木的间隙，艾伦从%CALLNAME:MASTER%的怀抱中脱离出来……
			IF ABL:親密 >= 3
				PRINTFORML 「我没想到你会做这种事 ！」
				PRINTFORMDW 艾伦一边让头发带电一边激怒着 …
			ENDIF
			CFLAG:好感度 -= 200
			CFLAG:信賴度 -= 100
			SIF CFLAG:好感度 < 0
			CFLAG:好感度 = 0
			SIF CFLAG:信賴度 < 0
			CFLAG:信賴度 = 0
			PALAM:反感 += 3000
			DOWNBASE:TARGET:体力 += 50
			DOWNBASE:TARGET:気力 += 100
			DOWNBASE:MASTER:体力 += 300
			TFLAG:不让推倒 ++
			CFLAG:MASTER:诶嘿嘿 = 0
			CFLAG:诶嘿嘿 = 0
			RETURN 1
		ELSE
			GOTO INPUT_LOOP_2
		ENDIF
	ENDIF
ELSEIF TCVAR:烂醉 == 1
	;苏格拉底在看着
	SIF !TALENT:風騷 && RAND:10 > 3
	CFLAG:1667 = DAY:0
ENDIF
RETURN 1
;==================================================
;351,帯出去
;==================================================
@M_KOJO_MESSAGE_COM_K44_351
;連れ出しにはTRAIN_MESSAGEが無い
TRYCALLFORM M_KOJO_COLOR_K44
CALL M_KOJO_MESSAGE_COM_K44_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ && CFLAG:同行 == 60
	IF TCVAR:烂醉 == 1
		PRINTFORMW 「哎？什～么 」
	ELSEIF (PALAM:潤滑 > PALAMLV:2 || TCVAR:371 == 1) && TCVAR:387 < 1 && TALENT:恋慕 && !TALENT:妊娠
		PRINTFORMW 「我知道了//」
	;恋人時専用
	ELSEIF TALENT:恋人 && TALENT:恋慕
		SELECTCASE RAND:2
		CASE 1
			IF TCVAR:355 == -1 || TIME >= 1020 || TIME:5 >= 4 || CFLAG:妊娠経過日数 >= 20 || TALENT:育児中 || !RAND:2
				PRINTFORMW 「好的%UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「啊啦%UNICODE(0x2665)% 难道是约会的邀请？」
			ENDIF
		CASEELSE
			PRINTFORMW 「哦%CALLNAME:MASTER%、今天要做什么？」
		ENDSELECT
	;恋慕時専用
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
		SELECTCASE RAND:2
		CASE 1
			IF TCVAR:355 == -1 || TIME >= 1020 || TIME:5 >= 4 || CFLAG:妊娠経過日数 >= 20 || TALENT:育児中 || !RAND:2
				PRINTFORMW 「好的%UNICODE(0x2665)%」
			ELSE
				PRINTFORMW （或许是约会的邀请吧 %UNICODE(0x2665)%//）
			ENDIF
		CASEELSE
			PRINTFORMW 「你找我有事吧 %UNICODE(0x2665)% 我知道了%UNICODE(0x2665)%」
		ENDSELECT
	;親密５以上時専用
	ELSEIF TALENT:思慕
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「啊啦%UNICODE(0x2665)% 稍微等一会哦%UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「你找我有事吗？　我知道了、要准备稍微等一下哦 %UNICODE(0x2665)%」
		ENDSELECT
	;親密４以下時専用
	ELSE
		PRINTFORMW 「有什么事吗？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;==================================================
@M_KOJO_MESSAGE_COM_K44_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193
		IF TALENT:恋慕
			IF CFLAG:1004 == 1
				PRINTFORMW 「……你终于选择面向我了」
				PRINTFORM 「真開心
			ELSE
				PRINTFORMW 「欸欸！？//　%CALLNAME:MASTER%也喜欢我吗！？//」
				PRINTFORM 「…嗯，我也喜欢%CALLNAME:MASTER% //　真開心
			ENDIF
			PRINTFORMW %UNICODE(0x2665)%//　…哎%UNICODE(0x2665)%」
			PRINTFORMDL 终于互诉爱情的艾伦，不能压制喜悦满面的露出笑容%CALLNAME:MASTER%抱住了
			PRINTFORMDW %CALLNAME:MASTER%温柔地抱了回去…
			PRINTFORMW 「欸嘿嘿%UNICODE(0x2665)%　今后请多多指教%UNICODE(0x2665)% %CALLNAME:MASTER%%UNICODE(0x2665)%%UNICODE(0x2665)%」
			PRINTFORMDL ………
			PRINTFORMDL ……
			PRINTFORMDW …
		;恋慕無で告白なんてそんなオカルト…でもないね！
		ELSE
			PRINTFORMW 「诶？//　%CALLNAME:MASTER%居然喜欢我吗！？//」
			SIF CFLAG:1014 == 1
			PRINTFORMW （嘛、不会喜欢的话就不会亲吻了//）
			PRINTFORMW 「…%CALLNAME:MASTER%的话…嘛、好啊//」
			PRINTFORMW 「所以…、今后请多多指教啦%UNICODE(0x2665)%//」
			PRINTFORMDL ……
			PRINTFORMDW …
		ENDIF
		;恋人獲得とともに害羞が消える
		TALENT:羞恥心 = 0
		CFLAG:1014 = 0
		TALENT:心情 = 1
	ELSE
		PRINTFORMW 「？　怎么了？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;353,猥褻
;==================================================
@M_KOJO_MESSAGE_COM_K44_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_353_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_353_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
CFLAG:1891 = 1
IF LOCAL

ENDIF
RETURN 1
;==================================================
;354,陪睡（相手は起きて被窝に招く感じ）
;==================================================
@M_KOJO_MESSAGE_COM_K44_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ
	TCVAR:363 = 1
	;恋人時専用
	IF TALENT:恋人
		PRINTFORMW 「想和我一起睡吗，当然可以啊%UNICODE(0x2665)% 进来吧%UNICODE(0x2665)% %CALLNAME:MASTER%%UNICODE(0x2665)%%UNICODE(0x2665)%」
	;恋慕時専用
	ELSEIF TALENT:恋慕
		PRINTFORMW 「诶//要要要要和我一起睡吗//　…好啊//」
	ENDIF
ENDIF
RETURN 1
;==================================================
;360,任憑擺佈
;==================================================
@M_KOJO_MESSAGE_COM_K44_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_360_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;363,朗読（[幼稚]持ち）
;==================================================
@M_KOJO_MESSAGE_COM_K44_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_363_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;402,就寝（添い寝時）
;==================================================
@M_KOJO_MESSAGE_COM_K44_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K44_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ && !CFLAG:睡眠 && PREVCOM != 311 && TFLAG:193 != 1
	;添い寝分岐
	TRYCALLFORM M_KOJO_COLOR_K44
	IF TCVAR:363 == 1 || (CFLAG:MASTER:招待 && !VISIT(44))
		;恋人時専用
		IF TALENT:恋人
			PRINTFORMW 「已经睡了吗？那我也一起睡吧 %UNICODE(0x2665)%　晚安%UNICODE(0x2665)%」
		;恋慕時専用
		ELSEIF TALENT:恋慕
			PRINTFORMW 「已经睡着了…那我也一起睡吧 %UNICODE(0x2665)%　晚安//」
		ENDIF
	ELSE
		;恋人時専用
		IF TALENT:恋人
			PRINTFORMW 「已经睡了吗？那么明天见 %UNICODE(0x2665)%　晚安%UNICODE(0x2665)% %CALLNAME:MASTER%%UNICODE(0x2665)%」
		;恋慕時専用
		ELSEIF TALENT:恋慕
			PRINTFORMW 「已经睡着了…我明白了 、晚安啦//」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;403,休憩
;==================================================
@M_KOJO_MESSAGE_COM_K44_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_403_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会に外出
;==================================================
@M_KOJO_MESSAGE_COM_K44_405
;外出にTRAIN_MESSAGEは無い
TRYCALLFORM M_KOJO_COLOR_K44
CALL M_KOJO_MESSAGE_COM_K44_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ
	IF !CFLAG:同行
		;恋人かつ住宿時専用
		IF TALENT:恋人 && FLAG:住宿人物 == 44
			IF DAY:3 == 15 || DAY:3 == 30
				PRINTFORMW 「路上小心%UNICODE(0x2665)%」
			ELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「路上小心%UNICODE(0x2665)% 回来后一起做点什么吧。 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「哎呀，难道你要出去了吗？」
					PRINTFORMW 「虽然我也想跟着你……算了，路上小心%UNICODE(0x2665)%」
				ENDSELECT
			ENDIF
		;恋人かつ恋慕時専用
		ELSEIF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「哎呀，难道你要出去了吗？」
			PRINTFORMW 「虽然我也想跟着你……算了，路上小心%UNICODE(0x2665)%」
		;恋慕or準恋慕or恋人時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「路上小心%UNICODE(0x2665)%」
		;思慕時専用
		ELSEIF TALENT:思慕
			PRINTFORMW 「啊呀呀、%CALLNAME:MASTER%是本来打算现在出门的吗」
			PRINTFORMW 「那我就在这里等着你 」
		ENDIF
	ELSE
		IF FIRSTTIME(SELECTCOM)
			IF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
				PRINTFORMDW %CALLNAME:MASTER%邀请艾伦参加约会
				PRINTFORMW 「诶，想跟我约会吗？」
				PRINTFORMW 「当然可以啦%UNICODE(0x2665)%　那就、出发咯%UNICODE(0x2665)%」
			ENDIF
			IF TALENT:恋人 && TALENT:恋慕
				PRINTFORMW 「第一次的约会，让我们好好享受吧 %UNICODE(0x2665)%%UNICODE(0x2665)%」
				PRINTFORMDW 与对初约会非常兴奋的艾伦一起，%CALLNAME:MASTER%開始朝着约会目的地前进…
			ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
				PRINTFORMW （哇！%UNICODE(0x2665)% 真棒%UNICODE(0x2665)%//　从%CALLNAME:MASTER%那收到约会邀请了%UNICODE(0x2665)%）
				PRINTFORMDW 与红着脸的艾伦一起，%CALLNAME:MASTER%開始向着约会场的方向前进…
			ELSE
				IF TALENT:思慕
					PRINTFORMW 「想要和我一起出门吗、当然可以啊%UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「两个人出去吗？嘛，也行吧反正很闲%UNICODE(0x2665)%」
				ENDIF
				PRINTFORMDW 得到艾伦的同意后%CALLNAME:MASTER%和艾伦一起向着目的地出发了
			ENDIF
		;恋人かつ恋慕時専用
		ELSEIF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「那么出发吧 %UNICODE(0x2665)%%UNICODE(0x2665)%」
		;恋慕or準恋慕or恋人時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「想要和我一起出门吗、当然可以啊%UNICODE(0x2665)%//」
			PRINTFORMW （哇！%UNICODE(0x2665)% 真棒%UNICODE(0x2665)%//　从%CALLNAME:MASTER%那收到约会邀请了%UNICODE(0x2665)%）
		;思慕時専用
		ELSEIF TALENT:思慕
			PRINTFORMW 「想要和我一起出门吗、当然可以啊%UNICODE(0x2665)%」
		;親密４以下時専用
		ELSE
			PRINTFORMW 「两个人出去吗？嘛，也行吧反正很闲%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;==================================================
@M_KOJO_MESSAGE_COM_K44_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠 && !CFLAG:诶嘿嘿
	;扫雪
	IF OUTROOF(CFLAG:MASTER:現在位置) && DAY:2 == 4
		SELECTCASE TFLAG:194
		CASE 0, 1
			PRINTFORMW 「都扫这么多了没问题了吧？」
		CASE 2, 3
			PRINTFORMW 「呼，稍微休息一下吧 」
		ENDSELECT
	ELSE
		SELECTCASE TFLAG:194
		CASE 0
			PRINTFORMW 「这么干净就足够了 」
		CASE 1
			PRINTFORMW 「呼%UNICODE(0x2665)%　收拾好了吧？」
		CASE 2
			PRINTFORMW 「咳咳　还得收拾一下呢 」
		CASE 3
			PRINTFORMW 「咳！咳！　怎么搞得稍稍一放任不管就沾满了灰尘呢」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;==================================================
@M_KOJO_MESSAGE_COM_K44_411
;魔法の実技が可能だと地の文無し
SIF CFLAG:1011 == 0
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;LOCAL:1 判定用
;LOCAL:2 成功or失敗記録用
;LOCAL:3 魔法のランク
IF LOCAL && !FLAG:70
	;弟子入り時
	IF CFLAG:1007 && CFLAG:1011 && CFLAG:MASTER:現在位置 != TFLAG:宴会場
		$LOOP_KUNREN
		PRINTFORML 现在还可以展示魔法
		PRINTL [1] 魔法
		PRINTL [2] 弾幕
		INPUT
	ENDIF
	IF RESULT == 1
		;開始時に前回の分をリセットする
		LOCAL:2 = 0
		;判定用の変数を入れておく
		LOCAL:1 = CFLAG:1008 + CFLAG:1009 + (CFLAG:1010 * 2)
		TRYCALLFORM M_KOJO_COLOR_K44
		PRINTFORMW 「那么，让你们看看学习的成果 %UNICODE(0x2665)%」
		RESETCOLOR
		IF CFLAG:1008 > 220
			;魔法のランクに合わせてRANDを追加
			LOCAL:1 += RAND:80
			$LOOP_200
			;魔法のランクを記録
			LOCAL:3 = 5
			PRINTFORML 使用哪个魔法呢 …
			PRINTL [0] 烟魔法（清掃技能补正）
			PRINTL [1] 没有质量的龙的实体化 （教養补正）
			PRINTL [2] 利用冰的结晶演奏的魔法（音楽技能补正）
			;PRINTL [3] 魔法決戦！
			PRINTL [9] 其他魔法
			INPUT
			IF RESULT == 0
				PRINTFORMW %CALLNAME:MASTER%使用了变成烟的魔法
				;清掃技能に応じて補正
				LOCAL:1 += (ABL:MASTER:清掃技能 * 10)
				IF LOCAL:1 >= 820
					PRINTFORMW %CALLNAME:MASTER%的身体变成了烟状！成功了！
					;学習経験が低いと戻れない、追加されるだけで特に何もないけど
					IF CFLAG:1008 < 250
						PRINTFORMW ……却无法恢复原状…
						PRINTFORMW …
						PRINTFORMW 看不下去的艾伦想方设法帮感到为难%CALLNAME:MASTER%解决了
						;成功判定（煙）
						LOCAL:2 = 2
					ELSE
						;成功判定
						LOCAL:2 = 1
					ENDIF
				ELSE
					PRINTFORMW ……似乎没有变化…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 1
				;艾倫以外にもいると不可
				IF GET_TARGETNUM() > 1
					PRINTFORMW ……现在还有人在，很危险，还是别做了
					GOTO LOOP_200
				ELSE
					PRINTFORMW %CALLNAME:MASTER%使用了没有质量的龙的实体化的魔法
					;教養に応じて補正
					LOCAL:1 += (ABL:MASTER:教養 * 10)
					IF LOCAL:1 >= 850
						PRINTFORMW 梦幻之龙被召唤到眼前！成功了！
						;実技経験が低いと制御不能、分岐されるだけで特に何もないけど
						IF CFLAG:1009 < 200
							PRINTFORMW ……可以召唤，但不能控制。怎么办……
							PRINTFORMW …
							PRINTFORMW 看不下去的艾伦想方设法帮感到为难%CALLNAME:MASTER%解决了
							;成功判定（ドラゴン）
							LOCAL:2 = 3
						ELSE
							;いろいろとごめんなさい
							LOCAL:1 = 0
							PRINTFORMW 龙似乎正在等待%CALLNAME:MASTER%的指示……
							$LOOP_DORAGON
							PRINTFORML 要做什么呢…
							PRINTL [0] 没什么要做的,让它回去吧
							SIF LOCAL:1 == 0
							PRINTL [1] 坐到它背上
							SIF LOCAL:2 == 0
							PRINTL [2] 袭击博丽神社！
							INPUT
							IF RESULT == 0
								PRINT 也没有特别想做的事
								SIF LOCAL:1 == 0 && LOCAL:2 == 0
								PRINT 什么也不做
								PRINTW 决定让它回去了
							ELSEIF RESULT == 1 && LOCAL:1 == 0
								PRINTFORMW %CALLNAME:MASTER%兴高采烈地想要骑在龙的背上飞翔
								PRINTFORMW ……因为是幻影怎么可能骑得上啊…
								LOCAL:1 = 1
								GOTO LOOP_DORAGON
							ELSEIF RESULT == 2 && LOCAL:2 == 0
								PRINTFORMW ……那样做会危及自己的生命的
								PRINTFORMW %CALLNAME:MASTER%颤抖地停下了想法
								LOCAL:2 = 1
								GOTO LOOP_DORAGON
							ELSE
								GOTO LOOP_DORAGON
							ENDIF
							;成功判定
							LOCAL:2 = 1
						ENDIF
					ELSE
						PRINTFORMW ……什么也没发生…
						;失敗判定
						LOCAL:2 = 0
					ENDIF
				ENDIF
			ELSEIF RESULT == 2
				PRINTFORMW %CALLNAME:MASTER%使用了利用冰的结晶演奏的魔法
				;まずは結晶の判定
				IF LOCAL:1 >= 650
					PRINTFORMW 四方空气中的水分聚集，形成了巨大的冰的结晶！
					;音楽技能に応じて補正
					LOCAL:1 += (ABL:MASTER:音楽技能 * 15)
					SIF TALENT:MASTER:音楽知識
					LOCAL:1 += 30
					SIF TALENT:MASTER:音感
					LOCAL:1 += (TALENT:MASTER:音感 * 50)
					IF LOCAL:1 >= 820
						PRINTFORMW 结晶震动了空气，演奏了「双头鹫的旗下」！成功了！
						;成功判定
						LOCAL:2 = 1
					ELSE
						PRINTFORMW 但是没有声音 …
						;失敗判定
						LOCAL:2 = 0
					ENDIF
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 9
				GOTO LOOP_150
			ELSE
				GOTO LOOP_200
			ENDIF
		ELSEIF CFLAG:1008 > 170
			;魔法のランクに合わせてRANDを追加
			LOCAL:1 += RAND:60
			$LOOP_150
			;魔法のランクを記録
			LOCAL:3 = 4
			PRINTFORML 使用哪个魔法呢 …
			PRINTL [0] 激光魔法 （教养和战斗补正）
			PRINTL [1] 高速弹的魔法（清扫和战斗补正）
			PRINTL [2] 在空中飞翔的魔法
			PRINTL [9] 其他魔法
			INPUT
			IF RESULT == 0
				PRINTFORMW %CALLNAME:MASTER%集中精力了 …
				;教養と戦闘能力に応じて補正
				LOCAL:1 += (ABL:MASTER:教養 * 10) + (ABL:MASTER:戦闘能力 * 30)
				IF LOCAL:1 >= 680
					PRINTFORMW 漂亮地连续发射了激光 ！
					;成功判定
					LOCAL:2 = 1
				ELSEIF LOCAL:1 >= 600
					PRINTFORMW 虽然只有一发但可以发射激光了
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没出来…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 1
				PRINTFORMW %CALLNAME:MASTER%集中精力了 …
				;清掃技能と戦闘能力に応じて補正
				LOCAL:1 += (ABL:MASTER:清掃技能 * 10) + (ABL:MASTER:戦闘能力 * 30)
				IF LOCAL:1 >= 680
					PRINTFORMW 出色地连射了高速子弹 ！
					;成功判定
					LOCAL:2 = 1
				ELSEIF LOCAL:1 >= 600
					PRINTFORMW 虽然只有一发但可以发射高速弹了
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 2
				PRINTFORMW %CALLNAME:MASTER%使用了在空中飞翔的魔法
				IF LOCAL:1 >= 550
					PRINTFORML 于是%CALLNAME:MASTER%的身体漂浮在空中！成功了
					PRINTFORMW 空中漂浮的%CALLNAME:MASTER%就这样享受了空中之旅 …
					;時間経過
					TIME += 15
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 9
				GOTO LOOP_100
			ELSE
				GOTO LOOP_150
			ENDIF
		ELSEIF CFLAG:1008 > 120
		;魔法のランクに合わせてRANDを追加
			LOCAL:1 += RAND:80
			$LOOP_100
			;魔法のランクを記録
			LOCAL:3 = 3
			PRINTFORML 使用哪个魔法呢 …
			PRINTL [0] 做点心的魔法
			PRINTL [1] 静电魔法 (強)
			PRINTL [2] 風魔法(強)
			;SIF CFLAG:1008 <= 230
			;PRINTL [3] 对魔法的训练
			;在空中飞翔的魔法是下个等级的，如果没有东西能使用就没有
			SIF CFLAG:1008 <= 180
			PRINTL [4]骑在扫帚上飞翔的魔法
			PRINTL [9] 其他魔法
			INPUT
			IF RESULT == 0
				PRINTFORMW %CALLNAME:MASTER%对稍微烧焦的曲奇使用魔法
				;料理技能に応じて補正
				LOCAL:1 += (ABL:MASTER:料理技能 * 20)
				IF LOCAL:1 >= 450
					PRINTFORMW 曲奇烧焦的部分没有了，变成生的了，再把这个稍微烤一下就能做出好吃的曲奇了。 ！
					;成功判定（曲奇）
					LOCAL:2 = 2
				ELSE
					PRINTFORMW ……曲奇什么变化都没有…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 1
				PRINTFORMW %CALLNAME:MASTER%使用了强大的静电魔法
				;教養に応じて補正
				LOCAL:1 += (ABL:MASTER:教養 * 10)
				IF LOCAL:1 >= 450
					PRINTFORMW 法杖头端啪嗒啪嗒地闪着光，成功了！
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 2
				PRINTFORMW %CALLNAME:MASTER%将强风的魔法对着叶子使用
				;清掃技能に応じて補正
				LOCAL:1 += (ABL:MASTER:清掃技能 * 10)
				IF LOCAL:1 >= 450
					PRINTFORMW 叶子随风飞扬，很成功！
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……叶子好像没有变化 …
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			;ELSEIF RESULT == 3
			;
			ELSEIF RESULT == 4
				PRINTFORMW %CALLNAME:MASTER%对扫帚使用飞翔的魔法
				;因为咒语很长，所以时间流逝，比原来的时间流逝量下降了
				TIME += 30
				PRINTFORMW ♪～～♪～
				PRINTFORMW ♪♪！～～
				PRINTFORMW …
				IF LOCAL:1 >= 410
					PRINTFORMW 念完咒语后，扫帚便会浮现在%CALLNAME:MASTER%的身体前面！成功了！
					PRINTFORMW …只是，离地面只有30厘米左右…
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW …什么也没发生……好像是念错咒文了……
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 9
				GOTO LOOP_60
			ELSE
				GOTO LOOP_100
			ENDIF
		ELSEIF CFLAG:1008 > 80
			;魔法のランクに合わせてRANDを追加
			LOCAL:1 += RAND:60
			$LOOP_60
			;魔法のランクを記録
			LOCAL:3 = 2
			PRINTFORML 使用哪个魔法呢 …
			PRINTL [0] 香草精华的魔法
			PRINTL [1] 音乐的魔法
			PRINTL [2] 静電魔法(弱)
			PRINTL [3] 風魔法(弱)
			PRINTL [9] 其他魔法
			INPUT
			IF RESULT == 0
				PRINTFORMW %CALLNAME:MASTER%对叶子中使用了香草精华的魔法
				;料理技能に応じて補正
				LOCAL:1 += (ABL:MASTER:料理技能 * 20)
				IF LOCAL:1 >= 300
					PRINTFORMW 叶子发出甜味，好像成功了
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……叶子好像没有变化 …
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 1
				PRINTFORMW %CALLNAME:MASTER%使用音乐的魔法
				;音楽技能に応じて補正
				LOCAL:1 += (ABL:MASTER:音楽技能 * 15)
				SIF TALENT:MASTER:音楽知識
				LOCAL:1 += 30
				SIF TALENT:MASTER:音感
				LOCAL:1 += (TALENT:MASTER:音感 * 50)
				IF LOCAL:1 >= 260
					PRINTFORMW 空气振动，演奏了「为了艾丽泽」，好象成功了
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 2
				PRINTFORMW %CALLNAME:MASTER%使用了静电魔法
				;教養に応じて補正
				LOCAL:1 += (ABL:MASTER:教養 * 10)
				IF LOCAL:1 >= 300
					PRINTFORMW 法杖带了点电，好像成功了
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 3
				PRINTFORMW %CALLNAME:MASTER%对叶子使用了风魔法
				;清掃技能に応じて補正
				LOCAL:1 += (ABL:MASTER:清掃技能 * 10)
				IF LOCAL:1 >= 300
					PRINTFORMW 叶子随风飘动，好像成功了。
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……叶子好像没有变化 …
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 9
				GOTO LOOP_30
			ELSE
				GOTO LOOP_60
			ENDIF
		ELSEIF CFLAG:1008 > 40
			;魔法のランクに合わせてRANDを追加
			LOCAL:1 += RAND:30
			$LOOP_30
			;魔法のランクを記録
			LOCAL:3 = 1
			PRINTFORML 使用哪个魔法呢 …
			PRINTL [0] 照明的魔法
			PRINTL [1] 音阶的魔法
			PRINTL [2] 薄荷香气的魔法
			INPUT
			IF RESULT == 0
				PRINTFORMW %CALLNAME:MASTER%使用了照明的魔法
				;教養に応じて補正
				LOCAL:1 += (ABL:MASTER:教養 * 10)
				IF LOCAL:1 >= 90
					PRINTFORMW 法杖尖微微亮起了灯光，看来是成功了。
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 1
				PRINTFORMW %CALLNAME:MASTER%使用了音阶的魔法
				;音楽技能に応じて補正
				LOCAL:1 += (ABL:MASTER:音楽技能 * 15)
				SIF TALENT:MASTER:音楽知識
				LOCAL:1 += 30
				SIF TALENT:MASTER:音感
				LOCAL:1 += (TALENT:MASTER:音感 * 50)
				IF LOCAL:1 >= 80
					PRINTFORMW 周围响起了“d”的声音，看来是成功了。
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSEIF RESULT == 2
				PRINTFORMW %CALLNAME:MASTER%使用了薄荷香气的魔法
				;料理技能に応じて補正
				LOCAL:1 += (ABL:MASTER:料理技能 * 20)
				IF LOCAL:1 >= 80
					PRINTFORMW 周围弥漫着薄荷香味，看来是成功了。
					;成功判定
					LOCAL:2 = 1
				ELSE
					PRINTFORMW ……什么也没发生…
					;失敗判定
					LOCAL:2 = 0
				ENDIF
			ELSE
				GOTO LOOP_30
			ENDIF
		ENDIF
		TRYCALLFORM M_KOJO_COLOR_K44
		;後処理
		IF LOCAL:2 >= 1
			CFLAG:1009 += 1
			IF LOCAL:3 == 5
				;煙用
				IF LOCAL:2 == 2
					PRINTFORMW 「为了下次能够靠自己的力量恢复原样，先学好知识再挑战吧 」
				;ドラゴン用
				ELSEIF LOCAL:2 == 3
					PRINTFORMW 「哎呀……为了下次能够自己控制，积累锻炼之后再挑战吧」
				ELSE
					PRINTFORMW 「没想到会进步到这种程度，太棒了。 %UNICODE(0x2665)% %CALLNAME:MASTER%%UNICODE(0x2665)%%UNICODE(0x2665)%」
				ENDIF
				CFLAG:1010 += 3
			ELSEIF LOCAL:3 == 4
				PRINTFORMW 「厉害 %UNICODE(0x2665)%　如果能做到这里已经是很棒的魔法使了 %UNICODE(0x2665)%」
				CFLAG:1010 += 2
			ELSEIF LOCAL:3 == 3
				PRINTFORMW 「感觉不错 %CALLNAME:MASTER%%UNICODE(0x2665)%　以这样的状态加油吧 %UNICODE(0x2665)%」
				CFLAG:1010 += 2
				;曲奇用、艾倫が住み込んでいるか艾倫宅に住み込んでいる時に50%の確率で発生
				IF (FLAG:住宿人物 == 44 || 拠点_家主 == 44) && LOCAL:2 == 2 && RAND:2 == 1
					PRINTFORMDL 看来艾伦把练习魔法时使用的曲奇烤了
					;廚房に宝珠ンは…ないよね？
					PRINTFORMDW 为了曲奇而前往艾伦的小屋
					PRINTFORMW 「这样就行了 %UNICODE(0x2665)%　曲奇烤好了就喝茶吧 %UNICODE(0x2665)%」
					PRINTFORMDW %CALLNAME:MASTER%和艾伦度过了优雅的时光……
					BASE:MASTER:体力 = MIN(BASE:MASTER:体力 + 400 , MAXBASE:MASTER:体力)
					BASE:MASTER:気力 = MIN(BASE:MASTER:気力 + 300 , MAXBASE:MASTER:気力)
					BASE:体力 = MIN(BASE:体力 + 400 , MAXBASE:体力)
					BASE:気力 = MIN(BASE:気力 + 300 , MAXBASE:気力)
					IF FLAG:住宿人物 == 44
						CFLAG:現在位置 = 16
						CFLAG:MASTER:現在位置 = 16
					ELSE
						CFLAG:現在位置 = 534
						CFLAG:MASTER:現在位置 = 534
					ENDIF
					TIME += 20
				ENDIF
			ELSEIF LOCAL:3 == 2
				PRINTFORMW 「很擅长哦 %CALLNAME:MASTER%%UNICODE(0x2665)%　以这样的状态加油吧 %UNICODE(0x2665)%」
				CFLAG:1010 += 1
			ELSEIF LOCAL:3 == 1
				PRINTFORMW 「很擅长哦 %CALLNAME:MASTER%%UNICODE(0x2665)%　以这样的状态加油吧 %UNICODE(0x2665)%」
				CFLAG:1010 += 1
			ENDIF
			;魔水晶垂飾が那个ば３分の１の確率で更に＋される
			IF ITEM:399 && RAND:3 == 2
				PRINTFORMDL 总觉得比平时更加顺利 …
				CFLAG:1009 += 1
			ENDIF
			CALL M_KOJO_MESSAGE_EVENT_K44_MAGIC
		ELSE
			PRINTFORMW 「哎呀，失败了…不过还有很长的路可以走哦%UNICODE(0x2665)%…那么，练习吧 %UNICODE(0x2665)%」
			PRINTFORMDW %CALLNAME:MASTER%向艾伦请教魔法
			CFLAG:1009 += 1
		ENDIF
	ELSEIF RESULT == 2 || CFLAG:1007 == 0
		SIF CFLAG:1011 == 1
		CALL TRAIN_MESSAGE
	ELSE
		GOTO LOOP_KUNREN
	ENDIF
ENDIF
RETURN 1
;==================================================
;412,学习
;==================================================
@M_KOJO_MESSAGE_COM_K44_412
;弟子入りしていると地の文無し
SIF CFLAG:1007 == 0
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;弟子入り時
	IF CFLAG:1007 == 1
		;RANDを記録させておく
		LOCAL:1 = RAND:5
		;まずは地の文
		PRINTFORM %CALLNAME:MASTER%向艾伦请教
		IF CFLAG:1012 == 6
			SELECTCASE LOCAL:1
			CASE 1, 2
				PRINT 复杂的魔法
			CASEELSE
				PRINT 复杂的调和
			ENDSELECT
		ELSEIF CFLAG:1012 == 5
			SELECTCASE LOCAL:1
			CASE 1, 2
				PRINT 本格的魔法
			CASEELSE
				PRINT 本格的调和
			ENDSELECT
		ELSEIF CFLAG:1012 == 4
			SELECTCASE LOCAL:1
			CASE 1, 2
				PRINT 难的魔法
			CASE 3, 4
				PRINT 难的調合
			CASEELSE
				PRINT 魔法使的心得
			ENDSELECT
		ELSEIF CFLAG:1012 == 3
			SELECTCASE LOCAL:1
			CASE 1, 2
				PRINT 基本的魔法
			CASE 3, 4
				PRINT 基本的調合
			CASEELSE
				PRINT 魔法使的知恵
			ENDSELECT
		ELSEIF CFLAG:1012 == 1 || CFLAG:1012 == 2
			SELECTCASE LOCAL:1
			CASE 1, 2
				PRINT 簡単的魔法
			CASE 3, 4
				PRINT 簡単的調合
			CASEELSE
				PRINT 魔法使的心得
			ENDSELECT
		ELSE
			PRINT 魔法的基礎
		ENDIF
		PRINTL を教えてもらった
		;5%の確率で大成功or失敗。大成功時は更に＋１、失敗時は０
		LOCAL:2 = RAND:100
		IF LOCAL:2 >= 95
			IF CFLAG:1008 > 100
				PRINTFORML 艾伦对%CALLNAME:MASTER%的知识很满意
			ELSE
				PRINTFORML 艾伦的指导很有帮助
			ENDIF
			CFLAG:1008 += 1
		ELSEIF LOCAL:2 <= 4
			PRINTFORML …不太明白
		ENDIF
		;次に艾倫の台詞
		TRYCALLFORM M_KOJO_COLOR_K44
		IF CFLAG:1012 >= 6
			SELECTCASE LOCAL:1
			CASE 1, 2
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「今天教你变成烟的魔法%UNICODE(0x2665)%因为很难所以要好好听我说 」
				CASE 2
					;ポリンが好きな那个
					PRINTFORMW 「今天解答很难的%UNICODE(0x2665)%　没有质量的龙的实体化的魔法%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「那么，如果做好了冰的结晶，之后会因为空气的震动而发出声音，你知道吗？」
				ENDSELECT
			CASEELSE
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「再这样做……制作更强有力的避邪结界的魔法完成 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「角要好好地粉碎做成粉末状。哪怕只剩下一点形状也不行哦 」
				CASE 3
					PRINTFORMW 「要高效率地量产魔法药—— 」
				CASEELSE
					PRINTFORMW 「这次的内容是使用很难的素材的方法 %UNICODE(0x2665)%」
				ENDSELECT
			ENDSELECT
		ELSEIF CFLAG:1012 == 5
			SELECTCASE LOCAL:1
			CASE 1, 2
				SELECTCASE RAND:9
				CASE 1, 2
					PRINTFORMW 「强有力的激光射击方法――」
				CASE 3, 4
					PRINTFORMW 「要连射高速子弹—— 」
				CASE 5, 6
					PRINTFORMW 「在弹幕中要有效利用魔法阵—— 」
				CASE 7, 8
					PRINTFORMW 「这次教你更高级的飞行魔法 %UNICODE(0x2665)%」
				;捨食・捨虫はちょいレア
				CASEELSE
					PRINTFORMW 「这次教你长生不老的魔法。因为是很重要的事情所以要好好听哦 」
					PRINTFORMW 「为了长生不老，有必要学会“舍食魔法”和“舍虫魔法” 」
					PRINTFORML 「首先是舍食魔法，这是人类成为魔法使的魔法 、
					PRINTFORMW 　即使不吃饭也可以用魔力生存下去的魔法 」
					PRINTFORML 「其次舍虫魔法哟，由于学会这个会让身体的成长停止
					PRINTFORMW 　作为交换，可以长生不老 」
					PRINTFORML 「对了对了，两个魔法都是施过一次就不能解除。
					PRINTFORML 　所以真的要成为魔法使吗，会一直是这样的身子可以吗？
					PRINTFORML 　好好决定后再用」
					PRINTFORMW 「嘛，现在的%CALLNAME:MASTER%应该没问题吧 」
					PRINTFORML 「我用的时候怎么样？其实我没有使用舍虫的魔法 」
					PRINTFORMW 「但是从很早以前就保持这个姿态，为什么呢？ 」
				ENDSELECT
			CASEELSE
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「再这样做……制造驱魔结界的魔法成功%UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「为了高效地推进协调—— 」
				CASE 3
					PRINTFORMW 「更强力的驱除诅咒的魔法的制作方法呢―― 」
				CASEELSE
					PRINTFORMW 「这里这样，那里那样哦」
				ENDSELECT
			ENDSELECT
		;これも艾倫は魔法を使ってないため特に無し
		ELSEIF CFLAG:1012 == 4
			SELECTCASE LOCAL:1
			CASE 1, 2
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「这是波拉利斯结界，使用魔法的话里面的波拉利斯会旋转吸收附近的魔力 」
					PRINTFORMW 「魔法生物一靠近它，就会产生厌恶的情緒，所以不会靠近它。」
					PRINTFORMW 「止住方法很简单，只是用手指停下旋转的波拉利斯就行 %UNICODE(0x2665)%」
					PRINTFORMW 「对了对了，只要不停止，就能不断地旋转吸取魔力，这点需要注意 」
				CASE 2
					PRINTFORMW 「今天教你如何对抗敌人的魔法 %UNICODE(0x2665)%」
					PRINTFORMW 「首先要看清对方的魔法是怎样的，如果不知道对方的魔法是怎样的，就无法防御 」
					PRINTFORMW 「接下来要根据对手的魔法采取相应的对抗策略，如果是攻击魔法的话用防御魔法来防御！如果是幻影就把它消除！」
					PRINTFORMW 「如果对方是高手的话，也有什么都不好用的时候……那也比什么都不做强 」
				;ごめんうえのうそ
				CASE 3
					PRINTFORMW 「做点心失败是常有的事，这种时候有用的就是今天教你的魔法哟 %UNICODE(0x2665)%」
					PRINTFORMDL 艾伦把带来的包拿出来打開
					PRINTFORMDW 里面有像饼干一样破碎的奶油泡芙皮……
					PRINTFORMW 「就这样……哎」
					PRINTFORMDW 　boom
					PRINTFORMDW 艾伦使用魔法后，破碎的奶油泡芙皮稍微膨胀了。
					PRINTFORMW 「再把这个烤一下……啊、痛死了！这种魔法都带电我真是厉害啊 」
					PRINTFORMW 「…终于平息了。那么，好不容易做好的奶油泡芙就喝茶吧 %UNICODE(0x2665)%」
					BASE:MASTER:体力 = MIN(BASE:MASTER:体力 + 200 , MAXBASE:MASTER:体力)
					BASE:MASTER:気力 = MIN(BASE:MASTER:気力 + 200 , MAXBASE:MASTER:気力)
					BASE:体力 = MIN(BASE:体力 + 200 , MAXBASE:体力)
					BASE:気力 = MIN(BASE:気力 + 200 , MAXBASE:気力)
				CASEELSE
					PRINTFORMW 「今天就等着吧！我会教你飞翔在空中的魔法%UNICODE(0x2665)%好好听我说 %UNICODE(0x2665)%」
					PRINTFORMW 「嘛，虽说是在空中飞翔的魔法，但这是像入门一样的东西，所以不能飞得太高，有时也会掉下来。 」
					PRINTFORMW 「而且对现在的%CALLNAME:MASTER%的来说是相当长的咒语呢…不过，只要努力去做，就能在天空中自由地飞翔了。 %UNICODE(0x2665)%」
				ENDSELECT
			CASE 3, 4
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「这次是放出让龙讨厌的臭味的魔法哟 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「――充分混合，然后念咒语就能飞上天空的魔法 %UNICODE(0x2665)%」
					PRINTFORMW 「如果使用这个的话即使不念那个长的咒语也没关系%UNICODE(0x2665)%…但是，制作魔法的咒语要花1小时左右。 」
				CASE 3
					PRINTFORMW 「这样做的话…解咒的魔法完成哟%UNICODE(0x2665)%ささ、%CALLNAME:MASTER% %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「――之后，就只是一味地搅拌就好%UNICODE(0x2665)%　只是搅拌就好」
				ENDSELECT
			CASEELSE
				SELECTCASE RAND:3
				CASE 1
					;ドラゴンは幻想入りしているのだろうか
					PRINTFORMW 「说起鱼腥味又大的生物就是龙 」
					PRINTFORMW 「龙的力量很强，从嘴里吐出火焰，而且智力也很高。 」
					PRINTFORMW 「嘛，虽然根据种族的不同，也有不是那么好战的，不惹火的话没什么问题。 」
				CASE 2
					PRINTFORMW 「阻碍魔法之一就是用魔法使五官发狂而迷惑的东西 」
					PRINTFORMW 「虽然看起来很麻烦，但是自己破坏蔷薇的话，就能消除魔法的效力 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「%CALLNAME:MASTER%想要使魔吗？这次就教你使魔吧 %UNICODE(0x2665)%」
					PRINTFORMW 「说到使魔基本上是猫吧。苏格拉底 」
					PRINTFORMDW …
					PRINTFORMDW 喵喵
					PRINTFORMW 「好，稍稍到这里来一下。那么，首先重要的事，要成为使魔成为素质是必要的 」
					PRINTFORMW 「是啊，说到猫，大概540只中有1只左右的概率，具有使魔的素质。 」
					PRINTFORML 「接下来是和使魔接触的方法呢。有时撒娇固然重要，但不要太娇纵 ！
					PRINTFORMW 　因为变得任性了就不听话」
					PRINTFORMW 「不听话的使魔不能说是使魔…苏格拉底！想要去哪里呢 ！」
					PRINTFORMDW …呼
					PRINTFORMW 「真是的，你真是太傲慢了。…那么，接下来是使魔能做些什么呢 」
					PRINTFORMW 「大概能做到送信，或是找出隐藏的道路之类的。 」
					PRINTFORML 「根据使魔的种族有所不同
					PRINTFORMW 　猫的话，擅长利用敏锐的身体能力，狗的话，擅长利用嗅觉」
					PRINTFORMW 「…嘛，使魔的基本就是这些。明白吗？ ら%UNICODE(0x2665)%」
				ENDSELECT
			ENDSELECT
		;簡単な魔法ならそこまで帯電しないので特に無し
		ELSEIF CFLAG:1012 == 3
			SELECTCASE LOCAL:1
			CASE 1, 2
				SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「这是香草精华的魔法哦，对做点心很有帮助 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「今天教你振动空气发出声音的魔法 %UNICODE(0x2665)%」
				CASE 3
					PRINTFORMW 「今天我来教你引起静电的魔法 %UNICODE(0x2665)%　需要稍微注意一下所以要好好听哦 」
				CASE 4
					PRINTFORMW 「这就是风的魔法，如果能很好地调整强度的话会有很多帮助 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「这里这样，那里那样哦」
				ENDSELECT
			CASE 3, 4
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「把香料混在一起放置一晚，念魔法的话就能变成肥皂 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMW 「蚊子的眼珠—颗，蒲公英的根—跟，和其他能做出各种增加自信的魔法的药 %UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「这里这样，那里那样哦」
				ENDSELECT
			CASEELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「要成为魔法使就必须用尽全力拼命拼搏努力！ 」
				CASEELSE
					PRINTFORMW 「要成为一流的魔法使，基础是最重要的，不管魔力再怎么强大，如果不能打好基础是不行的。 」
				ENDSELECT
			ENDSELECT
		ELSEIF CFLAG:1012 == 1 || CFLAG:1012 == 2
			SELECTCASE LOCAL:1
			CASE 1, 2
				PRINT 「这就是
				SELECTCASE RAND:6
				CASE 1
					PRINT 照明的
				CASE 2
					PRINT 音阶的
				CASE 3
					PRINT 薄荷香气的
				CASE 4
					PRINT 薰衣草的香气
				CASE 5
					PRINT 灯饰的
				CASEELSE
					PRINT 制造酸空气的
				ENDSELECT
				PRINTFORMW 魔法、那么、%CALLNAME:MASTER%也试着做做看 %UNICODE(0x2665)%」
			CASE 3, 4
				PRINT 「这里这样做的话
				SELECTCASE RAND:3
				CASE 1
					PRINT 薄荷香气的
				CASE 2
					PRINT 薰衣草的香气
				CASEELSE
					PRINT 烟的
				ENDSELECT
				PRINTFORMW 魔法完成了、那么、%CALLNAME:MASTER%也试着做做看 %UNICODE(0x2665)%」
			CASEELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「要成为魔法使就必须用尽全力拼命拼搏努力！ 」
				CASEELSE
					PRINTFORMW 「要成为一流的魔法使，基础是最重要的，不管魔力再怎么强大，如果不能打好基础是不行的。 」
				ENDSELECT
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「咒语要集中精力，准确的发音哦。总之先做一下简单的东西吧 %UNICODE(0x2665)%」
			CASE 2
				PRINTFORMW 「调和时重要的是好好地量分量，稍微弄错一点也许会出大事哦 」
			CASEELSE
				;参考文献　はたらきもの、ちまりまわるつ、世の中なまほう
				PRINTFORMW 「虽说是魔法，但是也有各种各样的种类，这次就魔法的发动方法来说明几个 」
				PRINTFORMW 「第一个是普通念咒语使用的方法，基本中的基本 」
				PRINTFORML 「还有一种方法是将念咒文的东西装入瓶子再在必要的时候发动 」
				PRINTFORMW 「这样的话，使用时不用念咒文也可以，魔力消耗也很少，但是作为交换，还是需要准备的。 」
				PRINTFORML 「作为其他的版本，也有事先调和制作魔法的原料的 」
				PRINTFORMW 「我就是这个。嘛，如果是简单的魔法就不要特意调合，一般都会念咒语。 」
			ENDSELECT
		ENDIF
		IF LOCAL:2 <= 4
			PRINTFORMW 「呃，等一下，在听人说话吗？ 」
		ELSE
			CFLAG:1008 += 1
			;魔水晶垂飾が那个ば３分の１の確率で更に＋される
			IF ITEM:399 && RAND:3 == 2
				PRINTFORMDL 总觉得比平时更聪明 …
				CFLAG:1008 += 1
			ENDIF
			CALL M_KOJO_MESSAGE_EVENT_K44_MAGIC
		ENDIF
	ENDIF
ENDIF
RETURN 1

;弟子イベント用
@M_KOJO_MESSAGE_EVENT_K44_MAGIC
;魔法学習&実技経験が初めて一定量を越した時のみ追加
IF CFLAG:1008 > 30 && CFLAG:1012 == 0
	PRINTFORMW 「…大概就是这种感觉吧。接下来是基本的魔法与调合的进行解答 %UNICODE(0x2665)%」
	CFLAG:1012 = 1
ELSEIF CFLAG:1008 > 40 && CFLAG:1012 == 1
	PRINTFORMW 「咒文好像也记住了呢。实技也差不多要開始了 %UNICODE(0x2665)%」
	PRINTFORMDW 为了能够学习魔法。在晴天或阴天的时候与艾伦进行战斗训练和向艾伦展示魔法吧
	CFLAG:1012 = 2
ELSEIF CFLAG:1008 > 60 && CFLAG:1009 > 20 && CFLAG:1010 > 10 && CFLAG:1012 == 2
	PRINTFORMW 「能记住基本的魔法和调合吗？下次要做稍微有点困难的东西哦 %UNICODE(0x2665)%」
	CFLAG:1012 = 3
ELSEIF CFLAG:1008 > 100 && CFLAG:1009 > 50 && CFLAG:1010 > 40 && CFLAG:1012 == 3
	PRINTFORMW 「你很努力呢%UNICODE(0x2665)%为了回应那样的%CALLNAME:MASTER%下次会给你更难的%UNICODE(0x2665)%」
	CFLAG:1012 = 4
ELSEIF CFLAG:1008 > 150 && CFLAG:1009 > 80 && CFLAG:1010 > 60 && CFLAG:1012 == 4
	PRINTFORMW 「就要学习实践性的魔法，要稍微严厉点了一起努力吧 %UNICODE(0x2665)%」
	CFLAG:1012 = 5
ELSEIF CFLAG:1008 > 200 && CFLAG:1009 > 120 && CFLAG:1010 > 100 && CFLAG:1012 == 5
	PRINTFORMW 「能够做到这里真是太厉害了 %UNICODE(0x2665)%　作为师傅都要泪目了%UNICODE(0x2665)%」
	PRINTFORMW 「能做到这么多虽然已经能说是独当一面了……但还是把目标定在更高的地方吧 %UNICODE(0x2665)%」
	CFLAG:1012 = 6
ELSEIF CFLAG:1008 > 300 && CFLAG:1009 > 200 && CFLAG:1010 > 250 && CFLAG:1012 == 6
	PRINTFORMW 「……竟然努力到这种地步 。　%CALLNAME:MASTER%已经是优秀的魔法使了 %UNICODE(0x2665)%」
	CFLAG:1012 = 7
ENDIF
;能力成長キャップ
IF CFLAG:1012 == 2
	IF CFLAG:1008 > 70
		CFLAG:1008 = 70
		PRINTFORMDW 现阶段光学这些就够了吧
	ENDIF
	IF CFLAG:1009 > 30
		CFLAG:1009 = 30
		PRINTFORMDW 现阶段练习这些就足够了吧
	ENDIF
	IF CFLAG:1010 > 20
		CFLAG:1010 = 20
		PRINTFORMDW 今现阶段有能成功这么多次就足够了
	ENDIF
ELSEIF CFLAG:1012 == 3
	IF CFLAG:1008 > 110
		CFLAG:1008 = 110
		PRINTFORMDW 现阶段光学这些就够了吧
	ENDIF
	IF CFLAG:1009 > 60
		CFLAG:1009 = 60
		PRINTFORMDW 现阶段练习这些就足够了吧
	ENDIF
	IF CFLAG:1010 > 50
		CFLAG:1010 = 50
		PRINTFORMDW 今现阶段有能成功这么多次就足够了
	ENDIF
ELSEIF CFLAG:1012 == 4
	IF CFLAG:1008 > 160
		CFLAG:1008 = 160
		PRINTFORMDW 现阶段光学这些就够了吧
	ENDIF
	IF CFLAG:1009 > 90
		CFLAG:1009 = 90
		PRINTFORMDW 现阶段练习这些就足够了吧
	ENDIF
	IF CFLAG:1010 > 70
		CFLAG:1010 = 70
		PRINTFORMDW 今现阶段有能成功这么多次就足够了
	ENDIF
ELSEIF CFLAG:1012 == 5
	IF CFLAG:1008 > 210
		CFLAG:1008 = 210
		PRINTFORMDW 现阶段光学这些就够了吧
	ENDIF
	IF CFLAG:1009 > 130
		CFLAG:1009 = 130
		PRINTFORMDW 现阶段练习这些就足够了吧
	ENDIF
	IF CFLAG:1010 > 110
		CFLAG:1010 = 110
		PRINTFORMDW 今现阶段有能成功这么多次就足够了
	ENDIF
ENDIF
;条件を満たしていれば調合知識を獲得（MASTER）
IF CFLAG:1008 > 100 && CFLAG:1009 > 80 && CFLAG:1010 > 50 && !TALENT:MASTER:調合知識
	PRINTFORMDL 在艾伦的身边持续修行中，掌握了调和的知识
	PRINTFORMDW %CALLNAME:MASTER%调和经验上升了
	TALENT:MASTER:調合知識 = 1
ENDIF

;==================================================
;413,料理
;==================================================
@M_KOJO_MESSAGE_COM_K44_413
;料理にTRAIN_MESSAGEは無い
;FLAG:料理が消される前に記憶させとく
TCVAR:361 = FLAG:料理
TRYCALLFORM M_KOJO_COLOR_K44
CALL M_KOJO_MESSAGE_COM_K44_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:睡眠 && !CFLAG:ブチギレ
	;料理ごとに
	IF STRCOUNT(DISH_TASTE, "蛋糕/")
		;蛋糕
			PRINTFORMW 「烤～蛋糕咯♪烤～蛋糕咯♪」
			PRINTFORMW 「スポンジ～软绵绵～♪　クリーム～たあっぷり～♪」
	;なければ汎用
	ELSE
		;恋人時専用
		IF TALENT:TARGET:恋人
			IF ABL:MASTER:料理技能 == 0
				PRINTFORMW 「%CALLNAME:MASTER%没怎么做过饭吗？那么我来教你吧%UNICODE(0x2665)%」
			ELSEIF ABL:MASTER:料理技能 <= 2
				PRINTFORMW 「呼……总算完成了%UNICODE(0x2665)%」
				PRINTFORMW 「那么，趁热吃吧 %UNICODE(0x2665)%」
			ELSEIF ABL:MASTER:料理技能 <= 4
				PRINTFORMW 「总觉得像夫妻一样快乐啊%UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「做得这么好吃%CALLNAME:MASTER%真厉害 %UNICODE(0x2665)%」
			ENDIF
		;恋慕or準恋慕時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
			IF ABL:MASTER:料理技能 == 0
				PRINTFORMW 「%CALLNAME:MASTER%没怎么做过饭吗？那么我来教你吧%UNICODE(0x2665)%」
			ELSEIF ABL:MASTER:料理技能 <= 2
				PRINTFORMW 「终于完成了呢 %UNICODE(0x2665)%」
			ELSEIF ABL:MASTER:料理技能 <= 4
				PRINTFORMW 「同%CALLNAME:MASTER%一起做饭总觉得好開心啊 %UNICODE(0x2665)%//」
			ELSE
				PRINTFORMW 「做得这么好吃，%CALLNAME:MASTER%真厉害啊 %UNICODE(0x2665)%」
			ENDIF
		;其他
		ELSE
			IF ABL:MASTER:料理技能 == 0
				PRINTFORMW 「%CALLNAME:MASTER%没怎么做过饭吗？那么我来教你吧%UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「呼呼%UNICODE(0x2665)%　一起做美味的料理吧 %UNICODE(0x2665)%」
			ENDIF
		ENDIF
	ENDIF
	;料理したか記憶
	TCVAR:360 = 1
ENDIF
RETURN 1
;==================================================
;414,吃飯 影狼口上の人ありがとうございます！そしてごめんなさい！
;==================================================
@M_KOJO_MESSAGE_COM_K44_414
TRYCALLFORM M_KOJO_COLOR_K44
CALL M_KOJO_MESSAGE_COM_K44_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_414_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠
	;一緒に作ったなら
	IF TCVAR:360 == 1
		IF TALENT:恋人
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「%CALLNAME:MASTER%的菜、做得好吃吗%UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「我開动了%UNICODE(0x2665)%」
			ENDSELECT
		ELSE
			PRINTFORMW 「我開动了%UNICODE(0x2665)%」
		ENDIF
	;そうでないなら
	ELSE
		IF TALENT:恋人
			PRINTFORMW 「你给我做饭了呢，谢谢 %UNICODE(0x2665)%」
			PRINTFORMW 「那我就開动了%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
			PRINTFORMW 「啊啦%UNICODE(0x2665)%　谢谢你邀请我%UNICODE(0x2665)%//」
		ELSE
			PRINTFORMW 「啊啦%UNICODE(0x2665)%　谢谢你邀请我%UNICODE(0x2665)%」
			PRINTFORMW 「那我就開动了%UNICODE(0x2665)%」
		ENDIF
	ENDIF
	CALL M_KOJO_MESSAGE_COM_K44_414_1_SYOKU
ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;==================================================
@M_KOJO_MESSAGE_COM_K44_415
TRYCALLFORM M_KOJO_COLOR_K44
CALL M_KOJO_MESSAGE_COM_K44_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70
	;一緒に作ったなら
	IF TCVAR:360 == 1
		IF TALENT:恋人
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「%CALLNAME:MASTER%的菜、做得好吃吗%UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「难得一起做的料理%CALLNAME:MASTER%不吃吗？」
				PRINTFORMW 「…那，那就算了」
			ENDSELECT
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%不吃吗 ？」
			PRINTFORMW 「…那，那就算了」
		ENDIF
	;そうでないなら
	ELSE
		IF TALENT:恋人
			PRINTFORMW 「你给我做饭了呢，谢谢 %UNICODE(0x2665)%」
			PRINTFORMW 「那我就開动了%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
			PRINTFORMW 「啊啦%UNICODE(0x2665)%　谢谢%UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「佳肴呢%UNICODE(0x2665)%」
		ENDIF
	ENDIF
	CALL M_KOJO_MESSAGE_COM_K44_414_1_SYOKU
ENDIF
RETURN 1

;吃飯用関数
@M_KOJO_MESSAGE_COM_K44_414_1_SYOKU
;ハバネロか芥末なら追加
IF TCVAR:MASTER:308 & 8
	PRINTFORMW 「……那个，可以问一个问题吗？ 」
	PRINTFORMW 「%DISHNAME%一般不是这种颜色吧」
	PRINTFORMW 「虽然很在意……暂且先吃吃看 」
ELSEIF TCVAR:MASTER:308 & 32
	PRINTFORMW 「……喂 %CALLNAME:MASTER%、为什么会这样 %DISHNAME%和鼻涕一样的？」
	PRINTFORMW 「虽然很在意……暂且先吃吃看 」
ENDIF
;吃飯中
RESETCOLOR
CALL TRAIN_MESSAGE
;何か仕込んだ場合
IF TASTE_REACTION("辣")
	PRINTFORMW 「！？％＃＄＊＠＝＆！！」
	PRINTFORMW 「水！水！！」
	RETURN 1
ELSEIF TASTE_REACTION("甜")
	PRINTFORMW 「这是什么……看起来很普通 %DISHNAME%为什么这么甜啊…」
	RETURN 1
ELSEIF TASTE_REACTION("芥末")
	PRINTFORMW 「呜呜，好刺痛啊~ 」
	PRINTFORMW 「到底放了多少芥末～？ 」
	RETURN 1
ELSEIF TASTE_REACTION("酸")
	PRINTFORMW 「怎么这么酸啊～」
	RETURN 1
;失敗時
ELSEIF TFLAG:193 == -1
	;一緒に作ったか
	IF TCVAR:360 == 1
		IF TALENT:恋人 || TALENT:恋慕
			PRINTFORMW 「虽然不合我的口味…但是…%CALLNAME:MASTER%的料理，我全都吃给你看！ 」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嗯，总觉得有点微妙呢」
			PRINTFORMW 「调味料放得太多了吧…… 」
		ELSE
			PRINTFORMW 「倒是不难吃……不合我的口味啊 」
			PRINTFORMW 「有哪里弄错了吧…？ 」
		ENDIF
	ELSE
		IF TALENT:恋人 || TALENT:恋慕
			PRINTFORMW 「说实话，虽然不合我的口味…但%CALLNAME:MASTER%做的料理，全部吃给你看！ 」
		ELSEIF TALENT:思慕
			PRINTFORMW 「嘛，这种情况…………也有吗？ 」
		ELSE
			PRINTFORMW 「嗯，总觉得有点微妙呢」
		ENDIF
	ENDIF
;恋人時かつ二人きりなら4分の1の確率で分岐
ELSEIF TALENT:恋人 && GET_TARGETNUM() == 1 && RAND:4 == 3
	PRINTFORMW 「来%UNICODE(0x2665)% 张嘴%UNICODE(0x2665)%」
	PRINTFORMW 「…欸嘿嘿%UNICODE(0x2665)% 接下来轮到我%UNICODE(0x2665)% 啊呜%UNICODE(0x2665)%」
	EXP:愛情経験 += 2
ELSE
	;料理ごとに
	SELECTCASE DISHNAME
	;三明治
	CASE "三明治"
		PRINTFORMW 「鸡蛋三明治好吃%UNICODE(0x2665)%轻飘飘的 %UNICODE(0x2665)%」
	;司康餅
	CASE "司康餅"
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「松脆可口 %UNICODE(0x2665)%」
		CASEELSE
			IF CFLAG:現在位置 == OMANEKIBEYA() || CFLAG:現在位置 == 534 || (FLAG:住宿人物 == 44 && CFLAG:現在位置 == 16)
				PRINTFORML 「果然配司康饼得要红茶啊%UNICODE(0x2665)%」
				PRINTFORMDL 艾伦享受着自己泡的红茶和司康饼的组合……
				PRINTFORMDW ……但是艾伦泡的红茶很好喝
			ELSE
				PRINTFORMW 「吃着司康饼的话变得想要红茶 」
			ENDIF
		ENDSELECT
	;肉包
	CASE "肉包"
		;冬なら
		IF DAY:2 == 4 && RAND:2
			PRINTFORMW 「冬天吃的肉包比平时好吃。 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「哇！%UNICODE(0x2665)%真暖和%UNICODE(0x2665)%」
		ENDIF
	;蛋澆飯　でらぐい面白かったなあ…
	CASE "蛋澆飯"
		PRINTFORMW 「这么说来， %CALLNAME:MASTER%是鸡蛋和酱油混合？还是米饭上浇酱油的？」
	;素麺
	CASE "素麺"
		;夏か否かで分岐
		IF DAY:2 == 2
			PRINTFORMW 「果然夏天就是挂面啊 %UNICODE(0x2665)%」
			PRINTFORMW 「…嘛、虽然没怎么吃过 」
		ELSE
			PRINTFORMW 「夏天之外也有这样的面条呢%UNICODE(0x2665)%…虽然没有季节感 」
		ENDIF
	;荞麦麺
	CASE "荞麦麺"
		;%CALLNAME:MASTER%の料理技能が3以上で手打ちに
		IF ABL:MASTER:料理技能 >= 3
			PRINTFORMW 「这个荞麦面%CALLNAME:MASTER%的手打哟，厉害 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「日本的荞麦面真的很好吃 %UNICODE(0x2665)%」
		ENDIF
	;煎蛋巻
	CASE "煎蛋巻"
		;朝なら
		IF (TIME:2 == 1 || TIME:2 == 2) && RAND:2
			PRINTFORMW 「早上只吃煎蛋卷 %UNICODE(0x2665)%」
		;一緒に作ったか否かで分岐
		ELSEIF TCVAR:360 == 1
			IF ABL:料理技能 <= 2
				PRINTFORMW 「蛋包饭做法很简单又很好吃，很棒呢 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「软呼呼暖乎乎 %UNICODE(0x2665)% 真好吃 %UNICODE(0x2665)%」
			ENDIF
		ELSE
			IF ABL:MASTER:料理技能 <= 3
				PRINTFORMW 「诶%UNICODE(0x2665)% 烤的很好吃哦 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「煎蛋卷烤得这么好，太厉害了 %UNICODE(0x2665)%」
				PRINTFORMW 「料理这么好吃的话，\@ CFLAG:MASTER:初期位置 < 100 ? 就从神社出来 #  \@成为厨师怎么样？」
			ENDIF
		ENDIF
	;燉菜
	CASE "燉菜"
		;冬なら
		IF DAY:2 == 4 && RAND:2
			PRINTFORMW 「果然冷冬季还是炖菜最好啊 %UNICODE(0x2665)%」
		;一緒に作ったか否かで分岐
		ELSEIF TCVAR:360 == 1
			PRINTFORMW 「煮得这么好,味道真不错.%UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「煮的感觉很好已经入味了%UNICODE(0x2665)% 很好吃哦 %UNICODE(0x2665)%」
		ENDIF
	;漢堡肉
	CASE "漢堡肉"
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「不仅是肉，这个酱汁也很好吃 %UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「哇%UNICODE(0x2665)% 肉汁好多啊%UNICODE(0x2665)%」
		ENDSELECT
	;芝士焗菜
	CASE "芝士焗菜"
		;冬なら
		IF DAY:2 == 4 && RAND:2
			PRINTFORMW 「冬天吃的奶汁燴菜比平时好吃。 %UNICODE(0x2665)%」
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「说到奶汁燴菜果然还是通心粉奶汁燴菜啊 %UNICODE(0x2665)%」
			CASE 2
				PRINTFORMW 「土豆热乎的很好吃 %UNICODE(0x2665)%」
			CASEELSE
				;川海老の芝士焗菜ってどうなんだろう？
				PRINTFORMW 「哇！ %UNICODE(0x2665)% 虾好多啊%UNICODE(0x2665)%」
				PRINTFORMW 「…哇，真亏能准备了这么多的虾啊 」
			ENDSELECT
		ENDIF
	;咖喱饭
	CASE "咖喱饭"
		;一緒に作ったか(ry
		IF TCVAR:360 == 1
			PRINTFORMW 「煮得那么入味,真好吃. %UNICODE(0x2665)%」
			SIF ABL:MASTER:料理技能 <= 2 || ABL:料理技能 <= 2
			PRINTFORMW 「…不过马铃薯煮得太烂了 」
		ELSE
			PRINTFORMW 「好好地炖入味了呢 %UNICODE(0x2665)% 真好吃%UNICODE(0x2665)%」
			SIF ABL:MASTER:料理技能 <= 2
			PRINTFORMW 「…不过土豆有点煮烂了 」
		ENDIF
	;涮涮锅
	CASE "涮涮锅"
		;春夏なら冷しゃぶ
		IF DAY:2 <= 2
			PRINTFORMW 「清爽可口 %UNICODE(0x2665)%」
		;秋冬なら普通の涮涮锅
		ELSE
			PRINTFORMW 「果然冷天还是要暖和的涮火锅 %UNICODE(0x2665)%」
			PRINTFORMW 「…嘛、虽然没怎么吃过 」
		ENDIF
	;拉麺
	CASE "拉麺"
		;冬なら
		IF DAY:2 == 4 && RAND:2
			PRINTFORMW 「冬天吃的拉面比平时好吃。 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「啊烫烫！　得再放冷一会」
		ENDIF
	;牛扒
	CASE "牛扒"
		;朝牛扒はすてーきでやんす
		IF TIME:2 == 1 || TIME:2 == 2
			PRINTFORMW 「早上就吃牛排稍微有点那啥…虽然很好吃 」
		ELSE
			PRINTFORMW 「哇%UNICODE(0x2665)% 肉汁好多啊%UNICODE(0x2665)%」
		ENDIF
	;奶酪番茄沙拉
	CASE "奶酪番茄沙拉"
		PRINTFORMW 「不，虽然确实很好吃…… 　%CALLNAME:MASTER%有点奇怪哦 」
	;興奮劑高湯
	CASE "興奮劑高湯"
		;SELECTCASE RAND:2
		;CASE 1
			PRINTFORMW 「虽然意外的很好吃……总觉得好可怕啊 」
		;CASEELSE
		;	PRINTFORMW 「话说这里面是不是放了什么可怕的药啊」
		;	PRINTFORMW 「嘛，不会做的那么可怕吧」
		;ENDSELECT
	;蛋糕
	CASE "小蛋糕"
		PRINTFORMW 「哇%UNICODE(0x2665)% 轻飘飘 %UNICODE(0x2665)%」
	;水果小馅饼
	CASE "水果小馅饼"
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「水果满满的好豪华啊 」
		CASE 2
			PRINTFORMW 「卡斯塔面霜也是好东西呢 %UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「清爽可口%UNICODE(0x2665)%」
		ENDSELECT
	;曲奇
	CASE "曲奇"
		SELECTCASE RAND:3
		CASE 1
			IF CFLAG:現在位置 == OMANEKIBEYA() || CFLAG:現在位置 == 534 || (FLAG:住宿人物 == 44 && CFLAG:現在位置 == 16)
				PRINTFORMW 「%CALLNAME:MASTER%觉得红茶和咖啡哪个好 ？」
			ELSE
				PRINTFORMW 「如果早准备好饮料就好了 」
			ENDIF
		CASE 2
			PRINTFORMW 「吃得真爽啊 %UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「放了果酱的曲奇什么的有种高级感 」
		ENDSELECT
	;派
	CASE "派"
		;3時台なら
		SELECTCASE TIME
		CASE 900 TO 959
			;訳　３時のおやつはUPル派でおいしー%UNICODE(0x2665)%
			PRINTFORMW 「香甜的香味～ %UNICODE(0x2665)%」
		CASEELSE
			PRINTFORMW 「松脆可口 %UNICODE(0x2665)%而且里面满满的馅%UNICODE(0x2665)%」
		ENDSELECT
	;なければ汎用文
	CASEELSE
		;一緒に作ったのなら
		IF TCVAR:360 == 1
			;成功か特に無かで分岐
			IF TFLAG:193 == 1
				;艾倫との仲でも分岐
				IF TALENT:恋人
					PRINTFORMW 「两个人一起做的，非常好吃哦 %UNICODE(0x2665)%」
				ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
					PRINTFORMW 「%CALLNAME:MASTER%做的菜很好吃啊 %UNICODE(0x2665)%//」
				ELSE
					PRINTFORMW 「这次做的非常好吃 %UNICODE(0x2665)%」
				ENDIF
			ELSE
				IF TALENT:恋人
					PRINTFORM 「非常好吃哦%UNICODE(0x2665)%
					IF SELECTCOM == 414
						PRINTFORMW 来、%CALLNAME:MASTER%也吃吧%UNICODE(0x2665)%」
					ELSE
						PRINTFORMW 谢谢%CALLNAME:MASTER%%UNICODE(0x2665)%」
					ENDIF
				ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
					PRINTFORMW 「嗯，很好吃 %UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「嗯，做得很好吃啊 %UNICODE(0x2665)%」
				ENDIF
			ENDIF
		ELSE
			IF TFLAG:193 == 1
				IF TALENT:恋人
					PRINTFORMW 「非常好吃哦%UNICODE(0x2665)% 谢谢了%UNICODE(0x2665)%」
				ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
					PRINTFORMW 「嗯，很好吃 %UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%做的菜真好吃啊 %UNICODE(0x2665)%」
				ENDIF
			ELSE
				IF TALENT:恋人
					PRINTFORMW 「诶%UNICODE(0x2665)% 非常好吃哦 %UNICODE(0x2665)%」
				ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
					PRINTFORMW 「嗯，很好吃哦 %UNICODE(0x2665)%」
				ELSE
					PRINTFORMW 「相当好吃啊 %UNICODE(0x2665)%」
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
ENDIF
;食後
PRINTDL …
;成功か失敗か特に無かで分岐
IF TFLAG:193 == 1
	;一緒に作ったかどうかで分岐
	IF TCVAR:360 == 1
		;艾倫との仲でも分岐
		IF TALENT:恋人
			PRINTFORML 「佳肴%UNICODE(0x2665)% 真的很好吃 %UNICODE(0x2665)%」
			PRINTFORMW 「下次也一起做料理吧 %UNICODE(0x2665)%」
		ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
			PRINTFORMW 「非常好吃啊%UNICODE(0x2665)% 下次再一起做吧 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)%」
		ENDIF
	ELSE
		;艾倫との仲でも分岐
		IF TALENT:恋人
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「%CALLNAME:MASTER%亲手做的菜真棒 %UNICODE(0x2665)%%UNICODE(0x2665)% 下次再让我吃吧 %UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「竟然能做出这么好吃的菜 %CALLNAME:MASTER%真厉害%UNICODE(0x2665)%」
			ENDSELECT
		ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%の料理、太好吃了%UNICODE(0x2665)% 还想让你再做多一点啊 //」
		ELSE
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)% 非常好吃啊%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ELSEIF TFLAG:193 == -1
	IF TCVAR:360 == 1
		IF TALENT:恋人
			PRINTFORMW 「虽然这次失败了……、下次我会做的好吃给你的！」
		ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)% 下次我会努力做的更好吃！ 」
		ELSE
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)% 下次也会做好吃的哦！」
		ENDIF
	ELSE
		IF TALENT:恋人
			PRINTFORMW 「下次我也一起做料理哦！一起做的话绝对变得好吃！」
		ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ELSE
	IF TCVAR:360 == 1
		IF TALENT:恋人
			PRINTFORMW 「佳肴%UNICODE(0x2665)% 下次也一起做吧 %UNICODE(0x2665)%」
		ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
			PRINTFORMW 「佳肴%UNICODE(0x2665)% 下次两个人一起做料理吧 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)%」
		ENDIF
	ELSE
		IF TALENT:恋人
			PRINTFORMW 「佳肴%UNICODE(0x2665)% %CALLNAME:MASTER%的这道菜真好吃啊 %UNICODE(0x2665)%」
		ELSEIF CFLAG:1014 == 1 || TALENT:恋慕
			PRINTFORMW 「佳肴%UNICODE(0x2665)% 下次再做吧 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「真是佳肴%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;416,演奏　あまりにも手抜きだったので総とっかえ、歌唱知識もつけてもらったしね
;==================================================
@M_KOJO_MESSAGE_COM_K44_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && TFLAG:193 != -1
	IF FIRSTTIME(SELECTCOM)
		IF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「好音声啊 …%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || TALENT:恋人 || CFLAG:1014
			PRINTFORMW 「那么就拜托你来一曲了 %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「啊啦、用乐器演奏吗？　那么就让我听听吧 」
		ENDIF
	ELSEIF ABL:MASTER:音楽技能 >= ABL:音楽技能 && ACCOMPANY_ABLE()
		;一応それぞれに元となる曲があったり
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMDL 艾伦用明亮、如同稍显清爽天气样子的声音演唱 、
			PRINTFORMDW 如同诗一般有点忧伤,不过，感觉那样的事不太会发生在她身上
			IF !RAND:2 && EXP:愛情経験 >= 300 && TALENT:恋人 && TALENT:恋慕
				PRINTFORMDL 最激烈的部分中，在诗中搀杂传达了对%CALLNAME:MASTER%的爱
				PRINTFORMDW 非常易懂示爱方式 \@ GET_TARGETNUM() > 1 ? 　……稍微有点害羞  #  \@
			ENDIF
		CASE 2
			PRINTFORMDL 艾伦用让人感到强有力的歌声唱着
			PRINTFORMDW ……总觉得有精神了！
		CASEELSE
			PRINTFORMDW 为了配合艾伦明朗、流行的歌声，试着弹奏了曲子。
		ENDSELECT
	ELSE
		IF TALENT:恋人 && TALENT:恋慕
			IF GET_TARGETNUM() == 1 && !RAND:2
				SELECTCASE RAND:4
				CASE 1
					SELECTCASE RAND:4
					CASE 1
						PRINTFORML 「♪ ♪ ♪ ♪ ♪ ♪♪～♪♪♪」
					CASE 2
						PRINTFORML 「♪～～♪～～♪♪♪～♪～♪～♪～」
					CASE 3
						PRINTFORML 「♪♪♪～♪～♪♪～～♪♪」
					CASEELSE
						PRINTFORML 「♪♪～　♪♪～　♪♪♪♪～～」
					ENDSELECT
					PRINTFORMDW 艾伦配合%CALLNAME:MASTER%的演奏，爽朗地哼着
				CASE 2
					PRINTFORMW 「呼呼%UNICODE(0x2665)% 这样也不错呢 …」
				CASEELSE
					PRINTFORMDW 艾伦幸福地看着%CALLNAME:MASTER%演奏的身影
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「好音声啊 %UNICODE(0x2665)%」
				CASE 2
					PRINTFORMDW 艾伦配合%CALLNAME:MASTER%的演奏轻声哼着
				CASEELSE
					PRINTFORMW 「好厉害啊%UNICODE(0x2665)%再多给我听听 %UNICODE(0x2665)%」
				ENDSELECT
			ENDIF
		ELSEIF TALENT:恋慕 || TALENT:恋人 || CFLAG:1014
			IF GET_TARGETNUM() == 1
				PRINTFORMDW 艾伦看到%CALLNAME:MASTER%正在演奏的身影……
			ELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「真厉害%UNICODE(0x2665)%」
				CASEELSE
					PRINTFORMW 「还想再多听听吧%UNICODE(0x2665)%」
				ENDSELECT
			ENDIF
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「发出了漂亮的声音哇—— 」
			CASE 2
				PRINTFORMDW 艾倫为了%CALLNAME:MASTER%的演奏的姿态过来了…
			CASEELSE
				PRINTFORMW 「辛苦了%UNICODE(0x2665)%」
			ENDSELECT
		ELSE
			IF TFLAG:使用楽器 == 1 && !RAND:2
				PRINTFORMW 「这就是魔法的钢琴 」
			ELSE
				IF !RAND:2
					PRINTFORMW 「音程上手的方法呢—— 」
				ELSE
					PRINTFORMDW 艾伦一直听着%CALLNAME:MASTER%的演奏曲……
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;417,午睡をする
;==================================================
@M_KOJO_MESSAGE_COM_K44_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_417_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && TFLAG:194 == 1 && !CFLAG:ブチギレ
	;恋人時専用
	IF TALENT:恋人
		PRINTFORMW 「早上好%CALLNAME:MASTER%%UNICODE(0x2665)%发生了什么事？ 」
	;恋慕時専用
	ELSEIF TALENT:恋慕
		PRINTFORMW 「哈、早上好//」
	;其他
	ELSE
		PRINTFORMW 「早上好%UNICODE(0x2665)%　%CALLNAME:MASTER%睡得好吗？」
	ENDIF
ENDIF
RETURN 1

;==================================================
;421,祈願する
;==================================================
@M_KOJO_MESSAGE_COM_K44_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;RESETCOLOR
;PRINTFORML 是否进行口上选项的设定？
;CALL ASK_YN("是的","不")
;IF !RESULT
;	CALL M_KOJO_MESSAGE_EVENT_K44_OPTION
;ENDIF
;TRYCALLFORM M_KOJO_COLOR_K44
IF LOCAL && !FLAG:70 && FLAG:祈願内容 != 100 && !CFLAG:ブチギレ
	;恋人時専用
	IF TALENT:恋人
		PRINTFORMW 「愿望结束了吗？那就走吧 %UNICODE(0x2665)%」
	;恋慕時専用
	ELSEIF TALENT:恋慕 && !TALENT:MASTER:恋人 && RAND:2 == 1 && CFLAG:同行 > 0
		PRINTFORMW 「我也想许个愿望所以稍稍等一下 」
		PRINTFORMDL …
		PRINTFORMW 「久等了 %UNICODE(0x2665)%　那咱们走吧 %UNICODE(0x2665)%」
	;其他
	ELSE
		PRINTFORM 「愿望能实现就好了
		SIF TALENT:思慕 || TALENT:恋慕
		PRINTFORM %UNICODE(0x2665)%
		PRINTW 」
	ENDIF
ENDIF
RETURN 1

;==================================================
;429,換装
;==================================================
@M_KOJO_MESSAGE_COM_K44_429
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_429_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_429_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70
	IF ((EQUIP:下半身内衣２ == 21 && EQUIP:上半身内衣２ == 2) || EQUIP:緊身内衣 == 9) && EQUIP:連体内衣 == 0 && EQUIP:裤子 == 0 && EQUIP:下身衣服 == 0 && EQUIP:裙子 == 0 && EQUIP:上身衣服１ == 0 && EQUIP:上身衣服２ == 0 && EQUIP:連衣裙 == 0 && EQUIP:和服 == 0 && EQUIP:外搭 == 0
		IF ABL:露出癖 >= 3
			PRINTFORMW 「合适吗？ %UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「这可真难为情啊 //」
		ENDIF
	ELSEIF EQUIP:下半身内衣２ == 0 && EQUIP:上半身内衣２ == 0 && EQUIP:緊身内衣 == 0 && EQUIP:連体内衣 == 0 && EQUIP:裤子 == 0 && EQUIP:下身衣服 == 0 && EQUIP:裙子 == 0 && EQUIP:上身衣服１ == 0 && EQUIP:上身衣服２ == 0 && EQUIP:連衣裙 == 0 && EQUIP:和服 == 0 && EQUIP:外搭 == 0
		PRINTFORMW 「这不是裸体吗//　%CALLNAME:MASTER%真实的//」
	ELSEIF EQUIP:上半身内衣１ == 2 && EQUIP:下半身内衣１ == 1
		PRINTFORMW 「打扮成这样你是认真吗？ 」
	ELSE
		PRINTFORMW 「合适吗？ %UNICODE(0x2665)%」
	ENDIF
ENDIF
RETURN 1

;==================================================
;431,在浴室里放鬆
;==================================================
@M_KOJO_MESSAGE_COM_K44_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && TFLAG:194 == 0
	;一緒か別々か温泉かお風呂か泳池か(泳池のみ今のところ無)
	IF CFLAG:6 > 0 && CFLAG:MASTER:現在位置 == 940
		;25%で視線に気づく
		IF RAND:4 == 1
			PRINTFORMW 「虽然热水很舒服，但是总觉得有一种奇妙的视线…… 」
			PRINTFORMW 「……错觉……吗？ 」
		ELSEIF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「呼%UNICODE(0x2665)% 真舒服%UNICODE(0x2665)%　下次再一起入浴吧%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「洗的好舒服啊%UNICODE(0x2665)% 下次也一起去泡澡吧//」
		;其他
		ELSE
			PRINTFORMW 「地底温泉也是真不错啊%UNICODE(0x2665)%下次再来吧 %UNICODE(0x2665)%」
		ENDIF
	ELSEIF CFLAG:MASTER:現在位置 == 250 || CFLAG:MASTER:現在位置 == 940
		IF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「呼%UNICODE(0x2665)% 真舒服%UNICODE(0x2665)%　下次再来吧%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「洗的好舒服啊%UNICODE(0x2665)% 谢谢你邀请我%UNICODE(0x2665)%」
		;其他
		ELSE
			PRINTFORMW 「啊，真舒服%UNICODE(0x2665)% 果然泡澡斯巴拉西 %UNICODE(0x2665)%」
		ENDIF
	ELSEIF (CFLAG:MASTER:現在位置 == 13 && FLAG:住宿人物 == 44) || CFLAG:MASTER:現在位置 == 24
		IF TALENT:恋人 && TALENT:恋慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「等会咱们互相冲洗一下后背吧 %UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「啊，好舒服 %UNICODE(0x2665)%」
				PRINTFORMDW 艾伦露出荡漾的表情，依靠着%CALLNAME:MASTER%
			ENDSELECT
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
			PRINTFORMW （哇//喔//　和%CALLNAME:MASTER%一起泡澡了//）
		ELSE
			PRINTFORMW 「哇泡澡了泡澡了%UNICODE(0x2665)% 又暖和又舒服啊%UNICODE(0x2665)%」
		ENDIF
	ELSEIF (CFLAG:MASTER:現在位置 == 13 && FLAG:住宿人物 != 44) || CFLAG:MASTER:現在位置 == 30 || CFLAG:MASTER:現在位置 == 39
		IF CFLAG:MASTER:現在位置 == 13
			PRINTFORMW 「我进来没关系吗？… 」
		ELSE
			PRINTFORMW 「随便进人家的浴室没关系吗？ 」
		ENDIF
	ELSEIF BATHROOM(CFLAG:現在位置)
		IF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「泡澡了泡澡了%UNICODE(0x2665)%　呐%CALLNAME:MASTER%、回头咱们互相冲洗一下后背吧 %UNICODE(0x2665)%%UNICODE(0x2665)%」
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
			PRINTFORMW （哇//喔//　和%CALLNAME:MASTER%一起泡澡了//）
		;其他
		ELSE
			PRINTFORMW 「泡澡了泡澡了%UNICODE(0x2665)%　又暖和又舒服啊%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;约会系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,约会会話
;==================================================
@M_KOJO_MESSAGE_COM_K44_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_600_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K44_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_MESSAGE_COM_K44_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_602_1
RETURN RESULT

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

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,牽手
;==================================================
@M_KOJO_MESSAGE_COM_K44_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	;失敗時は無し
	SIF TFLAG:193 == -1
	RETURN 1
	;恋人時専用
	IF TALENT:恋人
		PRINTFORMW 「欸嘿嘿ー%UNICODE(0x2665)%　不会放開了哦%UNICODE(0x2665)%%UNICODE(0x2665)%」
	;恋慕時専用
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		PRINTFORML （哇！%UNICODE(0x2665)%//喔%UNICODE(0x2665)%//　同%CALLNAME:MASTER%牵手了呢%UNICODE(0x2665)%//）
		PRINTFORMDW 艾伦脸红着笑了……
	;親密５以上時専用
	ELSEIF TALENT:思慕
		IF TALENT:MASTER:体型 >= 0 && GETBIT(TALENT:MASTER:2,1)
			PRINTFORMW 「%CALLNAME:MASTER%的手好大啊」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%想要牵手吗，可以啊」
		ENDIF
	;親密４以下時専用
	ELSE
		PRINTFORMW 「没有牵手的必要吧」
	ENDIF
ENDIF
RETURN 1

;==================================================
;604,散步
;==================================================
@M_KOJO_MESSAGE_COM_K44_604
;散步にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K44_604_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;605,繞道
;==================================================
@M_KOJO_MESSAGE_COM_K44_605
;繞道にはTRAIN_MESSAGEが無い
TRYCALLFORM M_KOJO_COLOR_K44
CALL M_KOJO_MESSAGE_COM_K44_605_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_605_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋慕 || CFLAG:1014 == 1
		PRINTFORMW 「？　どこ行くの？」
	;其他
	ELSE
		PRINTFORM 「どこ行くの、そっちは
		SELECTCASE CFLAG:44:現在位置
		CASE 100 TO 109
			PRINTFORM 命蓮寺
		CASE 200 TO 209
			PRINTFORM 人間之里
		CASE 300 TO 309
			PRINTFORM 霧之湖
		CASE 400 TO 409
			PRINTFORM 竹林
		CASE 500 TO 509
			PRINTFORM 魔法之森
		CASE 600 TO 609
			PRINTFORM 迷途之家
		CASE 700 TO 709, 800 TO 809
			PRINTFORM 妖怪之山
		CASE 900 TO 909
			PRINTFORM 地底
		ENDSELECT
		PRINTFORMW じゃないわよー！」
	ENDIF
ENDIF
RETURN 1
;==================================================
;610,請吃飯
;==================================================
@M_KOJO_MESSAGE_COM_K44_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	;失敗時は無し
	SIF TFLAG:193 == -1
	RETURN 1
	IF TFLAG:193 == 1
		;恋人かつ恋慕時専用
		IF TALENT:恋人 && TALENT:恋慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「佳肴%UNICODE(0x2665)% 非常好吃啊%UNICODE(0x2665)%　下次再来吧 %UNICODE(0x2665)%%UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「佳肴%UNICODE(0x2665)% 嘴角稍微有点脏啊」
				PRINTFORMW 「真是的，我来帮你擦干净%UNICODE(0x2665)%」
			ENDSELECT
		;恋慕or恋人時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「非常好吃啊%UNICODE(0x2665)% 下次再邀请我哦%UNICODE(0x2665)%」
		;親密時専用
		ELSE
			PRINTFORMW 「谢谢你请我吃饭 %UNICODE(0x2665)% 很好吃啊 %UNICODE(0x2665)%」
		ENDIF
	ELSE
		;工作結束からの约会の場合艾倫がおごってくれるよ！
		IF TCVAR:356 == 1
			PRINTFORMW 「是由我发出邀请的不能让你请客，我来付钱吧」
		;恋人かつ恋慕時専用
		ELSEIF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「呐呐、我另选一个，一起分享吧？那样的话会幸福2倍哦 %UNICODE(0x2665)%」
		;恋慕or恋人時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「呐，我选另一个吧，之后要不要分享？//」
		;親密５以上時専用
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%要做什么呢 ？」
			PRINTFORMW 「我选另一个，之后互相分享吧%UNICODE(0x2665)%」
		;親密４以下時専用
		ELSE
			PRINTFORMW 「选哪个呐真烦恼啊…」
		ENDIF
	ENDIF
ENDIF
SIF TCVAR:356 == 1
MONEY += 2000
RETURN 1

;==================================================
;613,賺錢
;==================================================
@M_KOJO_MESSAGE_COM_K44_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_613_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;614,採購食材
;==================================================
@M_KOJO_MESSAGE_COM_K44_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_614_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;615,吃便當
;==================================================
@M_KOJO_MESSAGE_COM_K44_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_615_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	IF TFLAG:193 == -1
		PRINTFORMW 「哎呀，调味失败了 」
	;恋人時かつ二人きりなら2分の1の確率で分岐
	ELSEIF TALENT:恋人 && TALENT:恋慕 && GET_TARGETNUM() == 1 && !RAND:2
		PRINTFORMW 「来%UNICODE(0x2665)% 张嘴%UNICODE(0x2665)%」
		PRINTFORMW 「…欸嘿嘿%UNICODE(0x2665)% 接下来轮到我%UNICODE(0x2665)% 啊呜%UNICODE(0x2665)%」
		EXP:愛情経験 += 2
	ELSEIF ABL:料理技能 >= 4 && TALENT:恋慕 && !RAND:2
		PRINTFORMW 「诶嘿嘿%UNICODE(0x2665)%　只要%CALLNAME:MASTER%幸福，我也会幸福的。 %UNICODE(0x2665)%」
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「我亲手做的鸡蛋三明治怎么样 %UNICODE(0x2665)%」
		CASE 2
			;艾倫は動物の言葉が分かる
			PRINTFORMDL  苏格拉底正在物色艾伦的便当……
			PRINTFORMW 「苏格拉底的饭不是这里而是那边的 」
			PRINTFORMW 「啊？“比起那边更想吃这边”？ 」
			IF !RAND:3
				PRINTFORMW 「……没办法啦，只可以吃一口哦 」
			ELSE
				PRINTFORMW 「不・可・以！」
			ENDIF
		CASE 3
			;季節で分岐
			IF DAY:2 == 1
				IF TIME:5 <= 1
					PRINTFORMW 「在春天的阳光下吃的便当比平时更加美味 %UNICODE(0x2665)% %CALLNAME:MASTER%也这么想吗？」
				ELSE
					PRINTFORMW 「佳肴%UNICODE(0x2665)%」
				ENDIF
			;なつなつなつなつ甜甜圈！　あいあいあいあい冰淇淋！
			ELSEIF DAY:2 == 2
				PRINTFORMW 「甜度控制的甜甜圈味道如何？好吃吗？ 」
			ELSEIF DAY:2 == 3
				PRINTFORMW 「秋天悠闲自在，很爽呐 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「来，喝一碗热汤吧 %UNICODE(0x2665)%」
			ENDIF
		CASEELSE
			PRINTFORMW 「佳肴%UNICODE(0x2665)%」
		ENDSELECT
	ELSE
		PRINTFORMW 「佳肴%UNICODE(0x2665)%」
	ENDIF
ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;==================================================
@M_KOJO_MESSAGE_COM_K44_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	IF TFLAG:193 == 1
		;恋人かつ恋慕時専用
		IF TALENT:恋人 && TALENT:恋慕
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「佳肴%UNICODE(0x2665)% 非常好吃啊%UNICODE(0x2665)%　下次再来吧 %UNICODE(0x2665)%%UNICODE(0x2665)%」
			CASEELSE
				PRINTFORMW 「佳肴%UNICODE(0x2665)% 嘴角稍微有点脏啊」
				PRINTFORMW 「真是的，我来帮你擦干净%UNICODE(0x2665)%」
			ENDSELECT
		;工作結束からの约会の場合艾倫がおごってくれるよ！
		ELSEIF TCVAR:356 == 1
			PRINTFORMW 「啊，很好吃 %UNICODE(0x2665)% 下次再来吧 %UNICODE(0x2665)%」
		;恋慕or恋人時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「非常好吃啊%UNICODE(0x2665)% 下次再邀请我哦%UNICODE(0x2665)%」
		;親密時専用
		ELSE
			PRINTFORMW 「谢谢你请我吃饭 %UNICODE(0x2665)% 很好吃啊 %UNICODE(0x2665)%」
		ENDIF
	ELSE
		;工作結束からの约会の場合艾倫がおごってくれるよ！
		IF TCVAR:356 == 1
			PRINTFORMW 「是由我发出邀请的不能让你请客，我来付钱吧」
		;恋人かつ恋慕時専用
		ELSEIF TALENT:恋人 && TALENT:恋慕
			PRINTFORMW 「呐呐、我另选一个，一起分享吧？那样的话会幸福2倍哦 %UNICODE(0x2665)%」
		;恋慕or恋人時専用
		ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
			PRINTFORMW 「呐，我选另一个吧，之后要不要分享？//」
		;親密５以上時専用
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%要做什么呢 ？」
			PRINTFORMW 「我选另一个，之后互相分享吧%UNICODE(0x2665)%」
		;親密４以下時専用
		ELSE
			PRINTFORMW 「选哪个呐真烦恼啊…」
		ENDIF
		;隠しメニュー用
		LOCAL:1 = RAND:10
		;どれを選んでも結果は変わらないよ！
		$LOOP
		PRINTFORMDL どれを注文しますか？
		PRINTDL [0] 铜锣烧
		PRINTDL [1] 蜜豆
		PRINTDL [2] 时令菜单
		SIF LOCAL:1 == 8
		PRINTDL [8] マミド汉堡包
		SIF LOCAL:1 == 9
		PRINTDL [9] 盖浇饭
		INPUT
		IF RESULT == 0
			PRINTFORMDW %CALLNAME:MASTER%点了铜锣烧…
			PRINTFORMDW 稍微等了一会送上了铜锣烧。趁热吃掉吧
			PRINTFORMDL …
			;10分の1の確率で長文に
			IF !RAND:10
				PRINTFORMDL 好好搅拌好的豆沙和包着它的甜皮
				PRINTFORMDW 这两种搭配在一起，引出绝妙的美味……
			ELSE
				PRINTFORMDW 好吃！
			ENDIF
		ELSEIF RESULT == 1
			PRINTFORMDW %CALLNAME:MASTER%点了蜜豆…
			PRINTFORMDW 稍微等了一会送上了蜜豆。趁热吃掉吧
			PRINTFORMDL …
			IF !RAND:10
				;寒天は海藻を元に作られるから海のない幻想郷では寒天はないって聞いたよ、紫経由であるかもしれないけど
				PRINTFORMDL 虽然还没到寒天，但是橘子、桃子、樱桃等五彩缤纷的水果和糯米团子，
				PRINTFORMDW 然后是汇总这些的黑蜜，全都是非常美味的东西……
			ELSE
				PRINTFORMDW 好吃！
			ENDIF
		ELSEIF RESULT == 2
			PRINTFORMDW %CALLNAME:MASTER%点了季节菜单…
			PRINTD 稍微等了一会
			;季節ごとに変化
			SELECTCASE DAY:2
			CASE 1
				PRINTD 桜餅
			CASE 2
				PRINTD 冰淇淋
			CASE 3
				PRINTD 栗茶巾
			CASE 4
				PRINTD 年糕小豆汤
			ENDSELECT
			PRINTFORMDW 送了上来。趁热吃掉吧
			PRINTFORMDL …
			PRINTFORMDW 好吃！
		;幻想入りしたマミドバーガー
		ELSEIF RESULT == 8 && LOCAL:1 == 8
			IF FIRSTTIME(1002)
				PRINTFORMDW 汉堡包是汉堡吗？虽然跟甜味怎么也联系不上……
				PRINTFORMDW %CALLNAME:MASTER%败给了好奇心，点了汉堡包……
				PRINTFORMDW 稍微等了一会汉堡包送了上来，那么早点吃吧
				PRINTFORMDW 看上去很像汉堡，但是有什么不一样，总之先尝尝看吧
				PRINTFORMDL …
				PRINTFORMDW 有用湿润的口感来代替肉的巧克力慕斯，还有其他很熟悉的感觉或许是面包糕吧。
				PRINTFORMDW 打開里面一看，看到应该替代是西式咸菜的猕猴桃，技艺非常精致
				PRINTFORMDL …
				PRINTFORMDW 意外的好吃，有机会的话再尝尝吧
			ELSE
				PRINTFORMDW %CALLNAME:MASTER%点了マミドバーガー…
				PRINTFORMDW 稍微等了一会汉堡包送了上来。趁热吃掉吧…
				PRINTFORMDL …
				PRINTFORMDW 好吃！
			ENDIF
		;げえっ！小倉丼！
		ELSEIF RESULT == 9 && LOCAL:1 == 9
			IF FIRSTTIME(1001)
				PRINTFORMDW 小仓盖浇饭？这是从未见过的菜单
				PRINTFORMDW %CALLNAME:MASTER%输给好奇心，点了小仓盖浇饭……
				PRINTFORMDW 稍微等了一会小仓盖浇饭送了上来。趁热吃掉吧…
				PRINTFORMDW ……这是什么 ！
				PRINTFORMDW 盖饭中全是耸立着豆沙馅儿的墙壁，上面贴着切成圆片的馅饼。
				PRINTFORMDW 馅儿的边儿上配着荷兰芹
				PRINTFORMDW 米只从馅儿下面稍微露出一点儿，是红色的……
				PRINTFORMDW 对面的艾伦也惊讶了，张着嘴看着小仓盖浇饭……
				PRINTFORMW 「……　虽然有点对不起店里的人……这真的是料理吗？”
				PRINTFORMDW 的确是艾伦所说的街道……无论从哪里看，这只不过是豆馅饼块上挂着豆沙水果圈的东西而已……
				PRINTFORMDW ……但是，点了菜含着泪也要吃掉。
				PRINTFORMDW %CALLNAME:MASTER%战战兢兢地把筷子伸向了小仓盖浇饭……
				PRINTFORMDW …
				PRINTFORMDW 可怕的甜……加入豆沙馅饼、豆沙水果圈的甜味，再加上撒满草莓的大米的甜味更为浓……
				PRINTFORMDW ………
				PRINTFORMDW ……
				PRINTFORMDW …
				PRINTFORMDW 花了一个小时终于吃完了……下次绝不会点了
			ELSE
				PRINTFORMDW %CALLNAME:MASTER%不知为什么点了小仓盖浇饭……
				PRINTFORMDW 稍微等了一会小仓盖浇饭送了上来。趁热吃掉吧…
				PRINTFORMDW …
				PRINTFORMDW 嘴里被甜味侵蚀……为什么点了这个呢……
			ENDIF
		ELSE
			GOTO LOOP
		ENDIF
	ENDIF
ENDIF
SIF TCVAR:356 == 1
MONEY += 3000
RETURN 1
;==================================================
;620,鈴奈庵
;==================================================
@M_KOJO_MESSAGE_COM_K44_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_620_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;621,釣魚
;TFLAG:193(0=釣れない 1～4=魚 11～15=好吃的魚 610=木材 131=守矢之守札 21=跳蛋 609=氷之鱗 606=龍之爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K44_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_621_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:194 >= 1000
		PRINTFORMW 「我钓到了 %UNICODE(0x2665)%」
		IF TFLAG:193 == 706
			PRINTFORMW 「……青蛙啊？」
		ELSEIF TFLAG:193 > 15
			PRINTFORMW 「……为什么会这样 \@ CFLAG:193 == 606 || CFLAG:193 == 609 ? 貴重な #  \@ものが」
		ENDIF
	ELSEIF TFLAG:193
		SELECTCASE TFLAG:193
		CASE 1 TO 4
			IF TALENT:恋人 && TALENT:恋慕
				PRINTFORMW 「不愧是%CALLNAME:MASTER%%UNICODE(0x2665)%」
			ELSEIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人
				PRINTFORMW 「真厉害%UNICODE(0x2665)%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%很会钓鱼呢 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「真厉害」
			ENDIF
		CASE 11 TO 15
			IF TALENT:恋人 && TALENT:恋慕
				PRINTFORMW 「待会儿做个美味的菜吧 %UNICODE(0x2665)%」
			ELSEIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人
				PRINTFORMW 「啊啦、真棒啊%UNICODE(0x2665)%」
			ELSEIF TALENT:思慕
				PRINTFORMW 「太好了。 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「看起来很好吃的鱼呢 」
			ENDIF
		CASE 21, 131
			PRINTFORMW 「也许……非法丢垃圾？」
		CASE 606, 609
			PRINTFORMW 「为什么会有如此宝贵的东西在这里 」
		CASE 610
			PRINTFORMW 「倒下的树也流过来了吗？ 」
		CASE 706
			PRINTFORMW 「啊啦、是青蛙」
		ENDSELECT
	ELSE
		PRINTFORMW 「怎么什么也钓不到呢？ 」
	ENDIF
ENDIF
RETURN 1
;==================================================
;660,読書
;==================================================
@M_KOJO_MESSAGE_COM_K44_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:ブチギレ && !MARK:反発刻印
	;心情不快時用
	IF TALENT:心情 == -1
		PRINTFORMDW 艾倫不高兴地看书…
		;10%で心情不快解除
		IF !RAND:10
			PRINTFORMDW ……不知道是不是看到什么有意思的书，对艾伦的表情不由得露出了笑容。
			TALENT:心情 = 0
		ENDIF
		RETURN 1
	;親密８以上なら４分の３の確率で、恋人かつ恋慕なら必ず一緒に読書する
	ELSEIF (ABL:親密 >= 8 && RAND:4 >= 1) || TALENT:恋人 && TALENT:恋慕
		CFLAG:好感度 += (ABL:親密 * 2)
		PRINTFORMD 艾倫在%CALLNAME:MASTER%的旁边
		IF TALENT:恋人 && TALENT:恋慕
			PRINTD 好像很開心
		ELSEIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人
			PRINTD 稍微红着脸
		ENDIF
		PRINTDW 地读书
	ELSE
		PRINTFORMD 艾倫
		SIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人
		PRINTD  在一边偷偷摸摸地看着这边，
		PRINTFORMDW 边在稍近出口的地方看书
	ENDIF
ENDIF
RETURN 1

;==================================================
;698,進入房間
;==================================================
@M_KOJO_MESSAGE_COM_K44_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_698_1
RETURN RESULT
@M_KOJO_MESSAGE_COM_K44_698_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	IF TALENT:恋人
		PRINTFORMW 「来，别客气进来吧 %UNICODE(0x2665)%」
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		PRINTFORMW 「不用客气进来吧%UNICODE(0x2665)%」
	ELSE
		PRINTFORMW 「嘛快点进来吧%UNICODE(0x2665)%」
	ENDIF
ENDIF
RETURN 1
;==================================================
;699,外出
;==================================================
@M_KOJO_MESSAGE_COM_K44_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_699_1
RETURN RESULT
@M_KOJO_MESSAGE_COM_K44_699_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:睡眠
	IF TALENT:恋人 && TALENT:恋慕
		IF VISIT(44) || CHK_DATENOW(CFLAG:44:约会中) || ((FLAG:住宿人物 == 44 || FLAG:16 == 44) && (!睡眠時間(44)) && !CFLAG:睡眠)
			;艾倫的家に泊まっているなら
			IF TCVAR:(CFLAG:MASTER:招待):连住禁止 && TIME:0 <= 660
				PRINTFORMW 「今天一天也要加油哦 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「那么，接下来去哪里呢？%UNICODE(0x2665)%」
			ENDIF
		ELSE
			PRINTFORMW 「一路走好%UNICODE(0x2665)% 回头见%UNICODE(0x2665)%」
		ENDIF
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
		IF VISIT(44) || CHK_DATENOW(CFLAG:44:约会中) || ((FLAG:住宿人物 == 44 || FLAG:16 == 44) && (!睡眠時間(44)) && !CFLAG:睡眠)
			;艾倫的家に泊まっているなら
			IF TCVAR:(CFLAG:MASTER:招待):连住禁止 && TIME:0 <= 660
				PRINTFORMW 「今天一天也要加油哦%UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「接下来去哪里呢 %UNICODE(0x2665)%」
			ENDIF
		ELSE
			PRINTFORMW 「已经要走了吗，那么回头见%UNICODE(0x2665)%」
		ENDIF
	ELSE
		IF VISIT(44) || CHK_DATENOW(CFLAG:44:约会中) || ((FLAG:住宿人物 == 44 || FLAG:16 == 44) && (!睡眠時間(44)) && !CFLAG:睡眠)
			;艾倫的家に泊まっているなら
			IF TCVAR:(CFLAG:MASTER:招待):连住禁止 && TIME:0 <= 660
				PRINTFORMW 「今天一天也要加油哦 %UNICODE(0x2665)%」
			ELSE
				PRINTFORMW 「接下来去哪里？ 」
			ENDIF
		ELSE
			PRINTFORMW 「已经要回去了吗？　那么下次再见吧 %UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	;失敗時
	IF TFLAG:193 == -1
		PRINTFORMW 「哇！……没事吗？」
	ELSEIF TFLAG:193 == 1
		PRINTFORMW 「哇，我取出好大一块 」
	;恋人時専用
	ELSEIF TALENT:恋人
		PRINTFORMW 「欸嘿嘿%UNICODE(0x2665)% 总觉得好幸福啊 %UNICODE(0x2665)%」
	;恋慕時専用
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		PRINTFORMW 「我的掏耳朵技术怎么样%UNICODE(0x2665)%//」
	ELSE
		PRINTFORMW 「嘿，变干净了哦 %UNICODE(0x2665)%」
	ENDIF
ENDIF
RETURN 1
;==================================================
;61,抱き枕
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋慕 && TALENT:恋人 && TFLAG:193 != -1
		IF CFLAG:出産経過日 >= 18 && FLAG:兒童描写

		ELSE
			SIF TFLAG:193 == 0
			PRINTFORMDL 艾伦的温暖传递了过来……
			PRINTFORMW 「晚安啦、%CALLNAME:MASTER%%UNICODE(0x2665)%」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;62,亲額頭
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	IF TALENT:恋人 && TALENT:恋慕
		IF ABL:欲望 >= 5 && GET_TARGETNUM() == 1
			PRINTFORMW 「下次希望你亲吻我的嘴唇//」
		ELSE
			PRINTFORMW 「啊哈哈 %UNICODE(0x2665)%」
		ENDIF
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
		PRINTFORMW 「欸嘿嘿//」
	ELSEIF TALENT:思慕
		PRINTFORMW 「莫//」
	ELSE
		PRINTFORMW 「你你你你在干什么啊 ！//」
	ENDIF
ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:ブチギレ
	IF TALENT:恋人 && TALENT:恋慕
		PRINTFORMW 「啾…咕啾…呼阿」
		PRINTFORMW 「嗯…姆啾～%UNICODE(0x2665)%」
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人
		PRINTFORMW 「啾、啾露…嗯…啾…呼哈//」
	ELSE
		PRINTFORMW 「哈……哈……有点难受了…… 」
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;失敗時は無し
SIF TFLAG:193 == -1
RETURN 1
IF LOCAL && !CFLAG:ブチギレ
	IF TALENT:恋人
		IF TFLAG:193 == 1
			PRINTFORMW 「啊哈哈 は%UNICODE(0x2665)%」
		ELSE
			PRINTFORMW 「不用那么急也没关系 %UNICODE(0x2665)%」
		ENDIF
	ELSEIF TALENT:恋慕 || CFLAG:1014 == 1
		PRINTFORMW （啊ーーー%UNICODE(0x2665)%%UNICODE(0x2665)%//）
	ELSE
		PRINTFORMW 「啊呀！不要突然拉手啊！」
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;愛撫系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;0,愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K44_0
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_0_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_0_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;挿入中
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	;V挿入
	IF LOCAL:1 && TEQUIP:50 == PLAYER
		;射精した
		IF NOWEX:PLAYER:11
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;A挿入
	ELSEIF LOCAL:1 && TEQUIP:51 == PLAYER
		;射精した
		IF NOWEX:PLAYER:11
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;扶她
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && (TALENT:2 & 3) == 3
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;1,舐陰
;==================================================
@M_KOJO_MESSAGE_COM_K44_1
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_1_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_1_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;膣内射精直後
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;絶頂した
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && NOWEX:Ｃ絶頂
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;あとは適当な分岐を追加してください
;==================================================
;2,给对方口交
;==================================================
@M_KOJO_MESSAGE_COM_K44_2
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_2_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_2_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;3,指挿入れ
;==================================================
@M_KOJO_MESSAGE_COM_K44_3
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_3_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_3_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;4,舐肛
;==================================================
@M_KOJO_MESSAGE_COM_K44_4
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_4_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_4_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;5,肛門愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K44_5
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_5_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_5_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;6,胸愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K44_6
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_6_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_6_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;7,玩弄乳頭
;==================================================
@M_KOJO_MESSAGE_COM_K44_7
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_7_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_7_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;8,張開陰唇
;==================================================
@M_KOJO_MESSAGE_COM_K44_8
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_8_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_8_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;9,自慰
;==================================================
@M_KOJO_MESSAGE_COM_K44_9
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_9_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_9_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
[SKIPSTART]
;別指令化
;==================================================
;10,吸乳头
;==================================================
@M_KOJO_MESSAGE_COM_K44_10
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_10_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_10_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
[SKIPEND]
;==================================================
;11,吸乳头
;==================================================
@M_KOJO_MESSAGE_COM_K44_11
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_11_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_11_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;12,胸もみ
;==================================================
@M_KOJO_MESSAGE_COM_K44_12
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_12_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_12_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;13,張開肛門
;==================================================
@M_KOJO_MESSAGE_COM_K44_13
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_13_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_13_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;ソフト系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;20,接吻
;==================================================
@M_KOJO_MESSAGE_COM_K44_20
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_20_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_20_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;21,什麼也不做
;==================================================
@M_KOJO_MESSAGE_COM_K44_21
;CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_21_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_21_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;22,誘惑
;==================================================
@M_KOJO_MESSAGE_COM_K44_22
;CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_22_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_22_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;23,枕邊話
;==================================================
@M_KOJO_MESSAGE_COM_K44_23
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_23_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_23_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;道具系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;40,跳蛋
;==================================================
@M_KOJO_MESSAGE_COM_K44_40
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_40_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_40_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;41,電動按摩棒
;==================================================
@M_KOJO_MESSAGE_COM_K44_41
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_41_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_41_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;42,陰蒂夾
;==================================================
@M_KOJO_MESSAGE_COM_K44_42
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_42_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_42_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:陰蒂夾
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;43,飛機杯
;==================================================
@M_KOJO_MESSAGE_COM_K44_43
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_43_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_43_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:飛機杯
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;44,振動棒
;==================================================
@M_KOJO_MESSAGE_COM_K44_44
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_44_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_44_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:振動棒
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;45,肛用振動棒
;==================================================
@M_KOJO_MESSAGE_COM_K44_45
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_45_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_45_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:肛用振動棒
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;46,後庭拉珠
;==================================================
@M_KOJO_MESSAGE_COM_K44_46
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_46_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_46_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:後庭拉珠
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;47,乳頭夾
;==================================================
@M_KOJO_MESSAGE_COM_K44_47
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_47_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_47_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:乳頭夾
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;==================================================
;48,搾乳機
;==================================================
@M_KOJO_MESSAGE_COM_K44_48
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_48_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_48_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:搾乳機
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;==================================================
;49,乳頭跳蛋
;==================================================
@M_KOJO_MESSAGE_COM_K44_49
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_49_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_49_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:搾乳機
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;※※※※※※※※※※※※※※※※※※※※※※※※※
;性交系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,正常位
;==================================================
@M_KOJO_MESSAGE_COM_K44_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_60_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_60_1

;-------------------------------------------------
;立位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && TFLAG:193
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;-------------------------------------------------
;正常位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;61,後背位
;==================================================
@M_KOJO_MESSAGE_COM_K44_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_61_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_61_1
;-------------------------------------------------
;立位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && TFLAG:193
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;-------------------------------------------------
;後背位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;62,正常位肛交
;==================================================
@M_KOJO_MESSAGE_COM_K44_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_62_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_62_1
;-------------------------------------------------
;立位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && TFLAG:193
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;-------------------------------------------------
;正常位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;63,後背位肛交
;==================================================
@M_KOJO_MESSAGE_COM_K44_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_63_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_63_1
;-------------------------------------------------
;立位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && TFLAG:193
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;-------------------------------------------------
;後背位
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;64,逆強姦
;==================================================
@M_KOJO_MESSAGE_COM_K44_64
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_64_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_64_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;調教者が処女
		IF TCVAR:PLAYER:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:PLAYER:100 == TARGET
		;前回射精した
		IF TCVAR:PLAYER:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;65,騎乗位
;==================================================
@M_KOJO_MESSAGE_COM_K44_65
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_65_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_65_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			;恋人かつ恋慕なら異常経験上がらない
			SIF TALENT:恋人 && TALENT:恋慕
			EXP:異常経験 -= 2
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;66,騎乗位肛交
;==================================================
@M_KOJO_MESSAGE_COM_K44_66
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_66_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_66_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;67,対面座位
;==================================================
@M_KOJO_MESSAGE_COM_K44_67
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_67_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_67_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;68,背面座位
;==================================================
@M_KOJO_MESSAGE_COM_K44_68
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_68_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_68_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;処女
		IF TCVAR:破瓜 == 1
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:100 == PLAYER
		;前回射精した
		IF TCVAR:102
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;69,対面座位肛交
;==================================================
@M_KOJO_MESSAGE_COM_K44_69
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_69_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_69_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;70,背面座位肛交
;==================================================
@M_KOJO_MESSAGE_COM_K44_70
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_70_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_70_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;71,二穴挿入
;==================================================
@M_KOJO_MESSAGE_COM_K44_71
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_71_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_71_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;考えうる分岐が多すぎるので地の文の大まかな分岐だけ
	;連続
	IF PREVCOM == SELECTCOM
		PRINTFORMW
		RETURN 0
	;主人V挿入→助手A挿入
	ELSEIF TCVAR:100 == MASTER
		PRINTFORMW
		RETURN 0
	;主人A挿入→助手V挿入
	ELSEIF TCVAR:101 == MASTER
		PRINTFORMW
		RETURN 0
	;助手V挿入→主人A挿入
	ELSEIF TCVAR:100 == ASSI
		PRINTFORMW
		RETURN 0
	;助手A挿入→主人V挿入
	ELSEIF TCVAR:101 == ASSI
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;72,挿入Ｇ點玩弄
;==================================================
@M_KOJO_MESSAGE_COM_K44_72
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_72_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_72_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;73,挿入子宮口玩弄
;==================================================
@M_KOJO_MESSAGE_COM_K44_73
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_73_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_73_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;74,玩弄Ｓ状結腸
;==================================================
@M_KOJO_MESSAGE_COM_K44_74
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_74_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_74_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;75,隔着刺激陰道
;==================================================
@M_KOJO_MESSAGE_COM_K44_75
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_75_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_75_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		;尻穴処女
		IF TCVAR:Ａ破瓜
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;挿入継続
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && TCVAR:101 == PLAYER
		;前回射精した
		IF TCVAR:104
			PRINTFORMW
			RETURN 0
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;奉仕系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;80,手淫
;==================================================
@M_KOJO_MESSAGE_COM_K44_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_80_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;81,口交
;==================================================
@M_KOJO_MESSAGE_COM_K44_81
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_81_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_81_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;82,乳交
;==================================================
@M_KOJO_MESSAGE_COM_K44_82
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_82_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_82_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;83,素股
;==================================================
@M_KOJO_MESSAGE_COM_K44_83
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_83_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_83_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;84,泡泡浴
;==================================================
@M_KOJO_MESSAGE_COM_K44_84
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_84_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_84_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;85,足交
;==================================================
@M_KOJO_MESSAGE_COM_K44_85
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_85_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_85_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;88,真空口交
;==================================================
@M_KOJO_MESSAGE_COM_K44_88
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_88_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_88_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;89,喝套内精液
;==================================================
@M_KOJO_MESSAGE_COM_K44_89
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_89_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_89_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;逆肛交系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;90,被愛撫肛門
;==================================================
@M_KOJO_MESSAGE_COM_K44_90
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_90_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_90_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;91,被舐肛門
;==================================================
@M_KOJO_MESSAGE_COM_K44_91
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_91_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_91_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;92,被Ａ正常位
;==================================================
@M_KOJO_MESSAGE_COM_K44_92
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_92_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_92_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;93,被Ａ後背位
;==================================================
@M_KOJO_MESSAGE_COM_K44_93
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_93_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_93_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;94,被Ａ騎乗位
;==================================================
@M_KOJO_MESSAGE_COM_K44_94
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_94_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_94_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;加虐系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;100,打屁股
;==================================================
@M_KOJO_MESSAGE_COM_K44_100
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_100_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_100_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;101,鞭
;==================================================
@M_KOJO_MESSAGE_COM_K44_101
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_101_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_101_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;102,蝋燭
;==================================================
@M_KOJO_MESSAGE_COM_K44_102
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_102_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_102_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;103,針
;==================================================
@M_KOJO_MESSAGE_COM_K44_103
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_103_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_103_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;104,眼罩
;==================================================
@M_KOJO_MESSAGE_COM_K44_104
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_104_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_104_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:眼罩
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;105,縄
;==================================================
@M_KOJO_MESSAGE_COM_K44_105
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_105_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_105_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:縄
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 0
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;106,口球
;==================================================
@M_KOJO_MESSAGE_COM_K44_106
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_106_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_106_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:口球
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;107,拘束PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K44_107
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_107_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_107_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:口球
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;助手による指令、及びレズプレイ
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;120,強制舐陰
;==================================================
@M_KOJO_MESSAGE_COM_K44_120
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_120_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_120_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;121,貝あわせ
;==================================================
@M_KOJO_MESSAGE_COM_K44_121
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_121_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_121_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;123,给对方足交
;==================================================
@M_KOJO_MESSAGE_COM_K44_123
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_123_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_123_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;124,给对方手淫
;==================================================
@M_KOJO_MESSAGE_COM_K44_124
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_124_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_124_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;125,被愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K44_125
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_125_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_125_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;126,互揉胸部
;==================================================
@M_KOJO_MESSAGE_COM_K44_126
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_126_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_126_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;ハードな調教指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;140,深喉插入
;==================================================
@M_KOJO_MESSAGE_COM_K44_140
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_140_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_140_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;141,拳交
;==================================================
@M_KOJO_MESSAGE_COM_K44_141
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_141_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_141_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;142,肛門拳交
;==================================================
@M_KOJO_MESSAGE_COM_K44_142
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_142_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_142_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;143,両穴フィスト
;==================================================
@M_KOJO_MESSAGE_COM_K44_143
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_143_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_143_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;144,放尿
;==================================================
@M_KOJO_MESSAGE_COM_K44_144
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_144_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_144_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;145,肛門奉仕強制
;==================================================
@M_KOJO_MESSAGE_COM_K44_145
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_145_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_145_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;146,浣腸器＋肛塞
;==================================================
@M_KOJO_MESSAGE_COM_K44_146
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_146_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_146_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;浣腸液注入
	IF TEQUIP:浣腸
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;147,拡張氣球
;==================================================
@M_KOJO_MESSAGE_COM_K44_147
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_147_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_147_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:拡張氣球
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;148,肛門電極
;==================================================
@M_KOJO_MESSAGE_COM_K44_148
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_148_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_148_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:肛門電極
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;150,雙乳間抽插
;==================================================
@M_KOJO_MESSAGE_COM_K44_150
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_150_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_150_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;=================================================
;特殊指令
;=================================================
;-------------------------------------------------
;180,潤滑液
;-------------------------------------------------
@M_KOJO_MESSAGE_COM_K44_180
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_180_1
RETURN RESULT

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

	;CFLAG:1500 == 十進数
	;0.イベントがオフだよ　選択肢が出るよ　　初期値の事情だよ
	;1.イベントがオンだよ　選択肢が出るよ
	;2.イベントがオフだよ　選択肢を出さないよ
	;3.イベントがオンだよ　選択肢を出さないよ
	;4.イベントがオフだよ　選択肢が出るよ　　bit2が真だよ

	;1=オン（bit0）　2=選択肢を出さないよ（bit1）
	;4=簡単に条件を付け足せるよ（bit2）

	;GETBIT (CFLAG:1500,1)　ここの1は二進数の二桁目の事　間違いやすいよ
	;(CFLAG:1500,1)の数値真(0以外主に1)偽(0)を見るよ

	;SETBIT STAIN:1,7　二進数の八桁目を真(主に1)にするよ
	;十進数で言えば　+128されていない場合+128するよ

	;CLEARBIT STAIN:1,7　二進数の八桁目を偽(0)にするよ
	;十進数で言えば　既に+128されている場合に限り-128するよ

	;INVATEBIT STAIN:1,7　二進数の八桁目を反転させるよ
	;十進数で言えば　+128されていない場合+128　既に+128されている場合-128するよ

	;時間停止フラグがかつ参照する事のbit1(選択肢を出さないよ)が偽なら選択肢が出る
	SIF !FLAG:70 && !GETBIT(CFLAG:1500,1)
		CALL M_KOJO_MESSAGE_COM_K44_180_選択肢

	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF FLAG:時間停止
			;時間稼働中に始動している場合の矛盾解消
			IF GETBIT(STAIN:1,7)
				PRINTFORML 時間稼働中に始動している場合の矛盾解消　初
				RETURN 0
			;それ以外　時間停止潤滑液
			;時間停止塗り塗り分岐は無い　きっとそれが正義
			ELSE
				PRINTFORML 時間停止潤滑液　初
				RETURN 0
			ENDIF

		;以降!FLAG:時間停止　「発言」は概ねここから

		;分岐条件　巧克力塗れの手ペロペロ分岐
		;足的污垢は無いので手を手足として代用
		;別の形で巧克力を塗った時もここに来るので一応イベントフラグも条件に追加
		ELSEIF GETBIT(STAIN:1,7) && GETBIT(CFLAG:1500,0)
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 恋慕ペロペロ　初
				;お手々の巧克力舐め取ったよ
				;CLEARBIT STAIN:1,7
				RETURN 0
			;それ以外　ゲーム蔷薇ンス次第で恋慕無し恋人有りなんてケースも有り得る
			ELSE
				PRINTFORML ペロペロ　初
				RETURN 0
			ENDIF
		;分岐条件　CFLAG:1500のbit0の値これ真ならイベント発生　塗り塗り分岐
		ELSEIF GETBIT(CFLAG:1500,0)
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 恋慕塗り塗り　初
				;お手々べとべと
				SETBIT STAIN:1,7
				RETURN 0
			;それ以外　ゲーム蔷薇ンス次第で恋慕無し恋人有りなんてケースも有り得る
			ELSE
				PRINTFORML 塗り塗り　初
				;お手々べとべと
				SETBIT STAIN:1,7
				RETURN 0
			ENDIF
		;それ以外　潤滑液分岐
		ELSE
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 恋慕潤滑液分岐　初
				RETURN 0
			;それ以外　ゲーム蔷薇ンス次第で恋慕無し恋人有りなんてケースも有り得る
			ELSE
				PRINTFORML それ以外潤滑液分岐　初
				RETURN 0
			ENDIF
		ENDIF

	;以降!FIRSTTIME　時間停止中に初回を迎えた場合との兼ね合いに注意
	ELSE
		IF FLAG:時間停止
			;時間稼働中に始動している場合の矛盾解消
			IF GETBIT(STAIN:1,7)
				PRINTFORML 時間稼働中に始動している場合の矛盾解消
				RETURN 0
			;それ以外　時間停止潤滑液
			ELSE
				PRINTFORML 時間停止潤滑液
				RETURN 0
			ENDIF

		;以降!FLAG:時間停止　「発言」は概ねここから

		;分岐条件　巧克力塗れの手ペロペロ分岐
		;足的污垢は無いので手を手足として代用
		;別の形で巧克力を塗った時もここに来るので一応イベントフラグも条件に追加
		ELSEIF GETBIT(STAIN:1,7) && GETBIT(CFLAG:1500,0)
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 恋慕ペロペロ
				;お手々の巧克力舐め取ったよ
				;CLEARBIT STAIN:1,7
				RETURN 0
			;それ以外　ゲーム蔷薇ンス次第で恋慕無し恋人有りなんてケースも有り得る
			ELSE
				PRINTFORML ペロペロ
				RETURN 0
			ENDIF
		;分岐条件　CFLAG:1500のbit0の値これ真ならイベント発生　塗り塗り分岐
		ELSEIF GETBIT(CFLAG:1500,0)
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 恋慕塗り塗り
				;お手々べとべと
				SETBIT STAIN:1,7
				RETURN 0
			;それ以外　ゲーム蔷薇ンス次第で恋慕無し恋人有りなんてケースも有り得る
			ELSE
				PRINTFORML 塗り塗り
				;お手々べとべと
				SETBIT STAIN:1,7
				RETURN 0
			ENDIF
		;それ以外　潤滑液分岐
		ELSE
			;ここに恋慕有無を問わない描写も書けるよ
			;PRINTFORML
			;恋慕
			IF TALENT:恋慕
				PRINTFORML 恋慕潤滑液分岐
				RETURN 0
			;それ以外　ゲーム蔷薇ンス次第で恋慕無し恋人有りなんてケースも有り得る
			ELSE
				PRINTFORML 潤滑液分岐
				RETURN 0
			ENDIF
			;ここに恋慕有無を問わない描写を書いても二行上六行上のRETURN 0で引き返しているから表示されないよ
			;PRINTFORML
		ENDIF
	ENDIF
ENDIF
;リターンしないとそのまま次まで突っ切って行っちゃうよ
;1は7行目のCALL M_KOJO_MESSAGE_COM_K44_180_1に送られ8行目のRETURN RESULTに引き渡されるよ
RETURN 1
;-------------------------------------------------
;選択肢構文
;-------------------------------------------------
@M_KOJO_MESSAGE_COM_K44_180_選択肢

PRINTL 問

PRINT [0] 是
PRINT [1] 否
;PRINT [2] 保留
PRINT [9] 其他
;改行で整える為の物
PRINTL

$INPUT_LOOP＿K44_180_選択肢
INPUT

SELECTCASE RESULT
	CASE 0
		PRINTL 是を選択しました
			CFLAG:1500 = 3
	CASE 1
		PRINTL 否を選択しました
			CFLAG:1500 = 2
	CASE 2
		PRINTL ボタンをコメントアウトしても反応するよ！保留するよ！
			CFLAG:1500 = 0
	CASE 9
		PRINTL 其他
		PRINTL 選びなおし
		GOTO INPUT_LOOP＿K44_180_選択肢
	CASEELSE
		PRINTFORMW 選びなおし
		GOTO INPUT_LOOP＿K44_180_選択肢
	ENDSELECT
PRINTFORMW 案内文

RETURN 1
;-------------------------------------------------

;==================================================
;181,媚薬,
;==================================================
@M_KOJO_MESSAGE_COM_K44_181
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_181_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_181_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;182,利尿剤,
;==================================================
@M_KOJO_MESSAGE_COM_K44_182
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_182_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_182_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;183,攝像機,
;==================================================
@M_KOJO_MESSAGE_COM_K44_183
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_183_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_183_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:视频拍摄
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;187,浴室PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K44_187
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_187_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_187_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:浴室PLAY
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;188,淋浴
;==================================================
@M_KOJO_MESSAGE_COM_K44_188
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_188_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_188_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:淋浴
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;==================================================
;189,新妻PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K44_189
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_189_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_189_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:新妻PLAY
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;190,新妻（になる）プレイ
;==================================================
@M_KOJO_MESSAGE_COM_K44_190
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K44_190_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K44_190_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:圍裙
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 0
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 0
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 0
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;1,六九式
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_1
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_1_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_1_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;2,岩清水
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_2
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_2_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_2_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;3,Gスポット刺激
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_3
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_3_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_3_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;4,乱牡丹
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_4
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_4_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_4_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;5,手淫口交
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_5
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_5_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_5_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;6,挿入Ｇスポ責め
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_6
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_6_1
RETURN 1
@M_KOJO_MESSAGE_SCOM_K44_6_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;7,挿入子宮口玩弄
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_7
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_7_1
RETURN 1
@M_KOJO_MESSAGE_SCOM_K44_7_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;8,６９乳交
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_8
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_8_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_8_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;9,雙重口交
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_9
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_9_1
;戻り値とTARGETを保存、TARGETを二人目に一時的に交代して二人目口上を呼び出した後、TARGETをもどして保存した戻り値でRETURNする
;二人目是らない場合はここで処理
;二人目
LOCAL = MASTER_POSE(4,1,1)
LOCAL:1 = RESULT
LOCAL:2 = TARGET
TARGET = LOCAL
TRYCALLFORM M_KOJO_MESSAGE_SCOM_K{TARGET}_9_2
TARGET = LOCAL:2
RETURN LOCAL:1

;一人目口上
@M_KOJO_MESSAGE_SCOM_K44_9_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;二人目口上
@M_KOJO_MESSAGE_SCOM_K44_9_2
VARSET LOCAL
;一人目
LOCAL:101 = MASTER_POSE(4,1)
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF

;==================================================
;10,雙重素股
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_10
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_10_1
;戻り値とTARGETを保存、TARGETを二人目に一時的に交代して二人目口上を呼び出した後、TARGETをもどして保存した戻り値でRETURNする
;二人目是らない場合はここで処理
;二人目
LOCAL = MASTER_POSE(2,1,1)
LOCAL:1 = RESULT
LOCAL:2 = TARGET
TARGET = LOCAL
TRYCALLFORM M_KOJO_MESSAGE_SCOM_K{TARGET}_10_2
TARGET = LOCAL:2
RETURN LOCAL:1

@M_KOJO_MESSAGE_SCOM_K44_10_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

@M_KOJO_MESSAGE_SCOM_K44_10_2
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF

;==================================================
;11,雙重乳交
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_11
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_11_1
;戻り値とTARGETを保存、TARGETを二人目に一時的に交代して二人目口上を呼び出した後、TARGETをもどして保存した戻り値でRETURNする
;二人目是らない場合はここで処理
;二人目
LOCAL = MASTER_POSE(5,1,1)
LOCAL:1 = RESULT
LOCAL:2 = TARGET
TARGET = LOCAL
TRYCALLFORM M_KOJO_MESSAGE_SCOM_K{TARGET}_11_2
TARGET = LOCAL:2
RETURN LOCAL:1

@M_KOJO_MESSAGE_SCOM_K44_11_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

@M_KOJO_MESSAGE_SCOM_K44_11_2
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF

;==================================================
;12,乳夾口交
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_12
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_12_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_12_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;13,交互挿入
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_13
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_13_1
;戻り値とTARGETを保存、TARGETを二人目に一時的に交代して二人目口上を呼び出した後、TARGETをもどして保存した戻り値でRETURNする
;二人目是らない場合はここで処理
;二人目
LOCAL = MASTER_POSE(6,1,1)
LOCAL:1 = RESULT
LOCAL:2 = TARGET
TARGET = LOCAL
TRYCALLFORM M_KOJO_MESSAGE_SCOM_K{TARGET}_13_2
TARGET = LOCAL:2
RETURN LOCAL:1

@M_KOJO_MESSAGE_SCOM_K44_13_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

@M_KOJO_MESSAGE_SCOM_K44_13_2
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;==================================================
;14,玩弄Ｓ状結腸
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_14
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_14_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_14_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
;CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;==================================================
;17,同時吸乳头
;==================================================
@M_KOJO_MESSAGE_SCOM_K44_17
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K44_17_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K44_17_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(TFLAG:50 + 500)
		PRINTFORMW
		RETURN 0
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 0
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 0
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 0
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 0
	ENDIF
ENDIF
;未記入
CALLFORM M_KOJO_MESSAGE_COM_K44_{SELECTCOM}_1
RETURN 1

;SOURCEやNOWEXを使ってSELECTCOMに依存しない口上があってもいいんじゃない
@M_KOJO_MESSAGE_COM_K44_00
;性交処女喪失をRETURN 100して
;IF RESULT == 100 でまとめるとか
;苦痛や快楽のSOURCEをトリガーとして汎用あえぎ口上を作るとか
;いろいろ利用方法は考えられますが随意やってください

;-------------------------------------------------
;奴隷の絶頂時の口上
;NOWEX:Ｃ絶頂～4 CVABM絶頂
;NOWEX:二重絶頂 二重絶頂
;NOWEX:三重絶頂 三重絶頂
;NOWEX:四重絶頂 四重絶頂
;NOWEX:五重絶頂 五重絶頂
;NOWEX:噴乳 噴乳
;NOWEX:射精 射精
;NOWEX:放尿 放尿
;随意組み合わせて使ってください
;-------------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_B_K44
CALL PALAM_MESSAGE_B
;-------------------------------------------------
;噴乳
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && NOWEX:噴乳
	;恋人かつ恋慕なら異常経験上がらない
	SIF TALENT:恋人 && TALENT:恋慕 && FIRSTTIME(1051)
	EXP:異常経験 -= 1
ENDIF
;-------------------------------------------------
;射精
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:射精
	PRINTFORMW
ENDIF
;-------------------------------------------------
;放尿
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:放尿
	PRINTFORMW
ENDIF

;-------------------------------------------------
;絶頂
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !FLAG:70 && !CFLAG:睡眠
;絶頂後処理
IF NOWEX:0 || NOWEX:1 || NOWEX:2 || NOWEX:3
	;イったフラグ
	TCVAR:387 += 1
ENDIF
SIF NOWEX:Ｃ絶頂
TCVAR:382 += 1
SIF NOWEX:Ｖ絶頂
TCVAR:383 += 1
SIF NOWEX:Ａ絶頂
TCVAR:384 += 1
SIF NOWEX:Ｂ絶頂
TCVAR:385 += 1
SIF NOWEX:Ｍ絶頂
TCVAR:388 += 1
	;-------------------------------------------------
	;五重絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF NOWEX:五重絶頂
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;四重絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF NOWEX:四重絶頂
		;部位を指定せず簡易的に書く場合、[SKIPSTART]&[SKIPEND]のコメントアウトを外して、[SKIPSTART]とこのコメントの間に書いてください
		[SKIPSTART]
		SELECTCASE NOWEX:四重絶頂
			;Ｃ＆Ｖ＆Ａ＆Ｂ絶頂
			CASE 1
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｖ＆Ａ＆Ｍ絶頂
			CASE 2
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｖ＆Ｂ＆Ｍ絶頂
			CASE 3
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ａ＆Ｂ＆Ｍ絶頂
			CASE 4
				PRINTFORMW
				RETURN 1
			;Ｖ＆Ａ＆Ｂ＆Ｍ絶頂
			CASE 5
				PRINTFORMW
				RETURN 1
		ENDSELECT
		[SKIPEND]
	ENDIF
	;-------------------------------------------------
	;三重絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF NOWEX:三重絶頂
		;部位を指定せず簡易的に書く場合、[SKIPSTART]&[SKIPEND]のコメントアウトを外して、[SKIPSTART]とこのコメントの間に書いてください
		[SKIPSTART]
		SELECTCASE NOWEX:三重絶頂
			;Ｃ＆Ｖ＆Ａ絶頂
			CASE 1
				PRINTFORMW
				RETURN 1
			;Ｂ＆Ｖ＆Ａ絶頂
			CASE 2
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｂ＆Ａ絶頂
			CASE 3
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｖ＆Ｂ絶頂
			CASE 4
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｖ＆Ｍ絶頂
			CASE 5
				PRINTFORMW
				RETURN 1
			;Ｂ＆Ｖ＆Ｍ絶頂
			CASE 6
				PRINTFORMW
				RETURN 1
			;Ａ＆Ｖ＆Ｍ絶頂
			CASE 7
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｂ＆Ｍ絶頂
			CASE 8
				PRINTFORMW
				RETURN 1
			;Ａ＆Ｂ＆Ｍ絶頂
			CASE 9
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ａ＆Ｍ絶頂
			CASE 10
				PRINTFORMW
				RETURN 1
		ENDSELECT
		[SKIPEND]
	ENDIF
	;三重絶頂以上
	IF NOWEX:三重絶頂 || NOWEX:四重絶頂 || NOWEX:五重絶頂
		;絶頂加算
		TCVAR:381 += 1
		TCVAR:387 += 2
	ENDIF
	;-------------------------------------------------
	;二重絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF NOWEX:二重絶頂
		;部位を指定せず簡易的に書く場合、[SKIPSTART]&[SKIPEND]のコメントアウトを外して、[SKIPSTART]とこのコメントの間に書いてください
		[SKIPSTART]
		SELECTCASE NOWEX:二重絶頂
			;Ｃ＆Ｖ絶頂
			CASE 1
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ａ絶頂
			CASE 2
				PRINTFORMW
				RETURN 1
			;Ｖ＆Ａ絶頂
			CASE 3
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｂ絶頂
			CASE 4
				PRINTFORMW
				RETURN 1
			;Ｖ＆Ｂ絶頂
			CASE 5
				PRINTFORMW
				RETURN 1
			;Ａ＆Ｂ絶頂
			CASE 6
				PRINTFORMW
				RETURN 1
			;Ａ＆Ｍ絶頂
			CASE 7
				PRINTFORMW
				RETURN 1
			;Ｖ＆Ｍ絶頂
			CASE 8
				PRINTFORMW
				RETURN 1
			;Ｃ＆Ｍ絶頂
			CASE 9
				PRINTFORMW
				RETURN 1
			;Ｂ＆Ｍ絶頂
			CASE 10
				PRINTFORMW
				RETURN 1
		ENDSELECT
		[SKIPEND]
	ENDIF
	IF NOWEX:Ｃ絶頂
		;超強絶頂Ｃ
		IF NOWEX:Ｃ絶頂 == 3
			PRINTFORMW
		;強絶頂Ｃ
		ELSEIF NOWEX:Ｃ絶頂 == 2
			PRINTFORMW
		;絶頂Ｃ
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	IF NOWEX:Ｖ絶頂
		;超強絶頂Ｖ
		IF NOWEX:Ｖ絶頂 == 3
			PRINTFORMW
		;強絶頂Ｖ
		ELSEIF NOWEX:Ｖ絶頂 == 2
			PRINTFORMW
		;絶頂Ｖ
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	IF NOWEX:Ａ絶頂
		;超強絶頂Ａ
		IF NOWEX:Ａ絶頂 == 3
			PRINTFORMW
		;強絶頂Ａ
		ELSEIF NOWEX:Ａ絶頂 == 2
			PRINTFORMW
		;絶頂Ａ
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	IF NOWEX:Ｂ絶頂
		;強絶頂Ｂ
		IF NOWEX:Ｂ絶頂 == 3
			PRINTFORMW
		;強絶頂Ｂ
		ELSEIF NOWEX:Ｂ絶頂 == 2
			PRINTFORMW
		;絶頂Ｂ
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	IF NOWEX:Ｍ絶頂
		;超強絶頂Ｍ
		IF NOWEX:Ｍ絶頂 == 3
			PRINTFORMW
		;強絶頂Ｍ
		ELSEIF NOWEX:Ｍ絶頂 == 2
			PRINTFORMW
		;絶頂Ｍ
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ENDIF

;監視用
;御香用
IF TCVAR:373 == 1
	;你の勃起度と精力を最大にしつつ互相用気力を少しずつ回復という升仕様。艾倫限定かつ比較的レアだから大丈夫…よね？
	PALAM:欲情 += (ABL:親密 * 1000)
	PALAM:潤滑 += (ABL:欲望 * 500)
	BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
	BASE:MASTER:精力 = MAXBASE:MASTER:精力
	BASE:気力 += 50
	BASE:MASTER:気力 += 50
ENDIF

;魔法の披露が出来るかどうか
IF CFLAG:1008 > 40 && TIME:5 <= 3
	CFLAG:1011 = 1
ELSE
	CFLAG:1011 = 0
ENDIF

;月に願いを
SIF CFLAG:1013 == 1 && DAY:3 > 1 && DAY:3 < 31
CFLAG:1013 = 0

;連打防止解除
SIF TCVAR:362 == 1
TCVAR:362 = 0

;健全時
IF CFLAG:1891 == 0; || TALENT:妊娠
	SIF ABL:欲望 > 10
	ABL:欲望 = 10
	SIF CFLAG:积攒度 > 300
	CFLAG:积攒度 = 300
ENDIF

;兒童の描写をオフにしているならここで吃飯のTCVARを消す
IF !FLAG:兒童描写 && GROUPMATCH(SELECTCOM, 414, 415)
	TCVAR:360 = 0
	TCVAR:361 = 0
ENDIF

;-------------------------------------------------
;射精に関する口上の表示
;一時的にTARGETを口上主に設定している
;-------------------------------------------------

@M_KOJO_MESSAGE_PALAMCNG_A_K44_0(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;避孕套
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_23(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;深喉插入
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_22(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;六九式
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;同時射精
	IF NOWEX:射精 && NOWEX:MASTER:11
		PRINTFORMW
		;射精加算
		TCVAR:386 += 1
		RETURN 1
	;TARGETだけ射精
	ELSEIF NOWEX:射精
		;PLAYERについてる
		IF TALENT:PLAYER & 2
			PRINTFORMW
			RETURN 1
		;付いてない
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;PLAYERだけ射精
	ELSE
	;射精加算
	TCVAR:386 += 1
		;TARGETについてる
		IF TALENT:2 & 2
			PRINTFORMW
			RETURN 1
		;付いてない
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_21(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;乳夾口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_20(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;手淫口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_9(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;肛門奉仕
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_8(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;泡泡浴
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;同時射精
	IF NOWEX:射精 && NOWEX:MASTER:11
		PRINTFORMW
		;射精加算
		TCVAR:386 += 1
		RETURN 1
	;TARGETだけ射精
	ELSEIF NOWEX:射精
		;PLAYERについてる
		IF TALENT:PLAYER & 2
			PRINTFORMW
			RETURN 1
		;付いてない
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;PLAYERだけ射精
	ELSE
	;射精加算
	TCVAR:386 += 1
		;TARGETについてる
		IF TALENT:2 & 2
			PRINTFORMW
			RETURN 1
		;付いてない
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_7(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;足交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_6(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;素股
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_5(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;乳交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_4(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_3(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;手淫
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_2(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;肛門
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0

@M_KOJO_MESSAGE_PALAMCNG_A_K44_1(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;膣内
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	;射精加算
	TCVAR:386 += 1
	RETURN 1
ENDIF
RETURN 0
@M_KOJO_MESSAGE_PALAMCNG_F_K44(ARG)
CALL PALAM_MESSAGE_F
;-------------------------------------------------
;挑逗
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1
;-------------------------------------------
;調教後の文本
;TFLAG:8 (1=TARGETがお掃除 2=ASSIがお掃除 3=TARGETとASSIがお掃除)
;-------------------------------------------
;なんかこっちだと表示されないんでー（現状こちら側だと表示されますので修正させていただきました
@M_KOJO_MESSAGE_PALAMCNG_C_K44
CALL PALAM_MESSAGE_C
;処女喪失
IF TCVAR:破瓜
	;正真正銘処女喪失
	IF TCVAR:破瓜 == 1
		SIF TALENT:恋慕 && !TCVAR:烂醉 && !FLAG:70
			PRINTFORMW 「虽然有点疼…我的第一次能给%CALLNAME:MASTER%感觉很幸福%UNICODE(0x2665)%//」
	;再生処女喪失
	ELSEIF TCVAR:破瓜 == 2
	;無自覚非処女喪失
	ELSEIF TCVAR:破瓜 == -1
	ENDIF
ENDIF
;
;Ａ処女喪失
IF TCVAR:Ａ破瓜
	;正真正銘Ａ処女喪失
	IF TCVAR:Ａ破瓜 == 1
	;無自覚Ａ処女喪失
	ELSEIF TCVAR:Ａ破瓜 == -1
	ENDIF
ENDIF

;口交で射精後のお掃除
IF (TCVAR:MASTER:112 == 1 || TCVAR:MASTER:112 == 2) && SELECTCOM == 81
	PRINTFORMW 「啾…、这样就变干净了//」
ENDIF
[SKIPSTART]
@M_KOJO_MESSAGE_PALAMCNG_C_K44
CALL PALAM_MESSAGE_C
;処女喪失
IF TFLAG:4
	SIF TALENT:恋慕 && !TCVAR:烂醉 && !FLAG:70
	PRINTFORMW 「虽然有点疼…我的第一次能给%CALLNAME:MASTER%感觉很幸福%UNICODE(0x2665)%//」
ENDIF

;口交で射精後のお掃除
IF (TFLAG:8 & 1) && NOWEX:PLAYER:11
	PRINTFORMW 「啾…、这样就变干净了//」
ENDIF
[SKIPEND]
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K44
;このままだと地の文が表示されません
;地の文を表示したい方は、下記のコメントアウトを削除して下さい
CALL MARK_MESSAGE
;苦痛刻印
IF TFLAG:苦痛刻印取得 == 1
	PRINTFORMW
ELSEIF TFLAG:苦痛刻印取得 == 2
	PRINTFORMW
ELSEIF TFLAG:苦痛刻印取得 == 3
	PRINTFORMW
ENDIF

;時姦刻印
IF TFLAG:時姦刻印取得 == 1
	PRINTFORMW
ELSEIF TFLAG:時姦刻印取得 == 2
	PRINTFORMW
ELSEIF TFLAG:時姦刻印取得 == 3
	PRINTFORMW
ENDIF

[SKIPSTART]
;快楽刻印
IF TFLAG:23 == 1
	PRINTFORMW
ELSEIF TFLAG:23 == 2
	PRINTFORMW
ELSEIF TFLAG:23 == 3
	PRINTFORMW
ENDIF
[SKIPEND]

;不埒刻印
;快楽による刻印
;LV1
IF TFLAG:24 == 11
	PRINTFORMW
;LV2
ELSEIF TFLAG:24 == 12
	PRINTFORMW
;LV3
ELSEIF TFLAG:24 == 13
	PRINTFORMW
;屈服、恭順による刻印
;LV1
ELSEIF TFLAG:24 == 31
	PRINTFORMW
;LV2
ELSEIF TFLAG:24 == 32
	PRINTFORMW
;LV3
ELSEIF TFLAG:24 == 33
	PRINTFORMW
ENDIF

;反発刻印
IF TFLAG:反発刻印取得 == 1
	PRINTFORMW
ELSEIF TFLAG:反発刻印取得 == 2
	PRINTFORMW
ELSEIF TFLAG:反発刻印取得 == 3
	PRINTFORMW
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【44】エレン/M_KOJO_K44_コマンド.ERB