code:
;-------------------------------------------------
; eraTheWorld 4.842用 饕餮尤魔口上
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;------ ｷﾘﾄﾘ ｶｲｼ -----------
;eraTheWorld proto4.07パッチ取り込み用 Ver1.13
;貂プレートの使い方
;初めに置換指令等により K143 を K(角色No) に変更して下さい
;角色NoはCSVフォルダのCharaファイルを参照　例(霧雨 魔理沙の場合)：K143 =置換=> K11
;
;------ ｷﾘﾄﾘ ｵﾜﾘ -----------

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

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

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

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

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

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

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

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

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

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

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

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

	IF CFLAG:143:1009 > 0
	    PRINTFORML 要重置尤魔的不育体质标志吗?
	    CALL ASK_YN(" 重置 "," 保持原状 ")
	    IF !RESULT
	        CFLAG:143:1009 = 0
	        PRINTFORML 标志已重置
	    ELSE
	        PRINTFORML 没有更改
	    ENDIF
	ENDIF

	IF CFLAG:143:1000 > 0
	    PRINTFORML 要重置尤魔的对性欲贪得无厌的标志吗?
	    CALL ASK_M(" 重置 ", 1," 保持原状 ", 1," 簡略化 ", 1)
	    SELECTCASE RESULT
	    CASE 0
	        CFLAG:143:1000 = 0
	        PRINTFORML 标志已重置
	    CASE 1
	        PRINTFORML 没有更改
	    CASE 2
	        CFLAG:1012 = 1
	        PRINTFORML 简化了。只显示结果
	    ENDSELECT
	ENDIF

	IF CFLAG:143:1001 > 0
	    PRINTFORML 要重置尤魔在时间停止期间可以移动的标志吗?
	    CALL ASK_YN(" 重置 "," 保持原状 ")
	    IF !RESULT
	        CFLAG:143:1001 = 0
	        PRINTFORML 标志已重置
	    ELSE
	        PRINTFORML 没有更改
	    ENDIF
	ENDIF

IF CFLAG:143:1000 == 0
	PRINTL
	PRINTFORML 接受尤魔變成不孕體質嗎？
	PRINTL
	PRINTFORML ※注意※
	PRINTFORML 在完成事件前、尤魔都不會懷孕
	PRINTFORML 「如果選擇「是」、即使完成事件、尤魔也不會在時姦中懷孕」
	PRINTFORML 「如果選擇「否」、尤魔會正常受孕、但關於懷孕的對話頻率會減少」
	PRINTL
	CALL ASK_YN("是","否")
	IF !RESULT
		PRINTL
		PRINTFORML 尤魔現在是「不孕體質」了
		PRINTFORML 在精子受精前就會被直接吸收掉、如同吸收營養一樣
		PRINTL
		;K143C_妊娠レベル = 1
		CFLAG:1009 = 1
	ELSE
		PRINTL
		PRINTFORML 尤魔能像一般人一樣懷孕
		PRINTFORML
	ENDIF

	PRINTL
	PRINTFORML 尤魔對性愛和料理都很渴望嗎？
	PRINTFORML ※注意※尤魔將會變得在性愛和料理方面都非常貪婪。還成為了個料理高手
	PRINTFORML 能力和素質都大幅度變化了、如果不喜歡請選擇『否』
	PRINTL
	CALL ASK_M("是",1 , "否",1 , "這次不要再顯示",1)
	SELECTCASE RESULT
	CASE 0
		PRINTL
		PRINTFORML 尤魔
		PRINTFORML [好奇心][容易自慰][接受快感][精愛味覺][風騷]
		PRINTFORML 會被賦予
		PRINTL
		TALENT:性的兴趣 = 1
		TALENT:容易自慰 = 1
		TALENT:快感応答 = 1
		TALENT:精愛味覚 = 1
		TALENT:風騷 = 1
		EXP:自慰経験 = 30000
		EXP:絶頂経験 = 30000
		EXP:料理経験 = 496000
		ABL:Ｃ感覚 = 3
		ABL:Ｂ感覚 = 3
		ABL:Ｖ感覚 = 2
		ABL:自慰中毒 = 6
		ABL:指 = 6
		ABL:料理技能 = 5

		CFLAG:143:1000 = 1

		PRINTL
		PRINTFORML 貪婪的尤魔喜歡跟部下或喜歡的男人...
		PRINTL
		PRINTL ※注意※ 根據選項、尤魔可能在非處女狀態下開始...
		PRINTL 在一天結束時會把部下叫進房間做愛
		PRINTL 喜歡色情的同盟長、但不喜歡跟自己以外的人…請注意一下
		PRINTL
		CALL ASK_M("喜愛口交（處女）",1 , "喜愛性交（不是處女）",1 , "喜愛肛交（肛門不是處女）",1 , "喜歡兩穴性交（兩穴不是處女）",1 , "喜愛手交（處女）",1 , "以上不變",1)
		SELECTCASE RESULT
		CASE 0
			EXP:口淫経験 = 1024
			CFLAG:143:1000 = 3
		CASE 1
			EXP:Ｖ性交経験 = 1024
			CFLAG:143:1000 = 4
			TALENT:処女 = 0
		CASE 2
			EXP:Ａ性交経験 = 1024
			CFLAG:143:1000 = 5
		CASE 3
			EXP:手淫経験 = 1024
			EXP:口淫経験 = 1024
			EXP:乳交経験 = 1024
			EXP:Ａ性交経験 = 1024
			EXP:Ｖ性交経験 = 1024
			CFLAG:143:1000 = 6
			TALENT:処女 = 0
		CASE 4
			EXP:手淫経験 = 1024
			CFLAG:143:1000 = 7
		CASE 5
			PRINTFORML 素質不再做更改
		ENDSELECT
	CASE 1
		PRINTFORML 素質不會有變更
	CASE 2
		PRINTFORML 下一次以後不會再顯示
		CFLAG:143:1000 = 999
	ENDSELECT
ENDIF

IF CFLAG:143:1001 == 0
	PRINTL
	PRINTFORML 可以讓尤魔即使在被時停狀態下也可以有反應嗎？
	PRINTL
	CALL ASK_M("是",1 , "否",1 , "這次不再顯示",1)
	SELECTCASE RESULT
	CASE 0
		PRINTFORML 開啟觸發條件
		CFLAG:143:1001 = 1
	CASE 1
		PRINTFORML 暫不變更
	CASE 2
		PRINTFORML 下一次以後不會再顯示
		CFLAG:143:1001 = 2
	ENDSELECT
ENDIF

RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K143
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
;畜生界で遭遇
IF GROUPMATCH(CFLAG:MASTER:現在位置, 640, 641)
	PRINTFORML 「嗯嗯？」
	PRINTFORML 「看起來很眼熟…你、是哪個組的人啊？」
	CALL ASK_M("ただの観光客です", 1,"鬼傑組の%CALLNAME:MASTER%と申します", 1,"勁牙組の%CALLNAME:MASTER%じゃコラァ！", 1,"剛欲同盟に憧れる%CALLNAME:MASTER%です", 1)
	SELECTCASE RESULT
	;観光客を名乗る
	CASE 0
		PRINTFORML 「桀桀桀、竟然到黑道的地盤（區域）觀光、你是個大笨蛋還是是大人物啊」
		PRINTFORML 「你的、名子？」
		PRINTL
		PRINTFORML 「了解了、叫做%CALLNAME:MASTER%是吧。我記住了」
		PRINTFORML 「我嗎？　我叫做尤魔」
		PRINTL
		CALL ASK_YN("難道是...","那個剛欲同盟的...")
		IF !RESULT
			PRINTFORML 「桀桀桀、太出乎我意料了」
		ELSE
			PRINTFORML 「哇啊、沒想到連一般的觀光客也都知道我的名子了、出人頭地了啊」
		ENDIF
		PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
		PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
		PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
		PRINTL
		PRINTL 那女孩這麼說著、把一根勺子一樣的東西督了過來
		PRINTFORML 「不然的話、就會被可怕的妖怪從頭開始啃食掉喔」
		PRINTW
	;鬼傑組を名乗る
	CASE 1
		PRINTFORML 「桀桀桀、這麼有膽量地公開自己是組的一員、很勇敢呢」
		PRINTFORML 「但很可惜、鬼傑組的人都是不會傻傻的說出自己是哪個組的人呢」
		IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
			PRINTFORML 「還有這種小孩子在玩黑幫遊戲...這個世道真的是混亂啊、喂」
		ENDIF
		IF TALENT:130:恋人
			PRINTFORML 「嗯？　你、好像是…」
			PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
			PRINTFORML 「桀桀桀、可歌可泣。你真是個好\@ TALENT:MASTER:性別 == 2 ? 男 # 女 \@呢」
			PRINTFORML 「但是啊…一個人獨自行動、還是太過魯莽了」
			PRINTL
			PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
			PRINTW
			PRINTFORML 「...什麼、啊」
			PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
			PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
			PRINTL
		ELSEIF TALENT:130:恋慕
			PRINTFORML 「嗯？　你、好像是…」
			PRINTFORML 「為了愛慕的女性、獻出心臟？　真是令人感動呢」
			PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
			PRINTL
			PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
			PRINTW
			PRINTFORML 「...什麼、啊」
			PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
			PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
			PRINTL
		ELSE
			PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
			PRINTFORML 「那些傢伙只把人類當成工具般地看待」
			PRINTL
			PRINTFORML 「也許、你是因為被那傢伙的能力所控制住、而無法反抗吧」
			PRINTFORML 「或者是...沒有考慮後果就隨便自稱自己是鬼傑組的傻瓜呢」
			PRINTW
			PRINTFORML 「另外」
			PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
			PRINTW
			PRINTL
			PRINTL
			PRINTFORML 「...什麼、啊」
			PRINTFORML 「但萬一你真的是鬼傑組的人、我也不想給她一個報復的藉口」
			PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
			PRINTL
		ENDIF
		PRINTFORML 「啊、糟糕、忘記做自我介紹了」
		PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
		PRINTFORML 「如果你真的是鬼傑組的人、那相信我們會再會的」
		PRINTW
		PRINTFORML 看起來你被視為「鬼傑組」的一員了
		PRINTL
		CFLAG:1004 = 1
	;勁牙組を名乗る
	CASE 2
		PRINTFORML 「桀桀桀、氣勢不錯」
		PRINTFORML 「不過、吐口水的對象要好好選擇啊、這是弱肉強食的世界的常態」
		IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
			PRINTFORML 「不過、這種小孩也玩黑道啊...這個世道真是越來越亂了啊」
		ENDIF
		IF TALENT:133:恋人
			PRINTFORML 「嗯？　你、好像是…」
			PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
			PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
			PRINTL
			PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
			PRINTW
			PRINTFORML 「...什麼、啊」
			PRINTFORML 「雖然這種招數也有、但如果驪駒一怒之下不顧一切攻擊過來的話、那就很麻煩了」
			PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
			PRINTL
		ELSEIF TALENT:133:恋慕
			PRINTFORML 「嗯？　你、好像是…」
			PRINTFORML 「為了那個十分自戀的女人、獻出心臟？　真是令人感動呢」
			PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
			PRINTL
			PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
			PRINTW
			PRINTFORML 「...什麼、啊」
			PRINTFORML 「雖然這種招數也有、但如果驪駒一怒之下不顧一切攻擊過來的話、那就很麻煩了」
			PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
			PRINTL
		ELSE
			PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
			PRINTFORML 「那些傢伙、只把人類當作獵物看待而已」
			PRINTFORML 「嘿、那邊只要有實力就是正義。只要有能力就可以爬上去、就算是你這樣的傢伙也一樣」
			PRINTFORML 「又或許...只是一個不顧後果、輕率地自稱是勁牙組的笨蛋而已」
			PRINTW
			PRINTFORML 「另外」
			PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
			PRINTW
			PRINTL
			PRINTL
			PRINTFORML 「...什麼、啊」
			PRINTFORML 「但萬一你真的是勁牙組的人、我也不想給她一個報復的藉口」
			PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
			PRINTL
		ENDIF
		PRINTFORML 「啊、糟糕、忘記做自我介紹了」
		PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
		PRINTFORML 「如果你真的是勁牙組的人、那相信我們會再會的」
		PRINTW
		PRINTFORML 看起來你被視為「勁牙組」的一員了
		PRINTL
		CFLAG:1005 = 1
	;剛欲同盟に志願
	CASE 3
		PRINTFORML 「喂喂、你也太過好奇了吧」
		PRINTFORML 「我自己不說、但我的部下們看待人類只會當成奴隸」
		PRINTL
		PRINTFORML 「嗯？　你發現了嗎？　對、我就是剛欲同盟的同盟長、饕餮尤魔」
		PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
		PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
		PRINTW
		PRINTFORML 「......但如果你真的想成為本組的一員、那隨便你」
		PRINTFORML 「脫到底、我並沒有建立組織的打算。我的部下們也是各自做自己喜歡的事情」
		PRINTFORML 「所以你也要自己想辦法。嘛、我也不期望什麼啦」
		PRINTW
		PRINTFORML 現在、你也許被認為是「剛欲同盟」的一員了......誰知道呢
		PRINTL
		CFLAG:1006 = 1
	ENDSELECT
;尤魔宅で遭遇
ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 653, 654, 655)
	;尤魔宅の生活間で遭遇
	IF CFLAG:MASTER:現在位置 == 653
		PRINTL
		PRINTFORML 派頭不算高調、但具有東方風味的一個房間。可能是個客廳吧
		PRINTFORML 家具營造了一個平靜的氛圍、不會損害房間的景觀
		PRINTL
		PRINTFORML 單獨一根桌腳的大圓桌、在幻想鄉很少見、似乎可以旋轉桌面
		PRINTFORML 設計是為了多人共享的用餐、更進一步來說、目的是為了讓客人自由取用大盤子上的食物
		PRINTW
		PRINTFORML 在客廳後面、有一個合適個人的廚房、看起來還不錯
		PRINTFORML 不像是一家餐廳的氛圍、難道說他們請了很多廚師來嗎
		PRINTFORML 不過、人的氛圍很少吶
		PRINTL
		PRINTFORML 仔細一看那些被經常使用過的廚具卻保持得相當乾淨
		PRINTFORML 盤子按照形狀整齊的分類、方便快速拿取使用
		PRINTFORML 架子上排列著許多瓶罐與盒子、裡面裝滿了各式罕見的調味料
		PRINTW
		PRINTFORML 在廚房深處、一個少女一邊哼著小曲一邊輕鬆擺動著巨大的鍋子
		PRINTFORML 從像羊毛一樣柔軟的頭髮中、有著兩根紅色的羊角、頂端還綁著藍色的絲帶
		PRINTFORML 穿著像饕餮紋一般的洋裝、下面還穿著露肩的紅色內衣
		PRINTL
		PRINTFORML 「嗯嗯？」
		PRINTFORML 「你是誰啊、在我的廚房裡亂闖？」
		PRINTL
		CALL ASK_M("ごめんなさい。観光でうっかり", 1,"鬼傑組の%CALLNAME:MASTER%と申します", 1,"勁牙組の%CALLNAME:MASTER%じゃコラァ！", 1,"剛欲同盟に憧れる%CALLNAME:MASTER%です", 1)
		SELECTCASE RESULT
		;観光客を名乗る
		CASE 0
			PRINTFORML 「喂、這裡不是飯店。去別處吧。」
			PRINTFORML 「……雖然我是想這麼說、但馬上就能開飯了。珍惜機會、你也一起吃吧」
			PRINTFORML 「暫時在這個房間裡等著。這裡是我的戰場、不要隨意破壞。」
			PRINTW
			PRINTFORML 在少女所說的地方、在客廳裡靜靜地等待著。許久、少女端著大盤子過來了
			PRINTFORML 「久等了、這是帶皮回鍋肉、非常好吃喔」
			PRINTL
			PRINTFORML 裡面只加了桃子肉和蒜薹的樸素料理、
			PRINTFORML 但是肉被煎得彎曲、搭配著肉的油脂縈繞的野菜、看起來就很美味
			PRINTW
			PRINTFORML 少女剛剛說過「這裡不是餐廳」來著
			PRINTFORML 這個房間裡除了自己以外、沒有其他人、少女是打算自己一個人全吃了嗎？
			PRINTL
			PRINTFORML 「來吧、開動吧。鐵要趁熱打、飯要趁熱吃呀」
			PRINTFORML 不在乎自己的疑問、少女給%CALLNAME:MASTER%盛了一份菜肴
			PRINTW
			PRINTFORML 「怎麼樣？　好吃嗎？」
			PRINTFORML 在尤魔的催促下、試吃了一口...很美味
			PRINTFORML 這樣的味道就算被收錢也不會有人抱怨啊
			PRINTL
			PRINTFORML 「桀桀桀、謝謝。果然料理是最棒的啊。可以從食客的慾望直接看出來」
			PRINTFORML 品嘗自己的料理的同時、少女聽到%CALLNAME:MASTER%的讚美、浮出了笑容
			PRINTW
			PRINTFORML 被她帶走節奏、一起用餐。但是、面前的少女到底是誰呢
			PRINTFORML 如同同時想到了相同的事情、少女注視了這邊
			PRINTL
			PRINTFORML 「不過…你是誰啊？」
			PRINTFORML 吞下了飯才回答了這個問題、有些慢吞吞的。改口道歉後、自我介紹了一下
			PRINTW
			PRINTFORML 「呼嗯、是叫做%CALLNAME:MASTER%啊」
			PRINTFORML 「我是饕餮尤魔。作為剛欲同盟的同盟長、就算你只是個觀光客也應該聽說過吧？」
			PRINTL
			PRINTFORML 剛欲同盟──對、就那是掌控畜生界的三大組織之一
			PRINTFORML 我竟然能被如此巨大的組織領袖請吃飯…
			PRINTW
			PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
			PRINTFORML 「雖然是我請你吃飯、但如果不想被扒皮的話還是趕快離開畜生界比較好」
			PRINTL
			PRINTFORML 「就算這麼講、但你要在這附近四處亂走是你自己的責任、我也不會阻止你」
			PRINTFORML 「我的部下都看不起人類、其他組織甚至稱他們為奴隸或家畜、你要小心」
			PRINTFORML 是幸運還是不幸、我和三大派系的領袖有些接觸了...
			PRINTW
		;鬼傑組を名乗る
		CASE 1
			IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
				PRINTFORML 「你真的知道你在說什麼嗎？　這不是小孩子可以自稱的組織名稱喔」
				PRINTFORML 「會被可怕的人帶走、將身體裡的東西都被取走喔」
			ELSE
				PRINTFORML 「……你、真的太笨了。一旦提到組織名字、你就沒有退路了」
				PRINTFORML 「因為你的行動、可能會導致組織的瓦解。在這個世界上、這是可是常識」
			ENDIF
			PRINTFORML 「……雖然我是想這麼說、但馬上就能開飯了。珍惜機會、你也一起吃吧」
			PRINTFORML 「暫時在這個房間裡等著。這裡是我的戰場、不要隨意破壞。」
			PRINTW
			PRINTFORML 在少女所說的地方、在客廳裡靜靜地等待著。許久、少女端著大盤子過來了
			PRINTFORML 「久等了、這是帶皮回鍋肉、非常好吃喔」
			PRINTL
			PRINTFORML 裡面只加了桃子肉和蒜薹的樸素料理、
			PRINTFORML 但是肉被煎得彎曲、搭配著肉的油脂縈繞的野菜、看起來就很美味
			PRINTW
			PRINTFORML 少女剛剛說過「這裡不是餐廳」來著
			PRINTFORML 這個房間裡除了自己以外、沒有其他人、少女是打算自己一個人全吃了嗎？
			PRINTL
			PRINTFORML 「來吧、開動吧。鐵要趁熱打、飯要趁熱吃呀」
			PRINTFORML 不在乎自己的疑問、少女給%CALLNAME:MASTER%盛了一份菜肴
			PRINTW
			PRINTFORML 「怎麼樣？　好吃嗎？」
			PRINTFORML 在尤魔的催促下、試吃了一口...很美味
			PRINTFORML 這樣的味道就算被收錢也不會有人抱怨啊
			PRINTL
			PRINTFORML 「桀桀桀、謝謝。果然料理是最棒的啊。可以從食客的慾望直接看出來」
			PRINTFORML 品嘗自己的料理的同時、少女聽到%CALLNAME:MASTER%的讚美、浮出了笑容
			PRINTW
			PRINTFORML 被她帶走節奏、一起用餐。但是、面前的少女到底是誰呢
			PRINTFORML 如同同時想到了相同的事情、少女注視了這邊
			PRINTL
			PRINTFORML 「不過…你是誰啊？」
			PRINTFORML 「改口道歉地踏進屋裡、並且介紹了自己的名字」
			PRINTW
			PRINTFORML 「呼嗯、是叫做%CALLNAME:MASTER%啊」
			PRINTFORML 「桀桀桀、好大的膽子感直接自稱是組織成員」
			PRINTFORML 「不過很可惜、鬼傑組的人可不會那麼天真地公開幫派名稱。如果你想加入、你需要表現得更加的狡猾才行」
			IF TALENT:130:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「桀桀桀、可歌可泣。你真是個好\@ TALENT:MASTER:性別 == 2 ? 男 # 女 \@呢」
				PRINTFORML 「但是啊…一個人獨自行動、還是太過魯莽了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSEIF TALENT:130:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了愛慕的女性、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙只把人類當成工具般地看待」
				PRINTL
				PRINTFORML 「也許、你是因為被那傢伙的能力所控制住、而無法反抗吧」
				PRINTFORML 「或者是...沒有考慮後果就隨便自稱自己是鬼傑組的傻瓜呢」
				PRINTW
				PRINTFORML 「另外」
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
				PRINTW
				PRINTL
				PRINTL
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「但萬一你真的是鬼傑組的人、我也不想給她一個報復的藉口」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ENDIF
			PRINTFORML 「啊、糟糕、忘記做自我介紹了」
			PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
			PRINTFORML 「如果你的確是鬼傑的人、那我們或許還會有再次相遇的機會。現在先去吃飯、之後的再說吧」
			PRINTW
			PRINTFORML 看起來你被視為「鬼傑組」的一員了
			PRINTL
			CFLAG:1004 = 1
		;勁牙組を名乗る
		CASE 2
			PRINTFORML 請勿侵入！
			PRINTFORML 正當我踏進廚房深處的瞬間、一道光芒劃過我的臉龐
			PRINTL
			PRINTFORML 「……別用髒腳踏進來廚房」
			PRINTFORML 少女用比想象中更加有力的聲音警告我
			PRINTFORML %CALLNAME:MASTER%的臉上、留下了一道紅線。少女所扔的是刀子、它劃破了%CALLNAME:MASTER%的臉皮、然後刺入牆壁中
			PRINTW
			PRINTFORML 「…真是的、驪駒那傢伙是怎麼訓練他的手下的啊…換作以前的我、你早就變成肉泥了」
			PRINTFORML 「你、是不是肚子餓了？　所以才會這麼的魯莽」
			PRINTFORML 「暫時在這個房間裡等著。這裡是我的戰場、不要隨意破壞。」
			PRINTW
			PRINTFORML 在少女所說的地方、在客廳裡靜靜地等待著。許久、少女端著大盤子過來了
			PRINTFORML 「久等了、這是帶皮回鍋肉、非常好吃喔」
			PRINTL
			PRINTFORML 裡面只加了桃子肉和蒜薹的樸素料理、
			PRINTFORML 但是肉被煎得彎曲、搭配著肉的油脂縈繞的野菜、看起來就很美味
			PRINTW
			PRINTFORML 少女剛剛說過「這裡不是餐廳」來著
			PRINTFORML 這個房間裡除了自己以外、沒有其他人、少女是打算自己一個人全吃了嗎？
			PRINTL
			PRINTFORML 「來吧、開動吧。鐵要趁熱打、飯要趁熱吃呀」
			PRINTFORML 不在乎自己的疑問、少女給%CALLNAME:MASTER%盛了一份菜肴
			PRINTW
			PRINTFORML 「怎麼樣？　好吃嗎？」
			PRINTFORML 在尤魔的催促下、試吃了一口...很美味
			PRINTFORML 這樣的味道就算被收錢也不會有人抱怨啊
			PRINTL
			PRINTFORML 「桀桀桀、謝謝。果然料理是最棒的啊。可以從食客的慾望直接看出來」
			PRINTFORML 品嘗自己的料理的同時、少女聽到%CALLNAME:MASTER%的讚美、浮出了笑容
			PRINTW
			PRINTFORML 被她帶走節奏、一起用餐。但是、面前的少女到底是誰呢
			PRINTFORML 如同同時想到了相同的事情、少女注視了這邊
			PRINTL
			PRINTFORML 「不過…你是誰啊？」
			PRINTFORML 對闖入突然的廚房道歉、並且自我介紹
			PRINTW
			PRINTFORML 「呼嗯、是叫做%CALLNAME:MASTER%啊」
			PRINTFORML 「%CALLNAME:MASTER%、雖然說氣勢很重要、但噴口的對象可要好好考慮。弱肉強食是這世界的常態」
			PRINTL
			IF TALENT:133:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 少女說著、就不知道從哪裡掏出了一根巨大的勺子指著
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「雖然這種招數也有、但如果驪駒一怒之下不顧一切攻擊過來的話、那就很麻煩了」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSEIF TALENT:133:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了那個十分自戀的女人、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 少女說著、就不知道從哪裡掏出了一根巨大的勺子指著
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「雖然這種招數也有、但如果驪駒一怒之下不顧一切攻擊過來的話、那就很麻煩了」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙、只把人類當作獵物看待而已」
				PRINTFORML 「嘿、那邊只要有實力就是正義。只要有能力就可以爬上去、就算是你這樣的傢伙也一樣」
				PRINTFORML 「又或許...只是一個不顧後果、輕率地自稱是勁牙組的笨蛋而已」
				PRINTW
				PRINTFORML 「另外」
				PRINTFORML 少女說著、就不知道從哪裡掏出了一根巨大的勺子指著
				PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
				PRINTW
				PRINTL
				PRINTL
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「但萬一你真的是勁牙組的人、我也不想給她一個報復的藉口」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ENDIF
				PRINTFORML 「啊、糟糕、忘記做自我介紹了」
				PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
				PRINTFORML 「如果你真是勁牙組的人、或許還能再見面呢。吃完飯就老實點回家吧。懂了嗎？」
				PRINTW
				PRINTFORML 看起來你被視為「勁牙組」的一員了
				PRINTL
				CFLAG:1005 = 1
		;剛欲同盟に志願
		CASE 3
			IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
				PRINTFORML 「你是乞丐小孩嗎？　這裡可不是施捨食物的地方」
				PRINTFORML 「這裡是一個很可怕—很可怕—的黑幫辦公室、趕快離開吧」
			ELSE
				PRINTFORML 「這裡可不是就業中介所、去其他地方吧」
			ENDIF
			PRINTFORML 「……雖然我是想這麼說、但馬上就能開飯了。珍惜機會、你也一起吃吧」
			PRINTFORML 「暫時在這個房間裡等著。這裡是我的戰場、不要隨意破壞。」
			PRINTW
			PRINTFORML 在少女所說的地方、在客廳裡靜靜地等待著。許久、少女端著大盤子過來了
			PRINTFORML 「久等了、這是帶皮回鍋肉、非常好吃喔」
			PRINTL
			PRINTFORML 裡面只加了桃子肉和蒜薹的樸素料理、
			PRINTFORML 但是肉被煎得彎曲、搭配著肉的油脂縈繞的野菜、看起來就很美味
			PRINTW
			PRINTFORML 少女剛剛說過「這裡不是餐廳」來著
			PRINTFORML 這個房間裡除了自己以外、沒有其他人、少女是打算自己一個人全吃了嗎？
			PRINTL
			PRINTFORML 「來吧、開動吧。鐵要趁熱打、飯要趁熱吃呀」
			PRINTFORML 不在乎自己的疑問、少女給%CALLNAME:MASTER%盛了一份菜肴
			PRINTW
			PRINTFORML 「怎麼樣？　好吃嗎？」
			PRINTFORML 在尤魔的催促下、試吃了一口...很美味
			PRINTFORML 這樣的味道就算被收錢也不會有人抱怨啊
			PRINTL
			PRINTFORML 「桀桀桀、謝謝。果然料理是最棒的啊。可以從食客的慾望直接看出來」
			PRINTFORML 品嘗自己的料理的同時、少女聽到%CALLNAME:MASTER%的讚美、浮出了笑容
			PRINTW
			PRINTFORML 被她帶走節奏、一起用餐。但是、面前的少女到底是誰呢
			PRINTFORML 如同同時想到了相同的事情、少女注視了這邊
			PRINTL
			PRINTFORML 「不過…你是誰啊？」
			PRINTFORML 「改口道歉地踏進屋裡、並且介紹了自己的名字」
			PRINTW
			PRINTFORML 「呼嗯、是叫做%CALLNAME:MASTER%啊」
			PRINTFORML 「%CALLNAME:MASTER%、你太過好奇了吧」
			PRINTFORML 「我自己不說、但我的部下們看待人類只會當成奴隸」
			PRINTL
			PRINTFORML 「嗯？　你才發現嗎？　我就是剛慾同盟－同盟長、饕餮尤魔」
			PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
			PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
			PRINTW
			PRINTFORML 「......但如果你真的想成為本組的一員、那隨便你」
			PRINTFORML 「脫到底、我並沒有建立組織的打算。我的部下們也是各自做自己喜歡的事情」
			PRINTFORML 「所以你也要自己想辦法。嘛、我也不期望什麼啦」
			PRINTFORML 「嘛、肚子餓了就來這裡吧。偶爾我會給你一些飯吃的」
			PRINTW
			PRINTFORML 現在、你也許被認為是「剛欲同盟」的一員了......誰知道呢
			PRINTL
			CFLAG:1006 = 1
		ENDSELECT
	;生活間以外（お風呂は追い出されるため実質起床後の寝室一択）
	ELSE
		PRINTFORML 在某個豪宅的一個房間裡、有一個少女
		PRINTFORML 從像羊毛一樣柔軟的頭髮中、有著兩根紅色的羊角、頂端還綁著藍色的絲帶
		PRINTFORML 穿著像饕餮紋一般的洋裝、下面還穿著露肩的紅色內衣
		PRINTL
		PRINTFORML 「嗯嗯？」
		PRINTFORML 「看起來很眼熟…你、是哪個組的人啊？」
		SELECTCASE RESULT
		;観光客を名乗る
		CASE 0
			PRINTFORML 「桀桀桀、跑到有黑幫份子的地方觀光、到底是一個大笨蛋還是大人物呢」
			IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
				PRINTFORML 「還跟這樣的小鬼混在一起…真是太驚人了」
			ENDIF
			PRINTFORML 「你的、名子？」
			PRINTL
			PRINTFORML 「了解了、叫做%CALLNAME:MASTER%是吧。我記住了」
			PRINTFORML 「我嗎？　我叫做尤魔」
			PRINTL
			CALL ASK_YN("難道是...","那個剛欲同盟的...")
			IF !RESULT
				PRINTFORML 「桀桀桀、太出乎我意料了」
			ELSE
				PRINTFORML 「哇啊、沒想到連一般的觀光客也都知道我的名子了、出人頭地了啊」
			ENDIF
			PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
			PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
			PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
			PRINTL
			PRINTL 那女孩這麼說著、把一根勺子一樣的東西督了過來
			PRINTFORML 「不然的話、就會被可怕的妖怪從頭開始啃食掉喔」
			PRINTW
		;鬼傑組を名乗る
		CASE 1
			PRINTFORML 「桀桀桀、這麼有膽量地公開自己是組的一員、很勇敢呢」
			PRINTFORML 「但很可惜、鬼傑組的人都是不會傻傻的說出自己是哪個組的人呢」
			IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
				PRINTFORML 「還有這種小孩子在玩黑幫遊戲...這個世道真的是混亂啊、喂」
			ENDIF
			IF TALENT:130:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「桀桀桀、可歌可泣。你真是個好\@ TALENT:MASTER:性別 == 2 ? 男 # 女 \@呢」
				PRINTFORML 「但是啊…一個人獨自行動、還是太過魯莽了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSEIF TALENT:130:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了愛慕的女性、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙只把人類當成工具般地看待」
				PRINTL
				PRINTFORML 「也許、你是因為被那傢伙的能力所控制住、而無法反抗吧」
				PRINTFORML 「或者是...沒有考慮後果就隨便自稱自己是鬼傑組的傻瓜呢」
				PRINTW
				PRINTFORML 「另外」
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
				PRINTW
				PRINTL
				PRINTL
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「但萬一你真的是鬼傑組的人、我也不想給她一個報復的藉口」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ENDIF
			PRINTFORML 「啊、糟糕、忘記做自我介紹了」
			PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
			PRINTFORML 「如果你真的是鬼傑組的人、那相信我們會再會的」
			PRINTW
			PRINTFORML 看起來你被視為「鬼傑組」的一員了
			PRINTL
			CFLAG:1004 = 1
		;勁牙組を名乗る
		CASE 2
			PRINTFORML 「桀桀桀、氣勢不錯」
			PRINTFORML 「不過、吐口水的對象要好好選擇啊、這是弱肉強食的世界的常態」
			IF (TALENT:MASTER:年齢 < 0 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
				PRINTFORML 「還有這種小孩子在玩黑幫遊戲...這個世道真的是混亂啊、喂」
			ENDIF
			IF TALENT:133:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「雖然這種招數也有、但如果驪駒一怒之下不顧一切攻擊過來的話、那就很麻煩了」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSEIF TALENT:133:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了那個十分自戀的女人、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「雖然這種招數也有、但如果驪駒一怒之下不顧一切攻擊過來的話、那就很麻煩了」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙、只把人類當作獵物看待而已」
				PRINTFORML 「嘿、那邊只要有實力就是正義。只要有能力就可以爬上去、就算是你這樣的傢伙也一樣」
				PRINTFORML 「又或許...只是一個不顧後果、輕率地自稱是勁牙組的笨蛋而已」
				PRINTW
				PRINTFORML 「另外」
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
				PRINTW
				PRINTL
				PRINTL
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「但萬一你真的是勁牙組的人、我也不想給她一個報復的藉口」
				PRINTFORML 「如果你沒有想要什麼製造麻煩的意圖、我就放過你了」
				PRINTL
			ENDIF
			PRINTFORML 「啊、糟糕、忘記做自我介紹了」
			PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
			PRINTFORML 「如果你真的是勁牙組的人、那相信我們會再會的」
			PRINTW
			PRINTFORML 看起來你被視為「勁牙組」的一員了
			PRINTL
			CFLAG:1005 = 1
		;剛欲同盟に志願
		CASE 3
			PRINTFORML 「喂喂、你也太過好奇了吧」
			PRINTFORML 「我自己不說、但我的部下們看待人類只會當成奴隸」
			PRINTL
			PRINTFORML 「嗯？　你發現了嗎？　對、我就是剛欲同盟的同盟長、饕餮尤魔」
			PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
			PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
			PRINTW
			PRINTFORML 「......但如果你真的想成為本組的一員、那隨便你」
			PRINTFORML 「脫到底、我並沒有建立組織的打算。我的部下們也是各自做自己喜歡的事情」
			PRINTFORML 「所以你也要自己想辦法。嘛、我也不期望什麼啦」
			PRINTW
			PRINTFORML 現在、你也許被認為是「剛欲同盟」的一員了......誰知道呢
			PRINTL
			CFLAG:1006 = 1
		ENDSELECT
	ENDIF
;八千慧、早鬼の邸宅
ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 647, 648, 650, 651)
	PRINTFORML 有一個少女
	PRINTFORML 從像羊毛一樣柔軟的頭髮中、有著兩根紅色的羊角、頂端還綁著藍色的絲帶
	PRINTFORML 穿著像饕餮紋一般的洋裝、下面還穿著露肩的紅色內衣
	PRINTFORML 而少女的背後揹著一個比什麼東西還要吸睛的一根大勺子
	PRINTL
	PRINTFORML 「嗯嗯？」
	PRINTFORML 「除了我以外還有客人？　長得很陌生啊...你是哪個幫派的？」
	CALL ASK_M("ただの観光客です", 1,"鬼傑組の%CALLNAME:MASTER%と申します", 1,"勁牙組の%CALLNAME:MASTER%じゃコラァ！", 1,"剛欲同盟に憧れる%CALLNAME:MASTER%です", 1)
	SELECTCASE RESULT
	;観光客を名乗る
	CASE 0
		PRINTFORML 「桀桀桀、跑到有黑幫份子的地方觀光、到底是一個大笨蛋還是大人物呢」
		PRINTFORML 「你的、名子？」
		PRINTL
		PRINTFORML 「了解了、叫做%CALLNAME:MASTER%是吧。我記住了」
		;八千慧が恋人または恋慕
		IF TALENT:130:恋人 || TALENT:130:恋慕
			IF GROUPMATCH(CFLAG:MASTER:現在位置, 647, 648)
				PRINTFORML 「等等。你是%CALLNAME:MASTER%嗎？　%CALLNAME:MASTER%...啊啊、我想起來了」
				PRINTFORML 「你是吉弔的夥伴嗎。我覺得我在哪裡聽過你的名字」
				PRINTFORML 「那你會出現在這裡也很正常呢。新婚夫婦都很熱情嘛」
			ELSE
				PRINTFORML 「等等。你是%CALLNAME:MASTER%嗎？　%CALLNAME:MASTER%...啊啊、我想起來了」
				PRINTFORML 「你是吉弔的夥伴嗎。我覺得我在哪裡聽過你的名字」
				PRINTFORML 「為了愛人進行敵情觀察嗎？　還真是感人呢」
			ENDIF
		;早鬼が恋人または恋慕
		ELSEIF TALENT:133:恋人 || TALENT:133:恋慕
			IF GROUPMATCH(CFLAG:MASTER:現在位置, 650, 651)
				PRINTFORML 「等等。你是%CALLNAME:MASTER%嗎？　%CALLNAME:MASTER%...啊啊、我想起來了」
				PRINTFORML 「你是驪駒的朋友吧。我覺得在哪聽過這個名字」
				PRINTFORML 「那你會出現在這裡也很正常呢。新婚夫婦都很熱情嘛」
			ELSE
				PRINTFORML 「等等。你是%CALLNAME:MASTER%嗎？　%CALLNAME:MASTER%...啊啊、我想起來了」
				PRINTFORML 「你是驪駒的朋友吧。我覺得在哪聽過這個名字」
				PRINTFORML 「為了愛人進行敵情觀察嗎？　還真是感人呢」
			ENDIF
		ENDIF
		PRINTFORML 「我嗎？　我叫做尤魔」
		PRINTL
		CALL ASK_YN("難道是...","那個剛欲同盟的...")
		IF !RESULT
			PRINTFORML 「桀桀桀、太出乎我意料了」
		ELSE
			PRINTFORML 「哇啊、沒想到連一般的觀光客也都知道我的名子了、出人頭地了啊」
		ENDIF
		PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
		PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
		PRINTFORML 「不像我、這裡的傢伙們根本不在乎人類的事」
		PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
		PRINTL
		PRINTL 那女孩這麼說著、把一根勺子一樣的東西督了過來
		PRINTFORML 「不然的話、就會被可怕的妖怪從頭開始啃食掉喔」
		PRINTW
	;鬼傑組を名乗る
	CASE 1
		;八千慧邸
		IF GROUPMATCH(CFLAG:MASTER:現在位置, 647, 648)
			PRINTFORML 「哦、原來是這裡組織的人啊」

			PRINTFORML 「因為在是老大的地盤內、所以就變得自以為是了、是嗎？」
			IF TALENT:130:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了戀人而向我打聽情報嗎？」
				PRINTFORML 「桀桀桀、可歌可泣。你真是個好\@ TALENT:MASTER:性別 == 2 ? 男 # 女 \@呢」
				PRINTFORML 「但是你知道嗎…選對對手很重要喔？」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我也是黑幫的。除非像是吉弔這樣的人、你這樣的小傢伙可不是我的對手喔？」
				PRINTFORML 身材嬌小的女孩用意想不到的沉穩聲音警告道
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「我本來只是以客人身份來到這裡的。並不想在別人的領地上造成麻煩」
				PRINTL
			ELSEIF TALENT:130:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了愛慕的女性、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我也是黑幫的。除非像是吉弔這樣的人、你這樣的小傢伙可不是我的對手喔？」
				PRINTFORML 身材嬌小的女孩用意想不到的沉穩聲音警告道
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「我本來只是以客人身份來到這裡的。並不想在別人的領地上造成麻煩」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙只把人類當成工具般地看待」
				PRINTL
				PRINTFORML 「也許、你是因為被那傢伙的能力所控制住、而無法反抗吧」
				PRINTFORML 「或者是...沒有考慮後果就隨便自稱自己是鬼傑組的傻瓜呢」
				PRINTW
				PRINTFORML 「另外」
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「你以為惹到了敵對組織的首領、能安然了事嗎？」
				PRINTW
				PRINTL
				PRINTL
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「但萬一你真的是鬼傑組的人、我也不想給她一個報復的藉口」
				PRINTFORML 「我也是當作客人到這裡來的。並沒有想要在別人的地盤上惹事」
				PRINTL
			ENDIF
		;早鬼邸
		ELSE
			PRINTFORML 「你知道嗎、這裡可是敵對組織的核心區域」
			PRINTFORML 「在這種地方還可以傻傻自稱的老實人嗎？　對鬼傑來說、你實在是太蠢了」
			IF TALENT:130:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「桀桀桀、可歌可泣。你真是個好\@ TALENT:MASTER:性別 == 2 ? 男 # 女 \@呢」
				PRINTFORML 「但是啊…一個人獨自行動、還是太過魯莽了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
				PRINTFORML 「我也是當作客人到這裡來的、並沒有想要在別人的地盤上惹事」
				PRINTFORML 「在騷亂爆發之前、我們最好趕快離開這裡」
				PRINTL
			ELSEIF TALENT:130:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了愛慕的女性、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「我可是黑幫的。我可以折磨你也可以綁架你、或著把你綁起來沉入三途川之中體驗精神折磨」
				PRINTW
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「這招雖然可以、但如果吉弔用太過惡劣的策略激怒我、那可不行」
				PRINTFORML 「我也是當作客人到這裡來的、並沒有想要在別人的地盤上惹事」
				PRINTFORML 「在騷亂爆發之前、我們最好趕快離開這裡」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙只把人類當成工具般地看待」
				PRINTL
				PRINTFORML 「也許、你是因為被那傢伙的能力所控制住、而無法反抗吧」
				PRINTFORML 「或者是...沒有考慮後果就隨便自稱自己是鬼傑組的傻瓜呢」
				PRINTW
				PRINTFORML 「另外」
				PRINTFORML 那女孩這麼說著、把一根勺子一樣的東西督了過來
				PRINTFORML 「這麼莽撞的招惹敵對組織的首領、你覺得你能安然無恙的離開嗎？」
				PRINTW
				PRINTL
				PRINTL
				PRINTFORML 「...什麼、啊」
				PRINTFORML 「但萬一你真的是鬼傑組的人、我也不想給她一個報復的藉口」
				PRINTFORML 「我也是當作客人到這裡來的。並沒有想要在別人的地盤上惹事」
				PRINTFORML 「在騷亂爆發之前、我們最好趕快離開這裡」
				PRINTL
			ENDIF
		ENDIF
		PRINTFORML 「啊、糟糕、忘記做自我介紹了」
		PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
		PRINTFORML 「如果你真的是鬼傑組的人、那相信我們會再會的」
		PRINTW
		PRINTFORML 看起來你被視為「鬼傑組」的一員了
		PRINTL
		CFLAG:1004 = 1
	;勁牙組を名乗る
	CASE 2
		;八千慧邸（お風呂は除外）
		IF GROUPMATCH(CFLAG:MASTER:現在位置, 647, 648)
			PRINTFORML 「…果然勁牙的人都是很蠻幹的...不過比起鬼傑的人、還是有些可愛之處…」
			PRINTFORML 「居然在敵對組織的核心區域大喇喇地自我介紹、真是個笨蛋」
			IF TALENT:133:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 「這裡是吉弔的地盤。如果你不想讓女朋友哭泣的話、就乖乖的回去吧。」
				PRINTFORML 「最終受害者是驪駒啊？」
				PRINTL
			ELSEIF TALENT:133:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了那個十分自戀的女人、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 「這裡是吉弔的地盤。如果你不想讓女人哭泣的話、就乖乖的回去吧」
				PRINTFORML 「最終受害者是驪駒啊？」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙、只把人類當作獵物看待而已」
				PRINTFORML 「嘿、那邊只要有實力就是正義。只要有能力就可以爬上去、就算是你這樣的傢伙也一樣」
				PRINTFORML 「又或許...只是一個不顧後果、輕率地自稱是勁牙組的笨蛋而已」
				PRINTW
				PRINTFORML 「萬一你真的是勁牙的人、也別在吉弔的地盤說出組織的名字啊」
				PRINTFORML 「最終受害者會驪駒啊？　那麼、這就是你的目的了嗎？」
				PRINTFORML 「…唉、為什麼我得管像你這樣的小角色的瑣碎雜事呢...給我好好教育一下你的部下啊喂」
				PRINTL
			ENDIF
		;早鬼邸（お風呂は除外）
		ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 650, 651)
			IF TALENT:133:恋人
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「是為了戀人企圖去敵對組織當臥底嗎？」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 而且我是以客人的身份來到這裡的。我知道你們都是粗魯的蠻夫、但是還是有禮貌吧？」
				PRINTFORML 「最終受害者是驪駒啊？」
				PRINTL
			ELSEIF TALENT:133:恋慕
				PRINTFORML 「嗯？　你、好像是…」
				PRINTFORML 「為了那個十分自戀的女人、獻出心臟？　真是令人感動呢」
				PRINTFORML 「不過還是別玩了吧。彈幕遊戲姑且不論、但如果是為了廝殺而進行的彈幕、那就沒人能保證安全了」
				PRINTL
				PRINTFORML 而且我是以客人的身份來到這裡的。我知道你們都是粗魯的蠻夫、但是還是有禮貌吧？」
				PRINTFORML 「最終受害者是驪駒啊？」
				PRINTL
			ELSE
				PRINTFORML 「是不是真正的幫派成員並不重要。但很可能你只是被利用的工具罷了」
				PRINTFORML 「那些傢伙、只把人類當作獵物看待而已」
				PRINTFORML 「嘿、那邊只要有實力就是正義。只要有能力就可以爬上去、就算是你這樣的傢伙也一樣」
				PRINTFORML 「又或許...只是一個不顧後果、輕率地自稱是勁牙組的笨蛋而已」
				PRINTW
				PRINTFORML 「萬一你真的是勁牙的人、也不要去挑釁正式的客人啊」
				PRINTFORML 「最終受害者會驪駒啊？　那麼、這就是你的目的了嗎？」
				PRINTFORML 「…唉、為什麼我得管像你這樣的小角色的瑣碎雜事呢...給我好好教育一下你的部下啊喂」
				PRINTL
			ENDIF
		ENDIF
		PRINTFORML 「啊、糟糕、忘記做自我介紹了」
		PRINTFORML 「我就是剛欲同盟－同盟長、饕餮尤魔」
		PRINTFORML 「如果你真的是勁牙組的人、那相信我們會再會的」
		PRINTW
		PRINTFORML 看起來你被視為「勁牙組」的一員了
		PRINTL
		CFLAG:1005 = 1
	;剛欲同盟に志願
	CASE 3
		PRINTFORML 「喂喂、你也太過好奇了吧」
		PRINTFORML 「我自己不說、但我的部下們看待人類只會當成奴隸」
		PRINTL
		PRINTFORML 「話說、想要加入同盟的家夥為什麼在這裡晃來晃去的？」
		PRINTFORML 「是因為趕著想立功回去...但是如果被發現的話、你可就要被圍毆了。幸好是我先搭話了」
		PRINTL
		PRINTFORML 「嗯？　你發現了嗎？　對、我就是剛欲同盟的同盟長、饕餮尤魔」
		PRINTFORML 「%CALLNAME:MASTER%、我並不想跟你說些難聽的話、但這裡可不是正常人該來的地方」
		PRINTFORML 「所以如果不想被扒光全身的皮的話、就趕緊滾出畜生界吧」
		PRINTW
		PRINTFORML 「......但如果你真的想成為本組的一員、那隨便你」
		PRINTFORML 「脫到底、我並沒有建立組織的打算。我的部下們也是各自做自己喜歡的事情」
		PRINTFORML 「所以你也要自己想辦法。嘛、我也不期望什麼啦」
		PRINTW
		PRINTFORML 現在、你也許被認為是「剛欲同盟」的一員了......誰知道呢
		PRINTL
		CFLAG:1006 = 1
	ENDSELECT
;畜生界以外でのメインMapでの遭遇
ELSEIF MAIN_MAP == 6
	PRINTFORML 有一個少女
	PRINTFORML 從像羊毛一樣柔軟的頭髮中、有著兩根紅色的羊角、頂端還綁著藍色的絲帶
	PRINTFORML 穿著像饕餮紋一般的洋裝、下面還穿著露肩的紅色內衣
	PRINTFORML 而少女的背後揹著一個比什麼東西還要吸睛的一根大勺子
	PRINTW
	PRINTFORML 「嗯嗯？」
	PRINTFORML 「是這附近可不常見的臉孔呢…你是地上人嗎？」
	PRINTFORML 少女很機敏地觀察著這邊
	PRINTL
	IF FLAG:陥落人数 >= 10
		PRINTFORML 「呼嗯、你的內心深處堆積了很多慾望呢」
		PRINTFORML 「簡單來說、就是想把女人變成自己的東西的慾望。對我來說、能夠〝看到〟他人的慾望」
		IF FLAG:周回数 > 3
			PRINTFORML 「！！　哦呵呵…♪　 真是令人興奮啊、桀桀桀」
			PRINTFORML 「你、擁有個很驚人的慾望啊。像這樣的慾望…從那位時代的皇帝以來就沒有了…不、甚至更勝一籌」
			PRINTFORML 「就算是像我這樣的人、也會因為你的慾望而感到厭惡呢。桀桀桀」
		ELSEIF FLAG:周回数 > 0
			PRINTFORML 「等等啊...你、雖然藏得很好，但是你的問題可不小啊」
			PRINTFORML 「雖然是〝同類〟、但是身上卻纏繞了不同的慾望。桀桀桀、真是個有趣的傢伙」
		ENDIF
		PRINTFORML 「你是為了這個目的而來的嗎？　真是有深度的人啊、桀桀桀」
	ELSEIF FLAG:陥落人数 >= 2
		PRINTFORML 「哼、是為了尋找與女性的邂逅而遠道而來嗎？」
		PRINTFORML 「我啊、是能夠〝看到〟他人的慾望的。你是不是跟好幾個人輪流玩耍過了啊？」
		IF FLAG:周回数 > 3
			PRINTFORML 「嘿等等…你雖然藏得好、但是你是個相當有慾望的人啊」
			PRINTFORML 「一開始我沒有注意到、但是這些慾望纏繞得像蛇一樣複雜、感覺不像是只有一個人一樣。桀桀桀」
		ELSEIF FLAG:周回数 > 0
			PRINTFORML 「嘿等等…你雖然藏得好、但是你是個相當有慾望的人啊」
			PRINTFORML 「雖然是〝同類〟、但是身上卻纏繞了不同的慾望。桀桀桀、真是個有趣的傢伙」
		ENDIF
	ELSE
		PRINTFORML 「哼、看起來是擁有著相當普通的慾望持有者啊」
		IF FLAG:周回数 > 3
			PRINTFORML 「嘿等等…你雖然藏得好、但是你是個相當有慾望的人啊」
			PRINTFORML 「一瞬間還沒有注意到、但好多層的慾望像蛇一樣纏繞在一起。桀桀桀、真是厲害的傢伙呢」
		ELSEIF FLAG:周回数 > 0
			PRINTFORML 「嘿等等…你雖然藏得好、但是你是個相當有慾望的人啊」
			PRINTFORML 「雖然是〝同類〟、但是身上卻纏繞了不同的慾望。桀桀桀、真是個有趣的傢伙」
		ENDIF
	ENDIF
	PRINTW
	PRINTFORML 「歡迎來到幻想鄉、從遠方而來的旅人。我是饕餮尤魔」
	PRINTFORML 「聽說你是地上噴出黑水…造成異變的罪魁禍首？」
	PRINTL
	PRINTFORML 「我已經自我介紹了。請問你的名字是」
	PRINTFORML 「呼嗯、是叫做%CALLNAME:MASTER%啊」
	PRINTFORML 「請多多指教、%CALLNAME:MASTER%。希望我們可以長期合作…」
	PRINTFORML 少女眯起羊一般的眼睛、露出尖牙、咧嘴一笑
	PRINTW
;完全にアウェー（縁結びなんかでできる？）
ELSE
	PRINTFORML 有一個少女
	PRINTFORML 從像羊毛一樣柔軟的頭髮中、有著兩根紅色的羊角、頂端還綁著藍色的絲帶
	PRINTFORML 穿著像饕餮紋一般的洋裝、下面還穿著露肩的紅色內衣
	PRINTFORML 而少女的背後揹著一個比什麼東西還要吸睛的一根大勺子
	PRINTW
	PRINTFORML 「嗯嗯？」
	PRINTFORML 「咦、不好意思、勺子碍事了」
	PRINTFORML 「只是袖子擦過也是個緣分呢、我是饕餮尤魔」
	PRINTFORML 「平常的我都待在地獄裡、但有時會無端就想到地上走走」
	PRINTL
	PRINTFORML 「你的名字是？　可以告訴我嗎」
	PRINTFORML 「哼～叫做%CALLNAME:MASTER%是嗎。再次初次見面、%CALLNAME:MASTER%」
	PRINTFORML 「順便你問一下──」
	IF FLAG:陥落人数 >= 10
		PRINTFORML 「真是個貪婪的傢伙啊」
		PRINTFORML 「是言辭有趣、還是技巧高超呢？還是擁有吸引人的魅力呢？你對女人從來不會有困難吧？」
		PRINTFORML 「我〝看得見〟喔。對我來說、你對女人的慾望很強烈呢」
		IF FLAG:周回数 > 3
			PRINTFORML 「嗯、嗯嗯...？　！！哦呼...♪　 這、這是、桀桀桀」
			PRINTFORML 「你、擁有個很驚人的慾望啊。像這樣的慾望…從那位時代的皇帝以來就沒有了…不、甚至更勝一籌」
			PRINTFORML 「一瞬間沒有注意到、你懷有很多的欲望啊」
			PRINTFORML 「就算是像我這樣的人、也會因為你的慾望而感到厭惡呢。桀桀桀」
		ELSEIF FLAG:周回数 > 0
			PRINTFORML 「等等啊...你、雖然藏得很好，但是你的問題可不小啊」
			PRINTFORML 「雖然是〝同類〟、但是身上卻纏繞了不同的慾望。桀桀桀、真是個有趣的傢伙」
		ENDIF
		PRINTFORML 「決定了。我、決定要跟著你了」
		PRINTFORML 「你所持有的欲望非常有趣。我的直覺告訴我、如果跟著你、會有很多有趣的事情發生」
		PRINTFORML 「今後也請多關照了、%CALLNAME:MASTER%」
		PRINTFORML 尤魔露出了帶有利齒的笑容
		PRINTW
	ELSEIF FLAG:陥落人数 >= 2
		PRINTFORML 「你有不少的欲望啊。女人用兩隻手擁抱你可能都還不夠吧？」
		PRINTFORML 「我〝看得見〟喔。對我來說、你對女人的慾望很強烈呢」
		IF FLAG:周回数 > 3
			PRINTFORML 「等等啊...你雖然藏得很好、但是是個相當有欲望的人呢」
			PRINTFORML 「一開始我沒有注意到、但是這些慾望纏繞得像蛇一樣複雜、感覺不像是只有一個人一樣。桀桀桀」
		ELSEIF FLAG:周回数 > 0
			PRINTFORML 「嘿等等…你雖然藏得好、但是你是個相當有慾望的人啊」
			PRINTFORML 「雖然是〝同類〟、但是身上卻纏繞了不同的慾望。桀桀桀、真是個有趣的傢伙」
		ENDIF
		PRINTFORML 「決定了。我、決定要跟著你了」
		PRINTFORML 「你所持有的欲望非常有趣。我的直覺告訴我、如果跟著你、會有很多有趣的事情發生」
		PRINTFORML 「今後也請多關照了、%CALLNAME:MASTER%」
		PRINTFORML 尤魔露出了帶有利齒的笑容
		PRINTW
	ELSE
		PRINTFORML 「你知道有什麼好吃的餐廳嗎？　我對美食非常著迷」
		PRINTFORML 「不過因為我在地上沒有太多熟人、所以有些困擾。如果你知道有些好地方、能帶我去嗎」
		PRINTFORML 尤魔露出了帶有利齒的笑容
		PRINTW
	ENDIF

	PRINTW
ENDIF
RETURN 1

@K143_BEFORETRAIN
;一日の開始時、正確には来訪判定時に読み込む関数,使用ときはコメントアウトを外すこと
;ここでCFLAG:XX:翌日来訪を設定して確実に来訪させたりTCVAR:XX:発情で朝っぱらからサカらせることもできる
;ただし「毎朝例外なく読み込まれる」ため、条件を設定しておくことが望ましい
;尤魔宅の生活間（厨房）は常に清潔に保たれている
IF YOGORE:(653) > 0
	PRINTFORML 尤魔似乎在起床後徹底打掃了廚房的每一個角落...
	YOGORE:(653) = 0
ENDIF

IF K143C_剛欲同盟 == 1 && (DAY:2 == 1 && DAY:3 == 1)
	PRINTFORML 「桀桀桀。新年快樂」
	PRINTFORML 在尤魔的豪宅中、剛欲同盟的成員們齊聚一堂
	PRINTW
	PRINTFORML 「給努力付出的你們一個新年紅包吧。來、排成一列」
	PRINTFORML 從平常就對尤魔有崇敬之心的成員們發出歡呼聲
	PRINTW
	PRINTFORML 他們從尤魔手中接過禮物後、
	PRINTFORML 「守矢的神簽啊啊啊啊」
	PRINTFORML 「木片啊啊啊啊啊」
	PRINTFORML 「100個籌碼啊啊啊啊啊」
	PRINTFORML 之類的喜悅之聲（？）此起彼落…
	PRINTW
	PRINTFORML 「桀桀桀。只是送你禮物還不夠刺激。重點是裡面的東西」
	PRINTFORML 「那麼、%CALLNAME:MASTER%。今年你的紅包裡有什麼呢？」
	PRINTW
	PRINTFORML 命運的鼓聲……噹噹噹！
	PRINTW
	SELECTCASE RAND:99
	CASE 0
		PRINTFORML ＼＼拿到了100000円啊啊啊啊！／／
		PRINTW
		PRINTFORML 「哇……竟然中大獎了呢」
		PRINTFORML 「今年可能真的很幸運啊。那筆錢就好好花吧」
		PRINTW
		MONEY += 100000
	CASE 1 TO 10
		PRINTFORML ＼＼拿到了30000円啊啊啊啊！／／
		PRINTW
		PRINTFORML 「哦、可惜、差點就中大獎了呢」
		PRINTFORML 「雖然不壞、但最高獎金還有剩呢。明年再加油吧」
		PRINTW
		MONEY += 30000
	CASE 11 TO 20
		PRINTFORML ＼＼拿到了10000円啊啊啊啊！／／
		PRINTW
		PRINTFORML 「還不錯了啦」
		PRINTFORML 「不過還有比那個金額高的獎金呢」
		PRINTW
		MONEY += 10000
	CASE 21 TO 40
		PRINTFORML 是地獄拉麵一年份兌換券啊啊啊啊！
		PRINTW
		PRINTFORML 「桀桀桀。你喜歡吃辣嗎？」
		PRINTW
	CASE 41 TO 60
		PRINTFORML 是兒童銀行券（100兆元）啊啊啊啊！
		PRINTW
		PRINTFORML 「桀桀桀。是面額最高的啊」
		PRINTW
	CASE 61 TO 99
		PRINTFORML 是鋼羊毛啊啊啊啊！
		PRINTW
		PRINTFORML 「桀桀桀。可惜了。希望下次能中車票之類的就好了呢」
		PRINTW
	ENDSELECT
	PRINTW

ENDIF

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K143_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORML 「喂、%CALLNAME:MASTER%。今天玩得很開心啊」
	PRINTFORML 尤魔似乎心情很好。 儘管如此、仍然把手臂繞在脖子上…
	PRINTL
	PRINTFORML 「為了你的努力、我得給你點獎勵才行啊」
	PRINTFORML 尤魔咧嘴笑著靠近、當她出現在視線中時、在嘴唇上感受到了她柔軟的嘴唇
	PRINTW
	PRINTFORML 「感覺如何？　剛欲同盟長的味道如何啊？」
	PRINTFORML 「桀桀桀、順便說一下、剛才可是我的第一次啊、感到很榮幸吧」
	PRINTL
	PRINTFORML 「意外吧？　不幸的是、迄今為止、我都沒有特別想要獻上的對象、也沒有到骨子裡都想搶奪的人」
	PRINTFORML 「這證明了你是個特別的存在啊」
	PRINTL
	IF K143C_鬼傑組 == 1
		IF TALENT:130:恋人
			PRINTFORML 「是吉弔的情夫？我不知道。是我喜歡上了你」
		ELSE
			PRINTFORML 「即使你和鬼傑有緣分也一樣」
		ENDIF
		PRINTFORML 「記住吧。饕餮尤魔不論使用什麼手段都要得到自己想要的東西」
		PRINTL
	ELSEIF K143C_勁牙組 == 1
		IF TALENT:130:恋人
			PRINTFORML 「是驪駒的情夫？我不知道。是我喜歡上了你」
		ELSE
			PRINTFORML 「即使你和勁牙有緣分也一樣」
		ENDIF
		PRINTFORML 「記住吧。饕餮尤魔不論使用什麼手段都要得到自己想要的東西」
		PRINTL
	ELSEIF K143C_剛欲同盟 == 1
		PRINTFORML 「組織裡的人都不反對嗎？　管他的呢。我對想要的東西不管用什麼手段都要得到」
		PRINTFORML 「你也一樣。有意見的人我就揍他。你是我的東西」
		PRINTL
	ELSE
		PRINTFORML 「雖然我覺得對一個正經的人下手有點過分。但我就是貪心。想要的東西就必須得到」
		PRINTFORML 「你會覺得我不顧及你的感受是個壞人嗎？　那就是和饕餮尤魔交往的結果」
		PRINTFORML 「我有的都會給你。代價是你的全部都得給我。身心全部都是我的」
		PRINTL
	ENDIF
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K143_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「嘿、%CALLNAME:MASTER%。要跟我交往嗎？」
		PRINTFORML 「已經約會了、那個不是重點啦。你啊、其實還蠻遲鈍的嘛」
		PRINTL
		PRINTFORML  「就是讓你當我的男友啦」
		IF TALENT:MASTER:無知
			PRINTFORML 「你看起來不太懂啊…」
			PRINTFORML 「啊—、就是—我喜歡你、所以想跟你更親密一點啊」
			PRINTFORML 「啊—我知道了我知道了！　我就是喜歡你啊、請一直陪著我好嗎！　懂了吧！　以後別問我這件事了啦！」
		ELSE
			PRINTFORML 「我喜歡著你。這跟利害完全沒有關係」
			IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
				PRINTFORML 「就算你是對手組織的人、我也是很貪心的。想要的東西就要拿到手。」
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「你或許是我的部下沒錯、但我們一個隨心所欲的組織。你可以隨心所欲地談戀愛」
			ELSE
				PRINTFORML 「你並不屬於任何一個組織。我要在你被任何人搶走之前、讓你變成我的」
			ENDIF
			PRINTW
			PRINTFORML 「……儘管我說了這麼多理由、實際上、我就只是不想讓其他人搶走你」
			PRINTFORML 「在所有事情上、我都是按照自己的利益行事的。很好笑吧？」
			PRINTW
			PRINTFORML 「……你能成為？　我的戀人嗎」
			PRINTL
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:MASTER:無知
			PRINTFORML 「感覺好像還有點不太明白、但是...你好像也喜歡上我了呢」
		ELSE
			PRINTL
			PRINTFORML 「對、對！」
			PRINTFORML 尤魔滿面笑容地抱著%CALLNAME:MASTER%
			PRINTW
			IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
				PRINTFORML 「我會跟組織的人說的、你放心吧」
				PRINTFORML 「對我來說、就算結盟也完全沒問題啊。既能確保勢力、你也可以安心地跟我見面」
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「我會向同盟的人宣告的、你放心吧」
				PRINTFORML 「如果我說我愛上了你、大多數人應該都會理解的吧。嗯、有一兩句小話可以說嗎」
			ELSE
				PRINTFORML 「從今天開始你我就是戀人了！　太棒了！」

				PRINTFORML 「哈哈、我的心從那以後就沒有這麼激動過了、來碰碰看吧。就像是鬧鐘響了一樣對吧？」
			ENDIF
		ENDIF
		PRINTW
		PRINTFORML 「那麼、既然都成為戀人了、就得做這件事情才行呢」
		PRINTFORML 尤魔露出狡猾的笑容、抱住對方的同時靠近了臉
		PRINTW
		IF TALENT:MASTER:無接吻経験
			CALL SET_FIRSTKISS(MASTER, 143, 0)
			PRINTFORML 「你是不是第一次呢？」
			IF TALENT:143:無接吻経験
				PRINTFORML 「真是巧呢、其實我也是第一次」
			ELSE
				PRINTFORML 「我的還運氣真好呢。奪走了你的第一次呢」
			ENDIF
		ELSEIF TALENT:143:無接吻経験
			CALL SET_FIRSTKISS(143, MASTER, 0)
			PRINTFORML 「感覺很生澀？　沒關係啦、畢竟是第一次嘛」
			PRINTFORML 「即使只是第一次、我也想跟你接吻啊…有問題嗎？」
			PRINTFORML 尤魔難得露出害羞的表情、有些局促不安
		ELSE
			PRINTFORML 「雖然我們並不是互相的第一次…但對於戀人身分來說、這是第一次接吻呢」
			PRINTFORML 「難以言喻…唇唇相觸、有點癢癢的、跟之前的接吻完全不同呢」
		ENDIF
		PRINTW
		PRINTFORML 「既然成為了戀人、你就是我的人了、一滴血也不留」
		PRINTFORML 「我會深深的愛著你、直到骨子裡。做好覺悟吧、桀桀桀」
		PRINTFORML 尤魔用可怕的表情和話語對我最大程度地示愛...
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
			PRINTFORML 「怎麼了？　難道是害怕被組織懲罰嗎？」
			IF (TALENT:MASTER:年齢 <= 0 ||  (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行))
				PRINTFORML 「...嘛、你更應該害怕我會生氣吧」
				PRINTW
			ELSE
				PRINTFORML 「...嘛、不像我可以這樣胡作非為、你們的組織應該很嚴格吧」
				PRINTW
			ENDIF
				PRINTFORML 「切、沒辦法啊。我會等到你改變主意的」
				PRINTFORML 「雖然這麼說、但我也很擅長等待和說服別人哦」
				PRINTFORML 「不過不要讓我等太久哦？　畢竟我也可能會直接動手的？」
				PRINTW
		ELSEIF K143C_剛欲同盟 == 1
			PRINTFORML 「咦？　你是不是在在意周圍的眼光？」
			IF TALENT:MASTER:無知
				PRINTFORML 「...還不太了解的樣子呢」
				PRINTFORML 「...稍微有點動搖我對你的好感了」
			ELSE
				SELECTCASE K143C_地位
				;若頭
				CASE 5
					PRINTFORML 「從現在起你就是我的得力助手了、要有更多自信一點啊」
					PRINTFORML 「難、難道你對我並沒有那麼喜歡嗎？
				;本部長
				CASE 4
					PRINTFORML 「以你的實力、應該不會有人敢抱怨吧...」
				;若衆～若頭補佐
				CASE 1 TO 3
					PRINTFORML 「雖然說是部下自己在亂排名、但作為最底層的你還是會在意嗎？」
				CASEELSE
					PRINTFORML 「我都說我喜歡你了...算了、變得這麼在意關係也會變得無趣的啊」
				ENDSELECT
			ENDIF
			PRINTW
			PRINTFORML 「切、沒辦法啊。我會等到你改變主意的」
			PRINTFORML 「雖然這麼說、但我也很擅長等待和說服別人哦」
			PRINTFORML 「不過不要讓我等太久哦？　畢竟我也可能會直接動手的？」
			PRINTL
			PRINTFORML 尤魔這樣說著、就奪走了%CALLNAME:MASTER%的嘴唇
			PRINTW
			IF TALENT:MASTER:無接吻経験
				CALL SET_FIRSTKISS(MASTER, 143, 0)
				IF TALENT:143:無接吻経験
					PRINTFORML 「這是〝手付金〟、我就把我的第一次獻給你了」
					PRINTFORML 「你說你也是第一次嗎？　傑傑、那就謝謝你了」
				ENDIF
			ELSEIF TALENT:143:無接吻経験
				CALL SET_FIRSTKISS(143, MASTER, 0)
				PRINTFORML 「這是〝手付金〟、我就把我的第一次獻給你了」
			ELSE
				PRINTFORML 「...變成這樣了」
			ENDIF
			PRINTFORML 尤魔從嘴唇分離後、咧嘴一笑
			PRINTW
		ELSE
			PRINTW
			PRINTFORML 「真的嗎...我還以為你也喜歡我呢…」
			PRINTFORML 「唉––。被甩了呀」
			PRINTW
			PRINTFORML 「你以為我會就此放棄嗎？　作為剛慾同盟長、我可是貪婪至極的」
			PRINTL
			PRINTFORML 尤魔這樣說著、就奪走了%CALLNAME:MASTER%的嘴唇
			PRINTW
			IF TALENT:MASTER:無接吻経験
				CALL SET_FIRSTKISS(MASTER, 143, 0)
				IF TALENT:143:無接吻経験
					PRINTFORML 「這是〝手付金〟、我就把我的第一次獻給你了」
					PRINTFORML 「你說你也是第一次嗎？　傑傑、那就謝謝你了」
				ENDIF
			ELSEIF TALENT:143:無接吻経験
				CALL SET_FIRSTKISS(143, MASTER, 0)
				PRINTFORML 「這是〝手付金〟、我就把我的第一次獻給你了」
			ELSE
				PRINTFORML 「...變成這樣了」
			ENDIF
			PRINTFORML 尤魔從嘴唇分離後、咧嘴一笑
			PRINTW
		ENDIF
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K143_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF TALENT:恋慕
			;同棲
			IF CFLAG:MASTER:初期位置 == CFLAG:143:初期位置
				PRINTFORML 「已經這個時間了啊、玩樂的時間總是過得飛快呢」
				IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1

				ELSEIF K143C_剛欲同盟 == 1
				ELSE
				ENDIF
			ENDIF
		ELSEIF TALENT:愛欲 || TALENT:炮友
			PRINTFORML 「就這樣回家也行啦…反正也沒什麼事做吧？　順便去一下我家吧」
			PRINTFORML 「最後再來一發、我會讓你很舒服的」
			PRINTW
		ELSE

		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML （這傢伙真討厭、本來根本不想跟他交往的…）
		IF CFLAG:好感度 >= 10000
			PRINTFORML （但仔細想一想、我好像已經喜歡上這個人了...難怪我總是都很快得就原諒他了）
		ELSEIF CFLAG:好感度 >= 3000
			PRINTFORML （原來這就是戀愛弱點呀....我太容易原諒他了）
		ELSE
			PRINTFORML （他還是有些讓人難以憎惡的地方呢…）
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML （被惹毛了這麼多次、我還差點要原諒他、我真是太軟弱了）
		IF TALENT:処女 == 1
			PRINTFORML （感覺自己好像回到了青春期...嗯、對啊、我現在還真的是很年輕呢）
		ELSE
			PRINTFORML （我好像完全忘記自己是個成年人了...）
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML （呸、我當初可不打算原諒這傢伙...但是、卻意外地很開心呢）
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K143_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:MASTER:現在位置 == 653 || CFLAG:MASTER:現在位置 == 654
			PRINTFORML 「嗯、是你啊、什麼事啊」
		ELSEIF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
			PRINTFORML 「怎麼了？　是來奪我的命嗎？」
		ELSEIF K143C_剛欲同盟 == 1
			PRINTFORML 「怎麼了？　有什麼報告嗎？」
		ELSE
			PRINTFORML 「真是辛苦您特地來到這裡」
			PRINTFORML 「嘿、放輕鬆一點」
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「桀桀桀、是你啊」
		PRINTFORML 「正好。你也一起進來吧。一起裸體相處吧」
		IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
			PRINTFORML 「還是說、是你不敢跟敵對組織的首領一起進去？」
			IF BASE:MASTER:勃起 >= 1000
				PRINTFORML 「...桀桀桀、你還挺懂得逗人開心的、真是一個厲害的人呢」
			ENDIF
		ELSEIF K143C_剛欲同盟 == 1
			IF CFLAG:TARGET:积攒度 > 600
				PRINTFORML 「好好洗啊。好好保持住珠光寶氣的肌膚啊」
			ELSE
				PRINTFORML 「小弟的責任就是要給老大洗背的吧」
			ENDIF
		ELSE
			PRINTFORML 「不用擔心、我不會吃掉你的」
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「哎呀、還有人呢」
		IF CFLAG:1006 == 1
			PRINTFORML 「我現在想一個人進去、快滾」
			PRINTFORML 「……你還真有膽子啊、讓我在這裡等你」
		ELSEIF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
			PRINTFORML 「看啊、現在敵對組織的首領正毫無防備、是不是該乘機襲擊一下呢？」
			IF BASE:MASTER:勃起 >= 1000
				PRINTFORML 「……你是不是想用別的方式來襲擊我啊？」
			ENDIF
		ELSE
			PRINTFORML 「……你是不是期待著看到我裸體並發出慘叫聲？」
			PRINTFORML 「那種事情還是交給驪駒他們去做吧」
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「在那邊呆住幹嘛啦」
		PRINTFORML 「看不出來嗎。現在只有我一個人在這裡放鬆呢」
		PRINTFORML 「趕快滾蛋、不要讓我不高興」
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF TALENT:恋人
			IF CFLAG:1004 == 1
				PRINTFORML 「哎呀哎呀、是鬼傑組的頭目喜歡的那傢伙嗎？」
				PRINTFORML 「那可真帥氣、畢竟是我的男人嘛」
				PRINTFORML 「%CALLNAME:MASTER%、要好好加強與對方的親密關係喔」
			ELSEIF CFLAG:1005 == 1
				PRINTFORML 「哎呀哎呀、勁牙組的頭目打架和對男人出手都很快的嘛」
				PRINTFORML 「不過那傢伙可是我最愛的男人、想對他出手也不意外呢」
				PRINTFORML 「%CALLNAME:MASTER%、要好好款待對方哦」
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 饕餮尤魔無言地露出了一個奸笑、目送兩人離開
					PRINTFORML 也許之後會有報應等著吧...
				CASE 1
					PRINTFORML 「...哼、竟然敢棄置我然後還跟其他女人打得火熱、真是好膽量啊」
				CASE 2
					PRINTFORML 「桀桀桀、真是熱鬧啊」
					PRINTFORML 從臉上的表情、讀不出尤魔是否生氣了…
				ENDSELECT
			ENDIF
		ELSEIF CFLAG:好感度 > 0
			IF CFLAG:1004 == 1
				PRINTFORML 「哎呀哎呀、是鬼傑組的頭目喜歡的那傢伙嗎？」
				PRINTFORML 「桀桀桀。恐怕明天整個畜生界都會傳遍這個消息呢」
			ELSEIF CFLAG:1005 == 1
				PRINTFORML 「哎呀哎呀、勁牙組的頭目打架和對男人出手都很快的嘛」
				PRINTFORML 「喔、抱歉我有點打擾到你們了。那就慢慢的享受吧」
			ELSE
				IF TALENT:恋慕
					PRINTFORML 「...哼、竟然敢棄置我然後還跟其他女人打得火熱、真是好膽量啊」
				ELSE
					PRINTFORML 「桀桀桀、真是熱鬧啊」
				ENDIF
			ENDIF
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;注、このあと通常の遭遇口上、ARG==1 OR ARG==2に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		;尤魔宅の生活間で你が剛欲同盟所属or観光客
		IF CFLAG:MASTER:現在位置 == 653 && (K143C_剛欲同盟 == 1 || K143C_鬼傑組 == 0 && K143C_勁牙組 == 0)
			IF K143C_剛欲同盟 == 1
				;下っ端
				IF K143C_地位 <= 1
					PRINTFORML 「哇哇、是新來的%CALLNAME:MASTER%啊。來得好」
					PRINTFORML 「肚子餓了嗎？　工作進展不太順利嗎？」
					PRINTW
				;地位高め
				ELSE
					PRINTFORML 「哇、這不是%CALLNAME:MASTER%嗎。怎麼樣了？　工作進展得如何？」
					PRINTFORML 「說著話站著也不是辦法、要不要一邊吃飯一邊聊？」
					PRINTW
				ENDIF
					;おなかがすいてない
					IF !TIME_PROGRESS(TCVAR:MASTER:空腹時刻)
						PRINTFORML 「什麼？　現在已經吃飽了？　那好吧…」
						PRINTFORML 「那就、算了吧。下次肚子餓了就來我這裡吃飯吧。我會招待你的」
						PRINTFORML 尤魔有些失望的樣子
						PRINTW
					ELSE
						PRINTFORML 「沒關係啦、我本來就做了很多、還在煩腦該怎麼處理呢」
						PRINTFORML 「來吧、不用客氣、趕快吃吧」
						PRINTW
						PRINTFORML 「怎麼樣、好吃嗎？」
						PRINTL
						PRINTFORML 嚼嚼...　咕嚕...
						PRINTW
						PRINTFORML %TEXTR("有討厭的野菜？　別挑食啊。不然會長不大的哦/好吃嗎、這樣啊、這樣啊/不錯而已？　你這個傲慢的傢伙/哎呀哎呀、這也能哭成這樣嗎？")%
						PRINTL
						PRINTFORML 咕咂　咕咂　咕咂
						PRINTW
						PRINTFORML %TEXTR("桀桀桀、吃得真爽啊/好好品味一下吧/再來一碗也沒問題哦/不要急、不要急、來、喝點水")%
						PRINTW
						PRINTFORML 「桀桀桀、盤子空了呢」
						PRINTFORML 「好啦好啦、不用在意啦。我說了不用客氣了嘛」
						PRINTFORML 「肚子餓的時候就來找我吧。我會煮給你吃的」
						PRINTW
						IF TALENT:恋慕 || TALENT:恋人
							PRINTFORM 尤魔的愛情
						ELSE
							PRINTFORM 尤魔的愛情？
						ENDIF
							PRINTFORML 靠著料理重新找到生存的動力了...！
							PRINTW
						BASE:MASTER:体力 += 1000
						BASE:MASTER:気力 += 1000
						BASE:MASTER:精力 += 1000
					ENDIF
			;観光客
			ELSE
				IF TALENT:恋慕 || TALENT:恋人
					PRINTFORML 「原來是你啊、%CALLNAME:MASTER%、我等你很久了」
					PRINTFORML 「肚子餓了嗎？　讓來展示我的本領吧」
					PRINTW
					;おなかがすいてない
					IF !TIME_PROGRESS(TCVAR:MASTER:空腹時刻)
						PRINTFORML 「什麼？　現在已經吃飽了？　那好吧…」
						PRINTFORML 「好啦、０不要客氣。如果你肚子餓了就來我這裡吃飯吧、我隨時都會幫你準備飯菜的喔」
						PRINTFORML 尤魔有些失望的樣子
						PRINTW
						PRINTFORML 「...當然、就算肚子不餓也隨時歡迎你來這裡找我喔？」
						PRINTW
					ELSE
						PRINTFORML 「別在意啦、我就是喜歡看你吃飯的樣子啦」
						PRINTFORML 「來、不用客氣、嚐嚐看吧。有人盯著很難敞開肚子吃嗎？　別介意我啦」
						PRINTW
						PRINTFORML 「怎麼樣、好吃嗎？」
						PRINTL
						PRINTFORML 嚼嚼...　咕嚕...
						PRINTW
						PRINTFORML %TEXTR("有討厭的野菜？　別挑食啊。不然會長不大的哦/好吃嗎、這樣啊、這樣啊/不錯而已？　你這個傲慢的傢伙/哎呀哎呀、這也能哭成這樣嗎？")%
						PRINTL
						PRINTFORML 咕咂　咕咂　咕咂
						PRINTW
						PRINTFORML %TEXTR("桀桀桀、吃得真爽啊/好好品味一下吧/再來一碗也沒問題哦/不要急、不要急、來、喝點水")%
						PRINTW
						PRINTFORML 「桀桀桀、盤子空了呢」
						PRINTFORML 「好啦好啦、不用在意啦。我說了不用客氣了嘛」
						PRINTFORML 「肚子餓的時候就來找我吧。我會煮給你吃的」
						PRINTW
						PRINTFORML 「…當然、就算不餓也歡迎你隨時來這裡找我」
						PRINTW
						PRINTFORML 因為尤魔的愛情料理、感覺活下去的動力在湧現…！
						PRINTW
						BASE:MASTER:体力 += 1000
						BASE:MASTER:気力 += 1000
						BASE:MASTER:精力 += 1000
					ENDIF
				;恋慕・陥落以外
				ELSE
					PRINTFORML 「哇、%CALLNAME:MASTER%。很高興見到你」
					PRINTFORML 「有什麼土特產要送給我嗎？　不過、就算沒有也可以邊吃飯邊聽」
					PRINTW
					;おなかがすいてない
					IF !TIME_PROGRESS(TCVAR:MASTER:空腹時刻)
						PRINTFORML 「什麼？　現在已經吃飽了？　那好吧…」
						PRINTFORML 「好啦、０不要客氣。如果你肚子餓了就來我這裡吃飯吧、我隨時都會幫你準備飯菜的喔」
						PRINTFORML 尤魔有些失望的樣子
						PRINTW
						PRINTFORML 「就算不吃飯也可以喝杯茶吧？　隨便坐吧、我現在泡一杯」
						PRINTW
					ELSE
						PRINTFORML 「別在意啦、我就是喜歡看你吃飯的樣子啦」
						PRINTFORML 「來、不用客氣、嚐嚐看吧。有人盯著很難敞開肚子吃嗎？　別介意我啦」
						PRINTW
						PRINTFORML 「怎麼樣、好吃嗎？」
						PRINTL
						PRINTFORML 嚼嚼...　咕嚕...
						PRINTW
						PRINTFORML %TEXTR("有討厭的野菜？　別挑食啊。不然會長不大的哦/好吃嗎、這樣啊、這樣啊/不錯而已？　你這個傲慢的傢伙/哎呀哎呀、這也能哭成這樣嗎？")%
						PRINTL
						PRINTFORML 咕咂　咕咂　咕咂
						PRINTW
						PRINTFORML %TEXTR("桀桀桀、吃得真爽啊/好好品味一下吧/再來一碗也沒問題哦/不要急、不要急、來、喝點水")%
						PRINTW
						PRINTFORML 「桀桀桀、盤子空了呢」
						PRINTFORML 「好啦好啦、不用在意啦。我說了不用客氣了嘛」
						PRINTFORML 「肚子餓的時候就來找我吧。我會煮給你吃的」
						PRINTW
						PRINTFORML 尤魔的料理讓我重獲了生活下去的動力啊…！
						PRINTW
						BASE:MASTER:体力 += 1000
						BASE:MASTER:気力 += 1000
						BASE:MASTER:精力 += 1000
					ENDIF
				ENDIF
			ENDIF
		;尤魔の生活間以外、または敵対組織に所属
		ELSE
			IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
				;生活間（厨房）
				IF CFLAG:MASTER:現在位置 == 653
					IF TALENT:恋慕 || TALENT:恋人
						PRINTFORML 「啊啊、你來了啊。我正在等你呢、%CALLNAME:MASTER%」
						PRINTFORML 「肚子、餓了沒？　我做飯給你吧？」
						PRINTW
						;おなかがすいてない
						IF !TIME_PROGRESS(TCVAR:MASTER:空腹時刻)
							PRINTFORML 「什麼？　現在已經吃飽了？　那好吧…」
							PRINTFORML 「嘿、沒問題的。肚子餓的時候隨時都可以來我家。我會給你吃到飽的」
							PRINTFORML 尤魔有些失望的樣子
							PRINTW
						ELSE
							PRINTFORML 「桀桀桀、看你那樣子；好像是肚子餓了呢」
							PRINTFORML 「來吧、不用客氣、趕快吃吧」
							PRINTW
							PRINTFORML 「怎麼樣、好吃嗎？」
							PRINTL
							PRINTFORML 嚼嚼...　咕嚕...
							PRINTW
							PRINTFORML %TEXTR("有討厭的野菜？　別挑食啊。不然會長不大的哦/好吃嗎、這樣啊、這樣啊/不錯而已？　你這個傲慢的傢伙/哎呀哎呀、這也能哭成這樣嗎？")%
							PRINTL
							PRINTFORML 咕咂　咕咂　咕咂
							PRINTW
							PRINTFORML %TEXTR("桀桀桀、吃得真爽啊/好好品味一下吧/再來一碗也沒問題哦/不要急、不要急、來、喝點水")%
							PRINTW
							PRINTFORML 「桀桀桀、盤子空了呢」
							PRINTFORML 「好啦好啦、不用在意啦。我說了不用客氣了嘛」
							PRINTFORML 「肚子餓的時候就來找我吧。我會煮給你吃的」
							PRINTW
							PRINTFORML 因為尤魔的愛情料理、感覺活下去的動力在湧現…！
							BASE:MASTER:体力 += 1000
							BASE:MASTER:気力 += 1000
							BASE:MASTER:精力 += 1000
						ENDIF
					ELSEIF TALENT:愛欲 || TALENT:炮友
						PRINTFORML 「%CALLNAME:MASTER%嗎…瞞過了我的部下來找我私會、不簡單啊」
						PRINTFORML 「但是、人生遇到一些困難才能讓雙方變得更加熱血啊。桀桀桀」
						PRINTW
						PRINTFORML 「要是想要做的話、就去臥室或是浴室吧」
						PRINTFORML 「如果弄髒了廚房、我就算是殺了你也不過分。懂了吧」
						PRINTW
					ELSE
						PRINTFORML 「嗯嗯？　你確定嗎、你是\@ K143C_鬼傑組 == 1 ? 吉弔の # 驪駒 \@那邊的人吧」
						PRINTFORML 「%CALLNAME:MASTER%是你啊。桀桀桀、你是來找碴的嗎？」
						PRINTW
						PRINTFORMW 「威風凜凜是好事…但別毀了廚房啊。」
						PRINTFORMW 尤魔收起嘴角的嬉笑、眼中有著像山羊般妖邪的光芒
						PRINTFORML 「我就要殺了你。有意見嗎」
						PRINTW
					ENDIF
				;尤魔の寝室
				ELSEIF CFLAG:MASTER:現在位置 == 654
					IF TALENT:恋慕 || TALENT:恋人
						PRINTFORML 「哦哦、是你啊」
						PRINTFORML 「潛入女人房間是違反禮儀的喔」
						PRINTFORML 「嘿嘿、你的話我會特別允許的喔」
						PRINTW
					ELSEIF TALENT:愛欲 || TALENT:炮友
						PRINTFORML 「哦哦、是你啊」
						PRINTFORML 「潛入女人房間是違反禮儀的喔」
						PRINTW
						PRINTFORML 「還是說？　你是來找我做愛的？」
						PRINTFORML 「我也不介意呢。桀桀桀」
						PRINTW
					ELSE
						PRINTFORML 「你…是\@ K143C_鬼傑組 == 1 ? 吉弔の # 驪駒 \@那裡的人嗎」
						PRINTFORML 「潛入女人房間是違反禮儀的喔」
						PRINTW
						PRINTFORML 「還是說？　你是來夜襲的？」
						PRINTFORML 「真是的...急著做的人是不會受到歡迎的。應該要好好享受前戲呀。桀桀桀」
						PRINTW
					ENDIF
				;尤魔の風呂
				ELSEIF CFLAG:MASTER:現在位置 == 655
					IF TALENT:恋慕 || TALENT:恋人
					ELSEIF TALENT:愛欲 || TALENT:炮友
					ELSE
						PRINTFORML 「...真是的...明明人家正悠哉地泡澡呢、你這個沒禮貌的傢伙」
						PRINTFORML 「還是說、你是來看我裸體的？　桀桀桀」
						PRINTW
						CALL ASK_YN("才不是","沒錯")
						IF !RESULT
							PRINTFORML 「桀桀桀。當然啊。」
							PRINTFORML 「那麼、現在要不要在這裡做愛呢？　熱烈而瘋狂的」
							PRINTFORML 不知何時、尤魔的手中握著一根大勺子、並且尖端指向了%CALLNAME:MASTER%的喉嚨...
							PRINTW
						ELSE
							PRINTFORML 「真的嗎...你還真是喜歡挑戰啊...」
							PRINTFORML 「雖然我自己也覺得有點自戀、不過看著我裸體是不是很享受呢？　是嗎...」
							PRINTFORMW 「……」
							PRINTFORMW 「有點害羞了、別一直盯著看啦...」
							PRINTW
						ENDIF
					ENDIF
				;尤魔の自宅以外
				ELSE
					PRINTFORML 「嗯嗯？　你確定、你是\@ K143C_鬼傑組 == 1 ? 吉弔の # 驪駒 \@的嗎…」
					PRINTFORML 「對了、是%CALLNAME:MASTER%啊。在這裡算是新人吧、你反而比較顯眼呢。」
					PRINTW
					PRINTFORML 「找我有什麼事嗎？　還是是約會邀請？桀桀桀」
				ENDIF
			;敵対組織以外
			ELSE
				IF K143C_剛欲同盟 == 1
					IF TALENT:恋慕 || TALENT:恋人
						;下っ端
						IF K143C_地位 <= 1
							PRINTFORML 「嗯嗯＞　你是新來的%CALLNAME:MASTER%吧...」
							PRINTFORML 「這裡到處都是動物靈、你算是比較引人注目的」
							PRINTW
							PRINTFORML 「怎麼樣？　找到線索了嗎？」
							PRINTFORML 「只要結果出來就行、手段無所謂。在這個畜生界裡、實力才是一切。」
							PRINTW
							PRINTFORML 「不論是武力、智力、商業、或是口才、都要善用自己的長處、來滿足自己的欲望」
							PRINTFORML 「要精進啊。我沒有固定部下的執念、但有個有用的部下還是很重要的」
						ELSE
							PRINTFORML 「哦哦、%CALLNAME:MASTER%啊。做得不錯呢」
							PRINTFORML 「剛來的時候還以為你很快就要被丟到一邊了呢…不過對於人類來說算是個有骨氣的家夥呢」
							PRINTFORML 「我很依賴你啊。有你這樣的人、我就可以更自由地行動了」
							PRINTW
						ENDIF
					ELSE
						;下っ端
						IF K143C_地位 <= 1
							PRINTFORML 「嗯嗯＞　你是新來的%CALLNAME:MASTER%吧...」
							PRINTFORML 「這裡到處都是動物靈、你算是比較引人注目的」
							PRINTW
							PRINTFORML 「怎麼樣？　找到線索了嗎？」
							PRINTFORML 「只要結果出來就行、手段無所謂。在這個畜生界裡、實力才是一切。」
							PRINTW
							PRINTFORML 「不論是武力、智力、商業、或是口才、都要善用自己的長處、來滿足自己的欲望」
							PRINTFORML 「要精進啊。我沒有固定部下的執念、但有個有用的部下還是很重要的」
						ELSE
							PRINTFORML 「哦哦、%CALLNAME:MASTER%啊。做得不錯呢」
							PRINTFORML 「剛來的時候還以為你很快就要被丟到一邊了呢…不過對於人類來說算是個有骨氣的家夥呢」
							PRINTFORML 「我很依賴你啊。有你這樣的人、我就可以更自由地行動了」
							PRINTW
						ENDIF
					ENDIF
				;你が観光客
				ELSE
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1に约会的对象、ARG:1が0の場合は非约会
	;注、このあと通常の外出先で遭遇した口上、ARG==6 OR ARG==7に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1と约会中
		IF ARG:1
			IF TALENT:恋慕 || TALENT:恋人
				IF CFLAG:1006 == 1
					PRINTFORML 「......你、在很多意義上都很自在呢」
					PRINTFORML 尤魔表情複雜、不知是驚訝還是憤怒還是欣賞
				ELSE
					PRINTFORML 「喔、還以為你跑去哪了、沒想到是不顧我的反對帶女人回來了啊」
				ENDIF
			ELSE
				IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
					PRINTFORML 「...你不會被你家老大罵嗎？」
					PRINTFORML 尤魔有些奇怪的擔心
				ELSEIF K143C_剛欲同盟 == 1
					PRINTFORML 「...你很擅長追女生啊」
					PRINTFORML 「嗯、我們不會管底下的人在這方面做什麼。你想怎麼做就怎麼做吧」
				ELSE
					PRINTFORML 「哦、你也不是被邊緣化的人啊」
				ENDIF
			ENDIF
		;一人で外出
		ELSE
			IF TALENT:恋慕 || TALENT:恋人
				IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
					PRINTFORML 「我原本以為你已經從畜生界消失了...但看起來你比我想像的還更有精神啊」
					PRINTFORML 「不過你家老大真的那麼容忍你到處亂跑嗎」
					PRINTFORML 「說不定加入剛欲同盟對你更適合、他們不會經常嘮叨你的」
				ELSEIF K143C_剛欲同盟 == 1
					PRINTFORML 「哦、原來你還好好的」
					PRINTFORML 「我知道我對你有執念、但你總是到處亂跑」
					PRINTFORML 「嘖、你算是最適合加入剛欲同盟的人了」
				ELSE
					PRINTFORML 「真是的、你就是這樣容易亂跑」
					PRINTFORML 「你可是我的東西、我不是叫你好好待在我的身邊嗎？」
				ENDIF
			ELSE
				IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
					PRINTFORML 「咦？　離開組織變成自由人了嗎？」
					PRINTFORML 「對方的組織紀律也沒想像中的嚴格啊」
				ELSEIF K143C_剛欲同盟 == 1
					PRINTFORML 「咦、還以為你消失了呢、結果又現身了」
					PRINTFORML 「桀桀、我只是喜歡單獨行動、並不是對大家都沒興趣啦」
					PRINTFORML 「光站著說話也不是辦法啊、要不要找個地方一起吃飯？」
				ELSE
					PRINTFORML 「你真的是個很自由的人啊」
					PRINTFORML 「嘛、我也是同樣是個隨心所欲的人、所以我也沒資格多嘴啦」
				ENDIF
			ENDIF
			PRINTL
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰って寝る（～は【現在地】から【角色の自室】に戻りました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF ARG:1
			;约会中に眠くて帰って寝る（拠点角色のみ）
			PRINTFORMW
		ELSEIF CFLAG:诶嘿嘿
			;诶嘿嘿中に眠くて自室に帰って寝る（拠点角色のみ）
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている（～は眠そうにしている）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（～は沉浸在夢鄉中）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱して寝る（体力500以下,诶嘿嘿時は诶嘿嘿強制終了）
	;（角色の自室以外：～を【現在地】から【角色の自室】に運びました）
	;（角色の自室　　：～は疲惫と言って、横成为了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF CFLAG:诶嘿嘿
			;诶嘿嘿中にダウン
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（恋慕のみ,そのまま一日が終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;酒でダウン
		IF BASE:MASTER:酒気 >= MAXBASE:MASTER:酒気
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（被窝）へと運んでくれた…）
				IF TALENT:MASTER:年齢 == -1 || (TALENT:MASTER:年齢 < 1 && TALENT:MASTER:幼児／幼児退行)
					PRINTFORML 「真是的...一個小屁孩也喝了那麼多...真讓人操心啊」
					PRINTFORML 尤魔把櫛子放進正在睡覺的%CALLNAME:MASTER%的頭髮中
					PRINTW
					IF CFLAG:TARGET:积攒度 >= 800
						;你がチンポ持ち
						IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
							PRINTFORML 「……\@ INROOM(CFLAG:MASTER:現在位置) == 2 ? 床鋪# 被窝 \@我幫妳移過去了。算是一點小獎勵吧」
							PRINTFORML 尤魔開始脫去了%CALLNAME:MASTER%的衣服和內衣
							PRINTW
							IF TALENT:処女 == 0
								;口交
								SELECTCASE RAND:3
								CASE 0
									PRINTFORML 「哈哈、這家伙的雞雞看起來很美味啊」
									PRINTFORML 尤魔露出了舔嘴唇的表情、注視著%TINKO(PLAYER)%暴露在外的陰莖
									PRINTW
									PRINTFORML 「那我就開始吃了…啵」
									PRINTFORML 像是開始儀式一樣、尤魔對陰莖輕輕地吻一下
									PRINTW
									PRINTFORML 然後、開始動著嘴唇、沿著陰莖軸向下移
									PRINTFORML 有時、也不忘用舌頭輕輕舔弄
									PRINTW
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「くくっ、ガキのくせにとんでもねぇデカさだぜ…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「このクソデカいちんぽに、堕とされちまったんだよなぁ…HPH」","L"

									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「くくっ、ガキらしく、可愛いチンポしてやがる…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「吉弔のやつ、こんな兒童チンポに屈したってワケか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「驪駒のやつ、こんな兒童チンポに堕とされたワケか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「こんなお子様ちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「くくっ、ガキのくせに、いいモン持ってるじゃないか…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「この具合のいいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									ENDSELECT
									PRINTW
									CALL HPH_PRINT,@"「そろそろメインディッシュといくか…あむっHPH」","L"
									PRINTFORML 尤魔垂涎欲滴、將%TINKO(PLAYER)%含入了口中
									PRINTW
									CALL HPH_PRINT,@"　　　　　ちゅぼっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　ちゅぼっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（くくっ、ガキのちんぽの臭いが鼻を街道抜けていきやがる…HPH）","L"
									CALL HPH_PRINT,@"（この少しションベンくさい感じ、いかにもって感じだぜ…HPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　くぽっHPH　くぽっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　くぽっHPH　くぽっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（ほれほれ、尤魔様のお口の中でペロペロされっと気持ちいいだろHPH）","L"
									CALL HPH_PRINT,@"（ちゃあんと、チンカスも掃除してやっからな…HPH）","L"
									CALL HPH_PRINT,@"（くくっ、感じてんのか？　寝てるくせに、亀頭が膨らんできてるぜHPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（おらっHPH　イケッHPH）","L"
									CALL HPH_PRINT,@"（金玉の中のモン、全部私の口ん中にぶちまけろっHPHHPH）","L"
									PRINTW
									CALL HPH_PRINT,@"ごぷっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「HPH　んっHPH　んぶっHPH」","L"
									PRINTFORML %CALLNAME:MASTER%的陰莖到達極限、將炙熱的精液射出、射入了尤魔的口腔內
									PRINTFORML 尤魔面對大量的精液感到吃驚、但仍拼命咽下了每一滴
									PRINTW
									CALL HPH_PRINT,@"にゅうう～～～っ、ちゅぽんっ…HPH","L"
									PRINTW
									CALL HPH_PRINT,@"「くっくっく…いい味だったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「こんな濃厚で芳醇な精液…誰かにくれてやるもんかよHPH」","L"
									PRINTW
									PRINTFORML 滿足了的尤魔、好好的替%CALLNAME:MASTER%穿上衣服、重新蓋好被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								;手コキ
								CASE 1
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「くくっ、ガキのくせにとんでもねぇデカさだぜ…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「このクソデカいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「くくっ、ガキらしく、可愛いチンポしてやがる…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「吉弔のやつ、こんな兒童チンポに屈したってワケか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「驪駒のやつ、こんな兒童チンポに堕とされたワケか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「こんなお子様ちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「くくっ、ガキのくせに、いいモン持ってるじゃないか…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「この具合のいいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									ENDSELECT
									CALL HPH_PRINT,@"「一発ハメようかと思ったが…さすがにしんどいだろうからな。抜くだけで勘弁してやるよHPH」","L"
									PRINTFORML 尤魔用手指畫了一個圈、然後開始磨蹭%CALLNAME:MASTER%的龜頭
									PRINTW
									CALL HPH_PRINT,@"　　　　　ちゅこっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　ちゅこっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（くくっ、稍微しごいてやるだけで、気持ちよさそうにビクビクしてやがる…HPH）","L"
									CALL HPH_PRINT,@"（…HPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　カリッHPH　カリカリッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　カリカリッHPH　カリッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（ほれほれ、亀頭を指で掻かれるの、気持ちいいだろHPH）","L"
									CALL HPH_PRINT,@"（竿の部分はどうだぁ？　くくっ、こっちも感度良好じゃねぇかHPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　シコシコシコシコッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　シコシコシコシコッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「おらっ、ヌルヌルのちんぽぉ、全力でシコシコされんの気持ちいいだろぉっHPH」","L"
									CALL HPH_PRINT,@"「我慢せずにびゅっびゅしちまえよォHPH　私の顔にぶっかけてHPH　私の顔をお前の精子で汚してっHPH」","L"
									PRINTFORML 尤魔一邊在意識不清的%CALLNAME:MASTER%耳邊低語、一邊緊握著肉棒、用手猛烈得上下擺弄
									PRINTW
									CALL HPH_PRINT,@"どびゅるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「ははっHPH　出たっHPH」","L"
									PRINTW
									CALL HPH_PRINT,@"びちゃびちゃっHPH　びちゃっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「んっHPH　んんうっHPH」","L"
									PRINTW
									CALL HPH_PRINT,@"「へ、へへっ…顔中精液まみれですっげぇ臭ぇ…HPH」","L"
									CALL HPH_PRINT,@"「じゅる、じゅぞぞっ、ちゅるっ、こくっ…ああ、こいつの精液は美味ぇなぁ…HPH」","L"
									PRINTW
									CALL HPH_PRINT,@"「くっくっく…いい味だったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「こんな濃厚で芳醇な精液…誰かにくれてやるもんかよHPH」","L"
									PRINTW
									PRINTFORML 滿足了的尤魔、好好的替%CALLNAME:MASTER%穿上衣服、重新蓋好被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								;Ｖ性交
								CASE 2
									CALL HPH_PRINT,@"「くくくっ、私を前にして、そんな無防備に寝てるのが悪いんだぜHPH」","L"
									PRINTFORML 尤魔也展露了下半身、跨坐在%CALLNAME:MASTER%身上、張開雙腿、將%TINKO(PLAYER)%對準了陰唇
									PRINTFORML 「那個人連前戲都沒有好好做、卻流出了大量的愛液」
									PRINTW
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「くくっ、ガキのくせにとんでもねぇデカさだぜ…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「このクソデカいちんぽに、堕とされちまったんだよなぁ…HPH」","L"

									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「くくっ、ガキらしく、可愛いチンポしてやがる…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「吉弔のやつ、こんな兒童チンポに屈したってワケか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「驪駒のやつ、こんな兒童チンポに堕とされたワケか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「こんなお子様ちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「くくっ、ガキのくせに、いいモン持ってるじゃないか…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「この具合のいいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									ENDSELECT
									CALL HPH_PRINT,@"「ほらっ、入っちまうぞ……んんうっHPH　%CALLNAME:MASTER%の、すっげぇ硬ぇな…HPH」","L"
									PRINTFORML 「龜頭漸漸沉沒在肉穴中。不久後、整個龜頭都已經深深地插進去了」
									PRINTW
									CALL HPH_PRINT,@"「もう我慢できねぇ…運動のからなHPH　う、うぅん、んんっHPH　ああっ、これだっHPH　これが欲しかったんだよぉHPH」","L"
									PRINTFORML 「尤魔慢慢地動起了腰部、像在品味著那根陽具一樣。不久之後、她的動作變得像是釋放內心的野性、用屁股撞擊著大腿」
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぱんっHPH　ぱんっHPH　ぱんっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぱんっHPH　ぱんっHPH　ぱんっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「んおぉっHPH　おっほHPH　い、いいぞっ、お前の%TEXTR("チンポ/ちんぽ/ちんちん")%は最高だっHPH　お、おっ！」","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぬちゅっHPH　ぬちゅっHPH　ぬちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ずちゅっHPH　ずちゅっHPH　ずちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「んおぉっHPH　おっほHPH　い、いいぞっ、お前の%TEXTR("チンポ/ちんぽ/ちんちん")%は最高だっHPH　お、おっ！」","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぱんHPHぱんHPHぱんHPHぱんHPHぱんHPHぱんHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぱんHPHぱんHPHぱんHPHぱんHPHぱんHPHぱんHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「膣内で%TEXTR("チンポ/ちんぽ/ちんちん")%が膨らんできたぞっHPH　イクのかっ？　イっていいぞっHPH　私もイくっHPH」","L"
									PRINTW
									PRINTFORML 「即使意識不清、但%CALLNAME:MASTER%也很快就被推向了高潮、並射精在了尤魔的陰道內」
									PRINTL
									CALL HPH_PRINT,@"どびゅるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　びゅるるるるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　びゅびゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　びゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「ひ、ひっHPH　出たっHPH　膣内に出したなっHPH　クッ、イク、イクイクイクイクッHPH　あ、あっ！」","L"
									PRINTFORML 即使裡面充滿著精液、但尤魔仍然持續搖晃著腰部、直到陽具完全軟下來
									PRINTW
									CALL HPH_PRINT,@"にゅうう～～～っ、ちゅぽんっ…HPH","L"
									PRINTW
									CALL HPH_PRINT,@"「っはぁ～～～～、はぁ～～～～…く、くっくっく…よかったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「中出しされた精液が染み渡るぜ…ああ、美味ぇなぁHPH」","L"
									PRINTW
									PRINTFORML 滿足了的尤魔、好好的替%CALLNAME:MASTER%穿上衣服、重新蓋好被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								ENDSELECT
							;尤魔が処女のときはＶ性交無
							ELSE
								;口交
								SELECTCASE RAND:2
								CASE 0
									PRINTFORML 「哈哈、這家伙的雞雞看起來很美味啊」
									PRINTFORML 尤魔露出了舔嘴唇的表情、注視著%TINKO(PLAYER)%暴露在外的陰莖
									PRINTW
									PRINTFORML 「那我就開始吃了…啵」
									PRINTFORML 像是開始儀式一樣、尤魔對陰莖輕輕地吻一下
									PRINTW
									PRINTFORML 然後、開始動著嘴唇、沿著陰莖軸向下移
									PRINTFORML 有時、也不忘用舌頭輕輕舔弄
									PRINTW
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「くくっ、ガキのくせにとんでもねぇデカさだぜ…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「このクソデカいちんぽに、堕とされちまったんだよなぁ…HPH」","L"

									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「くくっ、ガキらしく、可愛いチンポしてやがる…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「吉弔のやつ、こんな兒童チンポに屈したってワケか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「驪駒のやつ、こんな兒童チンポに堕とされたワケか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「こんなお子様ちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「くくっ、ガキのくせに、いいモン持ってるじゃないか…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「この具合のいいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									ENDSELECT
									PRINTW
									CALL HPH_PRINT,@"「そろそろメインディッシュといくか…あむっHPH」","L"
									PRINTFORML 尤魔垂涎欲滴、將%TINKO(PLAYER)%含入了口中
									PRINTW
									CALL HPH_PRINT,@"　　　　　ちゅぼっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　ちゅぼっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（くくっ、ガキのちんぽの臭いが鼻を街道抜けていきやがる…HPH）","L"
									CALL HPH_PRINT,@"（この少しションベンくさい感じ、いかにもって感じだぜ…HPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　くぽっHPH　くぽっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　くぽっHPH　くぽっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（ほれほれ、尤魔様のお口の中でペロペロされっと気持ちいいだろHPH）","L"
									CALL HPH_PRINT,@"（ちゃあんと、チンカスも掃除してやっからな…HPH）","L"
									CALL HPH_PRINT,@"（くくっ、感じてんのか？　寝てるくせに、亀頭が膨らんできてるぜHPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH　じゅっぷHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（おらっHPH　イケッHPH）","L"
									CALL HPH_PRINT,@"（金玉の中のモン、全部私の口ん中にぶちまけろっHPHHPH）","L"
									PRINTW
									CALL HPH_PRINT,@"ごぷっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「HPH　んっHPH　んぶっHPH」","L"
									PRINTFORML %CALLNAME:MASTER%的陰莖到達極限、將炙熱的精液射出、射入了尤魔的口腔內
									PRINTFORML 尤魔面對大量的精液感到吃驚、但仍拼命咽下了每一滴
									PRINTW
									CALL HPH_PRINT,@"にゅうう～～～っ、ちゅぽんっ…HPH","L"
									PRINTW
									CALL HPH_PRINT,@"「くっくっく…いい味だったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「こんな濃厚で芳醇な精液…誰かにくれてやるもんかよHPH」","L"
									PRINTW
									PRINTFORML 滿足了的尤魔、好好的替%CALLNAME:MASTER%穿上衣服、重新蓋好被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								;手コキ
								CASE 1
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「くくっ、ガキのくせにとんでもねぇデカさだぜ…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…たまんねぇなあ、おいHPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「このクソデカいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「くくっ、ガキらしく、可愛いチンポしてやがる…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「吉弔のやつ、こんな兒童チンポに屈したってワケか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「驪駒のやつ、こんな兒童チンポに堕とされたワケか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「こんなお子様ちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「くくっ、ガキのくせに、いいモン持ってるじゃないか…HPH」","L"
										SIF K143C_鬼傑組 == 1 && TALENT:130:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで吉弔のやつをよがり狂わせてんのか…HPH」","L"
										SIF K143C_勁牙組 == 1 && TALENT:133:処女 == 0 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「これで驪駒のやつを堕としたってわけか…HPH」","L"
										SIF K143C_剛欲同盟 == 1 && EXP:Ｖ性交経験 > 100
											CALL HPH_PRINT,@"「この具合のいいちんぽに、堕とされちまったんだよなぁ…HPH」","L"
									ENDSELECT
									CALL HPH_PRINT,@"「一発ハメようかと思ったが…さすがにしんどいだろうからな。抜くだけで勘弁してやるよHPH」","L"
									PRINTFORML 尤魔用手指畫了一個圈、然後開始磨蹭%CALLNAME:MASTER%的龜頭
									PRINTW
									CALL HPH_PRINT,@"　　　　　ちゅこっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　ちゅこっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（くくっ、稍微しごいてやるだけで、気持ちよさそうにビクビクしてやがる…HPH）","L"
									CALL HPH_PRINT,@"（…HPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　カリッHPH　カリカリッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　カリカリッHPH　カリッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"（ほれほれ、亀頭を指で掻かれるの、気持ちいいだろHPH）","L"
									CALL HPH_PRINT,@"（竿の部分はどうだぁ？　くくっ、こっちも感度良好じゃねぇかHPH）","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　シコシコシコシコッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　シコシコシコシコッHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「おらっ、ヌルヌルのちんぽぉ、全力でシコシコされんの気持ちいいだろぉっHPH」","L"
									CALL HPH_PRINT,@"「我慢せずにびゅっびゅしちまえよォHPH　私の顔にぶっかけてHPH　私の顔をお前の精子で汚してっHPH」","L"
									PRINTFORML 尤魔一邊在意識不清的%CALLNAME:MASTER%耳邊低語、一邊緊握著肉棒、用手猛烈得上下擺弄
									PRINTW
									CALL HPH_PRINT,@"どびゅるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「ははっHPH　出たっHPH」","L"
									PRINTW
									CALL HPH_PRINT,@"びちゃびちゃっHPH　びちゃっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「んっHPH　んんうっHPH」","L"
									PRINTW
									CALL HPH_PRINT,@"「へ、へへっ…顔中精液まみれですっげぇ臭ぇ…HPH」","L"
									CALL HPH_PRINT,@"「じゅる、じゅぞぞっ、ちゅるっ、こくっ…ああ、こいつの精液は美味ぇなぁ…HPH」","L"
									PRINTW
									CALL HPH_PRINT,@"「くっくっく…いい味だったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「こんな濃厚で芳醇な精液…誰かにくれてやるもんかよHPH」","L"
									PRINTW
									PRINTFORML 滿足了的尤魔、好好的替%CALLNAME:MASTER%穿上衣服、重新蓋好被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								ENDSELECT
							ENDIF
						;你にチンポ無
						ELSE
							PRINTFORML 「……\@ INROOM(CFLAG:MASTER:現在位置) == 2 ? 床鋪# 被窝 \@我幫妳移過去了。算是一點小獎勵吧」
							PRINTFORML 尤魔開始脫去了%CALLNAME:MASTER%的衣服和內衣
							PRINTW
							IF TALENT:MASTER:処女 == 1
								;尤魔が扶她
								IF TALENT:性別 == 3
									PRINTFORML 「...嗯、還是饒過你吧、不要奪走你的處女之身。但是、我還是想看看你清醒時的反應」
									PRINTFORML 「桀桀桀。你這種可愛的小穴真是太棒了。你露出那種毫無防備的睡顏、不就是在說著來侵犯妳嗎？」
									PRINTFORML 尤魔伸手摸向%CALLNAME:MASTER%幼小的女性器官、並輕輕地撐開了它
									PRINTW
									CALL HPH_PRINT,@"「くくっ、ガキのまんこはションベンくせぇなあ。まあ、その方が興奮するがな…HPH」","L"
									PRINTFORML 對於曾經生活在惡劣環境的尤魔來說、這種氨臭味就像是費洛蒙一樣
									PRINTW
									CALL HPH_PRINT,@"「稍微くらいは準備しておいてやるか…使い物にならなくなったら困るからなHPH」","L"
									PRINTFORML 儘管說話很粗魯、但尤魔卻像是在處理腫瘤一樣、細心而謹慎地用舌頭和手指慢慢鬆弛那未成熟的陰道
									PRINTW
									CALL HPH_PRINT,@"「くくっ、大分濡れてきたな…そろそろ、頃合いかHPH」","L"
									PRINTFORML 尤魔也脫掉自己的衣服、把下半身暴露在了空氣
									PRINTW
									PRINTFORML 在陰蒂位置、那個本來只應該有女性的部位的地方、卻有著一個很明顯的男根存在感
									PRINTFORML 紅黑色的勃起已經從龜頭處滲出了前列腺液、渴望著侵犯這個蜜穴
									PRINTW
									CALL HPH_PRINT,@"「くくっ、ほーら、入っちまうぞ～…ぐぅっ、やっぱり狭ぇな…HPH」","L"
									PRINTFORML 即使有做前戲、但%CALLNAME:MASTER%那稚嫩的粉色黏膜仍然反抗著尤魔的肉棒
									PRINTW
									PRINTFORML 「這個難度還真高啊、小心不要弄破了…好、龜頭進去了」
									CALL HPH_PRINT,@"「く、うぅ…入り口でこの狭さか…これで、奥まで入れたらどれくらいのものなんだろうな…クク…HPH」","L"
									PRINTFORML 感受到龜頭穿過陰道的滑嫩感、尤魔開始慢慢深入
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぬちゅっHPH　ぬちゅっHPH　ぬちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぬちゅっHPH　ぬちゅっHPH　ぬちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「くく、いいぞ…少しずつだが、硬さがほぐれてきた…HPH」","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぷちゅっHPH　ぷちゅっHPH　ぷちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぷちゅっHPH　ぷちゅっHPH　ぷちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「ほら、ここをトントンしてやろう…ククッ、寝ているのに感じているようだな…HPH」","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぬちゅっHPH　ぬちゅっHPH　ぬちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぷちゅっHPH　ぷちゅっHPH　ぷちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「イクぞ、どうする、このまま膣内に出すか、く、うぅぅっHPH」","L"
									PRINTW
									PRINTFORML %CALLNAME:MASTER%的陰道因為收縮、讓尤魔陷入了絕頂的邊緣、最後尤魔在差一點就射精前就把肉棒拔了出來
									PRINTL
									CALL HPH_PRINT,@"どびゅるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　びゅるるるるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　びゅびゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　びゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「ひ、ひっHPH　出たっHPH　まだ出るっHPH　く、うぉぉっ、おぉっHPH」","L"
									PRINTFORML 尤魔繼續用手來摩擦那已經軟掉的肉棒、
									PRINTFORML 讓白濁的精液噴灑在了%CALLNAME:MASTER%光滑的陰唇上、光滑的腹部上和無邪睡顏上
									PRINTW
									CALL HPH_PRINT,@"「っはぁ～～～～、はぁ～～～～…く、くっくっく…よかったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「次こそはお前の処女をいただきたいもんだな…楽しみにしているぞHPH」","L"
									PRINTW
									PRINTFORML 滿足的尤魔擦拭了從%CALLNAME:MASTER%陰道口滲出的淫液、並整理好衣服和被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								;尤魔にチンポ無
								ELSE
								ENDIF
							ELSE
								;尤魔が扶她
								IF TALENT:性別 == 3
									PRINTFORML 「桀桀桀。你這種可愛的小穴真是太棒了。你露出那種毫無防備的睡顏、不就是在說著來侵犯妳嗎？」
									PRINTFORML 尤魔伸手摸向%CALLNAME:MASTER%幼小的女性器官、並輕輕地撐開了它
									PRINTW
									CALL HPH_PRINT,@"「くくっ、ガキのまんこはションベンくせぇなあ。まあ、その方が興奮するがな…HPH」","L"
									PRINTFORML 對於曾經生活在惡劣環境的尤魔來說、這種氨臭味就像是費洛蒙一樣
									PRINTW
									CALL HPH_PRINT,@"「稍微くらいは準備しておいてやるか…使い物にならなくなったら困るからなHPH」","L"
									PRINTFORML 儘管說話很粗魯、但尤魔卻像是在處理腫瘤一樣、細心而謹慎地用舌頭和手指慢慢鬆弛那未成熟的陰道
									PRINTW
									CALL HPH_PRINT,@"「くくっ、大分濡れてきたな…そろそろ、頃合いかHPH」","L"
									PRINTFORML 尤魔也脫掉自己的衣服、把下半身暴露在了空氣
									PRINTW
									PRINTFORML 在陰蒂位置、那個本來只應該有女性的部位的地方、卻有著一個很明顯的男根存在感
									PRINTFORML 紅黑色的勃起已經從龜頭處滲出了前列腺液、渴望著侵犯這個蜜穴
									PRINTW
									CALL HPH_PRINT,@"「くくっ、ほーら、入っちまうぞ～…ぐぅっ、やっぱり狭ぇな…HPH」","L"
									PRINTFORML 即使進行了前戲、那未曾接受過誰的幼小的%CALLNAME:MASTER%的粉紅色黏膜還是抵抗著尤魔的强烈肉棒
									PRINTW
									CALL HPH_PRINT,@"「おらっ、観念しろ…よっ！　おぉっ、ほぉぉ…やべぇ、すぐ、イっちまいそうだ…HPH」","L"
									PRINTFORML 感受到了龜頭穿過陰道口時的刺激、尤魔突然猛力插入
									PRINTFORML 即使是處在無意識的狀態下、黏膜也像是在催促射精一樣、一片片的褶皺開始蠕動
									PRINTW
									CALL HPH_PRINT,@"「こいつを気遣う余裕なんてなさそうだ…運動の、からな…HPH」","L"
									PRINTFORML 受到下半身本能的促使、尤魔開始擺動起了腰部
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぱんっHPH　ぱんっHPH　ぱんっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぱんっHPH　ぱんっHPH　ぱんっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「んおぉっHPH　おらっ、どうだっ、私のちんぽはっHPH　意識がなくても気持ちいいだろうっHPH」","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぬちゅっHPH　ぬちゅっHPH　ぬちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ずちゅっHPH　ずちゅっHPH　ずちゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「締め付けがやべぇっ、子宮のコリコリした感じ、たまんねぇ…もう、出ちまいそうだ…HPH」","L"
									PRINTW
									CALL HPH_PRINT,@"　　　　　ぱんHPHぱんHPHぱんHPHぱんHPHぱんHPHぱんHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　ぱんHPHぱんHPHぱんHPHぱんHPHぱんHPHぱんHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「おらっ、イクぞ！　私の精子で孕めっHPH　私の子を産めっHPH　イクぞ、お、おぉぉぉっHPH」","L"
									PRINTW
									PRINTFORML 即便沒有意識、尤魔也被%CALLNAME:MASTER%的肉壁弄得快要高潮了、最後內射了
									PRINTL
									CALL HPH_PRINT,@"どびゅるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　びゅるるるるっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　びゅびゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"　　　　　　　　　びゅっHPH","L"
									PRINTL
									CALL HPH_PRINT,@"「ひ、ひっHPH　出たっHPH　まだ出るっHPH　く、うぉぉっ、おぉっHPH」","L"
									PRINTFORML 尤魔持續對著%CALLNAME:MASTER%打著腰用濃厚的精子填滿那未成熟的子宮
									PRINTW
									CALL HPH_PRINT,@"にゅうう～～～っ、ちゅぽんっ…HPH","L"
									PRINTW
									CALL HPH_PRINT,@"「っはぁ～～～～、はぁ～～～～…く、くっくっく…よかったぜ、ご馳走さんHPH」","L"
									CALL HPH_PRINT,@"「ちんぽがちぎれるかと思ったぜ…やっぱ、お前のまんこ最高だわ…HPH」","L"
									PRINTW
									PRINTFORML 滿意了的尤魔擦拭了從%CALLNAME:MASTER%陰道口流出的愛液和精液的混合液、整理好衣服並蓋好了被子
									PRINTFORML 「那我走了、做個好夢吧」
									PRINTW
								ELSE
								ENDIF
							ENDIF
						ENDIF
					ELSEIF CFLAG:TARGET:积攒度 >= 500
						PRINTFORML 「……\@ INROOM(CFLAG:MASTER:現在位置) == 2 ? 床鋪# 被窝 \@我幫妳移過去了。算是一點小獎勵吧」
						PRINTFORML 尤魔輕輕地和%CALLNAME:MASTER%交錯唇舌
						CALL AddEXP("接吻経験", MASTER, 1)
						CALL AddEXP("接吻経験", TARGET, 1)
						PRINTW
						PRINTFORML 「桀桀、謝謝招待。做個好夢啊」
						PRINTW
					ELSE
						PRINTFORML 「饕餮尤魔別說是守護這孩子了、反而還愛上他了、真是的」
						PRINTFORML 「真是的、你要負責任啊」
						PRINTFORML 尤魔用稚嫩的表情、在%CALLNAME:MASTER%的臉頰上輕輕親了一下
						PRINTW
						PRINTFORML 「桀桀、做個好夢啊」
						PRINTW
					ENDIF
				;兒童／幼児以外
				ELSE
					PRINTFORML 「真是的…明明酒量就這麼差還一口氣喝了那麼多…真讓我操心啊」
				ENDIF
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORMW
			ENDIF
		;体力切れでダウン
		ELSE
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（被窝）へと運んでくれた…）
				PRINTFORMW
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORMW
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが寝るために自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た（【TARGET】が部屋に回来了→寝間着へと着替え、寝床に潜った）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から逐出て寝た（眠そうな【TARGET】に追い出された…）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF CFLAG:前一次的位置 == CFLAG:現在位置
				;前のターンまで一緒に部屋にいた
				PRINTFORMW
			ELSE
				;寝るために部屋に帰ってきたところ
				PRINTFORMW
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た（【TARGET】が部屋に回来了→唇をとがらせる【TARGET】に、【MASTER】は渋々【Ｈの相手】から別屋た）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;来訪角色が拠点で休憩（～は疲れ切っている→稍微休んでいきなよ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝室に居る状態でその場で寝る（～は眠気に負け、睡眠についた…）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF CFLAG:诶嘿嘿
			;诶嘿嘿中に寝る
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;拠点外で自宅前に居る角色が自室に帰って寝る（眠くなった～は自室に帰って行きました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			IF K143C_鬼傑組 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「你啊、我等了你好久了」
				CASE 1
					PRINTFORML 「真的沒問題嗎？　和敵對組織的首領約會什麼的」
					PRINTFORML 「沒關啦。我也有這麼做過、而且我們是情侶啊。我才不會有所顧慮呢。」
				CASE 2
					PRINTFORML 「桀桀桀、今天也要盡情撒嬌呢」
					PRINTFORML 「然後去跟吉弔報告吧。告訴她今天又和剛欲同盟的首領盡情做愛了一番」
				ENDSELECT
			ELSEIF K143C_勁牙組 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「你啊、我等了你好久了」
				CASE 1
					PRINTFORML 「真的沒問題嗎？　和敵對組織的首領約會什麼的」
					PRINTFORML 「沒關啦。我也有這麼做過、而且我們是情侶啊。我才不會有所顧慮呢。」
				CASE 2
					PRINTFORML 「桀桀桀、今天也要盡情撒嬌呢」
					PRINTFORML 「然後去跟驪駒報告吧。告訴她今天又和剛欲同盟的首領盡情做愛了一番吧」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「我等了你好久了」
					PRINTFORML 尤魔纏著%CALLNAME:MASTER%的手臂說
					PRINTFORML 「先去吃點東西吧？　我給你介紹好吃的」
				CASE 1
					PRINTFORML 尤魔看到%CALLNAME:MASTER%時露出滿意的笑容
				CASE 2
					PRINTFORML 「桀桀桀、今天也要盡情撒嬌呢」
					PRINTFORML 「我們現在是情侶了、去炫耀給大家看看吧」
					PRINTFORML 「去讓沒有戀人的吉弔和驪駒漲漲見識也不錯」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「你來看我就是我的快樂」
					PRINTFORML 「那麼？　今天要和我做些什麼呢？」
				CASE 1
					PRINTFORML 「興奮了嗎？　別那樣說。剛欲同盟長也同樣只是個女人而已啊」
					PRINTFORML 「有喜歡的人就在面前當然也會興奮啊」
				CASE 2
					PRINTFORML 「喂、你在幹嘛呢？　你的戀人在要求擁抱了啊」
					PRINTFORML 尤魔攤開雙手等待著%CALLNAME:MASTER%
				ENDSELECT
			ENDIF
		ELSEIF TALENT:恋慕
			IF K143C_鬼傑組 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「是你啊、見到你真高興呢」
				CASE 1
					PRINTFORML 「怎麼了、被吉弔欺負了嗎？　我來安慰你吧」
				CASE 2
					PRINTFORML 「怎樣？　如果在吉弔那邊不舒服的話、可以來我這邊休息一下喔」
				ENDSELECT
			ELSEIF K143C_勁牙組 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「是你啊、見到你真高興呢」
				CASE 1
					PRINTFORML 「啊、被驪駒欺負了嗎？　我來安慰你吧」
				CASE 2
					PRINTFORML 「怎麼樣？　如果驪駒對你太粗暴的話、可以交給我來照顧喔」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				SELECTCASE RAND:4
				CASE 0
					PRINTFORML 「是你啊、想見你了」
				CASE 1
					PRINTFORML 「多來找我玩啊、我會很期待你的到來」
				CASE 2
					PRINTFORML 「不用站著聊天啊、要不要一起去吃飯？　我知道一家很不錯的店」
				CASE 3
					PRINTFORML 「是你啊、來拿零用錢吧」
					PRINTFORML 收到了｛\\MONEY += RAND:500｝
					MONEY += RAND:500
				ENDSELECT
			ELSE
				SELECTCASE RAND:4
				CASE 0
					PRINTFORML 「一直等著你呢、再靠近一點吧」
				CASE 1
					PRINTFORML 「今天能夠悠閒一下嗎？　那真是太好了」
				CASE 2
					PRINTFORML 「我一直都想見你呢」
				CASE 3
					PRINTFORML 「咦、你是特地來找我嗎？　真開心啊」
				ENDSELECT
			ENDIF
		ELSE
			IF K143C_鬼傑組 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「你膽子還挺大的啊、不錯嘛」
				CASE 1
					PRINTFORML 「是被吉弔派來打聽我的消息的嗎？　真是辛苦你了」
				CASE 2
					PRINTFORML 「怎樣？　如果在吉弔那邊不舒服的話、可以來我這邊休息一下喔」
				ENDSELECT
			ELSEIF K143C_勁牙組 == 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「你膽子還挺大的啊、不錯嘛」
				CASE 1
					PRINTFORML 「是被吉弔派來打聽我的消息的嗎？　真是辛苦你了」
				CASE 2
					PRINTFORML 「怎麼樣？　如果在吉弔那邊很不好過的話、我可以照顧你一下啊」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				IF K143C_性に貪欲 > 0
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「你這傢伙經常出現在我們這裡啊」
					CASE 1
						PRINTFORML 「怎麼了　？有什麼報告嗎？」
					CASE 2
						PRINTFORML 「桀桀、怎麼了嗎？　是來被我榨乾的嗎？」
						IF K143C_性に貪欲 == 3
							PRINTFORML 尤魔張開了嘴巴、舌頭嬌媚地動著……
						ELSEIF K143C_性に貪欲 == 4
							PRINTFORML 尤魔一邊撫摸自己的下腹部、一邊咧著嘴笑著
						ELSEIF K143C_性に貪欲 == 5
							PRINTFORML 尤魔挑釁地翹起了屁股、咧著嘴笑著
						ELSEIF K143C_性に貪欲 == 6
							PRINTFORML 尤魔一邊揉著胸部、一邊撫摸下腹部、露出了挑釁的笑容
						ELSEIF K143C_性に貪欲 == 7
							PRINTFORML 尤魔用手模仿打飛機的動作、咧著嘴傻笑
						ENDIF
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「你這傢伙經常出現在我們這裡啊」
					CASE 1
						PRINTFORML 「怎麼了　？有什麼報告嗎？」
					ENDSELECT
				ENDIF
			ELSE
				PRINTFORML 「桀桀、還沒有出事嗎」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「看起來很忙啊。好、等一下我來給你個膝枕放鬆一下吧」
				CASE 1
					PRINTFORML 「雖然在忙組織裡的工作、但把戀人拋在一旁可不值得稱讚啊」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「什麼啊、你是說組織的工作比戀人還要優先？」
				PRINTFORML 尤魔用手撐著腰、「嗯」地哼了一聲
			ELSE
				PRINTFORML 「怎麼回事呢、我還以為你來找我是來約會的呢」
			ENDIF
		ELSEIF TALENT:恋慕
			IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「那傢伙要是趕快從那個組織金盆洗手來這邊就好了」
				CASE 1
					PRINTFORML 「這傢伙真是匆忙啊。是被他的老大拿來當奴隸使喚的嗎？」
					PRINTFORML 「等一下來找我、讓你摸摸我的屁股」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「什麼、你是說組織的工作比我更重要嗎？」
				PRINTFORML 「稍微關心一下我也不會怎樣啊」
				PRINTFORML 尤魔用手撐著腰、「嗯」地哼了一聲
			ELSE
				PRINTFORML 「咦、我還以為你是來找我的呢」
			ENDIF
		ELSE
			IF K143C_鬼傑組 == 1
				PRINTFORML 「哼、那傢伙還在這附近晃蕩嗎」
			ELSEIF K143C_勁牙組 == 1
				PRINTFORML 「哼、那傢伙還在這附近晃蕩嗎」
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「真是個匆忙的傢伙啊」
			ELSE
				PRINTFORML 「咦、你沒有事要找我嗎。好無聊啊」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「雖然有著種種的羈絆、但是完全無視我這樣的戀人、這也太過分了吧」
				CASE 1
					PRINTFORML 「這樣完全不理會我實在太傷人了」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「就算可以肆意妄為、但是無視掉伴侶、這也太過分了吧」
				PRINTFORML 「這種情況晚上得要來點調教了啊」
				PRINTFORML 尤魔舔了舔嘴唇
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「我雖然是黑幫的、但被戀人無視還是會受傷的」
				CASE 1
					PRINTFORML 「……這樣的%CALLNAME:MASTER%很討厭啊」
					PRINTFORML 尤魔皺眉看著遠去的%CALLNAME:MASTER%背影...
				ENDSELECT
			ENDIF
		ELSEIF TALENT:恋慕
			IF K143C_鬼傑組 == 1 || K143C_勁牙組 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「那傢伙要是趕快從那個組織金盆洗手來這邊就好了」
				CASE 1
					PRINTFORML 「這傢伙真是匆忙啊。是被他的老大拿來當奴隸使喚嗎？」
					PRINTFORML 「等一下過來找我、讓你摸摸我的屁股」
				ENDSELECT
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「什麼、你是說組織的工作比我更重要嗎？」
				PRINTFORML 「稍微關心一下我也不會怎樣啊」
				PRINTFORML 尤魔用手撐著腰、「嗯」地哼了一聲
			ELSE
				PRINTFORML 「咦、我還以為你是來找我的呢」
			ENDIF
		ELSE
			IF K143C_鬼傑組 == 1
				PRINTFORML 「哼、那傢伙還在這附近晃蕩嗎」
			ELSEIF K143C_勁牙組 == 1
				PRINTFORML 「哼、那傢伙還在這附近晃蕩嗎」
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「真是個匆忙的傢伙啊」
			ELSE
				PRINTFORML 「咦、你沒有事要找我嗎。好無聊啊」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「...什麼啊」
		PRINTFORML 「窺視別人的情事、幻想鄉的巫女還真是不知廉恥啊」
		PRINTFORML 「還是、妳也想加入？　我很溫柔的哦」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;芙兰が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 50
		IF TALENT:50:恋人
			PRINTFORML 「不好意思、芙蘭朵露。你的男朋友、我正在好好的品味呢」
			IF TALENT:恋慕
				PRINTFORML 「為什麼？　我也喜歡這傢伙啊。可以嗎？」
				PRINTFORML 「那就讓芙蘭朵露也一起加入吧？」
			ELSE
				PRINTFORML 「為什麼？　這傢伙可是很不錯啊」
				PRINTFORML 「妳啊、總是能享受到這種事情啊。真是讓人羨慕啊」
			ENDIF
		ELSE
			PRINTFORML 「怎麼了？　對別人的情事好奇了嗎？」
			PRINTFORML 「很好、妳就好好看著這個畫面吧」
			IF TALENT:恋人
				PRINTFORML 「戀人在一起做愛的時候、那種感覺真好啊...♥」
			ELSE
				PRINTFORML 「這就是所謂的『大人的性交』吧...♥」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;八千慧が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 130
		IF TALENT:130:恋人
			PRINTFORML 「對不起啦、吉弔。你的戀人現在正被我品嘗著呢」
			IF TALENT:恋慕
				PRINTFORML 「真不公平啊、居然能獨佔著這麼棒的對象啊」
				IF TEQUIP:Ｖ性交
					PRINTFORML 「看吧、看看你的戀人把那根雞雞深深地插入到我的小穴裡吧」
					SIF EX:膣内精液 > 0
					PRINTFORML 「還特地的讓我享受了你戀人的濃厚精液啊...這樣可能都要懷孕了呢♥」
					IF EXP:Ｖ性交経験 >= EXP:130:Ｖ性交経験
						PRINTFORML 「你啊、到現在都沒有跟對象性交過對吧？　真是太可憐了啊」
						PRINTFORML 「即使是到現在才答應也可以喔、%CALLNAME:MASTER%、你想成為我的戀人嗎？」
						PRINTFORML 「只要你想、我隨時隨地都可以滿足你的需求喔♥」
					ELSE
						PRINTFORML 「你的身體看起來好像已經很累了」
						PRINTFORML 「這樣不好吧？　要能好好管理好戀人的性慾的人、才能稱作真正的戀人吧？」
						PRINTFORML 「這樣才能好好讓你的肉棒感到愉悅呢...♥」
						PRINTFORML 尤魔的陰道皺襞緊緊收縮著、她不停地抽動著%CALLNAME:MASTER%的肉棒...
					ENDIF
				ELSEIF TEQUIP:Ａ性交
					PRINTFORML 「喂、看過來啊。你戀人的陽具正在我的肛門裡狠狠抽插著喔」
					SIF EX:肛門内精液 > 0
					PRINTFORML 「而且還給我灌進很多很濃稠的東西呢...讓我感覺我都快被肛交到懷孕了呢♥」
					IF EXP:Ａ性交経験 >= EXP:130:Ａ性交経験
						PRINTFORML 「你應該從來都沒有跟對象肛交過對吧？」
						PRINTFORML 「即使是到現在才答應也可以喔、%CALLNAME:MASTER%、你想成為我的戀人嗎？」
						PRINTFORML 「我可以隨時隨地都用我的肛穴來取悅你喔♥」
					ELSE
						PRINTFORML 「你的身體看起來好像已經很累了」
						PRINTFORML 「這樣不好吧？　要能好好管理好戀人的性慾的人、才能稱作真正的戀人吧？」
						PRINTFORML 「這樣才能好好讓你的肉棒感到愉悅呢...♥」
						PRINTFORML 尤魔的肛壁緊緊的擠壓著、抽動著%CALLNAME:MASTER%的肉棒...
					ENDIF
				ELSEIF TEQUIP:六九式
				ELSE
				ENDIF
			ELSE
				PRINTFORML 「為什麼？　這傢伙可是很不錯啊」
				PRINTFORML 「妳啊、總是能享受到這種事情啊。真是讓人羨慕啊」
			ENDIF
		ELSE
			PRINTFORML 「怎麼了？　對別人的情事好奇了嗎？」
			PRINTFORML 「很好、妳就好好看著這個畫面吧」
			IF TALENT:恋人
				PRINTFORML 「戀人在一起做愛的時候、那種感覺真好啊...♥」
			ELSE
				PRINTFORML 「這就是所謂的『大人的性交』吧...♥」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;磨弓が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 131
		IF TALENT:131:恋人
			PRINTFORML 「不好意思、磨弓。你的男朋友、我正在好好的品味呢」
			IF TALENT:恋慕
				PRINTFORML 「為什麼？　我也喜歡這傢伙啊。可以嗎？」
				PRINTFORML 「那就讓磨弓也一起加入吧？」
			ELSE
				PRINTFORML 「為什麼？　這傢伙可是很不錯啊」
				PRINTFORML 「妳啊、總是能享受到這種事情啊。真是讓人羨慕啊」
			ENDIF
		ELSE
			PRINTFORML 「怎麼了？　對別人的情事好奇了嗎？」
			PRINTFORML 「很好、妳就好好看著這個畫面吧」
			IF TALENT:恋人
				PRINTFORML 「戀人在一起做愛的時候、那種感覺真好啊...♥」
			ELSE
				PRINTFORML 「這就是所謂的『大人的性交』吧...♥」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;袿姫が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 132
		IF TALENT:132:恋人
			PRINTFORML 「不好意思、袿姫。你的男朋友、我正在好好的品味呢」
			IF TALENT:恋慕
				PRINTFORML 「為什麼？　我也喜歡這傢伙啊。可以嗎？」
				PRINTFORML 「那就讓袿姫也一起加入吧？」
			ELSE
				PRINTFORML 「為什麼？　這傢伙可是很不錯啊」
				PRINTFORML 「妳啊、總是能享受到這種事情啊。真是讓人羨慕啊」
			ENDIF
		ELSE
			PRINTFORML 「怎麼了？　對別人的情事好奇了嗎？」
			PRINTFORML 「很好、妳就好好看著這個畫面吧」
			IF TALENT:恋人
				PRINTFORML 「戀人在一起做愛的時候、那種感覺真好啊...♥」
			ELSE
				PRINTFORML 「這就是所謂的『大人的性交』吧...♥」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;早鬼が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 133
		IF TALENT:133:恋人
			PRINTFORML 「不好意思、早鬼。你的男朋友、我正在好好的品味呢」
			IF TALENT:恋慕
				PRINTFORML 「為什麼？　我也喜歡這傢伙啊。可以嗎？」
				PRINTFORML 「那就讓早鬼也一起加入吧？」
			ELSE
				PRINTFORML 「為什麼？　這傢伙可是很不錯啊」
				PRINTFORML 「妳啊、總是能享受到這種事情啊。真是讓人羨慕啊」
			ENDIF
		ELSE
			PRINTFORML 「怎麼了？　對別人的情事好奇了嗎？」
			PRINTFORML 「很好、妳就好好看著這個畫面吧」
			IF TALENT:恋人
				PRINTFORML 「戀人在一起做愛的時候、那種感覺真好啊...♥」
			ELSE
				PRINTFORML 「這就是所謂的『大人的性交』吧...♥」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;其他（角色指定無
	PRINTFORML
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;芙兰に見られた
		IF K143_FIND_AROUND() == 50
			PRINTFORML 「沒想到是吸血鬼二小姐啊」
			IF TALENT:50:恋人 == 1
				PRINTFORML 「為什麼一直這樣盯著我看呢？哦、原來妳們兩個是戀人關係啊」
				PRINTFORML 「這家夥做了個壞事呢。等做完之後會好好的還給妳的、所以請先去旁邊等一下、好嗎」
				PRINTW
			ELSE
				PRINTFORML 「妳也要一起加入嗎？　我完全不介意哦。對吧、%CALLNAME:MASTER%？」
				PRINTW
			ENDIF
			;隠岐奈に見られた
		ELSEIF K143_FIND_AROUND() == 124
			PRINTFORML 「啊？　是摩多羅啊。真的是到處都有妳耶。妳是來妨礙我們玩樂了嗎？」
			IF TALENT:124:恋人 == 1
				PRINTFORML 「怎麼了？　平時的驕傲呢。啊啊、對了、這個傢伙是妳的戀人來著吧」
				PRINTFORML 「不要用害怕、共同管理不是妳的拿手好戲嗎？這傢伙也一起來共同管理吧？」
				PRINTW
			ELSE
				PRINTFORML 「別分散我的注意力。妳去旁邊待著不行嗎？　還是說、你想要加入啊？」
				PRINTW
			ENDIF
		;八千慧に見られた
		ELSEIF K143_FIND_AROUND() == 130
			IF K143C_鬼傑組 == 1
				PRINTFORML 「嗨、吉弔。你們那邊的年輕小伙子、我借用一下啦♪」
				IF TALENT:130:恋人 == 1
					PRINTFORML 「『妳在對我的戀人幹嘛…』這種問題？　看一眼就知道了吧、正在做愛喔、做–愛–喔♪」
					PRINTFORML 「做完後我會好好的還妳啦、妳先去旁邊待著吧」
					PRINTW
				ELSE
					PRINTFORML 「在做什麼、看一眼不就知道了嘛、是在做愛喔、做–愛–喔♪」
					PRINTFORML 「妳走開一下啦、妳干擾到我們了、我們正在享受做愛呢」
					PRINTW
				ENDIF
			ELSE
				PRINTFORML 「……看一眼不就知道了嘛、是在做愛喔、做愛」
				IF TALENT:130:恋人 == 1
					PRINTFORML 「啊啊、對了這個傢伙、是你的戀人來著呢」
					PRINTFORML 「不好意思～。等我做完後會好好還給妳的、那麼可以請妳去旁邊等一下嗎」
				ELSE
					PRINTFORML 「妳走開一下啦、妳干擾到我們了、我們正在享受做愛呢」
				ENDIF
			ENDIF
		;袿姫に見られた
		ELSEIF K143_FIND_AROUND() == 132
			PRINTFORML 「這是這個、原來是靈長園的偶像神明啊、特地跑來偷窺我們的情事啊、真是可怕呢」
			IF TALENT:132:恋人 == 1
				PRINTFORML 「至於你的男友呢、就像你看到的一樣對我十分著迷呢、還真困擾呢、桀桀桀」
				PRINTW
			ELSE
				PRINTFORML 「沒想到妳會有喜歡被出軌的這種興趣呢、桀桀桀」
				PRINTW
			ENDIF
		;驪駒に見られた
		ELSEIF K143_FIND_AROUND() == 133
			IF K143C_勁牙組 == 1
				PRINTFORML 「喂、驪駒。你家那位年輕小伙子、我借來用用了喔♪」
				IF TALENT:恋人
					PRINTFORML 「你的男朋友、感覺還不錯啊。平常應該都被折磨得很慘吧？　對不對啊？」
					PRINTW
				ELSE
					PRINTFORML 「在黑心公司裡工作、肯定很辛苦吧、%CALLNAME:MASTER%、所以我現在在做字面的上的安慰喔、乖––乖––、好啦好啦」
					PRINTW
				ENDIF
			ELSE
				PRINTFORML 「妳在瞪什麼啊。妳看一眼不就該看出來現在我們正在做愛不是嗎？」
				IF TALENT:133:恋人 == 1
					PRINTFORML 「啊啊、對了這個傢伙、是你的戀人來著呢」
					PRINTFORML 「不好意思～。等我做完後會好好還給妳的、那麼可以請妳去旁邊等一下嗎」
				ELSE
					PRINTFORML 「妳走開一下啦、妳干擾到我們了、我們正在享受做愛呢」
				ENDIF
			ENDIF
		ELSE
			PRINTFORML 「怎麼了、現在的妳才是那個闖入者喔...」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		;芙兰
		IF K143_FIND_AROUND() == 50
			IF TALENT:50:恋人
				PRINTFORML 「哦、是想要挽回戀人嗎？　二小姐」
				PRINTFORML 「決鬥吧、比看看誰才能讓他感到舒服吧」
				PRINTW
			ELSE
				PRINTFORML 「吼、妳該不會是準備要原諒這個傢伙吧」
				IF TALENT:恋人
					PRINTFORML 「真有趣啊。讓他知道自己戀人到底是誰吧」
				ELSE
					PRINTFORML 「真有趣啊。來比一場吧、比看看誰才能讓他沉迷在自己的身體上吧」
				ENDIF
			ENDIF
		;隠岐奈
		ELSEIF K143_FIND_AROUND() == 124
			IF TALENT:恋人
				PRINTFORML 「老只是一直背後拉著線、結果最後根本沒發現繃緊的線早就斷了啊」
				PRINTFORML 「雖然這樣做愛很自私、但是妳就給我在旁邊吸著手指、好好看著我們做愛吧」
				SIF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
				PRINTFORML 「這傢伙的肉棒、我可不會讓給妳口的喔♪」
				PRINTW
			ELSE
				IF TALENT:恋人
					PRINTFORML 「別以為什麼都可以從我這裡搶走。你跟我一樣貪婪呢」
					PRINTW
				ELSE
					PRINTFORML 「老是自以為是地坐在椅子上、只在那上面做真的可以嗎？　只讓別人侍奉的做愛才不是做愛啊」
					PRINTW
				ENDIF
			ENDIF
		ELSEIF K143_FIND_AROUND() == 130
			IF TALENT:130:恋人
				PRINTFORML 「桀桀、吉弔你啊。妳現在慌張的想挽回妳的戀人、是不是已經太遲了啊？」
				PRINTFORML 「看看這他的表情。他已經被我迷得神魂顛倒了喔？　我會好好為他侍奉的、否則就不能甘心了♪　就讓妳當做參考了喔」
				PRINTW
			ELSE
				IF TALENT:恋人
					PRINTFORML 「真有趣呢。我要讓他知道自己到底迷戀上的對象是誰」
					PRINTW
				ELSE
					PRINTFORML 「桀桀、鬼傑的領袖不僅僅很擅長操縱謀略、還很擅長賣淫呢、來、表演看看吧」
					PRINTW
				ENDIF
			ENDIF
		ELSEIF K143_FIND_AROUND() == 132
			IF TALENT:132:恋人
				PRINTFORML 「神啊、為了取回神唯一的信徒而拼命吧」
				PRINTFORML 「為了奪回這個傢伙、讓在我眼前下流地擺動吧、桀桀桀」
				PRINTW
			ELSE
				IF TALENT:恋人
					PRINTFORML 「雖然是個神明、不、正因為是神明、所以不能把這傢伙讓給你啊」
					PRINTFORML 「就算是妳也只能在旁邊舔屁眼、因為是我先跟他做愛的喔」
					PRINTW
				ELSE
					PRINTFORML 「這傢伙是可我先下的手、妳要加入我也不介意、去蹲在角落裡自慰吧」
					PRINTW
				ENDIF
			ENDIF
		ELSEIF K143_FIND_AROUND() == 133
			IF TALENT:133:恋人
				PRINTFORML 「我的貪欲你應該知道吧？」
				PRINTFORML 「就算是我的戀人、我也不會讓步的啊」
				PRINTW
			ELSE
				IF TALENT:恋人
					PRINTFORML 「當上畜生界的最頂點或是當你的戀人、兩者我都會讓步的」
					PRINTW
				ELSE
					PRINTFORML 「什麼？　要混再一起？　主要還是以我為主、不要妨礙我」
					PRINTW
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF K143C_鬼傑組 == 1
				PRINTFORML 「桀桀。要對吉弔保密喔」
				PRINTFORML 「從現在開始就是愉快的裸體交配囉」
				PRINTW
			ELSEIF K143C_勁牙組 == 1
				PRINTFORML 「我要遵從弱肉強食的口號、現在就要把你給吃掉」
				PRINTFORML 「只不過、這是性的層面上的…♪　讓我好好享受一下吧」
				PRINTW
			ELSEIF K143C_剛欲同盟 == 1
				PRINTFORML 「什麼啦、我只是要跟你加深加深感情而已啦♪」
				PRINTFORML 「只不過、是以裸體做愛的方式喔、桀桀桀」
				SIF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
					PRINTFORML 「只射一、兩發可是滿足不了我的哦、給做好覺悟吧♪」
					PRINTW
			ELSE
				PRINTFORML 「對不起啊。因為變得有點興奮了嘛」
				PRINTFORML 「稍微陪我處理一下性慾吧。沒關係的、只要數一下羊很快就會結束的」
				PRINTW
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;誘ってきた（人目につかない場所に行きたがるやつ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;ARG:1=TARGETの欲求不満度（最高1000）
		;必要ならばこれで分岐を作ってください
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	IF K143C_剛欲同盟 == 1
		PRINTFORML 「這麼正大光明得偷窺老大洗澡、你也成長了呢」
		PRINTFORML 「但我想一個人慢慢泡澡、出去一下吧」
		PRINTW
	ELSE
		PRINTFORML 「...說什麼啊、一看就知道了吧、現在是我在洗澡啊」
		PRINTFORML 「但我想一個人慢慢泡澡、出去一下吧」
		PRINTW
	ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

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

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

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;TCVAR:盗み食い抑制で持っていた食物を食われるのを回避できる
	;仕様例（薬が入ってたら食わない）
	;IF DISH_DRG
	;	TCVAR:盗み食い抑制 = 1
	;ENDIF

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF K143C_妊娠レベル == 1 && (TALENT:恋慕 || TALENT:恋人) && TCVAR:TARGET:口服避孕薬 == 0
			;不妊フラグ進行
			SIF EX:膣内精液 > 0 || EX:子宮内精液 > 0
			;K143C_妊娠レベル = 2
			CFLAG:143:1009 = 2
		ENDIF

		IF K143C_妊娠レベル < 8 &&  K143C_妊娠レベル > 0
			BASE:体力 += EX:膣内精液 / 4
			BASE:気力 += EX:膣内精液 / 8
			EX:膣内精液 = 0
			EX:子宮内精液 = 0
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後の情緒
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

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

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

IF LOCAL
	;K143C_時止め吸収 += EX:膣内精液
	CFLAG:143:1009 += EX:膣内精液
	BASE:体力 += EX:膣内精液 / 4
	BASE:気力 += EX:膣内精液 / 8
	EX:膣内精液 = 0
	EX:子宮内精液 = 0
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		CALL HPH_PRINT,@"「ッ！！？HPH」","L"
		PRINTFORML 「嗯，刚才的是…是谁做了什么事吗…」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		CALL HPH_PRINT,@"「嗯、啊、哦!!?HPH 哦HPHHPH 哦HPHHPHHPHHPH」","L"
		CALL HPH_PRINT,@"「呼—呼—HPH 呼—呼—HPH」","L"
		CALL HPH_PRINT,@"「不...不知是哪个混蛋做的,但确实让我享受到了极大的快感...HPHHPH」","L"
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「…啊？」
		PRINTFORML 「感覺下體滑滑的…到底是誰幹的好事啦…！」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			PRINTFORML 「呜唔!?」
			PRINTFORML 「噗咳、咳嗽、咳咳咳!!! 咳!!!」
			PRINTFORML 「这是什么啊...不是毒物,但也不像正经的饮料...」
			PRINTFORML 「无论如何看都是男人...在我不注意的时候射在我嘴里的变态存在于幻想乡吗...」
			PRINTFORML 「不过,量真的很多啊...犯人应该拥有相当可观的睾丸吧...」
			PRINTW
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			CALL HPH_PRINT,@"「呜唔!?HPH」","L"
			CALL HPH_PRINT,@"「唔、咳、咳...哈HPH」","L"
			CALL HPH_PRINT,@"「好淫荡啊,真是淫荡的浓稠味道...HPH」","L"
			CALL HPH_PRINT,@"「这粘稠的汁水般的液体...感觉力量正在涌现HPH」","L"
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K143_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「啊？　你在說什麼啊、有了孩子豈不是會讓工作都會變得有些困難嗎。不管你怎麼想的、但我可是有很認真的在工作的啊」
		PRINTFORML 「如果一定要生中出、那就給我吃藥吧。你有吧？　那種東西」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「不行啊、我都說了不要了吧。不要再說了」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF K143C_鬼傑組 == 1
		ELSEIF K143C_勁牙組 == 1
		ELSEIF K143C_剛欲同盟 == 1
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「唉…算ー了ー啦ー…」
		PRINTFORML 「除了危險日以外、我都會讓你中出的啊」
		PRINTL
		PRINTFORML 「…嘛、中出還是比較舒服的嘛」
		PRINTFORML 「沒有什麼好說的了。繼續吧。繼續」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF K143C_鬼傑組 == 1 ||  K143C_勁牙組 == 1
			PRINTFORML 「真是的、就算想要生插也不用向對手組織低三下四的吧、這不是常識嘛？」
			PRINTFORML 「都怪你家老大的教育不良啊」
			PRINTL
			PRINTFORML 「算ー了ー啦ー…好啦、讓你生插啦」
			PRINTFORML 「但是、射精的時候要在外面射出來哦、如果懷了孕會很麻煩的」
			PRINTW
		ELSEIF K143C_剛欲同盟 == 1
			PRINTFORML 「你…就是要這樣子跟你的老大生插嗎？」
			PRINTFORML 「算ー了ー啦ー…好啦、讓你生插啦」
			PRINTL
			PRINTFORML 「哇、你的笑容好讓人噁心啊…」
			PRINTFORML 「但作為交換、射精的時候要在外面射出來哦、如果懷上孩子會很麻煩的」
			PRINTW
		ELSE
			PRINTFORML 「哇好厲害啊。我從來沒看過這麼漂亮的土下座過啊」
			PRINTFORML 「算ー了ー啦ー…好啦、讓你生插啦」
			PRINTL
			PRINTFORML 「別笑得那麼開心啦...讓人有些怪不好意思的」
			PRINTFORML 「但作為交換、射精的時候要在外面射出來哦、如果懷上孩子會很麻煩的」
			PRINTW
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K143_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「桀桀桀、就算是人間的巫女也會犯迷糊的呢。居然會讓我住在神社裡」
		PRINTFORML 「還是因為自己對實力擁有絕對的自信？　那個時候明明還是被我的能力給逼退了呢」
		PRINTL
		PRINTFORML 「…別那麼說啦。我在說。我不會給你添麻煩的啦」
		PRINTFORML 「知道了、知道了、我也不會給神社添麻煩的啦」
		PRINTW
		PRINTFORML 「能一起住在一起不開心嗎？　當然是...」
		PRINTFORML 「...當然是、非常開心的啦」
		PRINTFORML 「比起畜生界和血池還要好啊」
		PRINTL
		PRINTFORML 「嗚哇、你的臉真討厭。要不要給你一記火燒屁股啊、啊？」
		PRINTFORML 「閉嘴！　這才不是害羞的掩飾！　喂！　別笑著跑掉啊！」
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「嗯、其實比起畜生界和血池、這裡更加舒適啊」
		PRINTFORML 「...算什麼、這才不是輸不起的意思」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;你の私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K143_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	IF K143C_妊娠レベル < 8
		EX:膣内精液 = 0
		EX:子宮内精液 = 0
	ENDIF
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:诶嘿嘿
			IF K143C_妊娠レベル < 8
				EX:膣内精液 = 0
				EX:子宮内精液 = 0
			ENDIF
			;诶嘿嘿中に眠くて返回
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:诶嘿嘿
			IF CFLAG:衰弱
				;诶嘿嘿中に疲れて返回
				IF K143C_妊娠レベル < 8
					EX:膣内精液 = 0
					EX:子宮内精液 = 0
				ENDIF
				PRINTFORMW
			ELSE
				;诶嘿嘿中に眠くて返回
				IF K143C_妊娠レベル < 8
					EX:膣内精液 = 0
					EX:子宮内精液 = 0
				ENDIF
				PRINTFORMW
			ENDIF
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り（角色の自宅位置、または角色的房間で约会終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会終了時に部屋に来ないかと誘う（～から部屋に来ないかと誘われた）
	;（来訪角色のみ,自宅が無い角色でも発生します）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「行く」を選択（～に誘われるまま、【MASTER】は【TARGET】的房間へと向かった……）
	;（これが発生すると十中八九被逆推ます）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「やめとく」を選択（～は心無か寂しそうだ……）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくないと言い出す（～は今夜は帰りたくないと言い出した…）
	;（来訪角色の帰宅時に欲求不満と欲望が高いと発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊める」を選択（～は【MASTERの自室】に泊まっていくこと成为了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊めない」を選択、または家主が居る（【MASTER】は丁重に断った）
	;（家主が居る＝MASTERの私室に他の角色の私室を設定している）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;疲れて帰宅（疲れきった～は帰って行きました）
	;（～は疲れ切っている→（入り口）まで送るよ でも発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		IF K143C_妊娠レベル < 8
			EX:膣内精液 = 0
			EX:子宮内精液 = 0
		ENDIF

		IF CFLAG:诶嘿嘿
			;诶嘿嘿中に疲れて返回
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K143_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;接吻魔取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰狂取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;子宮口性感取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;漏尿癖取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K143_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K143_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K143_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K143_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K143_26(ARG,ARG:1)

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

;オナバレックス判定用関数
;RETURN -1で強制失敗、RETURN 1で強制成功
@M_KOJO_EVENT_K143_26_1(ARGS)
#DIM 補正値
IF ARGS == "どうぞそのまま"

ELSEIF ARGS == "二人"

ENDIF

;使用例
;IF !TALENT:XX:恋慕
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:濃厚精液
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF
;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K143_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF K143C_鬼傑組 == 1
				PRINTFORML 「看起來挺閒的嘛、過來陪我一下吧」
				PRINTFORML 「你說你在處理組織的事、但你看起來就像是在混啊。算了算了」
			ELSEIF K143C_勁牙組 == 1
				PRINTFORML 「如果有那個時間在那邊賣油的話、就把時間拿來陪陪我吧、我會買下全部的油的」
				PRINTFORML 「你說你在處理組織的事、但你看起來就像是在混啊。算了算了」
			ELSEIF K143C_剛欲同盟 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「我會給你一個新差事」
					PRINTFORML 「就是帶我出去約會、讓我玩得開心。去哪裡都由我來決定、但細節都是由你來負責」
					PRINTFORML 「桀桀桀、加油吧」
				CASE 1
					PRINTFORML 「要出發了、趕快準備好」
					PRINTFORML 「……你問我要去哪裡？　桀桀桀、那是一個很好的地方喔」
					IF ABL:MASTER:戦闘能力 >= 3
						PRINTFORML 「有你真好啊。當個保鏢再適合不過了」
						PRINTFORML 「嘛、不用擔心啦、今天的不會太危險的、放輕鬆」
					ELSE
						PRINTFORML 「那帶個更強壯的護衛會比較好吧？」
						PRINTFORML 「算了啦。今天不是那種事啦。來跟我吧」
					ENDIF
				ENDSELECT
			ELSE
				PRINTFORML 「有空嗎？　陪我玩一下嘛」
				PRINTFORML 「你知道嗎、和剛欲同盟長約會可不是什麼常有的事。你應該感到榮幸才對啊。桀桀桀」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

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

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

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

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

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

	IF K143C_妊娠レベル == 7
	ELSEIF K143C_妊娠レベル == 6
	ELSEIF K143C_妊娠レベル == 5
	ELSEIF K143C_妊娠レベル == 4
	ELSEIF K143C_妊娠レベル == 3
	ELSEIF K143C_妊娠レベル == 2
		;CALL YUMA_INFERTILITY
	ENDIF

	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;自由行動中
;ARG:1      0=行動中,1=完了時
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_EVENT_K143_32(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;▼考え事,（～は考えに耽っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 1
		;▼玩遊戲,（～は走り回っている。）
		;※[幼稚]持ちのみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 2
		;▼吃飯,（～は吃飯を摂っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 3
		;▼つまみ食い（～はこっそりつまみ食いをしている。）
		;※[妖精]持ちと露米亜、恋、幽幽子、紫苑のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 4
		;▼掃除,（～はテキパキと部屋の掃除をしている。）
		;※[掃除係]持ちまたは汚臭耐性-1以下のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 5
		;▼運動,（～は張り切って運動している。）
		;※[音楽知識]持ちは除く（演奏になる）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 6
		;▼読書,（～は黙々と本を読んでいる。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 7
		;▼料理,
		IF !ARG:1
			;行動中
			IF Activity_Duration:TARGET > 30
				;料理中（～は軽快に料理をしている。）
				PRINTFORML
			ELSE
				;吃飯中（～は作った料理を食べている。）
				PRINTFORML
			ENDIF
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 8
		;▼演奏
		;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
		;1,～は小気味よく演奏している。
		;2,～は気ままに歌っている。
		;3,～は華麗に踊っている。
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 9
		;▼採集,（～使える素材を探している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 10
		;▼釣魚,（～はのんびり釣魚をしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 11
		;▼実験,（～は可疑実験をしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 12
		;▼のんびり,（～はのんびりしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 13
		;▼晩酌,（～はまったりと酒を飲んでいる。）
		;※酒耐性0以上のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 14
		;▼買い物,（～は気ままに買い物している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 15
		;▼説教,（～はじっと聞いている…）
		;※神霊・蓬莱人は除く
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 16
		;▼落とし穴,（～は落とし穴を増やしている）
		;※三月精・琪露諾・克勞恩皮絲のみ
		;それ以外は落ちる側
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時,
			;（仕掛け人（失敗時）,誰も引っかからないので～は飽きてしまったようだ…）
			;（落ちた側（戦闘能力2～4）,～はすぐに穴から飛び出して周りをキョロキョロ見回している…）
			PRINTFORML
		ENDIF
	CASE 17
		;▼雪だるま作り（～は雪を集めている）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 18
		;▼炬燵でのんびり（～は炬燵に入って温まっている）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;ハッピーニューイヤー
;年越しの瞬間に同じ部屋に居ると発生
;==================================================
@M_KOJO_EVENT_K143_33(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;技能レベルUP
;各ABL値はレベルUP後の値になってます
;==================================================
@M_KOJO_EVENT_K143_34(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 1
		;戦闘技能
		PRINTFORMW
	CASE 2
		;話術技能
		PRINTFORMW
	CASE 3
		;清掃技能
		PRINTFORMW
	CASE 4
		;教養
		PRINTFORMW
	CASE 5
		;料理技能
		PRINTFORMW
	CASE 6
		;採集Lv
		PRINTFORMW
	CASE 7
		IF ARG:1 == 0
			;音楽技能
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【音楽知識】取得
			PRINTFORMW
		ELSEIF ARG:1 == 2
			;【相対音感】取得
			PRINTFORMW
		ENDIF
	CASE 8
		;釣魚Lv
		PRINTFORMW
	CASE 9
		IF ARG:1 == 0
			;調合Lv
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【調合知識】取得
			PRINTFORMW
		ENDIF
	CASE 10
		;伐採Lv
		PRINTFORMW
	CASE 11
		IF ARG:1 == 0
			;指
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【靈活手指】取得
			PRINTFORMW
		ENDIF
	CASE 12
		IF ARG:1 == 0
			;舌
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【舌頭靈活】取得
			PRINTFORMW
		ENDIF
	CASE 13
		IF ARG:1 == 0
			;胸
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【淫乳】取得
			PRINTFORMW
		ENDIF
	CASE 14
		;腰
		PRINTFORMW
	CASE 15
		IF ARG:1 == 0
			;膣
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【淫壺】取得
			PRINTFORMW
		ENDIF
	CASE 16
		IF ARG:1 == 0
			;肛門
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【尻穴狂】取得
			PRINTFORMW
		ENDIF
	ENDSELECT
	PRINTL
ENDIF
RETURN 1

;==================================================
;デイリーイベント2,夢精
;親密5以上で発生（来訪角色のみ）
;▼地の文--------------------------------------------------
;【MASTER】が夢精で汚した内衣を洗っていると【TARGET】が飛んできた！
;【TARGET】はそんなもの他の洗濯物と一緒に洗わないでと抗議すると、【MASTER】の手に収まった内衣を粪だくり戻っていった…
;【TARGET】　欲情の珠＋1000
;==================================================
@M_KOJO_DAILY_EVENT_K143_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;※コメントアウトすると欲情の珠＋1000（JUEL:11 += 1000）もカットされるので注意
CALL DAILY_MESSAGE_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント4,物思い
;濃厚精液状態で発生
;▼地の文--------------------------------------------------
;とりとめもない思考に耽っていた【TARGET】は、いつの間にか【MASTER】のことを考えていたことに気づいた
;【TARGET】は明日【MASTER】に会いに行くことにしたようだ
;==================================================
@M_KOJO_DAILY_EVENT_K143_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
CALL DAILY_MESSAGE_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント12,特訓
;信頼100以上で発生（拠点角色のみ）
;==================================================
@M_KOJO_DAILY_EVENT_K143_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;コメントアウトできるのはARG:1=1,2のみです
CALL DAILY_MESSAGE_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG:1
	CASE 1
		;特訓を頼まれる
		;～から新技の訓練に付き合って欲しいと言われた
		PRINTFORML
	CASE 2
		;拒绝
		;～は残念そうだ
		PRINTFORML
	CASE 3
		;～の攻撃！
		;※ここはWAITしないでください
		PRINTFORML
	CASE 4
		IF ARG:2
			;時間停止して回避
			PRINTFORML
		ELSE
			;回避成功
			PRINTFORML
		ENDIF
	CASE 5
		;回避失敗
		PRINTFORML
	ENDSELECT
ENDIF
RETURN 1

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

IF ARG
	PRINTFORML Ａ玩弄場合
ELSE
	PRINTFORML V玩弄場合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

IF ARG
	PRINTFORML Ａ玩弄場合
ELSE
	PRINTFORML V玩弄場合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

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

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

IF 本番はどっちか
	PRINTFORML Ａ本番
ELSE
	PRINTFORML Ｖ本番
ENDIF
;-------------------------------------------------
[SKIPEND]

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

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（约会帰り接吻など）を見るまで诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K143_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
;RETURN 0
IF TALENT:恋慕 || TALENT:恋人
	PRINTFORML 「怎麼了？　忍不住了嗎？」
	PRINTFORML 「很好。讓我來滿足你積壓已久的性慾吧、全部都吸的乾乾淨淨」
	PRINTFORML 「既然都要做了、就要好好的享受。什麼東西都可以試試看喔」
ELSEIF K143C_剛欲同盟 == 1
	PRINTFORML 「喂喂、冷靜點啊」
	PRINTFORML 「這樣好嗎？　你現在要和這個對象做那種事喔、這可是你的〝老大〟哦」
	PRINTFORML 「既不是正經人、也不是街頭混混那種的人喔」
	PRINTL
	PRINTFORML 「......不過如果你還是下定了決心的話、就好好抱著我到最後吧」
	PRINTFORML 「我可是你的〝老大〟哦、你的性慾、我全部都會幫你滿足的喲」
	PRINTL
ELSEIF K143C_鬼傑組 == 1
	PRINTFORML 「......這是什麼意思啊？」
	PRINTFORML 「你是與敵對組織的首領做愛、還是說你是只是隻種馬？」
	IF TALENT:[[八千慧]]:恋慕 == 1 || TALENT:[[八千慧]]:恋人 == 1 || TALENT:[[八千慧]]:炮友 == 1 || TALENT:[[八千慧]]:愛欲 == 1
		PRINTFORML 「原來如此、這就是他們的手法啊、讓他們自己深陷其中」
		PRINTFORML 「雖然她的個性不怎麼樣、但她的能力我可是深有體會的」
		PRINTFORML 「就看你們能不能連剛欲同盟的同盟長也給拉下水吧」
	ELSE
		PRINTFORML 「還是說、是有人讓你來痛扁我的？」
		PRINTFORML 「好啊。你的性慾、就交給我吧。我會把它全給吃光的」
	ENDIF
ELSEIF K143C_勁牙組 == 1
	PRINTFORML 「......這是什麼意思啊？」
	PRINTFORML 「你是與敵對組織的首領做愛、還是說你是只是隻種馬？」
	IF TALENT:[[早鬼]]:恋慕 == 1 || TALENT:[[早鬼]]:恋人 == 1 || TALENT:[[早鬼]]:炮友 == 1 || TALENT:[[早鬼]]:愛欲 == 1
		PRINTFORML 「原來如此、這就是他們的手法啊、讓他們自己深陷其中」
		PRINTFORML 「那傢伙、驕傲得很、但有時也會很老實、或許不太難搞定呢」
		PRINTFORML 「嗯、看來跟剛欲同盟的同盟長一樣吃這一套呢？　不妨試試」
	ELSE
		PRINTFORML 「還是說、是有人讓你來痛扁我的？」
		PRINTFORML 「好啊。你的性慾、就交給我吧。我會把它全給吃光的」
	ENDIF
ELSE
	PRINTFORML 「...原來你是這種人啊」
	PRINTFORML 「算了、我並不討厭那些趕於追求欲望的人」
	PRINTFORML 「你的欲望、就盡全力去實現吧、好讓我滿足到不能再滿足」
ENDIF
RETURN 1
;-------------------------------------------------

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

;-------------------------------------------------
;部屋描写用関数
;口上角色のOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
;@K143_ROOM_DESCRIPTION
;PRINTFORML 例）生活感のない殺風景な部屋だ
;-------------------------------------------------

;==================================================
;贈り物イベント
;==================================================
@M_KOJO_EVENT_K143_GIFT(ARG, GIFT_ID, 評価点, GIFT_NAME, SENSE)
#DIM GIFT_ID
#DIM 評価点
#DIMS GIFT_NAME
#DIMS SENSE
;---------------------------------------------------------------------------------------------------
;評価点       贈り物の評価点（1～999）,口上主があげた場合でも口上主の評価点
;GIFT_NAME    贈り物の名称
;SENSE        贈り物に設定された属性。STRCOUNT(DISH_TASTE, "ほげほげ/")を使用と特定の属性を判定できます。
;GIFT_ID      これ単体では使いません。以下の式内関数を使用とデータを抽出できます（こだわりたい人用）
;　GET_GIFTDATA(GIFT_ID, "回数")    貰った（あげた）回数
;　GET_GIFTDATA(GIFT_ID, "得点")    得点（1～999）,口上貂プレ内では用意されてます。
;　GET_GIFTDATA(GIFT_ID, "日期")    貰った（あげた）日期（1～9999）
;　GET_GIFTDATA(GIFT_ID, "場所")    買った場所（约会の行き先）
;　GET_GIFTDATA(GIFT_ID, "形容詞")  形容詞番号（贈り物_形容詞.erb参照）
;　GET_GIFTDATA(GIFT_ID, "本体")    本体番号（贈り物_本体.erb参照）
;--------------------------------------------------------------------------------------------------
;约会帰りに口上主が你に贈り物を渡す（陥落や好感度に関わらず親密5以上から発生）
;評価点は701～999（渡す角色本人の評価）
;--------------------------------------------------------------------------------------------------
IF ARG == 1
	;PRINTFORMW 「%GIFT_NAME%をあげるから大事に使って」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物を大事にする（700点以上）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 2
	;IF STRCOUNT(SENSE, "可愛的/")
	;	PRINTFORMW 「可愛的禮物を貰っちゃった」
	;ELSEIF 評価点 >= 800
	;	PRINTFORMW 「とっても素敵な禮物を貰っちゃった」
	;ELSE
	;	PRINTFORMW 「素敵な禮物を貰っちゃった」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物をお気に入りにする（↑の大事にするから続き）（700点以上かつ最高得点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 3
	;IF STRCOUNT(SENSE, "穿戴/")
	;	PRINTFORMW 「明日からこれを付けて行こうっと」
	;ELSE
	;	PRINTFORMW 「明日からこれを持って行こうっと」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物をとりあえず保管する（400～699点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 4
	;PRINTFORMW 「とりあえず飾っておこう」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日获得的礼物をこっそり質に入れる（400点未満）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 5
	;PRINTFORMW 「私これ嫌いなのよね～」
	RETURN 1
ENDIF
RETURN 1

;==================================================
;斗虫
;斗虫の口上は少し特殊で、PRINTを使用のではなく、
;台詞一行のみをRESULTSに入れてください
;ムシの名前は %MUSHI_NAME% で表示できます
;ムシの名前の最長は亞歷珊卓皇后鳥翼蝶の全角14文字です
;文字数制限があります。はみ出ないように気をつけてください
;ARGは残りムシ数か順位です
;==================================================
@M_KOJO_MESSAGE_COM_K143_MUSHI_BATTLE(ARGS, ARG)
#DIM 残りムシ数
#DIM 順位
SELECTCASE ARGS
CASE "試合前"
	;-------------------------------------------------
	;角色セレクト時,ARGは使えません
	;全角50文字くらいまで
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばしてさしあげますわ！」
	ENDIF
CASE "戦場に出した"
	;-------------------------------------------------
	;"【（角色）】は《（ムシ）》を戦場に出した！」"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%MUSHI_NAME%！キミにきめた！」
	ENDIF
CASE "攻撃時"
	;-------------------------------------------------
	;"【（角色）】《（ムシ）》の『（攻撃名）』！」"の直前
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばせ！%MUSHI_NAME%！」
	ENDIF
CASE "倒れた時"
	;-------------------------------------------------
	;"【（角色）】《（ムシ）》は倒れた！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ああっ！私の%MUSHI_NAME%がっ！」
	ENDIF
CASE "敗退時"
	;-------------------------------------------------
	;"【（角色）】敗退！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のムシが全滅めつめつ……」
	ENDIF
CASE "タイマン：勝ち"
	;-------------------------------------------------
	;順位は1位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%よわーい！」
	ENDIF
CASE "タイマン：負け"
	;-------------------------------------------------
	;順位は2位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%つよーい！」
	ENDIF
CASE "バトルロイヤル：優勝"
	;-------------------------------------------------
	;順位は1位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「やったー！」
	ENDIF
CASE "バトルロイヤル：２位以下"
	;-------------------------------------------------
	;順位は2～4位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「くやし～！」
	ENDIF
CASE "チーム戦：勝ち"
	;-------------------------------------------------
	;順位は1位（やられていても）
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のおかげね！」
	ENDIF
CASE "チーム戦：負け"
	;-------------------------------------------------
	;順位は2位
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「味方が弱い！！」
	ENDIF
ENDSELECT
SIF RESULTS != ""
	RETURN 1

;==================================================
;引力操作
;TCVAR:引力点に場所IDを入れるとその地点に引っ張られていきます
;場所IDと同じ拠点Mapでしか効果はありません（博麗神社の境内なら拠点が博麗神社のときだけ）
;条件を付けないと永久に引っ張られ继続ので注意
;RANDは基本的に使えません。CFLAG:今日の運勢にその日の随机数値（0～999）が入っているのでこれを使用と良いです
;==================================================
@M_KOJO_EVENT_K143_GRAVITY(ARG)

SIF 0
	TCVAR:引力点 = 0

;▼共通設定で使われているサンプル
[SKIPSTART]
	;平日の昼間は随机で玩耍に行く
	IF YOUBI_MATCH(DAY, "月火水木金") && INRANGE(TIME, 600, 960)
		SELECTCASE CFLAG:今日の運勢 % 5
		CASE 1
			TCVAR:引力点 = P2境内
		CASE 2
			TCVAR:引力点 = P10走廊
		CASE 3
			TCVAR:引力点 = P11庭
		CASE 4
			TCVAR:引力点 = P25鎮守之森
		CASEELSE
			TCVAR:引力点 = 0
		ENDSELECT
	ENDIF
	;水木曜日に2分の1の確率で玩耍に行く
	SIF YOUBI_MATCH(DAY, "水木") && INRANGE(TIME, 720, 1020) && CFLAG:今日の運勢 % 2 == 0
		TCVAR:引力点 = P213鈴奈庵
	;特定の人物が特定の場所にいるとそこへ引っ張られる
		SIF CFLAG:[[白蓮]]:現在位置 == P103本堂 && !CFLAG:[[白蓮]]:诶嘿嘿 && SHIRAHU([[白蓮]])
			TCVAR:引力点 = P103本堂
	;土日に10分の1の確率で特定の人物にくっついてまわる
	SIF YOUBI_MATCH(DAY, "土日") && CFLAG:今日の運勢 % 10 == 0 && !CFLAG:[[覚]]:诶嘿嘿 && SHIRAHU([[覚]])
		TCVAR:引力点 = CFLAG:[[覚]]:現在位置
[SKIPEND]

;==================================================
;打西瓜
;打西瓜の口上は斗虫同様、PRINTを使用のではなく、
;台詞一行のみをRESULTSに入れてください
;カギ括弧は自動で付きます
;"衝突","結果"のみ、口上色が自動で付きます
;"衝突","結果"以外は半角26文字（全角13文字）までの文字数制限があります。はみ出ないように気をつけてください
;数パターンあると雰囲気が出ます（%TEXTR( / )%を使用と良い）
;==================================================
@M_KOJO_MESSAGE_COM_K143_SUIKA(ARGS, ARG)
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL:1 = 0
;-------------------------------------------------
IF LOCAL:1
	SELECTCASE ARGS
	CASE "衝突"
		;-------------------------------------------------
		;場外に出て你が角色と衝突した際の台詞
		;文字数制限はありません,汎用台詞もありません
		;-------------------------------------------------
		RESULTS = いたっ！ 稍微、危ないじゃないのよ！
	CASE "そこだ！"
		RESULTS = %TEXTR("そこ！/今！")%
	CASE "近い"
		RESULTS = %TEXTR("近い！近いよ！/近づいてるよ！/あと稍微！")%
	CASE "遠い"
		RESULTS = %TEXTR("まだ遠いよ/まだまだ～")%
	CASE "かなり遠い"
		RESULTS = %TEXTR("全然遠いよー/まだまだずっと遠いー")%
	CASE "前"
		RESULTS = %TEXTR("前にあるよ/そのまま、そのまま/そっちそっち")%
	CASE "少し前"
		RESULTS = %TEXTR("稍微だけ前！/すこーし前/あと一歩！")%
	CASE "後ろ"
		RESULTS = %TEXTR("後ろ向いてる！/逆、逆！/そっちじゃないよー")%
	CASE "少し後ろ"
		RESULTS = %TEXTR("すぐ後ろだよ！/すこーし後ろ/一歩後ろ！")%
	CASE "右"
		RESULTS = %TEXTR("右だよ/右、右/もっと右")%
	CASE "少し右"
		RESULTS = %TEXTR("稍微だけ右/まだ右かな")%
	CASE "左"
		RESULTS = %TEXTR("左だよ/左、左/もっと左")%
	CASE "少し左"
		RESULTS = %TEXTR("稍微だけ左/まだ左かな")%
	CASE "結果"
		;-------------------------------------------------
		;終了後の一言
		;文字数制限はありません,汎用台詞もありません
		;TFLAG:193,
		;   -1=失敗
		;    0=成功
		;    1=大成功
		;    2=木刀で大成功（BOUNS点）
		;ARG
		;    0=正直者
		;    1=ウソつき
		;-------------------------------------------------
		SELECTCASE TFLAG:193
		CASE -1
			RESULTS = ざんね～ん
		CASE 0
			RESULTS = やったね！
		CASE 1
			RESULTS = すごーい！
		CASE 2
			RESULTS = すごい綺麗に割れた！
		ENDSELECT
	ENDSELECT
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【143】尤魔/M_KOJO_K143_イベント.ERB