code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:反発刻印(3以上=会話不能)(4以上はバグ
;TCVAR:烂醉(1=通常成功or大失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_300
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_300
;指令共通メッセージ(TRAIN_MESSAGE)
;削除すると「～说着话。」とかが消えます。また、削除した場合は自動で口上色が付きません。
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K56_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋慕
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「哟，%CALLNAME:MASTER%。见到你很高兴」
			PRINTFORMW 和神子的距离总觉得很近……
		ELSEIF LOCAL == 1
			PRINTFORMW 「想要的什么东西都要得到。这是我的做法」
			PRINTFORMW 「你什么时候……能成为我的东西呢？」
			PRINTFORMW 神子把视线投向了%CALLNAME:MASTER%……
		ELSE
			PRINTFORMW 「永恒的生命，卓越的才能。对财富和名声，忠实的部下……」
			PRINTFORMW 「呵呵。现在的我，即使抛開一切，也有想要得到的东西」
			PRINTFORMW 神子把手靠近%CALLNAME:MASTER%的脸颊……
		ENDIF
	ELSEIF TALENT:思慕
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「我认为%CALLNAME:MASTER%适合当听众」
			PRINTFORMW 「在你面前不用太拘束，可以随便说。」
		ELSEIF LOCAL == 1
			PRINTFORMW 「……你能看见我的欲望吗？」
			PRINTFORMW 「呵呵。这种欲望连我自己都不能理解」
			PRINTFORMW 神子有深意地凝视着%CALLNAME:MASTER%……
		ELSE
			PRINTFORMW 「和你说话的时候，感觉很不可思议。」
			PRINTFORMW 「我想更了解你。请把一切都告诉我」
			PRINTFORMW 神子认真地听着%CALLNAME:MASTER%的话……
		ENDIF
	ELSEIF CFLAG:好感度 > 1000
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「……啊，是你啊」
			PRINTFORMW 「能听一下吗？昨天的演讲真够呛啊……」
			PRINTFORMW 听着神子的牢骚时间就过去了……
		ELSEIF LOCAL == 1
			PRINTFORMW 「呀，%CALLNAME:MASTER%。还是老样子」
			PRINTFORMW 「我吗？……嘛，偶尔休息以下也行吧」
			PRINTFORMW 神子轻飘飘的样子的……
		ELSE
			PRINTFORMW 「我们，好像说了很多呢」
			PRINTFORMW 「如果是你，有些话我就算没有被执政者的身份牵着鼻子也能说出来。」
			PRINTFORMW 「……可优秀的领导人，需要有应有的举止」
			PRINTFORMW 神子长叹了一口气……
		ENDIF
	ELSEIF CFLAG:好感度 > 500
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「这个头戴式耳机吗？这起到了抑制我罕见的听力的作用」
			PRINTFORMW 「不管怎么说，我的听力是世界第一的……不，我相信是宇宙第一的。相当累啊」
			PRINTFORMW 神子难得露出疲惫的神色……
		ELSEIF LOCAL == 1
			PRINTFORMW %CALLNAME:MASTER%，你想来当我的部下吗？
			PRINTFORMW 「执政在人。我想你一定能成为好部下」
		ELSE
			PRINTFORMW 「呀，是%CALLNAME:MASTER%。之后我想在背地里去演讲……」
			PRINTFORMW 「啊，好吧。你想和我说话吧？这可不能在丰聪耳前隐瞒住哟」
		ENDIF

	ELSEIF CFLAG:好感度 > 300
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「青娥殿下？啊，那的确是我的师傅……也是反面教材」
			PRINTFORMW 「她对人的生命毫不介意。与王道是不相容的」
		ELSEIF LOCAL == 1
			PRINTFORMW 「屠自古？这是我优秀的部下之一」
			PRINTFORMW 「有点急性子是瑕疵……家务活儿都交给他了」
		ELSE
			PRINTFORMW 「布都？那当然，忠诚心比别人多一倍」
			PRINTFORMW 「只是，稍微有点失控啊。我想我得扣上刹车了」
		ENDIF
	ELSEIF CFLAG:好感度 > 100
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「啊，%CALLNAME:MASTER%君。你在鼓励我吗？」
			PRINTFORMW 「有烦恼的话来我家道场就好。欢迎」
		ELSEIF LOCAL == 1
			PRINTFORMW 「我以前也是尊为圣德王的。」
			PRINTFORMW 「现在好像有人在低声私语说什么不在。可叹」
		ELSE
			PRINTFORMW 「你喜欢红色的还是蓝色的？」
			PRINTFORMW 「不，会成为明天的时装哦。要选择哪个斗篷呢？」
		ENDIF
	ELSE
		LOCAL = RAND:3
		IF LOCAL == 0
			PRINTFORMW 「呀，你是%CALLNAME:MASTER%……是吗？」
			PRINTFORMW 「呵呵呵。我擅长记住别人的名字」
		ELSEIF LOCAL == 1
			PRINTFORMW 「哦，你也想和我说话。」
			PRINTFORMW 「可以吧。再多一个人也没问题」
			PRINTFORMW 混在神子的包围中谈笑着……
		ELSE
			PRINTFORMW 「现在的幻想乡缺少绝对的领导人」
			PRINTFORMW 「我这丰聪耳神子才是领导者，是应该成为大人的存在……
			PRINTFORMW	 そうは思わないかな？」
			PRINTFORMW 神子的眼睛里寄宿着妖异的光芒……
		ENDIF
ENDIF
ENDIF
RETURN 1
;==================================================
;301,泡茶
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_301
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功

@M_KOJO_MESSAGE_COM_K56_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_301_1
RETURN RESULT

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

		PRINTFORMW 「以和为贵。茶之心是和之心」
		PRINTFORMW 「嗯，喝吧。多谢」
ENDIF
RETURN 1
;==================================================
;302,身体接觸
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_302
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
IF TALENT:恋慕
	;浴場
	IF BATHROOM(CFLAG:現在位置)
		IF RAND:2 == 0
			PRINTFORML %CALLNAME:MASTER%和神子一起泡在浴池里。
			PRINTFORMW 感觉平时的疲劳都融化了，彼此都变得開放起来。
			PRINTFORMW 隔着水面可以看到她那纤细的女性身体曲线、变得不能忍耐的%CALLNAME:MASTER%
			PRINTFORMW 若无其事地靠近身体，用手搂住腰，抚摸着那像桃子一样的臀部。
			PRINTFORMW 神子调皮地笑了笑，微微扭动了一下身体，没有再抵抗了。
			PRINTFORMW 这次顺着侧腹抱住了神子的肩膀，她靠近了%CALLNAME:MASTER%的胸板，投来热情的视线。
		ELSE
			PRINTFORMW 泡在浴池里放松的神子。
			PRINTFORMW %CALLNAME:MASTER%的眼睛被从水面露出的臀部给吸引住了。
			PRINTFORMW 忍不住向那毫无防备的后背伸出手，焦急地抚摸着神子丰满的臀部和下面那浅樱色的细缝。
			PRINTFORMW 「有点过分了、真是的……%UNICODE(0x2665)%」
		ENDIF
	ELSE
	IF RAND:8 == 0
		PRINTFORMW 神子把肩膀靠过来了……
		PRINTFORMW 「呵呵……。这样的话，你的心跳就会传递出来」
		PRINTFORMW 两个人度过了安静的时间……
	ELSEIF RAND:7 == 0
		PRINTFORMW 神子抓住了%CALLNAME:MASTER%的手……
		PRINTFORMW 「呵呵……你在和圣德王握手呢。要更加感激……」
		PRINTFORMW 就这样，神子细细品味着%CALLNAME:MASTER%手指的触感……
	ELSEIF RAND:6 == 0
		PRINTFORMW 神子慢慢地揉了揉%CALLNAME:MASTER%的前胸……
		PRINTFORMW 「…………」
		PRINTFORML 「……哈。没什么大的差别，是怎么回事呢……」
		PRINTFORMW 神子用手捂着胸口，咬着嘴唇……
	ELSEIF RAND:5 == 0
		PRINTFORMW 神子不自觉地抱住了%CALLNAME:MASTER%……
		PRINTFORMW 「……你的身体很硬朗呢。和我不一样」
		PRINTFORMW %CALLNAME:MASTER%就这样接受了神子……
	ELSEIF RAND:4 == 0
		PRINTFORMW 「…………」
		PRINTFORMW 神子静静地看着%CALLNAME:MASTER%……
		PRINTFORMW 「……这样的时间也真是太妙了」
	ELSEIF RAND:3 == 0
		PRINTFORMW 「呀，%CALLNAME:MASTER%。衣服上有脏东西」
		PRINTFORMW 神子装作要拿垃圾的样子对%CALLNAME:MASTER%胳肢胳肢起来！
		PRINTFORMW 「哈哈哈—！喂！无需反抗！」
	ELSEIF RAND:2 == 0
		PRINTFORMW 《%CALLNAME:MASTER%～……。我已经疲惫不堪了~~」
		PRINTFORMW 神子一看到%CALLNAME:MASTER%就挨上来……
	ELSE
		PRINTFORMW 「你累了吗？吃了这种仙药，很快就会有精神」
		PRINTFORMW 神子所举的丹上刻着姑娘们的印记……
	ENDIF
ENDIF
ELSEIF TALENT:思慕
		LOCAL = RAND:7
		IF LOCAL == 0
			PRINTFORMW 神子把肩膀靠过来了……
			PRINTFORMW 「呵呵……。这样的话，你的心跳就会传递出来」
			PRINTFORMW 两个人度过了安静的时间……
		ELSEIF LOCAL == 1
			PRINTFORMW 神子抓住了%CALLNAME:MASTER%的手……
			PRINTFORMW 「呵呵……你在和圣德王握手呢。要更加感激……」
			PRINTFORMW 就这样，神子细细品味着%CALLNAME:MASTER%手指的触感……
		ELSEIF LOCAL == 2
			PRINTFORMW 神子慢慢地揉了揉%CALLNAME:MASTER%的前胸……
			PRINTFORMW 「…………」
			PRINTFORML 「……哈。没什么大的差别，是怎么回事呢……」
			PRINTFORMW 神子用手捂着胸口，咬着嘴唇……
		ELSEIF LOCAL == 3
			PRINTFORMW 神子不自觉地抱住了%CALLNAME:MASTER%……
			PRINTFORMW 「……你的身体很硬朗呢。和我不一样」
			PRINTFORMW %CALLNAME:MASTER%就这样接受了神子……
		ELSEIF LOCAL == 4
			PRINTFORMW 「…………」
			PRINTFORMW 神子静静地看着%CALLNAME:MASTER%……
			PRINTFORMW 「……这样的时间也真是太妙了」
		ELSEIF LOCAL == 5
			PRINTFORMW 「呀，%CALLNAME:MASTER%。衣服上有脏东西」
			PRINTFORMW 神子装作要拿垃圾的样子对%CALLNAME:MASTER%胳肢胳肢起来！
			PRINTFORMW 「哈哈哈—！喂！无需反抗！」
		ELSEIF LOCAL == 6
			PRINTFORMW 《%CALLNAME:MASTER%～……。我已经疲惫不堪了~~」
			PRINTFORMW 神子一看到%CALLNAME:MASTER%就挨上来……
		ELSE
			PRINTFORMW 「你累了吗？吃了这种仙药，很快就会有精神」
			PRINTFORMW 神子所举的丹上刻着姑娘们的印记……
		ENDIF
ELSEIF CFLAG:好感度 > 300
		LOCAL = RAND:7
		IF LOCAL == 0
			PRINTFORMW 「呵呵呵。我看看你的欲望吧」
			PRINTFORMW 神子抬起%CALLNAME:MASTER%的下巴……
			PRINTFORMW 「啊？你对我抱有这样的欲望吗？很有趣」
		ELSEIF LOCAL == 1
			PRINTFORMW 「你知道我的衣服为什么是紫色吗？
			PRINTFORMW   冠位十二层中，最珍贵的颜色是紫色」
			PRINTFORMW   神子的衣服上镶嵌着非常高级的装饰……
		ELSEIF LOCAL == 2
			PRINTFORMW 神子窥视着%CALLNAME:MASTER%的眼睛……
			PRINTFORMW 「嗯，眼睛不错。是充满了欲望的人类眼睛。太棒了」
		ELSEIF LOCAL == 3
			PRINTFORMW 让我看了神子的剑……
			PRINTFORMW 「这是名为七圣剑的宝剑。如果拔出来，就会被耀眼的光芒吸引。」
			PRINTFORMW 「最近好像也有新的贤者在使用啊。真想见一次面啊」
		ELSEIF LOCAL == 4
			PRINTFORMW 我揉了揉神子的肩膀……
			PRINTFORMW 「呼，得救了。这个斗篷，意外的很重呢」
		ELSEIF LOCAL == 5
			PRINTFORMW 「呵呵。你真热心。呐、稍微给你開点窍吧……」
			PRINTFORMW 向神子请教了简单的道术……
		ELSEIF LOCAL == 6
			PRINTFORMW 让我看了神子的头戴式耳机……
			PRINTFORMW 「这是特订品。和字很帅吧？」
		ELSE
			PRINTFORMW 神子的睡癖解除了……
			PRINTFORMW 「喂，睡癖……？这个最棒的发型是……？」
		ENDIF
	ELSE
		LOCAL = RAND:2
		IF LOCAL == 0
			PRINTFORMW 「哎呀，怎么了？露出了欲望」
			PRINTFORMW 神子微微凝视着%CALLNAME:MASTER%……
		ELSE
			PRINTFORMW 「想碰触贵人……你似乎很有胆量」
			PRINTFORMW 神子严肃地凝视着%CALLNAME:MASTER%……
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,道歉
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_303
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_303_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;304,幫忙干活
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:沒法幫忙(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_SUCCESS_COM_K56_304
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =1

@M_KOJO_MESSAGE_COM_K56_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
ENDIF
ENDIF
RETURN 1
;==================================================
;305,索求膝枕
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:体型 > TALENT:体型 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:親密(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_SUCCESS_COM_K56_305
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;TFLAG:193(1=ABL:親密6以上かつ妊娠時 0=成功 -1=ABL:親密5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K56_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:恋慕(受け入れつつ笑顔でやり返す
	;ABL:親密(6以上=怯生生地やり返す
	;ABL:従順(5以上=されるがまま
;==================================================
@M_KOJO_SUCCESS_COM_K56_307
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:睡眠
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;陪睡中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_308
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;睡眠中
	IF CFLAG:睡眠
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;309,摸頭
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:親密(6以上=通常成功時分岐
;==================================================
@M_KOJO_SUCCESS_COM_K56_309
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:睡眠
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_331
;成否判定
;TFLAG:192(-2=強制失敗(注、非指令終了）、-1＝強制失敗、0=COM依存、1=強制成功or大成功(注、睡眠薬冰淇淋ティーは眠気を感じていると飲まない)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_331_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_333
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3
		;大成功
		CASE 2
		;成功
		CASE 1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,碰杯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:妊娠自覚状態(1=吃飯)
;TALENT:酒耐性(-2=吃飯)
;==================================================
@M_KOJO_SUCCESS_COM_K56_334
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_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_K56_335
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕
;ABL:親密(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:膝枕した)(44以下=失敗
;==================================================
@M_KOJO_SUCCESS_COM_K56_336
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_336_1
RETURN RESULT

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

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

ENDIF
RETURN 1
;==================================================
;351,帯出去
;==================================================
@M_KOJO_MESSAGE_COM_K56_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K56_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:同行 == 60
	PRINTFORMW 「可以吧。你会带我去哪里呢？」
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;FLAG:甲斐性無(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_352
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_352_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;353,猥褻
;FLAG:甲斐性無(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K56_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_353_1
RETURN RESULT

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

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

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

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

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

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

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

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

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

ENDIF
RETURN 1

;==================================================
;363,朗読（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:陪睡中(1=被窝orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_SUCCESS_COM_K56_363
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_363_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;402,就寝
;TFLAG:193(0=通常 1=兒童と一緒に川の字で寝る)
;==================================================
@M_KOJO_MESSAGE_COM_K56_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K56_402_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会
;条件が厄介なので、COMF405 外出.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K56_405
;外出にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K56_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGETと约会
	IF CFLAG:同行
	IF FIRSTTIME(SELECTCOM)
			PRINTFORMW 「哈哈哈！想和圣德王约会！」
			PRINTFORMW 「……呵呵，可以吧。看在你的心意上我陪你去」
		ELSE
		IF DATENAME_PLACE() == "博麗神社"
			PRINTFORMW 「去博丽神社吗？」
			PRINTFORMW 「那里的巫女有很多看点。顺便劝诱一下吧？」
		ELSEIF DATENAME_PLACE() == "命蓮寺"
			PRINTFORMW 「命莲寺，呢」
			PRINTFORMW 「和白莲那家伙怎么也合不来。」
		ELSEIF DATENAME_PLACE() == "人間之里"
			PRINTFORMW 「大概是人之里约会吧」
			PRINTFORMW 「呵呵，那就要注意打扮了。如果是我的话会暴露的」
		ELSEIF DATENAME_PLACE() == "霧之湖～紅魔館"
			PRINTFORMW 「听说红魔馆里住着年幼的恶魔。」
			PRINTFORMW 「说不定早晚会发生战斗呢。」
		ELSEIF DATENAME_PLACE() == "迷途竹林"
			PRINTFORMW 「那里的竹林到底是怎样的构造呢？」
			PRINTFORMW 「我想兴办一个测量事业」
			PRINTFORMW 屠自古很担心%CALLNAME:MASTER%的事……
		ELSEIF DATENAME_PLACE() == "魔法之森"
			PRINTFORMW 「魔法之森……幻想乡真的有很多地方呢」
			PRINTFORMW 「如果我也出生在西方的话，也许我不是道士，而是魔法使。」
		ELSEIF DATENAME_PLACE() == "三途之川～冥界"
			PRINTFORMW 「是要去三途之川吗？」
			PRINTFORMW 「虽然和死神关系不好……啊，有你在的话没问题吧」
		ELSEIF DATENAME_PLACE() == "妖怪之山 (山麓)"
			PRINTFORMW 「听说是恶鬼魍魉栖息的魔之山」
			PRINTFORMW 「哪个，要不要先扔石头呢？」
		ELSEIF DATENAME_PLACE() == "妖怪之山 (山頂)"
			PRINTFORMW 「守矢的技术对我来说也很有魅力。」
			PRINTFORMW 「顺便买卖……哦，对不起。是约会吧」
		ELSEIF DATENAME_PLACE() == "地底"
			PRINTFORMW 「地底……。不是很想靠近的地方」
			PRINTFORMW 「%CALLNAME:MASTER%，不要从我身边离開。一旦有事不能保护你」
		ELSEIF DATENAME_PLACE() == "夢之世界～月"
			PRINTFORMW 「啊，月……！很有趣，我想去一次」
			PRINTFORMW 「不是遣唐使而是遣月使吗？好好学习吧」
		ENDIF
ENDIF
ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:現在位置)(野外掃除（冬は扫雪
;==================================================
@M_KOJO_MESSAGE_COM_K56_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K56_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_411_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;412,学习
;ABL:教養(ABL:MASTER:教養より大=MASTERが教えてもらう ABL:MASTER:教養より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K56_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_412_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=甜点 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K56_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K56_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;414,吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:194(1=没穿内裤涮涮锅 2=禁断のメニュー 31=興奮劑高湯 30=奶酪番茄沙拉 34=银吉獣料理
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_SUCCESS_COM_K56_414
;成否判定
;TFLAG:192(-2=指令終了(非TARGET時強制失敗)、-1＝強制失敗、0=COM依存(非TARGET時強制成功)、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_414_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_SUCCESS_COM_K56_415
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_415_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;416,演奏
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:使用楽器(1=電子琴 2=鋼琴 3=吉他 4=小號 5=小提琴)
;==================================================
@M_KOJO_SUCCESS_COM_K56_416
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_416_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;417,午睡をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔に接吻された 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処or阴茎揉み
;CFLAG:陪睡中(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K56_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_417_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

;==================================================
;422～430は、特殊指令なので貂プレでは対応しません
;==================================================

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

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

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

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

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

@M_KOJO_MESSAGE_COM_K56_436_1
;==================================================
;440,等待
;==================================================
@M_KOJO_MESSAGE_COM_K56_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_440_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1

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

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

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

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K56_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_MESSAGE_COM_K56_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_602_1
RETURN RESULT

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

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,牽手
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗でもふりほどかれたりはしません
;==================================================
@M_KOJO_SUCCESS_COM_K56_603
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_603_1
RETURN RESULT

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1
;==================================================
;605,繞道
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_SUCCESS_COM_K56_605
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_605
;繞道にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K56_605_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;610,請吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K56_610
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_610_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;613,賺錢（オミットされました
;==================================================
@M_KOJO_SUCCESS_COM_K56_613
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_613_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_SUCCESS_COM_K56_617
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K56_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_617_1
RETURN RESULT

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

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

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

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

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;698,進入房間
;TARGET的房間に入る場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K56_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_698_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;699,外出
;==================================================
@M_KOJO_MESSAGE_COM_K56_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K56_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;前ターン膝枕後身体接觸指令
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_SUCCESS_SCOM_K56_60
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K56_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K56_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K56_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

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

ENDIF
RETURN 1
;==================================================
;62,亲額頭
;前ターン頭撫で後接吻
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:欲望(5以上=物足りない
;ABL:親密(5以上=照れる
;==================================================
@M_KOJO_SUCCESS_SCOM_K56_62
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K56_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K56_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K56_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;前ターン接吻後接吻
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_SUCCESS_SCOM_K56_63
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K56_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K56_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K56_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;约会出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_SCOM_K56_80
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K56_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K56_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K56_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【56】賑やかし神子Ver1.00/M_KOJO_K56_日常系コマンド.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【56】賑やかし神子Ver1.00/M_KOJO_K56_絶頂.ERB

license: unknown


code:
;  神子口上Ver1.00
;  作者：＜■■あき＞→＠NFWTKまたはeverandanons88@gmail.comまで
;  ＜改変した場合はここに改変者の名前・連絡先を追加する＞
;
;  枯れ木も山の賑わいと言うことで大祀廟勢の口上を揃えてみました
;  簡単な会話程度なら応答してくれますが、ﾈﾁｮは大体できません
;  未実装部分については、有志による追記を募集しています
;  其他文字色変更、分岐追加など……色々とお手伝い頂けるとと嬉しいです（Ver1.00/19/6/27)
;
;  ライセンス：
;  作者は以下で○をつけた行為について、誰でも無断で行えるものとし、違反しない限り許可を撤回しないものとします。
;    ○：常に許可　△：要相談、上記の作者と改変者全員に連絡が取れない場合は不許可　×：不許可、相談を受けても許可しない
;
;  +----+-----------------------------------+
;  | 口上の再配布                           |
;  +----+-----------------------------------+
;  | ○ | 単体での再UPロード            |
;  | ○ | 本体への同梱・口上まとめへの収録  |
;  +----+-----------------------------------+
;  | 再配布を許可する場合の改変             |
;  +----+-----------------------------------+
;  | ○ | 口上の加筆                        |
;  | ○ | 口上の改変・其他改変            |
;  +----+-----------------------------------+
;  | 其他                                 |
;  +----+-----------------------------------+
;  | ○ | 他の口上での利用                  |
;  | ○ | 他のeraバリアントでの利用         |
;  | ○ | era以外への流用                   |
;  | ○ | 翻訳・他言語版バリアントへの流用  |
;  | ○ | 商用利用・金銭のやり取りを伴う利用|
;  | ○ | 二次創作                          |
;  +----+-----------------------------------+
;  ・以下の行為に関しては上記と関係なく、無断で行えるものとします。
;    １：バグ・誤字脱字の修正・本体VerUpへの対応のための改変
;  ・以下の行為に関しては上記と関係なく、作者であっても禁止とします。
;    １：以下の例外を除き、この口上からライセンス文・添付文章（ファイル名を除く）の内容を変更・削除すること
;        ・次期バージョンから、ライセンスの○・△を×に変更すること
;        ・次期バージョンから、上記の作者と改変者全員の許可が那个ば、それ以外の変更も
;    ２：この口上が二次創作等の場合に、原作者が禁止を宣言している行為
;  ・改変者は自分の名前を削除することができ、それによりこの口上に関する一切の権利を放棄し、放棄できない権利について行使しないことを宣言したものとします。
;  ・この口上を使用したことによる損害等について、バリアント・口上の作者、改変者は一切の責任を負いません。

path: ERB/口上・メッセージ関連/個人口上/【56】賑やかし神子Ver1.00/ライセンス.txt


code:
;-------------------------------------------------
; eraTheWorld 4.576用 心口上（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;◇默认能力
;	戦闘能力4,音楽技能2,Ｃ感覚2,百合属性3
;	種族［付喪神］
;	性的特徴[処女][無接吻経験]
;	身体的特徴[Ｖ鈍感]
;	精神的特徴[坦率][老實][好奇心][一線超えない][喜歡引人注目][不在乎貞操][解放][不知羞恥][容易中毒]
;	技術的特徴[学習快][舞踏知識][音感]
;	其他[無知]
;	絶頂経験5,百合経験100,戦闘経験500,舞踏経験50
;
;◇コンセプト
;	何はとも那个まだまだプロトタイプ
;	そのうちこいここ要素も入れたいなとひそかに思ってます

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;

;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K57(ARG)
;別人版を作成する際はこの貂プレではなく別人版用口上貂プレをご利用ください

;口上存在判定です、けしてコメントアウトしないでください
;他の処理は一切行わないように
RETURN 1

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K57
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;Xには角色番号を入れてください

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0
;CFLAG:X:扮演口上有 = 0

;破瓜中止口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPで中止の成否を操作できます
;CFLAG:X:破瓜中止口上有 = 0

;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで推倒の成否を操作できます
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;推倒禁止に1を入れると、主动推倒てこなくなります
;以下は恋慕か炮友がつくまで推倒てこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:炮友
;	CFLAG:X:推倒禁止 = 1
;ELSE
;	CFLAG:X:推倒禁止 = 0
;ENDIF

;来訪不能に1を入れると、来訪してこなくなります
;以下は面識があるまで来訪してこなくなる使用例
;IF !CFLAG:X:面識
;	CFLAG:X:来訪不能 = 1
;ELSE
;	CFLAG:X:来訪不能 = 0
;ENDIF

;### 口上色判定 ###################################
@M_KOJO_COLOR_K57

;ここでSETCOLORすることで口上に色を付けられます
;例：SETCOLOR 0xC07070

SETCOLOR 0xF6CEEC
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K57
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等の角色変数を使用場合、角色番号の指定が必要になります
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K57
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
	PRINTFORML 「那边的路人，稍微等一下好吗？」
	PRINTFORMW 突然听到后面传来的声音，回头一看，那里有一位浑身萦绕着不可思议气氛的少女
	PRINTFORML 桃红色的浓密长发，以及同为桃色的布满窟窿的裙子……
	PRINTFORMW 最引人注目的是，少女周围漂浮「能乐面具」所包围的鬼火
	PRINTFORML 「我乃秦心。面具的妖怪，被称为面灵气的付丧神。」
	PRINTFORMW 「话虽如此，实际上我正学习感情和表情中——」
	PRINTFORML 说到这里，少女稍稍歪了一下无表情的脑袋
	PRINTFORMW 原来如此，作为面具的妖怪没有感情，那那副表情也就能接受了
	PRINTFORMW 仔细看看，诱惑的身材也恰到好处。如果能成为「东西」的话会很舒服吧。突然有这个想法的时候————
	PRINTFORML
	PRINTFORML 「从你那边，流露出了不可思议的感情呢」
	PRINTFORMW
	PRINTFORMW 那句话，让我有一种被泼一身冷水的感觉
	PRINTFORMW 「我，能读懂一定程度的感情」
	PRINTFORMW 「从你身上流出的善意、恶意、爱情之类扭曲的邪欲混杂交织在一起，真是不可思议」
	PRINTFORMW 「到底是什么样的感情？方便的话，请告诉我。」
	PRINTFORML 并不是能读心，这样我就放心了
	PRINTFORMW ——我心中的感情是什么？请告诉我——眼前的少女这样说道
	PRINTFORMW 有种欲望，我想要得到这个女孩的身体
	PRINTFORMW 我可以玷污这位无知的少女吗？这样自问道。
	PRINTFORMW 不管怎样，%CALLNAME:MASTER%决定自报家门
	PRINTFORML
	PRINTFORML 至于要和这位少女建立怎样的关系，和她一边交往一边考虑吧
	PRINTFORMW
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K57_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORMW 虽说刚刚才从约会中回来，走在前面的心却一直沉默不语
	PRINTFORMW 表情僵硬，不过一直以来都有着丰富感情的少女，现在却没有作出什么举动
	PRINTFORMW 刚才约会的时候是不是做错了什么，就在%CALLNAME:MASTER%開始这样思考的时候，她砰地拍了拍手
	PRINTFORMW 到底是怎么回事，%CALLNAME:MASTER%思考着，心却突然转过身来──
	PRINTFORML
	CALL HPH_PRINT,@" ──ちゅHPH","W"
	PRINTFORML
	PRINTFORMW 强行地，突然与%CALLNAME:MASTER%的嘴唇重叠
	PRINTFORMW 柔软娇嫩的触感，以及甘甜的触电般的接触
	PRINTFORMW 不知过了多久，少女才恋恋不舍地放開了嘴唇，如往常一样无表情地注视着%CALLNAME:MASTER%
	PRINTFORMW 不过，她的脸颊早已通红，用于表示情感的面具飘忽不定地摇动着
	PRINTFORMW 那似乎代表了她掩藏在无表情的面孔下的羞耻心
	PRINTFORMW 「第一次的…请收下吧」
	PRINTFORMW 突然说出的话语，虽然稍显生硬，不过凭着之前交往中的了解，%CALLNAME:MASTER%还是看出了她在掩饰自己的害羞
	PRINTFORMW 「………就这样吧。今天我很開心」
	PRINTFORMW 带着那份掩藏起来的羞耻心，少女说着，再次转身快步离開
	PRINTFORMW 那样的少女令人可爱，可笑，%CALLNAME:MASTER%自然而然地露出笑容，继续跟在了心的后面
	PRINTFORMW
	PRINTFORMW %CALLNAME:MASTER%轻轻地走着，前方少女的背影稍微远了一些
	PRINTFORMW 但是，能确实地感受到，心与心之间的距离更近了，二人怀着这样的想法，一起踏上了归途
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K57_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;初回
		IF FIRSTTIME("告白")
			PRINTFORMW 「%CALLNAME:MASTER%，我想稍微和你说点话，可以吗？」
			PRINTFORMW 回来的路上，心突然对%CALLNAME:MASTER%说道
			PRINTFORMW 不知为何，带着与平常截然不同的严肃神情转过身来，目不转睛地盯着这边
			PRINTFORMW 脸颊早已通红，目光中带着一份决心，缓慢地，却又坚定地说着话语
			PRINTFORML
			PRINTFORML 「%CALLNAME:MASTER%，以恋人的身份和我交往吧！」
			PRINTFORMW 「我， 我喜欢你！」
			PRINTFORML
			PRINTFORMW 那是坦坦荡荡的，凛然的话语
			PRINTFORMW 她继续将自己内心初次萌发的感情全部表达出来
			PRINTFORMW 「我还不够成熟。我不知道这份在心中燃烧起来，充斥内心的感情，是否真的被称作恋爱的感情…」
			PRINTFORMW 「不过，我想待在你的身边。和%CALLNAME:MASTER%一起度过余生，这就是我的真实想法」
			PRINTFORMW 这样说着，她伸出了手
			PRINTFORMW 夹杂着期待与不安的感情的双眸微微晃动，伸出的手也在微微颤抖
			PRINTFORMW 尽管如此──心依然没有移開视线
			PRINTFORMW 目不转睛地，少女向着自己所念想的人看了过来
			PRINTFORMW 就像是要把自己的决心和想法，确确实实地表示出来
			PRINTFORMW 「如果我这样的人可以的话…请你，和我交往吧」
		;二回目の告白
		ELSE
			PRINTFORMW 「……我完全知道或许这只是我的纠缠与不舍」
			PRINTFORMW 「果然，无论如何我都不想放弃」
			PRINTFORMW 「无论再经历多少次都是如此，抱歉了呢」
			PRINTFORMW 「我还是喜欢你」
			PRINTFORMW 「所以说……不能握住我这只手吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 如同接受了那些话语，%CALLNAME:MASTER%握住了心伸出来的手
		PRINTFORMW 就这样牵着手，紧紧抱住，将自己的想法全部表达出来
		PRINTFORMW 那一瞬间她的样子，我绝对一生都无法忘却
		PRINTFORMW 「啊……这样啊。……嗯，是吗」
		PRINTFORMW 「即使心里充满了喜悦，眼泪也还是会留下来的」
		PRINTFORMW 泪水从少女的眼中簌簌流出
		PRINTFORMW 不是因为悲伤，而是由于欢喜而留下的泪珠，浸润了少女的脸颊
		PRINTFORMW 「……谢谢」
		PRINTFORMW 如同为了回应这微弱的话语，%CALLNAME:MASTER%更加紧紧地地抱住心
		PRINTFORMW 就这样，二人在这一天成为了互相思念的恋人
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「……这样啊」
		PRINTFORMW 「抱歉，给你添麻烦了。忘了这回事吧」
		PRINTFORMW 少女若无其事地留下这句话，快步离開。%CALLNAME:MASTER%只是注视着少女远去的背影
		PRINTFORMW 就像是要把那一瞬间，快步离開的少女留下的眼泪，烙刻在视网膜上一样。
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K57_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF CFLAG:318 == 1
			PRINTFORMW 「再见了。回去的路上要小心一点」
			PRINTFORMW 心一边挥着手一边往回走
		ELSEIF TALENT:恋人
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「是吗，已经这么晚了…时光飞逝呢」
				PRINTFORMW 心恋恋不舍地放開了两人缠绕在一起的手臂，在离别之际亲吻了过来
				PRINTFORMW 「那么，明天见啦」
			CASE 1
				PRINTFORMW 「那么，明天见啦」
				PRINTFORMW 「下次的约会，我也很期待呢」
			CASE 2
				IF EX:膣内精液 >= 1200
					PRINTFORMW 「禽兽，变态，色狼，播种机笨蛋」
					PRINTFORMW 肚子由于大量精液的注入而如同孕妇一样膨胀，心用手捂着肚子，不快地盯着%CALLNAME:MASTER%
					PRINTFORMW 无法容纳的精液顺着心的大腿流了下来，她拼命地尝试向周围掩盖这件事
					PRINTFORMW 看着%CALLNAME:MASTER%尴尬的神情，心稍微叹了口气
					PRINTFORMW 「下次只能是正常的约会」
					PRINTFORMW 「………约会之后…那个，你想在里面出来几次都没有关系」
					PRINTFORMW 她用面具遮住了半边脸，满脸通红地将视线移開，小声说道
					PRINTFORMW 「约定…吧？」
					PRINTFORMW 留下那句话后，她就慌乱地离開了
				ELSE
					PRINTFORMW 「嗯，今天我很開心呢%CALLNAME:MASTER%」
					PRINTFORMW 「下次再一起去约会吧」
				ENDIF
			ENDSELECT
		ELSEIF TALENT:恋慕
			PRINTFORMW 「那么，明天见啦」
			PRINTFORMW 「下次的约会，我也很期待呢」
		ELSEIF TALENT:思慕
			PRINTFORMW 「那么，下次见啦」
			PRINTFORMW 「嗯，今天我很開心」
		ELSE
			PRINTFORMW 「那么，今天就到这里吧」
			PRINTFORMW 「拜拜」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORMW 「……嗯，我很開心」
			PRINTFORMW 「所以，这次就原谅你吧…下次别再那样了」
		ELSE
			PRINTFORMW 「…」
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K57_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF FLAG:時間停止
		ELSEIF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%，正好想看看你～」
					PRINTFORMW 心露出開心的笑容说道
				CASE 0
					PRINTFORML 「喔喔，来的正好，%CALLNAME:MASTER%」
					PRINTFORMW 「正好现在没什么事」
				CASEELSE
					PRINTFORML 「喔喔～%CALLNAME:MASTER%，见到你我很開心」
					PRINTFORMW 「所以，開心时的面具…」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「%CALLNAME:MASTER%，是来找我的吗？」
					PRINTFORMW
				CASE 0
					PRINTFORML 「欢迎光临，见到你我很開心」
					PRINTFORMW 「那个，開心时的面具在…」
				CASEELSE
					PRINTFORMW 「啊，%CALLNAME:MASTER%，怎么了？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「嗯？ 怎么了？」
					PRINTFORMW
				CASE 0
					PRINTFORMW 「啊？ 怎么了吗？」
				CASEELSE
					PRINTFORMW 「喔喔，意料之外的偶遇呢——」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K57_2(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K57_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K57_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K57_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきた角色（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K57_6(ARG,ARG:1)
;口上主はTARGET
;ARGに情事相手
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K57_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める（現在無し
;==================================================
@M_KOJO_EVENT_K57_8(ARG,ARG:1)
RETURN 1

;==================================================
;胖次没収された
;==================================================
@M_KOJO_EVENT_K57_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K57_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K57_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K57_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K57_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている工作量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;吃飯系
;==================================================
@M_KOJO_EVENT_K57_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K57_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後の情緒
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;陪睡
;==================================================
@M_KOJO_EVENT_K57_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K57_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K57_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K57_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K57_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K57_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K57_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K57_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K57_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K57_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K57_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K57_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K57_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K57_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が推倒を解除
;==================================================
@M_KOJO_EVENT_K57_30(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K57_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K57_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_KX

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K57_ONABARE_2(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_KX

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレ無崩しックスの地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K57_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_KX

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ責め
	CASE 2
		PRINTFORML Ｂ責め
	CASE 3
		PRINTFORML Ｍ責め
ENDSELECT

IF 本番はどっちか
	PRINTFORML Aで本番
ELSE
	PRINTFORML Vで本番
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;処女・無自覚非処女に挿入する直前の口上
;RETURN 1すると指令を中止します
;RETURN 0なら通します
;CFLAG:破瓜中止口上有がオンになってないと読み込まれないので注意
;-------------------------------------------------
@M_KOJO_EVENT_K57_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（约会帰り接吻など）を見るまで诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_KX_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_通常がオンになっている場合のみ有効。
;合意付きで推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常街道成功させます。
;合意があっても何らかの理由で诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_KX_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

path: ERB/口上・メッセージ関連/個人口上/【57】TW用秦こころ(賑やかし版)/M_KOJO_K57_イベント.ERB