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

@M_KOJO_MESSAGE_COM_K111_300_1
#DIM POINT
#DIM 约会会話, 120
;日が変わってたら约会会話リセット
SIF !TCVAR:111:353
	VARSET 约会会話
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	RESETCOLOR
	DRAWLINE
	;ここに口上書いて下さい
	IF ALCOHOL_FACE(111) == "酔酒" || ALCOHOL_FACE(111) == "不省人事"
		PRINTFORML %CALLNAME:MASTER%尝试向%CALLNAME:TARGET%搭话、可%CALLNAME:TARGET%口齿不清完全听不懂在说些什么
	;会話不能の地の文は恋慕でない場合は省略できず、恋慕の時は表示されないので、ここではどちらの場合も同じように表示されるようにする
	ELSEIF TCVAR:111:会話不能
		IF TALENT:111:恋慕
			PRINTFORML 虽然想向%CALLNAME:TARGET%搭话、可是不知道该说些什么
			PRINTFORMW 四周弥漫着尴尬的气氛…
		ENDIF
	ELSE
		;约会会話
		IF FLAG:约会的对象 == [[克勞恩皮絲]] && DATENAME_SPOT() != "道中" && !约会会話:(CFLAG:111:現在位置 / 10)
			CLEARLINE 2
			PRINTFORML 在%DATENAME_SPOT()%约会
			DRAWLINE
		ENDIF
		PRINTFORM %CALLNAME:MASTER%
		IF TALENT:111:恋慕 && !M_KOJO_K111_FUKIGEN(111)
			PRINTDATA
				DATAFORM 坐到了%CALLNAME:TARGET%身旁
				DATAFORM 有些害羞的和%CALLNAME:TARGET%
				DATAFORM 在相互微笑着的同时
				DATAFORM 在一片和睦的气氛中
				DATAFORM 简短地寒暄了一番后
				DATAFORM 一邊和%CALLNAME:TARGET%玩鬧一邊
			ENDDATA
		ELSE
			PRINTDATA
				DATAFORM 有些无聊地
				DATAFORM 无言地
				DATAFORM 客套地
				DATAFORM 平和地
				DATAFORM 一如往常地
				DATAFORM 稍稍地
				DATAFORM 滑稽地
			ENDDATA
		ENDIF
		IF TFLAG:SELECTCOM的分岐 > 0
			PRINTFORML 谈性十足地交流着
		ELSEIF TFLAG:SELECTCOM的分岐 < 0
			PRINTFORML 话说到一半……
		ELSE
			PRINTFORML 說着話
		ENDIF
	ENDIF
	PRINTW
	CALL M_KOJO_COLOR_K111
	IF ALCOHOL_FACE(111) == "酔酒" || ALCOHOL_FACE(111) == "不省人事"
		IF !RAND:2
			PRINTFORML 「欸嘿嘿♪ 喝酒超棒的♪ 还有，同样喜欢喝酒的%CALLNAME:MASTER%也是我的最爱哦❤」
			PRINTFORMW 「～～ッ！！＠＃！＄％！？＊＊＊＊ッ！！」
		ELSE
			PRINTFORML 「然后～～、打開瓶子～～～一下子喝掉～～～～～！」
			PRINTFORMW 「很快就会～～醉过去、哈～～～～哈哈哈、嘿呀呀呀呀！！」
		ENDIF
		PRINTFORML
		PRINTFORMDW 完全无法交谈的样子...
	ELSEIF M_KOJO_K111_FUKIGEN(111)
		PRINTFORML 「什么鬼！？」
		PRINTFORMW 「准备就这样丢下我去和别的女孩子说话？」
	;会話不能
	ELSEIF TCVAR:111:会話不能
		PRINTFORML 「还来...？」
		PRINTFORMW 「这种没劲的话题要说几次啊..」
	;失敗
	ELSEIF TFLAG:SELECTCOM的分岐 == -1
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「嗯ー、啊嗯唔唔ー」
			PRINTFORMW 「好没劲的话题啊啊啊！」
		CASE 2
			PRINTFORML 「%CALLNAME:MASTER%喜欢说我听不懂的话题」
			PRINTFORMW 「这样的男孩子会被女孩子讨厌哦ー」
		CASEELSE
			PRINTFORML 「嗯...」
			PRINTFORMW 「皮斯不是很懂你在说什么」
		ENDSELECT
	;夏,野外,汗フラグ無,昼間,地上,晴天で確定
	ELSEIF DAY:2 == 2 && OUTROOF(CFLAG:111:現在位置) && !TCVAR:111:350 && INRANGE(TIME, 600, 960) && M_KOJO_K111_EARTH(CFLAG:111:現在位置) && 天候 < 2
		;暑いの大好きだった
		SELECTCASE RAND:5
		CASE 1
			PRINTFORML 「%CALLNAME:MASTER%、热不热？ 是不是热的受不了？」
			PRINTFORMW 「哈哈！真棒！ 看人被晒得晕头转向的样子可是我的兴趣之一♪」
			TALENT:111:心情 = 1
;			PRINTFORML 「毎日暑いね……」
;			PRINTFORMW 「灼熱地獄に比べたらこれでも涼しい方なんだろうケド」
		CASE 2
			PRINTFORML 「居然，每天都能被如此阳光照射……」
			PRINTFORMW 「体内的热情、动力都被燃烧起来了，就是所谓热血沸腾吧！！」
;			PRINTFORMW 「地上もこんなに暑いなんて……」
		CASE 3
			PRINTFORML 「对于生在地狱长在地狱的我来说」
			PRINTFORMW 「没有什么比夏日的阳光直射更棒的了～♪」
		CASE 4
			PRINTFORML 「沐浴在阳光下的我，浑身充满了力量！」
			PRINTFORMW 「呜哇哇ー！ 燃起来了ー！！」
			TALENT:111:心情 = 1
		CASEELSE
			PRINTFORML 「和灼热地狱比起来只是毛毛雨啦」
			PRINTFORMW 「但可以感觉到太阳光蕴含的能量，大概和灼热地狱是不同的原理～」
;			PRINTFORML 「ぐでー……あついー……」
;			PRINTFORMW 「%CALLNAME:MASTER%、この暑さなんとかならないのー？」
		ENDSELECT
		PRINTL
		PRINTFORMDL 紧贴克劳恩皮斯大腿的裤袜，细看之下散发着丝缕热气
		PRINTFORMDW 总觉得…很热吧…
		TCVAR:111:350 = 1
	;禮物会話１（禮物の礼物）,フラグ発生から5日以上
	ELSEIF CFLAG:[[克勞恩皮絲]]:1005 && DAY - CFLAG:[[克勞恩皮絲]]:1005 >= 5
		PRINTFORMW 「啊、想起来了！ 今天要把这个给%CALLNAME:MASTER%」
		;12日以上
		SIF DAY - CFLAG:[[克勞恩皮絲]]:1005 >= 12
			PRINTFORML 「%CALLNAME:MASTER%是忘记了吗……」
		PRINTFORMW 「是之前说的礼物哦！」
		SELECTCASE RAND:8
		CASE 1
			LOCALS:1 = 狂気的
		CASE 2
			LOCALS:1 = 地獄的
		CASE 3
			LOCALS:1 = 滑稽的
		CASE 4
			LOCALS:1 = 亲自做的
		CASEELSE
			LOCALS:1 = 星星与条纹的
		ENDSELECT
		SELECTCASE RAND:8
		CASE 1
			LOCALS:2 = 手帕
		CASE 2
			LOCALS:2 = 头巾
		CASE 3
			LOCALS:2 = 首饰
		CASE 4
			LOCALS:2 = 马克杯
		CASE 5
			LOCALS:2 = 小灯
		CASE 6
			LOCALS:2 = 宝石
		CASE 7
			LOCALS:2 = 戒指
		CASEELSE
			IF TALENT:MASTER:性別 == 1
				LOCALS:2 = 丝带
			ELSE
				LOCALS:2 = 领带
			ENDIF
		ENDSELECT
		CALL GIFT_ORDER_MADE_FROM_CHARA([[克勞恩皮絲]], LOCALS:1, LOCALS:2)
		PRINTL
		CALL COLORMESSAGE(@"克勞恩皮絲から【%RESULTS%】を貰った！", C_AQUA, 2)
		PRINTL
		PRINTFORMW 「毕竟是我送给你的礼物、不需要你感谢的话了哦！」
		CFLAG:[[克勞恩皮絲]]:1005 = 0
	;禮物会話２（圣诞节禮物）,フラグ発生から1日以上12日以内
	ELSEIF CFLAG:[[克勞恩皮絲]]:1006 && INRANGE(DAY - CFLAG:[[克勞恩皮絲]]:1006, 1, 12)
		PRINTFORMW 「嗯……%CALLNAME:MASTER%……给你这个……」
		;年越してる
		SIF DAY - CFLAG:[[克勞恩皮絲]]:1006 > 7
			PRINTFORML 「虽说过了很久才给你……」
		PRINTFORMW 「圣诞节礼物……一直都很想要对吧！」
		PRINTFORMW 「所以，这个给你！」
		SELECTCASE RAND:8
		CASE 1
			LOCALS:1 = 圣诞节的
		CASE 2
			LOCALS:1 = 幽灵的
		CASE 3
			LOCALS:1 = 圣诞老人的
		CASE 4
			LOCALS:1 = 驯鹿的
		CASE 5
			LOCALS:1 = 圣诞夜的
		CASE 6
			LOCALS:1 = 下雪的
		CASE 7
			LOCALS:1 = 星星与条纹的
		CASEELSE
			LOCALS:1 = 雪与星的
		ENDSELECT
		SELECTCASE RAND:8
		CASE 1
			LOCALS:2 = 怀表
		CASE 2
			LOCALS:2 = 小灯
		CASE 3
			LOCALS:2 = 手套
		CASE 4
			LOCALS:2 = 卡片
		CASEELSE
			LOCALS:2 = スノードーム
		ENDSELECT
		CALL GIFT_ORDER_MADE_FROM_CHARA([[克勞恩皮絲]], LOCALS:1, LOCALS:2)
		PRINTL
		CALL COLORMESSAGE(@"克勞恩皮絲から【%RESULTS%】を貰った！", C_AQUA, 2)
		PRINTL
		PRINTFORMW 「明年的话，该轮到%CALLNAME:MASTER%送给我了哦！！」
		CFLAG:[[克勞恩皮絲]]:1006 = 0
	;约会会話
	ELSEIF FLAG:约会的对象 == [[克勞恩皮絲]] && DATENAME_SPOT() != "道中" && !约会会話:(CFLAG:111:現在位置 / 10)
		POINT = CFLAG:111:現在位置 / 10
		;▼博麗神社
		SELECTCASE STR:(POINT + 6000)
		CASE "桜花道的鳥居"
			;春
			IF DAY:2 == 1
				PRINTFORML 「这里的樱花很美吧！」
				PRINTFORMW 「第一次看到的时候，连心底都被震撼到了！」
			;春以外
			ELSE
				PRINTFORML 「这里的樱花很棒的！」
				PRINTFORMW 「记不清已经多少年春天都来这里赏花了ー♪」
			ENDIF
		CASE "神社境内"
			PRINTFORML 「要注意一下博丽的巫女！」
			PRINTFORMW 「每次恶作剧她总会第一个跑来干扰」
		CASE "神社本堂"
			PRINTFORML 「既然是神社，那肯定有神明住在里面吧」
			PRINTFORMW 「会不会比主人更强呢？」
		CASE "神社走廊"
			;TW内の設定では別荘ということにしておく
			PRINTFORML 「这里的地下是我的大别墅哦ー」
			PRINTFORMW 「虽然不知为什么，但神社的地下我呆着相当惬意」
		CASE "妖精的大樹"
			;誰かいる
			IF GROUPMATCH(CFLAG:[[克勞恩皮絲]]:現在位置, CFLAG:[[桑尼]]:現在位置, CFLAG:[[露娜]]:現在位置, CFLAG:[[斯塔]]:現在位置)
				PRINTFORML 「这是我妖精朋友的住处」
				PRINTFORMW 「一起去玩玩吧ー！」
			;留守
			ELSE
				PRINTFORML 「这里是我妖精朋友的住处……」
				PRINTFORMW 「嗯……怎么没人在啊」
			ENDIF
		CASE "夢幻遺跡"
			PRINTFORML 「哇哦ー？ 这里好大……」
			PRINTFORMW 「感觉……好神奇？ 怎么会有这种地方」
		;▼命蓮寺
		CASE "地蔵小路"
			PRINTFORML 「我不是常来这边」
			PRINTFORMW 「忘了到底是怎么回事了，不过这所寺庙对妖精不是很友好」
		CASE "倒垂的柳樹下"
			PRINTFORML 「哦！真是棵其貌不扬的树！」
			PRINTFORMW 「总觉得能化成厉害的妖怪不是吗？」
		CASE "命蓮寺境内"
			PRINTFORML 「这里就是传闻中妖怪的寺庙～」
			PRINTFORMW 「唔……确实感受得到妖力在涌动」
		CASE "命蓮寺方丈"
			PRINTFORML 「%CALLNAME:MASTER%、这里的人都在干什么呀？」
			PRINTFORMW 「总觉得一直很忙的样子」
		CASE "墓地"
			PRINTFORML 「哇～！ 是墓地诶～♪」
			PRINTFORMW 「大家一起去地狱玩吧～♪」
		CASE "神霊廟広場"
			PRINTFORML 「哇哦ー！ 好气派的大门！」
			PRINTFORMW 「想必住在这里的是位不得了的神明大人吧～」
		CASE "神霊廟道場"
			PRINTFORML 「仙人的道场……？」
			PRINTFORMW 「之前我有挺友人大人说过关于仙人的事情～」
		;▼人里
		CASE "広場"
			PRINTFORML 「哦！ 发现了合适的猎物」
			PRINTFORMW 「看我去捉弄一下那些人！」
		CASE "商家町"
			PRINTFORML 「%CALLNAME:MASTER%！ 我想去那里想去哪里！」
			PRINTFORMW 「啊！ 给我买那个！ 买那个！ 好不好嘛！ 给我买嘛！」
		CASE "呑屋小道"
			PRINTFORML 「那边是有居酒屋吗」
			PRINTFORMW 「空气中的酒香告诉我有这种可能！」
		CASE "寺子屋"
			PRINTFORML 「人类就是在这种地方学习的啊？ 嗯哼~~」
			PRINTFORMW 「我也可以在这里画画吗？」
		CASE "大衆浴場"
			IF DAY * 1440 + TIME - EX:MASTER:上次的入浴時间 < 360
				PRINTFORML 「呼呼～！ 清爽了～！」
				PRINTFORMW 「不过为什么不能和%CALLNAME:MASTER%一起洗嘛，没劲」
			ELSE
				PRINTFORML 「哇～！ 这有浴室～♪」
				PRINTFORMW 「釜茹で風呂はないのかー？」
			ENDIF
		CASE "情人用宿屋"
			;入った時点で合意取得するのね…,诶嘿嘿前か後かは絶頂したかで判断するので事前に絶頂させてると稍微齟齬
			IF EX:111:Ｃ絶頂 + EX:111:Ｖ絶頂 + EX:111:Ａ絶頂 + EX:111:Ｂ絶頂 + EX:111:Ｍ絶頂
				IF TALENT:111:処女
					PRINTFORMW 「……\/\/\/」
				ELSE
					PRINTFORMW 「……❤」
				ENDIF
			ELSE
				IF TALENT:111:処女
					PRINTFORMW 「%CALLNAME:MASTER%……就在这儿做吧……\/\/\/」
				ELSE
					PRINTFORMW 「快点%UNICODE(0x2764)% 快点来嘛%UNICODE(0x2764)%」
				ENDIF
			ENDIF
		CASE "長屋街"
			PRINTFORML 「第一次见到，原来人类每天都在做这样的事情啊，好有趣」
			PRINTFORMW 「%CALLNAME:MASTER%为什么不住在这里啊？」
		;▼霧之湖
		CASE "霧之湖"
			IF DAY:2 == 2
				PRINTFORML 「呀哈哈ー♪ %CALLNAME:MASTER%快，和我一起去游泳吧♪」
				PRINTFORMW 「只是靠近就已经能感受到清爽的湿气了！」
			ELSE
				PRINTFORML 「实在是了不得的厚重雾气」
				PRINTFORMW 「呼呼呼，没猜错的话，里面肯定有什么不可告人的秘密！」
			ENDIF
		CASE "冰造的小雪屋"
			PRINTFORML 「啊ー！ 这是那个蓝色笨蛋的家ー！」
			PRINTFORMW 「呀哈哈♪ 让我来看看都藏了些什么在这里！」
		CASE "廃洋館"
			PRINTFORML 「安静地奇怪？ 也没人住在这……」
			PRINTFORMW 「哇っ！ 刚…刚才怎么回事…？」
		CASE "正門"
			PRINTFORML 「据说住着吸血鬼的洋馆～、和传闻一样一片红色ー」
			PRINTFORMW 「嗯？不想让我进去吗 哼哼♪ 别把本妖精看得和你一样弱小，人类哟？」
		CASE "大廳"
			PRINTFORML 「有好多妖精在这儿工作」
			PRINTFORMW 「做那种事到底有什么乐趣啊？」
		CASE "食堂"
			PRINTFORMW 「居然在这么宽阔的房间吃饭？ 羡慕了！」
		CASE "大図書館"
			PRINTFORML 「呜哇，好壮观！ 这里到底有多少本书啊？」
			PRINTFORMW 「不过书这种东西对我来说还是……」
		CASE "地下室"
			PRINTFORML 「嚯，空气中弥漫着夸张的狂气！」
			PRINTFORMW 「这种糟糕的压迫感……真让人受不了！」
		;▼迷途竹林
		CASE "竹林入口"
			PRINTFORML 「%CALLNAME:MASTER%知道太阳花田吗？」
			PRINTFORMW 「我常去那里玩哦ー」
		CASE "迷失的小道", "斜角的竹林"
			PRINTFORML 「咦？ 我们刚才才来过这里吧？」
			PRINTFORMW 「%CALLNAME:MASTER%、居然还会迷路啊？」
		CASE "兎的洞穴"
			PRINTFORML 「这里凉飕飕的！」
			PRINTFORMW 「洞窟中的温度倒没有想象中冷嘛」
		CASE "永遠亭"
			PRINTFORML 「呜……好难闻的味道……」
			PRINTFORMW 「这里是医院吗？ 好讨厌这里……」
		CASE "無名之丘"
			PRINTFORML 「哇ー！ 这片花田好好看～！ 像在梦里才会出现的景象！」
			PRINTFORMW 「诶嘿、我很久之前就有戴个花环的想法～♪」
		CASE "太陽花田"
			PRINTFORML 「这附近住着不少妖精，每天都很热闹」
			PRINTFORMW 「就好像集市一样？」
		CASE "永遠亭的内院"
			PRINTFORML 「在医院的里面是宅子……」
			PRINTFORMW 「哼哼~~去哪儿恶作剧比较好呢~~」
		CASE "夢幻館"
			PRINTFORML 「这间房子……」
			PRINTFORMW 「有种不可思议的感觉」
		;▼魔法之森
		CASE "森林的入口"
			PRINTFORML 「呜哇～、好强的瘴气……」
			PRINTFORMW 「让人怪难受的ー♪」
		CASE "香霖堂"
			PRINTFORML 「这里是……古道具屋？」
			PRINTFORMW 「有什么有趣的道具吗？」
		CASE "古木的大樹"
			PRINTFORML 「好大棵树ー」
			PRINTFORMW 「哦？ 还有妖精住在这里」
		CASE "霧雨魔法店"
			PRINTFORML 「这里是那个魔法使的家吗」
			PRINTFORMW 「感觉好挤」
		CASE "人偶的洋館"
			PRINTFORML 「有谁住在这里吗ー？」
			PRINTFORMW 「咦！是人偶诶，刚才好像动了一下……」
		CASE "再思之道"
			PRINTFORML 「阴森的地方……」
			PRINTFORMW 「那边的花丛，在地狱里面也常能见到」
		CASE "無縁塚"
			PRINTFORML 「这大石头是怎么回事」
			PRINTFORMW 「总有种不太妙的感觉……」
		;▼冥界
		CASE "中有之道"
			PRINTFORML 「这里有很多小摊～」
			PRINTFORMW 「%CALLNAME:MASTER%要不要买些东西吃呀～！」
		CASE "三途之川"
			PRINTFORML 「我知道三途川哦！」
			PRINTFORMW 「虽说这是第一次见到……但好像和普通的河流差不了多少？」
		CASE "迷途之家"
			PRINTFORML 「这种地方居然也有宅邸？」
			PRINTFORMW 「看来地上的东西在这儿也有人喜欢～」
		CASE "彼岸"
			PRINTFORML 「死去的人会在彼岸接受审判、然后在转生前一直一直呆在冥界」
			PRINTFORMW 「好像听人说是这么回事，我也是第一次到这来，感觉比地狱可舒服太多了」
		CASE "白玉楼庭"
			PRINTFORML 「好大的庭院～」
			PRINTFORMW 「如果我住在这里一定要天天在这儿玩」
		CASE "白玉楼"
			PRINTFORML 「主人说过，不要对善良的幽灵动手」
			PRINTFORMW 「但对待亡灵该怎么办呢？ 他们是坏的吗？」
		CASE "地獄"
			PRINTFORML 「这里是我的故乡哦！」
			PRINTFORMW 「来到幻想乡之后再看这儿，只觉得无聊了……」
		CASE "畜生界"
			PRINTFORML 「走吧走吧ー、我讨厌这里ー……」
			PRINTFORMW 「被已经死掉的家伙以这样的眼神盯着，真让人不爽！」
		CASE "霊長園"
			PRINTFORML 「地狱隔壁是这样的地方啊」
			PRINTFORMW 「是谁又为了什么要建造这样的地方？」
		;▼山麓
		CASE "山麓樹海"
			PRINTFORML 「和%CALLNAME:MASTER%一起爬山还是第一次♪」
			PRINTFORMW 「好像野营一样！」
		CASE "玄武之澤"
			IF DAY:2 == 4
				PRINTFORML 「想游泳了，但这水温实在是……」
				PRINTFORMW 「要是有温暖流水的河流就好了」
			ELSE
				PRINTFORML 「在这边急流里让人超兴奋的！」
				PRINTFORMW 「%CALLNAME:MASTER%快点也下来一起啊♪」
			ENDIF
		CASE "大蛤蟆之池"
			PRINTFORML 「哦！好棒的池子」
			PRINTFORMW 「可以在这钓鱼吗？」
		CASE "正邪的隠匿処前"
			PRINTFORML 「姆？发现了可疑的住处！」
			PRINTFORMW 「连妖精都不会住在这种地方，感觉应该不是什么好人」
		CASE "仙人的宅邸"
			PRINTFORML 「有谁住在这里吗ー？」
			PRINTFORMW 「会是谁在这里饲养了那么多动物啊」
		CASE "間欠泉地下中樞"
			PRINTFORML 「超酷的ー！ 这是什么东西啊ー！！」
			PRINTFORMW 「不断散发着热量，好厉害♪」
		CASE "森の深奥"
			PRINTFORML 「阳光照射不到这里，但因为身处大自然所以并没感到昏暗ー」
			PRINTFORMW 「但阴森森的……总觉得游戏静不下心来」
		;▼山頂
		CASE "九天瀑布"
			SETCOLOR 0x47203C
			PRINTFORML 「哇啊～♪ 是瀑布～～っ！」
			PRINTFORMW 「就连自己的声音都完全无法听见了～！！！」
			RESETCOLOR
		CASE "絶景之丘"
			PRINTFORML 「好高高！！！ 这里是幻想乡的最高处吧！」
			PRINTFORMW 「有将幻想乡尽收眼底的感觉，接下来我们的目标在哪里呢～♪」
		CASE "山之湖"
			IF DAY:2 == 4
				PRINTFORML 「哇，完全冻起来了……！」
				PRINTFORMW 「去滑冰吧去滑冰吧！」
			ELSE
				PRINTFORML 「呀哈哈ー♪ %CALLNAME:MASTER%快，和我一起去游泳吧♪」
				PRINTFORMW 「只是靠近就已经能感受到清爽的湿气了！」
			ENDIF
		CASE "守矢神社境内"
			PRINTFORML 「哦？在这种地方也有神社啊」
			PRINTFORMW 「这里供奉的是怎样的神明呢？」
		CASE "守矢神社本殿"
			PRINTFORML 「好气派的神社！」
			PRINTFORMW 「能够在山的顶峰建立神社，一定是相当了不起的神明吧」
		CASE "天界"
			PRINTFORML 「云的上方原来是这个样子哒」
			PRINTFORMW 「这就是所谓天国吧？」
		CASE "虹龍洞"
			PRINTFORML 「这个洞穴～」
			PRINTFORMW 「感觉里面一定埋藏着无数宝藏！」
		;▼地底
		CASE "幻想風穴"
			PRINTFORML 「没问题没问题，再怎么暗下去，只要有这个火把在就完全没关系♪」
			PRINTFORMW 「啊っ、就是%CALLNAME:MASTER%好像没法不受影响的样子……」
		CASE "地獄的深道"
			PRINTFORML 「还以为地底是什么破旧的地方」
			PRINTFORMW 「这不是相当繁华的街道吗ー」
		CASE "旧地獄街道"
			PRINTFORML 「哼、这里就是曾经的地狱吗」
			PRINTFORMW 「无法想象，这里的街道不是很宽敞嘛」
		CASE "旧地獄温泉"
			IF DAY * 1440 + TIME - EX:MASTER:上次的入浴時间 < 360
				PRINTFORML 「呜ー…… 确、确实比较烫人…嗯……」
				PRINTFORMW 「地獄釜温泉、没有在骗人……」
			ELSE
				PRINTFORML 「地獄釜温泉～？别搞笑了～」
				PRINTFORMW 「取那么吓人的名字，绝对是吓小孩子的～」
			ENDIF
		CASE "情人旅館"
			IF EX:111:Ｃ絶頂 + EX:111:Ｖ絶頂 + EX:111:Ａ絶頂 + EX:111:Ｂ絶頂 + EX:111:Ｍ絶頂
				IF TALENT:111:処女
					PRINTFORMW 「……\/\/\/」
				ELSE
					PRINTFORMW 「……❤」
				ENDIF
			ELSE
				IF TALENT:111:処女
					PRINTFORMW 「%CALLNAME:MASTER%……就在这儿做吧……\/\/\/」
				ELSE
					PRINTFORMW 「快点%UNICODE(0x2764)% 快点来嘛%UNICODE(0x2764)%」
				ENDIF
			ENDIF
		CASE "地霊殿"
			PRINTFORML 「旧地狱的宅邸」
			PRINTFORMW 「安静的要命、住着怎样奇怪的生物都不奇怪」
		CASE "灼熱地獄跡"
			PRINTFORML 「满满都是堕入地狱的恶灵」
			PRINTFORMW 「从他们那儿吸取一点能量吧♪」
		;▼月
		CASE "槐安通路"
			PRINTFORML 「这里是梦的世界？那就是说我现在其实熟睡着？」
			PRINTFORMW 「如果现在的我是我的话，那梦里的我……啊…脑袋要坏掉了…」
		CASE "月之都"
			;謎の力
			PRINTFORML 「如果不是主人的超能力，我们似乎没法来到这儿」
			PRINTFORMW 「现在就好好侦察一下敌情吧」
		CASE "綿月亭"
			PRINTFORML 「好……好大……」
			PRINTFORMW 「比友人大人的住处大五倍以上……」
		CASE "玉兎之街"
			;兔の話流用
			PRINTFORML 「哼、城市里的居民有好多都是兔子」
			PRINTFORMW 「果然还是不会讨厌拥有这样品性的家伙们」
		CASE "桃林～砂浜"
			PRINTFORML 「这片桃林好棒」
			PRINTFORMW 「想天天来吃！」
		CASE "寧靜海"
			PRINTFORML 「这里是我的海哦！」
			PRINTFORMW 「空空如也的实在太无聊了，一起来游泳吧♪」
		;○
		CASEELSE
			PRINTFORML 「是这里ー？」
			PRINTFORMDW 如果触发这句口上请报告给口上作者哦！：発生地点＞{POINT}/{CFLAG:111:约会中}
		ENDSELECT
		;约会会話済み
		约会会話:POINT = 1
		TCVAR:111:353 = 1
	;レア
	ELSEIF !RAND:256
		PRINTFORMW 「へっくちっ！」
	;▼状況会話集
	;1-1,大雨,台風
	ELSEIF !GETBIT(TCVAR:111:359, 1) && (GROUPMATCH(天候, 5) || FLAG:異常気象 == 9)
		CALL M_KOJO_K111_TALKSET("状況会話", 1, 1)
	;1-2,吹雪,猛吹雪
	ELSEIF !GETBIT(TCVAR:111:359, 1) && (GROUPMATCH(天候, 10) || FLAG:異常気象 == 10)
		CALL M_KOJO_K111_TALKSET("状況会話", 1, 2)
	;2,敏感,桃色の風
	ELSEIF !GETBIT(TCVAR:111:359, 2) && GROUPMATCH(FLAG:異常気象, 1, 2, 3, 4, 5, 8)
		CALL M_KOJO_K111_TALKSET("状況会話", 2)
	;3,胖次
	ELSEIF !GETBIT(TCVAR:111:359, 3) && FLAG:異常気象 == 7
		CALL M_KOJO_K111_TALKSET("状況会話", 3)
	;4,春,野外
	ELSEIF !GETBIT(TCVAR:111:359, 4) && DAY:2 == 1 && OUTROOF(CFLAG:111:現在位置)
		CALL M_KOJO_K111_TALKSET("状況会話", 4)
	;5,秋,野外
	ELSEIF !GETBIT(TCVAR:111:359, 5) && DAY:2 == 3 && OUTROOF(CFLAG:111:現在位置)
		CALL M_KOJO_K111_TALKSET("状況会話", 5)
	;6,冬,野外
	ELSEIF !GETBIT(TCVAR:111:359, 6) && DAY:2 == 4 && OUTROOF(CFLAG:111:現在位置)
		CALL M_KOJO_K111_TALKSET("状況会話", 6)
	;7,夏,屋内
	ELSEIF !GETBIT(TCVAR:111:359, 7) && DAY:2 == 2 && !OUTROOF(CFLAG:111:現在位置)
		CALL M_KOJO_K111_TALKSET("状況会話", 7)
	;8,贈り物を貰った
	ELSEIF !GETBIT(TCVAR:111:359, 8) && TCVAR:[[克勞恩皮絲]]:今天的礼物 && FLAG:约会的对象 == [[克勞恩皮絲]]
		CALL M_KOJO_K111_TALKSET("状況会話", 8)
	;9,お気に入りの贈り物（確率）
	ELSEIF !GETBIT(TCVAR:111:359, 9) && CFLAG:[[克勞恩皮絲]]:获得的礼物 && !RAND:50
		CALL M_KOJO_K111_TALKSET("状況会話", 9)
	;10,桑尼の話
	ELSEIF !GETBIT(TCVAR:111:359, 10) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[桑尼]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 10, ABL:[[桑尼]]:親密)
	;11,露娜の話
	ELSEIF !GETBIT(TCVAR:111:359, 11) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[露娜]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 11, ABL:[[露娜]]:親密)
	;12,斯塔の話
	ELSEIF !GETBIT(TCVAR:111:359, 12) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[斯塔]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 12, ABL:[[斯塔]]:親密)
	;13,琪露諾の話
	ELSEIF !GETBIT(TCVAR:111:359, 13) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[琪露諾]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 13, ABL:[[琪露諾]]:親密)
	;14,拉瓦爾の話
	ELSEIF !GETBIT(TCVAR:111:359, 14) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[拉瓦爾]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 14, ABL:[[拉瓦爾]]:親密)
	;15,大妖精の話
	ELSEIF !GETBIT(TCVAR:111:359, 15) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[大妖精]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 15, ABL:[[大妖精]]:親密)
	;16,莉莉白の話
	ELSEIF !GETBIT(TCVAR:111:359, 16) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[莉莉Ｗ]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 16, ABL:[[莉莉Ｗ]]:親密)
	;17,莉莉黑の話
	ELSEIF !GETBIT(TCVAR:111:359, 17) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[莉莉Ｂ]]:現在位置
		CALL M_KOJO_K111_TALKSET("状況会話", 17, ABL:[[莉莉Ｂ]]:親密)
	;18,赫喀提亞との話,赫喀提亞と純狐は純狐邸に住んでいると高頻度で発生してしまうので除外
	ELSEIF !GETBIT(TCVAR:111:359, 18) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[赫喀提亞]]:現在位置 && !M_KOJO_K111_JUNKO_KURASHI()
		CALL M_KOJO_K111_TALKSET("状況会話", 18)
	;19,純狐との話
	ELSEIF !GETBIT(TCVAR:111:359, 19) && CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[純狐]]:現在位置 && !M_KOJO_K111_JUNKO_KURASHI()
		CALL M_KOJO_K111_TALKSET("状況会話", 19)
	;20,七夕の話
	ELSEIF !GETBIT(TCVAR:111:359, 20) && FESTIVAL() == "七夕"
		CALL M_KOJO_K111_TALKSET("状況会話", 20)
	;21,満月の話
	ELSEIF !GETBIT(TCVAR:111:359, 21) && MOON_WATCH(DAY:3) == 9
		CALL M_KOJO_K111_TALKSET("状況会話", 21)
	;22,虹の話
	ELSEIF !GETBIT(TCVAR:111:359, 22) && TIME:7 == 1 && M_KOJO_K111_EARTH(CFLAG:[[克勞恩皮絲]]:現在位置) && OUTROOF(CFLAG:[[克勞恩皮絲]]:現在位置)
		CALL M_KOJO_K111_TALKSET("状況会話", 22)
;	;23,UFOの話（確率）,＞[繞道]に移設
;	ELSEIF !GETBIT(TCVAR:111:359, 23) && M_KOJO_K111_EARTH(CFLAG:[[克勞恩皮絲]]:現在位置) && OUTROOF(CFLAG:[[克勞恩皮絲]]:現在位置) && !RAND:50
;		CALL M_KOJO_K111_TALKSET("状況会話", 23)
	;24,一緒に住んでる時の話,6日に1回
	ELSEIF !GETBIT(TCVAR:111:359, 24) && M_KOJO_K111_JUNKO_KURASHI() && DAY % 6 == 0
		CALL M_KOJO_K111_TALKSET("状況会話", 24)
	;25,恋人になったばかりの話
	ELSEIF !GETBIT(TCVAR:111:359, 25) && FIRSTTIME("恋人", 1) && TALENT:[[克勞恩皮絲]]:恋人
		CALL M_KOJO_K111_TALKSET("状況会話", 25)
	;26,眠いときの会話（確率）
	ELSEIF !GETBIT(TCVAR:111:359, 26) && TIME >= 1200 && !RAND:10
		CALL M_KOJO_K111_TALKSET("状況会話", 26)
	;27,えっちした後（満足した）
	ELSEIF !GETBIT(TCVAR:111:359, 27) && TCVAR:[[克勞恩皮絲]]:355 && TALENT:[[克勞恩皮絲]]:心情 > 0
		CALL M_KOJO_K111_TALKSET("状況会話", 27)
	;28,微醺
	ELSEIF !GETBIT(TCVAR:111:359, 28) && ALCOHOL_FACE(111) == "微醺"
		CALL M_KOJO_K111_TALKSET("状況会話", 28)

[SKIPSTART]
	ELSEIF !GETBIT(TCVAR:111:359, ) &&
		CALL M_KOJO_K111_TALKSET("状況会話", )
[SKIPEND]

	;恋人
	ELSEIF TALENT:111:恋人
		CALL M_KOJO_K111_TALKSET("恋人")
	;恋慕
	ELSEIF TALENT:111:恋慕
		CALL M_KOJO_K111_TALKSET("恋慕")
	;通常
	ELSE
		CALL M_KOJO_K111_TALKSET("其他")
	ENDIF
ENDIF
RETURN 1

@M_KOJO_K111_TALKSET(ARGS, ARG, ARG:1)
#DIM 汎用会話数
#DIM 恋慕会話数
汎用会話数 = 18
恋慕会話数 = 44
IF ARGS == "恋人"
	SELECTCASE RAND:(9 + 恋慕会話数 + 汎用会話数)
	CASE 1
		PRINTFORML 「我的恋人克劳恩皮斯♪」
		PRINTFORMW 「以此为主题的歌曲有没有搞头！？」
	CASE 2
		PRINTFORML 「为什么花心和不伦之事都是不好的啊？」
		PRINTFORMW 「明明喜欢上某个人都是遵从本心的结果」
		PRINTFORMW 「或许正因如此，两人选择互相陪伴才更有价值」
	CASE 3
		PRINTFORML 「唔……………………」
		PRINTFORMW 「%CALLNAME:MASTER%、所谓爱到底是什么东西啊？」
	CASE 4
		PRINTFORMW 「%CALLNAME:MASTER%喜欢我吗～？」
	CASE 5
		PRINTFORML 「如果看到我和其他男人做爱」
		PRINTFORMW 「%CALLNAME:MASTER%会生气吗？ 还是说会伤心？」
	CASE 6
		PRINTFORML 「主人之前说我是那种，喜欢对喜欢的人恶作剧的类型！」
		PRINTFORMW 「完全不懂她在说什么ー！」
	CASE 7
		PRINTFORML 「失去力量的妖精，会变成名为石樱的魔石沉睡」
		PRINTFORMW 「万一哪天我陷入沉睡了，%CALLNAME:MASTER%会等我醒来吗」
	CASE 8
		IF CFLAG:[[克勞恩皮絲]]:兒童人数 > 1
			PRINTFORML 「如果%CALLNAME:MASTER%遇到什么问题、可别忘了还有%CHILDNAME:[[克勞恩皮絲]]:(CFLAG:[[克勞恩皮絲]]:兒童人数 % 10)%也会陪着我们哦！」
		ELSEIF CFLAG:[[克勞恩皮絲]]:兒童人数
			PRINTFORML 「如果%CALLNAME:MASTER%遇到什么问题、可别忘了还有%CHILDNAME:[[克勞恩皮絲]]:1%会陪着我们哦！」
		ELSE
			PRINTFORML 「如果%CALLNAME:MASTER%遇到什么问题、可别忘了有我在哦！」
		ENDIF
		PRINTFORMW 「我在遇到困难时，想到%CALLNAME:MASTER%就不会气馁♪」
	CASE 9
		SELECTCASE M_KOJO_K111_MASTER_IMPRESSION()
		CASE "ロリコン"
			PRINTFORMW 「%CALLNAME:MASTER%是萝莉控这点很棒，会对幼女起生理反应实在太可爱了～❤」
		CASE "清掃中毒者"
			PRINTFORMW 「喜欢%CALLNAME:MASTER%在梦里也想着打扫这点～❤」
		CASE "料理人"
			PRINTFORMW 「会做饭的%CALLNAME:MASTER%超帅的～❤」
		CASE "弾幕強者"
			PRINTFORMW 「%CALLNAME:MASTER%的弹幕超强，爱了爱了～❤」
		CASE "昆虫王"
			PRINTFORMW 「身为斗虫王的%CALLNAME:MASTER%是我心目中的神哦～❤」
		CASE "モテ男"
			;ずるしてません？
			PRINTFORMW 「%CALLNAME:MASTER%是狡猾的人，有没有暗地里背着我偷腥啊？」
		CASE "インテリ"
			PRINTFORMW 「%CALLNAME:MASTER%的脑袋到底是怎么长的，能那么聪明～❤」
		CASE "饒舌"
			PRINTFORMW 「喜欢可以一直一直陪我说话的%CALLNAME:MASTER%～❤」
		CASE "金持ち"
			PRINTFORMW 「是金钱如粪土的%CALLNAME:MASTER%也太帅了～❤」
		CASEELSE
			PRINTFORMW 「喜欢%CALLNAME:MASTER%帅气的样子～❤」
		ENDSELECT
	CASEELSE
		ARGS = 恋慕
		RESTART
	ENDSELECT
ELSEIF ARGS == "恋慕"
	SELECTCASE RAND:(恋慕会話数 + 汎用会話数)
	CASE 1
		PRINTFORML 「真好，人人都享受着生活」
		PRINTFORMW 「在地狱可只有伴随无尽的痛苦折磨的哀嚎，够没趣的」
	CASE 2
		PRINTFORML 「%CALLNAME:MASTER%有什么喜欢做的事吗？」
		PRINTFORMW 「我的话经常会ー……」
	CASE 3
		PRINTFORML 「我的衣服是不是很可爱ー！」
		PRINTFORMW 「是主人为我量身定制的哦♪」
	CASE 4
		PRINTFORML 「今天做些什么来让我们快乐起来呢ー」
		PRINTFORMW 「来造个人类幼崽怎么样？」
	CASE 5
		PRINTFORML 「我有一位友人不知%CALLNAME:MASTER%认不认识？」
		PRINTFORMW 「她是非常非常温柔的人，生活中对我也相当照顾」
	CASE 6
		PRINTFORML 「话说%CALLNAME:MASTER%拥有的是什么能力呀？」
		PRINTFORMW 「如果货真价实地战斗的话会怎样讷」
	CASE 7
		IF TALENT:[[克勞恩皮絲]]:恋人
			PRINTFORML 「妖怪故事听得多了」
			PRINTFORML 「但人类与妖怪的恋爱物语还从未听说」
			PRINTFORMW 「说不定我们是史上第一对人类与妖精的情侣❤」
		ELSE
			PRINTFORML 「我是妖精、而%CALLNAME:MASTER%是人类ー」
			PRINTFORMW 「唔～嗯、%CALLNAME:MASTER%有想过吗？」
		ENDIF
	CASE 8
		PRINTFORML 「%CALLNAME:MASTER%ー」
		PRINTFORMW 「诶嘿ー，不可以叫一下吗」
	CASE 9
		PRINTFORML 「啊ー啊、%CALLNAME:MASTER%要是堕入地狱也不错，就连死气成成的地狱也会被%CALLNAME:MASTER%活跃起来吧ー」
		PRINTFORMW 「啊！ 但是但是、又不想让%CALLNAME:MASTER%墜入地獄……」
	CASE 10
		PRINTFORML 「虽说地上很令人開心、但总觉得大家对妖精多少都由偏见」
		PRINTFORMW 「这叫差别对待吗？ 虽说对我是毫无影响的」
	CASE 11
		PRINTFORML 「想去更有趣的地方玩嘛ー♪
		PRINTFORMW 「比如说赌场！比如说遊乐園！」
	CASE 12
		PRINTFORML 「%CALLNAME:MASTER%……」
		PRINTFORMW 「%CALLNAME:MASTER%，会不会有觉得就是类似…我很可爱的念头？」
		PRINTFORMW 「啊！！ 就当我什么都没说吧！」
	CASE 13
		PRINTFORMW 「恩哼哼哼哼♪」
	CASE 14
		IF ABL:MASTER:清掃技能 >= 4
			PRINTFORML 「%CALLNAME:MASTER%！难道不是专属于我的清扫师嘛？」
			PRINTFORMW 「既然如此，我可是特意为了%CALLNAME:MASTER%儿将房间弄乱的！♪」
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%有没有好好工作啊？」
			PRINTFORMW 「反问我吗？我做事向来是勿需担心的～！ 比如上次――」
		ENDIF
	CASE 15
		PRINTFORML 「呼哇～ぁ……」
		PRINTFORMW 「怎么这时就感觉困了」
	CASE 16
		IF TCVAR:111:空腹時刻 - TIME:1 <= 0
			PRINTFORMW 「想吃汉堡了，%CALLNAME:MASTER%！」
			TCVAR:111:356 = 1
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%喜欢吃什么汉堡？」
		ENDIF
	CASE 17
		PRINTFORML 「为什么人类男性不喜欢进行弹幕战啊？」
		PRINTFORMW 「说起来人类平日里怎么玩耍的？」
	CASE 18
		PRINTFORML 「地上尽是些没用的家伙」
		PRINTFORMW 「只是看到虫子呀骨头呀什么的就吓软了腿」
	CASE 19
		;20日以上会ってなかった
		IF CFLAG:111:1003 >= 20
			PRINTFORMW 「丢下我的日子里去哪儿撒野了？ 是不是玩得很開心？」
		;昨日会ってなかった
		ELSEIF CFLAG:111:1003
			PRINTFORML 「%CALLNAME:MASTER%昨天去哪儿了ー？」
			PRINTFORMW 「正巧我也去处理了一些事情ー――」
		;昨日会った
		ELSE
			PRINTFORML 「最近总是能见到%CALLNAME:MASTER%！」
			PRINTFORMW 「不能只有今天哦，每天也来找我玩吧～！」
		ENDIF
	CASE 20
		PRINTFORML 「地上都是些不入眼的弱小妖精，除了数量一无是处」
		PRINTFORMW 「和月球上完全不同，大概这就是月球强大的原因？」
	CASE 21
		PRINTFORML 「我的幽灵友人」
		PRINTFORMW 「说到幽灵，她们和亡灵有什么区别啊？」
	CASE 22
		PRINTFORML 「最近，弹幕游戏越来越流行了」
		PRINTFORMW 「%CALLNAME:MASTER%也来试试嘛！ 不用担心，我会为了%CALLNAME:MASTER%而手下留情的ー♪」
	CASE 23
		PRINTFORML 「诶ー、神社是用来祭祀神明的吗」
		PRINTFORMW 「那我主人的神社在哪儿啊？」
	CASE 24
		PRINTFORML 「之前捡到了奇怪的玩具」
		PRINTFORMW 「可是好像没有电了完全没法使用啊～」
	CASE 25
		PRINTFORML 「外面的世界到底是怎样的啊」
		PRINTFORML 「一直听人说非常危险不可以靠近」
		PRINTFORMW 「但真的有比地狱还要危险的地方存在吗？」
	CASE 26
		IF TIME >= 1200
			PRINTFORML 「已经晚上了吗……」
			PRINTFORMW 「与%CALLNAME:MASTER%度过的时间总是转瞬就流逝……」
		ELSEIF TIME >= 900
			PRINTFORMW 「接下来该玩些什么呢？」
		ELSE
			PRINTFORMW 「今天玩些什么呢～」
		ENDIF
	CASE 27
		PRINTFORML 「知道与狂气相对的是什么吗？」
		PRINTFORMW 「答案很简单哦」
	CASE 28
		PRINTFORML 「幻想乡的尽头在哪儿来着」
		PRINTFORMW 「下次想要飞到幻想乡的边缘去看看」
	CASE 29
		PRINTFORML 「月亮形状的弹幕是主人教给我的！」
		PRINTFORMW 「所以一次必须释放出三个才行～」
	CASE 30
		PRINTFORML 「以前的地狱被强烈的阳光照射着，那时主人的力量比起现在要厉害百倍」
		PRINTFORMW 「但现在一切都消失了、大概那件事也让主人十分后悔吧ー」
	CASE 31
		PRINTFORML 「オー、セーイキャンユーシー♪」
		PRINTFORMW 「在地狱大家都会唱这首歌哦♪」
	CASE 32
		PRINTFORML 「能来到幻想乡并且与%CALLNAME:MASTER%相遇真是幸运！」
		PRINTFORMW 「不知为何昨晚一直一直再思考这件事」
	CASE 33
		PRINTFORML 「偷偷告诉%CALLNAME:MASTER%哦、似乎主人把我当作王牌的样子」
		PRINTFORML 「但那到底是什么意思，人家目前也还不是很清楚」
		;恋人or一緒に住んでる
		IF TALENT:[[克勞恩皮絲]]:恋人 || M_KOJO_K111_JUNKO_KURASHI()
			PRINTFORMW 「如果有意外情况、%CALLNAME:MASTER%要来帮我哦！ 一定要来哦！」
		ELSE
			PRINTFORMW 「不晓得我能不能好好回应这份期待啊……」
		ENDIF
	CASE 34
		PRINTFORML 「不知哪天我得不得不回地狱」
		;恋人or一緒に住んでる
		IF TALENT:[[克勞恩皮絲]]:恋人 || M_KOJO_K111_JUNKO_KURASHI()
			PRINTFORMW 「真到那时候，%CALLNAME:MASTER%陪我一起去吧！」
		ELSE
			PRINTFORML 「如果真到那天，%CALLNAME:MASTER%……」
			PRINTFORMW 「算了，现在说这些也没必要」
		ENDIF
	CASE 35
		PRINTFORML 「最初让我惊艳的美景是星空ー」
		PRINTFORMW 「所以我有不少星星形状的弹幕！」
	CASE 36
		PRINTFORML 「一直都觉得地狱的妖精要更强一点――」
		PRINTFORML 「但是在地上有那么多生命能量，照理说地上的妖精不该更加厉害嘛？」
		PRINTFORMW 「大概是因为地狱的妖精数量比较少，所以强度会更加高吧」
	CASE 37
		PRINTFORML 「我还在月球那会儿，主人和灵梦战斗过一次并且战败了」
		PRINTFORML 「但主人却说这是月球前所未有的重大胜利」
		PRINTFORMW 「一直都不清楚为什么要这样讲，但与%CALLNAME:MASTER%相处了这段时间，总觉得有点理解了？」
	CASE 38
		PRINTFORML 「纯狐大人与主人是朋友关系，她们能成为友人其实是我的功劳哦！」
		PRINTFORMW 「因为纯狐大人那时说无论如何都想借助主人大人的力量，主人就将人家推荐给纯狐大人了」
	CASE 39
		PRINTFORML 「这件洋服上有五十个星星图案～」
		PRINTFORMW 「之前因为比较闲特意数了一下」
	CASE 40
		PRINTFORML 「主人大人在地狱掌管着一切狂气与死亡，但她其实是温柔且理智的人」
		PRINTFORMW 「像我们妖精她也同样一视同仁，主人大人拥有我无法想象的宽阔胸襟♪」
	CASE 41
		PRINTFORML 「友人大人是优雅而美丽的人，但内心却埋藏着阴暗与邪恶」
		PRINTFORMW 「所以真当她生气的时候，无论是谁也无法阻止」
	CASE 42
		PRINTFORML 「哈？ 我的能力能不能用来做色情的恶作剧？」
		PRINTFORMW 「起码，对满脑子黄色废料的%CALLNAME:MASTER%应该是没效果！」
		SIF TALENT:[[克勞恩皮絲]]:恋人
			PRINTFORMW 「还想着要用谁来做小白鼠！？ %CALLNAME:MASTER%是笨蛋吗！」
	CASE 43
		PRINTFORML 「%CALLNAME:MASTER%见过海嘛？」
		SIF GROUPMATCH(CFLAG:[[克勞恩皮絲]]:現在位置, 1015, 1016, 1090)
			PRINTFORML 「不是说这里的，是地上那种咸咸的海」
		IF TALENT:[[克勞恩皮絲]]:恋人
			PRINTFORMW 「想和%CALLNAME:MASTER%一起在海里游泳～」
		ELSE
			PRINTFORMW 「什么时候我们一起去看海吧……」
		ENDIF
	CASE 44
		;星条旗の話です,それぞれ、Purity,Innocence,Hardiness,Vaolor,Vigilance,Perseverance,Justis, by Wikipedia
		SELECTCASE RAND:7
		CASE 1
			PRINTFORML 「白色的星星代表"純粋"」
		CASE 2
			PRINTFORML 「这个星星的白色代表"純潔"」
		CASE 3
			PRINTFORML 「这个红色的条纹代表"頑強"」
		CASE 4
			PRINTFORML 「这条红色的纹路是"勇気"」
		CASE 5
			PRINTFORML 「青色的星星代表"警戒"」
		CASE 6
			PRINTFORML 「这个星星的青色代表"忍耐"」
		CASEELSE
			PRINTFORML 「这个青色的星星是"正義"的表现」
		ENDSELECT
		PRINTFORMW 「――怎样，很帅气吧！」
	CASEELSE
		ARGS = 汎用
		RESTART
	ENDSELECT
;恋慕でもそれ以外でも発生する会話
ELSEIF ARGS == "汎用"
	SELECTCASE RAND:汎用会話数
	CASE 1
		PRINTFORML 「到底是怎么回事？」
		PRINTFORMW 「告诉我嘛！」
	CASE 2
		PRINTFORMW 「%CALLNAME:MASTER%、听我说听我说！」
	CASE 3
		PRINTFORMW 「%CALLNAME:MASTER%即使身处地狱也会说这样的话？」
	CASE 4
		PRINTFORML 「遇到困难睡大觉」
		PRINTFORMW 「家主大人都会帮我干脆地解决的」
	CASE 5
		PRINTFORML 「在地狱的隔壁是畜生界ー」
		PRINTFORMW 「之前那边好像发生了不得了的事情，不知道和我们地狱有没有关系？」
	CASE 6
		;15時半まで
		IF INRANGE(TIME, 360, 930)
			PRINTFORMW 「今天吃点什么好吃的呢～」
		ELSE
			PRINTFORMW 「明天要去吃点好吃的～」
		ENDIF
	CASE 7
		PRINTFORML 「火把平时都不点的」
		PRINTFORML 「要用的时候这样，就着起来了」
		PRINTL
		PRINTFORMDW 如此说着的克劳恩皮斯手上突然变出了个火把。
	CASE 8
		;特に元ネタは無く随意歌ってるだけ
		PRINTFORML 「%CALLNAME:MASTER%知道这首歌嘛？」
		PRINTFORML 「哼~~哼哼~~~♪ 哼~~哼~~哼ー♪」
		PRINTFORMW 「哼~~哼哼哼~~~哼~~哼ー♪」
	CASE 9
		PRINTFORML 「在地狱也有回收垃圾废品的工人」
		PRINTFORMW 「可他们拿了那些东西到底能干嘛呢？」
	CASE 10
		PRINTFORML 「%CALLNAME:MASTER%、如果看到了粉色光芒的石头千万不能碰」
		PRINTFORMW 「那是被称之为石樱的地狱之石」
	CASE 11
		PRINTFORML 「据说在某个世界存在名为妖精王的人」
		PRINTFORMW 「会是怎样的人呢？ %CALLNAME:MASTER%了解过吗？」
	CASE 12
		PRINTFORML 「虽说月亮上的兔子各个都胆小怕事，但因为严格的训练她们都有不错的毅力ー」
		PRINTFORMW 「果然还是不会讨厌拥有这样品性的家伙们」
	CASE 13
		PRINTFORML 「地上的妖精很会躲猫猫……」
		PRINTFORMW 「特别是\@ ABL:[[克勞恩皮絲]]:親密 >= 6 ? 三月精 # 不认识的妖精 \@能力简直犯规！ 太过分了！」
	CASE 14
		PRINTFORML 「这火焰是由精神力量点燃并且燃烧的，所以不能用来点火哦」
		PRINTFORMW 「不过稍微让木头烧焦的程度还是做得到的」
	CASE 15
		PRINTFORML 「喜欢主人什么地方？」
		SELECTCASE RAND:10
		CASE 1
			PRINTFORMW 「会替我解决烦恼ー♪」
		CASE 2
			PRINTFORMW 「替我胖揍欺负我的人ー♪」
		CASE 3
			PRINTFORMW 「协助我一起完成工作ー♪」
		CASE 4
			PRINTFORMW 「耐心的解释一些复杂的话给我听ー♪」
		CASE 5
			PRINTFORMW 「直到睡前都一直陪着我ー♪」
		CASE 6
			PRINTFORMW 「给我买了好多礼物ー♪」
		CASE 7
			PRINTFORMW 「陪我玩耍ー♪」
		CASE 8
			PRINTFORMW 「安慰闹脾气的我ー♪」
		CASE 9
			PRINTFORMW 「教我什么事情可以做什么事情不能做ー♪」
		CASEELSE
			PRINTFORMW 「非常重视我ー♪」
		ENDSELECT
	CASE 16
		PRINTFORML 「弹幕胜负中最重要的……」
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「毫无疑问是火力，击倒对方的速度越快，相对需要躲避的时间就越少！」
		CASE 2
			PRINTFORMW 「是速度，躲避弹幕需要在瞬间做出反应，迅速的回避才能在战斗中游刃有余！」
		CASE 3
			PRINTFORMW 「显然是技术和经验，想来挑战我灵动的身法吗！」
		CASE 4
			PRINTFORMW 「是合适的战术，作为战术家在战斗開始之前就已经奠定了胜局！」
		CASEELSE
			PRINTFORMW 「意志力，有强大的信念能面对千军万马依旧潇洒！」
		ENDSELECT
	CASE 17
		SELECTCASE CFLAG:[[克勞恩皮絲]]:今日の運勢 % 8
		CASE 1
			PRINTFORML 「看我看我ー！ 在眼睛下面贴了小星星的图案☆」
		CASE 2
			PRINTFORML 「看我看我ー！ 在眼睛下面贴了钻石的图案◆」
		CASE 3
			PRINTFORML 「看我看我ー！ 在眼睛下面贴了月亮的图案☪」
		CASE 4
			PRINTFORML 「看我看我ー！ 在眼睛下面贴了水滴的图案💧」
		CASEELSE
			IF TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORML 「看我看我ー！ 在眼睛下面贴了心心的图案❤」
			ELSE
				PRINTFORML 「看我看我ー！ 在眼睛下面贴了小星星的图案☆」
			ENDIF
		ENDSELECT
		PRINTFORMW 「很可爱吧～♪」
	CASEELSE
		PRINTFORM 「嗯……想养宠物了，
		SELECTCASE RAND:10
		CASE 1, 2, 3
			PRINTFORML 狗狗应该不错～」
			PRINTFORMW 「养三只狗狗把它们脑袋凑一起，就变成刻耳柏洛斯了！」
		CASE 4, 5, 6
			PRINTFORML 黒猫感觉很棒～」
			PRINTFORMW 「如果是晚上的话就让它去别人家吓人一跳！」
		CASE 7
			PRINTFORML 养只小鸡试试～」
			;キュッというのは屠殺の事です。
			PRINTFORMW 「养的健健康康的之后还能美餐一顿」
		CASE 8
			PRINTFORML 鳄鱼听起来很霸气～」
			PRINTFORMW 「让它潜入别人的浴池吓人一跳吧！」
		CASE 9
			;夜に口笛を吹くと蛇がやってくるという迷信
			PRINTFORML 要不要养蛇呢～」
			PRINTFORMW 「吹着笛子让它跟着我散步？」
		CASEELSE
			PRINTFORML 猫头鹰很好看～」
			PRINTFORMW 「总觉得魔法使家会有这种生物」
		ENDSELECT
	ENDSELECT
ELSEIF ARGS == "其他"
	SELECTCASE RAND:(14 + 汎用会話数)
	CASE 1
		PRINTFORML 「充满了自然的气息，地上真是处处焕发着生机」
		PRINTFORMW 「与地狱的死气沉沉完全相反」
	CASE 2
		PRINTFORML 「%CALLNAME:MASTER%是可疑的人」
		PRINTFORMW 「地上的人大都不安好心」
	CASE 3
		PRINTFORML 「%CALLNAME:MASTER%知道我的能力是让人发狂吗」
		PRINTFORML 「比起月光更加强烈的狂气」
		PRINTFORMW 「不想品尝体验一下吗？」
	CASE 4
		IF M_KOJO_K111_JUNKO_KURASHI()
			PRINTFORMW 「友人大人是相当温柔的角色，会经常摸摸人家」
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%知道我的友人大人吗？」
			PRINTFORMW 「友人大人是相当温柔的角色，会经常摸摸人家」
		ENDIF
	CASE 5
		PRINTFORML 「我家主人可是地狱之神」
		PRINTFORMW 「无论月球，地球还是异界任何地方，都由她一人管理……嗯？ 好像是这样来着？」
	CASE 6
		IF TCVAR:111:空腹時刻 - TIME:1 <= 0
			PRINTFORMW 「想吃汉堡了，%CALLNAME:MASTER%！」
			TCVAR:111:356 = 1
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%想吃汉堡嘛？可惜这里完全没有卖啊」
			PRINTFORMW 「想个法子让汉堡在幻想乡流行起来吧」
		ENDIF
	CASE 7
		PRINTFORML 「在地上玩的倒是很開心，但总有些风言风语降低着人们对妖精的评价」
		PRINTFORMW 「就是所谓区别对待吗，当然对我是毫无影响的」
	CASE 8
		PRINTFORML 「之前一段时间，认真思考了砍掉手臂和砍掉腿那种比较痛苦」
		PRINTFORMW 「结果思考了一天都没得出结论」
	CASE 9
		PRINTFORML 「我穿的很奇怪？」
		PRINTFORMW 「明明一点都不奇怪吧！ 完全不懂得什么叫可爱吗！」
	CASE 10
		IF TIME >= 1200
			PRINTFORML 「已经那么晚了啊～、呼啊～ぁ……有些困了……」
		ELSEIF TIME >= 900
			PRINTFORMW 「接下来该玩些什么呢？」
		ELSE
			PRINTFORMW 「今天玩些什么呢～」
		ENDIF
	CASE 11
		PRINTFORML 「皇冠与小丑帽还是有点区别的」
		PRINTFORMW 「不会连这都分不清吧？」
	CASE 12
		PRINTFORML 「失眠的时候，把水滴在额头上就能睡着了」
		PRINTFORMW 「主人之前就是这么哄人睡觉的」
	CASE 13
		PRINTFORML 「我可是地狱妖精，别把我和那种普通的家伙相提并论！」
		PRINTFORMW 「惹恼我的话，我可比地上那些悠闲地妖精狂暴多了」
	CASE 14
		PRINTFORML 「如果想要向神祈祷，赫卡大人就是最好的选择」
		PRINTFORMW 「不这样做的话小心月亮砸你头上」
	CASEELSE
		ARGS = 汎用
		RESTART
	ENDSELECT
ELSEIF ARGS == "状況会話"
	SELECTCASE ARG
	;部屋でゲーム
	;身体接觸にお引越ししました
	CASE 0
		;恋慕だと主人公的房間でも玩遊戲
		IF ARG:1 == 1 || (ARG:1 == 2 && TALENT:[[克勞恩皮絲]]:恋慕)
			;克勞恩皮絲の自室
			IF ARG:1 == 1
				PRINTFORML 「%CALLNAME:MASTER%！来玩游戏！」
			;你の自室
			ELSEIF ARG:1 == 2
				PRINTFORML 「我带了可以和%CALLNAME:MASTER%一起玩的玩具哦！」
			ENDIF
			PRINTFORM 「看好啦！这可是最新款的
			SELECTCASE RAND:14
			CASE 1
				;Luna Saturn
				PRINTFORM 『Luna Saturn』
			CASE 2
				;Dream Capt
				PRINTFORM 『Dream Capt』
			CASE 3
				;Unlocated SaGa
				PRINTFORM 『Unlocated SaGa』
			CASE 4
				;Secret of Misa
				PRINTFORM 『Secret of Misa』
			CASE 5
				;The Legend of Mistical Samurai
				PRINTFORM 『The Legend of Mistical Samurai』
			CASE 6
				;Demon's Gate
				PRINTFORM 『Demon's Gate』
			CASE 7
				;Dannmaku Parade Match
				PRINTFORM 『Dannmaku Parade Match』
			CASE 8
				;Astro Yuuka
				PRINTFORM 『Astro Yuuka』
			CASE 9
				;Virtual Gun Venus
				PRINTFORM 『Virtual Gun Venus』
			CASE 10
				;Tank Simulator - DOOM!
				PRINTFORM 『Tank Simulator - DOOM!』
			CASE 11
				;Dark Soils
				PRINTFORM 『Dark Soils』
			CASE 12
				;Toki Meki Tea Ceremony Club
				PRINTFORM 『Toki Meki Tea Ceremony Club』
			CASE 13
				;TAKOROID
				PRINTFORM 『TAKOROID』
			CASEELSE
				PRINTFORM 『Ｒ－ＴＩＧＨＴＳ』
			ENDSELECT
			PRINTFORML ！」
		ELSE
			;你の自室
			IF TALENT:[[克勞恩皮絲]]:思慕
				PRINTFORML 「啊ー！ 上次说想和%CALLNAME:MASTER%一起玩的游戏还记得吗」
				PRINTFORML 「%CALLNAME:MASTER%想玩哪种来着ー？」
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%房间里居然没有能玩的游戏吗？」
				PRINTFORML 「我下次带些过来？」
			ENDIF
		ENDIF
		WAIT
	;大雨と吹雪
	CASE 1
		;大雨
		IF ARG:1 == 1
			PRINTFORML 「呜哇ー、大暴雨……」
			PRINTFORML 「在地狱里倒是常年有的天气」
			PRINTFORMW 「所以在我看来其实和毛毛雨差不了多少」
		;吹雪
		ELSEIF ARG:1 == 2
			PRINTFORML 「呜哇ー，下雪了……」
			PRINTFORMW 「简直就像紅蓮地獄……冻死人了……」
		ENDIF
	;敏感,桃色の風
	CASE 2
		PRINTFORML 「今天明明天气很好的说……总觉得……」
		PRINTFORMW 「嗯……身体里面痒痒的～……」
	;胖次
	CASE 3
		PRINTFORML 「啊！ 有什么在天上飞！ 是ＵＦＯ吗！」
		PRINTFORMW 「是真的哦，轻飘飘的那个……」
	;春,野外
	CASE 4
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「最初看到樱花时就在想，怎能有如此好看的景色」
			PRINTFORMW 「大概在那个时候就已经深深喜欢上了幻想乡」
		CASE 2
			PRINTFORML 「唔…最近眼睛好痒哦，鼻子也有点不通气…」
			PRINTFORMW 「是不是感冒了啊？」
		CASEELSE
			PRINTFORML 「这里的花好漂亮」
			PRINTFORMW 「在地狱里也有名为血针草開出的花朵」
			PRINTFORMW 「由人血浇灌而成的鲜红色花朵ー……」
		ENDSELECT
	;秋,野外
	CASE 5
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「%CALLNAME:MASTER%！看我画的秋天主题的画作！」
			PRINTL
			SELECTCASE RAND:5
			CASE 1
				PRINTFORMDL 这是……五颜六色的蝴蝶吗
				PRINTW
				PRINTFORMW 「不是哦，是我和妖精朋友们玩耍的话免！」
			CASE 2
				PRINTFORMDL 克劳恩皮斯画了三女神主题的画作
				PRINTW
				PRINTFORMW 「我笔下的主人好看吗？」
			CASE 3
				PRINTFORMDL 克劳恩皮斯的画作很抽象……。
				PRINTW
				PRINTFORMW 「这画的是地狱的风景！」
			CASE 4
				PRINTFORMDL 克劳恩皮斯在画布上展现着街头艺术
				PRINTW
				PRINTFORMW 「怎样怎样？？ 好看吗？？？」
			CASEELSE
				PRINTFORMDL 克劳恩皮斯画了人物画……。
				PRINTW
				PRINTFORMW 「是%CALLNAME:MASTER%哦，像不像？？」
			ENDSELECT
		CASE 2
			PRINTFORML 「秋天的红叶很迷人」
			PRINTFORMW 「就好像沐浴着鲜血♪」
		CASEELSE
			PRINTFORML 「秋天是不是该进行"狩猎楓葉"的运动吗？」
			PRINTFORMW 「怎么说，那家伙很强吗？」
		ENDSELECT
	;冬,野外
	CASE 6
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「姆姆姆……」
			PRINTFORMW 「如果有被炉的话……」
		CASE 2
			PRINTFORMW 「%CALLNAME:MASTER%……」
			PRINTFORMW 「冷……」
		CASEELSE
			PRINTFORML 「离開地狱才发现原来妖精也有难以应对的季节」
			PRINTFORMW 「对常年夏装的我来说冬天实在是……」
		ENDSELECT
	;夏,屋内
	CASE 7
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「可以带个竹蜻蜓吧」
			PRINTFORMW 「装脑袋上多有趣？」
		CASE 2
			PRINTFORML 「虽说喜欢夏日直射的阳光」
			PRINTFORMW 「但即使是我在这种阳光下呆久了也会变得焉巴巴的」
		CASEELSE
			PRINTFORML 「夏天空气中充满了生命能量，所以妖精会非常活跃」
			PRINTFORMW 「我也是活跃的一员哦！」
		ENDSELECT
	;贈り物を貰った
	CASE 8
		;念の為RESULTSを避難させてリセット
		LOCALS:1 = %RESULTS%
		CALL GIFTNAME(TCVAR:[[克勞恩皮絲]]:今天的礼物, [[克勞恩皮絲]])
		LOCALS = %RESULTS%
		RESULTS = %LOCALS:1%
		IF GET_GIFTDATA(TCVAR:[[克勞恩皮絲]]:今天的礼物, "得点") >= 700
			PRINTFORMDL 克劳恩皮斯时不时望向【%LOCALS%】。
			PRINTW
			PRINTFORMW 「嗯嘿嘿～♪ 之后放在哪里比较好呢～♪」
		ELSEIF GET_GIFTDATA(TCVAR:[[克勞恩皮絲]]:今天的礼物, "得点") >= 400
			PRINTFORMDL 克劳恩皮斯将【%LOCALS%】放在手心端详。
			PRINTW
			PRINTFORMW 「呼呼♪ 和我很配嘛～♪」
		ELSE
			PRINTFORMDL 克劳恩皮斯并不是很在意【%LOCALS%】的样子。
			PRINTW
			PRINTFORMW 「%CALLNAME:MASTER%喜欢这种东西吗？」
		ENDIF
	;お気に入りの贈り物
	CASE 9
		;念の為RESULTSを避難させてリセット
		LOCALS:1 = %RESULTS%
		CALL GIFTNAME(CFLAG:[[克勞恩皮絲]]:获得的礼物, [[克勞恩皮絲]])
		LOCALS = %RESULTS%
		RESULTS = %LOCALS:1%
		PRINTFORMDL 克劳恩皮斯取出%LOCALS%端详着。
		PRINTW
		SELECTCASE RAND:5
		CASE 1
			PRINTFORML 「呼呼っ♪ 真不错ー！」
			PRINTFORMW 「%CALLNAME:MASTER%的这份恩情，皮斯一定会还的哦！」
		CASE 2
			PRINTFORML 「想把这个给主人也看看ー」
			PRINTFORMW 「这样%CALLNAME:MASTER%也会被主人夸奖了～！」
		CASE 3
			PRINTFORML 「要抓紧时间了！可得向好多人炫耀一番才行～」
			PRINTFORMW 「只是想到她们羡慕的神情都感好爽、谢谢%CALLNAME:MASTER%啦❤」
		CASE 4
			PRINTFORML 「%CALLNAME:MASTER%能送我礼物实在太高兴了～」
			PRINTFORMW 「既然如此！ 下次就由我来回礼了！」
			PRINTFORMW 「绝对会让你一生难忘的，乖乖等着吧！\/\/\/」
			CFLAG:[[克勞恩皮絲]]:1005 = DAY
		CASEELSE
			PRINTFORML 「%CALLNAME:MASTER%的礼品很棒哦❤」
			PRINTFORMW 「我要一直一直带在身上～♪」
		ENDSELECT
	;桑尼の話
	CASE 10
		IF ARG:1 >= 10
			PRINTFORML 「桑尼拥有强大的执行力，是会毫不犹豫去执行各种恶作剧的超棒妖精」
			PRINTFORMW 「而且交际很广泛，除了妖精以外的人也认识很多」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「一言蔽之，桑尼是不可多得的笨蛋」
			PRINTFORMW 「因为她没脑子的天真不知让多少恶作剧失败了」
		ELSE
			PRINTFORML 「那个红毛的妖精是我的朋友……」
			PRINTFORMW 「叫啥来着，桑尼…？」
		ENDIF
	;露娜の話
	CASE 11
		IF ARG:1 >= 10
			PRINTFORML 「露娜明明是个妖精却总是前一步做好所有事，作为妖精来说相当聪明」
			PRINTFORMW 「还有她的危险感知能力，以前帮过我们很多忙～」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「露娜之前说过！」
			PRINTFORMW 「对待重要的事情如此马虎所以恶作剧一直一直会失败～」
		ELSE
			PRINTFORML 「那边黄色的妖精是我的朋友哦――」
			PRINTFORMW 「“如月光般静谧”！ 露娜！」
		ENDIF
	;斯塔の話
	CASE 12
		IF ARG:1 >= 10
			PRINTFORML 「斯塔是谨慎又大胆的妖精」
			PRINTFORMW 「还有就是，斯塔是妖精中厨艺最好的一位！」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「斯塔看似聪明的样子，常常在思考」
			PRINTFORMW 「实际上什么都没想，稍微探探虚实就会漏出马脚」
		ELSE
			;パロディのパロディ
			PRINTFORML 「这个青色的妖精是我的朋友……」
			SELECTCASE RAND:5
			CASE 1
				;work by JoJo's Bizarre Adventure
				PRINTFORMW 「S、白金之星！」
			CASE 2
				PRINTFORMW 「S、STAR WARS！」
			CASE 3
				;work by Transformers
				PRINTFORMW 「ス、斯塔スクリーム！」
			CASE 4
				PRINTFORMW 「ス、斯塔牛奶！」
			CASEELSE
				PRINTFORMW 「ス、斯塔チャイルド！」
			ENDSELECT
		ENDIF
	;琪露諾の話
	CASE 13
		IF ARG:1 >= 10
			PRINTFORML 「琪露诺操纵冰的能力在妖精中也是相当少见的」
			PRINTFORMW 「称自己为最强某种程度上也不算瞎说说～」
		ELSEIF ARG:1 >= 6
			PRINTFORMW 「琪露诺？笨蛋罢了」
		ELSE
			PRINTFORML 「嗯，地上还有操纵冰能力的稀奇妖精」
			PRINTFORMW 「叫什么来着……」
		ENDIF
	;拉瓦爾の話
	CASE 14
		IF ARG:1 >= 10
			PRINTFORML 「之前拉尔瓦有自己生命能量暴走的事」
			PRINTFORML 「机缘巧合下居然让她明白了暴走的窍门」
			PRINTFORMW 「如果没控制好完全暴走的话，你猜她会变成什么样？」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「那个叫拉尔瓦的妖精有着难以捉摸的能力」
			PRINTFORMW 「之前居然能让我的火把熄灭，真是怪事」
		ELSE
			PRINTFORML 「那是个名叫拉尔瓦的厉害妖精！」
			PRINTFORMW 「具体厉害在哪儿？嗯……？」
		ENDIF
	;大妖精の話
	CASE 15
		IF ARG:1 >= 10
			PRINTFORML 「听我说听我说！大酱绝对不是那家伙的本名对吧！」
			PRINTFORMW 「她是能力与姓名都未知的怪异妖精，不觉得超神秘的吗！！」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「大酱是怎样的妖精？」
			PRINTFORMW 「去问她本人不就好了ー」
		ELSE
			;なんというかすいません
			PRINTFORML 「唔……\@ TALENT:[[大妖精]]:胸圍 > 0 ? 胸很大的 # \@欧派妖精、叫什么来着、欧酱？」
			PRINTFORMW 「啊，不对不对，不是这个感觉！ 唔、大奶酱！」
		ENDIF
	;莉莉Ｗの話
	CASE 16
		;春
		IF DAY:2 == 1
			TRYCALL M_KOJO_COLOR_K[[莉莉Ｗ]]
			PRINTFORML 「春天到了哦！」
			CALL M_KOJO_COLOR_K111
			PRINTFORMW 「春天到了哦ー！」
			PRINTFORMW 「快快、%CALLNAME:MASTER%也一起」
			PRINTL
			TRYCALL M_KOJO_COLOR_K[[莉莉Ｗ]]
			PRINTFORML 「春天到了哦！」
			CALL M_KOJO_COLOR_K111
			PRINTFORML 「春天到了哦～！」
			PRINTL
			PRINTFORMDW 春天到了哦～！
		ELSEIF ARG:1 >= 10
			;完全に原創設定です
			PRINTFORML 「之前和莉莉白拉尔瓦三人一起開过一个严肃地会议，名为跨越冬季作战会议～」
			PRINTFORMW 「为了找出幻想乡所有冬天不寒冷的地方！」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「一般我们都称莉莉白为代表春天的妖精」
			PRINTFORMW 「……那代表夏秋冬的妖精在哪呢？」
		ELSE
			PRINTFORML 「那个白色的，不清楚到底是怎样的妖精」
			PRINTFORMW 「在不同的季节性格也会不一样」
		ENDIF
	;莉莉Ｂの話
	CASE 17
		IF ARG:1 >= 10
			PRINTFORML 「嗨，莉莉！来玩春天游戏吧……」
			PRINTFORMW 「哼哼っ！ 你这家伙是莉莉黑吧！」
			PRINTFORMW 「无所谓了，一起来玩春天游戏吧～♪」
		ELSEIF ARG:1 >= 6
			PRINTFORML 「那个黑色的家伙，长得和莉莉白一模一样」
			PRINTFORMW 「会不会是双胞胎妖怪？那样的话就是两个人的意思了吧！」
		ELSE
			PRINTFORML 「那个黑色的，不清楚到底是怎样的妖精」
			PRINTFORMW 「在不同的季节性格也会不一样，嗯？总觉得和谁一样啊」
		ENDIF
	;赫喀提亞との話
	CASE 18
		IF TALENT:[[赫喀提亞]]:心情 == -1
			PRINTFORML 「%CALLNAME:MASTER%、你对主人做了什么吗……？」
			PRINTFORMW 「好像正在气头上，怪吓人的……」
		;恋人なら1/2
		ELSEIF TALENT:[[赫喀提亞]]:恋人 && !RAND:2
			PRINTFORML 「呼呼♪ 需不需要我去帮%CALLNAME:MASTER%说说好话？」
			PRINTFORMW 「就像一家人一样讷？♪」
		;両方6以下
		ELSEIF ABL:[[赫喀提亞]]:親密 < 6 && ABL:[[克勞恩皮絲]]:親密 < 6
			PRINTFORML 「这位是我的主人，赫卡提亚大人！」
			PRINTFORMW 「她是多么伟大的存在%CALLNAME:MASTER%不知道吧，对她无礼是多么愚蠢！」
		;どっちか6以上
		ELSE
			;なんかややこしいことしてるけど、要するに両方親密が高ければどっちか、片方だけならそっちだけを表示したい
			VARSET LOCAL
			LOCAL:1 = ABL:[[赫喀提亞]]:親密 >= 6
			LOCAL:2 = ABL:[[克勞恩皮絲]]:親密 >= 6
			IF LOCAL:1 && LOCAL:2
				LOCAL = RAND:2 + 1
			ELSEIF LOCAL:1
				LOCAL = 1
			ELSEIF LOCAL:2
				LOCAL = 2
			ENDIF
			IF LOCAL == 1
				IF ABL:[[赫喀提亞]]:親密 >= 10
					PRINTFORML 「最近主人都被%CALLNAME:MASTER%迷的神魂颠倒了」
					PRINTFORMW 「哼哼，瞒不过的！ 两位在玩"大人的游戏"是吧？」
				ELSE
					PRINTFORML 「主人好像很在意%CALLNAME:MASTER%的事」
					PRINTFORMW 「姆ッ！？ %CALLNAME:MASTER%、到底对主人施了什么奇妙的魔法？」
				ENDIF
			ELSEIF LOCAL == 2
				IF ABL:[[克勞恩皮絲]]:親密 >= 10
					SELECTCASE M_KOJO_K111_MASTER_IMPRESSION()
					CASE "ロリコン"
						PRINTFORML 「主人、%CALLNAME:MASTER%好像被叫做萝莉控来着」
						PRINTFORMW 「萝莉控是值得托福信赖的人的意思吗？」
					CASE "清掃中毒者"
						PRINTFORML 「主人、让%CALLNAME:MASTER%来打扫我们的房间算了？」
						PRINTFORMW 「她可是连一丝一毫灰尘都不放过的家伙，超爱干净的」
					CASE "料理人"
						PRINTFORML 「主人、让%CALLNAME:MASTER%来给我们做饭吧？」
						PRINTFORMW 「我已经替主人检验过了哦，%CALLNAME:MASTER%的料理绝对有一手的！」
					CASE "弾幕強者"
						PRINTFORML 「主人、我和%CALLNAME:MASTER%组成Team如何？」
						PRINTFORMW 「实力毋庸置疑、而且很会照顾人……啊，不是这个意思、是指他容易相处的意思！」
					CASE "昆虫王"
						PRINTFORML 「主人、地狱特有的昆虫是什么啊？」
						PRINTFORMW 「对昆虫特着迷的%CALLNAME:MASTER%为此在意的不得了」
					CASE "モテ男"
						PRINTFORML 「主人～！ 为什么恋人只能有一个啊！？」
						PRINTFORMW 「有了恋人之后又喜欢上别人该怎么办啊！？」
					CASE "インテリ"
						PRINTFORML 「主人、让%CALLNAME:MASTER%来协助主人出谋划策吧？」
						PRINTFORMW 「为了地狱的发展我们也得不断前行！」
					CASE "饒舌"
						;これだけ稍微違う
						PRINTFORML 「主人如何评价%CALLNAME:MASTER%？」
						PRINTFORMW 「我是觉得他挺有趣的，人也不错！」
					CASE "金持ち"
						PRINTFORML 「主人、让%CALLNAME:MASTER%来我们手下干活吧？」
						PRINTFORMW 「他似乎是个很会赚钱的人哦！」
					CASEELSE
						;赫喀提亞が恋人でも発生する
						PRINTFORML 「主人如何评价%CALLNAME:MASTER%？」
						PRINTFORMW 「我是觉得他没什么用处早点赶走算了！」
					ENDSELECT
				ELSE
					;ここだけフルネーム
					PRINTFORML 「主人、这是我的人类朋友%NAME:MASTER%哦！」
					SELECTCASE M_KOJO_K111_MASTER_IMPRESSION()
					CASE "ロリコン"
						PRINTFORMW 「别人好像都说他是萝莉控！」
					CASE "清掃中毒者"
						PRINTFORMW 「比起一日三餐更爱打扫卫生，留下肯定能给我们帮上忙的！」
					CASE "料理人"
						PRINTFORMW 「他做的饭可好吃了！」
					CASE "弾幕強者"
						PRINTFORMW 「别看只是人类，在弹幕方面居然不弱于我哦，是个值得信赖的家伙！」
					CASE "昆虫王"
						PRINTFORMW 「是经常玩斗虫的昆虫爱好者！」
					CASE "モテ男"
						PRINTFORMW 「是幻想乡有名的花花公子，不知为什么这么受欢迎！」
					CASE "インテリ"
						PRINTFORMW 「脑袋很灵光，应该能帮到主人！」
					CASE "饒舌"
						PRINTFORMW 「不清楚别的，但这家伙相当会讲！」
					CASE "金持ち"
						PRINTFORMW 「是个阔佬哦！」
					CASEELSE
						PRINTFORMW 「没什么优点，但和他玩还挺愉快的！」
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	;純狐との話
	CASE 19
		IF TALENT:[[純狐]]:心情 == -1
			PRINTFORML 「%CALLNAME:MASTER%、你对友人大人做了什么吗……？」
			PRINTFORMW 「千万不要招惹气头上的友人大人，否则会发生恐怖是事情哦！！」
		ELSEIF TALENT:[[純狐]]:恋人 && !RAND:2
			PRINTFORML 「呼呼♪我是你们的小孩吗，要靠我来缓解和友人大人的关系？」
			PRINTFORMW 「就像一家人一样讷？♪」
		ELSEIF ABL:[[純狐]]:親密 < 6 && ABL:[[克勞恩皮絲]]:親密 < 6
			PRINTFORML 「这位是主人大人的友人纯狐大人哦！」
			PRINTFORMW 「对待她绝对不允许有任何失礼之处知道吗！」
		ELSE
			;純狐は親密が上がりにくいので5から
			VARSET LOCAL
			LOCAL:1 = ABL:[[純狐]]:親密 >= 5
			LOCAL:2 = ABL:[[克勞恩皮絲]]:親密 >= 6
			IF LOCAL:1 && LOCAL:2
				LOCAL = RAND:2 + 1
			ELSEIF LOCAL:1
				LOCAL = 1
			ELSEIF LOCAL:2
				LOCAL = 2
			ENDIF
			IF LOCAL == 1
				IF ABL:[[純狐]]:親密 >= 10
					PRINTFORML 「友人大人一直以来都很温柔，但最近柔和的不太对头了，每次看到我都会亲切的过来嘘寒问暖的」
					PRINTFORMW 「然后闲聊半天后总会绕到关于%CALLNAME:MASTER%的事情」
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%难不成和友人大人关系很好吗？」
					PRINTFORMW 「友人大人好像对%CALLNAME:MASTER%格外宽容，」
				ENDIF
			ELSEIF LOCAL == 2
				IF ABL:[[克勞恩皮絲]]:親密 >= 10
					PRINTFORML 「友人大人到底是怎么样看待%CALLNAME:MASTER%的呢？」
					PRINTFORMW 「我是觉得是挺好的\@ TALENT:MASTER:性別 == 1 ? 妈……姐姐 # 爸……哥哥 \@这种！」
				ELSE
					PRINTFORML 「友人大人，这人是我新交的人类朋友%CALLNAME:MASTER%哦～」
					PRINTFORMW 「最近经常和这个\@ TALENT:MASTER:性別 == 1 ? 女孩子 # 男孩子 \@在一起玩～！」
				ENDIF
			ENDIF
		ENDIF
	;七夕の話
	CASE 20
		PRINTFORML 「说来今天是七夕诶」
		IF TALENT:[[克勞恩皮絲]]:恋慕
			PRINTFORMW 「天气晴朗的能看到流星，赶紧许个愿吧」
			PRINTFORML 「我的愿望是～……」
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「晚上%CALLNAME:MASTER%陪我去看星星吧♪」
			CASEELSE
				PRINTFORMW 「今后想一直和%CALLNAME:MASTER%在一起♪」
			ENDSELECT
		ELSE
			PRINTFORMW 「说到七夕就不得不说起那个鬼畜的天帝ー」
			PRINTFORMW 「鬼畜到了让我有点向往的程度～」
		ENDIF
	;満月の話
	CASE 21
		PRINTFORML 「啊！ 快看！ 今天是\@ DAY:2 == 3 ? 十五夜 # 満月 \@哦！」
		SELECTCASE DAY:2
		CASE 1
			PRINTFORMW 「%CALLNAME:MASTER%看到的是怎样的颜色？ 黄色？ 红色？ 还是青色？」
		CASE 2
			PRINTFORMW 「姆姆っ！？ 这个月亮，让我对新的弹幕形状有了灵感！」
		CASE 3
			IF M_KOJO_K111_EARTH(CFLAG:[[克勞恩皮絲]]:現在位置)
				PRINTFORMW 「地面上看起来月亮好美……」
			ELSE
				PRINTFORMW 「以这样的视角看月亮还是第一次，感觉好奇妙……」
			ENDIF
		CASE 4
			PRINTFORMW 「月光皎洁却是我的能力来源，狂气的月色能增幅我发狂的能力♪」
		ENDSELECT
	;虹の話
	CASE 22
		PRINTFORML 「快快看%CALLNAME:MASTER%！ 天上有彩虹欸！」
		PRINTFORMW 「快点我们去找找彩虹的底部是怎么样的！」
;	;UFOの話
;	CASE 23
;		;＞[繞道]に移設
	;一緒に住んでる時の話
	CASE 24
		;初期からはじめて毎日話しかけていると最初に発生するのは土曜日から
		IF YOUBI_MATCH(DAY, "土")
			PRINTFORML 「今日该是%CALLNAME:MASTER%去打扫浴室的日子哦」
			;純狐邸のお風呂は1067
			IF (TALENT:MASTER:清掃中毒 || ABL:MASTER:清掃技能 >= 6)
				IF YOGORE:1067 < 500
					PRINTFORMW 「诶？已经打扫好了？真是清洁狂人啊……」
				ELSE
					PRINTFORMW 「诶？眼睛都发青了……那么乐意干活吗……」
				ENDIF
			ELSEIF ABL:MASTER:清掃技能 < 3 || TALENT:MASTER:汚臭耐性 > 0
				PRINTFORMW 「%CALLNAME:MASTER%、要好好打扫哦？」
			ELSE
				IF YOGORE:1067 < 500
					PRINTFORMW 「诶？已经打扫好了？ 不愧是你ー！」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%要是搞不定可以来找我哦～♪」
				ENDIF
			ENDIF
		ELSEIF YOUBI_MATCH(DAY, "日")
			PRINTFORML 「今天该出去采购了哦%CALLNAME:MASTER%」
			SELECTCASE DAY:2
			CASE 1
				PRINTFORMW 「把新出的杯面口味都买一份回来让我尝尝！」
			CASE 2
				PRINTFORMW 「我想想，必要的食材、调味料、剪刀、水彩笔、洗洁精、肥皂、沐浴露ー、毛巾、胖次……挺快嘛」
			CASE 3
				PRINTFORMW 「替我带些点心回来哦，不许忘记！」
			CASE 4
				PRINTFORMW 「把这个月要喝的酒买回来！」
			ENDSELECT
		ELSEIF YOUBI_MATCH(DAY, "月")
			;謎の設定,悪の組織の宣傳站的な
			PRINTFORML 「%CALLNAME:MASTER%，去巡逻一下」
			IF TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORMW 「我也一起哦～♪」
			ELSEIF TALENT:[[克勞恩皮絲]]:思慕
				PRINTFORMW 「我也会去的所以快出发」
			ELSE
				PRINTFORMW 「虽说只是在月都闲逛～」
			ENDIF
		ELSEIF YOUBI_MATCH(DAY, "火")
			IF TALENT:MASTER:清掃中毒 || ABL:MASTER:清掃技能 >= 6
				PRINTFORML 「%CALLNAME:MASTER%来帮忙打扫后家里变得非常干净了」
				PRINTFORMW 「不愧被称之为清扫狂人……」
			ELSEIF ABL:MASTER:清掃技能 < 3 || TALENT:MASTER:汚臭耐性 > 0
				PRINTFORML 「%CALLNAME:MASTER%来家里之后，总觉得脏了啊……」
				IF TALENT:MASTER:汚臭耐性 > 0
					PRINTFORMW 「……洗过澡了吗？」
				ELSE
					PRINTFORMW 「我和%CALLNAME:MASTER%两人让散落的垃圾更多了」
				ENDIF
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%来帮忙打扫后家里变得非常干净了……」
				PRINTFORMW 「也就是说我稍微再放纵些也没关系对吧！」
			ENDIF
		ELSEIF YOUBI_MATCH(DAY, "水")
			PRINTFORML 「今天%CALLNAME:MASTER%别忘了帮我们洗衣服」
			IF TALENT:MASTER:性別 == 1
				PRINTFORMW 「大家的衣服一起洗好了，没关系的～」
			ELSE
				PRINTFORMW 「丑话说在前面、如果%CALLNAME:MASTER%把主人的贴身内衣和你的内裤一起洗、被主人杀掉也不要有怨言哦？」
				;「『最初で最後の無名の弾幕』だからね」も捨てがたい……。
			ENDIF
		ELSEIF YOUBI_MATCH(DAY, "木")
			PRINTFORML 「今天%CALLNAME:MASTER%做饭哦」
			IF TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORMW 「要一起做嘛ー♪」
			ELSE
				PRINTFORMW 「准备做些什么？」
			ENDIF
		ELSEIF YOUBI_MATCH(DAY, "金")
			;純狐が恋慕だと家賃が無くなる
			IF TALENT:[[純狐]]:恋慕 && !FIRSTTIME("家賃", 1)
				IF FIRSTTIME("家賃カット")
					PRINTFORML 「收租啦收租啦……」
					PRINTFORMW 「%CALLNAME:MASTER%可以不交哦，友人大人特意免去了%CALLNAME:MASTER%的租金，好好感谢吧！」
					IF TALENT:[[克勞恩皮絲]]:恋人
						PRINTFORMW 「所以说、%CALLNAME:MASTER%已经是我们的家人了哦♪」
					ELSEIF TALENT:[[克勞恩皮絲]]:恋慕
						PRINTFORMW 「所以说、%CALLNAME:MASTER%已经是我们的家人了哦！？」
					ELSE
						PRINTFORMW 「所以说、%CALLNAME:MASTER%已经是我们的家人了……？」
					ENDIF
				;純狐と赫喀提亞が恋慕だと逆に工资日になる,多すぎ？
				ELSEIF TALENT:[[赫喀提亞]]:恋慕
					PRINTFORML 「啊，对了！ 主人叫我把这个给%CALLNAME:MASTER%」
					PRINTL
					PRINTFORMDL 收到了厚厚一沓钱！
					PRINTW
					PRINTFORMW 「姆姆姆…%CALLNAME:MASTER%什么都没做却能得到主人的关爱ー！」
					MONEY += 100000
				ELSE
					;TGIF
					PRINTFORML 「今天是周末哦～」
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「%CALLNAME:MASTER%也是享受周末主义者吧」
					CASEELSE
						PRINTFORMW 「是不是该好好休息一下了？」
					ENDSELECT
				ENDIF
			;安すぎる家賃,まぁ現実的に考えたら工资も安いし（なお物価）
			ELSE
				PRINTFORML 「到收租日了」
				PRINTFORMW 「快点快点，租金拿出来！」
				IF MONEY < 10000
					PRINTFORML 「诶……%CALLNAME:MASTER%、根本不够嘛！」
					PRINTFORMW 「这可没法包庇%CALLNAME:MASTER%哦，只能向主人大人报告了！」
					CALL CHANGE_CFLAG(4, [[純狐]], -10)
					CALLF FIRSTTIME("家賃")
				ELSE
					PRINTL
					PRINTFORMDL \\10,000 被收走啦！
					PRINTW
					IF FIRSTTIME("家賃")
						PRINTFORMW 「怎么可能白白让%CALLNAME:MASTER%住啊，開什么玩笑？」
					ELSE
						PRINTFORML 「我收下了哦♪」
						PRINTFORMW 「这样一来友人大人也会很高兴吧」
					ENDIF
					MONEY -= 10000
					CALL CHANGE_CFLAG(4, [[純狐]], 1 + ABL:[[純狐]]:親密)
				ENDIF
			ENDIF
		ENDIF
	;恋人になったばかりの話,一回だけ表示される
	CASE 25
		IF FIRSTTIME("恋人")
			PRINTFORML 「我们已经是恋人了吧a」
			PRINTFORMW 「可是恋人的话，要做些什么才叫恋人呢？」
		ENDIF
	;眠いときの会話
	CASE 26
		PRINTFORML 「呼啊啊～ぁ……」
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「眼睛要睁不開了……」
		CASE 2
			PRINTFORMW 「嗯嗯…睡着了啦……」
		CASEELSE
			PRINTFORMW 「嗯～……」
		ENDSELECT
	;えっちした後（満足した）
	CASE 27
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「欸嘿嘿～、%CALLNAME:MASTER%一点都不懂爱惜女孩子啊，但是我就喜欢%CALLNAME:MASTER%狂暴的模样…❤」
		CASE 2
			PRINTFORMW 「恩呼呼～、还想被%CALLNAME:MASTER%淦啦，下次要做更久哦…❤」
		CASEELSE
			PRINTFORMW 「嗯～❤ 感觉把一切累赘都去走了，变成全新的克劳恩皮斯了～♪」
		ENDSELECT
	;微醺
	CASE 28
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「再喝点嘛！」
		CASE 2
			PRINTFORMW 「还想喝啊～♪」
		CASEELSE
			PRINTFORMW 「恩哼哼～♪ 才没醉呢！」
		ENDSELECT
[SKIPSTART]
	CASE
		PRINTFORML 「」
		PRINTFORMW 「」
[SKIPEND]
	ENDSELECT
	SETBIT TCVAR:111:359, ARG
ENDIF
;==================================================
;301,泡茶
;==================================================
@M_KOJO_MESSAGE_COM_K111_301
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORMDL %CALLNAME:MASTER%为%CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? 们 # \@泡了茶…
	PRINTW
	IF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMW 「嗯……谢了」
	ELSE
		PRINTFORML 「谢谢ー！ 」
		SELECTCASE RAND:5
		CASE 1
			PRINTFORML 「呼呼……热气腾腾的ー！」
		CASE 2
			PRINTFORML 「呼……虽然茶也很香，但还是希望有可乐」
		CASE 3
			PRINTFORML 「烫烫……没有果汁之类的喝嘛？」
		CASE 4
			PRINTFORML 「呼……唔……舌头っ！」
		CASEELSE
			PRINTFORML 「烫烫……这是那种茶啊？」
		ENDSELECT
		;大成功
		IF TFLAG:SELECTCOM的分岐 == 1
			SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「嗯ー♪ 味道很棒哦♪」
			CASE 2
				PRINTFORML 「嗯ー♪ %CALLNAME:MASTER%泡的茶很好喝哦～♪」
			CASEELSE
				PRINTFORML 「嗯ー♪ 非常好喝～♪」
			ENDSELECT
		;失敗
		ELSEIF TFLAG:SELECTCOM的分岐 == -1
			SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「唔っ、总觉得有股怪味……」
			CASE 2
				PRINTFORML 「嗯嗯っ！ 烫死人了ー！」
			CASEELSE
				PRINTFORML 「唔欸っ、太烫了ー……」
			ENDSELECT
		ENDIF
	ENDIF
	WAIT
ENDIF
RETURN 1
;==================================================
;302,身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K111_302
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;心情不快
	IF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMDL %CALLNAME:MASTER%试图与%CALLNAME:TARGET%进行身体接触
		PRINTW
		PRINTFORML 「姆……！」
		PRINTFORMW 「我可没那心情……」
		RETURN 1
	;背中を流す
	ELSEIF BATHCHECK(CFLAG:MASTER:現在位置) && IN_HOME(CFLAG:MASTER:現在位置)
		PRINTFORMDL %CALLNAME:MASTER%为%CALLNAME:TARGET%擦背
		PRINTW
		PRINTFORML 「要帮我洗吗？ 辛苦你了哦♪」
		PRINTFORMW 「呀っ❤ 不要摸奇怪的地方♪」
	;▼状況会話的房間でゲームをこっちに持ってきた
	;0-1,自室
	ELSEIF !GETBIT(TCVAR:111:359, 0) && M_KOJO_K111_HOUSE(CFLAG:111:現在位置) == 1
		CALL M_KOJO_K111_TALKSET("状況会話", 0, 1)
	;0-2,主人公的房間
	ELSEIF !GETBIT(TCVAR:111:359, 0) && CFLAG:111:現在位置 == CFLAG:MASTER:初期位置
		CALL M_KOJO_K111_TALKSET("状況会話", 0, 2)
	ELSE
		IF TALENT:111:恋人
			CALL M_KOJO_K111_SKINSHIPSET("恋人")
		ELSEIF TALENT:111:恋慕
			CALL M_KOJO_K111_SKINSHIPSET("恋慕")
		ELSE
			CALL M_KOJO_K111_SKINSHIPSET("其他")
		ENDIF
	ENDIF
;	;大成功
;;	IF TFLAG:SELECTCOM的分岐 == 1
;		PRINTFORML 「きゃはっ♪ %CALLNAME:MASTER%、楽しいね♪」
;	;失敗
;	ELSEIF TFLAG:SELECTCOM的分岐 == -1
;		PRINTFORML 「いたっ！ もー、ぶつけないでよー！」
;	ENDIF
ENDIF
RETURN 1

@M_KOJO_K111_SKINSHIPSET(ARGS)
#DIM 汎用身体接觸数
#DIM 恋慕身体接觸数
汎用身体接觸数 = 12
恋慕身体接觸数 = 20
IF ARGS == "恋人"
	SELECTCASE RAND:(10 + 恋慕身体接觸数 + 汎用身体接觸数)
	CASE 1
		IF CFLAG:[[克勞恩皮絲]]:今日の運勢 > 700
			PRINTFORMDL 克劳恩皮斯甜腻的在%CALLNAME:MASTER%怀中撒娇
			PRINTW
			PRINTFORML 「嗯嘿嘿～♪」
			PRINTFORML 「昨晚梦到和%CALLNAME:MASTER%做了H的事情～」
			PRINTFORMW 「所以～、就忍不住赶紧来和%CALLNAME:MASTER%亲热了ー❤」
		ELSEIF CFLAG:[[克勞恩皮絲]]:今日の運勢 < 300
			PRINTFORMDL 克劳恩皮斯突然间梨花带雨地扑进%CALLNAME:MASTER%怀中撒娇
			PRINTW
			PRINTFORML 「呜呜～、%CALLNAME:MASTER%……」
			PRINTFORML 「昨天梦到%CALLNAME:MASTER%抛下我去了别的世界旅行……」
			PRINTFORMW 「不可以那样做……%CALLNAME:MASTER%不许那样对我ー！」
		ELSE
			PRINTFORMDL 克劳恩皮斯钻进%CALLNAME:MASTER%怀中撒娇
			PRINTW
			PRINTFORMW 「嗯ー♪ %CALLNAME:MASTER%～、来亲亲吧ー❤」
		ENDIF
	CASE 2
		PRINTFORMDL 克劳恩皮斯用脸使劲蹭着%CALLNAME:MASTER%的脖子
		PRINTW
		PRINTFORMW 「嗅嗅……%CALLNAME:MASTER%身上有好闻的味道～❤」
	CASE 3
		PRINTFORMDL 克劳恩皮斯凑近亲吻了%CALLNAME:MASTER%的脸颊
		PRINTW
		PRINTFORMW 「嗯～❤ LOVE and PEACE♪」
	CASE 4
		PRINTFORMDL %CALLNAME:MASTER%搂住克勞恩皮絲的肩膀，将她抱到身边
		PRINTW
		PRINTFORMW 「呼呼っ❤ 想要对我做什么嘛～？」
	CASE 5
		PRINTFORMDL %CALLNAME:MASTER%搂住克勞恩皮絲的肩膀，将她抱到身边
		PRINTW
		PRINTFORMW 「舔舔っ❤ 呼呼，有没有被我吓一跳啊？」
	CASE 6
		PRINTFORMDL 克劳恩皮斯慢悠悠凑到%CALLNAME:MASTER%眼前…
		PRINTW
		PRINTFORMW 「%CALLNAME:MASTER%、闭上眼睛………」
		PRINTFORML 「啾っ❤」
		PRINTFORMW 「呼呼，我的嘴唇甜吗♪」
	CASE 7
		PRINTFORMDL 克劳恩皮斯慢悠悠凑到%CALLNAME:MASTER%眼前…
		PRINTW
		PRINTFORMW 「%CALLNAME:MASTER%、闭上眼睛………」
		PRINTFORMDL 嘭!!
		PRINTFORMW 「呀哈哈哈♪ 克劳恩皮斯率先得分ー！」
	CASE 8
		PRINTFORMDL %CALLNAME:MASTER%认真看着克劳恩皮斯…
		PRINTW
		PRINTFORMW 「%CALLNAME:MASTER%的眼睛里面可以看到皮斯的样子诶……」
	CASE 9
		PRINTFORMDL %CALLNAME:MASTER%像克劳恩皮斯发动了挠痒
		PRINTW
		PRINTFORMW 「嗯唔欸っ❤ H的事情等下让%CALLNAME:MASTER%做个够啦～！」
	CASE 10
		PRINTFORMDL %CALLNAME:MASTER%爱抚着克劳恩皮斯的身体
		PRINTW
		PRINTFORMW 「好舒服的感觉？ 呼呼、被这样做好高兴♪」
	CASEELSE
		ARGS = 恋慕
		RESTART
	ENDSELECT
ELSEIF ARGS == "恋慕"
	SELECTCASE RAND:(恋慕身体接觸数 + 汎用身体接觸数)
	CASE 1
		PRINTFORMDL %CALLNAME:MASTER%刮了下克劳恩皮斯的鼻子
		PRINTW
		PRINTFORML 「啊っ、碰人家鼻子干……」
		PRINTFORMW 「啊……、啊……、哈啾！」
	CASE 2
		PRINTFORMDL %CALLNAME:MASTER%爱抚着克劳恩皮斯的身体
		PRINTW
		PRINTFORML 「啊っ……\/\/\/」
		PRINTFORMW 「倒是很舒服嘛\/\/\/」
	CASE 3
		PRINTFORMDL 克劳恩皮斯像猫咪一样蹭着%CALLNAME:MASTER%的脸颊
		PRINTW
		PRINTFORMW 「嗯～……蹭蹭！」
	CASE 4
		PRINTFORMDL %CALLNAME:MASTER%直直望着克劳恩皮斯
		PRINTW
		PRINTFORMW 「干嘛？ 这样子色咪咪盯着人……\/\/\/」
	CASE 5
		PRINTFORMDL %CALLNAME:MASTER%摸着克劳恩皮斯的帽子
		PRINTW
		PRINTFORML 「嗯？ 想要带带看？ 可以哦！」
		PRINTFORMW 「呀哈哈！ 好有趣，很合适哦～！」
	CASE 6
		PRINTFORMDL %CALLNAME:MASTER%想摸摸火把
		PRINTW
		PRINTFORML 「可以哦？ 给！」
		PRINTFORML 「要好好握住这里ー……」
		PRINTFORMW 「然后这样挥动起来！ 呀哈哈哈哈ー！ 发狂吧发狂吧ー♪」
	CASE 7
		PRINTFORMDL 克劳恩皮斯坐在%CALLNAME:MASTER%的肩上
		PRINTW
		PRINTFORML 「%CALLNAME:MASTER%、冲呀！！！！♪」
		PRINTFORMW 「呀哈哈哈哈哈ー！」
		PRINTL
		PRINTFORMDW 紧夹着脸颊的幼女双腿与贴在后颈的细嫩肉瓣，隔着轻薄布料直直冲击%CALLNAME:MASTER%的大脑……！
	CASE 8
		PRINTFORMDL 克劳恩皮斯摸着%CALLNAME:MASTER%的身体
		PRINTW
		IF TALENT:MASTER:性別 == 1
			PRINTFORML 「怎么才能有%CALLNAME:MASTER%一样光滑的肌肤啊？」
			PRINTFORMW 「是有什么秘诀吗？ 告诉我嘛」
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%是想锻炼成肌肉男吗？」
			PRINTFORMW 「为了保护柔若公主而想要变得更强壮，没错吧！」
		ENDIF
	CASE 9
		PRINTFORMDL %CALLNAME:MASTER%在克劳恩皮斯腰间挠来挠去
		PRINTW
		PRINTFORML 「咿呀っ！ 不要闹啦～！」
		PRINTFORMW 「受不了了！我还手了哦っ！」
	CASE 10
		PRINTFORMDL 克劳恩皮斯戳着%CALLNAME:MASTER%的身体
		PRINTW
		PRINTFORMW 「欸一欸一！」
	CASE 11
		PRINTFORMDL %CALLNAME:MASTER%捏着克劳恩皮斯脸颊揉来揉去
		PRINTW
		PRINTFORML 「喵～！ 这样揉捏皮斯的脸会肿的～……」
		PRINTFORMW 「姆ーっ！」
	CASE 12
		PRINTFORMDL %CALLNAME:MASTER%像克劳恩皮斯发动了挠痒
		PRINTW
		PRINTFORML 「呀……\/\/\/」
		PRINTFORMW 「总觉得好羞耻……\/\/\/」
	CASE 13
		PRINTFORMDL %CALLNAME:MASTER%触碰了克劳恩皮斯的翅膀
		PRINTW
		PRINTFORML 「妖精的翅膀是用能量构成的哦」
		PRINTFORMW 「所以这么轻薄还能飞行，同时也不会损坏～」
	CASE 14
		PRINTFORMDL 克劳恩皮斯蹭着%CALLNAME:MASTER%的手心
		PRINTW
		IF TALENT:MASTER:性別 == 1
			PRINTFORMW 「喵～♪ %CALLNAME:MASTER%的手很精致嘛❤」
		ELSE
			PRINTFORMW 「喵～♪ %CALLNAME:MASTER%的手很有力量的感觉～❤」
		ENDIF
	CASE 15
		PRINTFORMDL %CALLNAME:MASTER%捏了捏克劳恩皮斯的耳朵
		PRINTW
		PRINTFORML 「呜喵～…」
		PRINTFORMW 「身体都要发软了～…\/\/\/」
	CASE 16
		PRINTFORMDL %CALLNAME:MASTER%抱住克劳恩皮斯的身体使劲揉着
		PRINTW
		PRINTFORMW 「嗯喵～！ 被这样乱摸，这么还感觉有点舒服啊～♪」
	CASE 17
		PRINTFORMDL %CALLNAME:MASTER%挠着克劳恩皮斯的下巴
		PRINTW
		PRINTFORMW 「嗯喵～♪ 但我不是猫咪哦！」
	CASE 18
		PRINTFORMDL %CALLNAME:MASTER%挠着克劳恩皮斯的下巴
		PRINTW
		PRINTFORMW 「呜！ 超痒的说……」
	CASE 19
		PRINTFORMDL %CALLNAME:MASTER%将克劳恩皮斯的小脚脚握在手心
		PRINTW
		PRINTFORML 「呜哇～…好像有些疲劳的感觉ー」
		PRINTFORMW 「%CALLNAME:MASTER%帮我揉揉吧～」
	CASE 20
		PRINTFORMDL %CALLNAME:MASTER%将脸埋进克劳恩皮斯的发间，闻着她的味道
		PRINTW
		PRINTFORML 「嗯～❤ 怎样，好闻嘛～？」
		SELECTCASE DAY:2
		CASE 1
			PRINTFORMW 「最近在用樱桃洗发水ー」
		CASE 2
			PRINTFORMW 「最近在用香瓜洗发水ー」
		CASE 3
			PRINTFORMW 「最近在用水蜜桃洗发水ー」
		CASE 4
			PRINTFORMW 「最近在用草莓洗发水ー」
		ENDSELECT
	CASEELSE
		ARGS = 汎用
		RESTART
	ENDSELECT
;恋慕でもそれ以外でも発生する会話
ELSEIF ARGS == "汎用"
	SELECTCASE RAND:汎用身体接觸数
	CASE 1
		PRINTFORMDL %CALLNAME:MASTER%像克劳恩皮斯发动了挠痒
		PRINTW
		PRINTFORML 「呀哈哈哈！」
		PRINTFORMW 「不要在玩弄我了啊ー！」
	CASE 2
		PRINTFORMDL %CALLNAME:MASTER%认真看着克劳恩皮斯…
		PRINTW
		PRINTFORMW 「噗っ！ %CALLNAME:MASTER%的样子好可疑ー♪」
	CASE 3
		PRINTFORMDL %CALLNAME:MASTER%认真看着克劳恩皮斯…
		PRINTW
		PRINTFORML 「干嘛？ 比谁先笑得游戏嘛？」
		PRINTFORMW 「盯~~~」
	CASE 4
		PRINTFORMDL 克劳恩皮斯走到%CALLNAME:MASTER%的身后
		PRINTW
		PRINTFORMW 「在你背后写了字哦，猜猜是什么～♪」
		PRINTL
		PRINTFORMDW 居然是英语吗……。
	CASE 5
		;膝カックンは海外には無い恶作剧のようです。まぁここでは尻叩きでもローキックでも何でも良いんで。
		;　　 ∧.∧　　　∧.∧
		;Σ　(□ﾟ! )　　(ﾟ∀ﾟ*)
		;⊂ニニニ　)　 /~y　ﾍ ﾍ
		;　と|　　/)　/ /|　 ) )
		;　 /`/　/~／⌒＼ﾍ　⊂/
		;Σ/ /　/(ゞ ／＼_|　|
		;　＼＼ｶﾞｯ￣///　 |　|
		;　　＼＼ ＼　　　|　|
		;　　⊂／ﾍ /　　⊂＿_|
		PRINTFORMDL 克劳恩皮斯走到%CALLNAME:MASTER%的身后
		PRINTW
		PRINTFORMW 「在你背后写了字哦，猜猜是什么～♪」
		PRINTFORML 「…看上去是这样、咃！！」
		PRINTFORMW ！！
		PRINTL
		PRINTFORMDW 膝盖狠狠挨了一下……。
	CASE 6
		;実によってパターンを変えようと思ったけどあまり意味がないのでやめた。
		PRINTFORMDL 克勞恩皮絲は懐から木の実を取り出した
		PRINTW
		SELECTCASE RAND:4
		CASE 1
			PRINTFORML 「快看！ 红果果！」
		CASE 2
			PRINTFORML 「快看！ 青果果！」
		CASE 3
			PRINTFORML 「快看！ 黄果果！」
		CASEELSE
			PRINTFORML 「快看！ 黑果果！」
		ENDSELECT
		SELECTCASE RAND:12
		CASE 1, 2, 3
			PRINTFORMW 「把这个握在手里ー……」
			PRINTL
			PRINTFORMDL 挤!
			PRINTFORMDW …………汁水溅了一身……。
			PRINTL
			PRINTFORMW 「呀哈哈ー♪ 很有趣吧ー！」
		CASE 4, 5, 6
			PRINTFORMW 「尝尝看、很好吃哦！」
			PRINTL
			PRINTFORMDL 于是尝了一个。
			PRINTFORMDW …………好苦…。
			PRINTL
			PRINTFORMW 「呀哈哈哈哈♪ 全给你啦～」
		CASEELSE
			PRINTFORMW 「尝尝看、很好吃哦！」
			PRINTL
			PRINTFORMDL 于是尝了一个。
			PRINTFORMDW ……很好吃！
			PRINTL
			PRINTFORMW 「味道不错吧～！」
		ENDSELECT
	CASE 7
		;特殊道具集
		VARSET LOCAL
		LOCAL:1 = ITEM:魔水晶垂飾
		LOCAL:2 = ITEM:三粒の天滴
		LOCAL:3 = ITEM:甜蜜安眠枕
		LOCAL:4 = ITEM:月の羽衣
		LOCAL:5 = ITEM:奇跡之石
		FOR LOCAL, 1, 10
			SIF LOCAL:LOCAL
				LOCAL:10 ++
		NEXT
		IF !LOCAL:10
			RESETCOLOR
		ELSE
			SETCOLOR C_RED
		ENDIF
		PRINTFORM 克劳恩皮斯在%CALLNAME:MASTER%的腰包里摸索着，
		;何も持ってない
		IF !LOCAL:10
			PRINTFORML 似乎在寻找什么
			PRINTW
			CALL M_KOJO_COLOR_K111
			PRINTFORML 「什么有趣的东西都没有……」
			PRINTFORMW 「明明%CALLNAME:MASTER%这种人身上带着幼女的胖次也不奇怪」
		;何か持ってる
		ELSE
			;シャッフルして最初にヒットしたやつ
			CALL FISHER_YATES_SHAFFLE(10)
			FOR LOCAL, 1, 10
				;0番が混じってるので除外
				SIF !SHAFFLE_ARRAY:LOCAL
					CONTINUE
				IF LOCAL:(SHAFFLE_ARRAY:LOCAL)
					SELECTCASE SHAFFLE_ARRAY:LOCAL
					CASE 1
						;艾倫口上専用,恋人になって一周年の記念品
						PRINTFORML 找到了魔法水晶坠饰
						PRINTW
						CALL M_KOJO_COLOR_K111
						PRINTFORML 「哇，这个好好看！？」
						PRINTFORML 「不仅如此，还能感受到不可思议的魔力蕴含其中？」
					CASE 2
						;諏訪子口上専用,親愛の証,便宜上蛙の形に見える
						PRINTFORML 找到了三粒天滴
						PRINTW
						CALL M_KOJO_COLOR_K111
						PRINTFORML 「嗯？ 这是什么？ 」
						PRINTFORML 「哇！ 哇っ！ 怎么动起来了！」
					CASE 3
						;哆来咪口上専用？,单独指导読了の証
						PRINTFORML 找到了安眠枕
						PRINTW
						CALL M_KOJO_COLOR_K111
						PRINTFORML 「哇、为什么在包里放枕头啊！」
						PRINTFORML 「不仅如此，%CALLNAME:MASTER%的品味也很一般啊」
					CASE 4
						;鈴仙二號口上専用,親愛の証
						PRINTFORML 找到了月之羽衣
						PRINTW
						CALL M_KOJO_COLOR_K111
						PRINTFORML 「这是什么ー？ 轻的好像羽毛一样」
						PRINTFORML 「延展性也很棒～！ 好神奇～♪」
					CASE 5
						PRINTFORML 找到了米拉达的石头
						PRINTW
						CALL M_KOJO_COLOR_K111
						PRINTFORML 「这是什么？宝石吗？」
						PRINTFORML 「呜……总觉得拿在手里脑袋就昏沉沉的……」
						CFLAG:[[克勞恩皮絲]]:积攒度 = 1000
					ENDSELECT
					BREAK
				ENDIF
			NEXT
			SIF TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORML 「%CALLNAME:MASTER%、这是哪儿来的啊？？」
			PRINTW
			PRINTFORMDW %CALLNAME:MASTER%慌张的把东西抢了回来！
		ENDIF
	CASE 8
		PRINTFORMDL %CALLNAME:MASTER%与克劳恩皮斯决定进行扳手腕对决
		PRINTL
		PRINTFORMW 「准备……開始！」
		PRINTL
		IF ABL:MASTER:戦闘能力 > ABL:[[克勞恩皮絲]]:戦闘能力 + 1
			;恋慕があると1/2で負けてあげる,弾幕勝負で実力を知っていると（筋力の強さではないけど）バレる
			IF TALENT:[[克勞恩皮絲]]:恋慕
				IF !RAND:2
					PRINTFORML 「耶…！ 我赢啦ー♪」
					IF CFLAG:[[克勞恩皮絲]]:弾幕勝負勝利
						PRINTFORMW 「…%CALLNAME:MASTER%、不会放水了吧ー！」
					ELSE
						PRINTFORMW 「没想到%CALLNAME:MASTER%那么厉害！」
					ENDIF
				ELSE
					PRINTFORML 「咕ー！ 我输了……」
					PRINTFORMW 「%CALLNAME:MASTER%～、能不能让我赢一次嘛～！」
				ENDIF
			ELSE
				PRINTFORML 「咕ー！ 我输了……」
				PRINTFORMW 「没想到%CALLNAME:MASTER%那么厉害啊！」
			ENDIF
		ELSEIF INRANGE(ABL:MASTER:戦闘能力, ABL:[[克勞恩皮絲]]:戦闘能力, ABL:[[克勞恩皮絲]]:戦闘能力 + 1)
			;実力拮抗,克勞恩皮絲は妖精だけどそれなりにパワーがある
			IF !RAND:2
				PRINTFORML 「耶…！ 我赢啦ーー♪」
				PRINTFORMW 「%CALLNAME:MASTER%也还不错哦！」
			ELSE
				PRINTFORML 「咕ー！ 我输了……」
				PRINTFORMW 「好不甘心～……明明差点我就赢了～」
			ENDIF
		ELSE
			;ざぁこざぁこ
			PRINTFORML 「耶！ 赢啦～♪」
			PRINTFORMW 「嘻嘻！ %CALLNAME:MASTER%、被妖精打败有没有感觉很丢人啊～？」
		ENDIF
	CASE 9
		;占い,随意遊んでるだけなので特になんの効果もありません,なので何回でも発生
		PRINTFORMDL 克劳恩皮斯拿出了一摞卡片
		PRINTL
		PRINTFORML 「今天由我来为%CALLNAME:MASTER%进行占卜♪」
		PRINTFORMW 「从这些打乱的卡片中抽取一张ー……」
		PRINTL
		SELECTCASE RAND:9
		CASE 1
			PRINTFORMW 「啊！ 是『月』的卡牌！」
			PRINTFORMW 「嗯嗯，是凶兆的证明！ 尤其再晚上不要放松警惕！」
		CASE 2
			PRINTFORMW 「啊！ 是『星』的卡牌！！」
			PRINTFORMW 「不错哦，是幸运的证明！ 今天说不准会发生很棒的事情！恭喜哦♪」
		CASE 3
			PRINTFORMW 「啊！ 是『太阳』的卡牌！！」
			PRINTFORMW 「这代表希望！ 近期总是困扰你的事情终于快要解决了，嗯……发生什么了吗？」
		CASE 4
			PRINTFORMW 「啊！ 是『太阳』的卡牌……和他很像的『发狂的月』卡牌！」
			PRINTFORML 「呼呼呼…没想到运气那么背……这是代表恐怖的卡牌！」
			PRINTFORMW 「今天%CALLNAME:MASTER%将见识到地狱般的景象！ 可不要错过哦！」
		CASE 5
			PRINTFORMW 「啊！ 是『爱』的卡牌！」
			IF TALENT:[[克勞恩皮絲]]:恋慕
				;WOW!
				PRINTFORMW 「哦哦！ 这是爱的证明哦！ 看来今天得好好和%CALLNAME:MASTER%增进感情才行ー❤」
			ELSE
				PRINTFORMW 「这是爱的证明！ %CALLNAME:MASTER%是有喜欢的人了吗？」
			ENDIF
		CASE 6
			PRINTFORMW 「啊！ 是『钻石』的卡牌！」
			PRINTFORMW 「是财运的证明！ %CALLNAME:MASTER%买彩票了吗？」
		CASE 7
			PRINTFORMW 「啊！ 是『木』的卡牌！」
			PRINTFORMW 「是试炼的证明！克服越难攻克的挑战，就能获得越丰厚的回报！」
		CASE 8
			PRINTFORMW 「啊！ 是『火』的卡牌！」
			PRINTFORML 「是勇气的证明哦！ 如果有需要挑战的人或事，今天会是个不错的日子！」
		CASEELSE
			PRINTFORMW 「啊！ 是『泪』的卡牌！」
			IF TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORMW 「是悲伤的证明！ %CALLNAME:MASTER%是遇到了不開心的事情吗，我可以安慰安慰你的哦？」
			ELSE
				PRINTFORMW 「是悲伤的证明！ 嗯……遇到什么不開心的事了吗？」
			ENDIF
		ENDSELECT
	CASE 10
		;Yamanote Line Game
		PRINTFORMDL %CALLNAME:MASTER%准备和克劳恩皮斯一起玩游戏
		PRINTW
		PRINTFORML 「博奕类游戏！ 『殺傷力のある武器』！」
		SELECTCASE RAND:12
		CASE 1
			;Ragnarok
			PRINTFORMW 「"Ragnarok"！」
		CASE 2
			;Scramasax
			PRINTFORMW 「"Scramasax"！」
		CASE 3
			;Gradius
			PRINTFORMW 「"Gradius"！」
		CASE 4
			;Death Bringer
			PRINTFORMW 「"Death Bringer"！」
		CASE 5
			;Katzbalger
			PRINTFORMW 「"Katzbalger"！」
		CASE 6
			;Zweihander
			PRINTFORMW 「"Zweihander"！」
		CASE 7
			;Chainsaw
			PRINTFORMW 「"Chainsaw"！」
		CASE 8
			;Nail Hammer
			PRINTFORMW 「"Nail Hammer"！」
		CASE 9
			;Battle Axe
			PRINTFORMW 「"Battle Axe"！」
		CASE 10
			;Excalibolg
			PRINTFORMW 「"Excalibolg"！」
		CASE 11
			;GET *Knife*
			PRINTFORMW 「"★GET *Knife★"！」
		CASEELSE
			;Morning Star
			PRINTFORMW 「"Morning Star"！」
		ENDSELECT
	CASE 11
		PRINTFORMDL %CALLNAME:MASTER%和克劳恩皮斯正在做游戏
		PRINTW
		PRINTFORML 「%CALLNAME:MASTER%、之前听说了一种新游戏玩法！」
		PRINTFORM 「名为
		;"おに" means "tag"
		SELECTCASE RAND:15
		CASE 1
			PRINTFORM 『地獄おに』
		CASE 2
			PRINTFORM 『狂気おに』
		CASE 3
			PRINTFORM 『小刀おに』
		CASE 4
			PRINTFORM 『弾幕おに』
		CASE 5
			PRINTFORM 『骨占い』
		CASE 6
			PRINTFORM 『はりせんぼん』
		CASE 7
			PRINTFORM 『ダンス・ダンス・ダンス』
		CASE 8
			PRINTFORM 『デッド・イン・ミッドナイト』
		CASE 9
			PRINTFORM 『サーチ・アンド・デストロイ』
		CASE 10
			PRINTFORM 『プラント VS フェアリー』
		CASE 11
			PRINTFORM 『サークル・オブ・アナイアレーション』
		CASE 12
			PRINTFORM 『舞ンドツイ斯塔』
		CASE 13
			PRINTFORM 『メイズ・イン・アビス』
		CASE 14
			PRINTFORM 『ドゥームズ・ダイ』
		CASEELSE
			PRINTFORM 『スケルトン・チェイス』
		ENDSELECT
		PRINTFORMW ！」
	CASEELSE
		;ものまねシリーズ
		;地の文無
		VARSET LOCAL
		LOCAL:1 = ABL:[[克勞恩皮絲]]:親密 >= 6 && M_KOJO_K111_MASTER_IMPRESSION() != "平凡"
		LOCAL:2 = 1
		LOCAL:3 = 1
		LOCAL:4 = ABL:[[桑尼]]:親密 >= 6
		LOCAL:5 = ABL:[[露娜]]:親密 >= 6
		LOCAL:6 = ABL:[[斯塔]]:親密 >= 6
		LOCAL:7 = ABL:[[琪露諾]]:親密 >= 6
		LOCAL:8 = ABL:[[拉瓦爾]]:親密 >= 6
		;シャッフルして最初にヒットしたやつ
		CALL FISHER_YATES_SHAFFLE(10)
		FOR LOCAL, 1, 10
			SIF !SHAFFLE_ARRAY:LOCAL
				CONTINUE
			IF LOCAL:(SHAFFLE_ARRAY:LOCAL)
				SELECTCASE SHAFFLE_ARRAY:LOCAL
				CASE 1
					;你
					SELECTCASE M_KOJO_K111_MASTER_IMPRESSION()
					CASE "ロリコン"
						PRINTFORMW 「妖精小妹妹真可爱～、啾啾！」
					CASE "清掃中毒者"
						PRINTFORMW 「『清潔度：中』！ 该扫地了！ 」
					CASE "料理人"
						PRINTFORMW 「气力又少了好多，该做饭了，做饭做饭～」
					CASE "弾幕強者"
						PRINTFORMW 「这种程度的诱导弹只要这样子…轻松躲过～♪」
					CASE "昆虫王"
						PRINTFORMW 「超大的独角仙诶～！快让我量量尺寸？ 呜哇ぁ、真是好东西～！」
					CASE "モテ男"
						PRINTFORMW 「不是啦～最近女朋友很寂寞、我没法陪你疯玩啦～真麻烦～」
					CASE "インテリ"
						PRINTFORMW 「呼姆、最近的GDP从IOC角度AOE的FCG来看果然……」
					CASE "饒舌"
						PRINTFORML 「上次去人里吃的那家乌冬面实在太好吃了～」
						PRINTFORML 「不仅味道好、价格也公道～、上菜也快～、店里的气氛更是没得说……」
					CASE "金持ち"
						PRINTFORMW 「传说中的宝剑～、虽然价格有点贵、但是偶尔也该逼自己一下了～！」
					CASEELSE
						;念の為
						PRINTFORMW 「『清潔度：中』！ 该扫地了！ 」
					ENDSELECT
					PRINTFORMW 「呀哈哈哈哈ー♪ 像%CALLNAME:MASTER%的样子吗～！」
				CASE 2
					;赫喀提亞
					SIF ABL:[[赫喀提亞]]:親密 >= 10
						CALL M_KOJO_COLOR_K111_HECA
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「%CALLNAME:MASTER%小弟弟？ 不乖乖听大人说话、是想被月球撞击按摩一番吗？」
					CASE 2
						PRINTFORMW 「真是的、居然对女士做出这种行为，很失礼的知道不？♪」
					CASEELSE
						PRINTFORMW 「%CALLNAME:MASTER%小弟弟，只会嘴硬还想着哪天变厉害吗」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「怎样？像不像主人的样子？」
				CASE 3
					;純狐
					SIF ABL:[[純狐]]:親密 >= 10
						CALL M_KOJO_COLOR_K111_JUNKO
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「%CALLNAME:MASTER%是好孩子哦～好乖好乖」
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%…不要靠近我……」
						PRINTFORMW 「再靠近的话……我会忍不住杀掉你……」
					CASEELSE
						PRINTFORML 「%CALLNAME:MASTER%哟、好好看着吧」
						PRINTFORMW 「那在生死边缘的人的美妙姿态」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「像友人大人吗～！ 很有趣吧？」
				CASE 4
					;桑尼
					SIF ABL:[[桑尼]]:親密 >= 10
						TRYCALL M_KOJO_COLOR_K[[桑尼]]
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「斯塔你这家伙ー！一起去恶作剧啊！」
					CASE 2
						;三月精の「ピース」部分はMASTERにして演じる
						PRINTFORMW 「%CALLNAME:MASTER%！ 想要实现这次恶作剧，你的力量是必须的！」
					CASEELSE
						PRINTFORML 「我是灿烂的阳光，桑尼！」
						PRINTFORMW 「接招吧っ！ 最终闪光！」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「呀哈哈哈哈ー♪ 和桑尼一模一样吧～！」
				CASE 5
					;露娜
					SIF ABL:[[露娜]]:親密 >= 10
						TRYCALL M_KOJO_COLOR_K[[露娜]]
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「桑尼！ 别睡懒觉了ー！ 快给我起来！」
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%、有私藏我的书ー！」
						PRINTFORMW 「真是的，地狱里是没书看吗？」
					CASEELSE
						PRINTFORML 「我是静谧的月光，露娜！」
						PRINTFORMW 「代表月亮消灭你！」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「呀哈哈哈哈ー♪ 和露娜一模一样吧～！」
				CASE 6
					;斯塔
					SIF ABL:[[斯塔]]:親密 >= 10
						TRYCALL M_KOJO_COLOR_K[[斯塔]]
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「真是的，露娜怎么一直再胡闹啊」
					CASE 2
						PRINTFORMW 「这里就交给%CALLNAME:MASTER%处理吧，我在旁边等你好消息哦～」
					CASEELSE
						PRINTFORML 「我是洒落地面的星光，斯塔！」
						PRINTFORMW 「努努努～…闪亮登场啦！」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「呀哈哈哈哈ー♪ 和斯塔一模一样吧～！」
				CASE 7
					;琪露諾
					SIF ABL:[[琪露諾]]:親密 >= 10
						TRYCALL M_KOJO_COLOR_K[[琪露諾]]
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「虽说我是最强的、但承认你是第二最强也不是不行哦！」
					CASE 2
						;琪露諾と拉瓦爾は分かりにくいので「ピース」のまま
						PRINTFORMW 「皮斯的火焰与我的冰冻，咱俩联合就是无敌的存在吧！？」
					CASEELSE
						PRINTFORMW 「呜ぇ～好热～…身体融化了～……」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「呀哈哈哈哈ー♪ 和琪露诺一模一样吧～！」
				CASE 8
					;拉瓦爾
					SIF ABL:[[拉瓦爾]]:親密 >= 10
						TRYCALL M_KOJO_COLOR_K[[拉瓦爾]]
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「呀ーッ！ 蜘蛛啊啊啊啊啊ー！！」
					CASE 2
						PRINTFORMW 「今天是个好天气！ 就决定成为新世界的卡密吧！」
					CASEELSE
						PRINTFORMW 「皮斯～冷死了快点一起进被窝吧！」
					ENDSELECT
					CALL M_KOJO_COLOR_K111
					PRINTFORMW 「呀哈哈哈哈ー♪ 和拉尔瓦一模一样吧～！」
				ENDSELECT
				BREAK
			ENDIF
		NEXT
	ENDSELECT
ELSE
	SELECTCASE RAND:(9 + 汎用身体接觸数)
	CASE 1
		PRINTFORMDL %CALLNAME:MASTER%用直接敲了敲克劳恩皮斯
		PRINTW
		PRINTFORML 「干嘛！」
		PRINTFORMW 「我也敲敲你！感觉很爽吗！」
	CASE 2
		PRINTFORMDL %CALLNAME:MASTER%触碰了克劳恩皮斯的翅膀
		PRINTW
		PRINTFORML 「好奇嘛？」
		PRINTFORMW 「摸起来小心点」
	CASE 3
		PRINTFORMDL %CALLNAME:MASTER%盯着克劳恩皮斯
		PRINTW
		PRINTFORMW 「为什么要这样一直看着我ー？」
	CASE 4
		PRINTFORMDL %CALLNAME:MASTER%摸着克劳恩皮斯的身体
		PRINTW
		PRINTFORML 「不可以让不认识的人摸自己的身体，主人是这么对我说的」
		PRINTFORMW 「%CALLNAME:MASTER%应该算认识的人，摸了就摸了吧！」
	CASE 5
		PRINTFORMDL 克劳恩皮斯摸着%CALLNAME:MASTER%的身体
		PRINTW
		IF TALENT:MASTER:性別 == 1
			PRINTFORMW 「嗯ー、%CALLNAME:MASTER%摸起来手感不错哦ー♪」
		ELSE
			PRINTFORML 「嗯ー、很结实的身体啊」
			PRINTFORMW 「不过只是光有肌肉，没什么用的ー」
		ENDIF
	CASE 6
		PRINTFORMDL 克劳恩皮斯手里拿着火把
		PRINTW
		PRINTFORML 「想试试发狂的感觉吗？」
		PRINTFORMW 「看招看招」
	CASE 7
		PRINTFORMDL %CALLNAME:MASTER%摸着克劳恩皮斯的身体
		PRINTW
		PRINTFORML 「注意点！ 别摸奇怪的地方ー！」
		PRINTFORMW 「变态行为是绝对不允许的哦ー！」
	CASE 8
		PRINTFORMDL %CALLNAME:MASTER%拉住克劳恩皮斯的手腕
		PRINTW
		PRINTFORMW 「你要抓我到什么时候啊ー？」
	CASE 9
		PRINTFORMDL 克劳恩皮斯两手搓着%CALLNAME:MASTER%的脑袋
		PRINTW
		PRINTFORMW 「搓搓！ 搓搓！」
		PRINTFORMW 「有没有感觉脑袋都变软了？」
	CASEELSE
		ARGS = 汎用
		RESTART
	ENDSELECT
ENDIF

;==================================================
;303,道歉
;==================================================
@M_KOJO_MESSAGE_COM_K111_303
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文改変型
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF TFLAG:SELECTCOM的分岐 == -2 || TFLAG:SELECTCOM的分岐 == 2
		PRINTFORMDL %CALLNAME:MASTER%为了得到%CALLNAME:TARGET%的原谅，送上了点心盒
	ELSE
		PRINTFORMDL %CALLNAME:MASTER%拼命向%CALLNAME:TARGET%道歉
	ENDIF
	PRINTW
	IF TFLAG:SELECTCOM的分岐 == 1
		PRINTFORMW 「呼呼♪ 这次就原谅你了♪」
		PRINTFORMW 「其实也没有那么生气啦！」
	ELSEIF TFLAG:SELECTCOM的分岐 == 2
		PRINTFORML 「额！？ 诶、哼～、该不该原谅%CALLNAME:MASTER%呢～♪」
		PRINTFORMW 「算了，本来也没太生%CALLNAME:MASTER%的气～、这次就对你网開一面吧～♪」
		PRINTFORMDW %CALLNAME:TARGET%消去了反発刻印LV1
	ELSEIF TFLAG:SELECTCOM的分岐 == 0
		PRINTFORMW 「哼ー、看在你认真道歉的份上……、注意不要有下次」
	ELSEIF TFLAG:SELECTCOM的分岐 == -2
		PRINTFORMW 「哇ー！ 这看起来会很美味诶！」
		PRINTFORMW 「…你以为我会这么说吗！ 靠这种东西就想来敷衍我吗！」
		PRINTFORMW 「嗯？把点心还给你？你认为这种事情有可能发生吗」
		;地の文のままだと分岐==-2の時點心盒受け取ってくれない,COMFでも點心盒はなくならないが
		;克勞恩皮絲はお菓子が欲しいのでもらうだけ貰って許してはくれないわがままさんなのだ
		ITEM:點心盒 --
	ELSE
		PRINTFORML 「这种程度的歉意就想让我原谅吗！」
		PRINTFORMW 「在叫喚地獄那般滚烫的锅里反省一兆年再来向我道歉！」
	ENDIF
ENDIF
RETURN 1
;;==================================================
;;304,幫忙干活
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_304
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_304_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_304_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;	CALL M_KOJO_COLOR_K111
;ENDIF
;RETURN 1
;==================================================
;305,索求膝枕
;==================================================
@M_KOJO_MESSAGE_COM_K111_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;心情不快
	IF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMW 「……有你自说自话的？」
	ELSE
		SELECTCASE RAND:9
		CASE 1
			PRINTFORMW 「可以哦！」
		CASE 2
			PRINTFORMW 「躺在幼女的大腿上感觉如何？」
		CASE 3
			PRINTFORML 「软软的吧……」
			PRINTFORMW 「这样做会開心吗？」
		CASE 4
			PRINTFORMW 「一会儿%CALLNAME:MASTER%也让我试一下哦！」
		CASE 5
			PRINTFORMW 「呜～…腿都要麻了啦～」
		CASE 6
			PRINTFORMW 「我的大腿会不会没多少肉，不太舒服啊？ 」
		CASE 7
			PRINTFORMW 「拍拍っ拍拍っ」
		CASE 8
			PRINTFORML 「刚好让我捏捏脸！」
			PRINTFORMW 「捏捏～捏捏～」
		CASEELSE
			PRINTFORMW 「让我也试一下嘛ー」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;==================================================
@M_KOJO_MESSAGE_COM_K111_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	;心情不快
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMW 「姆ー……！」
	ELSEIF TALENT:111:妊娠
		IF CFLAG:111:無自覚妊娠
			PRINTFORML 「…………」
			PRINTFORMDW 克劳恩皮斯神情有些不安
		ELSE
			IF !RAND:2
				PRINTFORMW 「诶嘿❤ 要摸的话请温柔些哦❤」
			ELSE
				PRINTFORMW 「诶嘿❤ 里面就是%CALLNAME:MASTER%和我的宝宝哦♪」
			ENDIF
		ENDIF
	ELSEIF !RAND:2
		PRINTFORMW 「我没有肚子疼哦？」
	ELSE
		PRINTFORMW 「干嘛？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;==================================================
@M_KOJO_MESSAGE_COM_K111_307
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文改変型
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
		PRINTFORML %CALLNAME:MASTER%把手伸向了克劳恩皮斯的脸頬…
		PRINTFORML 時停中的克劳恩皮斯毫无抵抗地被捏起了脸蛋…
	ELSEIF CFLAG:111:睡眠
		PRINTFORML %CALLNAME:MASTER%用手指捏了捏正在睡觉的克劳恩皮斯的脸颊…
		PRINTFORMW
		PRINTFORMW 「嗯ー……主人……原谅我啦……呜ー」
	ELSEIF TALENT:111:心情 == -1 || CFLAG:111:ブチギレ || MARK:111:反発刻印 >= 3
		PRINTFORMDW 克劳恩皮斯将%CALLNAME:PLAYER%伸来的手毫不客气地打開了
		PRINTFORML
		PRINTFORMW 「住手啊っ！」
	ELSE
		RESETCOLOR
		PRINTFORM %CALLNAME:MASTER%向%CALLNAME:TARGET%的脸颊伸出手
		;なんで琪露諾専用の地の文があるんだ……？
		PRINTDATA
			DATAFORM 捏了捏…
			DATAFORM 揪了揪…
			DATAFORM 搓了搓…
			DATAFORM 揉了揉…
			DATAFORM 戳了戳…
		ENDDATA
		PRINTL
		PRINTW
		CALL M_KOJO_COLOR_K111
		SELECTCASE RAND:6
		CASE 1
			PRINTFORMW 「好ー痛ー啊ー！！」
		CASE 2
			PRINTFORMW 「干嘛ー！うゎーか！」
		CASE 3
			PRINTFORMW 「喵喵ー！呜」
		CASE 4
			PRINTFORMW 「不要捏～！」
		CASE 5
			PRINTFORMW 「别乱来啦～！」
		CASEELSE
			PRINTFORMW 「随你喜欢ー？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;==================================================
@M_KOJO_MESSAGE_COM_K111_308
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文改変型
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF CFLAG:111:睡眠
		PRINTFORML %CALLNAME:MASTER%用手指戳了正在睡觉的克劳恩皮斯的脸颊
		PRINTW
		PRINTFORMW 「嗯…………唔……」
		PRINTFORMDW 克劳恩皮斯每次被戳都会可爱地撅起嘴巴
	ELSE
		PRINTFORMDL %CALLNAME:MASTER%戳了戳陪睡中克劳恩皮斯的脸颊
		PRINTW
		IF !RAND:2
			PRINTFORMW 「嗷呜っ！」
			PRINTFORMDW ……手指被唇瓣咬住了
		ELSE
			PRINTFORMW 「干嘛ー……？」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;309,摸頭
;==================================================
@M_KOJO_MESSAGE_COM_K111_309
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文改変型
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
		PRINTFORMDL %CALLNAME:MASTER%向克劳恩皮斯伸出手……
		PRINTFORMDW 在停止的时间中，克劳恩皮斯毫无反应地被摸起脑袋
	ELSEIF CFLAG:111:睡眠
		PRINTFORMDL %CALLNAME:MASTER%温柔地抚摸着克劳恩皮斯的头
		PRINTW
		PRINTFORMW 「唔……」
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMDL %CALLNAME:MASTER%安抚的摸着不太安定的克劳恩皮斯的头
		PRINTW
		PRINTFORMW 「姆姆……」
		PRINTFORMDW 克劳恩皮斯虽说还有些不耐烦，但心情似乎稍微好了点
	;＞擁抱
	ELSEIF PREVCOM == 311 && TALENT:111:恋慕
		RESETCOLOR
		CLEARLINE 2
		PRINTDL 乖哦乖哦
		DRAWLINE
		PRINTFORMDL %CALLNAME:MASTER%将克劳恩皮斯抱在怀中，温柔地抚摸着她的头发
		PRINTW
		CALL M_KOJO_COLOR_K111
		PRINTFORMW 「呜……好喜欢%CALLNAME:MASTER%\/\/\/」
	;＞膝枕
	ELSEIF PREVCOM == 336 && TALENT:111:恋慕
		RESETCOLOR
		CLEARLINE 2
		PRINTDL 乖哦乖哦
		DRAWLINE
		PRINTFORMDL %CALLNAME:MASTER%温柔地抚摸着安静躺在膝上的克劳恩皮斯的头发
		PRINTW
		CALL M_KOJO_COLOR_K111
		PRINTFORMW 「呼……\/\/\/」
	ELSE
		PRINTFORMDL %CALLNAME:MASTER%爱抚着陪睡中克劳恩皮斯的头
		PRINTW
		SELECTCASE RAND:7
		CASE 1
			PRINTFORMW 「欸嘿嘿\/\/\/」
		CASE 2
			PRINTFORMW 「干嘛？」
		CASE 3
			PRINTFORMW 「呜姆呜姆」
		CASE 4
			PRINTFORMW 「嗯ー♪」
		CASE 5
			PRINTFORMW 「我也想摸%CALLNAME:MASTER%啦～！」
		CASE 6
			PRINTFORMW 「喵呜\/\/\/」
		CASEELSE
			PRINTFORMW 「喜欢被这样摸ー♪」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;310,摸屁股
;==================================================
@M_KOJO_MESSAGE_COM_K111_310
IF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K111_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;一部地の文と齟齬が生じるんですが、地の文長すぎたんで妥協,すまぬ……
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止 || CFLAG:111:睡眠
	;被逆推中
	ELSEIF CFLAG:111:诶嘿嘿 == 2
		PRINTFORMW 「啊嗯…❤」
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		;ここだけ地の文カット
		PRINTFORMDL %CALLNAME:MASTER%将手伸向克劳恩皮斯、还未触及就被拍開了
		PRINTW
		PRINTFORMW 「住手！ 你这变态！！」
	ELSEIF TALENT:111:恋慕
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「呀っ❤」
			PRINTFORMW 「都摸到里面去了啊！」
		CASE 2
			PRINTFORML 「啊嗯っ❤」
			PRINTFORMW 「不要隔着衣服掰開屁股啊～！」
		CASEELSE
			PRINTFORML 「嗯嗯…❤」
			PRINTFORMW 「色鬼！ 手是长在人家屁股上了嘛！」
		ENDSELECT
	ELSEIF TALENT:111:思慕
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「呜ーっ！ 色死了！！」
		CASE 2
			PRINTFORMW 「呀っ！ 变态啊！」
		CASEELSE
			PRINTFORMW 「等……别动！ 手指都伸进哪里去了啊！」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「诶っ！ 没想到你是这种人！？ 恶心！」
		CASE 2
			PRINTFORMW 「呀っ！ 痴汉啊！！」
		CASEELSE
			PRINTFORMW 「哇ッ！ 好恶心，别靠近我…！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,擁抱
;==================================================
@M_KOJO_MESSAGE_COM_K111_311
IF FLAG:時間停止
	CALL TRAIN_MESSAGE
ELSEIF CFLAG:111:诶嘿嘿 == 2
	CALL TRAIN_MESSAGE
ELSEIF CFLAG:111:睡眠
	CALL TRAIN_MESSAGE
ELSEIF CFLAG:111:陪睡中
	CALL TRAIN_MESSAGE
ELSE
	DRAWLINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K111_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	;被逆推中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:111:诶嘿嘿 == 2
		SELECTCASE TCVAR:111:Counter行動
		;前から抱きつく
		CASE 32
			PRINTFORMW 「嗯……好喜欢对我温柔的%CALLNAME:MASTER%……好温暖……再多抱我会儿吧……」
		;ディープ接吻
		CASE 60
			PRINTFORMW 「嗯啾、啾噜……❤ 啊嗯、%CALLNAME:MASTER%好甜～❤」
		;ぱふぱふ
		CASE 73
			PRINTFORMW 「嗯っ❤ 那么喜欢胸部吗？ 诶嘿っ♪ 尽情享用吧❤」
		;乳合わせ
		CASE 74
			PRINTFORMW 「啊嗯っ❤ 这份压力怎么样っ❤ 更舒服了吗❤」
		;乳を吸わせる
		CASE 77
			PRINTFORMW 「哇啊っ❤ %CALLNAME:MASTER%像小宝宝一样♪ 啊っ❤ 多喝一点哦❤ 尽情吸吧❤」
		;Ｖ挿入,Ａ挿入
		CASE 85, 87,
			PRINTFORMW 「啊っ❤ 抱紧我❤ 用力❤ %CALLNAME:MASTER%❤ 再用力点❤」
		;だいしゅき大堂ド
		CASE 86
			PRINTFORMW 「哈啊っ❤ 哈啊っ❤ 要去了っ❤ %ONEDARI_MASTER_TINKO()%牛奶～要biubiu的射进来了～っっ❤」
		;Ｖ腰振り,Ａ腰振り
		CASE 88, 89
			PRINTFORMW 「哈嗯っ❤ %CALLNAME:MASTER%っ❤ 就这样❤ 合为一体吧❤」
		;それ以外
		CASEELSE
			PRINTFORMW 「嗯っ❤ %CALLNAME:MASTER%的拥抱好温柔❤ 爱死了❤」
		ENDSELECT
	ELSEIF CFLAG:111:睡眠
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「主人～……」
		CASE 2
			PRINTFORMW 「嘶……友人大人…………」
		CASEELSE
			PRINTFORMW 「嘶……嗯…………妈妈……」
		ENDSELECT
	ELSEIF CFLAG:111:陪睡中
		PRINTFORMW 「抱ー…………❤」
		PRINTFORMW 「%CALLNAME:MASTER%、睡着了也不许松開哦……」
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		;地の文カット
		PRINTFORMDL %CALLNAME:MASTER%想抱住克劳恩皮斯却被甩開了
		PRINTW
		IF TALENT:111:恋慕
			PRINTFORMW 「没那种心情啦！……现在不行……」
		ELSE
			PRINTFORMW 「不要っ！」
		ENDIF
	ELSEIF TALENT:111:恋人
		;地の文カット
		SELECTCASE RAND:7
		CASE 1
			PRINTFORMDL 克劳恩皮斯目光刚与%CALLNAME:MASTER%交汇、就迫不及待地抱上来
			PRINTW
			PRINTFORMW 「快抱抱我～♪」
		CASE 2
			PRINTFORMDL 克劳恩皮斯慢慢靠在%CALLNAME:MASTER%身前，将脸埋在%CALLNAME:MASTER%胸前
			PRINTW
			PRINTFORMW 「嗯～……好温暖♪」
		CASE 3
			PRINTFORMDL %CALLNAME:MASTER%展開双臂，克劳恩皮斯就微笑着扑进怀里
			PRINTW
			PRINTFORMW 「恩哼哼～❤ %CALLNAME:MASTER%让我感觉好安心～♪」
		CASE 4
			PRINTFORMDL 克劳恩皮斯向着%CALLNAME:MASTER%伸出双手、%CALLNAME:MASTER%心领神会将她抱住
			PRINTW
			PRINTFORMW 「喵嘿嘿ぇ～❤ %CALLNAME:MASTER%真听话～♪」
		CASE 5
			PRINTFORMDL %CALLNAME:MASTER%从后面抱住了克劳恩皮斯
			PRINTW
			PRINTFORMW 「呼呼ッ❤ 这就是所谓肌肤之亲吧」
		CASE 6
			PRINTFORMDL %CALLNAME:MASTER%抱住了想要闪開的克劳恩皮斯
			PRINTW
			PRINTFORMW 「呀っ❤ 被抓住啦♪」
		CASEELSE
			PRINTFORMDL %CALLNAME:MASTER%抱住了克劳恩皮斯
			PRINTW
			PRINTFORMW 「诶嘿❤ 可以抱的更紧些哦❤」
		ENDSELECT
	ELSEIF TALENT:111:思慕 || TALENT:111:恋慕
		;地の文カット
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMDL 克劳恩皮斯目光刚与%CALLNAME:MASTER%交汇、就迫不及待地抱上来
			PRINTW
			PRINTFORMW 「快抱抱我～！」
		CASE 2
			PRINTFORMDL 克劳恩皮斯慢慢靠在%CALLNAME:MASTER%身前，将脸埋在%CALLNAME:MASTER%胸前
			PRINTW
			PRINTFORMW 「嗯～……好温暖♪」
		CASE 3
			PRINTFORMDL %CALLNAME:MASTER%展開双臂，克劳恩皮斯就微笑着扑进怀里
			PRINTW
			PRINTFORMW 「让人安心的感觉～♪」
		CASE 4
			PRINTFORMDL 克劳恩皮斯向着%CALLNAME:MASTER%伸出双手、%CALLNAME:MASTER%心领神会将她抱住
			PRINTW
			PRINTFORMW 「欸嘿嘿～♪ 很默契哦♪」
		CASEELSE
			PRINTFORMDL %CALLNAME:MASTER%抱住了克劳恩皮斯
			PRINTW
			PRINTFORMW 「诶嘿❤ 可以抱的更紧些哦❤」
		ENDSELECT
	ELSE
		;地の文カット
		PRINTFORMDL %CALLNAME:MASTER%抱住了克劳恩皮斯
		PRINTW
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「哇っ！ 突然抱上来是想干嘛啊！」
		CASE 2
			PRINTFORMW 「%CALLNAME:MASTER%……才发现身体居然比我大那么多吗」
		CASE 3
			PRINTFORMW 「嗯姆ー！ 干嘛呢ー？」
		CASE 4
			PRINTFORMW 「呀！吓我一跳！」
		CASEELSE
			PRINTFORMW 「呜ー……别乱来～！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;312,接吻
;==================================================
@M_KOJO_SUCCESS_COM_K111_312
;ちなみにFIRSTTIMEを使用なら必ず「FIRSTTIME("初吻", 1)」の形にして引数をつけること
SIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
	TFLAG:192 = -2

@M_KOJO_MESSAGE_COM_K111_312
IF CFLAG:111:诶嘿嘿 == 2 || FLAG:時間停止
	CALL TRAIN_MESSAGE
ELSE
	DRAWLINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K111_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_312_1
#DIM 接吻分岐
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文改変型
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	ELSEIF CFLAG:111:诶嘿嘿 == 2 && FIRSTTIME("初吻")
		;地の文表示
		PRINTFORMW 「呜っ！！」
		PRINTFORMW 「明明想着由我来献上初吻的，没想到居然被先夺走了❤」
		IF FLAG:约会的对象 == 111
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%DATENAME_SPOT()%在%CALLNAME:MASTER%的不断请求中被夺走了初吻
		ELSE
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:111:現在位置)%，被欲望冲昏头脑，最终在%CALLNAME:MASTER%的不断请求中被夺走了初吻
		ENDIF
	ELSEIF CFLAG:111:诶嘿嘿 == 2
		;地の文表示
		SELECTCASE TCVAR:111:Counter行動
		;前から抱きつく
		CASE 32
			PRINTFORML 「啾ー…嗯ー……❤」
			PRINTFORMW 「%CALLNAME:MASTER%的热吻……太棒了❤」
		;手淫
		CASE 50
			PRINTFORML 「哼哼❤ 欧金金看起来很寂寞嘛ー♪」
			PRINTFORMW 「很快就来满足你哦♪ 啾啾❤」
			SIF NOWEX:MASTER:11
				PRINTFORMW 「嗯っ❤ 射吧射吧❤」
		;ディープ接吻
		CASE 60
			PRINTFORMW 「啊嗯っ、%CALLNAME:MASTER%……❤ 继续、啾、不要停……❤」
		;Ｖ挿入,Ａ挿入,Ｖ腰振り,Ａ腰振り
		CASE 85, 87, 88, 89
			IF NOWEX:MASTER:11
				PRINTFORML 「哈啊っ、哈啊っ❤ 嗯啾ーっ❤」
				PRINTFORMW 「嗯っ❤ 就这样子、啾ー一边接吻一边内射❤ 让我怀孕吧❤」
			ELSE
				PRINTFORMW 「哈啊っ、哈啊っ❤ 嗯啾っ❤ 嗯っ、嗯っ❤ prprっ❤」
			ENDIF
		;だいしゅき大堂ド
		CASE 86
			PRINTFORMW 「哈啊っ❤ 哈啊っ❤ 嗯啾っ❤ 射出来❤ 就这样biubiu的射出来吧❤ %ONEDARI_MASTER_TINKO()%牛奶牛奶快出来っ%UNICODE(0x2764) * 2%」
		;それ以外
		CASEELSE
			PRINTFORMW 「嗯っ❤ 啾ーっ❤ 舔舔、阿姆、pr……❤」
		ENDSELECT
	ELSEIF CFLAG:111:睡眠
		PRINTFORMDL %CALLNAME:MASTER%亲吻了睡着的克劳恩皮斯
		PRINTW
		PRINTFORMW 「嗯姆……咕ぅ……」
	ELSEIF CFLAG:111:陪睡中
		PRINTFORMDL %CALLNAME:MASTER%深深吻了陪睡中的克劳恩皮斯
		PRINTW
		IF FIRSTTIME("初吻")
			PRINTFORMW 「哈哇哇哇……\/\/\/」
			PRINTFORMW 「我的……\/\/\/ 初吻……❤」
			IF TALENT:111:恋人 && CFLAG:111:初期位置 == CFLAG:MASTER:初期位置
				CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、被%CALLNAME:MASTER%在陪睡时，夺走了初吻
			ELSEIF CFLAG:111:初期位置 == CFLAG:MASTER:初期位置
				CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、同居的时候被%CALLNAME:MASTER%在陪睡时，夺走了初吻
			ELSEIF CFLAG:111:現在位置 == CFLAG:111:初期位置
				CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、自己家中被%CALLNAME:MASTER%在陪睡时，夺走了初吻
			ELSEIF FLAG:约会的对象 == 111
				;現在约会中に添い寝はできないけど念の為
				CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、在%DATENAME_SPOT()%被%CALLNAME:MASTER%在陪睡时，夺走了初吻
			ELSE
				CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、在%NAME_FROM_PLACE(CFLAG:111:現在位置)%被%CALLNAME:MASTER%在陪睡时，夺走了初吻
			ENDIF
		ELSE
			PRINTFORML 「呼ぁ……晚安的kiss…？」
			PRINTFORMW 「……嗯啾っ❤」
		ENDIF
	;拒絶
	ELSEIF TFLAG:SELECTCOM的分岐 == 99 || TFLAG:192 == -2
		PRINTFORMDL %CALLNAME:PLAYER%刚要接吻%CALLNAME:TARGET%就厌恶的拉開了距离…
		PRINTW
		IF TALENT:[[克勞恩皮絲]]:恋慕
			PRINTFORMW 「唔ー……现在不行！」
		ELSE
			PRINTFORMW 「不要っ！」
		ENDIF
	;口上によるCOM成否判定のおかげで強制中止をかけることができました,多謝
	;▼必要なくなったので凍結
;	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]]) && FIRSTTIME("初吻")
;		;本当はしてほしくないけど、地の文は変えられても経験は誤魔化せないからなぁ
;		;もしかしたら减少経験で打ち消せるかもしれないがやめておこう
;		PRINTFORML %CALLNAME:MASTER%は%CALLNAME:TARGET%の口を、自分の口で堵住…
;		PRINTW
;		IF TALENT:111:恋慕
;			PRINTFORMW 「ふぇぇっ！？ にゃ、いきなりそんな、%CALLNAME:MASTER%じゅるい……」
;		ELSE
;			PRINTFORMW 「んんっっ！？ そんな、こんなときに……うぅ……」
;		ENDIF
;	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
;		PRINTFORML %CALLNAME:MASTER%は%CALLNAME:TARGET%の口を、自分の口で堵住…
;		PRINTW
;		IF TALENT:111:恋慕
;			PRINTFORMW 「姆っ……、呜ー！」
;		ELSE
;			PRINTFORMW 「嗯姆…………」
;		ENDIF
;		PRINTFORMW %CALLNAME:TARGET%は鋭い視線で睨んでいる……
	;初吻
	ELSEIF FIRSTTIME("初吻")
		PRINTFORMDL %CALLNAME:PLAYER%用自己的嘴堵住了克劳恩皮斯的嘴…
		PRINTW
		LOCALS =
		IF TALENT:111:恋慕
			PRINTFORMW 「啊っ……\/\/\/」
			PRINTFORMW 「我的……初吻……\/\/\/」
			PRINTFORMW 「好高兴……\/\/\/」
			IF TALENT:111:恋人
				LOCALS = 愛する
			ELSE
				LOCALS = 恋い焦がれる
			ENDIF
		ELSE
			PRINTFORMW 「嗯ぁっ……！！」
			PRINTFORMW 「KISS……\/\/\/」
			SIF TALENT:111:思慕
				LOCALS = 没关注过的
		ENDIF
		IF CFLAG:111:現在位置 == CFLAG:111:初期位置 && CFLAG:111:初期位置 != 99 && GET_TARGETNUM() == 1 && BASE:111:情緒 >= 1000
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、自分的房間で%LOCALS%%CALLNAME:MASTER%と二人きりになり、のぼせるような情緒の中で热情地初吻を奪われた
		ELSEIF CFLAG:111:現在位置 == CFLAG:111:初期位置 && CFLAG:111:初期位置 != 99 && GET_TARGETNUM() == 1
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、自分的房間で%LOCALS%%CALLNAME:MASTER%と二人きりになり、和やかな情緒の中でふいに初吻を奪われた
		ELSEIF CFLAG:111:現在位置 == CFLAG:111:初期位置 && CFLAG:111:初期位置 != 99
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、自分的房間で%LOCALS%%CALLNAME:MASTER%に初吻を奪われた
		ELSEIF FLAG:约会的对象 == 111 && GET_TARGETNUM() == 1 && BASE:111:情緒 >= 1000
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%で约会中、%DATENAME_PLACE()%で%LOCALS%%CALLNAME:MASTER%と二人きりになりのぼせるような情緒の中で热情地初吻を奪われた
		ELSEIF FLAG:约会的对象 == 111 && GET_TARGETNUM() == 1
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%で约会中、%DATENAME_PLACE()%で%LOCALS%%CALLNAME:MASTER%と二人きりになり、和やかな情緒の中でふいに初吻を奪われた
		ELSEIF FLAG:约会的对象 == 111
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%で约会中、%DATENAME_PLACE()%で%LOCALS%%CALLNAME:MASTER%に初吻を奪われた
		ELSEIF GET_TARGETNUM() == 1
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:111:現在位置)%で%LOCALS%%CALLNAME:MASTER%と二人きりになり、ふいに初吻を奪われた
		ELSE
			CSTR:111:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:111:現在位置)%で%LOCALS%%CALLNAME:MASTER%に初吻を奪われた
		ENDIF
	;＞擁抱
	ELSEIF PREVCOM == 311 && TALENT:111:恋慕
		RESETCOLOR
		CLEARLINE 2
		PRINTDL 拥抱接吻
		DRAWLINE
		PRINTFORMDL %CALLNAME:MASTER%与克劳恩皮斯相拥在一起，热烈的接吻着
		PRINTW
		CALL M_KOJO_COLOR_K111
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「嗯ぁ…❤ 嗯ー……❤ 咕噜…❤」
			PRINTFORMW 「……可以这样子舌吻，感觉好幸福❤」
		CASE 2
			PRINTFORML 「嗯啾…❤ 啊呜……❤」
			PRINTFORMW 「呼呼ッ、好热烈ー❤」
		CASEELSE
			PRINTFORML 「嗯ぁ…啾……咕噜、阿姆……❤」
			PRINTFORMW 「喜欢%CALLNAME:MASTER%…………❤」
		ENDSELECT
	;＞索求膝枕
	ELSEIF PREVCOM == 305 && TALENT:111:恋慕
		RESETCOLOR
		CLEARLINE 2
		PRINTDL 膝枕接吻
		DRAWLINE
		PRINTFORMDL %CALLNAME:MASTER%抬起头、拥抱着克劳恩皮斯吻住她的嘴唇
		PRINTW
		CALL M_KOJO_COLOR_K111
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「嗯っ…！ 啾～❤」
			PRINTFORMW 「嗯呼っ❤ 这样做的话，会忍不住想吃掉你的哦♪」
		CASE 2
			PRINTFORML 「呀ぁ……❤ 嗯っ❤」
			PRINTFORMW 「嗯唔ー、好甜的味道～♪」
		CASEELSE
			PRINTFORMW 「嗯ー…啾っ❤ 呀哈っ♪」
		ENDSELECT
	;＞膝枕
	ELSEIF PREVCOM == 336 && TALENT:111:恋慕
		RESETCOLOR
		CLEARLINE 2
		PRINTDL 膝枕接吻
		DRAWLINE
		PRINTFORMDL %CALLNAME:MASTER%凑近膝上的克劳恩皮斯，缓慢的吻上了少女的嘴唇
		PRINTW
		CALL M_KOJO_COLOR_K111
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「嗯ー…啾❤」
			PRINTFORMW 「欸嘿嘿～❤ 要抱着亲啦～♪」
		CASE 2
			PRINTFORML 「嗯哼っ…❤ 啾❤」
			PRINTFORMW 「呀哈哈っ♪ 好棒ー♪」
		CASEELSE
			PRINTFORML 「喵っ❤ 啾❤」
			PRINTFORMW 「诶嘿❤」
		ENDSELECT
	ELSE
		IF  TALENT:[[克勞恩皮絲]]:恋人
			CALL M_KOJO_K111_KISSSET("恋人")
		ELSEIF TALENT:[[克勞恩皮絲]]:恋慕
			CALL M_KOJO_K111_KISSSET("恋慕")
		ELSE
			CALL M_KOJO_K111_KISSSET("其他")
		ENDIF
		;▼一新したので凍結,ディープ接吻演出は撤廃
;		PRINTFORMDL %CALLNAME:MASTER%用嘴巴堵住了%CALLNAME:TARGET%的嘴
;		接吻分岐 = RAND:6
;		SIF (接吻分岐 == 3 || 接吻分岐 == 4) && EXP:111:接吻経験 >= 20
;			PRINTFORMDL %CALLNAME:TARGET%は%CALLNAME:MASTER%の口唇をこじ開けて舌を絡めてきた…
;		PRINTW
;		SELECTCASE 接吻分岐
;		CASE 0
;			$KISS_ZERO
;			PRINTFORMW 「啾ー❤」
;		CASE 1
;			$KISS_ONE
;			PRINTFORMW 「啾啾❤」
;		CASE 2
;			$KISS_TWO
;			PRINTFORMW 「ちゅっ❤ あむっ❤」
;		CASE 3
;			SIF EXP:111:接吻経験 < 20
;				GOTO KISS_ZERO
;			PRINTFORMW 「はむ…れろ……ん…んぁ❤」
;		CASE 4
;			SIF EXP:111:接吻経験 < 20
;				GOTO KISS_ONE
;			PRINTFORMW 「ちゅ…ちゅぅぅ……あぅ…れろ……ぁむ❤」
;		CASE 5
;			SIF !TALENT:111:恋慕
;				GOTO KISS_TWO
;			PRINTFORMW 「ちゅ❤」
;			PRINTFORML
;			PRINTFORMW 「ね、もっかい！」
;			PRINTFORML
;			PRINTFORMW 「啾❤」
;			SIF EXP:111:接吻経験 * 2 < RAND:100
;				RETURN 1
;			PRINTFORML
;			PRINTFORMW 「再来一次吧♪」
;			PRINTFORML
;			PRINTFORMW 「啾❤ 啾❤」
;			PRINTFORML
;			PRINTFORMW 「诶嘿❤」
;		ENDSELECT
	ENDIF
ENDIF
RETURN 1

@M_KOJO_K111_KISSSET(ARGS)
#DIM 恋慕接吻数
恋慕接吻数 = 7
IF ARGS == "恋人"
	SELECTCASE RAND:(3 + 恋慕接吻数)
	CASE 1
		PRINTFORMDL 克劳恩皮斯恶作剧似的舔弄%CALLNAME:MASTER%的脸颊、%CALLNAME:MASTER%用深深的吻来回击
		PRINTW
		PRINTFORMW 「嗯ー、咕噜ッ❤ 呀哈っ♪嗯っ…！」
		PRINTFORML 「嗯啾っ❤ 舔舔……啾ー…❤」
		PRINTFORMW 「呀哈哈っ♪ 好棒ー♪」
	CASE 2
		PRINTFORMDL 克劳恩皮斯抱着%CALLNAME:MASTER%的脑袋、强行送上幼女的柔嫩嘴唇…
		PRINTW
		PRINTFORML 「%CALLNAME:MASTER%～、啾啾～❤」
		PRINTFORMW 「阿姆…❤嗯…嗯啊❤」
		PRINTFORMW 「嗯嘿嘿嘿～、KISS最棒了ー❤」
	CASE 3
		PRINTFORMDL %CALLNAME:MASTER%朝着克劳恩皮斯望了眼、克劳恩皮斯回应似的过来与%CALLNAME:MASTER%接吻…
		PRINTW
		PRINTFORMW 「怎么了？ 想KISS了吗？ 嗯ー…❤ 啾❤」
		PRINTFORMW 「呼呼ッ❤ %CALLNAME:MASTER%っ好可爱～❤❤」
	CASEELSE
		ARGS = 恋慕
		RESTART
	ENDSELECT
ELSEIF ARGS == "恋慕"
	SELECTCASE RAND:恋慕接吻数
	CASE 1
		PRINTFORMDL %CALLNAME:MASTER%捧着克劳恩皮斯的脸颊与她接吻…
		PRINTW
		PRINTFORMW 「嗯ー…啾❤」
		PRINTFORMW 「欸嘿嘿…好温柔地KISS❤」
	CASE 2
		PRINTFORMDL 克劳恩皮斯逼近%CALLNAME:MASTER%的脸、强迫让两人接吻…
		PRINTW
		PRINTFORML 「嗯ー…❤」
		PRINTFORMW 「……KISS才不是草莓味的，我被别人骗了诶？」
	CASE 3
		PRINTFORMDL 克劳恩皮斯湿润的眼睛朝着%CALLNAME:MASTER%不断眨巴、%CALLNAME:MASTER%无奈的用接吻安抚着幼女…
		PRINTW
		PRINTFORMW 「%CALLNAME:MASTER%……❤」
		PRINTFORMW 「嗯哼っ❤ 啾～…❤」
	CASE 4
		PRINTFORMDL 克劳恩皮斯扑进%CALLNAME:MASTER%的怀中、呼唤着对方的名字送上嘴唇
		PRINTW
		PRINTFORMW 「%CALLNAME:MASTER%！ 亲亲❤」
		PRINTFORML 「也哈っ♪ 吓到了吗？」
		PRINTFORMW 「是所谓LOVE＆皮斯哦！☆」
	CASE 5
		PRINTFORMDL %CALLNAME:MASTER%流氓似的捏着克劳恩皮斯的下巴，就这样不讲理的接吻了
		PRINTW
		PRINTFORMW 「啊っ、%CALLNAME:MASTER%……嗯っ❤」
		PRINTFORMW 「嗯ー……呼ぁ❤ ……欸嘿嘿❤」
	CASE 6
		PRINTFORMDL %CALLNAME:MASTER%搂着克劳恩皮斯的肩膀与她接吻…
		PRINTW
		PRINTFORMW 「嗯ー、啾啾ー❤」
		PRINTFORMW 「嗯哼…❤ 足够热情的KISS才称得上KISS哦❤」
	CASEELSE
		PRINTFORMDL %CALLNAME:MASTER%与克劳恩皮斯神情对视着，不约而同闭上眼睛接吻了
		PRINTW
		PRINTFORMW 「嗯ー…？ 嗯？ ……啾❤」
		PRINTFORMW 「呼呼ッ❤ 再来一次吧！」
		PRINTFORMW 「啾❤」
		IF TALENT:[[克勞恩皮絲]]:恋人
			;無限接吻
			LOCAL = EXP:111:接吻経験 * 2
			LOCAL:1 = 0
			WHILE LOCAL < RAND:100
				PRINTL
				PRINTFORMW 「再来一次吧♪」
				PRINTFORMW 「啾❤ 啾❤」
				LOCAL = LOCAL / 2
				LOCAL:1 ++
				;一応
				SIF LOCAL:1 >= 8
					BREAK
			WEND
			SIF LOCAL:1
				PRINTFORMW 「诶嘿っ%UNICODE(0x2764) * LOCAL:1%」
		ELSE
			IF EXP:111:接吻経験 * 2 < RAND:100
				PRINTL
				PRINTFORMW 「再来一次吧♪」
				PRINTFORMW 「啾❤ 啾❤」
				PRINTFORMW 「诶嘿っ❤」
			ENDIF
		ENDIF
	ENDSELECT
ELSEIF ARGS == "其他"
	PRINTFORMDL %CALLNAME:MASTER%用嘴巴堵住了%CALLNAME:TARGET%的嘴
	PRINTW
	SELECTCASE RAND:2
	CASE 1
		PRINTFORMW 「啾ー❤」
	CASEELSE
		PRINTFORMW 「啾啾❤」
	ENDSELECT
ENDIF

;==================================================
;313,胸愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K111_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	;被逆推中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:111:诶嘿嘿 == 2
		SELECTCASE TCVAR:111:Counter行動
		;胸を揉ませる
		CASE 33
			PRINTFORMW 「哈啊嗯\/\/\/ 再激烈一点❤」
		;乳交
		CASE 53
			IF NOWEX:MASTER:11
				PRINTFORMW 「诶っ、啊っ、要去了吧？ %CALLNAME:MASTER%、可以射出来了哦❤」
			ELSE
				PRINTFORMW 「啊っ、嗯っ、是要去了吧ぁ❤ 再让我欺负一会儿吧ぉ～❤」
			ENDIF
		;ぱふぱふ
		CASE 73
			PRINTFORMW 「嗯唔っ❤ %CALLNAME:MASTER%、为什么那么喜欢胸部啊っ❤ 诶咦っ❤ 诶咦っ❤」
		;乳合わせ
		CASE 74
			PRINTFORMW 「啊嗯っ❤ 啊嗯っ❤ %CALLNAME:MASTER%嘴里好温暖❤」
		;乳を吸わせる
		CASE 77
			PRINTFORMW 「嗯啊啊～～っ❤ 这样子用力吸ぇ～～っ❤ 还这样激烈舔的话ぇ～～っ❤」
		;Ｖ挿入,Ａ挿入,Ｖ腰振り,Ａ腰振り
		CASE 85, 87, 88, 89
			IF NOWEX:MASTER:11
				PRINTFORMW 「哈啊❤ 啊嗯っ❤ 这样子激烈、欧派好舒服ぃッ❤ 要去了っ❤ 要高潮了啊啊ぇ%UNICODE(0x2764) * 2%」
			ELSE
				PRINTFORMW 「哈啊っ❤ 啊嗯っ❤ 好棒っ❤ 再多欺负一下胸部吧っ%UNICODE(0x2764) * 2%」
			ENDIF
		;だいしゅき大堂ド
		CASE 86
			PRINTFORMW 「哈啊啊～～っっ❤ 继续、不要停～っ❤ %CALLNAME:MASTER%～っ❤ 喵～～❤」
		;それ以外
		CASEELSE
			PRINTFORMW 「%CALLNAME:MASTER%是欧派星人吧❤ 啊嗯っ❤ 啊嗯っ❤ 我也，喜欢胸部哦っ❤」
		ENDSELECT
	ELSEIF CFLAG:111:睡眠
		PRINTFORMW 「嗯喵……好棒ぉ……」
;	;怒る
;	ELSEIF SOURCE:[[克勞恩皮絲]]:反感 > 500
;		CALL M_KOJO_K111_日常愛撫("怒る")
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		CALL M_KOJO_K111_日常愛撫("心情不快")
	;イっちゃう
	ELSEIF NOWEX:[[克勞恩皮絲]]:Ｂ絶頂
		CALL M_KOJO_K111_日常愛撫("絶頂")
	ELSE
		CALL M_KOJO_K111_日常愛撫("胸")
	ENDIF
ENDIF
RETURN 1

;==================================================
;胸愛撫,陰蒂愛撫,指挿入れ用
@M_KOJO_K111_日常愛撫(ARGS)
SELECTCASE ARGS
CASE "怒る"
	;理論上できなくないけど、計算式が関数ではなく判定フラグも無いのでやめておく
CASE "心情不快"
	IF TALENT:111:恋慕
		PRINTFORML 「%M_KOJO_K111_AUTO("喘ぎ：小", "…！")%」
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「现在不要做这种事～…」
		CASE 2
			PRINTFORMW 「姆ー！ 我真的要生气的哦ー？」
		CASEELSE
			PRINTFORMW 「不要…现在不是做这种事的时候ー……」
		ENDSELECT
	ELSE
		PRINTFORMW 「住手啊っ！」
	ENDIF
CASE "絶頂"
	PRINTFORML 「%M_KOJO_K111_AUTO("喘ぎ：小", "❤")%」
	SELECTCASE RAND:8
	CASE 1
		PRINTFORMW 「不要ッ…！ 现在如果被碰那里的话……啊啊❤」
	CASE 2
		PRINTFORMW 「不要っ…！ 唔……ッ❤」
	CASE 3
		PRINTFORMW 「等下っ…！ 受不了了……ッ❤」
	CASE 4
		PRINTFORMW 「不要碰那里啊……ぁ❤」
	CASE 5
		PRINTFORMW 「嗯っ、已经……忍不住了…ッ❤」
	CASE 6
		PRINTFORMW 「不要っ…！ 嗯…ッ❤」
	CASE 7
		PRINTFORMW 「唔っ…！ 完了完了……ぁ❤」
	CASEELSE
		PRINTFORMW 「啊，已经忍不住了……ッ❤」
	ENDSELECT
;胸,クリ,膣
CASEELSE
	IF TALENT:[[克勞恩皮絲]]:恋慕
		PRINTFORML 「%M_KOJO_K111_AUTO("喘ぎ：小", "❤")%」
		;簡易同室人チェック,確率
		IF !RAND:3 && TARGET:2
			SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「再别人面前做这种事，太欺负人了～！」
			CASE 2
				PRINTFORMW 「唔っ！声音要露出来了❤」
			CASE 3
				PRINTFORMW 「嗯唔❤ 真是无可救药的人啊♪」
			CASEELSE
				PRINTFORMW 「要是暴露了可就完蛋了啊❤」
			ENDSELECT
		;野外,確率
		ELSEIF !RAND:3 && OUTROOF(CFLAG:[[克勞恩皮絲]]:現在位置)
			SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「居然在外面做这种事～❤」
			CASE 2
				PRINTFORMW 「嗯唔❤ %CALLNAME:MASTER%真是变态死了」
			CASE 3
				PRINTFORMW 「这种事在家里还满足不了你吗ぉ～❤」
			CASEELSE
				PRINTFORMW 「%CALLNAME:MASTER%真是个不可救药的人啊❤」
			ENDSELECT
		ELSE
			SELECTCASE RAND:8
			CASE 1
				PRINTFORMW 「唔！ 色死了❤」
			CASE 2
				PRINTFORMW 「色鬼啊ぃ～！」
			CASE 3
				PRINTFORMW 「弄得我好痒啊ぉ♪」
			CASE 4
				PRINTFORMW 「嗯哼❤ 好舒服♪」
			CASE 5
				PRINTFORMW 「%CALLNAME:MASTER%小色狼～❤」
			CASE 6
				PRINTFORMW 「嗯～！ 变态❤」
			CASE 7
				IF ARGS == "胸"
					PRINTFORMW 「%CALLNAME:MASTER%真的很喜欢我的胸诶❤」
				ELSE
					PRINTFORMW 「住手啊ぉ！ 不要刻意指给我看！ 色死了！」
				ENDIF
			CASEELSE
				IF ARGS == "胸"
					IF TALENT:[[克勞恩皮絲]]:胸圍 > 0
						PRINTFORMW 「这样揉的话据说胸会变大哦❤」
					ELSEIF TALENT:[[克勞恩皮絲]]:胸圍 < 0
						PRINTFORMW 「%CALLNAME:MASTER%喜欢小的吗～❤」
					ELSE
						PRINTFORMW 「%CALLNAME:MASTER%喜欢大一点的胸部还是小一些的ー？」
					ENDIF
				ELSE
					PRINTFORMW 「不要～！ 才不想被乱摸❤」
				ENDIF
			ENDSELECT
		ENDIF
	ELSE
		PRINTFORML 「%M_KOJO_K111_AUTO("喘ぎ：小", "…！")%」
		;簡易同室人チェック,確率
		IF !RAND:2 && TARGET:2
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「有痴汉啊啊啊～！」
			CASE 2
				PRINTFORMW 「呜っ！ 要忍不住发出声音了啊っ！」
			CASEELSE
				PRINTFORMW 「呜～！ 即使暴露也没关系吗～？」
			ENDSELECT
		;野外,確率
		ELSEIF !RAND:2 && OUTROOF(CFLAG:[[克勞恩皮絲]]:現在位置)
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「警察哥哥！ 这里这里ー♪」
			CASE 2
				PRINTFORMW 「在这种地方对幼女出手可真是无可救药～イ！」
			CASEELSE
				PRINTFORMW 「有谁来逮捕这个人吗～？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:8
			CASE 1
				PRINTFORMW 「那是犯规啦～！」
			CASE 2
				PRINTFORMW 「色死了～！」
			CASE 3
				PRINTFORMW 「弄得我痒死了！」
			CASE 4
				PRINTFORMW 「呜哇～！ 好色！」
			CASE 5
				PRINTFORMW 「%CALLNAME:MASTER%是色狼～」
			CASE 6
				PRINTFORMW 「变态啊啊啊～！」
			CASE 7
				IF ARGS == "胸"
					PRINTFORMW 「%CALLNAME:MASTER%绝对是欧派星人～？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%毛手毛脚的～」
				ENDIF
			CASEELSE
				IF ARGS == "胸"
					IF TALENT:[[克勞恩皮絲]]:胸圍 > 0
						PRINTFORMW 「我的胸部比任何人都有魅力吧～♪」
					ELSEIF TALENT:[[克勞恩皮絲]]:胸圍 < 0
						PRINTFORMW 「……我的胸部、会不会有点小啊……？」
					ELSE
						PRINTFORMW 「%CALLNAME:MASTER%喜欢大一点的胸部还是小一些的ー？」
					ENDIF
				ELSE
					PRINTFORMW 「呜ぅ～！ 搞得我都害羞了！」
				ENDIF
			ENDSELECT
		ENDIF
	ENDIF
ENDSELECT
		;▼一新したので凍結
;		SELECTCASE RAND:分岐数
;		CASE 0
;			PRINTFORMW 「啊っ……\/\/\/」
;		CASE 1
;			PRINTFORMW 「やぁ……だめだよ\/\/\/」
;		CASE 2
;			PRINTFORMW 「なによ……\/\/\/」
;		CASE 3
;			PRINTFORMW 「え、えっちぃ……\/\/\/」
;		;ここから恋慕
;		CASE 4
;			PRINTFORMW 「ふぁぁ、きもちい……\/\/\/」
;		CASE 5
;			PRINTFORMW 「んにゃあ……❤」
;		CASE 6
;			PRINTFORMW 「あんっ❤ くすぐったいよぉ♪」
;		ENDSELECT

;;==================================================
;;314,肛門愛撫
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_314
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_314_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_314_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;315,陰蒂愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K111_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	;被逆推中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:111:诶嘿嘿 == 2
		SELECTCASE TCVAR:111:Counter行動
		;裙子の中を見せる
		CASE 35
			PRINTFORMW 「啊嗯っ❤ 色死了❤」
		;強制舐陰
		CASE 70
			PRINTFORMW 「嗯喵っ❤ 这样子❤ 不要揪着乱拽啊❤」
		;Ｖ挿入,Ａ挿入,Ｖ腰振り,Ａ腰振り
		CASE 85, 87, 88, 89
			PRINTFORMW 「啊嗯っ❤  不行，不能捏小豆豆ぇ❤ 脑袋要变奇怪了ぅ～～っ%UNICODE(0x2764) * 2%」
		;だいしゅき大堂ド
		CASE 86
			PRINTFORMW 「啊啊嗯っ❤ 好棒っ❤ 小豆豆好舒服っ❤ 再用力些っ❤ 就这样捏坏我的小豆豆吧っ❤」
		;それ以外
		CASEELSE
			PRINTFORMW 「啊嗯っ❤ 唔っ❤」
		ENDSELECT
	ELSEIF CFLAG:111:睡眠
		PRINTFORMW 「嗯喵……不要捏那里……」
;	;怒る
;	ELSEIF SOURCE:[[克勞恩皮絲]]:反感 > 500
;		CALL M_KOJO_K111_日常愛撫("怒る")
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		CALL M_KOJO_K111_日常愛撫("心情不快")
	;イっちゃう
	ELSEIF NOWEX:[[克勞恩皮絲]]:Ｃ絶頂
		CALL M_KOJO_K111_日常愛撫("絶頂")
	ELSE
		CALL M_KOJO_K111_日常愛撫("クリ")
	ENDIF
ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;==================================================
@M_KOJO_MESSAGE_COM_K111_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_316_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:時間停止
	ELSEIF TALENT:111:処女 == 1
		PRINTFORMW 「啊っ……\/\/\/ 不要摸那里……\/\/\/」
	;被逆推中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:111:诶嘿嘿 == 2
		SELECTCASE TCVAR:111:Counter行動
		;裙子の中を見せる
		CASE 35
			PRINTFORMW 「啊啊っ❤ 就是那里っ❤ 搅得一塌糊涂吧❤」
		;強制舐陰
		CASE 70
			PRINTFORMW 「唔喵っ❤ 脑袋都要坏掉了っ❤」
		;それ以外
		CASEELSE
			PRINTFORMW 「啊啊っ❤ 突然间做这种事っ❤」
		ENDSELECT
;	;怒る
;	ELSEIF SOURCE:[[克勞恩皮絲]]:反感 > 500
;		CALL M_KOJO_K111_日常愛撫("怒る")
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		CALL M_KOJO_K111_日常愛撫("心情不快")
	;イっちゃう
	ELSEIF NOWEX:[[克勞恩皮絲]]:Ｖ絶頂
		CALL M_KOJO_K111_日常愛撫("絶頂")
	ELSE
		CALL M_KOJO_K111_日常愛撫("膣")
	ENDIF
ENDIF
RETURN 1
;==================================================
;317,Ｖ腰を振る
;==================================================
@M_KOJO_MESSAGE_COM_K111_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_317_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF NOWEX:MASTER:11
		PRINTFORML 「呼っ❤ 啊っ、啊っ、啊っ、啊嗯っ❤ 干我っ❤ %CALLNAME:MASTER%、用力❤」
		PRINTFORMW 「嗯っ、嗯っ、啊嗯っ、射进来っ、射进来っ❤ 啊っ❤ 一口气射满我的子宫っ❤」
	ELSEIF ABL:111:Ｖ感覚 < 2
		PRINTFORMW 「啊っ、呜っ、好痛っ❤ 唔っ、温柔点啦っ❤ 啊嗯っ、啊っ❤」
	ELSEIF ABL:111:Ｖ感覚 < 5
		PRINTFORMW 「啊っ、啊っ、啊っ、啊嗯っ❤ 好激烈っ❤ っ坏掉了ぉ❤ 慢点っ、温柔一些っ❤ 哈啊っ❤」
	ELSE
		PRINTFORMW 「啊っ、啊嗯っ❤ 啊嗯っ❤ 真是的っ、%CALLNAME:MASTER%っ❤ 太激烈了っ❤ 坏掉了啊っ❤」
	ENDIF
ENDIF
RETURN 1
;==================================================
;318,Ａ腰を振る
;==================================================
;@M_KOJO_MESSAGE_COM_K111_318
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_318_1
;RETURN RESULT

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

;ENDIF
;RETURN 1
;==================================================
;330,掀裙子
;==================================================
@M_KOJO_MESSAGE_COM_K111_330
IF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
	DRAWLINE
ELSEIF TFLAG:193 >= 0
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K111_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		;地の文カット
		PRINTFORMDL %CALLNAME:MASTER%把克劳恩皮斯的%SHOW_BOTTOM(TARGET,1)%掀了起来
		PRINTW
		PRINTFORMW 「住手啊！！」
		PRINTFORMDW 挨了一顿痛打……
	;掀裙子成功
	ELSEIF TFLAG:193 >= 0
		PRINTFORMDL %CALLNAME:MASTER%趁克劳恩皮斯不注意，突然把她的%SHOW_BOTTOM(TARGET,1)%掀了起来！
		PRINTW
		;地の文カット
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「咿呀っ！」
		CASE 2
			PRINTFORML 「哇啊啊啊っ！」
		CASEELSE
			PRINTFORML 「哇哇っ！」
		ENDSELECT
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「变态～！ 竟敢对我做这种事ー！」
		CASE 2
			PRINTFORMW 「真是的～❤ 色死了～！」
		CASE 3
			PRINTFORMW 「姆咕咕～！ %CALLNAME:MASTER%干得不错嘛～！」
		CASE 4
			PRINTFORMW 「只是稍微放松点警惕就这样子！」
		CASEELSE
			PRINTFORMW 「可以～！ 被得逞了～！」
		ENDSELECT
	;掀裙子失敗
	ELSEIF TALENT:[[克勞恩皮絲]]:思慕 || TALENT:[[克勞恩皮絲]]:恋慕
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「住手！ 别这样子！」
		CASE 2
			PRINTFORMW 「唔、果然还是做了这种事ー！」
		CASEELSE
			PRINTFORML 「色鬼！」
		ENDSELECT
	ELSE
		PRINTFORMW 「哇っ！ 你在干什么蠢事啊！！」
	ENDIF
ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;==================================================
@M_KOJO_MESSAGE_COM_K111_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF TFLAG:193 == 1
		PRINTFORML 「谢谢ー！ 」
		PRINTFORML 「哇啊！ 这茶味道好棒！？ 和平时的比起来更加好喝！」
		PRINTFORMW 「%CALLNAME:MASTER%泡茶的水平提升了好多～」
	ELSEIF TFLAG:193 == -1
		PRINTFORML 「谢谢ー！ 」
		PRINTFORMW 「嗯……、感觉……好苦……」
		PRINTFORMW 「喉咙有点受不了！」
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMW 「嗯……谢了」
	ELSE
		;通常の茶と同じ
		PRINTFORML 「谢谢ー！ 」
		SELECTCASE RAND:5
		CASE 1
			PRINTFORML 「呼呼……热气腾腾的ー！」
		CASE 2
			PRINTFORML 「呼……虽然茶也很香，但还是希望有可乐」
		CASE 3
			PRINTFORML 「烫烫……没有果汁之类的喝嘛？」
		CASE 4
			PRINTFORML 「呼……唔……舌头っ！」
		CASEELSE
			PRINTFORML 「烫烫……这是那种茶啊？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;332,勸酒
;TFLAG:193(0=成功 -1=失敗 -2=大失敗 -5=ひじりん)
;==================================================
@M_KOJO_MESSAGE_COM_K111_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;默认（ぼくのかんがえた克勞恩皮絲ちゃん…もとい自前CSV（受け入れてくれた作者さんには大感謝））
	;では[擅于喝酒]のでまずい＞濁酒,おいしい＞清酒
	;口上が出る時点で既に酒気は加算されてる,不省人事口上は果たして表示できるのか
	IF ALCOHOL_FACE(111) == "不省人事"
		PRINTFORMW 「呀哈哈哈♪ 喝酒喽♪♪♪」
	;現在は無い
	ELSEIF ALCOHOL_FACE(111) == "酩酊大醉"
		PRINTFORMW 「多喝点多喝点嘛～～♪」
	ELSEIF ALCOHOL_FACE(111) == "酔酒"
		PRINTFORMW 「欸嘿嘿～♪ 才不会就这样结束～～♪」
	ELSE
		PRINTFORMW 「耶ー！ 喝酒啦ー♪」
	ENDIF
	;濁酒
	IF ALCOHOL_TASTE(TFLAG:194) < 10
		IF ALCOHOL_FACE(111) == "不省人事"
			PRINTFORMW 「这ー！！ 上这酒的家伙给我过来！！」
		ELSEIF ALCOHOL_FACE(111) == "酔酒"
			PRINTFORMW 「嗯～♪ 这种程度根本不会喝醉嘛～～」
		ELSE
			PRINTFORMW 「嗯ー♪ 太淡了，不适合我～」
		ENDIF
	;清酒
	ELSEIF ALCOHOL_TASTE(TFLAG:194) >= 15
		IF ALCOHOL_FACE(111) == "不省人事"
			PRINTFORMW 「这个～～♪ 这个酒我很中意～♪ 更喜欢喜欢这个酒的%CALLNAME:MASTER%❤」
		ELSEIF ALCOHOL_FACE(111) == "酔酒"
			PRINTFORMW 「还要喝啦～♪ %CALLNAME:MASTER%不要把其他酒藏起来好不好嘛～～？？」
		ELSE
			PRINTFORMW 「好喝～♪ 你应该不会只有这点吧？ 快快拿出来♪」
		ENDIF
	;鬼殺酒
	ELSE
		IF ALCOHOL_FACE(111) == "不省人事"
			PRINTFORMW 「～～ッ！！＠＃！＄％！？＊＊＊＊ッ！！」
		ELSEIF ALCOHOL_FACE(111) == "酔酒"
			PRINTFORMW 「呀吼～～！ 带来这种酒的%CALLNAME:MASTER%不会想自己先跑路吧～～！？」
		ELSE
			PRINTFORMW 「呀呀呀ー！ 这个好辣ー！ 过瘾啊过瘾ー！！」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;==================================================
@M_KOJO_MESSAGE_COM_K111_333
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;地の文改変型
	PRINTFORMDL %CALLNAME:TARGET%発着牢騷
	PRINTW
	SELECTCASE TFLAG:SELECTCOM的分岐
	;失敗
	CASE 1
		;最初から心情不快
		IF TCVAR:[[克勞恩皮絲]]:360
			PRINTFORML 「所以说……不是那样！ 都说了不是！！」
			PRINTFORMW 「呜哇受不了了！ %CALLNAME:MASTER%真是不明事理的家伙！」
		;十中八九你が原因
		ELSE
			PRINTFORML 「哈！？ 事到如今依旧用借口来敷衍我！」
			PRINTFORMW 「所以才说\@ TALENT:MASTER:性別 == 1 ? 废柴女 # 废柴男 \@不行啊！！」
		ENDIF
		PRINTL
		PRINTFORMDW 反而让她生气了…
	;成功
	CASE 2
		;最初から心情不快
		IF TCVAR:[[克勞恩皮絲]]:360
			PRINTFORML 「这样搞……难道不是很不近人情吗？」
			PRINTFORMW 「主人也说了……」
			PRINTFORMW 「哼……反正我已经无所谓了，随她去吧♪」
		;十中八九你が原因
		ELSE
			PRINTFORML 「哼！ 我早厌倦了这些唠叨」
			PRINTFORMW 「也是时候让%CALLNAME:MASTER%感受一下困扰的感觉了～」
		ENDIF
		PRINTL
		PRINTFORMDW 抱怨一番后似乎平静下来了
	;大成功
	CASE 3
		;最初から心情不快
		IF TCVAR:[[克勞恩皮絲]]:360
			PRINTFORML 「这样搞……难道不是很不近人情吗？」
			PRINTFORMW 「主人也说了……」
			PRINTFORMW 「啊ー、感觉痛快了，和%CALLNAME:MASTER%抱怨一番之后心情畅快了不少♪」
		;十中八九你が原因
		ELSE
			PRINTFORML 「呼呼ッ♪ 怎么，%CALLNAME:MASTER%在认真听吗～？」
			PRINTFORMW 「那种事情根本就不值得我耿耿于怀」
			PRINTFORMW 「而且、看到%CALLNAME:MASTER%的脸我就忍不住要笑出来了♪」
		ENDIF
		PRINTL
		PRINTFORMDW 抱怨一番后平静下来了
	;失敗（酔）
	CASE 4
		PRINTFORMW 「诶～～？ 很过分吧～～？明明就是没办法的事情、却还～～っ！」
		PRINTL
		PRINTFORMDW %CALLNAME:TARGET%不讲理地纠缠着
	;成功（酔）
	CASE 5
		PRINTFORML 「所以说啊啊啊、我才是～～、对的～～那就根本～～～～！」
		PRINTFORMW 「做不了！ 完不成的事～还非要～～！」
		PRINTL
		PRINTFORMDL 已经连话都说不清了
		PRINTFORMDW 却还在一个劲抱怨着
	;大成功（酔）
	CASE 6
		PRINTFORML 「没错～～～！！！ 所以我就、那样、那样子～～！！！」
		PRINTFORMW 「%CALLNAME:MASTER%、对不对嘛♪」
		PRINTL
		PRINTFORMDL %CALLNAME:MASTER%只能顺从地附和几声，克劳恩皮斯好像被戳中笑点一样嘻嘻笑着
		PRINTFORMDW 虽然不知道是为什么，但她心情能变好就再好不过了
	ENDSELECT
ENDIF
RETURN 1
;;==================================================
;;334,碰杯
;;TFLAG:193(1=大成功 0=成功 -1=失敗)
;;CFLAG:妊娠自覚状態(1=吃飯)
;;TALENT:酒耐性(-2=吃飯)
;;==================================================
;@M_KOJO_SUCCESS_COM_K111_334
;;成否判定
;;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
;TFLAG:192 =0
;
;@M_KOJO_MESSAGE_COM_K111_334
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_334_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_334_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;	SELECTCASE TFLAG:193
;		CASE 1
;		;大成功
;		CASE 0
;		;成功
;		CASE -1
;		;失敗
;	ENDSELECT
;ENDIF
;RETURN 1
;;==================================================
;;335,照料
;;TFLAG:193(1=大成功 0=成功 -1=失敗)
;;==================================================
;@M_KOJO_SUCCESS_COM_K111_335
;;成否判定
;;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
;TFLAG:192 =0
;
;@M_KOJO_MESSAGE_COM_K111_335
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_335_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_335_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;	SELECTCASE TFLAG:193
;		CASE 1
;		;大成功
;		CASE 0
;		;成功
;		CASE -1
;		;失敗
;	ENDSELECT
;ENDIF
;RETURN 1
;====================================================================================================
;336,膝枕
;====================================================================================================
@M_KOJO_MESSAGE_COM_K111_336
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_336_1
PRINTW
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文改変型
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF TALENT:111:恋慕 && !M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMDL %CALLNAME:MASTER%正坐着拍了拍大腿、克劳恩皮斯嬉笑着自觉地躺上来
	ELSE
		PRINTFORMDL %CALLNAME:MASTER%让克劳恩皮斯枕在膝上
	ENDIF
	;寝ちゃう
	IF TFLAG:SELECTCOM的分岐 > 0
		WAIT
		PRINTFORML 是太舒服了麼、克劳恩皮斯就這樣睡著了
		PRINTFORML %CALLNAME:MASTER%在克劳恩皮斯起来之前默默的看着睡颜
		PRINTW
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「呼……嘶……嘶ぅ……」
		CASE 2
			PRINTFORMW 「啊…%CALLNAME:MASTER%、我睡着了吗……不好意思啦」
		CASEELSE
			PRINTFORMW 「嗯啊……嘶～……」
			PRINTFORMDW 看着克劳恩皮斯一脸幸福的样子、%CALLNAME:MASTER%温柔地抚摸着她的头
		ENDSELECT
	;心情不快
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTW
		PRINTFORMW 「嗯……、就现在这儿冷静一下再说」
	ELSE
		PRINTW
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「可以？ 好耶！」
		CASE 2
			PRINTFORMW 「嗯ー、软软的♪」
		CASE 3
			PRINTFORMW 「舒服的让人想睡嘛♪」
		CASE 4
			PRINTFORML 「稍微有点硬诶～」
			PRINTFORMW 「要是更加柔软些就更好了！」
		CASE 5
			PRINTFORMW 「摇摇晃晃～♪」
		CASE 6
			PRINTFORMW 「哇哇っ！ 不要晃我啦っ！」
		CASE 7
			PRINTFORMW 「%CALLNAME:MASTER%、看我～♪」
		CASEELSE
			PRINTFORMW 「咕噜咕噜♪」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,推倒（時姦時猥褻
;TFLAG:194 (0=成功 1=人目がある　2=野外は嫌でござりまする　3=多人数プレイは勘弁　4=合意があっても情緒が足りぬ）
;TCVAR:初次拥抱　1=普通に合意ゲット　2=先に接吻ぐらいしろよ　3=媚薬or発情には勝てなかったよお…　4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
;5=強引に迫られると断れぬ(素質膽怯持ち専用) 6=まんざらでもない　7=駄目　8=論外
;==================================================
@M_KOJO_MESSAGE_COM_K111_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;被逆推値	ENDURE(111) >= RAND:300 + 300で真,しかしRANDの値は変化するのでここでは400を超えたら被逆推ることにする
	IF FLAG:時間停止 == 1
	;野外失敗
	ELSEIF TFLAG:194 == 2
		IF ENDURE(111) > 400
			PRINTFORML 「诶っ\/\/\/ 在这做……\/\/\/」
			PRINTFORMW 「这里是、外面诶……\/\/\/」
		ELSE
			PRINTFORML 「哇！ 你说什么！？」
			PRINTFORMW 「这里是、外面诶……？」
		ENDIF
	;人目失敗
	ELSEIF TFLAG:194 == 1
		IF ENDURE(111) > 400
			PRINTFORML 「诶っ\/\/\/ 在这做……\/\/\/」
			PRINTFORMW 「会被看见……\/\/\/」
		ELSE
			PRINTFORML 「哇！ 你说什么！？」
			PRINTFORMW 「有人……？」
		ENDIF
	;乱交失敗
	ELSEIF TFLAG:194 == 3
		PRINTFORMW 「诶っ、才不要……和%CALLNAME:MASTER%两人就足够了……」
	;情緒失敗
	ELSEIF TFLAG:194 == 4
		PRINTFORML 「哇啊っ！ 不要っ！」
		PRINTFORMW 「气氛！ 考虑下气氛啊～」
	;烂醉失敗
	ELSEIF TFLAG:194 == 5
		PRINTFORMW 「嗯嗯～～？ %CALLNAME:MASTER%、要干嘛呀～～？？」
		PRINTL
		PRINTFORMDW 不能在有人目击的情况下强姦她哦
	;強制失敗
	ELSEIF TFLAG:194 == 100 || TCVAR:111:初次拥抱 == 98
		PRINTFORML 「%M_KOJO_K111_AUTO("喘ぎ：小", "…！")% 不要！」
		PRINTFORMW 「还不到那时候吧っ！！」
		RETURN 1
	;烂醉
	ELSEIF TCVAR:111:烂醉 == 1
		PRINTFORMW 「唔姆ぁ～～喵～～嗯～～？ 睡觉吗～～？？」
	;乱交
	ELSEIF GET_TARGETNUM() > 1
		IF FIRSTTIME("乱交")
			PRINTFORMW 「诶っ！ 和别人一起做……？」
			PRINTFORMW 「也不是、不行……」
		ELSE
			PRINTFORML 「叫2%TOFULL(TOSTR(GET_TARGETNUM()))%的家伙是吗？」
			PRINTFORMW 「好好来协助我吧？」
		ENDIF
	;お泊り１
	ELSEIF GROUPMATCH(CFLAG:[[克勞恩皮絲]]:現在位置, 情人用宿屋, 情人旅館, CFLAG:MASTER:初期位置) && CFLAG:TARGET:诶嘿嘿 != 2
		PRINTFORMW 「%M_KOJO_K111_AUTO("喘ぎ：小", "❤")%」
	;お泊り２
	ELSEIF M_KOJO_K111_HOUSE(CFLAG:[[克勞恩皮絲]]:現在位置) == 1 && CFLAG:TARGET:诶嘿嘿 != 2
		PRINTFORMW 「%M_KOJO_K111_AUTO("喘ぎ：小", "❤")%」
	;それ以外
	ELSEIF !TCVAR:351
		PRINTFORMW 「%M_KOJO_K111_AUTO("喘ぎ：小", "…！")%」
	ENDIF
	;先に被逆推た
	;诶嘿嘿フラグは推倒た時点で変更されるんでした
	;推倒返しは小傘口上さんを参考にして専用TCVARを作ることに
;	IF !FLAG:70 && !TFLAG:194 && CFLAG:111:诶嘿嘿 == 2
	IF TCVAR:351
		PRINTFORML
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「%M_KOJO_K111_AUTO("喘ぎ：小", "❤")%」
			PRINTFORMW 「唔ー、我同意还不行吗！ 对我%CALLNAME:MASTER%请温柔一些哦❤」
		CASE 2
			PRINTFORMW 「呼呼ッ❤ %CALLNAME:MASTER%也兴奋起来了吗？」
			PRINTFORMW 「一起❤ 舒服起来吧♪」
		CASEELSE
			PRINTFORMW 「呀哈っ♪ 想做那种事情了吗？」
			PRINTFORMW 「好棒っ❤ 尽情想用我吧❤」
		ENDSELECT
	ELSEIF !FLAG:70 && !TFLAG:194
		PRINTFORML
		SELECTCASE TCVAR:111:初次拥抱
		;普通の初回,接吻がまだ,克勞恩皮絲は接吻が先だとか後だとか大して気にしてない
		CASE 1, 2
			PRINTFORMW 「呀っ！ 等、住手！」
			PRINTFORMW 「……%CALLNAME:MASTER%、是认真的吗……？」
			PRINTFORMW 「我还是第一次，完全不明白要怎么做……」
			PRINTFORMW 「但是、只要%CALLNAME:MASTER%温柔一些的话❤ 应该没问题❤」
		;媚薬or発情
		CASE 3
			PRINTFORML 「呼哇……%CALLNAME:MASTER%、我好像、有点头晕……」
			PRINTFORMW 「哈啊……快点、和我做爱吧……」
		;時姦
		CASE 4
			PRINTFORML 「你要做什么！ 不要过来！」
			PRINTL
			PRINTFORMDW %CALLNAME:MASTER%不顾克劳恩皮斯的阻拦强行推倒了她
			PRINTL
			PRINTFORMW 「诶っ！？ 为什么……不要这样啊……」
;		CASE 5
;			PRINTFORML 押しの弱い%CALLNAME:TARGET%は、%CALLNAME:MASTER%を拒むことができなかった…
		;もう稍微
		CASE 6
			PRINTFORML 「诶……那种事……」
			PRINTFORMW 「才不要……%CALLNAME:MASTER%对不起……」
		;ダメ
		CASE 7
			PRINTFORML 「呜哇っ！ 你到底在想些什么呢！」
			PRINTFORMW 「那种事才不和%CALLNAME:MASTER%做呢……」
		;早すぎ
		CASE 8
			PRINTFORML 「咿呀っ！！！ 你干嘛啊！ 变态！ 大变态！」
			PRINTFORMW 「主人ーーっ！！ 快让这家伙下地狱去吧！！」
		;初回じゃない
		CASEELSE
			SELECTCASE RAND:6
			CASE 1
				PRINTFORML 「真是的♪ %CALLNAME:MASTER%色死了❤」
				PRINTFORMW 「呼呼❤ 尽情享用我的身体吧❤」
			CASE 2
				PRINTFORMW 「呀哈っ♪ 看来只能做爱了喵♪」
			CASE 3
				PRINTFORMW 「呼呼っ♪ 可以哦❤ 一起快乐吧❤」
			CASE 4
				PRINTFORMW 「不要ー❤ %CALLNAME:MASTER%真不是好东西ー！」
			CASE 5
				PRINTFORMW 「嗯……、%CALLNAME:MASTER%、今天用温柔一点的做法吧？」
			CASEELSE
				IF TALENT:111:妊娠
					PRINTFORMW 「唔、要温柔一点哦、我肚子里可是有小宝宝的哦……❤」
				ELSE
					PRINTFORMW 「呼呼、今天想玩过激play，尽情玩坏我吧……❤」
				ENDIF
			ENDSELECT
			;妊娠中
			IF TALENT:111:妊娠 && CFLAG:111:妊娠自覚状態 == 1
				PRINTFORML
				PRINTFORMW 「啊！ 因为肚子里有小宝宝，不要做的太过分哦？」
			;危険日
			ELSEIF CFLAG:111:生理周期 == 7 && !TALENT:111:妊娠 && CFLAG:111:允许无套 == 2
				PRINTFORML
				PRINTFORMW （今天是危险日来着……可不能错过这次机会♪）
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;;==================================================
;;351,帯出去
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_351
;;連れ出しにはTRAIN_MESSAGEが無い
;CALL M_KOJO_MESSAGE_COM_K111_351_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_351_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;352,告白
;==================================================
@M_KOJO_MESSAGE_COM_K111_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;した
	IF TFLAG:SELECTCOM的分岐
		PRINTFORMW 「诶っ……真的吗！？」
		;初めて
		IF FIRSTTIME("告白")
			PRINTFORMW 「就是说、『LOVE』、喜欢我的意思吗……？」
			PRINTFORMW 「%CALLNAME:MASTER%喜欢我想让我成为女友的意思……？」
			PRINTFORMW 「欸嘿嘿……这样啊❤」
			PRINTFORMW 「好耶！ 太棒了！！」
			PRINTFORMW 「…因为我也快要认不住向%CALLNAME:MASTER%告白的冲动！」
			PRINTFORMW 「我也对%CALLNAME:MASTER%抱有同样的心情！ 喜欢的不得了！」
			PRINTFORMW 「之前还在担心、%CALLNAME:MASTER%到底对于我是怎样的感情……」
			PRINTFORMW 「但听到%CALLNAME:MASTER%的告白，一切担心都不再存在，真的、好開心♪」
		;一度フった,都合のいい奴じゃ！
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%是喜欢我吗……？」
			PRINTFORMW 「所以说已经变得离不開我了！」
			PRINTFORMW 「哈哈、開玩笑啦，能被%CALLNAME:MASTER%选中我也是相当高兴❤」
		ENDIF
		PRINTFORMW 「既然如此从今天開始我们就是恋人了❤」
		PRINTFORMW 「姆呼呼❤ 真幸福～❤」
	;言葉に詰まる
	ELSE
		PRINTFORML 「？」
		PRINTFORMW 「%CALLNAME:MASTER%怎么了、一副没精神的样子？」
		PRINTFORMW 「……看着很奇怪欸ー」
	ENDIF
ENDIF
RETURN 1
;;==================================================
;;353,猥褻
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_353
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_353_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_353_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;354,陪睡（相手は起きて被窝に招く感じ）
;==================================================
@M_KOJO_MESSAGE_COM_K111_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORML 「嗯、%CALLNAME:MASTER%……」
	SELECTCASE RAND:4
	CASE 1
		PRINTFORMW 「来一起睡了…？ 呼呼、可以哦…♪」
	CASE 2
		PRINTFORMW 「来哄我睡觉吧～❤」
	CASE 3
		PRINTFORMW 「一起睡吧～……❤」
	CASEELSE
		PRINTFORMW 「睡一起……好暖和……」
	ENDSELECT
ENDIF
RETURN 1
;;==================================================
;;355,時止め（地の文の改変程度に留めるべき
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_355
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_355_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_355_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;356,邀请去阴暗处
;;ABL:露出癖 + TALENT:羞恥心で判定
;;==================================================
;@M_KOJO_SUCCESS_COM_K111_356
;;成否判定
;;TFLAG:192(-1＝強制失敗、0=COM依存、1=強制成功
;TFLAG:192 =0
;
;@M_KOJO_MESSAGE_COM_K111_356
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_356_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_356_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;360,任憑擺佈
;==================================================
@M_KOJO_MESSAGE_COM_K111_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;華扇口上さんを参考にさせていただきました。ありがとうございます。
IF LOCAL
	CALL M_KOJO_COLOR_K111
	SELECTCASE TCVAR:111:Counter行動
	;接吻
	CASE 30
		PRINTFORMW 「哈啊……啾～～%UNICODE(0x2764 * 2)%」
	;从后面将抱きつく
	CASE 31
		PRINTFORMW 「哈哈ー……、好淡定……%CALLNAME:MASTER%简直像父亲大人一样……」
	;前から抱きつく
	CASE 32
		PRINTFORMW 「嗯……可以感受到%CALLNAME:MASTER%的体温，好想就这样一直抱下去……」
	;胸を揉ませる
	CASE 33
		PRINTFORMW 「抱歉……胸部摸起来不够舒服吧……」
	;股間をまさぐる
	CASE 34
		PRINTFORMW 「呀吼っ♪变得好大っ♪要排卵了っ♪」
	;裙子の中を見せる
	CASE 35
		PRINTFORMW 「怎样？对着幼女的私处彻底兴奋起来了吗……？」
	;挿入おねだり
	CASE 41 TO 44
		;おあずけ？
		PRINTFORMW 「姆っ……好好忍耐哦！让我好好地欺负一下欧金金♪」
	;手淫
	CASE 50
		IF NOWEX:MASTER:11
			PRINTFORMW 「哇哦っ❤ 喷出来了❤」
		ELSE
			PRINTFORMW 「呀哈哈っ♪ 变得好大哦❤ 我的手让欧金金桑很舒服呢❤」
		ENDIF
	;口淫
	CASE 51
		IF NOWEX:MASTER:11
			IF FIRSTTIME("精液の味")
				PRINTFORMW 「嗯っ、嗯っ、嗯～～～っ%UNICODE(0x2764) * 2%」
			ELSE
				PRINTFORMW 「嗯っ、嗯っ、嗯～～～っ%UNICODE(0x2764) * 2%」
			ENDIF
		ELSE
			PRINTFORMW 「嗯ー、咕咕っ……prpr、嗯、好美味❤」
		ENDIF
	;素股
	CASE 52
		IF NOWEX:MASTER:11
			PRINTFORMW 「哈啊っ❤ 哈啊っ❤ 快点っ❤ 射出来吧っ❤」
		ELSE
			PRINTFORMW 「不要ぁ❤ 不要停～っ❤ 啊嗯っ❤ 啊嗯っ❤」
		ENDIF
	;乳交
	CASE 53
		IF NOWEX:MASTER:11
			PRINTFORMW 「诶嘿❤ 看来很舒服嘛❤ 我很棒吧♪」
		ELSE
			PRINTFORMW 「啊っ❤ 啊っ❤怎么我也、好有感觉❤」
		ENDIF
	;足交
	CASE 54
		PRINTFORMW 「呜呼呼……❤ 很舒服吗～❤ %CALLNAME:MASTER%居然被幼女的小脚踩到射精，真是不可救药的抖M变态♪」
	;肛門愛撫
	CASE 55
		PRINTFORMW 「感觉很舒服吧～❤ 哼哼、变态%CALLNAME:MASTER%居然被欺负后穴会那么兴奋，要再往里欺负前列腺了哦♪」
	;舐肛
	CASE 56
		PRINTFORMW 「想要舔得更深些？？可以❤ 一会儿%CALLNAME:MASTER%也别忘了要为我舔哦❤prpr、prpr、好让人上瘾得味道❤」
	;乳頭舐め
	CASE 59
		PRINTFORMW 「吸吸舔舔吸吸舔舔❤啾啾❤」
	;ディープ接吻
	CASE 60
		PRINTFORMW 「哈啊……还要❤ 啾、咕啾……❤」
	;強制舐陰
	CASE 70
		SELECTCASE RAND:3
		CASE 0
			PRINTFORML 「哇哇ぁっ❤ 啊っ❤ 啊啊啊っ%UNICODE(0x2764) * 2%」
			PRINTFORMW 「好爽～～っ%UNICODE(0x2764) * 2%」
		CASE 1
			PRINTFORML 「啊っ❤ 用力❤ 更深点❤」
			PRINTFORMW 「还要っ❤ 就这样吸❤ 狠狠地舔舐っ%UNICODE(0x2764) * 2%」
		CASE 2
			PRINTFORML 「%CALLNAME:MASTER%っ❤ 怎样？ 我的幼女的小穴美味吗？」
			PRINTFORMW 「再用力吸的话子宫都要被吸出来了哦？❤」
		ENDSELECT
	;舐肛強制
	CASE 72
		PRINTFORML 「哇啊っ❤ 屁股好舒服❤肠液都被舌头卷走了❤」
		PRINTFORMW 「%CALLNAME:MASTER%这样子吮吸下去，皮斯的后穴要变成性器了～～っ❤」
	;ぱふぱふ
	CASE 73
		PRINTFORMW 「啊嗯っ❤ 啊嗯っ❤ %CALLNAME:MASTER%好可爱っ❤」
	;乳合わせ
	CASE 74
		PRINTFORMW 「啊嗯っ❤ 啊嗯っ❤ %CALLNAME:MASTER%嘴里好温暖❤」
	;タワシ洗い
	CASE 75
		PRINTFORML 「はぁっ❤ はぁっ❤ ごめんね%CALLNAME:MASTER%、あたいばっかきもちよくなって❤」
		PRINTFORMW 「でもこれきもいいのっ❤ やめられないのおっ❤」
	;強制アソコ愛撫
	CASE 76
		PRINTFORMW 「啊っ❤ 啊っ❤ 好棒っ❤ 咕啾咕啾的粘液满溢出来❤ 好舒服っ❤」
	;乳を吸わせる
	CASE 77
		PRINTFORMW 「哈啊っ❤ 啊嗯っ❤ 用力❤ 不要停❤」
	;Ｖ挿入,Ａ挿入
	CASE 85, 87
		PRINTFORMW 「啊～～っ❤ 进来了～～っっ%UNICODE(0x2764) * 2%」
	;だいしゅき大堂ド
	CASE 86
		;一緒にイく
		IF NOWEX:111:1
			PRINTFORML 「哈っ❤ 哈啊っ❤ 去了っ❤ 一起去吧❤」
			PRINTFORMW 「%CALLNAME:MASTER%っ❤ 爱死你了❤」
		ELSE
			PRINTFORMW 「哈啊っ❤ 哈啊っ❤ 要去了っ❤ %ONEDARI_MASTER_TINKO()%牛奶要来了啊啊啊～～っっ❤」
		ENDIF
	;Ｖ腰振り,Ａ腰振り
	CASE 88, 89
		PRINTFORMW 「啊嗯っ❤啊嗯っ❤ 腰っ❤ 停不下来了っ❤ 啊嗯っ❤」
	ENDSELECT
ENDIF
RETURN 1
;;==================================================
;;361,抵抗
;;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_361
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_361_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_361_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;363,朗読（[幼稚]持ち）
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_363
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_363_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_363_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;364,撒豆子(萃香、勇儀、斯喀雷特姉妹用
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_364
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_364_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_364_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;365,向守矢神社移動(早苗、神奈子、諏訪子用
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_365
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_365_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_365_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;368,陪同行動
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_MESSAGE_COM_K111_368
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_368_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_368_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE Activity_Type:TARGET
	CASE 0
		;▼考え事［なに考えてるの］
		;TFLAG:193,-1=はぐらかされる
		IF TFLAG:193 == -1
			PRINTFORML 「诶、没想什么啦！」
			PRINTFORMW 「才没想该怎么对%CALLNAME:MASTER%恶作剧！」
		ELSE
			PRINTFORML 「唔、有些事情有点在意ー」
			SELECTCASE RAND:8
			CASE 1
				PRINTFORMW 「吃意大利面的时候，到底是往左边旋的还是右边来着」
			CASE 2
				PRINTFORMW 「披萨想要切成五份该怎么切啊」
			CASE 3
				PRINTFORMW 「昨天妖精再传奇怪的言论，有点好奇」
			CASE 4
				PRINTFORMW 「地狱的钱能不能在地上花啊」
			CASE 5
				PRINTFORMW 「有没有什么次世代的恶作剧方法」
			CASE 6
				PRINTFORMW 「下一个技能该学什么呢」
			CASE 7
				PRINTFORMW 「友人大人到底是怎样看皮斯的呢」
			CASEELSE
				PRINTFORMW 「我在主人的心中，评价有没有变高呢」
			ENDSELECT
		ENDIF
	CASE 1
		;▼玩遊戲［一緒に玩遊戲］
		;※[幼稚]持ちのみ
		;TFLAG:193,1=大いに盛り上がる,-1=あまり盛り上がらない
		;PRINTFORMW
	CASE 2
		;▼吃飯［一緒に吃飯する］
		;TFLAG:193,-1=MASTERはお腹が空いてなかった
		PRINTFORML 「%CALLNAME:MASTER%一起来吃呀？」
		IF TFLAG:193 == -1
			PRINTL
			PRINTFORML 「……诶、吃不下了？」
			PRINTFORMW 「吃不下不吃也没关系啦～」
		ELSE
			;RAND;8は仕様
			SELECTCASE RAND:8
			CASE 1
				PRINTFORMW 「替我吃蔬菜哦♪」
			CASE 2
				PRINTFORMW 「%CALLNAME:MASTER%喜欢吃什么？」
			CASE 3
				PRINTFORMW 「据说一起吃饭菜会变得更好吃～♪」
			CASE 4
				PRINTFORMW 「嗯ー、这个%CALLNAME:MASTER%吃了不会出问题吗……」
			CASE 5
				PRINTFORMW 「要来点蛋黄酱吗～♪」
			CASE 6
				PRINTFORMW 「%CALLNAME:MASTER%喜欢吃甜的还是辣的？」
			;稍微確率高め
			CASEELSE
				PRINTFORMW 「一起吃一起吃ー♪」
			ENDSELECT
		ENDIF
	CASE 3
		;▼つまみ食い［一緒につまみ食い］
		;※[妖精]持ちと露米亜、恋、幽幽子、紫苑のみ
		;TFLAG:193,-1=MASTERはお腹が空いてなかった
		PRINTFORML 「呼呼，这样一来%CALLNAME:MASTER%也是共犯了」
		IF TFLAG:193 == -1
			PRINTL
			PRINTFORML 「……诶、吃不下了？」
			PRINTFORMW 「就算不吃也别想着一个人先跑哦！」
		ELSE
			;純狐邸
			IF M_KOJO_K111_HOUSE(CFLAG:[[克勞恩皮絲]]:現在位置)
				SELECTCASE RAND:8
				CASE 1
					PRINTFORMW 「啊、鱼肉肠！ 我超喜欢这个～❤」
				CASE 2
					PRINTFORMW 「这点心好高级的样子！ 吃掉的话绝对会被骂的……」
				CASE 3
					PRINTFORMW 「完了！ 这保质期都过了……」
				CASE 4
					PRINTFORMW 「点心点心～♪」
				CASE 5
					PRINTFORMW 「唔～…、只有干货……」
				CASE 6
					PRINTFORMW 「诶，是应急食品」
				CASE 7
					PRINTFORMW 「这个上面写了主人大人的名字，吃掉的话大概会被杀掉吧」
				CASEELSE
					PRINTFORMW 「这个大概是奖励我的甜点吧！预支一下应该不会说什么吧♪」
				ENDSELECT
			;それ以外
			ELSE
				SELECTCASE RAND:8
				CASE 1
					PRINTFORMW 「啊、鱼肉肠！ 我超喜欢这个～❤」
				CASE 2
					PRINTFORMW 「哦哦っ！发现了高级的甜点！」
				CASE 3
					PRINTFORMW 「完了！ 这保质期都过了……」
				CASE 4
					PRINTFORMW 「点心点心～♪」
				CASE 5
					PRINTFORMW 「唔～…、只有干货……」
				CASE 6
					PRINTFORMW 「诶，是应急食品」
				CASE 7
					PRINTFORMW 「呼呼♪ 这上面居然还特意写了名字～♪」
				CASEELSE
					PRINTFORMW 「发现了超贵重的甜点！」
				ENDSELECT
			ENDIF
		ENDIF
	CASE 4
		;▼掃除［掃除を手伝う］
		;※[掃除係]持ちまたは汚臭耐性-1以下のみ
		;PRINTFORMW
	CASE 5
		;▼運動［一緒に運動する］
		;※[音楽知識]持ちは除く（演奏になる）
		SELECTCASE RAND:8
		CASE 1
			PRINTFORML 「%CALLNAME:MASTER%也来吗？」
			PRINTFORMW 「现在開始计数了哦，可不要做到一半放弃了♪」
		CASE 2
			PRINTFORML 「%CALLNAME:MASTER%也来吗？」
			PRINTFORMW 「替我记一下数哦，别给我少记了♪」
		CASE 3
			PRINTFORML 「%CALLNAME:MASTER%也来吗？」
			PRINTFORMW 「我要向你射击了哦，可要好好躲開了♪」
		CASE 4
			PRINTFORML 「%CALLNAME:MASTER%也来吗？」
			PRINTFORMW 「激光要来了哦，你可以从上面或者下面穿过去♪」
		CASE 5
			PRINTFORML 「%CALLNAME:MASTER%、看我翻个跟头！」
			PRINTFORMW 「嘿、嘿、哈！！ 怎样？我厉害吗～！」
		CASE 6
			PRINTFORML 「%CALLNAME:MASTER%做得到吗？」
			PRINTFORMW 「嘿、嘿、这种事情做得到吗？！」
		CASE 7
			PRINTFORML 「做点运动舒展一下身体～」
			PRINTFORMW 「呼っ、呼っ、%M_KOJO_K111_AUTO("喘ぎ：小", "！")% 身体热起来了！」
		CASEELSE
			PRINTFORML 「要伸展一下？我来推你一把好了」
			PRINTFORML 「了解！！嘿！！」
			PRINTL
			PRINTFORMDW 腰骨差点被按断了……
		ENDSELECT
	CASE 6
		;▼読書［本の感想を聞く］
		;TFLAG:193,-1=集中していて返事してくれない
		;PRINTFORMW
	CASE 7
		;▼料理［料理を手伝う］→［料理を分けてもらう］
		;TFLAG:193,2=料理を手伝う,0=作った料理を食べる,-1==MASTERはお腹が空いてなかった（食べる時）
		;PRINTFORMW
	CASE 8
		;▼演奏［セッションする］or［伴奏する］
		;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
		;TALENT:音楽知識,1=演奏してる,2=歌ってる,3=踊ってる
		;TFLAG:193,1=ノリノリ,0=成功,-1=失敗,-2=楽器がなくて見てるだけ
		;PRINTFORMW
	CASE 9
		;▼採集［採集を手伝う］
		PRINTFORML 「来帮忙吗？ 谢谢ー！」
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「这次是在找这种形状的草……」
		CASE 2
			PRINTFORMW 「刚刚明明在这附近看到的～……」
		CASE 3
			PRINTFORMW 「……这是什么？垃圾吗？」
		CASE 4
			PRINTFORMW 「……这只是石头吧！」
		CASE 5
			PRINTFORMW 「妖精可是很擅长做这种事的！」
		CASE 6
			PRINTFORMW 「两人来做的话效率就是两倍♪」
		CASE 7
			PRINTFORMW 「……啊！ 就是这个！ 干得漂亮！」
		CASEELSE
			PRINTFORMW 「%CALLNAME:MASTER%很擅长这个嘛？」
		ENDSELECT
	CASE 10
		;▼釣魚［一緒に釣魚］
		;TFLAG:193,-1=釣魚竿がなくて見てるだけ
		PRINTFORML 「%CALLNAME:MASTER%也来吗？」
		IF TFLAG:193 == -1
			SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「…只是看着吗？ 唔哇，搞得我好紧张～」
			CASE 2
				PRINTFORMW 「…只是看着吗？ 只是看着多没意思？」
			CASE 3
				PRINTFORMW 「…只是看着吗？ 那我就不给你玩了哦？」
			CASEELSE
				PRINTFORMW 「…只是看着吗？ 要买根钓竿吗？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:8
			CASE 1
				PRINTFORMW 「我不会输哦ー！」
			CASE 2
				PRINTFORMW 「那钓到更多鱼的那方算获胜哦！」
			CASE 3
				PRINTFORMW 「那先钓到的那方就算获胜哦！」
			CASE 4
				PRINTFORMW 「那钓到鱼更大的那方算获胜哦！」
			CASE 5
				PRINTFORMW 「那钓到鱼更稀有的那方算获胜哦！」
			CASE 6
				PRINTFORML 「边唱歌边钓鱼！」
				PRINTFORMW 「哼哼——哼——♪」
			CASE 7
				PRINTFORMW 「往哪儿出杆比较好呢？」
			CASEELSE
				PRINTFORMW 「一个人等很无聊吧～」
			ENDSELECT
		ENDIF
	CASE 11
		;▼実験［実験を手伝う］
		;PRINTFORMW
	CASE 12
		;▼のんびり［一緒にのんびりする］
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「一起捣鼓仪器吧～～♪」
		CASE 2
			PRINTFORMW 「%CALLNAME:MASTER%，说点有趣的～」
		CASE 3
			PRINTFORML 「这样一来ー……」
			PRINTFORMW 「……地狱亡者游戏就完成了♪」
		CASE 4
			PRINTFORMW 「啦啦啦♪ 啦啦啦♪ 啦啦♪」
		CASE 5
			;某歌詞です。意味はありません。
			PRINTFORMW 「风儿飞♪ 鸟儿飞♪」
		CASE 6
			PRINTFORML 「不错不错，就是这样子ー」
			PRINTFORMW 「看来这段时间的努力没有白费～♪」
		CASE 7
			PRINTFORML 「呼啊～……」
			PRINTFORMW 「……这大概就是所谓『WB/SB』？」
		CASEELSE
			PRINTFORMW 「唔，没有在磨洋工哦！」
		ENDSELECT
	CASE 13
		;▼晩酌［晩酌に交手］
		;※酒耐性0以上のみ
		PRINTFORML 「嘿、%CALLNAME:MASTER%也要来一杯吗？」
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「呼呼呼、你这小屁孩也学坏了！」
		CASE 2
			PRINTFORMW 「%CALLNAME:MASTER%喜欢喝怎样的酒啊ー？」
		CASE 3
			PRINTFORMW 「欸嘿嘿嘿ー♪ 我很中意这款酒～♪」
		CASE 4
			PRINTFORMW 「还要继续哦～～♪」
		CASE 5
			PRINTFORMW 「快点快点，喝下去喝下去♪」
		CASE 6
			PRINTFORMW 「加油♪ 干了♪ 干了♪」
		CASE 7
			PRINTFORMW 「不拼酒啦～♪ 只是为了心情好些～♪」
		CASEELSE
			PRINTFORMW 「嗯嗯、在地狱喝得最多的是啤酒哦？」
		ENDSELECT
	CASE 14
		;▼買い物［買い物を手伝う］
		;PRINTFORMW
	CASE 15
		;▼説教［様子をうかがう］
		;※神霊・蓬莱人は除く
		;TFLAG:193,-1
		;PRINTFORMW
	CASE 16
		;▼落とし穴［いたずらに交手］or［様子をうかがう］
		;※三月精・琪露諾・克勞恩皮絲のみ
		;それ以外は落ちる側
		;PRINTFORMW
	CASE 17
		;▼雪だるま作り［一緒に雪作り］
		;※冬之月のみ
		SELECTCASE RAND:8
		CASE 1
			PRINTFORML 「%CALLNAME:MASTER%也一起来吧♪」
			PRINTFORMW 「来比谁堆得大吧！」
		CASE 2
			PRINTFORML 「%CALLNAME:MASTER%也一起来吧♪」
			PRINTFORMW 「来做超大雪人吧ー！」
		CASE 3
			PRINTFORML 「%CALLNAME:MASTER%也一起来吧♪」
			PRINTFORMW 「手好像被火烧了一样发红，但其实是冻出来的！」
		CASE 4
			PRINTFORML 「%CALLNAME:MASTER%也来帮忙吧？」
			PRINTFORMW 「因为要做五层、%CALLNAME:MASTER%就帮忙做下面三层吧！」
		CASE 5
			PRINTFORML 「%CALLNAME:MASTER%也来帮忙吧？」
			PRINTFORMW 「我去找做脸的部分、%CALLNAME:MASTER%先把雪球滚好哦！」
		CASE 6
			PRINTFORML 「%CALLNAME:MASTER%也来帮忙吧？」
			PRINTFORMW 「手好冷，可以伸到%CALLNAME:MASTER%的衣服里取暖吗！」
		CASE 7
			PRINTFORML 「唔……雪人该做怎样的表情啊ー？」
			PRINTFORMW 「虽然想做一个苦闷的表情，但怎么都做不好」
		CASEELSE
			PRINTFORML 「地上的雪人大多都是两个球的？」
			PRINTFORMW 「照理说球越多才越厉害吧」
		ENDSELECT
	CASE 18
		;▼炬燵でのんびり［炬燵でくつろぐ］
		;※冬之月のみ
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「%CALLNAME:MASTER%！脚碰到了啦！」
		CASE 2
			PRINTFORML 「呜呜……、上半身还是好冷……」
			PRINTFORMW 「想要全身都钻进去……」
		CASE 3
			PRINTFORMW 「恩哼哼～、好暖哦♪」
		CASE 4
			PRINTFORMW 「还是好冷…就不能再加大点火力吗」
		CASE 5
			PRINTFORMW 「%CALLNAME:MASTER%、递我个橘子」
		CASE 6
			PRINTFORML 「%CALLNAME:MASTER%也挤进来地方就太小了啦！」
			PRINTFORMW 「这里是我的领地哦！ 过去过去！」
		CASE 7
			PRINTFORML 「想乌龟一样趴着……」
			PRINTFORMW 「还是说蜗牛？ 干劲全被吸走了啦」
		CASEELSE
			PRINTFORML 「%CALLNAME:MASTER%、%CALLNAME:MASTER%～、快来快来」
			PRINTFORMW 「欸嘿嘿～、碰到了谁的脚哦！」
		ENDSELECT
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;402,就寝（添い寝時）
;==================================================
@M_KOJO_MESSAGE_COM_K111_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K111_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORMW 「……晚安、%CALLNAME:MASTER%……」
	;満足フラグ
	IF TCVAR:111:355
		;苦肉の策
		IF TIME < 480
			CFLAG:111:1001 = DAY - 1
		ELSE
			CFLAG:111:1001 = DAY
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;403,休憩
;==================================================
@M_KOJO_MESSAGE_COM_K111_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_403_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF CFLAG:111:睡眠
		PRINTFORMW 「嘶呀……」
	ELSE
		;疲れてる
		IF BASE:[[克勞恩皮絲]]:気力 <= MAXBASE:[[克勞恩皮絲]]:気力 / 2 || BASE:[[克勞恩皮絲]]:体力 <= MAXBASE:[[克勞恩皮絲]]:体力 / 2
			PRINTFORML 「呼～…累了～……」
			PRINTFORMW 「要一起睡一会儿吗……」
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%还累吗？」
			PRINTFORMW 「感觉有点无聊了……」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会に外出
;==================================================
@M_KOJO_MESSAGE_COM_K111_405
;外出にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K111_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTL
	CALL M_KOJO_COLOR_K111
	IF !CFLAG:111:同行
	ELSE
		IF TALENT:111:恋慕
			PRINTFORMW 「约会喽♪♪」
		ELSE
			PRINTFORMW 「逛街♪ 逛街♪」
		ENDIF
		SELECTCASE DATENAME_PLACE()
		CASE "博麗神社"
			PRINTFORMW 「不错诶，那里有不少我的朋友♪」
		CASE "命蓮寺"
			PRINTFORMW 「没怎么去过寺庙玩过诶～」
		CASE "人間之里"
			PRINTFORMW 「去购物吧，还想去吃团子了～」
		CASE "霧之湖～紅魔館"
			IF TALENT:[[克勞恩皮絲]]:恋慕
				IF DAY:2 == 2
					PRINTFORMW 「哦ー！ 夏天果然就该去游泳嘛！」
				ELSEIF DAY:2 == 4
					PRINTFORMW 「要去那么冷的地方！？太疯狂了！」
				ELSE
					PRINTFORMW 「不是很喜欢去湖边、但陪%CALLNAME:MASTER%一起的话也不是不行♪」
				ENDIF
			ELSE
				PRINTFORMW 「不是很喜欢去湖边诶」
			ENDIF
		CASE "迷途竹林"
			PRINTFORMW 「是在花田那边吧，我认识哦～♪」
		CASE "魔法之森"
			PRINTFORMW 「%CALLNAME:MASTER%也知晓森林的魅力吗？」
		CASE "三途之川～冥界"
			IF TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%要去那里？♪」
			ELSE
				PRINTFORMW 「哦哦？ 要一起去地狱吗？ 虽说想法不错但建议不要这么做哦？」
			ENDIF
		CASE "妖怪之山 (山麓)"
			PRINTFORMW 「呀吼、远足？ 远足？」
		CASE "妖怪之山 (山頂)"
			IF GROUPMATCH(MAIN_MAP, 7, 9, 10)
				PRINTFORMW 「呀吼、远足？ 远足？」
			ELSE
				PRINTFORMW 「咦？ %CALLNAME:MASTER%不需要登山杖吗？ 不错嘛」
			ENDIF
		CASE "地底"
			PRINTFORMW 「%CALLNAME:MASTER%要和我一起参观旧地狱啊～♪」
		CASE "夢之世界～月"
			PRINTFORMW 「哦？ 要回家吗？ 静海可是广阔有宁静的好地方」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;==================================================
@M_KOJO_MESSAGE_COM_K111_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止 || CFLAG:111:睡眠
	ELSEIF CFLAG:111:诶嘿嘿
		PRINTFORMW 「は？ 掃除？ 意味分かんなーい！」
	ELSE
		IF ABL:[[克勞恩皮絲]]:親密 >= 6
			IF TALENT:MASTER:清掃中毒 || ABL:MASTER:清掃技能 >= 6
				PRINTFORML 「呜哇っ！ 变态掃除\@ TALENT:MASTER:性別 == 1 ? 女 # 男 \@！」
				PRINTFORMW 「眼神真可怕～！」
			ELSEIF ABL:MASTER:清掃技能 >= 4
				IF OUTROOF(CFLAG:MASTER:現在位置) && DAY:2 == 4
					PRINTFORML 「%CALLNAME:MASTER%很喜欢雪吧ー」
					PRINTFORMW 「我也喜欢像这样堆雪人」
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%还真喜欢打扫卫生ー」
					PRINTFORMW 「反正也不是坏事？ 我就负责弄弄乱好了」
				ENDIF
			ELSE
				IF OUTROOF(CFLAG:MASTER:現在位置) && DAY:2 == 4
					PRINTFORML 「呜ー、好不容易才堆积起来的ー？」
					IF TFLAG:193
						PRINTFORMW 「我来帮忙啦」
					ELSE
						PRINTFORMW 「我去旁边堆雪人哦」
					ENDIF
				ELSE
					PRINTFORML 「好不容易才弄得那么有艺术感，要整理掉了吗ー？」
					IF TFLAG:193
						PRINTFORMW 「我来帮忙啦」
					ELSE
						PRINTFORMW 「我去弄乱另一边好了」
					ENDIF
				ENDIF
			ENDIF
		ELSE
			IF OUTROOF(CFLAG:MASTER:現在位置) && DAY:2 == 4
				PRINTFORML 「扫雪吗？」
			ELSE
				PRINTFORML 「要打扫吗？」
			ENDIF
			;地位が低いのでほぼ手伝う
			IF TFLAG:193
				PRINTFORMW 「很勤劳呢，我来帮忙啦」
			ELSE
				PRINTFORMW 「不错不错ー」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;==================================================
@M_KOJO_MESSAGE_COM_K111_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF TALENT:111:恋慕
		PRINTFORML 「♪同意进行战斗！%CALLNAME:MASTER%准备接招吧♪」
		PRINTFORML 「不会手下留情所以要小心哦！」
	ELSE
		PRINTFORML 「你能躲開我发狂般的弹幕吗！？」
	ENDIF
	SELECTCASE RAND:3
	CASE 1
		PRINTFORMW 「接招！ 獄符『Star and Stripe』！！」
	CASE 2
		PRINTFORMW 「堕落吧！ 地獄『Graze Inferno』！！」
	CASEELSE
		PRINTFORMW 「去吧！ 獄符『Striped Abyss』！！」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;412,学习
;==================================================
@M_KOJO_MESSAGE_COM_K111_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF CFLAG:111:睡眠
	ELSE
		PRINTFORML 「诶ー、学习太无聊了啦ー」
		PRINTFORMW 「去外面玩吧ー」
	ENDIF
ENDIF
RETURN 1
;==================================================
;413,料理
;==================================================
@M_KOJO_MESSAGE_COM_K111_413
;料理にTRAIN_MESSAGEは実質無い
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && DISH_ASSI == 111
	CALL M_KOJO_COLOR_K111
	SELECTCASE DISHNAME
	CASE "漢堡", "阿比斯汉堡", "逆汉堡"
		;すでに覚えてても最初の一回目は表示する
		IF DISHNAME == "阿比斯汉堡" && FIRSTTIME("阿比斯汉堡")
			PRINTFORML 「诶？ 有什么特殊的料理可以交给你？」
			PRINTFORMW 「那我就传授给你我的家乡地狱独有的、主人最爱的地狱汉堡好了☆」
			PRINTL
			PRINTFORMW 「具体食材的话…肉、芝士、香料、……」
			PRINTFORMW 「还有这个、这个、这个也不必多说肯定要？ 这个也不例外！」
			PRINTFORMW 「不要蔬菜！ 但蔬菜狂热者会疯掉吧，我加点植物油就当有蔬菜了」
			PRINTL
			PRINTFORML 「好了，接下来把它们全部堆叠在一起就完成了！」
			PRINTFORML 「怎样？ 学会了吗？」
		ELSE
			;漢堡フラグ
			IF TCVAR:111:356
				PRINTFORML 「诶！？要做汉堡吗！？」
				IF TALENT:111:恋慕
					PRINTFORML 「欸嘿嘿、%CALLNAME:MASTER%真是了解我喜欢什么～❤」
					PRINTFORML 「一起做吧♪」
				ELSEIF TALENT:111:思慕
					PRINTFORML 「%CALLNAME:MASTER%真了解我的喜好～！」
					PRINTFORML 「既然如此我也来帮个忙吧！」
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%想法很不错哦！」
					PRINTFORML 「我也来帮忙！」
				ENDIF
			ELSE
				PRINTFORML 「怎么怎么？ 在做汉堡吗？」
				PRINTFORML 「挺好的呀！ 我也来帮忙吧！」
			ENDIF
			IF DISHNAME == "阿比斯汉堡"
				WAIT
				PRINTFORMW 「哦っ！ 阿比斯汉堡吗？ 不错嘛！」
				PRINTFORMW 「材料在这里……」
				PRINTFORML 「只要把这些全部堆起来～」
				PRINTFORML 「当然食材的堆叠顺序可是关键哦！」
			ELSE
				IF ABL:111:料理技能 >= 1
					SELECTCASE RAND:4
					CASE 1
						PRINTFORML 「对了！ 来做个芝士汉堡吧！」
						DISH_TASTE += "乳酪/"
						TCVAR:111:357 = 1
					CASE 2
						PRINTFORML 「对了！ 来做个辣堡吧！」
						DISH_TASTE += "香料/辣/"
						TCVAR:111:357 = 2
					CASE 3
						;阿比斯汉堡は実装されたのでエッグバーガーに
						PRINTFORML 「对了！ 但做个鸡蛋汉堡吧！」
						DISH_TASTE += "卵/甜/"
						TCVAR:111:357 = 3
					CASEELSE
							IF ABL:111:料理技能 >= 3
								PRINTFORML 「对了！ 来做个亮晶晶汉堡吧！」
								DISH_TASTE += "闪耀/辣/"
								TCVAR:111:357 = 4
							ELSE
								;落空了
							ENDIF
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	CASE "儿童午餐", "红魔馆午餐"
		PRINTFORML 「再给孩子们做午餐吗！」
		PRINTFORML 「旗！ 做旗刺吧！」
	CASE "曲奇"
		PRINTFORML 「做蛋糕吧！？」
		PRINTFORML 「我也来帮忙！！」
		PRINTW
		PRINTFORML 「这里画个主人，这里画个友人大人！」
		TCVAR:111:357 = 1
		IF TALENT:111:恋慕 && !RAND:8
			PRINTFORML 「啊っ！ 嗯……这部分的话…就画%CALLNAME:MASTER%吧……」
			TCVAR:111:357 = 2
		ENDIF
		PRINTFORML 「怎么样？ 很像吧？」
	CASE "三色地狱肉松盖饭"
		PRINTFORML 「啊っ！ 这是三色地狱味增饭！」
		PRINTFORML 「我也来帮忙～！」
	CASEELSE
		IF DISH_TYPE == "甜点"
			SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「啊！ 做了点心吗！」
			CASE 2
				PRINTFORML 「在做点心吗？」
			CASEELSE
				PRINTFORML 「做点心了吗！？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「做饭了吗！」
			CASE 2
				PRINTFORML 「做了饭吗？」
			CASEELSE
				PRINTFORML 「在做饭吗？」
			ENDSELECT
		ENDIF
		SELECTCASE RAND:5
		CASE 1
			PRINTFORML 「让我也试试！」
		CASE 2
			PRINTFORML 「我也想做！」
		CASE 3
			PRINTFORML 「我也来帮忙～！」
		CASE 4
			PRINTFORML 「我来帮你啦！」
		CASEELSE
			IF TALENT:[[克勞恩皮絲]]:思慕 || TALENT:[[克勞恩皮絲]]:恋慕
				PRINTFORML 「一起做吧ー♪」
			ELSEIF DISH_TYPE == "甜点"
				PRINTFORML 「方向交给我做吧！」
			ELSE
				PRINTFORML 「只是稍微帮一下而已哦！」
			ENDIF
		ENDSELECT
	ENDSELECT
	PRINTW
	;野菜を抜く
	;去掉蔬菜的処理は本体側に移動しました
	;主人が抜いてようが表示されるのは仕様ってことで
	IF STRCOUNT(DISH_TASTE, "去掉蔬菜的/")
		PRINTFORML 「姆っ！ 这里面放了蔬菜欸……」
		PRINTFORML 「不全挑出去就不吃了！」
	ENDIF
	;野菜入り去掉蔬菜的（？）だといけないので
	IF STRCOUNT(DISH_TASTE, "漢堡") && TCVAR:111:356
		PRINTFORML 「哇哦！　挺好吃的嘛～！」
		PRINTFORML 「快吃快吃♪ 会好好吃完的吧？ 一点不剩地全都要吃掉哦？？」
	;禁断の料理
	ELSEIF STRCOUNT(DISH_TASTE, "跳蛋")
		PRINTFORML 「看上去是不错的料理……、呜哇、这什么啊？」
		PRINTFORML 「真的能吃吗……？」
	ELSE
		IF ABL:111:料理技能 >= 3
			SELECTCASE RAND:4
			CASE 1
				PRINTFORML 「做好啦っ♪」
				PRINTFORML 「哇哦！ 看着相当有食欲～！」
			CASE 2
				PRINTFORML 「只要我稍微认真一下就能搞定～」
				PRINTFORML 「怎样，味道也没得说吧？」
			CASE 3
				PRINTFORMW 「做好啦！ 夸夸我夸夸我！」
				PRINTDW 　　巴拉巴拉
				PRINTFORML 「诶嘿♪」
			CASEELSE
				PRINTFORML 「完成啦！ 比想象中要简单」
				PRINTFORML 「我的料理水平也进步了不少吧？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
			CASE 1
				PRINTFORML 「呼ー、累了……」
				PRINTFORML 「料理还真是件难事……」
			CASE 2
				PRINTFORML 「这样做？」
				PRINTFORML 「不加一些神秘的味道进去吗？」
			CASE 3
				PRINTFORML 「做好啦～！ 这样已经算完成了吧！」
				PRINTFORML 「尝了一下味道也不错哦」
			CASEELSE
				PRINTFORML 「已经结束了吗？」
				PRINTFORML 「不加一些神秘的味道进去吗？」
			ENDSELECT
		ENDIF
	ENDIF
	WAIT
ENDIF
RETURN 1
;==================================================
;414,吃飯
;==================================================
@M_KOJO_MESSAGE_COM_K111_414
IF GROUPMATCH(DISHNAME, "银吉獣料理")
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K111_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_414_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:111:睡眠
	CALL M_KOJO_COLOR_K111
	SELECTCASE DISHNAME
	CASE "興奮劑高湯"
		ALIGNMENT CENTER
		PRINTFORMW 「是兴奋剂汤哦……」
		PRINTFORMW 「哼哼，能抓到我的话就尽管来试试吧……？」
		ALIGNMENT LEFT
		PRINTL
		PRINTFORML 「咦？ 今刚才发生了什么奇怪的事吗？」
		RETURN 1
	CASE "银吉獣料理"
		PRINTFORMDW 这是什么？
		PRINTFORMW 「银吉獣料理」
		PRINTFORMDW 材料是？
		PRINTFORML 「银吉獣」
		RETURN 1
	CASE "漢堡", "阿比斯汉堡", "逆汉堡"
		IF DISH_ASSI == [[克勞恩皮絲]]
			;漢堡のアレンジ
			SELECTCASE TCVAR:[[克勞恩皮絲]]:357
			;乳酪
			CASE 1
				PRINTFORML 「芝士汉堡果然是王道～」
			;香料
			CASE 2
				PRINTFORML 「哇ー、超级辣啊～」
			;エッグ
			CASE 3
				PRINTFORML 「偶尔加个流心鸡蛋也是极好的～」
			;フェアリー
			CASE 4
				PRINTFORML 「欸嘿嘿～❤ 很可爱吧！」
			CASEELSE
				SELECTCASE DISHNAME
				CASE "阿比斯汉堡"
					PRINTFORML 「靓粉与瑰蓝的奇妙色调组合！」
					PRINTFORML 「仿佛要吞噬地狱一般的灾难！」
					PRINTFORML 「这就是阿比斯汉堡哦！」
				CASE "逆汉堡"
					PRINTFORML 「嗯？这个汉堡看起来好奇怪？」
					PRINTFORML 「但味道倒是不错！」
				;（他の）漢堡
				CASEELSE
					PRINTFORML 「之前吃过很多次哦～」
				ENDSELECT
			ENDSELECT
			;漢堡食べたいフラグ
			IF TCVAR:[[克勞恩皮絲]]:356
				PRINTFORML 「谢谢%CALLNAME:MASTER%ー❤」
				EXP:[[克勞恩皮絲]]:愛情経験 ++
			ENDIF
		ELSE
			;漢堡食べたいフラグ
			IF TCVAR:[[克勞恩皮絲]]:356
				PRINTFORML 「诶！？ 要做汉堡吗！？」
				IF TALENT:111:恋慕
					PRINTFORML 「欸嘿嘿、好棒棒～❤」
				ELSEIF TALENT:111:思慕
					PRINTFORML 「再好不过了～！」
				ELSE
					PRINTFORML 「一直以来误会你了！」
				ENDIF
				PRINTFORML 「谢谢%CALLNAME:MASTER%ー❤」
				EXP:111:愛情経験 ++
			ELSE
				PRINTFORML 「诶！ 给我做汉堡吃吗？」
				PRINTFORML 「哇！ 太感谢啦～♪」
			ENDIF
		ENDIF
		PRINTFORML 「開动了哦」
		PRINTW
		IF DISHNAME == "阿比斯汉堡"
			PRINTFORMW 「嗯～！！ 好吃的舌头都想伸出来了～！」
		;香料
		ELSEIF TCVAR:[[克勞恩皮絲]]:357 == 2
			PRINTFORMW 「啊ー！ 这个辣辣的味道，太美妙了～♪」
		;エッグ
		ELSEIF TCVAR:[[克勞恩皮絲]]:357 == 3
			PRINTFORMW 「恩哼哼～！ 甜甜的好好吃～♪」
		;フェアリー
		ELSEIF TCVAR:[[克勞恩皮絲]]:357 == 4
			PRINTFORMW 「嗯～♪ 味道好棒！」
		;其他
		ELSE
			PRINTFORMW 「嗯～♪ 这味道真让人上瘾！」
		ENDIF
		;日記を書く
		CALL M_KOJO_DIARYSETTING_K111(21)
		;ここで返す
		TCVAR:111:356 = 0
		TCVAR:111:357 = 0
		RETURN 1
	CASE "炸薯条", "炸魚＆薯條"
		IF DISH_ASSI == [[克勞恩皮絲]]
			PRINTFORMW 「好、今日来做%M_KOJO_K111_FLAVOR_POTATO()%吧」
		ELSE
			PRINTFORMW 「哦っ！ 给我做的薯条吗！？ 谢谢ー！」
			PRINTFORMW 「那%M_KOJO_K111_FLAVOR_POTATO()%也拜托你了哦」
		ENDIF
		PRINTFORML 「開动了哦」
	CASE "唐揚鸡"
		PRINTFORML 「这是炸鸡吧？ 和炸鸡有什么不同吗？」
	CASE "炒麺"
		PRINTFORMW 「地狱里是没有这种食物的ー」
		PRINTFORML 「我们找个摊位去卖肯定大赚～」
	CASE "儿童午餐", "红魔馆午餐"
		IF DISH_ASSI == [[克勞恩皮絲]]
			PRINTFORML 「欸嘿嘿～♪ 这个旗子插上去像不像月亮～？」
			PRINTFORML 「再来造个环形山♪」
		ELSE
			PRINTFORMW 「这旗土死了！ 用我的这个！」
		ENDIF
		PRINTFORML 「開动了哦♪」
	CASE "小蛋糕", "巧克力蛋糕", "派", "可丽饼"
		IF DISH_ASSI == [[克勞恩皮絲]]
			PRINTFORMW 「開动了哦♪」
		ELSE
			PRINTFORMW 「哇、是蛋糕！ 给我的吗！？ 谢谢～♪」
		ENDIF
		PRINTFORMW 「啊、%CALLNAME:MASTER%脸上沾到奶油了！」
		IF TALENT:[[克勞恩皮絲]]:思慕 || TALENT:[[克勞恩皮絲]]:恋慕
			PRINTFORML 　舔
			PRINTFORML 「欸嘿嘿、好甜♪」
			IF TALENT:[[克勞恩皮絲]]:恋人 || (TALENT:[[克勞恩皮絲]]:恋慕 && !RAND:10)
				WAIT
				PRINTFORMW 「%CALLNAME:MASTER%的脸上还有奶油啦～」
				PRINTFORML 「我来帮%CALLNAME:MASTER%擦掉」
			ENDIF
		ELSE
			PRINTFORML 　涂涂抹抹
			PRINTFORML 「呀哈哈♪奶油到处都是喽♪」
		ENDIF
	CASE "曲奇"
		IF DISH_ASSI == [[克勞恩皮絲]]
			;你の曲奇
			IF TCVAR:[[克勞恩皮絲]]:357 == 2
				PRINTFORML 「%CALLNAME:MASTER%的蛋糕ー、好不好吃呢？」
				PRINTFORMW 「要把%CALLNAME:MASTER%吃掉吗了」
			ELSE
				IF CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[赫喀提亞]]:現在位置
					PRINTFORML 「主人快看！ 主人形状的蛋糕做好了哦！」
					PRINTFORMW 「花了好长时间才做好的♪」
				ELSEIF CFLAG:[[克勞恩皮絲]]:現在位置 == CFLAG:[[純狐]]:現在位置
					PRINTFORML 「友人大人快看！ 友人大人形状的蛋糕做好了哦！」
					PRINTFORMW 「花了好长时间才做好的♪」
				ELSE
					PRINTFORML 「做了主人和友人大人的蛋糕，怎样，很可爱吧！」
				ENDIF
			ENDIF
		ELSE
			PRINTFORML 「啊！ 是蛋糕！」
			PRINTFORML 「给我的吗？ 谢谢～♪」
		ENDIF
		PRINTFORML 「開动了哦♪」
	CASE "布丁", "青蛙布丁"
		PRINTFORML 「欸嘿嘿嘿，布丁好可爱～❤」
		PRINTFORML 「開动了哦♪」
	CASE "芭菲", "天界水果芭菲", "人鱼芭菲"
		PRINTFORML 「哇哦，好奢华的芭菲！」
		PRINTFORML 「開动了哦♪」
	CASE "苹果糖"
		IF DISH_ASSI == [[克勞恩皮絲]]
			IF GROUPMATCH(FESTIVAL(), "聖誕節", "聖誕節イブ", "萬聖節")
				PRINTFORML 「果然少不了%FESTIVAL()%～！」
			ELSEIF FESTIVAL() != ""
				PRINTFORML 「果然节日就该吃这个～！」
			ELSE
				PRINTFORML 「果然节日庆典少不了这个～」
			ENDIF
		ELSE
			PRINTFORML 「哇哦，苹果味的派！」
		ENDIF
		PRINTFORML 「開动了哦♪」
	CASE "万圣节蛋糕"
		IF STRCOUNT(DISH_TASTE, "过季/")
			IF DISH_ASSI == [[克勞恩皮絲]]
				PRINTFORML 「万圣节蛋糕？现在不到日子呢！」
			ELSE
				PRINTFORML 「诶？ 今天是万圣节吗，OMG」
			ENDIF
		ELSE
			IF DISH_ASSI == [[克勞恩皮絲]]
				;無
			ELSE
				PRINTFORML 「哦！ 万圣节蛋糕！」
			ENDIF
		ENDIF
		PRINTFORML 「耶耶！ 万圣节快乐♪」
	CASE "圣诞蛋糕"
		IF STRCOUNT(DISH_TASTE, "过季/")
			IF DISH_ASSI == [[克勞恩皮絲]]
				PRINTFORML 「圣诞节蛋糕？现在不到日子呢！」
			ELSE
				PRINTFORML 「诶？ 今天是圣诞节吗，OMG」
			ENDIF
		ELSE
			IF DISH_ASSI == [[克勞恩皮絲]]
				;無
			ELSE
				PRINTFORML 「哦！ 圣诞节蛋糕！！」
			ENDIF
		ENDIF
		PRINTFORML 「耶耶！ 圣诞快乐♪」
	CASE "三色地狱肉松盖饭"
		IF DISH_ASSI == [[克勞恩皮絲]]
			PRINTFORMW 「这个以前主人经常做给我吃哦～」
		ELSE
			PRINTFORMW 「啊!这是三色地狱盖饭」
		ENDIF
		PRINTFORML 「開动了哦♪」
	CASEELSE
		VARSET LOCAL
		LOCAL:1 = STRCOUNT(DISH_TASTE, "質素/")
		LOCAL:2 = STRCOUNT(DISH_TASTE, "豪華/")
		LOCAL:3 = STRCOUNT(DISH_TASTE, "芸術的/")
		LOCAL:4 = STRCOUNT(DISH_TASTE, "野趣/")
		LOCAL:5 = STRCOUNT(DISH_TASTE, "豪快/")
		LOCAL:6 = STRCOUNT(DISH_TASTE, "怪诞/")
		LOCAL:7 = STRCOUNT(DISH_TASTE, "闪耀/")
		FOR LOCAL, 1, 10
			SIF LOCAL:LOCAL
				LOCAL:10 ++
		NEXT
		;以上都不是
		IF !LOCAL:10
			IF DISH_TYPE == "甜点"
				PRINTFORML 「哇♪ 是甜点ー！」
			ELSE
				PRINTFORML 「哇！ 是饭诶ー！」
			ENDIF
		ELSE
			;シャッフルして最初にヒットしたやつ
			CALL FISHER_YATES_SHAFFLE(10)
			FOR LOCAL, 1, 10
				SIF !SHAFFLE_ARRAY:LOCAL
					CONTINUE
				IF LOCAL:(SHAFFLE_ARRAY:LOCAL)
					SELECTCASE SHAFFLE_ARRAY:LOCAL
					;質素
					CASE 1
						PRINTFORML 「还不错的料理」
					;豪華
					CASE 2
						PRINTFORML 「哦哦！ 好豪华！」
					;芸術的
					CASE 3
						PRINTFORML 「哦哦！ 简直是艺术品吧！」
					;野趣
					CASE 4
						PRINTFORML 「哦～！ 这料理还挺有趣的！」
					;豪快
					CASE 5
						PRINTFORML 「哦～！ 透露着豪爽气息的料理！」
					;怪诞
					CASE 6
						PRINTFORML 「哦っ、奇形怪状的料理！」
					;闪耀
					CASE 7
						PRINTFORML 「哇～！ 闪闪发光的神奇料理ー！」
					ENDSELECT
					BREAK
				ENDIF
			NEXT
		ENDIF
		PRINTFORML 「我開动了哦\@ DISH_TYPE == "甜点" ? ♪ # \@」
	ENDSELECT
	PRINTW
	;▼ここから感想＝＝＝＝＝＝＝＝＝＝
	IF STRCOUNT(DISH_TASTE, "心跳味/") || STRCOUNT(DISH_TASTE, "未知の味/")
		PRINTFORML 「嗯嗯っ！？」
		PRINTFORMW 「什么嘛，有股神秘的味道！？」
		IF TCVAR:[[克勞恩皮絲]]:料理評価値 >= 650
			PRINTFORMW 「嗯ー…这个味道不错哦～♪」
		ELSEIF TCVAR:[[克勞恩皮絲]]:料理評価値 >= 500
			PRINTFORMW 「嗯嗯…算不上讨厌……」
		ELSE
			PRINTFORMW 「唔っ……难吃死了……」
		ENDIF
	ELSEIF TCVAR:[[克勞恩皮絲]]:料理評価値 < 650
		VARSET LOCAL
		LOCAL:1 = STRCOUNT(DISH_TASTE, "野菜/")
		LOCAL:2 = STRCOUNT(DISH_TASTE, "简易/")
		LOCAL:3 = STRCOUNT(DISH_TASTE, "酸/")
		LOCAL:4 = STRCOUNT(DISH_TASTE, "健康/")
		LOCAL:5 = STRCOUNT(DISH_TASTE, "淡白/")
		FOR LOCAL, 1, 10
			SIF LOCAL:LOCAL
				LOCAL:10 ++
		NEXT
		;以上都不是
		IF !LOCAL:10
			IF TCVAR:[[克勞恩皮絲]]:料理評価値 < 500
				PRINTFORMW 「呸ー、我讨厌这个！」
			ELSE
				PRINTFORMW 「唔、还可以吧」
			ENDIF
		ELSE
			;シャッフルして最初にヒットしたやつ
			CALL FISHER_YATES_SHAFFLE(10)
			FOR LOCAL, 1, 10
				SIF !SHAFFLE_ARRAY:LOCAL
					CONTINUE
				IF LOCAL:(SHAFFLE_ARRAY:LOCAL)
					SELECTCASE SHAFFLE_ARRAY:LOCAL
					;野菜
					CASE 1
						PRINTFORML 「呸呸呸ー！ 怎么加了蔬菜啊……」
						PRINTFORMW 「我不需要这个、%CALLNAME:MASTER%自己吃吧！」
					;简易
					CASE 2
						PRINTFORMW 「唔嗯、太清淡了，不合胃口…」
					;酸
					CASE 3
						PRINTFORML 「唔，太酸了……」
						PRINTFORMW 「不喜欢这个味道……」
					;健康
					CASE 4
						PRINTFORML 「唔嗯、过于健康了吧！」
						PRINTFORMW 「多来点刺激味蕾的味道啊！」
					;淡白
					CASE 5
						PRINTFORMW 「……无聊的味道，没劲……」
					ENDSELECT
					BREAK
				ENDIF
			NEXT
		ENDIF
	ELSE
		VARSET LOCAL
		LOCAL:1 = STRCOUNT(DISH_TASTE, "香料/")
		LOCAL:2 = STRCOUNT(DISH_TASTE, "乳酪/")
		LOCAL:3 = STRCOUNT(DISH_TASTE, "甜/")
		LOCAL:4 = STRCOUNT(DISH_TASTE, "辣/")
		LOCAL:5 = STRCOUNT(DISH_TASTE, "垃圾/")
		LOCAL:6 = STRCOUNT(DISH_TASTE, "濃厚/")
		LOCAL:7 = STRCOUNT(DISH_TASTE, "软糯的/")
		FOR LOCAL, 1, 10
			SIF LOCAL:LOCAL
				LOCAL:10 ++
		NEXT
		;以上都不是
		IF !LOCAL:10
			IF TCVAR:[[克勞恩皮絲]]:料理評価値 >= 850
				PRINTFORMW 「嗯～～！ 好吃！！ 再来点再来点♪」
			ELSEIF TCVAR:[[克勞恩皮絲]]:料理評価値 >= 750
				PRINTFORMW 「嗯～～！ 这个味道超棒！」
			ELSE
				PRINTFORMW 「嗯～！ 很好吃哦～！」
			ENDIF
		ELSE
			;シャッフルして最初にヒットしたやつ
			CALL FISHER_YATES_SHAFFLE(10)
			FOR LOCAL, 1, 10
				SIF !SHAFFLE_ARRAY:LOCAL
					CONTINUE
				IF LOCAL:(SHAFFLE_ARRAY:LOCAL)
					SELECTCASE SHAFFLE_ARRAY:LOCAL
					;香料
					CASE 1
						PRINTFORMW 「嗯～♪ 辣辣的味道真棒！」
					;乳酪
					CASE 2
						PRINTFORMW 「嗯～♪ 起司的味道好棒～♪」
					;甜
					CASE 3
						PRINTFORMW 「嗯～♪ 好吃❤」
					;辣
					CASE 4
						PRINTFORMW 「恩哼哼～♪ 辣辣的好好吃！」
					;垃圾
					CASE 5
						PRINTFORMW 「恩哼哼～♪ 是不健康的美味！」
					;濃厚
					CASE 6
						PRINTFORMW 「嗯！ 好浓厚的味道～！」
					;软糯的
					CASE 7
						PRINTFORMW 「恩哼哼～♪ 黏糊糊的超好吃～❤」
					ENDSELECT
					BREAK
				ENDIF
			NEXT
		ENDIF
	ENDIF
	TCVAR:111:356 = 0
	TCVAR:111:357 = 0
ENDIF
RETURN 1

;どうでもいいフレーバーポテトの味,ちなみにどれも美味い
@M_KOJO_K111_FLAVOR_POTATO
#FUNCTIONS
SELECTCASE RAND:9
CASE 1
	RETURNF "焦がしバター醤油"
CASE 2
	RETURNF "濃厚じゃがバタ"
CASE 3
	RETURNF "チキンコンソメ"
CASE 4
	RETURNF "コク旨ＢＢＱ"
CASE 5
	RETURNF "メープルバター"
CASE 6
	RETURNF "ハバネロチリ番茄"
CASE 7
	RETURNF "濃厚トリプル乳酪"
CASE 8
	RETURNF "陽だまりコンポタージュ"
CASEELSE
	RETURNF "プレーン"
ENDSELECT
;==================================================
;415,招待吃飯
;==================================================
@M_KOJO_MESSAGE_COM_K111_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:111:睡眠
	;414,吃飯を呼ぶ
	CALL M_KOJO_MESSAGE_COM_K111_414_1
ENDIF
RETURN 1
;;==================================================
;;416,演奏(凍結中？
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_416
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_416_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_416_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;417,午睡をする
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_417
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_417_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_417_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;421,祈願する
;==================================================
@M_KOJO_MESSAGE_COM_K111_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORMW 「ご主人様に直接頼めばいいのに～」
ENDIF
RETURN 1
;==================================================
;431,在浴室里放鬆
;==================================================
@M_KOJO_MESSAGE_COM_K111_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF BATHCHECK(CFLAG:MASTER:現在位置)
		;事後
		IF TCVAR:[[克勞恩皮絲]]:355
			PRINTFORML 「呼ー！ 这下清爽了ー！」
			IF !RAND:5
				PRINTFORMW 「……%CALLNAME:MASTER%、小穴又想吃肉棒了啦？❤」
			ELSE
				PRINTFORMW 「再做下去要被主人说了啦ー❤」
			ENDIF
		ELSE
			SELECTCASE RAND:5
			CASE 1
				PRINTFORML 「来玩互相按摩的游戏吧！」
				PRINTFORMW 「会变得很舒服哦！」
			CASE 2
				PRINTFORML 「欸嘿嘿～…」
				PRINTFORMW 「太舒服了把颓废的自己完全赶走了～…」
			CASE 3
				PRINTFORML 「咕噜咕噜咕噜……哈啊」
				PRINTFORMW 「……%CALLNAME:MASTER%来比赛憋气吧？」
			CASE 4
				PRINTFORML 「哈ー♪」
				PRINTFORMW 「皮斯冲锋～❤」
			CASEELSE
				PRINTFORML 「地上的浴室实在太舒服了～～」
				PRINTFORMW 「地狱里那种设施让人完全没去洗澡的欲望」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;440,等待
;==================================================
@M_KOJO_MESSAGE_COM_K111_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_440_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_440_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTDATAL
		DATAFORM 「在做什么呢ー？」
		DATAFORM 「%CALLNAME:MASTER%ー？」
		DATAFORM 「♪～」
		DATAFORM 「呼哇哇……」
	ENDDATA
	WAIT
ENDIF
RETURN 1
;;==================================================
;;441,聽課(慧音専用？
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_441
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_441_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_441_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;442,伐採
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_442
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_442_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_442_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;;==================================================
;;445,採集
;;TFLAG:193(採集物のID, 0=『何も見つからなかった…』
;;TFLAG:194(今回採集した個数
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_445
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_445_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_445_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;
;;※※※※※※※※※※※※※※※※※※※※※※※※※
;;约会系指令
;;※※※※※※※※※※※※※※※※※※※※※※※※※
;[SKIPSTART]
;;現状未実装
;;==================================================
;;600,约会会話
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_600
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_600_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_600_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;
;;==================================================
;;601,约会身体接觸
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_601
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_601_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_601_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;
;;==================================================
;;602,约会接吻
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_602
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_602_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_602_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;[SKIPEND]
;==================================================
;603,牽手
;==================================================
@M_KOJO_MESSAGE_COM_K111_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	SELECTCASE RAND:7
	CASE 1
		PRINTFORMW 「为了不走散好好抓住我的手哦！」
	CASE 2
		PRINTFORMW 「%CALLNAME:MASTER%！ 往这儿走♪」
	CASE 3
		PRINTFORMW 「牵着手儿♪」
	CASE 4
		PRINTFORML 「好像在约会一样♪」
		PRINTFORMW 「冲吧aibo！千万别松開我的手哦～！」
	CASE 5
		PRINTFORMW 「哼哼哼～哼♪」
	CASE 6
		PRINTFORMW 「も～、%CALLNAME:MASTER%は手つないでいないとすぐどっか行っちゃうからなぁ」
	CASEELSE
		IF TALENT:[[克勞恩皮絲]]:恋人
			PRINTFORML 「呀哈っ♪」
			PRINTFORML 「这是恋人会做的事吧？」
			PRINTFORMW 「看来我的选择是正确的♪」
		ELSEIF TALENT:MASTER:恋人
			PRINTFORML 「这是恋人会做的事吧？」
			PRINTFORMW 「呼呼っ♪ 有种背德的感觉～♪」
		ELSE
			PRINTFORML 「这是恋人会做的事吧？」
			PRINTFORMW 「哼哼っ♪ 那我们来做一日的恋人吧♪」
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;;==================================================
;;604,散步
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_604
;;散步にはTRAIN_MESSAGEが無い
;CALL M_KOJO_MESSAGE_COM_K111_604_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_604_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;605,繞道
;==================================================
@M_KOJO_MESSAGE_COM_K111_605
;繞道にはTRAIN_MESSAGEが無い
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_605_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_605_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	;たまにUFO
	IF M_KOJO_K111_EARTH(CFLAG:[[克勞恩皮絲]]:現在位置) && OUTROOF(CFLAG:[[克勞恩皮絲]]:現在位置) && !RAND:12
		;朝～夕方はUFO
		IF INRANGE(TIME, 360, 1080)
			PRINTFORMW 「快看！ 有ＵＦＯ！ OーMーG！」
			PRINTL
			SELECTCASE RAND:13
			CASE 1, 2
				PRINTFORMDW 哎呦我O！！ 真是ＵＦＯ！！
			CASE 3, 4
				PRINTFORMDW ……这只是条内裤而已罢，不知是哪个女孩子的。
			CASE 5, 6, 7
				PRINTFORMDW ……是人类在天上飞。
			CASE 8, 9, 10
				PRINTFORMDW ……只是妖怪吧。
			CASEELSE
				PRINTFORMDW ……那只之鸟吧。
			ENDSELECT
		;夜は鬼火
		ELSE
			PRINTFORMW 「快看那边！ 是鬼火！」
			PRINTL
			SELECTCASE RAND:13
			CASE 1, 2
				PRINTFORMDW 那是ＵＦＯ吧！！ 大新闻啊！！
			CASE 3, 4
				PRINTFORMDW ……居然是发光的胖次，是被裤裆发光的人穿过吗。
			CASE 5, 6, 7
				PRINTFORMDW ……确实是鬼火诶，真是稀奇的景象。
			CASE 8, 9, 10
				PRINTFORMDW ……看着像幽灵吧。
			CASEELSE
				PRINTFORMDW ……应该是弹幕在飞。
			ENDSELECT
		ENDIF
	ELSE
		;克勞恩皮絲は人生遠回り
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「那边好像有什么在飞！」
		CASE 2
			PRINTFORMW 「那是什么啊？」
		CASE 3
			PRINTFORMW 「啦啦啦♪」
		CASE 4
			PRINTFORMW 「那边好像有什么哦！？」
		CASE 5
			PRINTFORML 「嗅嗅……」
			PRINTFORMW 「有好闻的味道从那边飘过来～」
		CASE 6
			PRINTFORMW 「这边才是正确的路吧，干嘛绕远～」
		CASE 7
			PRINTFORMW 「好！就朝着棍子倒下的方向走吧！」
		CASEELSE
			PRINTFORMW 「那边有什么？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;610,請吃飯
;==================================================
@M_KOJO_MESSAGE_COM_K111_610
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORMD %CALLNAME:MASTER%和%CALLNAME:TARGET%再
	SELECTCASE CFLAG:[[克勞恩皮絲]]:現在位置
	CASE 商家町
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMD 餐馆
		CASE 2
			PRINTFORMD 荞麦店
		CASEELSE
			PRINTFORMD 饭馆
		ENDSELECT
	CASE 竹林入口
		PRINTFORMDL 在米斯提亚的小摊
	CASE 中有之道
		PRINTFORMD 在道脇の屋台
	CASE 旧地獄街道
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMD 在地底茶屋
		CASE 2
			PRINTFORMD 在妖怪喫茶
		CASEELSE
			PRINTFORMD 在地獄料理店
		ENDSELECT
	ENDSELECT
	IF CFLAG:[[克勞恩皮絲]]:現在位置 == 竹林入口
		PRINTFORMDL 吃八目鰻
	ELSE
		SELECTCASE TIME
		CASE 240 TO 599
			PRINTFORMDL 吃早饭
		CASE 600 TO 839
			PRINTFORMDL 吃午饭
		CASE 840 TO 1019
			PRINTFORMDL 吃午饭
		CASE 1020 TO 1199
			PRINTFORMDL 吃下午茶
		CASE 1200 TO 1440
			PRINTFORMDL 吃晚饭
		CASEELSE
			PRINTFORMDL 吃夜宵
		ENDSELECT
	ENDIF
	PRINTW
	PRINTFORMW 「哇偶，吃饭吃饭～♪」
	PRINTL
	IF TFLAG:SELECTCOM的分岐 == 1
		PRINTFORML 「嗯嗯っ！ 这家店的料理是真不错～♪」
		PRINTFORMW 「啊っ！ %CALLNAME:MASTER%的看起来很好吃，快给我来一口❤」
		PRINTL
		PRINTFORMDW 克劳恩皮斯一脸满足的样子
	ELSEIF TFLAG:SELECTCOM的分岐 == -1
		PRINTFORML 「嗯咕…！ 这份料理……全是蔬菜难吃的要命……」
		PRINTFORMW 「剩下的就交给%CALLNAME:MASTER%了……」
		PRINTL
		PRINTFORMDW ……克劳恩皮斯显然不是很想吃…
	ELSE
		SELECTCASE CFLAG:[[克勞恩皮絲]]:現在位置
		CASE 商家町
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「哼哼、人里的人类都是在这吃饭的啊～」
			CASE 2
				PRINTFORML 「啊、这个看起来很好吃！ 唔嗯、这个看起来也不错」
				PRINTFORMW 「呜哇都想吃！ 都想吃怎么办啊！」
			CASEELSE
				PRINTFORML 「还以为地上的料理会低级很多」
				PRINTFORMW 「没想到味道出人意料的好嘛～」
			ENDSELECT
		CASE 竹林入口
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「哦～、这个是叫七鳃鳗吗～」
			CASE 2
				PRINTFORMW 「七鳃鳗是什么来着？」
			CASEELSE
				PRINTFORMW 「嗯！好吃！ 再来一份！」
			ENDSELECT
		CASE 中有之道
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「像庙会一样，好有趣～♪」
			CASE 2
				PRINTFORMW 「呜～姆…每个摊位的东西感觉都很好吃啊～」
			CASEELSE
				PRINTFORMW 「嘿诶～、地狱的经济也能这样维持吗」
			ENDSELECT
		CASE 旧地獄街道
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「这代也挺热闹的嘛～♪」
			CASE 2
				PRINTFORMW 「哦、好辣！ 这就是地狱的滋味吗」
			CASEELSE
				PRINTFORMW 「虽说是旧地狱，但有好多合我口味的食物诶～！」
			ENDSELECT
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;;==================================================
;;613,賺錢
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_613
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_613_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_613_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1
;==================================================
;614,採購食材
;==================================================
@M_KOJO_MESSAGE_COM_K111_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_614_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && FLAG:约会的对象 == 111
	CALL M_KOJO_COLOR_K111
	IF FIRSTTIME(SELECTCOM)
		PRINTFORMW 「吼吼ー、这就是地上的商店啊ー」
	ELSE
		PRINTDATAL
			DATAFORM 「买东西买东西♪ 买东西♪」
			DATAFORM 「买这个买这个ー！」
			DATAFORM 「买什么好呢？」
			DATAFORM 「买甜点买甜点！」
		ENDDATA
		WAIT
	ENDIF
ENDIF
RETURN 1
;==================================================
;615,吃便當
;==================================================
@M_KOJO_MESSAGE_COM_K111_615
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_615_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORML 「当当当！我做了便当哦！」
	PRINTL
	PRINTFORMDL %CALLNAME:MASTER%享用了克劳恩皮斯做的便当
	PRINTW
	IF TFLAG:SELECTCOM的分岐 == -1
		PRINTFORMDW ……明显混入了奇怪的味道……
	ELSEIF TFLAG:SELECTCOM的分岐 == 1
		PRINTFORMDW 非常好吃！ \@ ABL:111:料理技能 >= 5 ? 简直是大厨水平…… # \@
	ELSEIF ABL:111:料理技能 == 5
		PRINTFORMDW 很美味！ 肯定能成为一位好妻子……
	ELSEIF ABL:111:料理技能 == 4
		PRINTFORMDW 美很美味！ 可以感受到里面的爱情……
	ELSEIF ABL:111:料理技能 == 3
		PRINTFORMDW 还不错　想每天都吃到这份美味
	ELSEIF ABL:111:料理技能 == 2
		PRINTFORMDW 味道还不错
	ELSEIF ABL:111:料理技能 == 1
		PRINTFORMDW 可以感觉到已经很努力了，但这味道还是稍微……
	ELSE
		PRINTFORMDW ……嗯……有点难以说明的味道……
	ENDIF
	PRINTL
	IF TFLAG:SELECTCOM的分岐 == -1
		PRINTFORMW 「今天我偷偷放了蛋糕巧克力和糖果♪ 有尝出来吗ー？」
	ELSEIF TALENT:111:恋慕
		PRINTFORMW 「下次约会的时候也会做给你吃哦❤」
	ELSE
		PRINTFORMW 「那个……味道还可以吗……\/\/\/」
	ENDIF
	PRINTL
	SIF TFLAG:SELECTCOM的分岐 == 1
		PRINTFORMDW %CALLNAME:MASTER%与%CALLNAME:TARGET%谈笑间度过了愉快的时光
ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;==================================================
@M_KOJO_MESSAGE_COM_K111_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	SELECTCASE RAND:3
	CASE 1
		PRINTFORMW 「嗯～♪ 这个四方的果冻真好吃～♪」
	CASE 2
		PRINTFORMW 「这里的团子真是美味～♪」
	CASEELSE
		PRINTFORMW 「哇♪ 团子团子～♪」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;618,花屋
;==================================================
@M_KOJO_MESSAGE_COM_K111_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_618_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && FLAG:约会的对象 == 111
	CALL M_KOJO_COLOR_K111
	PRINTFORMW 「%CALLNAME:MASTER%、要写种子回去种吗？」
ENDIF
RETURN 1
;==================================================
;620,鈴奈庵
;==================================================
@M_KOJO_MESSAGE_COM_K111_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_620_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	DRAWLINE
	PRINTFORMW 「这里怎么全是书啊」
ENDIF
RETURN 1
;==================================================
;621,釣魚
;TFLAG:193(0=釣れない 1～4=魚 11～15=好吃的魚 610=木材 131=守矢之守札 21=跳蛋 609=氷之鱗 606=龍之爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K111_621
CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K111_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_621_1
#DIM CHARA
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文カットは危ないので廃止
IF LOCAL
	CALL M_KOJO_COLOR_K111
	SELECTCASE TFLAG:193
	;釣れない
	CASE 0
		IF TALENT:111:恋慕
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「啊～～没钓到～～っ！」
			CASE 2
				PRINTFORMW 「是不是这里没有鱼啊～♪」
			CASEELSE
				PRINTFORMW 「%CALLNAME:MASTER%、不太行嘛～」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「……好无聊ー！！」
			CASE 2
				PRINTFORMW 「……这个很有趣吗？」
			CASEELSE
				PRINTFORMW 「……什么都钓不到嘛……」
			ENDSELECT
		ENDIF
	;木片
	CASE 610
		IF TFLAG:194 > 1000
			PRINTFORMW 「快看！ 好像调到什么了！！」
			PRINTFORMW 「……姆～～！」
		ELSE
			PRINTFORMW 「呀哈哈哈！ 居然是木片～！」
		ENDIF
	;紙切れ
	CASE 131
		PRINTFORMW 「……？ 这是什么？？ 垃圾吗？」
	;青蛙
	CASE 700
		PRINTFORMW 「呀哈哈哈！ 青蛙ー！ 呱呱！ 」
	;跳蛋
	CASE 21
		IF TFLAG:194 > 1000
			PRINTFORMW 「嗯？ 这是……\/\/\/」
		ELSE
			PRINTFORML 「嗯？ 这是……」
			PRINTFORMW 「%CALLNAME:MASTER%是有多好色才能钓到这种东西啊～！」
		ENDIF
	CASEELSE
		SELECTCASE TFLAG:193
		CASE 1 TO 20, 22 TO 60
			LOCALS = %FISH_NAME(TFLAG:193)%
		CASEELSE
			LOCALS = %ITEMNAME:(TFLAG:193)%
		ENDSELECT
		SELECTCASE LOCALS
		CASE "氷之鱗", "龍之爪"
			PRINTFORMW 「这是什么ー！？ 好好看～～っ！！」
		CASE "龍涎香"
			PRINTFORMW 「这是什么、垃圾吗」
		CASE "食人魚"
			PRINTFORMW 「哦哦～食人鱼欸！ 」
		CASE "鰻魚", "八目鰻", "鲶魚"
			PRINTFORMW 「呀哈哈哈！滑溜溜的～！」
		CASEELSE
			IF LOCAL:1 >= 80
				PRINTFORMW 「哇哦！ 好大！！」
			ELSEIF INRANGE(TFLAG:193, 11, 20) || INRANGE(TFLAG:193, 24, 60)
				PRINTFORMW 「哦ー！ 好厉害！ 这可以吃吗？」
			ELSEIF TALENT:111:恋慕 || TALENT:111:思慕
				PRINTFORMW 「哇っ！ 好厉害！ 这是什么？？」
			ELSE
				PRINTFORMW 「哦ー！ 很能干吗！」
			ENDIF
		ENDSELECT
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;626,土産屋
;TFLAG:194(行動結果(-2=ひやかし -1=ウィンドウショッピング 1=400点未満（BAD） 2=～699点（NOMAL） 3=700点以上（GOOD）
;CFLAG:性格傾向による地の文分岐あり
;==================================================
@M_KOJO_MESSAGE_COM_K111_626
;高得点は地の文無
IF TFLAG:194 == 3
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K111_626_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_626_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:194
	;ひやかし
	CASE -2
		PRINTFORMW 「呀吼！ 被骂了哦ー！」
		PRINTFORMW 「%CALLNAME:MASTER%挑来拣去实在太慢了啦～」
	;果然還是放棄（見送り）
	CASE -1
		PRINTFORMW 「诶ー！ 好不容易来一次，什么都不买也太可惜了吧ー！？」
	;400点未満（BAD）
	CASE 1
		PRINTFORMW 「诶、要把这个送给我…？」
		PRINTFORMW 「哼ー……谢了……」
	;400点～699点（NOMAL）
	CASE 2
		PRINTFORMW 「诶！ 这个是买给我的吗！？」
		PRINTFORMW 「哇♪ 太感谢了ー！」
	;700点以上（GOOD）
	CASE 3
		;念の為RESULTSを避難させてリセット
		LOCALS:1 = %RESULTS%
		CALL GIFTNAME(TCVAR:[[克勞恩皮絲]]:今天的礼物, [[克勞恩皮絲]])
		LOCALS = %RESULTS%
		RESULTS = %LOCALS:1%
		IF !RAND:2
			PRINTFORMDL 克劳恩皮斯细细端详着【%LOCALS%】
			PRINTW
			PRINTFORMW 「哇…！ 真是好东西啊……」
			PRINTFORML 「%CALLNAME:MASTER%、可以买这个吗～」
			PRINTW
			PRINTFORMDL 被克劳恩皮斯纯粹诚恳的请求打动，%CALLNAME:MASTER%下决心掏钱购买。
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%、买这个吧ー」
			PRINTW
			PRINTFORMDW 克劳恩皮斯拿着【%LOCALS%】、蹦跳着向%CALLNAME:MASTER%跑来。
			PRINTFORMDL 要不要买呢
			PRINTW
			PRINTFORML 「%CALLNAME:MASTER%ー」
			PRINTW
			PRINTFORMDL %CALLNAME:MASTER%被克劳恩皮斯纯洁的笑容打动、下决心掏钱购买。
		ENDIF
		PRINTFORMDL %CALLNAME:MASTER%突然意识到或许对自己来说，克劳恩皮斯有比火把更加有效的武器
		PRINTW
		PRINTFORML 「哇！ 太感谢啦～♪」
		PRINTFORMW 「最喜欢%CALLNAME:MASTER%了ー❤」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;660,読書
;==================================================
@M_KOJO_MESSAGE_COM_K111_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORMW 「书？ 我看不懂啦、%CALLNAME:MASTER%读给我听」
ENDIF
RETURN 1
;==================================================
;698,進入房間
;==================================================
@M_KOJO_MESSAGE_COM_K111_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K111_698_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K111_698_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORMW 「请进♪」
	SIF FIRSTTIME("招待")
		PRINTFORMW 「虽说可能有些散乱、但%CALLNAME:MASTER%肯定会喜欢的♪」
	PRINTFORMD 克劳恩皮斯的房间里，
	;どんな部屋なんだろう……少なくともまともではなさそう
	;三月精でその一端が！（改造されてたけど）
	SELECTCASE RAND:3
	CASE 1
		PRINTFORMDW 满眼都是鲜艳的色彩，让人完全无法平静下来
	CASE 2
		PRINTFORMDW 到处都是来路不明的神秘道具散落在地，让人精神不起来
	CASEELSE
		PRINTFORMDW 像一个打翻了的玩具箱一样，是个不可思议的神秘空间
	ENDSELECT
ENDIF
RETURN 1
;;==================================================
;;699,外出
;;==================================================
;@M_KOJO_MESSAGE_COM_K111_699
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K111_699_1
;RETURN RESULT
;
;@M_KOJO_MESSAGE_COM_K111_699_1
;;-------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------------------------------------------
;IF LOCAL
;
;ENDIF
;RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;==================================================
@M_KOJO_MESSAGE_SCOM_K111_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K111_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K111_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	PRINTFORML 「痛的话要告诉我哦……」
	PRINTFORMW 「呼呼，感觉很有趣♪」
	IF TFLAG:193 == 1
		PRINTFORMW 「怎么样？ 舒服吗？」
	ELSEIF TFLAG:193 == -1
		PRINTFORMW 「啊！ 对不起……！」
	ENDIF
ENDIF
RETURN 1
;==================================================
;61,抱枕
;==================================================
@M_KOJO_MESSAGE_SCOM_K111_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K111_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K111_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
;	IF !CFLAG:111:睡眠
	PRINTFORMDW ぎゅっ
	SELECTCASE RAND:5
	CASE 1
		PRINTFORMW 「就这样一直抱到睡着吧……」
	CASE 2
		PRINTFORMW 「呼呼…这下可以安心睡觉了～……」
	CASE 3
		PRINTFORMW 「好温暖……」
	CASE 4
		PRINTFORMW 「嗯……要一直抱住我哦……」
	CASEELSE
		PRINTFORMW 「好舒服……」
	ENDSELECT
;	ENDIF
	;満足フラグ
	IF TCVAR:111:355
		;苦肉の策
		IF TIME < 480
			CFLAG:111:1001 = DAY - 1
		ELSE
			CFLAG:111:1001 = DAY
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;62,亲額頭
;==================================================
@M_KOJO_MESSAGE_SCOM_K111_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K111_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K111_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	ELSEIF CFLAG:111:睡眠
		PRINTFORMW 「啾啾ー……」
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		PRINTFORMW 「我呜……！」
	;接吻まだ
	ELSEIF FIRSTTIME("初吻", 1)
		PRINTFORMW 「呀っ\/\/\/ 呜、不要吓我啊\/\/\/」
	ELSE
		PRINTFORMW 「呀っ❤ 欸嘿嘿❤」
	ENDIF
ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;==================================================
@M_KOJO_MESSAGE_SCOM_K111_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K111_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K111_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;ほぼ接吻と同じ
IF LOCAL
	CALL M_KOJO_COLOR_K111
	IF FLAG:時間停止
	ELSEIF CFLAG:111:睡眠
		PRINTFORMW 「嗯姆……咕ぅ……」
	ELSEIF M_KOJO_K111_FUKIGEN([[克勞恩皮絲]])
		IF TALENT:111:恋慕
			PRINTFORMW 「姆っ……、呜ー！」
		ELSE
			PRINTFORMW 「嗯姆…………」
		ENDIF
	ELSE
		IF  TALENT:[[克勞恩皮絲]]:恋人
			CALL M_KOJO_K111_KISSSET("恋人")
		ELSEIF TALENT:[[克勞恩皮絲]]:恋慕
			CALL M_KOJO_K111_KISSSET("恋慕")
		ELSE
			CALL M_KOJO_K111_KISSSET("其他")
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;==================================================
@M_KOJO_MESSAGE_SCOM_K111_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K111_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K111_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K111
	SELECTCASE RAND:3
	CASE 1
		PRINTFORMW 「哇哇っ、等会等会%CALLNAME:MASTER%、手都要捏疼了ー」
	CASE 2
		PRINTFORMW 「啊っ、干嘛っ！？」
	CASE 3
		PRINTFORMW 「别拉着我啦っ！」
	ENDSELECT
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【111】クラウンピース/M_KOJO_K111_日常系コマンド.ERB