code:
 ;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"COUNTER"系口上
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;-------------------------------------------------
;コミュニケーション
;-------------------------------------------------
;==================================================
;距離が近い
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_1
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_1_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_1_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORMDL  ...好近，伸手就能揽入怀中的感觉...
		PRINTFORMDL  ...拥抱的话，覚也不会反对、或者说没有反对的立场...
		PRINTFORMDW  ...我们之间就是如此的关系...

	ELSE
		PRINTFORMDL  ...为什么突然间会有这样的感觉...
		PRINTFORMDW  ...如果就这样抱上去，覚会生气吗...
	ENDIF
ENDIF
RETURN 1

;==================================================
;チラ見
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_2
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_2_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_2_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML  %CALLNAME:MASTER%、到底在想什么
		PRINTFORML  即便知晓你的所思所想，依旧无法理解
		PRINTFORMW  原本明了的生活突然充满迷惘，你也一样对吗
	ELSE
		PRINTFORML  确是有几分帅气的感觉
		PRINTFORMW  多看两眼居然就要迷上了…真奇怪…
	ENDIF
ENDIF
RETURN 1

;==================================================
;おはなし
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_3
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_3_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_3_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「喜欢主人哦」
		PRINTFORMW 「猜猜小覚说的是真话还是假话？」
	ELSE
		PRINTFORMW 「感觉会和%CALLNAME:MASTER%相处的很棒，一切顺利的话」
	ENDIF
ELSE
	PRINTFORMDL  据说有那种改变常识的催眠在地面上流行着，覚也注意一下比较好
	PRINTFORMW 「催眠？那种东西对我怎么可能管用」
ENDIF
RETURN 1

;==================================================
;いい匂い
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_4
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_4_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_4_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORMDL  ...与初见时别无二致覚的体香...
		PRINTFORMDL  ...相处以来无论前日被如何，次日互道早安时都能再次嗅到这令人安心的香气...
		PRINTFORMDW  ...甚至能联想到覚异常认真清洗身体每个角落的细节...
	ELSE
		PRINTFORMDL  ...是覚的味道，是覚在身边的感觉...
		PRINTFORMDL  ...想就这样将覚抱在怀里尽情闻她身上的味道...
		PRINTFORMDW  ...萦绕在鼻尖若有若无的香甜，简直在引人发狂...
	ENDIF
ENDIF
RETURN 1

;==================================================
;中だし後(?)
;==================================================
@M_KOJO_MESSAGE_COUNTER_K49_9
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_MESSAGE_COUNTER_K49_9_1
RETURN RESULT
@M_KOJO_MESSAGE_COUNTER_K49_9_1
	PRINTFORMW  肚子…好沉…
RETURN 1

;-------------------------------------------------
;ベリーソフト
;-------------------------------------------------
;==================================================
;近寄ってくる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_11
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_11_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_11_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「主人对小覚这样做感到惊讶吗」
		PRINTFORMW 「与其发呆不如一如既往摸摸小覚哦，趁小覚还想再依靠主人一会儿」
	ELSEIF TALENT:恋慕
		PRINTFORML  即使每天这样做也免不了慌乱这点，好可爱..
		PRINTFORMW 「不用紧张哦，就像平时那样摸摸我抱抱我就好」
	ELSE
		PRINTFORMW 「不必太过在意我在做什么，我想怎样与你毫无关系吧」
	ENDIF
ENDIF
RETURN 1

;==================================================
;笑顔を浮かべる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_12
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_12_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_12_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORMW 「主人也不喜欢看小覚拉着脸吧」
	ELSEIF TALENT:恋慕
		PRINTFORML 「被%CALLNAME:MASTER%盯着就忍不住嘴角上扬」
		PRINTFORMW 「%CALLNAME:MASTER%会觉得笑着的我更加好看吗？」
	ELSE
		PRINTFORMW 「哼哼~~%CALLNAME:MASTER%真是很有趣」
	ENDIF
ENDIF
RETURN 1

;==================================================
;構って欲しがる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_13
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_13_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_13_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML  这样做…没问题吗…
		PRINTFORMW  稍微再保持些距离会不会更好…
	ELSEIF TALENT:恋慕
		PRINTFORML 「总觉得有些亲昵过头了」
		PRINTFORMW 「果然这种事还得是%CALLNAME:MASTER%来做」
	ELSE
		PRINTFORML 「哼..肌肉还挺结实的..」
		PRINTFORMW 「丝毫没有夸%CALLNAME:MASTER%的意思，可别搞错了」
	ENDIF
ENDIF
RETURN 1

;==================================================
;身をすり寄せる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_14
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_14_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_14_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「小覚可以呆在这里吗？」
		PRINTFORMW 「主人嫌太近的话，可以往外挪一些哦」
	ELSEIF TALENT:恋慕
		PRINTFORML 「%CALLNAME:MASTER%~~」
		PRINTFORMDW  覚转过脸眨巴眨巴亮闪闪的眼睛，%CALLNAME:MASTER%很自覚的抚摸起覚的头发
	ELSE
		PRINTFORML 「感觉靠近些也不错……」
		PRINTFORMW 「不可以吗」
	ENDIF
ENDIF
RETURN 1

;==================================================
;見つめてくる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_15
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_15_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_15_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML  大概是脑袋坏掉了
		PRINTFORML  明知%CALLNAME:MASTER%应该是无法原谅的对象才对
		PRINTFORMW  现在好像要将我五脏六腑纠缠在一块儿的感情…是恨意吗…
	ELSEIF TALENT:恋慕
		PRINTFORML 「为什么越是在意，对%CALLNAME:MASTER%就越着迷呢」
		PRINTFORMW 「好像每一天都会变得更加喜欢%CALLNAME:MASTER%」
	ELSE
		PRINTFORMW 「哼————」
	ENDIF
ENDIF
RETURN 1

;==================================================
;肩にあご乗せ
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_16
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_16_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_16_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「主人，可以背小覚吗」
		PRINTFORMDL  覚自说自话将身体的重量压在%CALLNAME:MASTER%身上
		PRINTFORMDW  虽说似乎有刻意制造困难的嫌疑，这份重量依旧不令人困扰
	ELSE
		PRINTFORML 「%CALLNAME:MASTER%背我」
		PRINTFORMDL  覚将身体的重量完全压在%CALLNAME:MASTER%身上
		PRINTFORMDW  自然，这份重量不会让人困扰
	ENDIF
ENDIF
RETURN 1

;-------------------------------------------------
;ソフト
;-------------------------------------------------
;==================================================
;色っぽい仕草
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_20
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_20_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_20_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORMW 「主人喜欢怎样的小覚？要求小覚更加大胆一些也可以哦」
	ELSE
		PRINTFORMW 「%CALLNAME:MASTER%、是喜欢我吧？」
	ENDIF
ENDIF
RETURN 1

;==================================================
;見つめる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_21
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_21_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_21_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「偶尔脑中会闪过“现在这样也不错”的念头」
		PRINTFORMW 「是主人给小覚下的催眠在作祟吧？」
	ELSE
		PRINTFORMW 「%CALLNAME:MASTER%~~~」
	ENDIF
ENDIF
RETURN 1

;==================================================
;体を摺り寄せる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_22
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_22_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_22_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「喜欢主人身上的味道」
		PRINTFORMW 「所以让小覚多蹭一会儿，将主人的味道多沾上一点吧」
	ELSE
		PRINTFORMW 「不打算抱抱我吗？手感应该很不错哦」
	ENDIF
ENDIF
RETURN 1

;==================================================
;スカートめくり
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_23
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_23_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_23_1
RETURN 1

;==================================================
;息を吹きかける
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_24
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_24_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_24_1
RETURN 1

;==================================================
;尻を撫でる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_25
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_25_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_25_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「一直以来都被主人这样子摸哦」
		PRINTFORMW 「小覚也摸回几趟不过分吧」
	ELSE
		PRINTFORML 「%CALLNAME:MASTER%会反感吗」
		PRINTFORMW 「要是不阻止的话，我就继续了哦」
	ENDIF
ENDIF
RETURN 1

;==================================================
;腕抱き付き
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_26
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_26_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_26_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORML 「……」
		PRINTFORMW 「就是…突然想这么做了…」
	ELSE
		SIF TALENT:49:胸圍 <= 0
			PRINTFORML  %CALLNAME:MASTER%的手臂抵在了%CALLNAME:49%柔软的胸部上…
			PRINTFORMW 「色色%CALLNAME:MASTER%、在我胸口蹭来蹭去」
	ENDIF
ENDIF
RETURN 1
;==================================================
;谷間を見せる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_27
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_27_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_27_1
IF CFLAG:49:1522 != 1
	IF TALENT:49:服従
		PRINTFORMW 「怎样，我的身体还会让主人心跳加速吗？」
	ELSE
		PRINTFORMW 「怎样，我的身体会让%CALLNAME:MASTER%心跳加速吗？」
	ENDIF
ENDIF
RETURN 1

;-------------------------------------------------
;セクハラ
;-------------------------------------------------
;==================================================
;キス
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_30
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_30_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_30_1
	PRINTFORML 「%CALLNAME:MASTER%————」
	PRINTFORML 「11点美少女献上的KISS美味吗」
	PRINTFORMW 「接下来，想不想品尝一下舌尖的味道？」
CALL 寸止中
RETURN 1

;==================================================
;後ろから抱きつく
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_31
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_31_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_31_1
	SIF TALENT:49:胸圍 == 0
	PRINTFORML  覚胸部的柔软细腻，清晰的从背后传来
	PRINTFORMW 「不许%CALLNAME:MASTER%逃跑哦，乖乖陪在我身边吧」
CALL 寸止中
RETURN 1

;==================================================
;前ろから抱きつく
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_32
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_32_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_32_1
	PRINTFORML 「%CALLNAME:MASTER%…」
	PRINTFORMW 「成为我的所有物，供我玩耍吧」
CALL 寸止中
RETURN 1

;==================================================
;胸を揉ませる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_33
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_33_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_33_1
	PRINTFORML 「我的心意，%CALLNAME:MASTER%能感受到吗」
CALL 寸止中
RETURN 1

;==================================================
;股間をまさぐる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_34
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_34_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_34_1
	IF EQUIP:49:6 == 33
		PRINTFORML 「%CALLNAME:MASTER%很想将用如此夸张尺寸的欧金金插入覚的身体里吧」
		PRINTFORML 「居然想对那么娇弱的少女下手，%CALLNAME:MASTER%真是无可救药的变态啊」
		PRINTFORMW 「可惜做不到就是了」
	ELSE
		PRINTFORML 「%CALLNAME:MASTER%一会儿就要用如此夸张尺寸的欧金金插入覚的身体了」
		PRINTFORMW 「居然对那么娇弱的少女下手，%CALLNAME:MASTER%真是无可救药的变态啊」
	ENDIF
RETURN 1

;==================================================
;スカートの中を見せる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_35
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_35_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_35_1
	IF TEQUIP:TARGET:50 == MASTER
		PRINTFORML 「%CALLNAME:MASTER%看到了吗」
		PRINTFORML 「我把%CALLNAME:MASTER%的欧金金，全部吞下去了哦」
	ELSEIF 充填率(TARGET,1) > 50 || 充填率(TARGET,2) > 50
		PRINTFORML 「完全被灌满了啊」
		PRINTFORML 「%CALLNAME:MASTER%作为人类到底是怎样做到一下子射出那么多的」
	ELSEIF !EQUIP:下半身内衣２
		PRINTFORML 「好看吗，现在还是洁白无暇的少女小穴」
		PRINTFORML 「可惜待会儿就要被%CALLNAME:MASTER%的雄具撑开，变得又红又肿的样子」
	ELSE
		PRINTFORML 「好看吗」
		PRINTFORML 「不晓得能不能挑起%CALLNAME:MASTER%的性欲」
	ENDIF
CALL 寸止中
RETURN 1

;==================================================
;後ろから胸もみもみ
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_36
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_36_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_36_1
	PRINTFORMW 「这样做会让%CALLNAME:MASTER%舒服吗？」
RETURN 1

;==================================================
;飴強奪
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_39
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_39_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_39_1
RETURN 1

;-------------------------------------------------
;おねだり
;-------------------------------------------------
;==================================================
;正常位Ｖおねだり
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_41
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_41_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_41_1
	PRINTFORML 「%CALLNAME:MASTER%想进来吗，想进来吧~~~」
	PRINTFORML 「不过里面很小哦，%CALLNAME:MASTER%的尺寸不晓得能不能放得下」
	PRINTFORMW 「要试一试吗？」
RETURN 1

;==================================================
;正常位Ｖおねだり２
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_43
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_43_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_43_1
	PRINTFORML 「%CALLNAME:MASTER%喜欢这个姿势吧」
	PRINTFORML 「想狗狗一样，摇着尾巴乞求主人的姿势」
	PRINTFORMW 「就和%CALLNAME:MASTER%妄想中侵犯我的画面一样」
RETURN 1

;==================================================
;後背位Ａおねだり
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_44
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_44_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_44_1
	PRINTFORML 「主人…不要欺负小覚了…」
	PRINTFORMW 「小覚里面…已经痒得快疯掉了啊…」
RETURN 1

;-------------------------------------------------
;愛撫
;-------------------------------------------------
;==================================================
;手淫
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_50
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_50_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_50_1
	IF TEQUIP:六九式
		PRINTFORML 「%CALLNAME:MASTER%，想要比一下谁会先去吗」
		PRINTFORML 「当然我不觉得%CALLNAME:MASTER%的杂鱼阴茎能撑多久」
		PRINTFORMW 「就这样嗅着我小穴的味道丢人的biubiu射出来吧」
	ELSE
		PRINTFORML 「%CALLNAME:MASTER%———」
		PRINTFORML 「原来喜欢被比自己小的女孩子这样粗暴地强行弄射精啊」
		PRINTFORMW 「真是无可救药的抖M萝莉控，好恶心~~~」
	ENDIF
RETURN 1

;==================================================
;口淫
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_51
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_51_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_51_1
	PRINTFORML 「呜…阿姆…」
	PRINTFORML 「好好吃，%CALLNAME:MASTER%作为食物来说，过于美味了」
	PRINTFORML 「请在我的脸上、发间、口中都沾上足够浓郁的味道」
	PRINTFORMW 「好让这份回味停留在我脑中更久」
RETURN 1

;==================================================
;素股
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_52
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_52_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_52_1
	PRINTFORML 「快快硬起来吧」
	PRINTFORMW 「软趴趴的杂鱼肉棒可是没有资格进入我小穴的哦」
RETURN 1

;==================================================
;パイズリ
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_53
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_53_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_53_1
	PRINTFORML 「被覚的大胸胸夹住很舒服吧」
	PRINTFORML 「覚会让%CALLNAME:MASTER%的肉棒幸福得欲仙欲死哦」
	PRINTFORMW 「在忍不住得时候，请尽情在乳间释放吧」
RETURN 1

;==================================================
;足コキ
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_54
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_54_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_54_1
	PRINTFORML 「被美少女这样对待下体的感觉如何」
	PRINTFORML 「像虫子一样被足底摩擦，却反而变得硬硬的抵着我的足心」
	PRINTFORMW 「果然变态萝莉控的性欲是无可救药的」
RETURN 1

;==================================================
;アナル愛撫
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_55
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_55_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_55_1
	PRINTFORML 「很敏感吗，一下子收缩把我手指都卡住了」
	PRINTFORML 「乖乖放松让我有施展的舞台」
	PRINTFORMW 「或许我比%CALLNAME:MASTER%预想中更擅长让雄性舒服哦」
CALL 寸止中
RETURN 1

;==================================================
;アナル舐め
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_56
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_56_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_56_1
	PRINTFORML 「会帮%CALLNAME:MASTER%清理干净的哦」
	PRINTFORML 「活了千百年的妖怪不至于这种程度都接受不了」
	PRINTFORMW 「更重要的是，玩弄%CALLNAME:MASTER%对我来说更有趣」
RETURN 1

;==================================================
;指挿入
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_57
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_57_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_57_1
RETURN 1

;==================================================
;胸愛撫
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_58
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_58_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_58_1
	PRINTFORML 「明明是男人被欺负乳头却像女孩子一样扭个不停」
	PRINTFORMW 「看来%CALLNAME:MASTER%很有当男宠的潜力」
CALL 寸止中
RETURN 1

;==================================================
;乳首吸い
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_59
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_59_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_59_1
	PRINTFORML 「欸嘿，欧金金在我身体里面变得更硬了」
	PRINTFORMW 「%CALLNAME:MASTER%的弱点被我找到了哦」
CALL 寸止中
RETURN 1

;==================================================
;ディープキス
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_60
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_60_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_60_1
	PRINTFORML 「呜姆姆~~」
	PRINTFORMW 「%CALLNAME:MASTER%的唾液，好美味…」
CALL 寸止中
RETURN 1

;-------------------------------------------------
;奉仕
;-------------------------------------------------
;==================================================
;クンニ強制
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_70
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_70_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_70_1
	PRINTFORML 「是%CALLNAME:MASTER%最喜欢的颜面骑乘哦」
	PRINTFORML 「只要%CALLNAME:MASTER%拿出十足的诚意」
	PRINTFORML 「我也不介意多让%CALLNAME:MASTER%享受一会儿」
RETURN 1

;==================================================
;フェラチオ強制
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_71
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_71_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_71_1
RETURN 1

;==================================================
;アナル奉仕
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_72
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_72_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_72_1
	IF EQUIP:49:6 == 33
		PRINTFORML 「呜哇，看来御札也阻止不了%CALLNAME:MASTER%想舔食的欲望，好恶心~~~」
		PRINTFORML 「被美少女骑在脸上居然一下子就支起来了」
		PRINTFORML 「%CALLNAME:MASTER%可要抓住难得的机会努力取悦我哦」
	ELSE
		PRINTFORML 「呜哇，%CALLNAME:MASTER%好恶心」
		PRINTFORML 「被美少女骑在脸上居然一下子就支起来了」
		PRINTFORML 「%CALLNAME:MASTER%可要抓住难得的机会努力取悦我哦」
	ENDIF
RETURN 1

;==================================================
;ぱふぱふ
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_73
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_73_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_73_1
	PRINTFORML 「我的胸很软吧？埋进胸里磨蹭脸颊得舒服吧」
	PRINTFORMW 「%CALLNAME:MASTER%可以不用思考别的，把身体完全交给我就好」
CALL 寸止中
RETURN 1

;==================================================
;乳合わせ
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_74
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_74_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_74_1
RETURN 1

;==================================================
;タワシ洗い
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_75
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_75_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_75_1
RETURN 1

;==================================================
;強制アソコ愛撫
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_76
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_76_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_76_1
	PRINTFORML 「呜姆…勉强可以容纳下%CALLNAME:MASTER%的手指」
	PRINTFORMW 「被异物侵入身体得感觉，真是不妙……」
RETURN 1

;==================================================
;乳を吸わせる
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_77
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_77_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_77_1
	PRINTFORML 「%CALLNAME:MASTER%想要喝奶了吗，和小孩子一样」
	PRINTFORMW 「好贪心，居然同时享用两边」
CALL 寸止中
RETURN 1

;-------------------------------------------------
;性交
;-------------------------------------------------
;==================================================
;挿入される（MASTER受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_80
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_80_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_80_1
RETURN 1

;==================================================
;Ｖ挿入する（TARGET受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_85
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_85_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_85_1
	PRINTFORML 「昂~~进来了~~」
	PRINTFORMW 「%CALLNAME:MASTER%大大的肉棒，进到我身体里来了啊~~」
RETURN 1

;==================================================
;だいしゅきホールド
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_86
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_86_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_86_1
	PRINTFORML 「要被人类的劣等精液…填满了…」
	PRINTFORML 「我的身体，就要被%CALLNAME:MASTER%脏兮兮的废物精子侵犯了」
	PRINTFORMW 「就让那些饱含让我怀孕意念的几亿几亿炮灰精子，死在我子宫里吧…」
CALL 寸止中
RETURN 1

;==================================================
;Ａ挿入する（TARGET受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_87
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_87_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_87_1
	PRINTFORML 「唔噫~~一下子顶到人家舒服的地方~~要上瘾了~~」
	PRINTFORML 「%CALLNAME:MASTER%的肉棒和我的后穴相性很好嘛」
	PRINTFORMW 「就此成为我专用的肛交自慰道具如何，绝对会很合得来」
RETURN 1

;==================================================
;Ｖ腰振り（MASTER受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_88
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_88_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_88_1
	PRINTFORML 「没错，就是这里~~~」
	PRINTFORML 「比起直勾勾冲撞深处，还是被%CALLNAME:MASTER%的亀頭在入口附近挤压来得舒服」
	PRINTFORML 「%CALLNAME:MASTER%对于这样子顶撞少女的G点有何感想」
	PRINTFORMW 「不妙…感觉有什么要被激出来了…」
CALL 寸止中
RETURN 1

;==================================================
;Ａ腰振り（MASTER受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_89
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_89_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_89_1
	PRINTFORML 「%CALLNAME:MASTER%的…太大了啊…」
	PRINTFORML 「每次想要出来，都感觉内脏都要被带出来了…」
	PRINTFORML 「可是我早已经对这种感觉上瘾」
	PRINTFORMW 「我的菊穴里面…彻底变成只有%CALLNAME:MASTER%才能满足的形状了」
CALL 寸止中
RETURN 1

;==================================================
;Ａ挿入される（MASTER受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_90
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_90_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_90_1
CALL 寸止中
RETURN 1

;==================================================
;イラマチオされる（MASTER受け）
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_91
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_91_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_91_1
CALL 寸止中
RETURN 1

;==================================================
;アナル開発許可を求める
;==================================================
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_92
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COUNTER_K49_92_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COUNTER_K49_92_1
RETURN 1

;-------------------------------------------------
;うふふカウンター
;-------------------------------------------------
;まだ

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉TOKI/古明地觉/M_KOJO_K49_カウンター.ERB

license: unknown


path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉TOKI/古明地觉/M_KOJO_K49_コマンド.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;セクハラ系コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;310,尻を撫でる
;TFLAG:193(1=不快(TALENT:臆病なら涙目) 2&&3=恥ずかしがる(TALENT:男嫌い兼MASTERが男なら、身をすくめる) 4=されるがまま)
;CFLAG:うふふ==2&&TCVAR:20(パンツ無し顔面騎乗(70=クンニ強制 71=フェラチオ強制 72=アナル奉仕) 35=スカート内見せつけ 52=素股)
;CFLAG:うふふ==2&&TEQUIP:シックスナイン(パンツありTCVAR:20(70～72)はこちら)
;PREVCOM(305=膝枕
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_310
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功

TFLAG:192 =0

@M_KOJO_TOKI_MESSAGE_COM_K49_310
CALL TRAIN_MESSAGE1
CALL M_KOJO_TOKI_MESSAGE_COM_K49_310_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COM_K49_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70 == 1
	ELSEIF CFLAG:TARGET:睡眠
	ELSEIF CFLAG:诶嘿嘿==2
	ELSEIF CFLAG:49:1522 == 1
		SELECTCASE CFLAG:1525
		CASE 1
			PRINTFORMW 「……」
		CASE 2
			SELECTCASE RAND:2
			CASE 0
				PRINTFORMDL  覚的屁股像高级的软糖异样好揉
				PRINTFORMW 「不会给你摸的哦，独自意淫去吧」
			CASE 1
				PRINTFORMDL  旁边人看覚大人的目光很色情哦
				PRINTFORML 「不管人类还是妖怪，色欲熏心的家伙总是大多数」
				PRINTFORMW 「这种程度的妄想我早就克服了」
			ENDSELECT
		CASE 3
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「不要打…求你…」
			CASE 1
				PRINTFORMDL  腰弯下来，腿岔开些，屁股再翘点会比较好
				PRINTFORMW 「都被…别人看光了…让我这样做难道%CALLNAME:MASTER%会更高兴吗…」
			CASE 2
				PRINTFORML 「把手放开…」
				PRINTFORMW 「我叫你…把手放开啊…」
			ENDSELECT
		CASE 4
			IF GET_TARGETNUM() == 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB()
				IF CFLAG:291 == 0
					PRINTFORML 「不需要把内裤脱掉吗？」
					PRINTFORMW 「脱掉内裤才能更好的摸屁股是常识吧」
				ELSE
					PRINTFORML 「为什么一副高兴的样子」
					PRINTFORML 「因为摸起来手感很棒？那是理所当然的吧」
					PRINTFORMW 「女孩子为了被摸可是要做很多努力的」
				ENDIF
			ELSE
				IF CFLAG:291 == 0
					PRINTFORMDL  旁边人看覚大人的目光好奇怪
					PRINTFORML 「不管人类还是妖怪，色欲熏心的家伙总是大多数」
					PRINTFORMW 「这种程度的妄想我早就克服了」
				ELSE
					PRINTFORMDL  腰弯下来，腿岔开些，屁股再翘点会比较好
					PRINTFORMW 「嗯，知道了……」
					PRINTFORMDL  覚大人这样真的好吗，重要的地方都被看光了哦
					PRINTFORMW 「要让%CALLNAME:MASTER%摸起来更舒服，这也是没办法的事吧」
				ENDIF
			ENDIF
		CASE 5
			PRINTFORMW 「喵呜！！！」
		ENDSELECT
	ELSE
		IF TALENT:49:服従
			SELECTCASE RAND:4
			CASE 0
				PRINTFORMDL  覚怎么突然吐舌头了？
				PRINTFORMW 「被主人这样掰开后穴抚摸内壁，再怎样忍耐都矜持不住了啦……」
			CASE 1
				PRINTFORMDL  覚身体的恢复力相当强，现在进入覚的后庭依旧和初次那样紧致得难以深入
				PRINTFORMDL  但爱液的数量和粘稠度已今非昔比了呢
				PRINTFORMW 「主人…再扣的话小覚连裙子都要湿的没法穿了…」
			CASE 2
				PRINTFORML 「主人不要这样欺负小覚啦」
				PRINTFORMW 「真的哭给你看哦…」
			CASE 3
				PRINTFORML 「有种安心的感觉」
				PRINTFORMW 「不被主人塞住的话，总是有爱液从那边流下来…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「不知分寸的人到底如何活到这么大的？」
			CASE 2
				PRINTFORMW 「讨厌没有边界感的人……」
			CASE 3
				PRINTFORMW 「感觉如何，摸得很爽吗？」
			CASE 0
				PRINTFORMW 「変態……」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;313,胸愛撫
;CFLAG:うふふ==2&&TCVAR:20(27=谷間を見せる 33=胸を揉ませる 53=パイズリ(小分岐は地の文EVENT_MESSAGE_COM_セクハラ.ERB参照) 73=ぱふぱふ 77=乳を吸わせる 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅきホールド)
;ABL:Ｂ感觉(2未満=性的には感じてない 5未満=多少感じてる 5以上=カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;乳のサイズでも変わる場合があるので、地の文EVENT_MESSAGE_COM_セクハラ.ERB参照
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_313
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功

TFLAG:192 =0

@M_KOJO_TOKI_MESSAGE_COM_K49_313
CALL TRAIN_MESSAGE1
CALL M_KOJO_TOKI_MESSAGE_COM_K49_313_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSEIF CFLAG:诶嘿嘿 == 2
		SELECTCASE TCVAR:20
			;谷間を見せる
			CASE 27
				PRINTFORML 「欸嘿———」
				PRINTFORML 「所以对胸部的评价可不能光看大小」
				PRINTFORMW 「%CALLNAME:MASTER%只是短暂的触碰到就对我的身体完全着迷了」
			;胸を揉ませる
			CASE 33
				PRINTFORML 「呜……」
				PRINTFORMW 「%CALLNAME:MASTER%不要总是把人家好不容易营造起来的浪漫氛围引向色情啊」
			;乳交
			CASE 53
				PRINTFORML 「只要把龟头夹在中间，再从两边夹住交错揉动……」
				PRINTFORML 「哼哼~~说了最想听到的台词又用了最喜欢的乳交姿势」
				PRINTFORMW 「%CALLNAME:MASTER%脑海中已经只剩下【好舒服】的声音了」
			;ぱふぱふ
			CASE 73
				PRINTFORML 「真是小色鬼，稍微疼爱一下就情不自禁产生不妙的想法」
				PRINTFORML 「想叫我妈妈吗，我没有%CALLNAME:MASTER%这样想让妈妈用胸部高潮的变态小孩哦」
				PRINTFORMW 「但仅限当下的话……」
			;乳を吸わせる
			CASE 77
				PRINTFORML 「呜哇———」
				PRINTFORMW 「同时咬住两边乳尖撕扯，这样粗暴胸都变形了啊」
			;85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
			CASE 85,87,88,89
				PRINTFORML 「在这种时候趁机欺负人家胸部…」
				PRINTFORMW 「太卑鄙了……」
			CASEELSE
				PRINTFORML 「涩涩%CALLNAME:MASTER%…」
				PRINTFORMW 「摸法…好恶…好舒服啊…」
		ENDSELECT
	ELSEIF CFLAG:49:1522 == 1
		SELECTCASE CFLAG:1525
		CASE 1
			PRINTFORMW 「……」
		CASE 2
			PRINTFORMW 「晃来晃去的书都读不了了，不管在干嘛你动作小一点吗」
		CASE 3
			IF CFLAG:1538 == 0
				PRINTFORMDL  要让大家看清楚才对吧，覚酱漂亮的胸部
				PRINTFORML 「哼…」
				PRINTFORMDL  稍稍将文胸下移，覚胸前弹软嫩肉俏皮弹出
				PRINTFORMW 「要不是催眠…怎么可能会做这种事…」
			ELSE
				PRINTFORMDL  要让大家看清楚才对吧，覚酱漂亮的胸部
				PRINTFORML 「哼…」
				PRINTFORMDL  双手从下乳将乳肉托起，胸前弹软嫩肉挤作一团
				PRINTFORMW 「要不是催眠…怎么可能会做这种事…」
			ENDIF
		CASE 4
			IF CFLAG:1538 == 0
				SELECTCASE RAND:2
				CASE 0
					PRINTFORMDL  如果说我想要揉覚酱的胸的话，覚酱会怎么做？
					PRINTFORML 「像这样解开衣扣，然后把内衣上移好好地将胸部露出来……」
					PRINTFORMDL  覚酱果然优秀，即使在侍奉方面也是满分
					PRINTFORMW 「满分？十一点才对吧」
				CASE 1
					PRINTFORML 「内衣很讨厌吧，让%CALLNAME:MASTER%的手很难直接摸到肉」
					PRINTFORMW 「能脱掉就好了」
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORMDL  要让大家看清楚才对吧，小覚漂亮的胸部
					PRINTFORML 「说的也是……」
					PRINTFORMDL  双手从下乳将乳肉托起，胸前弹软嫩肉挤作一团
					PRINTFORMW 「这样子摸起来也会更方便吧？」
				CASE 1
					PRINTFORMDL  如果说我想要揉覚酱的胸的话，覚酱会怎么做？
					PRINTFORMW 「衣服都脱好了，想摸的话现在就是最佳时机哦」
				ENDSELECT
			ENDIF
		CASE 5
			PRINTFORMW 「摸法…好恶…好舒服啊…」
		ENDSELECT
	ELSE
		IF TALENT:49:服従
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「再怎么说被一直这样拨弄的话」
				PRINTFORMW 「主人真的很想看我光靠被触碰乳尖就去啊……」
			CASE 1
				PRINTFORML 「胸部好舒服」
				PRINTFORML 「被主人一直这样粗暴揉挤下去的话」
				PRINTFORMW 「哪天有乳汁跑出来都不奇怪」
			CASE 2
				PRINTFORML 「小覚的…胸部…」
				PRINTFORMW 「正在被主人开发着…」
			CASE 3
				PRINTFORML 「最近小覚发现胸部好像又成长了」
				PRINTFORML 「虽然有些不情愿」
				PRINTFORMW 「但还是得要感谢主人愿意天天揉小覚的胸才是」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「再怎么说被一直这样拨弄的话……」
				PRINTFORMW 「%CALLNAME:MASTER%真的很想看我光靠被触碰乳首就去啊」
			CASE 1
				PRINTFORML 「胸部好舒服」
				PRINTFORML 「被%CALLNAME:MASTER%很用力的抓着，血液涌向乳尖」
				PRINTFORMW 「总觉得有什么要出来了……」
			CASE 2
				PRINTFORML 「我的…胸部…」
				PRINTFORMW 「正在被%CALLNAME:MASTER%开发着…」
			CASE 3
				PRINTFORML 「干嘛...用这样H的摸法...」
				PRINTFORML  突然覚如触电般推开%CALLNAME:MASTER%的手，恶狠狠地望向这里
				PRINTFORML 「刚才%CALLNAME:MASTER%嫌我小了」
				PRINTFORMDL  只是对更大的有些好奇而已
				PRINTFORMW 「生气了，好心给%CALLNAME:MASTER%摸还要被嫌弃，呜……」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;314,アナル愛撫
;CFLAG:うふふ==2&&TCVAR:20(72=アナル奉仕
;CFLAG:うふふ==2&&TEQUIP:シックスナイン(パンツありTCVAR:20(70～72)はこちら)
;ABL:Ａ感觉(2未満=受け入れられない 4未満=異物感に翻弄 4以上=カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_314
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功

TFLAG:192 =0

@M_KOJO_TOKI_MESSAGE_COM_K49_314

CALL TRAIN_MESSAGE1

CALL M_KOJO_TOKI_MESSAGE_COM_K49_314_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70 == 1
	ELSEIF CFLAG:TARGET:睡眠
	ELSEIF CFLAG:诶嘿嘿==2
		;顔面騎乗肛門
		IF TCVAR:20 == 72
			PRINTFORML 「嗯~~」
			PRINTFORMW 「好喜欢这样~~屁眼要被%CALLNAME:MASTER%舔融化掉了~~」
		;六九式体勢
		ELSEIF TEQUIP:六九式
			PRINTFORML 「啊…嗯呜呜…」
			PRINTFORMW 「不公平…覚覚的后面要被%CALLNAME:MASTER%舔得合不上了啊…」
		ELSE
			PRINTFORML 「唔…不要乱摸啦…」
			PRINTFORMW 「覚覚的后面会发情的哦」
		ENDIF
	ELSEIF CFLAG:49:1522 == 1
		SELECTCASE CFLAG:1525
		CASE 1
			PRINTFORMW 「……」
		CASE 2
			PRINTFORMDL  大概只有催眠了才有机会这样子玩弄小覚的后庭吧
			PRINTFORML 「哈？那个怪异的称呼是怎么回事？」
			PRINTFORMDL  我会努力把小覚的后庭小穴开发成第二性穴的
			PRINTFORMW 「完全不懂你在说什么……」
		CASE 3
			SELECTCASE RAND:2
			CASE 0
				PRINTFORMDL  搅动在覚穴内玩耍的手指,覚因难以忍耐的刺激丢人地吐出舌尖
				PRINTFORML 「你是…笨蛋吗…」
				PRINTFORMW 「真是无可救药…变态…」
			CASE 1
				PRINTFORMDL  腰弯下来，腿岔开些，然后用手把想被我玩弄的穴口分开比较好哦
				PRINTFORMW 「别…别命令我…」
				PRINTFORMDL  就是说覚大人要保持这种姿势我的手指才好进去啦
				PRINTFORML 「不要啊……」
				PRINTFORMDL  会呼吸的后庭小穴暴露在%CALLNAME:MASTER%眼前……
			ENDSELECT
		CASE 4
			PRINTFORMW 「胖次也一起挤进去……你这人实在……太没常识了……」
		CASE 5
			PRINTFORML 「笨蛋……」
			PRINTFORML 「要翻出来了……」
			PRINTFORMW 「不要…这样拽啊…」
		ENDSELECT
	ELSE
		IF TALENT:49:服従
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMDL  只是把手指放到入口处，覚好像会自己把指尖往里吸诶
				PRINTFORMW 「是主人在偷偷用力，小覚什么都没做啊」
			CASE 1
				PRINTFORML  糟糕…被这样温柔抚摸的话…很快就会痒得受不了…
				PRINTFORMW  主人指腹指纹仿佛都能被感知到，混杂着肠液一点点溢出的感觉，快要痒得发疯了…
			CASE 2
				PRINTFORML 「主人那么喜欢那里，不如给小覚舔舔吧」
				PRINTFORMW 「因为主人摸来摸去爱液都把屁股打湿了，主人正好用舌头清理一下」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML  糟糕…屁股…很敏感…
				PRINTFORMW  绝对不能被%CALLNAME:MASTER%知道…那里是弱点…
			CASE 1
				PRINTFORML 「不要摸那里……」
				PRINTFORMW 「%CALLNAME:MASTER%不嫌脏吗？」
			CASE 2
				PRINTFORML 「好痒…%CALLNAME:MASTER%快住手…」
				PRINTFORMW 「触感顺着脊髓刺激大脑…人都要变奇怪了…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;315,クリ愛撫
;CFLAG:うふふ==2&&TCVAR:20(35=スカートの中を見せる 70=クンニ強制 85=Ｖ挿入する 86=だいしゅきホールド 87=Ａ挿入する 88=腰振りＶ 89=腰振り
;ABL:Ｃ感觉(4未満=くすぐったい 6未満=ちょっといいかも 6以上=カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_315
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功

TFLAG:192 =0

@M_KOJO_TOKI_MESSAGE_COM_K49_315

CALL TRAIN_MESSAGE1

CALL M_KOJO_TOKI_MESSAGE_COM_K49_315_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70 == 1
	ELSEIF CFLAG:TARGET:睡眠
	ELSEIF CFLAG:诶嘿嘿 == 2
		SELECTCASE TCVAR:20
			;裙子の中を見せる
			CASE 35
				PRINTFORML 「哼———」
				PRINTFORMW 「%CALLNAME:MASTER%还真是玩不腻啊」
			;強制舐陰
			CASE 70
				PRINTFORML 「%CALLNAME:MASTER%的舔技还不错哦」
				PRINTFORMW 「再用力吸住…配合牙齿一起再…」
			;85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振り
			CASE 85 TO 89
				PRINTFORML 「不行…这时候欺负小豆豆的话…」
				PRINTFORMW 「会喷出来的…」
			CASEELSE
				PRINTFORML 「唔…」
				PRINTFORMW 「小豆豆完全落入%CALLNAME:MASTER%手中了」
		ENDSELECT
	ELSEIF CFLAG:49:1522 == 1
	SELECTCASE CFLAG:1525
	CASE 1
		PRINTFORMW 「……」
	CASE 2
		PRINTFORML 「总觉得痒痒的，还没结束吗」
		PRINTFORMW 「%CALLNAME:MASTER%到底在做什么啊」
	CASE 3,5
		PRINTFORMDL  如果想让我给覚按摩小豆豆的话该怎样做？
		PRINTFORML 「根本不可能有这种想法…你又想让我做什么…」
		PRINTFORMDL  就是想知道覚会怎样请求我
		PRINTFORMW 「可恶……%CALLNAME:MASTER%大人……赐予小女淫乱的蜜核些许关爱可好……这样子满意了吗」
	CASE 4
		PRINTFORMDL  覚大人，像我这样子摸您的下身难道是件奇怪的事吗，四周的人都在看……
		PRINTFORML 「嗯？不是很正常的事情吗？」
		PRINTFORMW 「似乎是在嫉妒，可为什么要嫉妒这种事……」
	CASE 5
		PRINTFORML 「感谢主人…教训人家下流的淫核…」
		PRINTFORMW 「是我不好…求主人…不要再用力捏了…」
	ENDSELECT
	ELSE
		IF TALENT:49:服従
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「主人…不要再用力捏了…」
				PRINTFORMW 「小豆豆…要被捏坏掉了…」
			CASE 1
				PRINTFORMW 「感谢主人的玩弄，小覚的淫核在主人手里被玩弄的好舒服…」
			CASE 2
				PRINTFORML 「唔…」
				PRINTFORMW 「小覚的敏感点…正在主人的手里被把玩着…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%、不要那么用力…」
				PRINTFORMW 「小豆豆…要被捏坏掉了…」
			CASE 1
				PRINTFORMW 「好痒…住手…要尿出来了啊…」
			CASE 2
				PRINTFORML 「唔…」
				PRINTFORMW 「覚的敏感点…在被%CALLNAME:MASTER%把玩着…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;CFLAG:うふふ==2&&TCVAR:20(35=スカートの中を見せる 70=クンニ強制 87=Ａ挿入する 89=腰振りＡ
;TALENT:処女(指挿入れ連続時喪失注意、基本拒否ぎみ)
;ABL:Ｖ感觉(1未満=違和感に戸惑う 5未満=ちょっと気持ちいい 5以上＝カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_316
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0
@M_KOJO_TOKI_MESSAGE_COM_K49_316

CALL TRAIN_MESSAGE1

CALL M_KOJO_TOKI_MESSAGE_COM_K49_316_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70 == 1
	ELSEIF CFLAG:TARGET:睡眠
ELSEIF CFLAG:诶嘿嘿 == 2
	SELECTCASE TCVAR:20
		;裙子の中を見せる
		CASE 35
			PRINTFORML 「很紧吧」
			PRINTFORMW 「只能塞下%CALLNAME:MASTER%的一根手指哦」
		;強制舐陰
		CASE 70
			PRINTFORML 「嗷呜！！」
			PRINTFORML 「笨蛋%CALLNAME:MASTER%———」
			IF TALENT:49:0 == 1
				PRINTFORMW 「处女膜已经…变形到极限了啊…」
			ELSE
				PRINTFORMW 「手指一下子…捅到最深处了…」
			ENDIF
		CASE 76
			PRINTFORML 「嗷呜！！」
			PRINTFORML 「%CALLNAME:MASTER%…技术好烂…」
			PRINTFORMW 「到底了还在使劲戳…」
		;87=Ａ挿入する 89=腰振りＡ
		CASE 87,89
			PRINTFORML 「啊嗯…不妙…」
			PRINTFORML 「两边被%CALLNAME:MASTER%一起欺负实在是———」
			PRINTFORMW 「要去了啊…」
		;他
		CASEELSE
			PRINTFORML 「不要突然的把手指伸进来啊…」
			PRINTFORMW 「变态%CALLNAME:MASTER%…」
	ENDSELECT
	ELSEIF CFLAG:1525 == 1
	SELECTCASE CFLAG:1525
	CASE 1
		PRINTFORML 「…………」
	CASE 2
		IF GET_TARGETNUM() == 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB()
			IF TALENT:処女 == 1
				PRINTFORMDL  有种想捅破覚的处女膜的冲动
				PRINTFORML 「……」
				PRINTFORMW 「你在开什么玩笑！？」
			ELSE
				PRINTFORMW 「下身痒痒的…」
			ENDIF
		ELSE
			IF TALENT:処女 == 1
				PRINTFORMDL  向路人展现自己处女穴的感觉如何
				PRINTFORML 「呜……妄想……进到身体里去了」
				PRINTFORMW 「不懂你在说什么……」
			ELSE
				PRINTFORML 「好奇怪的感觉……」
				PRINTFORMW 「有什么东西……进到深处了……」
			ENDIF
		ENDIF
	CASE 3
		IF GET_TARGETNUM() == 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB()
			IF TALENT:処女 == 1
				PRINTFORMDL  有种想捅破覚的处女膜的冲动
				PRINTFORML 「……」
				PRINTFORMW 「呜…请不要…这样做…」
			ELSE
				PRINTFORML 「用我的小穴来暖手…」
				PRINTFORMW 「你这家伙还真做得出来啊」
			ENDIF
		ELSE
			IF TALENT:処女 == 1
				PRINTFORMDL  向路人展现自己处女穴的感觉如何
				PRINTFORML 「呜……妄想……进到身体里去了」
				PRINTFORMW 「好恶心……」
			ELSE
				PRINTFORML 「好奇怪的感觉……」
				PRINTFORMW 「有什么东西……进到深处了……」
			ENDIF
		ENDIF
	CASE 4
		IF GET_TARGETNUM() == 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB()
			IF TALENT:処女 == 1
				PRINTFORML 「怎样，形状好看吗？」
				PRINTFORMDL  有种想捅破的冲动捏
				PRINTFORMW 「不用肉棒捅吗？」
			ELSE
				PRINTFORML 「可以让%CALLNAME:MASTER%暖起来吗？」
				PRINTFORMW 「因为地方很小，所以只够温暖手指……」
			ENDIF
		ELSE
			IF TALENT:処女 == 1
				PRINTFORMDL  向路人展现自己处女穴的感觉如何
				PRINTFORML 「呜……妄想……进到身体里去了」
				PRINTFORMW 「好恶心……」
			ELSE
				PRINTFORML 「好奇怪的感觉……」
				PRINTFORMW 「有什么东西……进到深处了……」
			ENDIF
		ENDIF
	CASE 5
		IF TALENT:処女 == 1
			PRINTFORMW 「不…不要…请主人小心一点…」
		ELSE
			PRINTFORMW 「NYA！！」
		ENDIF
	ENDSELECT
	ELSE
		IF EQUIP:49:下半身内衣２ == 33
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「即便如此也要继续使劲往里戳吗？」
				PRINTFORMW 「%CALLNAME:MASTER%还真是不愿认清事实」
			CASE 1
				PRINTFORML 「从博丽的巫女那边求得的道具」
				PRINTFORMW 「对付像%CALLNAME:MASTER%这类毛手毛脚的人非常好用哦」
			CASE 2
				PRINTFORML 「无用的努力，%CALLNAME:MASTER%还不放弃吗」
				PRINTFORMW 「再怎么扣弄也不可能往里进一分了」
			ENDSELECT
		ELSE
			IF TALENT:49:服従
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「小覚的穴温令主人满意吗？」
					PRINTFORMW 「可惜小覚不是会冒火的妖怪，没法为主人提供更炙热的小穴呢」
				CASE 1
					PRINTFORML 「主人总是毫不留情的扣小覚的G点啊」
					PRINTFORMW 「明知道那样做会让小覚漏尿把主人手弄脏的，主人却还是乐此不疲…」
				CASE 2
					PRINTFORML 「主人的手指…好长…居然连深处都能够到…」
					PRINTFORMW 「连那种地方都被主人如此轻易的触碰玩弄，小覚真的好不甘心…」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「用我的小穴来暖手…」
					PRINTFORMW 「你这家伙还真做得出来啊」
				CASE 1
					PRINTFORML 「被异物侵入，还被从身体内侧侵犯」
					PRINTFORMW 「倘若粗暴些的话，恐怕得直接向%CALLNAME:MASTER%求饶才行」
				CASE 2
					PRINTFORMDL  覚的小穴一整天都是湿哒哒的
					PRINTFORMW 「好讨厌…冷不丁就有手指戳进身体里…」
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;317,腰を動かす
;ABL:Ｖ感觉(2未満=まだ気持ち良くない 5未満=ちょっと気持ちいい 5以上=カイカン
;==================================================
@M_KOJO_TOKI_MESSAGE_COM_K49_317
CALL TRAIN_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COM_K49_317_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「突然加速实在是…过分…」
	PRINTFORML 「轻点啊…要被顶坏掉了…」
	PRINTFORMW 「子宫…卵巢…都要被玩坏了啊…」
ENDIF
RETURN 1
;==================================================
;318,腰を動かす（Ａ）
;==================================================
@M_KOJO_TOKI_MESSAGE_COM_K49_318
CALL TRAIN_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COM_K49_318_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_318_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「连深处都被贯穿了…」
	PRINTFORML 「要回不去了…」
	PRINTFORMW 「后穴已经…变成%CALLNAME:MASTER%的形状了啊」
ENDIF
RETURN 1

;====================================================================================================
;320,对方主導正常位
;====================================================================================================
@M_KOJO_TOKI_MESSAGE_COM_K49_320
CALL TRAIN_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COM_K49_320_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_320_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「让我好好疼爱你吧」
	PRINTFORML 「就此变得没有我就活不下去」
	PRINTFORML 「从肉体开始…直至心灵都完全堕落…」
	PRINTFORMW 「沉迷于我的身体」
ENDIF
RETURN 1
;====================================================================================================
;322,对方主導後背位
;====================================================================================================
@M_KOJO_TOKI_MESSAGE_COM_K49_322
CALL TRAIN_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COM_K49_322_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_322_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「让我好好疼爱你吧」
	PRINTFORML 「就此变得没有我就活不下去」
	PRINTFORML 「从肉体开始…直至心灵都完全堕落…」
	PRINTFORMW 「沉迷于我的身体」
ENDIF
RETURN 1
;==================================================
;330,スカートめくり
;TFLAG:193(-5=拒絶（ビンタ） -3=拒絶（つねり） -1=いやがる 0=いやがる（嬉しげ） 1=受け入れ)
;TFLAG:193=1&&ABL:露出癖(5以上=人目のある場所で、自らスカートをまくり上げる 4以下=人目のある場所でめくられるさいに弱い抵抗 3以上=人目のない場所で自らスカートをまくり上げる 3未満=弱い抵抗)
;TFLAG:400(1=デート先or地底のモブが反応する)
;後ろからピラリ、ではなく、前からペラって感じ（そうじゃなかったら、めくり上げようとするのを止めて即座にビンタとか無理、めくり上げられた後にしかならないしその状況ならビンタ食らうより普通に弾幕で一発ＫＯにならないほうがおかしい
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_330
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 = 0
@M_KOJO_TOKI_MESSAGE_COM_K49_330

CALL TRAIN_MESSAGE1
CALL M_KOJO_TOKI_MESSAGE_COM_K49_330_1
RETURN RESULT
@M_KOJO_TOKI_MESSAGE_COM_K49_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		SELECTCASE CFLAG:1525
		CASE 1
			PRINTFORMW 「……」
		CASE 2
			PRINTFORMW 「嗯？」
		CASE 3
			PRINTFORMW 「不要看…不要看我…」
		CASE 4
			PRINTFORML 「我的小穴可爱吗~~~」
			PRINTFORMW 「痴女？那是什么？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,抱き付く
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:うふふ==2&&TCVAR:20(32=前から抱きつく 60=ディープキス 73=ぱふぱふ 74=乳合わせ 77=乳を吸わせる ＶＡ性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅきホールド)
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_311
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_TOKI_MESSAGE_COM_K49_311
CALL TRAIN_MESSAGE1
IF CHK_DATENOW(CFLAG:49:约会中) && CFLAG:49:1538 == 1
	CALL 全裸约会
ELSE
	CALL M_KOJO_TOKI_MESSAGE_COM_K49_311_1
ENDIF

RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:49:睡眠
		PRINTFORMW 「嗯…」
	ELSEIF CFLAG:诶嘿嘿
	ELSEIF CFLAG:49:1522 == 1
		SELECTCASE CFLAG:1525
		CASE 1
			PRINTFORMW 「……」
		CASE 2
			PRINTFORMW 「为什么要抱%CALLNAME:MASTER%来着？」
		CASE 3
			PRINTFORMW 「哼…想抱就抱吧，反正我也没法阻止不是吗？」
		CASE 4
			PRINTFORMW 「抱完之后可以直接sex吗？」
		CASE 5
			PRINTFORMW 「哼…想抱就抱吧，反正我也没法阻止不是吗？」
		ENDSELECT
	ELSEIF CFLAG:1505 == 2
		IF TALENT:思慕 || TALENT:恋慕
			PRINTFORML 「决定好了？」
			PRINTFORMW 「那就一边享受拥抱再确认一遍..」
			PRINTDL [0] - 我想成为覚大人的宠物
			PRINTDL [1] - 再考虑一下..
			INPUT
			IF RESULT == 0
				PRINTFORML 「笨%CALLNAME:MASTER%居然让我等那么久」
				PRINTFORML 「之后可是会好好惩罚一下你的，不过在此之前」
				PRINTFORML 「不过在此之前要向%CALLNAME:MASTER%兑现奖励，为了庆祝我们之间可以更加深入地...」
				PRINTFORMDL  %CALLNAME:MASTER%被覚引导着陷入温暖香软的怀抱中，不断被抚摸着头发与后背
				PRINTFORMDL  娇娇糯糯的声音贴在%CALLNAME:MASTER%耳边直直刺激着大脑
				PRINTFORMW 「欢迎成为地灵殿的一员，从今往后将与我在同一屋檐下度过」
				CFLAG:1505 = 3
			ELSEIF RESULT == 1
				PRINTFORML 「想做我的宠物可以直接说哦，毕竟%CALLNAME:MASTER%只是想要被治愈一下」
				PRINTFORML 「而我随时都愿意来安抚%CALLNAME:MASTER%，需要的只是%CALLNAME:MASTER%开口而已」
				PRINTFORMW 「相信%CALLNAME:MASTER%很快就会想明白，别让我等太久」
			ENDIF
		ELSE
			PRINTFORML 「不行哦，想要拥抱的话得先成为宠物才可以」
			PRINTFORML 「%CALLNAME:MASTER%对我来说只是闯入别人生活的奇怪男人」
			PRINTFORMW 「所以还不可以，难不成%CALLNAME:MASTER%愿意让我被奇怪的家伙随意拥抱吗」
		ENDIF
	ELSEIF TALENT:49:服従
		IF BASE:酒気 >= (MAXBASE:酒気 / 10) * 4
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「小覚不会因为醉酒就轻易和主人做哦？」
				PRINTFORML 「就算被这样抱住使不上力气，就算身体开始因为主人的触碰发烫」
				PRINTFORMW 「唯独主动献身这一点…绝对不行…」
			CASE 1
				PRINTFORML 「主人…」
				PRINTFORMW 「请更加抱紧一些好吗…」
			ENDSELECT
		ELSEIF CFLAG:MASTER:陪睡中
			IF CFLAG:睡眠
				SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「主人…不可以…」
				CASE 1
					PRINTFORMW 「请不要再…主人…」
				CASE 2
					PRINTFORMW 「呜喵…」
				ENDSELECT
			ELSE
				PRINTFORML 「身体关系太好的话据说能聊的话题会枯竭」
				PRINTFORML 「相对来说小覚是更喜欢闲聊的类型，所以想用身体上的优势就让小覚闭嘴不太可能」
				PRINTFORML 「无论说出的话语还是身体或者心灵的沟通都很重要」
				PRINTFORML 「所思所想光光憋在心中的话，即便是小覚也会无法理解而令误会重叠」
				PRINTFORML 「所以主人在抱小覚的时候也请不要吝啬在小覚耳边诉说情话」
				PRINTFORMW 「小覚可能比主人认为的更愿意听主人说话哦」
			ENDIF
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「已经结束了？主人不再抱一会儿吗」
				PRINTFORML 「小覚是无所谓哦，但主人现在没有抱得尽兴，一会儿又来粘着小覚很烦人的」
				PRINTFORML 「毕竟小覚也有需要忙的事情，就算现在小覚只是宠物也不是说24小时都有空陪主人胡闹」
				PRINTFORML 「所以真的不再抱一会儿吗？刚才主人的体温还留在小覚身上很温暖的哦？」
				PRINTFORMW  覚自说自话再次挤到%CALLNAME:MASTER%怀中
			CASE 1
				PRINTFORML 「主人色色…」
				PRINTFORML 「手又抓着小覚屁股肉了哦」
				PRINTFORMDL  不可以吗？
				PRINTFORML 「没说不可以，小覚只是在说主人很色这件事」
				PRINTFORML 「不可以吗？」
				PRINTFORMDW  没说不可以
			CASE 2
				PRINTFORML 「主人抱小覚有特殊含义吗」
				PRINTFORML 「保护欲、示爱、又或者是囚禁」
				PRINTFORML 「又或者主人是实用主义」
				PRINTFORML 「因为小覚手感很好所以想摸，因为小覚体温很暖所以想抱」
				PRINTFORML 「确实身体贴得越紧，相互间的气氛升温越快」
				PRINTFORMW 「无论情场还是床上都是如此…」
			ENDSELECT
		ENDIF
	ELSEIF TALENT:恋慕
		IF CHK_DATENOW(CFLAG:49:约会中)
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「只可以稍微抱一下哦」
				PRINTFORML 「毕竟可是以大妖怪的身份和%CALLNAME:MASTER%在约会，多少还想在人前矜持些」
				PRINTFORMW 「所以，也请%CALLNAME:MASTER%稍稍忍耐一下可以」
			CASE 1
				PRINTFORML 「听到了羡慕的心声」
				PRINTFORML 「%CALLNAME:MASTER%可以自豪了哦，能够拥抱如此可爱的少女」
				PRINTFORML 「自恋？%CALLNAME:MASTER%心里不也是这样想的吗」
				PRINTFORMW 「嗯..可以不要为了展示我们之间亲密的关系做些外人看来完全是性骚扰的行为吗？」
			ENDSELECT
		ELSEIF BASE:酒気 >= (MAXBASE:酒気 / 10) * 4
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「接下来%CALLNAME:MASTER%是要H了吗？」
				PRINTFORML 「诶嘿~不知%CALLNAME:MASTER%是怎样想的，嗯..%CALLNAME:MASTER%心里乱乱的读不出来」
				PRINTFORMW 「想H了..」
			CASE 1
				PRINTFORML 「呜姆呜姆~~」
				PRINTFORML 「%CALLNAME:MASTER%很美味哦」
				PRINTFORMDW  覚亲咬着%CALLNAME:MASTER%的脖子
			ENDSELECT
		ELSEIF CFLAG:MASTER:陪睡中
			IF CFLAG:睡眠
				SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「呜姆姆..%CALLNAME:MASTER%~~~」
				CASE 1
					PRINTFORMW 「喜欢%CALLNAME:MASTER%..」
				CASE 2
					PRINTFORMW 「%CALLNAME:MASTER%..色..」
				ENDSELECT
			ELSE
				PRINTFORML 「喜欢被%CALLNAME:MASTER%抱，也喜欢抱着%CALLNAME:MASTER%」
				PRINTFORMDL  总觉得谁之前很抵触来着
				PRINTFORML 「被陌生的异性抱应该是很危险的事情吧，如果毫无反抗会被认为是好搞定的女人的」
				PRINTFORMDL  如此说来今后覚还是应该更多些反抗才行
				PRINTFORML 「哈..事到如今反而认为是我好搞定吗？%CALLNAME:MASTER%也不想想自己从来只顾自己开心，从来都不听话..」
				PRINTFORML 「即使说了不许还是强行抱上来，最后我也只好妥协吧」
				PRINTFORMDW  所以才说覚好搞定啊..
			ENDIF
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「怎么抱了一下又松开了啊，自说自话的..」
				PRINTFORML 「再多抱抱也可以哦，反正%CALLNAME:MASTER%也还没抱够吧」
				PRINTFORML 「还有别的事情？可是还没抱够诶，如果就这样让%CALLNAME:MASTER%离开的话即使是我也会抓狂的」
				PRINTFORML 「哼..真是坏心眼的人啊，非要我这样抱住你才肯再伸手摸摸我吗？哼~~~」
				PRINTFORMDW  覚嘟着嘴蹭着%CALLNAME:MASTER%的手心
			CASE 1
				PRINTFORML 「那个..为什么%CALLNAME:MASTER%在拥抱的时候总是要动手动脚呢，现在手也是想一点点朝腰下面移动吧」
				PRINTFORML 「变态%CALLNAME:MASTER%性骚扰..难不成是手闲不下来吗」
				PRINTFORML 「告诉我这样做的目的吧，果然还是很在意」
				PRINTFORMW 「否则再这样下去就对%CALLNAME:MASTER%发火了哦」
			CASE 2
				PRINTFORML 「像情侣一样，一天到晚都可以这样互相抱着」
				PRINTFORML 「感觉很安心，好像就这样睡过去也完全没问题」
				PRINTFORML 「%CALLNAME:MASTER%在抱我时也会有这种感觉吗？」
				PRINTFORMW 「嗯..%CALLNAME:MASTER%还是不必回答了，多少能想到%CALLNAME:MASTER%煞风景的答案，呼呼~~」
			ENDSELECT
		ENDIF
	ELSEIF TALENT:思慕
		IF CHK_DATENOW(CFLAG:49:约会中)
			PRINTFORML 「大庭广众之下...嗯...总觉得有些不情愿...」
			PRINTFORML 「但也从未尝试过这样做，再说也不会被认出来不是吗」
			PRINTFORML 「稍微用抱一会儿的话没问题，尽你所能让我们看起来更亲密吧」
			PRINTFORMDW  贴在%CALLNAME:MASTER%身前的覚似乎很刻意地保持着拥抱的姿势，就这样持续了不少时间
		ELSEIF BASE:酒気 >= (MAXBASE:酒気 / 10) * 4
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%..%CALLNAME:MASTER%..%CALLNAME:MASTER%..」
				PRINTFORML 「%CALLNAME:MASTER%喜欢我吗？%CALLNAME:MASTER%肯定喜欢我吧..」
				PRINTFORMDW  醉醺醺的覚下巴磕在%CALLNAME:MASTER%肩头自言自语着
			CASE 1
				PRINTFORML 「喜欢被抱着的感觉，暖暖的..」
				PRINTFORMW 「总觉得会变懒惰..」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「诶？又要抱了吗」
				PRINTFORML 「嗯..毕竟我也是作为%CALLNAME:MASTER%的饲主，这点小事自不必多说..」
				PRINTFORML 「来，尽情拥抱吧，这次抱完后可不允许马上又要抱，虽说同意可以拥抱但也不是说随时随地都可以」
				PRINTFORMW 「还有..拥抱的时候手可以不要乱摸吗...」
			CASE 1
				PRINTFORML 「乖乖%CALLNAME:MASTER%」
				PRINTFORML 「来做让我们更加亲密的事情吧」
				PRINTFORML 「才不是H的事情，拥抱和H之间还隔着十万八千里」
				PRINTFORMW 「而且，和宠物H不会很奇怪吗？」
			CASE 2
				PRINTFORML 「%CALLNAME:MASTER%乖，」
				PRINTFORML 「明明这样子拥抱对我们双方也没什么意义，但%CALLNAME:MASTER%总是热衷于这样做」
				PRINTFORML 「如果企图就是这样拥抱时%CALLNAME:MASTER%可以不要脸一样嗅我的味道的话多少会让人失望哦」
				PRINTFORMW 「..被发现了？..就算原本不确定现在也确信了哦」
			ENDSELECT
		ENDIF
	ELSE
		IF CHK_DATENOW(CFLAG:49:约会中)
			PRINTFORML 「我可没有同意过可以这样做」
			PRINTFORMW 「%CALLNAME:MASTER%想惹我生气吗」
		ELSEIF BASE:酒気 >= (MAXBASE:酒気 / 10) * 4
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「呜姆呜姆..」
				PRINTFORML 「想趁着女孩子醉醺醺时下手吗？才不会让你得逞呢~」
				PRINTFORMDW  倚靠在%CALLNAME:MASTER%怀中的覚如此说着
			CASE 1
				PRINTFORML 「姆......」
				PRINTFORML 「可以松手吗？完全动不了了...」
				PRINTFORMDW  环抱着%CALLNAME:MASTER%腰的覚如此抱怨着
				ENDSELECT
		ELSE
			SELECTCASE RAND:6
			CASE 0
				PRINTFORML 「为什么要这样做，拥抱我会让你感到愉悦吗？」
				PRINTFORML 「看来确实如此，除此之外还有什么理由给你这样做的勇气吗」
				PRINTFORML 「没有..真是单纯的人，被你抱着只会让我感到不适，因为我还无法完全信任你」
				PRINTFORMW 「所以，可以松开手吗」
			CASE 1
				PRINTFORML 「可以不要这样子贴在我身上吗，你身上的温度会传到这里，很热」
				PRINTFORML 「而且总觉得会沾上人类男性的味道，会被宠物讨厌」
				PRINTFORMW 「明白的话就把手松开可以吗」
			CASE 2
				PRINTFORML 「你认为这样做可以有益于我们之间的关系吗」
				PRINTFORML 「答案是否定的，你该庆幸目前没有造成负面的影响」
				PRINTFORML 「我还是喜欢成为拥抱他人的一方，被拥抱总觉得低人一等」
				PRINTFORMW 「当然，请求我抱你也是不可能的，总觉得有些嫌弃..」
			CASE 3
				PRINTFORML 「我应该说过不喜欢被%CALLNAME:MASTER%抱，难不成将我的话当耳旁风？」
				PRINTFORML 「并不是想说不可以，如果%CALLNAME:MASTER%一直这样不把我的话当回事，多少会有不满」
				PRINTFORML 「今后想要拥抱的话得先征得我的同意知道了吗」
				PRINTFORMDL  所以请问覚小姐现在可以抱一下吗？
				PRINTFORML 「作为听话的奖励我就同意了，但话说回来从该才开始根本就没松手吧」
				PRINTFORMW 「先斩后奏可是讨人厌的习惯」
			CASE 4
				PRINTFORML 「因为很少被这样抱着所以不是很清楚，在你们人类之间这样子拥抱很常见吗」
				PRINTFORML 「觉得怪怪的，明明情侣之间才会这样子亲密」
				PRINTFORML 「成为情侣不就好了？%CALLNAME:MASTER%是在和我开什么恶劣的玩笑？」
				PRINTFORMW 「只是稍稍走的近一些可不要就这样得寸进尺了」
			CASE 5
				PRINTFORML 「%CALLNAME:MASTER%是想在我这里寻求些什么？」
				PRINTFORML 「明明这样子拥抱对我们双方也没什么意义，但%CALLNAME:MASTER%总是热衷于这样做」
				PRINTFORML 「如果企图就是这样拥抱时%CALLNAME:MASTER%可以不要脸一样嗅我的味道的话多少会让人失望哦」
				PRINTFORMW 「..被发现了？..就算原本不确定现在也确信了哦」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;312,キスする
;TFLAG:193(99=拒絶(キス不可) 1=大成功 0=成功 -1=失敗)
;CFLAG:うふふ==2&&TCVAR:20(32=前から抱きつく 50=手淫 60=キス 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅきホールド)
;PREVCOM(305=膝枕
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_TOKI_SUCCESS_COM_K49_312
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_TOKI_MESSAGE_COM_K49_312
CALL TRAIN_MESSAGE1
IF CHK_DATENOW(CFLAG:49:约会中) && CFLAG:49:1538 == 1
	CALL 全裸约会
ELSE
	CALL M_KOJO_TOKI_MESSAGE_COM_K49_312_1
ENDIF

RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_312_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
		PRINTFORMDL  肆无忌惮索取覚适合微笑的嘴唇
		PRINTFORMDW  享受着在不会被察覚的空间内对可爱少女为所欲为的背德感
	ELSEIF CFLAG:恶作剧
		PRINTFORMDL  %CALLNAME:MASTER%肆无忌惮索取覚适合微笑的嘴唇
		PRINTFORMDW  好像沉浸在了甜蜜的梦境中，覚甜蜜的微笑使%CALLNAME:MASTER%更加专注于侵犯少女的口腔
	ELSEIF TFLAG:193 == 99
		PRINTFORML 「脸凑得那么近是想怎样？」
		PRINTFORMW 「天塌下来也不想被你亲..」
	ELSEIF CFLAG:诶嘿嘿 == 2
		SELECTCASE TCVAR:20
			;前から抱きつく
			CASE 32
				PRINTFORML 「%CALLNAME:MASTER%———」
				PRINTFORMW 「啾啾———」
			;手淫
			CASE 50
				PRINTFORML 「就算这样做，我进攻敏感带的行为也不会放缓的哦」
				PRINTFORMW 「%CALLNAME:MASTER%就这样丢人的被我轻易弄射精吧」
			;接吻
			CASE 60
				PRINTFORML 「呜…呜姆…」
				PRINTFORMW 「要窒息了…」
			;85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
			CASE 85,87 TO 89
				PRINTFORML 「呜…现在被深深KISS的话…」
				PRINTFORMW 「会变得好容易去的…」
			;だいしゅき大堂ド
			CASE 86
				SELECTCASE BASE:PLAYER:2
					CASE 0 TO 2999
						PRINTFORML 「呜…现在被深深KISS的话…」
						PRINTFORMW 「会变得好容易去的…」
					CASE 3000 TO 9999
						PRINTFORML 「才不会输给%CALLNAME:MASTER%呢」
						PRINTFORMW 「%CALLNAME:MASTER%也快忍不住射精了吧」
					CASEELSE
						PRINTFORML 「喜欢……%CALLNAME:MASTER%……」
						PRINTFORMW 「好喜欢%CALLNAME:MASTER%……」
				ENDSELECT
			CASEELSE
				PRINTFORML 「喜欢……%CALLNAME:MASTER%……」
				PRINTFORMW 「好喜欢%CALLNAME:MASTER%……」
		ENDSELECT
	ELSEIF CFLAG:49:1522 == 1
		SELECTCASE CFLAG:1525
		CASE 1
			PRINTFORMW 「……」
		CASE 2
			PRINTFORMW 「我在做什么来着…」
		CASE 3
			PRINTFORMW 「哼…亲吧…反正都已经…无所谓了…」
		CASE 4
			PRINTFORMW 「接下来就是做爱了吧！」
		CASE 5
			PRINTFORML 「敢亲的话…绝对杀了你…」
			PRINTFORMDL  那动手吧，啾~啾~
			PRINTFORMW 「为什么偏偏是我」
		ENDSELECT
	ELSEIF CFLAG:1505 == 2
		PRINTFORML 「%CALLNAME:MASTER%不用再做无意义的尝试了哦」
		PRINTFORML 「连拥抱都不被允许的情况下，怎么可能会同意KISS啊」
		PRINTFORML 「还是说%CALLNAME:MASTER%认为我其实是轻浮的女人，会答应和随便哪个遇见的人接吻」
		PRINTFORMW 「%CALLNAME:MASTER%希望我是那样的设定吗？」
	ELSEIF CFLAG:陪睡中
		IF CFLAG:睡眠
			IF EXP:TARGET:接吻経験 == 1
				PRINTFORMDL  宁静安睡的覚，毫无设防将舒缓烂漫的睡颜呈现在%CALLNAME:MASTER%眼中
				PRINTFORMDL  从睡着开始就牢牢抱着%CALLNAME:MASTER%的手臂，将脸埋入%CALLNAME:MASTER%颈间亲吻着
				PRINTFORMDL  趁着松懈的此刻，%CALLNAME:MASTER%也有机会如此近距离端详
				PRINTFORML 「嗯~~」
				PRINTFORMDL  是察覚到了自己正在被直勾勾看着吗，覚眉间流露着不适，轻微朝%CALLNAME:MASTER%移动身体
				PRINTFORMDL  两人之间进一步靠近...
				PRINTFORMDL  奇异粉色的发丝挑逗着%CALLNAME:MASTER%的鼻尖，挑动着%CALLNAME:MASTER%并不安分的内心
				PRINTFORMDL  那粉嘟嘟的傲娇小嘴平日不愿表达爱意，现在却一副希望被亲吻的样子微微翘起..
				PRINTFORMDL  真是不坦率的妖怪，哪儿来的少女吗
				PRINTFORMDW  好像从没像今天这样想要吻覚，之后再好好道歉应该也会被原谅吧
			ELSE
				PRINTFORMW 「喵~~啾啾~~诶嘿~~」
			ENDIF
		ELSE
			IF EXP:TARGET:接吻経験 == 1
				PRINTFORML 「啊..唔姆姆..呜..笨蛋%CALLNAME:MASTER%..」
				PRINTFORML 「为什么要做这种事..就这样夺去女孩子的初吻..明明人家还没做好心理准备呜呜..」
				PRINTFORML  覚推开%CALLNAME:MASTER%将脸埋在被子里，纤细的肩膀止不住的抽搐，带着哭腔不断埋怨..不过..
				PRINTFORMDL  这种程度的演技骗不到人吧
				PRINTFORML 「被发现了吗？我还以为这种程度的演技对付%CALLNAME:MASTER%已经足够了嘞」
				PRINTFORML 「其实只是想要试着说说这样的台词，因为很难得嘛，毕竟初吻只有一次」
				PRINTFORML  覚侧过头冲着%CALLNAME:MASTER%眨眨眼
				PRINTFORML 「还以为%CALLNAME:MASTER%是不喜欢KISS的人，对少女的可爱嘴唇完全没想法」
				PRINTFORML 「是故意拖着想要我主动吗？%CALLNAME:MASTER%最好不要有这样的期待」
				PRINTFORML 「除非%CALLNAME:MASTER%是那种看着少女羞耻难堪样子而感到愉悦的坏人..」
				PRINTFORMDL  ......
				PRINTFORMDL  ............
				PRINTFORML 「%CALLNAME:MASTER%很擅长KISS啊...」
				PRINTFORML 「心里会暖暖的，像是会更喜欢%CALLNAME:MASTER%的魔法」
				PRINTFORML 「啊...不是在纠结%CALLNAME:MASTER%有没有和别人亲过，那种事情..倒也不重要..」
				PRINTFORMW 「只是因为%CALLNAME:MASTER%在期待着听感想，稍微说说罢了..」
			ELSE
				PRINTFORML 「诶嘿~~迫不及待想要晚安的吻了吗？还没到%CALLNAME:MASTER%可以睡覚的时间哦」
				PRINTFORML 「再多亲亲我可以吗？喜欢在被窝里怎样做都可以的感觉」
				PRINTFORMW  与%CALLNAME:MASTER%十指相扣的覚，接吻的同时欲求不满地不断蹭着%CALLNAME:MASTER%的身体
			ENDIF
		ENDIF
	ELSEIF BASE:酒気 >= (MAXBASE:酒気 / 10) * 4
		PRINTFORML 「嗯~~」
		PRINTFORMDL  %CALLNAME:MASTER%未费多少力气就用舌尖撬开了覚的牙齿防线，侵入覚口中
		PRINTFORMDL  与覚舌尖纠缠一块儿，细细品味带着淡淡酒香的甘甜液体
		PRINTFORMDW  一切都相当顺利，%CALLNAME:MASTER%沉醉在与覚交换唾液的满足感中
	ELSEIF CHK_DATENOW(CFLAG:49:约会中)
		IF TALENT:49:服従
			PRINTFORMDL  毫无节制的从覚口中索取温润甘香的唾液
			PRINTFORMDL  与覚香软小舌纠缠在一起是永远不会腻的精致体验
			PRINTFORMDL  无论合时无论何处也无论几次，覚并不为此困扰只是当作正常不过的事
			PRINTFORML 「如果是亲吻的话，主人想要小覚随时都能给哦」
			PRINTFORML 「小觉其实并不是很能理解这么做的意义，再怎么说也只能算单纯的体液交换」
			PRINTFORML 「但在这个过程中小覚会湿，起码身体告诉自己这么做是很舒服的一件事」
			PRINTFORMW 「所以小覚不会抗拒，主人想要的时候尽情的做就好」
		ELSEIF TALENT:恋慕
			PRINTFORML 「别像平时那样想KISS就凑上来可以吗，有人看着..」
			PRINTFORML 「再忍耐一会儿不行吗..？不行..真是笨蛋..笨蛋%CALLNAME:MASTER%」
			PRINTFORML 「那也不许你这样子做..还是由我来，这样你也能满意了吧」
			PRINTFORML 「哼...给我弯腰把脸凑过来..啾~」
			PRINTFORMDW  覚在%CALLNAME:MASTER%唇上点了下立马转过头，低垂着视线脸上染上一抹羞红
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%是毫不在意别人眼光的人..」
			PRINTFORML 「根本没打算躲闪，就是想在他人目光下与我接吻吧」
			PRINTFORMW 「哼..允许你乱来也就这时而已，可别想着平日也会有这种机会」
		ENDIF
	ELSE
		IF TALENT:49:服従
			PRINTFORMDL  毫无节制的从覚口中索取温润甘香的唾液
			PRINTFORMDL  与覚香软小舌纠缠在一起是永远不会腻的精致体验
			PRINTFORMDL  无论合时无论何处也无论几次，覚并不为此困扰只是当作正常不过的事
			PRINTFORML 「如果是亲吻的话，主人想要小覚随时都能给哦」
			PRINTFORML 「小觉其实并不是很能理解这么做的意义，再怎么说也只能算单纯的体液交换」
			PRINTFORML 「但在这个过程中小覚会湿，起码身体告诉自己这么做是很舒服的一件事」
			PRINTFORMW 「所以小覚不会抗拒，主人想要的时候尽情的做就好」
		ELSEIF ABL:親密 >= 5
			PRINTFORML 「%CALLNAME:MASTER%为什么那么喜欢亲人」
			PRINTFORML 「这种事情原来是可以这样子频繁做的吗？到底怎样做到那么主动的？」
			PRINTFORML 「即使是对家人我也只会亲吻其他位置，从不想着随意去夺走她们的嘴唇..」
			PRINTFORMW 「不正常的绝对是%CALLNAME:MASTER%」
		ELSE
			PRINTFORML 「已经开始连KISS都如此随意了吗..」
			PRINTFORML 「虽说只是简单的嘴唇接触，我还是希望把吻献给与我牵绊更深的人」
			PRINTFORMW 「可惜，那样的人一直没有出现」
		ENDIF
	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_TOKI_MESSAGE_COM_K49_350
CALL TRAIN_MESSAGE
CALL M_KOJO_TOKI_MESSAGE_COM_K49_350_1
RETURN RESULT

@M_KOJO_TOKI_MESSAGE_COM_K49_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SETCOLOR 0xDB7093
	IF FLAG:70 == 1
	ELSE
		SELECTCASE TFLAG:194
		CASE 0
		CASE 1
		CASE 2
		CASE 3
		CASE 4
		CASE 100
			SELECTCASE RAND:4
				CASE 0
					PRINTFORMW 「不行哦，对%CALLNAME:MASTER%来说还为时尚早」
				CASE 1
					PRINTFORMW 「不是很想和%CALLNAME:MASTER%做…」
				CASE 2
					PRINTFORMW 「第一次还是想留给重要的人…」
				CASE 3
					PRINTFORMW 「我与%CALLNAME:MASTER%之间，已经是恋人的关系了吗？」
			ENDSELECT
		ENDSELECT
		SELECTCASE TCVAR:初次拥抱
			CASE 1
			CASE 2
			CASE 3
			CASE 4
			CASE 5
			CASE 6
			CASE 7
			CASE 8
			CASE 98
				SELECTCASE RAND:4
					CASE 0
						PRINTFORMW 「不行哦，对%CALLNAME:MASTER%来说还为时尚早」
					CASE 1
						PRINTFORMW 「不是很想和%CALLNAME:MASTER%做…」
					CASE 2
						PRINTFORMW 「第一次还是想留给重要的人…」
					CASE 3
						PRINTFORMW 「我与%CALLNAME:MASTER%之间，已经是恋人的关系了吗？」
				ENDSELECT
			CASE 99
				PRINTFORMW 「来SEX吧…」
		ENDSELECT
		RESETCOLOR
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉TOKI/古明地觉/M_KOJO_K49_セクハラコマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉TOKI/古明地觉/M_KOJO_K49_ハードなコマンド.ERB


code:
@TRAIN_MESSAGE1
#DIM 二重表示
;派生指令口上により2回呼ばれるのを防ぐ
IF FLAG:時間停止
	IF 二重表示 == BASE:MASTER:TSP
		RETURN
	ELSE
		二重表示 = BASE:MASTER:TSP
	ENDIF
ELSE
	IF 二重表示 == TIME
		RETURN
	ELSE
		二重表示 = TIME
	ENDIF
ENDIF
DRAWLINE
RESULT = 1
;Counter脱衣の実処理
FOR LOCAL, 0, CHARANUM
	IF TCVAR:LOCAL:22
		CALL DATUI_BOTTOM_LATE(MASTER, TCVAR:LOCAL:22)
	ELSEIF TCVAR:LOCAL:23
		CALL DATUI_BOTTOM_LATE(LOCAL, TCVAR:LOCAL:23)
	ELSEIF TCVAR:LOCAL:24
		CALL DATUI_TOP_LATE(MASTER, TCVAR:LOCAL:24)
	ELSEIF TCVAR:LOCAL:25
		CALL DATUI_TOP_T_LATE(LOCAL, TCVAR:LOCAL:25)
	ENDIF
NEXT
IF TEQUIP:吸乳头 && !GROUPMATCH(SELECTCOM,7,11,21,22)
	CALL MESSAGE_EQUIP_COM11
ELSEIF TEQUIP:揉胸 && !GROUPMATCH(SELECTCOM,12,21,22)
	CALL MESSAGE_EQUIP_COM12
ENDIF

IF TFLAG:50
	TRYCCALLFORM MESSAGE_SCOM{TFLAG:50}
		PRINTW
	CATCH
	ENDCATCH
ELSE
	TRYCCALLFORM MESSAGE1_COM{SELECTCOM}
		PRINTW
	CATCH
	ENDCATCH
ENDIF
IF CFLAG:MASTER:诶嘿嘿 != 2 && SELECTCOM != 461
	CALL Counter呼び出し処理
ENDIF
RESULTS =
IF CFLAG:49:口上セレクタ
	TRYCALLFORM M_KOJO_K{NO:49}_{CFLAG:49:口上セレクタ}
ELSE
	TRYCALLFORM M_KOJO_K{NO:49}
ENDIF
;49口上出力
SIF FLAG:口上色
	TRYCALLFORM M_KOJO%RESULTS%_COLOR_K{NO:49}

@EVENT_COUNTER_MESSAGE_SATORI
SIF TARGET <= 0
	RETURN 0
CALL DATUI_MESSAGE
SIF TCVAR:避妊
	CALL SET_HININ(TARGET)
RESULT = 0

@CTRL_CLOTHES_SET(C_ID, TYPE, ARG, ARGS)
#DIM  C_ID
#DIMS TYPE
SELECTCASE TYPE
;リセット用に記録する
CASE "現在衣装の保存_便装"
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(200 + LOCAL) = EQUIP:C_ID:LOCAL
	NEXT
CASE "現在衣装の保存_睡衣"
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(240 + LOCAL) = EQUIP:C_ID:LOCAL
	NEXT
CASE "現在衣装の保存_おきにいり"
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(600 + LOCAL) = EQUIP:C_ID:LOCAL
	NEXT
	CFLAG:ARG:套装 = 1

;リセット
CASE "套装のリセット"
	FOR LOCAL, 0, 23
		CFLAG:C_ID:(600 + LOCAL) = 0
	NEXT
	SIF CFLAG:C_ID:基本服装セット == 100
		CFLAG:C_ID:基本服装セット = 0
	SIF CFLAG:C_ID:睡衣指定 == 300
		CFLAG:C_ID:睡衣指定 = 0
	CFLAG:C_ID:套装 = 0

;セットした衣装をロード
;ここらへんあくまでロード処理であって睡衣フラグ是じらないので注意ね
CASE "現在衣装の変更_便装"
	FOR LOCAL, 1, 23
		EQUIP:C_ID:LOCAL = CFLAG:C_ID:(200 + LOCAL)
	NEXT
	CFLAG:C_ID:衣装一時変更 = 0
	CALL CTRL_CLOTHES_SET(C_ID, "内衣一括設定")

CASE "現在衣装の変更_睡衣"
	FOR LOCAL, 1, 23
		EQUIP:C_ID:LOCAL = CFLAG:C_ID:(240 + LOCAL)
	NEXT
	IF CFLAG:C_ID:睡衣胖次 == 100
		EQUIP:C_ID:下半身内衣１ = 0
		EQUIP:C_ID:下半身内衣２ = 0
		CFLAG:C_ID:245 = 0
		CFLAG:C_ID:246 = 0
		CFLAG:C_ID:睡衣胖次 = 0
		CFLAG:C_ID:没穿内裤 = 1
	ELSEIF CFLAG:C_ID:没穿内裤 && CFLAG:C_ID:睡衣胖次
		EQUIP:C_ID:下半身内衣１ = 0
		EQUIP:C_ID:下半身内衣２ = CFLAG:C_ID:睡衣胖次
		SIF !CFLAG:C_ID:245
			CFLAG:C_ID:246 = CFLAG:C_ID:睡衣胖次
		CFLAG:C_ID:睡衣胖次 = 0
		CFLAG:C_ID:没穿内裤 = 0
	ELSEIF CFLAG:C_ID:没穿内裤 && (EQUIP:C_ID:下半身内衣１ || EQUIP:C_ID:下半身内衣２)
		EQUIP:C_ID:下半身内衣１ = 0
		EQUIP:C_ID:下半身内衣２ = 0
		CFLAG:C_ID:245 = 0
		CFLAG:C_ID:246 = 0
	ENDIF
	CFLAG:C_ID:衣装一時変更 = 0

CASE "現在衣装の変更_おきにいり"
	FOR LOCAL, 1, 23
		EQUIP:C_ID:LOCAL = CFLAG:C_ID:(600 + LOCAL)
	NEXT
	IF CFLAG:C_ID:没穿内裤
		EQUIP:C_ID:下半身内衣１ = 0
		EQUIP:C_ID:下半身内衣２ = 0
	ELSEIF EQUIP:C_ID:下半身内衣１
		EQUIP:C_ID:下半身内衣２ = 0
	ELSEIF EQUIP:C_ID:下半身内衣２
		EQUIP:C_ID:下半身内衣１ = 0
	ELSEIF CFLAG:C_ID:睡衣
		EQUIP:C_ID:下半身内衣２ = CFLAG:C_ID:246
	ELSE
		EQUIP:C_ID:下半身内衣２ = CFLAG:C_ID:206
	ENDIF
	CFLAG:C_ID:衣装一時変更 = 100

CASE "現在衣装の変更_角色衣装"
;ARGで指定された角色の衣装を参照する
	CFLAG:C_ID:衣装一時変更 = 100 + ARG
	FOR LOCAL, 1, 23
		EQUIP:C_ID:LOCAL = GET_INT(C_ID, "角色データ", ARG, @"%ARGS%：%EQUIPNAME:LOCAL%")
	NEXT
	CALL CTRL_CLOTHES_SET(C_ID, "内衣一括設定")

CASE "現在衣装の変更_衣装セット"
;ARGで指定されたIDの衣装セットを参照する
	CFLAG:C_ID:衣装一時変更 = ARG
	FOR LOCAL, 1, 23
		EQUIP:C_ID:LOCAL = GET_INT(C_ID, "衣装セット", ARG, EQUIPNAME:LOCAL)
	NEXT
	CALL CTRL_CLOTHES_SET(C_ID, "内衣一括設定")
CASE "内衣一括設定"
	CALL CTRL_CLOTHES_SET(C_ID, "胖次一括設定")
	CALL CTRL_CLOTHES_SET(C_ID, "ブラ一括設定")
CASE "胖次一括設定"
	IF !CFLAG:C_ID:睡衣
		IF CFLAG:C_ID:没穿内裤
			EQUIP:C_ID:下半身内衣１ = 0
			EQUIP:C_ID:下半身内衣２ = 0
		ELSEIF EQUIP:C_ID:下半身内衣１
			EQUIP:C_ID:下半身内衣２ = 0
		ELSE
			EQUIP:C_ID:下半身内衣２ = CFLAG:C_ID:きょうのぱんつ
		ENDIF
	ELSE
		IF CFLAG:C_ID:没穿内裤
			EQUIP:C_ID:下半身内衣１ = 0
			EQUIP:C_ID:下半身内衣２ = 0
		ELSEIF EQUIP:C_ID:下半身内衣１
			EQUIP:C_ID:下半身内衣２ = 0
		ELSE
			EQUIP:C_ID:下半身内衣２ = CFLAG:C_ID:246
		ENDIF
	ENDIF
CASE "ブラ一括設定"
	IF !CFLAG:C_ID:睡衣
		EQUIP:C_ID:上半身内衣１ = CFLAG:C_ID:きょうのブラ
	ELSE
		EQUIP:C_ID:上半身内衣１ = CFLAG:C_ID:247
	ENDIF

;脱衣処理
CASE "現在衣装の変更_全裸"
	FOR LOCAL, 1, 23
		SIF LOCAL == 3 && FLAG:時間停止
			CONTINUE
		SIF LOCAL == 4 && EQUIP:C_ID:靴
			CONTINUE
		EQUIP:C_ID:LOCAL = 0
	NEXT

CASE "現在衣装の変更_内衣姿"
;このコードなんか気持ち悪いんだけどとりあえずこのままで
	FOR LOCAL, 18, 10, -1
		EQUIP:C_ID:LOCAL = 0
	NEXT
	EQUIP:C_ID:帽子 = 0
	TEQUIP:C_ID:上半身着衣状況 = 2
	TEQUIP:C_ID:上衣脱衣完毕 = 1

CASE "現在衣装の変更_半脱"
	EQUIP:C_ID:上半身内衣１ = 0
	TEQUIP:C_ID:上半身裸露状態 = 1
	SIF EQUIP:C_ID:裤子
		EQUIP:C_ID:裤子 = 0

CASE "便装の変更_角色衣装"
;ARGで指定された角色のARGSで指定された衣装を参照する
	CFLAG:C_ID:基本服装セット = 100 + ARG
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(200 + LOCAL) = GET_INT(C_ID, "角色データ", ARG, @"%ARGS%：%EQUIPNAME:LOCAL%")
	NEXT

CASE "便装の変更_衣装セット"
;ARGで指定されたIDの衣装セットを参照する
	CFLAG:C_ID:基本服装セット = ARG
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(200 + LOCAL) = GET_INT(C_ID, "衣装セット", ARG, EQUIPNAME:LOCAL)
	NEXT
CASE "便装の変更_套装"
	CFLAG:C_ID:基本服装セット = 100
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(200 + LOCAL) = CFLAG:C_ID:(600 + LOCAL)
	NEXT

CASE "睡衣的变更_角色衣装"
;ARGで指定された角色のARGSで指定された衣装を参照する
	CFLAG:C_ID:睡衣指定 = 100 + ARG
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(240 + LOCAL) = GET_INT(C_ID, "角色データ", ARG, @"%ARGS%：%EQUIPNAME:LOCAL%")
	NEXT
CASE "睡衣的变更_衣装セット"
	CFLAG:C_ID:睡衣指定 = ARG
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(240 + LOCAL) = GET_INT(C_ID, "衣装セット", ARG, EQUIPNAME:LOCAL)
	NEXT
CASE "睡衣的变更_套装"
	CFLAG:C_ID:睡衣指定 = 300
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(240 + LOCAL) = CFLAG:C_ID:(600 + LOCAL)
	NEXT
CASE "睡衣的变更_针织衫"
	CFLAG:C_ID:睡衣指定 = 301
	FOR LOCAL, 0, 23
		CFLAG:C_ID:(240 + LOCAL) = 0
	NEXT
	CFLAG:C_ID:246 = CFLAG:C_ID:睡衣胖次
	SIF CFLAG:C_ID:246 == 100
		CFLAG:C_ID:246 = 0

CASE "睡衣的变更_全裸"
	CFLAG:C_ID:睡衣指定 = 302
	FOR LOCAL, 0, 23
		CFLAG:C_ID:(240 + LOCAL) = 0
	NEXT
	CFLAG:C_ID:睡衣胖次 = 100

CASE "套装の変更_角色衣装"
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(600 + LOCAL) = GET_INT(C_ID, "角色データ", ARG, @"%ARGS%：%EQUIPNAME:LOCAL%")
	NEXT
	CFLAG:C_ID:套装 = 1

CASE "套装の変更_衣装セット"
	FOR LOCAL, 1, 23
		CFLAG:C_ID:(600 + LOCAL) = GET_INT(C_ID, "衣装セット", ARG, EQUIPNAME:LOCAL)
	NEXT
	CFLAG:C_ID:套装 = 1
ENDSELECT
IF CFLAG:49:998 == 1
	IF CFLAG:49:1538 == 1
	;EQUIP:49:飾品 = 0;1
	;1.眼鏡 2.袖 3.首飾 4.御札 5.風鏡 6.傘 7.太阳镜 8.鎖
	EQUIP:49:帽子 = 0;2
	;1.帽子 2.发饰 3.蝴蝶結 4.白色女僕髮箍 5.髮箍 6.面 7.頭巾 8.烏帽子 9.兎耳髮箍 10.鴨舌帽 11.小碗 12.束髪簪 13.睡帽 14.头巾帽 15.兜巾 16.頭套 17.三角巾
	;18.頭戴式受话器・耳麦 19.頭戴式耳机 20.護士帽 21.聖誕帽 22.遮陽帽 23.麦藁帽子 24.学帽 25.冕冠 26.小丑帽 27.手巾 28.笠 29.兜帽 30.婚紗頭罩 31.牛仔帽
	;EQUIP:49:靴 = 0;3
	;1.靴 2.木屐 3.長靴 4.高筒靴 5.雪駄 6.高跟鞋 7.護士凉鞋 8.草履 9.長靴 10.運動鞋
	;11.平底鞋 12.皮鞋 13.胶皮底布鞋子 14.沓 15.穆勒鞋 16.涼鞋
	;EQUIP:49:襪子 = 0;4
	;1.襪子 2.長筒襪 3.半透明連裤襪 4.吊帯襪 5.高筒襪 6.網襪 7.短布襪 8.裤襪 9.蝴蝶結
	EQUIP:49:下半身内衣１ = 0;5
	;ずらし不可
	;1.兜襠布 2.Ｃ字袴 3.創口貼 4.安全褲 5.貞操帯 6.陰唇環 7.陰蒂環
	EQUIP:49:下半身内衣２ = 0;6
	;ずらし可
	;0.没穿内裤 1.四角裤 2.灯笼裤 3.小熊胖次 4.波点胖次 5.條紋胖次 6.褶邊胖次 7.純色胖次 10.低腰胖次 11.低腰緊身胖次 12.高開叉胖次 13.蕾絲胖次（白）
	;14.蕾絲胖次（黒） 15.Ｔ字褲 16.繩系胖次 17.皮革胖次 18.高级时尚内裤 19.三角胖次 20.超短胖次 21.兜襠布 22.丁字褲 23.透明胖次
	;24.開放式胖次 25.創口貼 26.拉链（屁股处可開） 27.貞操帯 28.触手胖次 29.振動棒胖次 30.二穴振動棒胖次 31.比基尼内袴 32.微型内裤
	EQUIP:49:上半身内衣１ = 0;7
	;はだけ不可
	;1.文胸 2.裹胸 3.運動文胸 4.吊帯衫 5.創口貼 6.乳貼（星型） 7.乳貼（心型） 8.乳環 9.吊帯式文胸 10.Ｔ恤衬衫 11.蕾丝胸罩（白） 12.蕾丝胸罩（黒）
	;13.高级时尚胸罩 14.透明胸罩 15.露两点胸罩 16.抹胸胸罩 17.贞操带胸罩 18.触手胸罩 19.比基尼文胸 20.微型管式胸罩 21.背带裙衣
	EQUIP:49:上半身内衣２ = 0;8
	;はだけ可
	;1.比基尼文胸 2.微型文胸 3.有色衬衫
	;EQUIP:49:緊身内衣 = 0;9
	;1.緊身内衣 2.贴身长筒袜（黒） 3.贴身长筒袜（赤） 4.兔女郎服（黒） 5.兔女郎服（赤） 6.死库水泳衣 7.競泳水着 8.連体泳装 9.Y字型内衣 10.保暖内衣 11.鎖帷子
	;EQUIP:49:連体内衣 = 0;10
	;1.連体内衣 2.膠衣 3.機車夾克
	;EQUIP:49:裤子 = 0;11
	;ずらし不可
	;1.裤子 2.短裤 3.睡裤 4.热裤 5.連体工作服 6.袴 7.作業裤 8.指貫袴 9.运动短裤 10.五分裤
	;11.南瓜裤 21.西裤 22 作務衣（下）
	;EQUIP:49:連衣裙 = 0;13
	;1.連衣裙 2.背带裙衣 3.围裙洋装 4.旗袍 5.法衣 6.道士服 7.晚禮服 8.長睡衣 9.哥特洛麗塔 10.護士服
	;11.罩衫 12.布偶装 13.浴衣 14.連衣裙（白） 15.肌襦袢 16.婚紗禮服 17.旗袍（裤子）
	;EQUIP:49:和服 = 0;14
	;1.和服 2.千早 3.襦袢 4.浴衣 5.道着 6.白装束 7.忍装束
	EQUIP:49:裙子 = 0;15
	;1.裙子 2.長裙 3.睡衣裙子 4.行灯袴 5.吊帯裙 6.无袖連衣裙 7.迷你裙 8.連体裙 9.三色裙子
	EQUIP:49:上身衣服２ = 0;16
	;はだけ可
	;1.女式衬衫 2.无袖女式衬衫 3.上身睡衣 4.守矢的巫女服 5.開胸高领毛衣 6.抹胸 7.吊帯背心 8.吊帯衫 9.短袖女式衬衫 10.褶边女式衬衫 11.体操服
	;12.運動夾克衫 13.白衬衫 14.道着 15.小紋 16.長着 17.Ｔ恤衬衫 18.白小袖 19.无袖服 20.地獄Ｔ恤衬衫
	;EQUIP:49:上身衣服１ = 0;17
	;はだけ不可
	;1.無袖外套 2.水手服 3.外套 4.西装上衣 5.博麗的巫女服 6.衬衫 8.作務衣（上） 9.水干 10.狩衣
	;EQUIP:49:外搭 = 0;18
	;1.披肩 2.斗篷 3.披肩斗篷 4.主妇服 5.褞袍 6.羽织 7.白衣 8.防風衣 9.背心 10.作業服
	;11.連帽風衣 12.学生服 13.夹克衫 14.西装夹克 15.鎧 16.作業圍裙
	;EQUIP:49:其他１ = 0;19
	;EQUIP:49:其他２ = 0;20
	;EQUIP:49:其他３ = 0;21
	;1.眼帯 2.耳环 3.项圈 4.颈环 5.领带 6.围巾 7.帯 8.吊帯 9.荒縄 10.拘束具
	;11.双背帯书包 12.帆布背包 13.注連縄 14.羽衣 15.绷帯 16.手链 17.网格吊帯 18.丝帯项链 19.領巾 20乳紐
	;21.背帯 22.护符 23.丝帯領巾 24.蝴蝶結 25.胶帯 26.触须 27.飯粒 28.吐司 29.桃 30.生理用品
	;31.惑星 32.单肩包 33.小型挎包 34.葛籠 35.烟袋 36.胸针 37.石像 38.雛雞 39.甲羅 40.结丝巾
	;41.小判 42.袋子 43.勾玉 44.三脚 45.勺子
	;EQUIP:49:腕部装束 = 0;22
	;1.手甲 2.皮手套 3.作業用手套 4.露指手套 5.絲綢手套 6.金屬護手 7.袖套 8.拇指托 9.臂套 10.手环 11.蝴蝶結
	ELSEIF CFLAG:49:1525 == 5
	EQUIP:49:飾品 = 0;1
	;1.眼鏡 2.袖 3.首飾 4.御札 5.風鏡 6.傘 7.太阳镜 8.鎖
	EQUIP:49:帽子 = 132;2
	;1.帽子 2.发饰 3.蝴蝶結 4.白色女僕髮箍 5.髮箍 6.面 7.頭巾 8.烏帽子 9.兎耳髮箍 10.鴨舌帽 11.小碗 12.束髪簪 13.睡帽 14.头巾帽 15.兜巾 16.頭套 17.三角巾
	;18.頭戴式受话器・耳麦 19.頭戴式耳机 20.護士帽 21.聖誕帽 22.遮陽帽 23.麦藁帽子 24.学帽 25.冕冠 26.小丑帽 27.手巾 28.笠 29.兜帽 30.婚紗頭罩 31.牛仔帽
	EQUIP:49:靴 = 0;3
	;1.靴 2.木屐 3.長靴 4.高筒靴 5.雪駄 6.高跟鞋 7.護士凉鞋 8.草履 9.長靴 10.運動鞋
	;11.平底鞋 12.皮鞋 13.胶皮底布鞋子 14.沓 15.穆勒鞋 16.涼鞋
	EQUIP:49:襪子 = 2;4
	;1.襪子 2.長筒襪 3.半透明連裤襪 4.吊帯襪 5.高筒襪 6.網襪 7.短布襪 8.裤襪 9.蝴蝶結
	EQUIP:49:下半身内衣１ = 0;5
	;ずらし不可
	;1.兜襠布 2.Ｃ字袴 3.創口貼 4.安全褲 5.貞操帯 6.陰唇環 7.陰蒂環
	EQUIP:49:下半身内衣２ = 0;6
	;ずらし可
	;0.没穿内裤 1.四角裤 2.灯笼裤 3.小熊胖次 4.波点胖次 5.條紋胖次 6.褶邊胖次 7.純色胖次 10.低腰胖次 11.低腰緊身胖次 12.高開叉胖次 13.蕾絲胖次（白）
	;14.蕾絲胖次（黒） 15.Ｔ字褲 16.繩系胖次 17.皮革胖次 18.高级时尚内裤 19.三角胖次 20.超短胖次 21.兜襠布 22.丁字褲 23.透明胖次
	;24.開放式胖次 25.創口貼 26.拉链（屁股处可開） 27.貞操帯 28.触手胖次 29.振動棒胖次 30.二穴振動棒胖次 31.比基尼内袴 32.微型内裤
	EQUIP:49:上半身内衣１ = 0;7
	;はだけ不可
	;1.文胸 2.裹胸 3.運動文胸 4.吊帯衫 5.創口貼 6.乳貼（星型） 7.乳貼（心型） 8.乳環 9.吊帯式文胸 10.Ｔ恤衬衫 11.蕾丝胸罩（白） 12.蕾丝胸罩（黒）
	;13.高级时尚胸罩 14.透明胸罩 15.露两点胸罩 16.抹胸胸罩 17.贞操带胸罩 18.触手胸罩 19.比基尼文胸 20.微型管式胸罩 21.背带裙衣
	EQUIP:49:上半身内衣２ = 0;8
	;はだけ可
	;1.比基尼文胸 2.微型文胸 3.有色衬衫
	EQUIP:49:緊身内衣 = 0;9
	;1.緊身内衣 2.贴身长筒袜（黒） 3.贴身长筒袜（赤） 4.兔女郎服（黒） 5.兔女郎服（赤） 6.死库水泳衣 7.競泳水着 8.連体泳装 9.Y字型内衣 10.保暖内衣 11.鎖帷子
	EQUIP:49:連体内衣 = 0;10
	;1.連体内衣 2.膠衣 3.機車夾克
	EQUIP:49:裤子 = 0;11
	;ずらし不可
	;1.裤子 2.短裤 3.睡裤 4.热裤 5.連体工作服 6.袴 7.作業裤 8.指貫袴 9.运动短裤 10.五分裤
	;11.南瓜裤 21.西裤 22 作務衣（下）
	EQUIP:49:連衣裙 = 0;13
	;1.連衣裙 2.背带裙衣 3.围裙洋装 4.旗袍 5.法衣 6.道士服 7.晚禮服 8.長睡衣 9.哥特洛麗塔 10.護士服
	;11.罩衫 12.布偶装 13.浴衣 14.連衣裙（白） 15.肌襦袢 16.婚紗禮服 17.旗袍（裤子）
	EQUIP:49:和服 = 0;14
	;1.和服 2.千早 3.襦袢 4.浴衣 5.道着 6.白装束 7.忍装束
	EQUIP:49:裙子 = 0;15
	;1.裙子 2.長裙 3.睡衣裙子 4.行灯袴 5.吊帯裙 6.无袖連衣裙 7.迷你裙 8.連体裙 9.三色裙子
	EQUIP:49:上身衣服２ = 0;16
	;はだけ可
	;1.女式衬衫 2.无袖女式衬衫 3.上身睡衣 4.守矢的巫女服 5.開胸高领毛衣 6.抹胸 7.吊帯背心 8.吊帯衫 9.短袖女式衬衫 10.褶边女式衬衫 11.体操服
	;12.運動夾克衫 13.白衬衫 14.道着 15.小紋 16.長着 17.Ｔ恤衬衫 18.白小袖 19.无袖服 20.地獄Ｔ恤衬衫
	EQUIP:49:上身衣服１ = 0;17
	;はだけ不可
	;1.無袖外套 2.水手服 3.外套 4.西装上衣 5.博麗的巫女服 6.衬衫 8.作務衣（上） 9.水干 10.狩衣
	EQUIP:49:外搭 = 0;18
	;1.披肩 2.斗篷 3.披肩斗篷 4.主妇服 5.褞袍 6.羽织 7.白衣 8.防風衣 9.背心 10.作業服
	;11.連帽風衣 12.学生服 13.夹克衫 14.西装夹克 15.鎧 16.作業圍裙
	EQUIP:49:其他１ = 0;19
	EQUIP:49:其他２ = 147;20
	EQUIP:49:其他３ = 3;21
	;1.眼帯 2.耳环 3.项圈 4.颈环 5.领带 6.围巾 7.帯 8.吊帯 9.荒縄 10.拘束具
	;11.双背帯书包 12.帆布背包 13.注連縄 14.羽衣 15.绷帯 16.手链 17.网格吊帯 18.丝帯项链 19.領巾 20乳紐
	;21.背帯 22.护符 23.丝帯領巾 24.蝴蝶結 25.胶帯 26.触须 27.飯粒 28.吐司 29.桃 30.生理用品
	;31.惑星 32.单肩包 33.小型挎包 34.葛籠 35.烟袋 36.胸针 37.石像 38.雛雞 39.甲羅 40.结丝巾
	;41.小判 42.袋子 43.勾玉 44.三脚 45.勺子
	EQUIP:49:腕部装束 = 0;22
	;1.手甲 2.皮手套 3.作業用手套 4.露指手套 5.絲綢手套 6.金屬護手 7.袖套 8.拇指托 9.臂套 10.手环 11.蝴蝶結
	ENDIF
	IF CFLAG:49:1537 == 1
		EQUIP:49:其他１ = 150
	ENDIF
	IF TALENT:49:0 == 1 && TALENT:49:恋慕 == 0
		IF CFLAG:49:1538 == 1 || CFLAG:49:1525 == 5
			EQUIP:49:下半身内衣２ = 0
		ELSE
			EQUIP:49:下半身内衣２ = 33
		ENDIF
	ELSE
		IF CFLAG:49:1538 == 1 || CFLAG:49:1525 == 5
			EQUIP:49:下半身内衣２ = 0
		ELSE
			IF !CFLAG:49:睡衣
				IF CFLAG:49:没穿内裤
					CFLAG:49:205 = 0
					CFLAG:49:206 = 0
				ELSEIF EQUIP:49:下半身内衣１
					CFLAG:49:206 = 0
				ELSE
					CFLAG:49:206 = CFLAG:49:きょうのぱんつ
				ENDIF
			ELSE
				IF CFLAG:49:没穿内裤
					CFLAG:49:205 = 0
					CFLAG:49:206 = 0
				ELSEIF EQUIP:49:下半身内衣１
					CFLAG:49:206 = 0
				ELSE
					CFLAG:49:206 = CFLAG:49:246
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF

@EXIST_其他衣装150
#LOCALSIZE 1
#LOCALSSIZE 1
@其他衣装150(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "淫纹")
CASE "装備部位"
	CALLF MAKE_STR(V_NAME, "「其他１」「其他２」「其他３」")
ENDSELECT

@EXIST_其他衣装147
#LOCALSIZE 1
#LOCALSSIZE 1
@其他衣装147(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "嵌入式猫尾")
CASE "装備部位"
	CALLF MAKE_STR(V_NAME, "「其他１」「其他２」「其他３」")
ENDSELECT

@EXIST_頭装備132
#LOCALSIZE 1
#LOCALSSIZE 1
@頭装備132(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "猫耳头饰")
CASE "装備部位"
	CALLF MAKE_STR(V_NAME, "「帽子」")
ENDSELECT

@EXIST_下半身内衣_ずらし可能33
#LOCALSIZE 1
#LOCALSSIZE 1

@下半身内衣_ずらし可能33(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "御札")
CASE "描写"
	CALLF MAKE_STR(V_NAME, "紧密贴合饱满耻丘的博麗")
CASE "半透明(前)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "半透明(後)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "関連内衣"
	CALLF MAKE_INT(V_NAME, 0)
ENDSELECT

@EXIST_外搭150
#LOCALSIZE 1
#LOCALSSIZE 1

@外搭150(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "名前"
	CALLF MAKE_STR(V_NAME, "暗色连帽长袍")
CASE "装備部位"
	CALLF MAKE_STR(V_NAME, "「外搭」")
ENDSELECT

@催眠时恋在场反应
SELECTCASE CFLAG:49:1539
	CASE 1
		PRINTFORML 恋好奇的凑过来见证姐姐的绝顶瞬间
	CASE 2
		PRINTFORML 无意识的恋飘来黏着覚大腿
	CASE 3
		PRINTFORML 恋在一旁认真听的样子
	CASE 4
		PRINTFORML 恋的帽子从一旁悄悄探出来
	CASE 11
		PRINTFORML 眼睛红红的恋在旁边陌落地咬着手指
	CASE 12
		PRINTFORML 无意识的恋望见甜品般垂涎欲滴的盯着覚
	CASE 13
		SELECTCASE CFLAG:49:1540
		CASE 7
			PRINTFORML 恋无意识地拨动着覚腿间地夹子
		CASE 8
			PRINTFORML 恋无意识的揪着覚胸口的夹子
		CASE 9
			PRINTFORML 恋无意识的抽插着覚菊穴中的拉珠
		ENDSELECT
	CASE 14
		PRINTFORML 恋慢悠悠飘过来将沾覚身上%CALLNAME:MASTER%的精液涂抹均匀
	CASE 21
		PRINTFORML 恋无意识地抚摸着覚小腹，感受来自深处的振动
	CASE 22
		PRINTFORML 恋与%CALLNAME:MASTER%一同品鉴着姐姐的裙底
	CASE 23
		PRINTFORML 恋无意识地飘来亲吻着亲姐姐的私处
	CASE 24
		PRINTFORML 恋不可思议的看着正在被狠狠抽打屁股的姐姐
	CASE 31

	CASE 32
		PRINTFORML 恋看%CALLNAME:MASTER%的目光多了一丝畏惧
	CASE 33
		PRINTFORML 恋捂住眼睛、从指缝间鼓起勇气偷看全身心侍奉%CALLNAME:MASTER%的姐姐
	CASE 34
		PRINTFORML 恋对现在的姐姐感到陌生，但又对覚痴迷的神情感到好奇
ENDSELECT

@催眠时阿空阿燐在场反应
IF CFLAG:36:300 == CFLAG:37:300
	IF CFLAG:0:300 == CFLAG:36:300
		PRINTFORM  阿燐、阿空
	ENDIF
ELSEIF CFLAG:36:300 == CFLAG:0:300
	PRINTFORM  阿燐
ELSEIF CFLAG:37:300 == CFLAG:0:300
	PRINTFORM  阿空
ENDIF
SELECTCASE CFLAG:49:1539
	CASE 1
		PRINTFORML 好奇地在一旁看着
	CASE 2
		PRINTFORML 将羞红的脸转向一旁
	CASE 3
		PRINTFORML 羞耻的涨红了脸
	CASE 4
		PRINTFORML 忍不住捂住耳朵
	CASE 11
		PRINTFORML 恶狠狠盯着玩弄主人身体的%CALLNAME:MASTER%
	CASE 12
		PRINTFORML 望着覚露出的膣肉止不住咽了咽口水
	CASE 13
		PRINTFORML 不理解主人为何被%CALLNAME:MASTER%肆意玩弄
	CASE 14
		PRINTFORML 忍不住提醒主人身上沾着脏东西…
	CASE 21
		PRINTFORML 担心的望着自己的饲主
	CASE 22
		PRINTFORML 望着覚%UNDER_SKIRT_DESCRIPTION(49)%止不住咽了咽口水
	CASE 23
		PRINTFORML 在一旁小声惊呼起来
	CASE 24
		PRINTFORML 看%CALLNAME:MASTER%的目光多了一分恐惧
	CASE 31

	CASE 32
		PRINTFORML 看覚的目光多了几分陌生
	CASE 33
		PRINTFORML 瞠目结舌地望着对%CALLNAME:MASTER%阴茎百般献媚的覚
	CASE 34
		PRINTFORML 看着覚痴迷的样子、内心动摇了起来
ENDSELECT

@告白被拒理由
PRINTL

PRINTBUTTON @"[所以拒绝古明地覚告白的理由是(%LOCALS%)]…Ps.请认真填写哦", @"%LOCALS%"
INPUTS
LOCALS = %RESULTS%
PRINTFORMW 「%RESULTS% 吗？」
CSTR:49:80 = %RESULTS%

;-------------------------------------------------
;関数名:ASS
;概　要:肛门の地の文
;%ASS(, 1)%
;-------------------------------------------------
@ASS(ARG,修飾語あり)
#FUNCTIONS
#DIM 修飾語あり

VARSET LOCALS
SIF !ARG
	ARG = TARGET
CALLF 下半身内衣チェック(TARGET)
IF 修飾語あり
	IF EXP:ARG:21 == 0
		LOCALS += "未被侵犯过的"
		SIF PALAM:潤滑 > PALAMLV:1
			LOCALS += "、但仍然"
	ELSEIF TCVAR:ARG:発情
		LOCALS += "放出浓厚雌性的气味"
		IF PALAM:潤滑 > PALAMLV:1
			LOCALS += "的同时、"
		ELSE
			LOCALS += "的"
		ENDIF
	ENDIF
	;潤滑LV4以上
	IF 充填率(TARGET,1) >= 100
		LOCALS += "无休止溢出着粘稠精液地"
	ELSEIF PALAM:潤滑 > PALAMLV:4
		LOCALS += "不断溢出黏滑腸液将臀瓣都粘在一起的"
	ELSEIF PALAM:潤滑 > PALAMLV:3
		LOCALS += "包裹着大团润滑粘液的"
	ELSEIF PALAM:潤滑 > PALAMLV:2
		LOCALS += "在腸液濕潤下湿透的"
	ELSEIF PALAM:潤滑 > PALAMLV:1
		LOCALS += "有点湿气的"
	ENDIF
	;矮小体型の有無で分岐
	IF TALENT:ARG:体型 == -1
			LOCALS += "小巧的"
	ELSEIF TALENT:ARG:体型 == -2
		LOCALS += TEXTR("光滑的/幼女的/漂亮的/未熟的")
	ENDIF
ENDIF

SELECTCASE RAND:5
	CASE 0
		LOCALS += "肛门"
	CASE 1
		LOCALS += "菊穴"
	CASE 2
		LOCALS += "尻穴"
	CASE 3
		LOCALS += "後庭小穴"
	CASE 4
		LOCALS += "菊門"
ENDSELECT
RETURNF LOCALS
;-------------------------------------------------
;関数名:SOCKS
;概　要:袜子の地の文
;%SOCKS(, 1)%
;-------------------------------------------------
@SOCKS(ARG,修飾語あり)
#FUNCTIONS
#DIM 修飾語あり
VARSET LOCALS
SIF !ARG
	ARG = TARGET
IF 修飾語あり
LOCALS += ""
ENDIF
;1.襪子 2.長筒襪 3.半透明連裤襪 4.吊帯襪 5.高筒襪 6.網襪 7.短布襪 8.裤襪 9.蝴蝶結
SELECTCASE DAY%7
	CASE 1
		LOCALS += "純白花邊的短襪"
	CASE 2
		LOCALS += "富有弹性的長筒襪"
	CASE 3
		LOCALS += "半透明的黑色連裤襪"
	CASE 4
		LOCALS += "大胆而富有情趣的蕾絲吊帯襪"
	CASE 5
		LOCALS += "与日常穿搭差异极大的性感风網襪"
	CASE 6
		LOCALS += "少女感满满的白絲裤襪"
	CASE 7
		LOCALS += "带有覚獨特氣味的厚黑絲褲襪"
ENDSELECT
RETURNF LOCALS

@全裸约会
SELECTCASE RAND:15
CASE 0
	PRINTFORML 「%CALLNAME:MASTER%……」
	PRINTFORML 「不知为什么……他们的妄想……好强烈……」
	PRINTFORMDL  路人对覚的色情妄想直直传入覚心中，强烈的妄想让覚仿佛置身其中
	PRINTFORMDW  意识朦胧不清的覚，淫液顺着光滑的大腿不断滴到地面……
	PALAM:49:9 += 1000
CASE 1
	PRINTFORMDL  色咪咪的路人向覚搭讪……
	PRINTFORMDL  ……不冷吗小姑娘，这样一丝不挂的在街上会感冒的哦……
	PRINTFORML 「离我远点，变态，别带着下流的想法接近我」
	PRINTFORML 「只是因为%CALLNAME:MASTER%让我这么穿而已，与你无关吧」
	PRINTFORMDW  一脸冰霜的覚意识不到问题，依旧维持的冷漠姿态更添一分色度……
CASE 2
	PRINTFORMDL  色咪咪的路人向%CALLNAME:MASTER%搭讪……
	PRINTFORMDL  ……小哥……那位是……
	PRINTFORMDL  ……怎么看都是……处理那方面问题的奴隶吧……
	PRINTFORMDL  ……无论脸还是身体都很精美，真让人羡慕，从哪儿买到的？……
	PRINTFORMDW  %CALLNAME:MASTER%笑了笑并不回答
CASE 3
	PRINTFORML 「%CALLNAME:MASTER%」
	PRINTFORML 「感受到好多视线在看着我们这里，为什么……」
	PRINTFORMDL  当然是因为覚什么都没穿啊
	PRINTFORML 「这是不正常的事吗」
	PRINTFORMDL  我用催眠改变了覚这方面的认知，所以才觉得没问题
	PRINTFORMW  「完全不懂你在说什么……」
CASE 4
	PRINTFORML 「大腿都湿掉了……」
	PRINTFORML 「%CALLNAME:MASTER%有纸可以帮我擦一下吗」
	PRINTFORMDL  就算擦了很快也会湿吧，不如不擦
	PRINTFORML 「可是那里黏糊糊的，路都要不会走了……」
	PRINTFORML 「之前怎么没碰到过这种问题」
	PRINTFORMDL  因为穿了内裤吧
	PRINTFORMW  「原来如此？」
	PALAM:49:9 += 1000
CASE 5
	PRINTFORMDL  色咪咪的路人向覚搭讪……
	PRINTFORMDL  ……总觉得很眼熟……
	PRINTFORMDL  ……是那个地底的覚妖怪吗，古明地……
	PRINTFORML 「……」
	PRINTFORMDL  打扰我的女友是有什么事吗？
	PRINTFORMDL  ……哈哈，没什么，看错了……
	PRINTFORMDW  ……再怎么说都不可能是那个大妖怪吧……
CASE 6
	PRINTFORMDL  要是说覚哪天知道了有人一直在对覚做过分的事情，覚会生气吗
	PRINTFORML 「不会……」
	PRINTFORMDL  要是那个人是我呢
	PRINTFORML 「会」
	PRINTFORMDL  覚生气了会杀掉我吗？
	PRINTFORMW 「……」
CASE 7
	PRINTFORMDL  明天醒来覚会不记得今天发生的事
	PRINTFORMDL  不管是被我要求做奇怪的事还是一丝不挂地陪我约会
	PRINTFORMDL  不仅过去、现在。未来也将一直一直玩弄覚的身体
	PRINTFORMDL  以这种不对等的方式……
	PRINTFORMDL  这样想来还有些伤感，是吧
	PRINTFORMW 「嗯……」
CASE 8
	PRINTFORMDL  解除了对覚的催眠
	PRINTFORMDL  覚一时间没能理解现在的状况
	PRINTFORML 「这是哪里……我的衣服呢……」
	PRINTFORMDL 覚大人赤裸着身体在和我甜蜜的约会呢
	PRINTFORML 「你在……开什么玩笑……」
	PRINTFORML 「到底对我做了什么！」
	PRINTFORMDL  ……
	PRINTFORMDW  在事态升级到无法挽回前再次施加了催眠
CASE 9
	PRINTFORMDL  为覚套上了项圈，覚像宠物一样被%CALLNAME:MASTER%牵在手中
	PRINTFORMDL  总觉得这样的场景牵着覚会更好
	PRINTFORML 「我不是%CALLNAME:MASTER%的宠物哦」
	PRINTFORMDL  你可以是
	PRINTFORMW 「这样吗——」
CASE 10
	PRINTFORMDL  想摸摸覚的胸捏~~
	PRINTFORML 「直接摸不就好了？」
	PRINTFORMDL  先征求覚的意见会显得更有礼貌吧
	PRINTFORMDL  %CALLNAME:MASTER%揉搓着覚%TEXTR("为了诱惑男性而存在/让男人们梦寐以求/")%%OPPAI_DESCRIPTION(49,1)%
	PRINTFORMDW  只是稍微拉扯下乳尖，胸部就俏皮的跳动起来……
CASE 11
	PRINTFORML 「%CALLNAME:MASTER%之前揉头发的时候，总是会把头发弄得很乱」
	PRINTFORML 「在外面的时候就请不要这样做了，会被认为是不梳洗就出门的妖怪」
	PRINTFORMDL  全裸妖怪可以不在意这种事情
	PRINTFORMW 「这两件事有什么关联吗？」
CASE 12
	PRINTFORMDL  想让全世界看到我和覚约会得样子
	PRINTFORMDL  这样没人会质疑我们之间的关系
	PRINTFORMDL  覚就永远属于我了
	PRINTFORMW 「你是三岁小孩吗，在说什么蠢话？」
	PRINTFORMDW  与平时无异的语气让%CALLNAME:MASTER%反复确认覚是否处于催眠状态
CASE 13
	PRINTFORML 「呜……」
	PRINTFORML 「子宫……被冲击着……好痛……」
	PRINTFORMDW  被数十人视奸着的覚，对妄想的抵抗也到了极限……
	PALAM:49:快Ｖ += 10000
	CALL ORGASM_ADD(49)
CASE 14
	PRINTFORMDL %CALLNAME:MASTER%命令覚分开穴口向向四周展示自己%UNDER_SKIRT_DESCRIPTION(49)%
	PRINTFORMDL 认知中本应正常不过的行为，不知为何让覚心跳加速
	PRINTFORMDL 四周议论纷纷的人群向%CALLNAME:TARGET%投来色情的目光
	IF PALAM:潤滑 > PALAMLV:4
		PRINTFORMDL %CALLNAME:TARGET%暴露出的秘所散发着芳醇的香味、淫穴分泌的粘稠爱液一丝丝滴到地上…
	ELSEIF PALAM:潤滑 > PALAMLV:2
		PRINTFORMDL 从%CALLNAME:TARGET%暴露的秘所中飘散出了充满欲情的蜜香…
	ENDIF
	PRINTFORML 「……」
	PRINTFORMW 「怎么好多人被吓跑了？我像吃人的妖怪吗？」
CASE 15
	PRINTFORM %CALLNAME:MASTER%
	SELECTCASE RAND:3
	CASE 0
		PRINTFORM 咕扭咕扭地玩弄着
	CASE 1
		PRINTFORM 为了奸淫而挤压抽动着手指，玩弄着
	CASE 2
		PRINTFORM 咕哩咕哩地丝毫没有顾虑地揉搓着
	CASE 4
		PRINTFORM 娑啦娑啦轻轻地撫摸着
	CASE 5
		PRINTFORM 指尖不断蹂躏着
	CASE 6
		PRINTFORM 稍稍粗暴地拉扯着
	ENDSELECT
	PRINTFORMDL 藏在包皮下的敏感小豆豆
	PRINTFORM 覚一脸茫然，
	SELECTCASE RAND:3
	CASE 0
		PRINTFORM 分泌的淫液湿透了%CALLNAME:MASTER%的手
	CASE 1
		PRINTFORM 强烈的刺激让腿不自覚发软
	CASE 2
		PRINTFORM 喉咙里压抑着娇滴滴的呻吟
	ENDSELECT
	PRINTFORMDL …
	EXP:49:0 ++
CASE 16
	PRINTFORM %CALLNAME:MASTER%的指尖毫不客气地伸进覚的菊穴，
	SELECTCASE RAND:4
	CASE 0
		PRINTFORM 为了更加深入而不断扣弄着内壁
	CASE 1
		PRINTFORM 指腹刺激着内部开发着覚的后庭性感带
	CASE 2
		PRINTFORM 两指粗暴地撑开柔嫩紧致的穴肉
	CASE 3
		PRINTFORM 指根没入不断抽插着
	ENDSELECT
	PRINTFORMDL …
	PRINTFORM 覚
	PRINTFORM 露出恍惚的表情，
	PRINTFORMDL 任凭%CALLNAME:MASTER%开发自己的后庭
	PRINTFORML 「啊~~~嗯~~~呜姆~~~~~」
	SIF GET_TARGETNUM() > 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB()
	PRINTFORMDW 覚抑制不住的娇喘吸引来不少人围观
	EXP:49:2 ++
CASE 17
	PRINTFORM %CALLNAME:MASTER%的手指
	PRINTFORM 慢慢地挿入到
	PRINTFORMDL 覚赤裸的膣口内…
	PRINTFORM %CALLNAME:49%
	IF TALENT:処女 == 1
		PRINTFORMDL 欣然接受了%CALLNAME:MASTER%在抚摸自己处女膜这件事…
		PRINTFORML 「感觉如何？」
	ELSE
		PRINTFORMDL 流出了口水、貪求着快感挺起了腰…
		PRINTFORML 「呜……好棒……」
		EXP:49:1 ++
	ENDIF
	SIF GET_TARGETNUM() > 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB()
	PRINTFORMDW 一旁的路人发出了惊呼……
CASE 18
	PRINTFORMDL 覚用臀肉蹭着%CALLNAME:MASTER%的手心，任由%CALLNAME:MASTER%玩弄自己%HIP(TARGET)%
	PRINTFORMDL 雪白的臀部暴露在路人的视野里……
	PRINTFORMDL 覚有些不解为何大家在用异样的目光看着自己
	PRINTFORMW 「莫名其妙……」
CASE 19
	PRINTFORMDL %CALLNAME:MASTER%将手高高抬起，重重落在覚%HIP(TARGET)%
	PRINTFORMDL 搓揉的同时，覚白皙的臀部留下了难以消去的掌印
	PRINTFORML 「很疼欸，为什么打我」
	PRINTFORMW 「无缘无故挨打总觉得有点生气」
ENDSELECT

@寸止中
IF CFLAG:1541 == 1
	IF TEQUIP:50 == PLAYER || TEQUIP:51 == PLAYER
	PRINTFORMDL  <射精抑制中>
		SELECTCASE CFLAG:49:1544
		CASE 0 TO 3
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「已经忍不住要射了吗？」
				PRINTFORMW 「哼哼~杂鱼肉棒」
			CASE 1
				PRINTFORML 「已经痛到不行了啊」
				PRINTFORMW 「果然%CALLNAME:MASTER%作为我的做爱对象来说还远不够格」
			CASE 2
				PRINTFORML 「真是丢人~这样下去可不行哦」
				PRINTFORMW 「距离我满足还差得远呢」
			ENDSELECT
		CASE 4 TO 6
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「直到无法思考其他多余的事」
				PRINTFORMW 「我会想方设法让%CALLNAME:MASTER%保持舒服」
			CASE 1
				PRINTFORML 「怎么还不射出来呢？明明想射想到疯掉」
				PRINTFORMW 「啊，原来是肉棒被我系上了狗链，在我允许之前都不配射精」
			CASE 2
				PRINTFORML 「还有大把时间可以享受，%CALLNAME:MASTER%来挑战一下身体的极限如何」
				PRINTFORMW 「绝对会很有趣」
			ENDSELECT
		CASE 7 TO 9
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「再忍耐一下下」
				PRINTFORMW 「%CALLNAME:MASTER%一定能做到吧？」
			CASE 1
				PRINTFORML 「让我玩的再尽兴一点嘛」
				PRINTFORMW 「就保持现在这样…比平时膨胀到极限的状态还要大上一圈的状态…」
			CASE 2
				PRINTFORML 「好烫……好硬……」
				PRINTFORMW 「即便是%CALLNAME:MASTER%这样弱小的人类……努力的话也能令我满意……」
			ENDSELECT
		CASE 10
			PRINTFORML 「好啦好啦，再继续抑制下去%CALLNAME:MASTER%就要变成一次性玩具了」
			PRINTFORMW 「赏赐你释放的权限，为此拼尽全力射精来取悦我吧！」
		ENDSELECT
	ENDIF
ELSE
ENDIF

@透明人事件
IF CFLAG:49:1521 == 0 && CFLAG:49:1520 == 1 && TALENT:49:恋慕 == 1
	PRINTFORML 古明地覚再三确认大门是否关好
	PRINTFORML 即便如此，总觉得能感受到从身后传来的视线…
	CFLAG:49:1521 = 1
ELSEIF CFLAG:49:1521 == 1
	PRINTFORMDL 咚、咚、咚——
	PRINTFORMDL 有人不断敲叩着地灵殿大门
	PRINTFORMDW 宠物少女闻声前去查看，有几件潮湿衣物杂乱的堆在地灵殿门口
	CFLAG:49:1521 = 2
ELSEIF CFLAG:49:1521 < 6 && CFLAG:49:1521 >= 2
	SELECTCASE RAND:4
	CASE 0
		PRINTFORMDL %TEXTR("恋/阿燐/阿空/")%在上厕所时总觉得能感到视线
		PRINTFORMDW 与其说是感到视线，更像是被近在眼前却无法察覚的人直直盯着，各种不自在……
	CASE 1
		PRINTFORMDL %CALLNAME:38%的裙子被突如其来的大风掀了起来，露出了%UNDER_SKIRT_DESCRIPTION(38)%
		PRINTFORMDW %CALLNAME:38%惊叫着想按下裙摆，但不知为何怎样都按不下去
	CASE 2
		PRINTFORMDW %TEXTR("恋/阿燐/阿空/")%洗澡时用了新买的洗发水，但似乎不太好用，有橡胶一样的白色小球黏在了头发上
	CASE 3
		PRINTFORMDL %TEXTR("阿燐/阿空/")%在弯腰清理房间时被千年杀袭击了
		PRINTFORMDL 袭击者的手指挤开密闭的柔肉，连带着内裤直直捅进菊穴内部
		PRINTFORMDW 从疼痛中缓过神，袭击者早已不知踪影
	ENDSELECT
	CFLAG:49:1521 ++
ELSEIF CFLAG:49:1521 == 6
	PRINTFORMDL 最近周围人发生的种种怪异事件困扰着覚
	CFLAG:49:2 -=50
	PRINTFORMDL 虽然并不认为是%CALLNAME:MASTER%的所作所为，但不可避免产生了怀疑
	PRINTFORMDL 古明地覚对%CALLNAME:MASTER%的好感下降了
	PRINTFORMDW 好感度 -50(覚)
	PRINTFORMDW 看来得在问题进一步扩大之前解决掉了
	CFLAG:49:1521 = 7
	CFLAG:49:1520 = 2
ELSEIF CFLAG:49:1521 < 14 && CFLAG:49:1521 >= 7
	SELECTCASE RAND:5
	CASE 0
		PRINTFORMDL 古明地覚半夜不知为何醒了过来，困倦的同时总觉得脸上沾了黏糊糊的液体
		PRINTFORMDL 因为太困所以潦草地洗了把脸后继续睡了……
		PRINTFORMDL 精液経験 +1(覚)
	CASE 1
		PRINTFORMDL 置备茶水的宠物少女一如既往为覚送上睡前最后的茶水
		PRINTFORMDL 覚一边思考着最近发生的事边将茶杯送到嘴边，茶水入口又腥又苦的味道冲得覚连连咳嗽
		PRINTFORMDW 向宠物少女兴师问罪似乎也没什么结果……
		PRINTFORMDW 精飲経験 +1(覚)
		EXP:49:15 ++
	CASE 2
		PRINTFORML 时不时能闻到一股气味，很熟悉可又完全记不清是在哪儿闻到过
		PRINTFORML 说起来今天起床时胖次又找不到了
		PRINTFORMW 幻想乡女孩子胖次会离奇消失的奇怪现象也轮到我头上了吗
	CASE 3
		PRINTFORMDL 深夜惊醒的覚发现身下床单多了一块湿热的水渍
		PRINTFORMDL 不管是什么液体，顾及到自己的颜面，覚将床单连夜销毁了……
		PRINTFORMDL 道具使用経験 +3(覚)
		EXP:49:28 += 3
	CASE 4
		PRINTFORMDL 覚的性欲不自然的高涨着
		PRINTFORMDL 即使睡着了，下身也止不住地分泌着淫液……
		PRINTFORMDL 藥経験 +1(覚)
	ENDSELECT
	CFLAG:49:340 += 500
	CFLAG:49:1521 ++
ELSEIF CFLAG:49:1521 == 14
	PRINTFORMDW 明天也该陪覚出去走走了，不知不覚冷落了她那么久……
	PRINTFORMDW 现在的话，还没到无法挽回的地步
	CFLAG:49:1521 ++
ELSEIF CFLAG:49:1521 == 15
	IF FIRSTTIME("透明人获胜")
		PRINTFORMDW ……睡着了吗……
		PRINTFORMDW ……终于让我等来这一天了……
		PRINTFORMDW ……永远亭的药比想象中还要好用……
		PRINTFORMDW ……直到天亮之前怎样做都不会醒……
		IF EXP:49:27 == 0
			CFLAG:49:初吻喪失記念日 = DAY
			TALENT:49:無接吻経験 = 0
			CSTR:49:初吻喪失履歴 = 在透明人事件中，被不认识的人迷奸时夺去了初吻
		ENDIF
		PRINTFORMDW 接吻経験 +1(覚)
		PRINTFORMDW 乳交経験 +1(覚)
		PRINTFORMDW ……我说过…我的失败人生从遇到你开始逆转……
		PRINTFORMDW ……那时候，明明注意到了我却假装不知道……
		PRINTFORMDW ……真是彻头彻尾的碧池……
		PRINTFORMDW ……我的生命……要怎么做才能补偿我……
		PRINTFORMDW ……现在……就让你体会一下我复仇的怒火……
		PRINTFORMDW ……
		PRINTFORMDW ……味道熟悉吗？这段时间天天在梦里嗅我的媚药肉棒，恐怕已经上瘾了吧……
		PRINTFORMDW ……已经迫不及待想让覚大人成为妈妈了……
		PRINTFORMDW ……要上了哦，覚最喜欢的大肉棒……
		PRINTFORMDW ……尽情让我在子宫播种吧……
		PRINTFORMDW 睡眠姦経験 +1(覚)
		IF TALENT:49:処女
			SETCOLOR 247,171,166
			PRINTFORMW 【処女喪失】(覚)
			RESETCOLOR
			TALENT:49:処女 = 0
			CSTR:49:処女喪失履歴 = 在透明人事件中，被不认识的人迷奸失去了处女
		ENDIF
		PRINTFORMDW ……哦哦哦，好紧，这天煞的处女穴……
		PRINTFORMDW Ｖ性交経験 +1(覚)
		PRINTFORMDW ……天天在覚睡着后往身体里灌媚药，现在覚已经拥有足够H的身体了诶……
		PRINTFORMDW ……可怜的覚大人还以为自己欲求不满，殊不知天天晚上子宫里都被我注入过量的媚药……
		PRINTFORMDW ……下身潮吹得和喷泉一样，为了覚大人的健康我还特意调配了媚药饮品为您补水……
		PRINTFORMDW Ｖ性交経験 +1(覚)
		PRINTFORMDW 無自覚絶頂経験 +1(覚)
		PRINTFORMDW ……哦哦哦哦哦……
		PRINTFORMDW ……呜，太舒服一不小心射了……
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW ……很浓厚吧……
		PRINTFORMDW ……就和我平时泄在覚大人嘴里的一样……
		PRINTFORMDW 精飲経験 +1(覚)
		PRINTFORMDW ……夜还很长哦，我们还能共处很长时间……
		PRINTFORMDW ……天使一般的覚大人，如此毫无防备的被我压在身下……
		PRINTFORMDW ……我的感情，覚大人感受到了吗……
		PRINTFORMDW ……明明只要给我一点点关心……
		PRINTFORMDW ……我就不至于用这种手段来爱覚大人……
		PRINTFORMDW ……我有罪！我有罪啊！……
		PRINTFORMDW ……但覚大人您漂亮的脸蛋和色情的小穴也有错……
		PRINTFORMDW ……所以我们是共犯，共犯对不对！……
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW Ｖ性交経験 +1(覚)
		PRINTFORMDW ……又要，出来了……
		PRINTFORMDW 無自覚絶頂経験 +1(覚)
		PRINTFORMDW Ｖ性交経験 +1(覚)
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW ……已经是第三发了，覚大人身体已经盛不下那么多精液了吗，一个劲得返出来啊……
		PRINTFORMDW ……一定很舒服吧，从刚刚开始就一直去个不停哦覚大人……
		PRINTFORMDW ……以后没有我的肉棒，覚大人会不会没办法到达高潮呢……
		PRINTFORMDW ……想想就兴奋……
		PRINTFORMDW 無自覚絶頂経験 +1(覚)
		PRINTFORMDW Ｖ性交経験 +1(覚)
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW ……覚最喜欢喝的精液来了！！！今晚要让覚下面的小嘴喝个够！！！……
		PRINTFORMDW 無自覚絶頂経験 +1(覚)
		PRINTFORMDW Ｖ性交経験 +1(覚)
		PRINTFORMDW 睡眠姦経験 +1(覚)
		PRINTFORMDW ……绝对，要让你成为妈妈……
		PRINTFORMDW ……绝对，要让你成为妈妈……
		PRINTFORMDW ……绝对，要让你成为妈妈……
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW ……怀孕吧……
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW 给我怀上！！！！！！
		PRINTFORMDW 膣射経験 +1(覚)
		PRINTFORMDW ……怀上…我的孩子吧……
		PRINTFORMDW 無自覚絶頂経験 +1(覚)
		PRINTFORMDW …………
		PRINTFORMDW ………………
		PRINTFORMDW ……………………
		PRINTFORMDW …………………………………………
		PRINTFORMDW ……………………
		PRINTFORMDW ………………
		PRINTFORMDW …………
		PRINTFORMDW ……这样一来就中出了第十发了，还是夹得好紧……
		PRINTFORMDW ……肯定怀上了……
		PRINTFORMDW ……呜哇，真是完全被榨干了……
		PRINTFORMDW ……榨干…了…？……
		PRINTFORMDW ……覚大人还有另一个小穴没有满足！怎么能被榨干呢！……
		IF EXP:Ａ性交経験 == 0
			SETCOLOR 247,171,166
			PRINTFORMW 肛門処女喪失(覚)
			RESETCOLOR
			CSTR:49:尻穴処女喪失履歴 = 在透明人事件中，被不认识的人迷奸丧失了后庭处女
		ENDIF
		PRINTFORMDW Ａ性交経験 +1(覚)
		PRINTFORMDW ……哇靠，根本挤不进去啊……
		PRINTFORMDW ……早知道前段时间先调教调教了……
		PRINTFORMDW ……事已至此，覚大人原谅我哦，可能会有点痛……
		PRINTFORMDW ……整根插入哦哦哦哦哦！！！……
		PRINTFORMDW ……哦哦哦！感觉顶到结肠拐角了……
		PRINTFORMDW ……啊啊，软糖一样弹力十足的覚大人的臀部……
		PRINTFORMDW ……就是我不断抽插的动力来源……
		PRINTFORMDW Ａ性交経験 +1(覚)
		PRINTFORMDW 肛射経験 +1(覚)
		PRINTFORMDW ……噢噢噢榨出来了……
		PRINTFORMDW ……真是名器啊，覚大人的菊穴也是……
		PRINTFORMDW ……以后玩不到绝对会哭的……
		PRINTFORMDW Ａ性交経験 +1(覚)
		PRINTFORMDW Ａ性交経験 +1(覚)
		PRINTFORMDW 無自覚絶頂経験 +1(覚)
		PRINTFORMDW 肛射経験 +1(覚)
		PRINTFORMDW ……全都是属于我的……
		PRINTFORMDW ……覚大人……
		PRINTFORMDW ……是我的所有物……
		PRINTFORMDW 精飲経験 +1(覚)
		PRINTFORMDW ……噢噢噢噢噢噢噢噢……
		PRINTFORMDW ……好爽……
		PRINTFORMDW ……真……射空了啊……
		PRINTFORMDW ……想必在梦中也很满足吧，覚大人……
		PRINTFORMDW ……愉快的时光真是短暂……
		PRINTFORMDW ……托你的福，现在这副身体可比以前好用得多……
		PRINTFORMDW ……我的人生，接下来就是侵犯各种各样的美少女……
		PRINTFORMDW ……“录制结束”……
		PRINTFORMDW ……覚大人的可爱模样只属于我一个人，这点得告知全世界才行……
		PRINTFORMDW ……把今晚做爱的录像拿去黑市卖，恐怕能换一座金山吧……
		PRINTFORMDW ……哼……
		PRINTFORMDW ……怀孕的话、好好照顾我们的孩子……
		PRINTFORMDW ……我会一直在暗处看着你的……
		EXP:20 += 22
		EXP:21 += 11
		EXP:25 += 2
		EXP:64 += 2
		EXP:65 += 10
		EXP:59 += 6
		EXP:27 += 2
		EXP:17 += 1
		EXP:16 += 10
		EXP:15 += 5
		CFLAG:49:1520 = 3
		CFLAG:49:1521 = 0
		RESETCOLOR
	ENDIF
ENDIF

@古明地覚百日睡眠调教
IF CFLAG:49:1520 == 0 && CFLAG:49:1546 == 1
	CFLAG:49:1547++
;	SELECTCASE CFLAG:49:1547
;	CASE 1 TO 10
;		SELECTCASE RAND:3
;		CASE 0
;			PRINTFORML %CALLNAME:MASTER%往睡眠中的%CALLNAME:TARGET%的肛門里慢慢地把睡眠薬塞了進去
;			PRINTFORML %CALLNAME:TARGET%因為直腸吸収了睡眠薬而陥入了昏睡状態
;		CASE 1
;			PRINTFORML %CALLNAME:MASTER%将催眠瓦斯面罩覆盖在覚脸上
;			PRINTFORML %CALLNAME:TARGET%因為吸収了大量催眠气体而陥入了昏睡状態
;		CASE 2
;			PRINTFORML %CALLNAME:MASTER%将睡眠药塞入覚喉咙深处
;			PRINTFORML %CALLNAME:TARGET%因為药物作用陥入了昏睡状態
;		ENDSELECT
;	ENDSELECT

ENDIF

@简易做爱(C_ID, type)
#DIM  C_ID
#DIM 注入量
#DIM 基本注入量
#DIM 好感度上昇量
#DIM 回数
#DIM 経験増加数,58
#DIMS type
VARSET 経験増加数
回数 = RAND:20 + 1
注入量 = 0
基本注入量 = BASE:MASTER:精力 / 25
SELECTCASE type
	CASE "A"
		基本注入量 += (ABL:C_ID:肛門 + ABL:C_ID:腰 + 1) * 10
	CASE "V"
		基本注入量 += (ABL:C_ID:膣 + ABL:C_ID:腰 + 1) * 10
ENDSELECT

FOR LOCAL,1,回数 + 1
	注入量 += 基本注入量 + RAND:(基本注入量)
NEXT

PRINTFORMDL ・
PRINTFORMDL ・
PRINTFORMDW ・
PRINTFORMD %CALLNAME:MASTER%
IF TALENT:C_ID:処女 && type == "V"
	PRINTFORMD 奪去了%CALLNAME:C_ID%的純潔、
ELSE
	PRINTFORMD %TEXTR("侵犯/中出/")%了%CALLNAME:C_ID%{回数}次、
ENDIF
PRINTFORMDW 在\@ type == "A"? 尻穴# 子宮\@内注込了{注入量}的精液

; SIF TALENT:MASTER:無接吻経験
	; CALL SET_FIRSTKISS(MASTER, C_ID, 2)
; SIF TALENT:C_ID:無接吻経験
	; CALL SET_FIRSTKISS(C_ID, MASTER, 2)

; ;C
; 経験増加数:0 += 1 + RAND:(回数 * 2)
; 経験増加数:5 += 経験増加数:0 / 2
; ;B
; 経験増加数:3 += RAND:(回数 * 2)
; 経験増加数:8 += 経験増加数:3 / 2
; ;M
; 経験増加数:4 += 3 + ABL:C_ID:Ｍ感覚 * 2
; ;絶頂経験
経験増加数:10 += 経験増加数:0 / 2
; ;口淫経験
; 経験増加数:25 = 経験増加数:4
; ;接吻経験
; 経験増加数:27 = 経験増加数:4
; EXP:MASTER:Ｍ経験 += 経験増加数:4
; EXP:MASTER:接吻経験 += 経験増加数:4
; EXP:MASTER:口淫経験 += 経験増加数:4

IF type == "A"
	IF !CFLAG:C_ID:尻穴処女喪失記念日
		SETCOLOR 247,171,166
		PRINTFORMW 【尻穴処女喪失(覚)】
		CALL SET_HISTORY_LOST_A(C_ID, MASTER, "阴茎", @"%LOCALS:0%", @"%LOCALS:1%")
	ENDIF
	経験増加数:2 += 回数 * 2
	経験増加数:7 += 回数
	経験増加数:17 += 回数
	経験増加数:21 += 回数 * 2
	CALL ADD_SAMEN_A(C_ID, 注入量)
ENDIF
IF type == "V"
	IF TALENT:C_ID:処女 == -1
		SETCOLOR 247,171,166
		PRINTFORMW 【無自覚非処女喪失(覚)】
		TALENT:C_ID:処女 = 0
	ENDIF
	IF TALENT:C_ID:処女 == 1
		SETCOLOR 247,171,166
		PRINTFORMW 【処女喪失(覚)】
		CALL SET_HISTORY_LOST_V(C_ID, MASTER, "阴茎", @"%LOCALS:0%", @"%LOCALS:1%")
	ENDIF
	経験増加数:1 += 回数 * 2
	経験増加数:6 += 回数
	経験増加数:16 += 回数
	経験増加数:20 += 回数 * 2
	CALL ADD_SAMEN_V(C_ID, 注入量)
ENDIF

SETCOLOR C_YELLOW
FOR LOCAL,0,58
	IF 経験増加数:LOCAL
		PRINTFORML %EXPNAME:LOCAL% ＋{経験増加数:LOCAL}
		EXP:C_ID:LOCAL += 経験増加数:LOCAL
	ENDIF
NEXT
RESETCOLOR
CALL JUEL_UP_SPECIAL(C_ID,"欲情","欲望",20,1)
IF type == "V"
	IF TCVAR:C_ID:破瓜
		CALL JUEL_UP_SPECIAL(C_ID,"快Ｖ","Ｖ感覚",100,1)
	ELSE
		CALL JUEL_UP_SPECIAL(C_ID,"快Ｖ","Ｖ感覚",15,1)
	ENDIF
ELSEIF type == "A"
	CALL JUEL_UP_SPECIAL(C_ID,"快Ａ","Ａ感覚",100,1)
ENDIF
CALL ADD_EXP_LESNIAN(回数 * 5, C_ID, "PRINT")
TIME += 回数 * 20
BASE:MASTER:体力 -= 回数 * 17
BASE:MASTER:気力 -= 回数 * 26

CFLAG:C_ID:积攒度 = 0
TCVAR:C_ID:破瓜 = 0
SIF GETBIT(TALENT:MASTER:性別, 1)
	DOWNBASE:MASTER:精力 = 注入量

IF type == "V"
ELSE
	IF 回数 > 10
		PRINTFORMW 覚被淦得完全翻开无法闭合的%ASS(, 1)%
		PRINTFORMW 其中满是%CALLNAME:MASTER%的%SAMEN_DESCRIPTION(MASTER)%，仿佛一片小小的人工湖
		PRINTFORMW 伴随呼吸的嫩肉舒展收缩，在满溢与下渗间反复拉扯
		PRINTFORMW 即使凭借妖怪的恢复力，恐怕\@ TALENT:MASTER:形状 >= 6 ? 破坏到 # 做到\@这种程度想恢复如初也得一段时间吧
	ENDIF
ENDIF

@简易双人做爱(C_ID1, C_ID2, type)
#DIM  C_ID1
#DIM  C_ID2
#DIM 注入量
#DIM 基本注入量
#DIM 好感度上昇量
#DIM 回数
#DIM 経験増加数,58
#DIMS type
VARSET 経験増加数
回数 = RAND:20 + 1
注入量 = 0
基本注入量 = BASE:C_ID2:精力 / 25
SELECTCASE type
	CASE "A"
		基本注入量 += (ABL:C_ID1:肛門 + ABL:C_ID1:腰 + 1) * 10
	CASE "V"
		基本注入量 += (ABL:C_ID1:膣 + ABL:C_ID1:腰 + 1) * 10
ENDSELECT

FOR LOCAL,1,回数 + 1
	注入量 += 基本注入量 + RAND:(基本注入量)
NEXT

PRINTFORMDL ・
PRINTFORMDL ・
PRINTFORMDW ・
IF type == "T"
	PRINTFORMD %CALLNAME:C_ID2%推倒了%CALLNAME:C_ID1%，用纤细灵动的手指
	PRINTFORMDW 令%CALLNAME:C_ID1%去了{回数}次
ELSE
	PRINTFORMD %CALLNAME:C_ID2%
	IF TALENT:C_ID1:処女 && type == "V"
		PRINTFORMD 奪去了%CALLNAME:C_ID1%的純潔、
	ELSE
		PRINTFORMD %TEXTR("侵犯/中出/")%了%CALLNAME:C_ID1%{回数}次、
	ENDIF
	PRINTFORMDW 在\@ type == "A"? 尻穴# 子宮\@内注込了{注入量}的精液
ENDIF

IF type == "T"
	;C
	経験増加数:0 += 1 + RAND:(回数 * 2)
	経験増加数:5 += 経験増加数:0 / 2
	;B
	経験増加数:3 += RAND:(回数 * 2)
	経験増加数:8 += 経験増加数:3 / 2
	;M
	経験増加数:4 += 3 + ABL:C_ID1:Ｍ感覚 * 2
	;絶頂経験
	経験増加数:10 += 経験増加数:0 / 2
	;口淫経験
	経験増加数:25 = 経験増加数:4
	;接吻経験
	経験増加数:27 = 経験増加数:4
	EXP:C_ID2:Ｍ経験 += 経験増加数:4
	EXP:C_ID2:接吻経験 += 経験増加数:4
	EXP:C_ID2:口淫経験 += 経験増加数:4
ELSE
	経験増加数:10 += 経験増加数:0 / 2
	SIF TALENT:C_ID2:無接吻経験
		CALL SET_FIRSTKISS(C_ID2, C_ID1, 2)
	SIF TALENT:C_ID1:無接吻経験
		CALL SET_FIRSTKISS(C_ID1, C_ID2, 2)
ENDIF

IF type == "A"
	IF !CFLAG:C_ID1:尻穴処女喪失記念日
		SETCOLOR 247,171,166
		PRINTFORMW 【尻穴処女喪失(覚)】
		CALL SET_HISTORY_LOST_A(C_ID1, C_ID2, "扶她肉棒", @"%LOCALS:0%", @"%LOCALS:1%")
	ENDIF
	経験増加数:2 += 回数 * 2
	経験増加数:7 += 回数
	経験増加数:17 += 回数
	経験増加数:21 += 回数 * 2
	CALL ADD_SAMEN_A(C_ID1, 注入量)
	EX:C_ID1:15 += 注入量
	CFLAG:C_ID1:516 += 注入量
ENDIF
IF type == "V"
	IF TALENT:C_ID1:処女 == -1
		SETCOLOR 247,171,166
		PRINTFORMW 【無自覚非処女喪失(覚)】
		TALENT:C_ID1:処女 = 0
	ENDIF
	IF TALENT:C_ID1:処女 == 1
		SETCOLOR 247,171,166
		PRINTFORMW 【処女喪失(覚)】
		CALL SET_HISTORY_LOST_V(C_ID1, C_ID2, "扶她肉棒", @"%LOCALS:0%", @"%LOCALS:1%")
	ENDIF
	経験増加数:1 += 回数 * 2
	経験増加数:6 += 回数
	経験増加数:16 += 回数
	経験増加数:20 += 回数 * 2
	CALL ADD_SAMEN_V(C_ID1, 注入量)
	EX:C_ID1:14 += 注入量
	CFLAG:C_ID1:515 += 注入量
ENDIF
IF type == "T"
	経験増加数:51 += 回数 * 2
ENDIF
SETCOLOR C_YELLOW
FOR LOCAL,0,58
	IF 経験増加数:LOCAL
		PRINTFORML %EXPNAME:LOCAL% ＋{経験増加数:LOCAL}
		EXP:C_ID1:LOCAL += 経験増加数:LOCAL
	ENDIF
NEXT
RESETCOLOR
CALL JUEL_UP_SPECIAL(C_ID1,"欲情","欲望",20,1)
IF type == "V"
	IF TCVAR:C_ID1:破瓜
		CALL JUEL_UP_SPECIAL(C_ID1,"快Ｖ","Ｖ感覚",100,1)
	ELSE
		CALL JUEL_UP_SPECIAL(C_ID1,"快Ｖ","Ｖ感覚",15,1)
	ENDIF
ELSEIF type == "A"
	CALL JUEL_UP_SPECIAL(C_ID1,"快Ａ","Ａ感覚",100,1)
ENDIF
CALL ADD_EXP_LESNIAN(回数 * 5, C_ID1, "PRINT")
TIME += 回数 * 20
BASE:C_ID2:体力 -= 回数 * 17
BASE:C_ID2:気力 -= 回数 * 26

CFLAG:C_ID1:积攒度 = 0
TCVAR:C_ID1:破瓜 = 0

IF type == "V"
ELSEIF type == "A"
	IF 回数 > 10
		PRINTFORMW 覚被淦得完全翻开无法闭合的%ASS(, 1)%
		PRINTFORMW 其中满是%CALLNAME:C_ID2%的%SAMEN_DESCRIPTION(C_ID2)%，仿佛一片小小的人工湖
		PRINTFORMW 伴随呼吸的嫩肉舒展收缩，在满溢与下渗间反复拉扯
		PRINTFORMW 即使凭借妖怪的恢复力，恐怕\@ TALENT:C_ID2:形状 >= 6 ? 破坏到 # 做到\@这种程度想恢复如初也得一段时间吧
	ENDIF
ELSE
	PRINTFORMW 姐妹间亲密的交合持续了{回数*30}分钟，房间内满是蔷薇与爱液混合的特殊香气
ENDIF

@尺寸表示(ARG)
#DIM L_PENIS, 20

IF HAS_PENIS(ARG)
	;Ｐ
	CALL GET_PENIS_SIZE, L_PENIS, ARG
	CALL ShowScaleInCM(ARG, L_PENIS:1, " ")
	; CALL ShowScaleInCM(ARG, L_PENIS:5, " 直径：")
	; CALL ShowScaleInCM(ARG, L_PENIS:8, "  （平常時:")
	; CALL ShowScaleInCM(ARG, L_PENIS:7, " 直径：")
	; PRINTPLAIN )
	; CALL ShowScaleInCM(ARG, L_PENIS:11, " 片玉直径：")
	PRINTFORM
ENDIF

@避孕套累计
IF TCVAR:PLAYER:避孕套 == 1
	PRINTFORMW 将\@ TCVAR:49:358 > 0 ? 又一个 # \@使用过气球般鼓起的避孕套系在覚身边漂浮的线上，覚眼泛桃花亲吻着自己榨出的沉甸甸的“战利品”
	TCVAR:49:358 ++
ENDIF

@EVENT_COUNTER1_MESSAGE
SIF TARGET <= 0
	RETURN 0
CALL DATUI_MESSAGE
SIF TCVAR:避妊
	CALL SET_HININ(TARGET)
RESULT = 0
TRYCALLFORM EVENT_COUNTE1_MESSAGE{TCVAR:20}
SIF RESULT
	PRINTL
IF CFLAG:TARGET:口上セレクタ
	TRYCALLFORM M_KOJO_K{NO:TARGET}_{CFLAG:TARGET:口上セレクタ}
ELSE
	TRYCALLFORM M_KOJO_K{NO:TARGET}
ENDIF
SIF FLAG:口上色
	TRYCALLFORM M_KOJO%RESULTS%_COLOR_K{NO:TARGET}

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉TOKI/古明地觉/M_KOJO_K49_一些函数.ERB