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

;eraTheWorld proto4.07パッチ取り込み用 Ver1.13

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

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

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

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

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

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

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

;押し倒し禁止に1を入れると、自分から押し倒してこなくなります
;以下は恋慕かセフレがつくまで押し倒してこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:セフレ
;	CFLAG:X:押し倒し禁止 = 1
;ELSE
;	CFLAG:X:押し倒し禁止 = 0
;ENDIF

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

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

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K89
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
PRINTFORML
PRINTFORMW 「-인가---―！」
PRINTFORML
PRINTFORMW  %CALLNAME:MASTER%하지만 묘지의 근처를 산책하고 있으면(자), 어딘가에서와도 없고 사랑스러운 목소리가 들려 왔다……
PRINTFORMW 「여기는 너희 인간이 접근해도 좋은 장소는 아니다！즉각 떠날 수 있는 있고！」
PRINTFORMW  그늘로부터 나타난 그 소녀는 부자연스럽게 편히 쉬고 있어 어딘가 움직임 그림의 기법 여기 없다.
PRINTFORML
PRINTFORMW 「우리는 여기를 지키는 전사（콜시）이다！」
PRINTFORMW 「아무래도 먼저 간다고 한다면, 한입설등키라고로부터로 해라―！」
PRINTFORML
PRINTFORMW  콜시. 중국에 전해지는 움직이는 시체이다.
PRINTFORMW  %CALLNAME:MASTER%와 콜시 소녀－미야코 방향과의 만남은 이와 같이 시작된 것에서 만났다……
PRINTFORML
PRINTFORMW 「……응？이 먼저 용무가 있는 것이 아닌거야？습관인가. 너는 누구다？」
PRINTFORML
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K89_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	PRINTFORML 「응」
	PRINTFORMW  데이트를 끝내고 귀로에 들려고 했는데, 방향에 불러 세울 수 있었다……
	PRINTFORML
	PRINTFORMW 「%마스터는%, 나 더럽다고 생각할까？좀비는 싫다？」
	PRINTFORML
	PRINTFORMW  불안인 표정으로 그렇게 묻는 방향.
	PRINTFORMW  갑자기 왜일까？어딘가 방향의 모습이 이상하다……
	PRINTFORMW  하지만 물론, 대답은 정해져 있다……
	PRINTFORML
	PRINTFORMW 「……네에에에에. 그런가. 좀비라도 좋은가」
	PRINTFORMW 「이라면……」
	PRINTFORML
	PRINTFORMW  갑자기,%CALLNAME:MASTER%의 입술에 무엇인가 좋은 향기의 물건이 겹쳤다……
	PRINTFORML
	PRINTFORMW 「……좀비―, (이)다. 이것으로 너도 우리의 동참이다」
	PRINTFORMW 「……아니, 나의, 나 동료다. 알았는지？」
	PRINTFORML
	PRINTFORMW  피가 다니지 않는 피부를 마음 탓인지다홍색구 물들여 웃는 방향.
	PRINTFORMW  그대로, 기분인 모습으로 묘지로 돌아와 갔다……
	PRINTFORMW
	PRINTFORMW  물론, 그날 밤부터 새벽녘까지%CALLNAME:MASTER%하지만 일시적으로 콜시화한 것은 말할 필요도 없다.
	;キスをキャンセルしたい場合は以下を開放
	;TCVAR:키스캔슬 = 1
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K89_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に受けるかどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K89_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K89_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「물고기(생선)―, 개-응에-는―」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「그러면----―」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラとデート中に遭遇した
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K89_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_K89_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;軽く会釈して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	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_K89_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきたキャラ（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;る～ことが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;その他（キャラ指定なし
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K89_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_K89_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

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

;==================================================
;パンツ没収された
;==================================================
@M_KOJO_EVENT_K89_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_K89_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

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

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

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K89_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_K89_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_K89_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

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

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

;==================================================
;添い寝する
;==================================================
@M_KOJO_EVENT_K89_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_K89_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精ピルなし
		IF ARG:1 == 1
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K89_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K89_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K89_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K89_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「%CALLNAME:MASTER%,%CALLNAME:MASTER%,%CALLNAME:MASTER%……」
		PRINTFORMW 「곤란하군, 머릿속이 저녀석으로 가득하구나」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「네-와%CALLNAME:MASTER%. 그래,%CALLNAME:MASTER%……」
		PRINTFORMW 「은은. 저녀석의 이름은, 완벽하게 기억한, 」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K89_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_K89_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_K89_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_K89_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_K89_26(ARG,ARG:1)

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

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

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K89_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_K89_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_K89_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_K89_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:딸딸이들킴で分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文をデフォルトのものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K89_ONABARE_1(ARG)
;-------------------------------------------------
:구상색を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K89

IF ARG
	PRINTFORML A만지작거리고 있는 경우
ELSE
	PRINTFORML V만지작거리고 있는 경우
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文をデフォルトのものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K89_ONABARE_2(ARG)
;-------------------------------------------------
:구상색を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K89

IF ARG
	PRINTFORML A만지작거리고 있는 경우
ELSE
	PRINTFORML V만지작거리고 있는 경우
ENDIF
;-------------------------------------------------
[SKIPEND]

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

:구상색を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K89

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ고문
	CASE 2
		PRINTFORML Ｂ고문
	CASE 3
		PRINTFORML Ｍ고문
ENDSELECT

IF 本番はどっちか
	PRINTFORML A그리고 실전
ELSE
	PRINTFORML V그리고 실전
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;処女・無自覚非処女に挿入する直前の口上
;RETURN 1するとコマンドをキャンセルします
;RETURN 0なら通します
;CFLAG:파과캔슬구상있음がオンになってないと読み込まれないので注意
;-------------------------------------------------
@M_KOJO_EVENT_K89_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:구상내껴안기판정_첫회がオンになっている場合のみ有効。
;初めて押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（デート帰りキスなど）を見るまでうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K89_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:구상내껴안기판정_통상がオンになっている場合のみ有効。
;合意付きで押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常通り成功させます。
;合意があっても何らかの理由でうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K89_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

path: ERB/대사_메시지관련/개인대사/089 요시카/M_KOJO_K89_イベント.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:반발각인(3以上=会話不能)(4以上はバグ
;TCVAR:만취(1=通常成功or大失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_300
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_300
;コマンド共通メッセージ(TRAIN_MESSAGE)
;削除すると「～話をした。」とかが消えます。また、削除した場合は自動で口上色が付きません。
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K89_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:연모
		A = RAND:3
		IF A == 0
			PRINTFORMW 「%CALLNAME:MASTER%～♪%CALLNAME:MASTER%～♪너는, 나의 것이다～…♪」
			PRINTFORMW  방향은%CALLNAME:MASTER%에 물어 뜯어 멀어지려고 하지 않는다……
		ELSEIF A == 1
			PRINTFORMW 「그렇다, 사랑……사랑의, 노래다. 너는 알고 있어？」
			PRINTFORMW 「옛날……불렀던 것 같은 생각이 들지 말아라. 언제, 였는지……」
			PRINTFORMW  방향의 지폐가 벗겨져 가고 있다……
		ELSE
			PRINTFORMW 「우리의 사명은 사당을 지키는 것！귀 나무 그분을 수호하는 것이다가……」
			PRINTFORMW 「……정직, 너와 이야기하고 있는 (분)편이 즐거워―. 묘지 생활은 지루하다」
			PRINTFORMW  방향은 다 굳어진 표정관계로 어색한 억지 웃음을 지었다……
		ENDIF
	ELSEIF TALENT:사모
		A = RAND:3
		IF A == 0
			PRINTFORMW 「-―,%CALLNAME:MASTER%(이)다―」
			PRINTFORMW  방향은 카치코치의 몸으로%CALLNAME:MASTER%에 안아 도착해 왔다……
		ELSEIF A == 1
			PRINTFORMW 「좀비는 영구히 불멸입니다！너는 누구다？」
			PRINTFORMW 「……아！%CALLNAME:MASTER%！너는%CALLNAME:MASTER%인가！이제 기억해 왔어―！」
			PRINTFORMW  방향응 날아 뛰고 기쁜 듯하다……
		ELSE
			PRINTFORMW 「은은, 하하하, 는.%마스터는%, 이야기를 아는 녀석이다」
			PRINTFORMW  방향이라는 말의 좃치보르에도 많이 익숙해져 온 것 같다……
		ENDIF
	ELSEIF CFLAG:호감도 > 1000
		A = RAND:3
		IF A == 0
			PRINTFORMW 「응,%CALLNAME:MASTER%,%CALLNAME:MASTER%,%CALLNAME:MASTER%……」
			PRINTFORMW 「소리에 내 반복하면(자) 기억한다 라고 (들)물었던 것이다.%CALLNAME:MASTER%,%CALLNAME:MASTER%,%CALLNAME:MASTER%……」
			PRINTFORMW 「어？%CALLNAME:MASTER%,%CALLNAME:MASTER%라는 누구던가」
		ELSEIF A == 1
			PRINTFORMW 「청아, 님에게 부탁해 뇌된장, 을 포병네라고…받을 수 있도록(듯이) 부탁했지만」
			PRINTFORMW 「뇌를 바꾸니 너도 잊는 것 같은데. 말해져 보면 그렇다」
			PRINTFORMW  말해지는 전부터 알고 있으면 좋겠다……
		ELSE
			PRINTFORMW 「봄 가면……야나기의 것을 도깨비도…………」
			PRINTFORMW 「……？？뭐야？나, 지금무슨 말했는지？」
		ENDIF
	ELSEIF CFLAG:호감도 > 500
		A = RAND:3
		IF A == 0
			PRINTFORMW 「%CALLNAME:MASTER%-. 배 고프다―」
			PRINTFORMW 방향은이 자아글자와%CALLNAME:MASTER%(을)를 감 씹어 했다……
		ELSEIF A == 1
			PRINTFORMW 「조, 조, 좀비 대폭증～목덜미1씹어 낯익은 사이～」
			PRINTFORMW  방향이 재수없는 노래를 부르고 있다……
		ELSE
			PRINTFORMW 「 나는, 세균 기억력이 좋다……너와 이야기한 것, 분명하게 기억하고 있다」
			PRINTFORMW 「확실히 어제는……무슨이야기를 한 거지？너는 누구다？」
		ENDIF
	ELSEIF CFLAG:호감도 > 300
		A = RAND:3
		IF A == 0
			PRINTFORMW 「,%CALLNAME:MASTER%！너는%CALLNAME:MASTER%(이)다！나는 누구다？」
			PRINTFORMW  방향의 구시대CPU두뇌는 일인분의 이름을 기억하므로 힘껏같다……
		ELSEIF A == 1
			PRINTFORMW 「이군요--있고―. 그런데--있고-―. 영구의 잠에, 오르는게  좋다！！」
			PRINTFORMW 「20때가 되면 일으켜. 드리후 봐」
			PRINTFORMW  회화의 한중간에도 불구하고 방향은 깊이 잠들어 버렸다……
		ELSE
			PRINTFORMW 「 나, 좋은 냄새……이겠지. 다른 우리와 달라, 나는 분명하게 피부의 케어를 빠뜨리지 않는 것이다」
			PRINTFORMW 「어머, 냄새 맡을 수 있는 냄새 맡아라. 후레그란스로……쿠레보얀스인, 죽음의 , 향기다！」
			PRINTFORMW  방향의 몸으로부터는 의외롭게도 소녀 특유가 좋은 향기가 났다……
		ENDIF
	ELSEIF CFLAG:호감도 > 100
		A = RAND:3
		IF A == 0
			PRINTFORMW 「……, 앞.%CALLNAME:MASTER%……(이)던가？이것 서로 나오고 있어？」
			PRINTFORMW  그렇다, 라고 전하면(자) 방향은 기쁜듯이 웃었다……
		ELSEIF A == 1
			PRINTFORMW 「너도 콜시가 될까. 되어 우리의 동참을 한다」
			PRINTFORMW 「콜시는 좋아. 죽지 않고, 죽지 않는다. 죽는 것은 안돼」
		ELSE
			PRINTFORMW 「-―……등, 죽, 죽, 말 말……―☆……」
			PRINTFORMW  무엇인가가 잘못되어 있다……
		ENDIF
	ELSE
		A = RAND:3
		IF A == 0
			PRINTFORMW 「물고기(생선)―……우리는 용감한…전사！ 너는 누구다？」
			PRINTFORMW  회화가 성립되지 않는다……
		ELSEIF A == 1
			PRINTFORMW 「에, 에, 인간……설도 참 맛있습니다, 인가？」
			PRINTFORMW  맛있지 않아라고 전하면(자) 방향은 외면했다……
		ELSE
			PRINTFORMW 「어？너 어디선가 본 적이 있을 생각이……하지 않지도…없는 것도 아닌 것도 아니지도……」
			PRINTFORMW  방향의 부패CPU하지만 오버플로우를 일으켰다……
		ENDIF
ENDIF
ENDIF
RETURN 1
;==================================================
;301,お茶を淹れる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_301
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功

@M_KOJO_MESSAGE_COM_K89_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_301_1
RETURN RESULT

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

		PRINTFORMW 「차, 다 묻는다！？좀비는 식사를 하지 않습니다！」
		PRINTFORMW 방향은 차를 한입으로 다 마셔 버렸다……

ENDIF
RETURN 1
;==================================================
;302,スキンシップ
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_302
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
IF TALENT:사모
		A = RAND:7
		IF A == 0
			PRINTFORMW 「가슴을 크게 벌어져 허리를280°굽히는 운동- 씨는-있고」
			PRINTFORMW  방향과 레이디오 체조를 해 놀았다……
		ELSEIF A == 1
			PRINTFORMW 「 나의 손톱에는, 손대지 마……？」
			PRINTFORMW 「잘못해 회 하면(자)……매우 아프다！！」
			PRINTFORMW  방향은 아주 진지하게 어리석은 것을 말한다……
		ELSEIF A == 2
			PRINTFORMW  방향에 길들어 모이를 먹게 될 수 있는 하며 보냈다……
			PRINTFORMW 「,？각설탕인가？각설탕이다！좀 더！도-와！！」
		ELSEIF A == 3
			PRINTFORMW  방향이 몸을 맡겨 온다……
			PRINTFORMW 「,. 좀비에게 손대면(자), 너도 좀비다」
			PRINTFORMW  %CALLNAME:MASTER%와의 포고합겉껍데기 즐거운 것인지, 방향은 전신을 소매치기 소매치기와 칠해 온다……
		ELSEIF A == 4
			PRINTFORMW 「존비크이즈 제2문！！좀비에게 있는 것-응이다」
			PRINTFORMW 「①！식욕！！②！성욕！！③！수면욕구！！」
			PRINTFORMW 「정답은……전부, 전부다―！」
			PRINTFORMW  방향은%CALLNAME:MASTER%에 장난하고 따라 왔다……
		ELSEIF A == 5
			PRINTFORMW  %마스터는% 방향에 유연 체조를 베풀었다……
			PRINTFORMW 「아―……나, 이것 좋아……(이)다―…………」
		ELSEIF A == 6
			PRINTFORMW 「날름날름……날름날름…………사람의 맛……」
			PRINTFORMW  방향은%CALLNAME:MASTER%의 허벅지를 빨고 돌리고 있다……
		ELSE
			PRINTFORMW 「……,%마스터는%, 따뜻한데. 쭉, 이렇게 하고 있어 주어도 괜찮은, 」
			PRINTFORMW  방향이%CALLNAME:MASTER%에 기대고 걸려 온다……
		ENDIF
	ELSEIF CFLAG:호감도 > 300
		A = RAND:7
		IF A == 0
			PRINTFORMW 「%CALLNAME:MASTER%의 손은, 따뜻한데. 우리의 손은, 죽고 있으니 차갑다」
			PRINTFORMW 「하지만, 손이 차가운 분심은 따뜻하다……？심장은 멈추어 있지만……」
		ELSEIF A == 1
			PRINTFORMW 「지폐, 지폐는, 나다. 벗기면, 안된다……―」
			PRINTFORMW  방향의 지폐에 손대면(자) 미움 받았다……
		ELSEIF A == 2
			PRINTFORMW 「--.%CALLNAME:MASTER%, 무엇인가, 책은 없는 것인지―」
			PRINTFORMW 「 나는, 독서를 좋아했다……생각이 든다. 이 신체는, 읽을 수 없는 것이다」
			PRINTFORMW  방향에 읽어 들려주고를 하며 보냈다……
		ELSEIF A == 3
			PRINTFORMW 「두어%CALLNAME:MASTER%. 좋은 진한 있고 개 해라」
			PRINTFORMW 「청아, 님은 언제나 해 주겠어. 좋은 개, 좋은 개다」
			PRINTFORMW  머리를 쓰다듬고 있고 하면(자), 방향은 행복하게 신음소리를 냈다……
		ELSEIF A == 4
			PRINTFORMW  방향의 신체를 닦아라고 보았다……
			PRINTFORMW 「……,. 나, 더럽지 않아―……」
			PRINTFORMW  몇분으로 하지 않는 동안에 손수건은 새까맣게 되어 버렸다……
		ELSEIF A == 5
			PRINTFORMW 「스킨십…(이)라면！？우리들에게 필요한 것은 이빨 킨십이다！」
			PRINTFORMW  방향은이 자아글자와%CALLNAME:MASTER%에 물어 뜯어 왔다……
		ELSEIF A == 6
			PRINTFORMW 「스, 킨십이라고 말해도……나의 신체는, 경, 고…치, 코치…(이)다」
			PRINTFORMW 「자, 유연 체조에서도, 해 줄까……」
			PRINTFORMW  방향의 등을 누를 때마다, 바키바키와 싫은 소리가 울었다……
		ELSE
			PRINTFORMW 「존비크이즈 제일문！너는, 지금부터, 어떻게 될까요―」
			PRINTFORMW 「①, 먹어진다―！②, 먹을 수 있다―！,③, 받아진다―！」
			PRINTFORMW  선택사항이 없다……
		ENDIF
	ELSE
		A = RAND:2
		IF A == 0
			PRINTFORMW 「……？뭐야？너도 메인트넌스를 하고 싶은 것인지？」
			PRINTFORMW  방향은 쿄톤으로 하고 있다……
		ELSE
			PRINTFORMW 「-―, 맛좋을 것 같은, 육, 육, 인육 고기……」
			PRINTFORMW  방향에 위험하게 물어 뜯어지는 곳(중)이었다……

		ENDIF
		ENDIF
ENDIF
RETURN 1
;==================================================
;303,謝る
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_303
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_303_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;304,仕事を手伝う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:도울수없다(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_SUCCESS_COM_K89_304
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =1

@M_KOJO_MESSAGE_COM_K89_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_304_1
RETURN RESULT

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

@M_KOJO_MESSAGE_COM_K89_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
PRINTFORMW 「무릎 베개……(이)다 묻는다！？」
PRINTFORMW 「무릎, 곡암 없어―. 각침이라도 좋다？」
ENDIF
RETURN 1
;==================================================
;306,お腹を撫でる
;TFLAG:193(1=ABL:친밀6以上かつ妊娠時 0=成功 -1=ABL:친밀5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K89_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	PRINTFORMW 「……점심이 내자」
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,頬をつまむ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:연모(受け入れつつ笑顔でやり返す
	;ABL:친밀(6以上=おずおずとやり返す
	;ABL:순종(5以上=されるがまま
;==================================================
@M_KOJO_SUCCESS_COM_K89_307
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗(注、抱きつきモード中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:수면
	;通常
	ELSE
	PRINTFORMW 「--」
	PRINTFORMW 「설은 할까, 나쁜 손가락째」
	ENDIF

ENDIF
RETURN 1
;==================================================
;308,頬をつつく
;添い寝中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_308
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗(注、抱きつきモード中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;睡眠中
	IF CFLAG:수면
	;通常
	ELSE
	PRINTFORMW 「」
	PRINTFORMW 「이나-째--―」
	ENDIF

ENDIF
RETURN 1
;==================================================
;309,頭を撫でる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:친밀(6以上=通常成功時分岐
;==================================================
@M_KOJO_SUCCESS_COM_K89_309
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗(注、抱きつきモード中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:수면
	;通常
	ELSE
	PRINTFORMW 「―, 좋은 진한 있고 옛 노래？」
	PRINTFORMW 「 나는 좋은 옛 노래？너는 누구다？」
	ENDIF

ENDIF
RETURN 1
;==================================================
;331,お茶を淹れる（薬入り）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_331
;成否判定
;TFLAG:192(-2=強制失敗(注、非コマンド終了）、-1＝強制失敗、0=COM依存、1=強制成功or大成功(注、睡眠薬アイスティーは眠気を感じていると飲まない)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_331_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;332,お酒をふるまう
;TFLAG:193(0=下戸飲み成功 -1=下戸飲み失敗 -2=下戸飲み大失敗 -5=下戸飲みあきらめ)
;TFLAG:194(51=どぶろく 52=清酒 53=鬼殺し)
;ALCOHOL_TASTE(TFLAG:194)(15以上=気に入る 9以下=口に合わない)
;==================================================
@M_KOJO_MESSAGE_COM_K89_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_332_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;333,愚痴を聞く
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_333
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3
		;大成功
		CASE 2
		;成功
		CASE 1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,杯を交わす
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:임신자각상태(1=食事)
;TALENT:술내성(-2=食事)
;==================================================
@M_KOJO_SUCCESS_COM_K89_334
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;335,介抱する
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_335
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕する
;ABL:친밀(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:무릎베개)(44以下=失敗
;==================================================
@M_KOJO_SUCCESS_COM_K89_336
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_336_1
RETURN RESULT

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

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

ENDIF
RETURN 1
;==================================================
;351,連れ出す
;==================================================
@M_KOJO_MESSAGE_COM_K89_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K89_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:동행 == 60
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
		PRINTFORMW 「함께 나가자……(이)라면―！？」
		PRINTFORMW 「무엇을 바보같은, 나에게는 중요한 사명이……사명……」
		PRINTFORMW 「…………던가？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白する
;FLAG:생활능력무(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_352
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_352_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;353,イタズラする
;FLAG:생활능력무(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K89_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_353_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;354,添い寝する（相手は起きて布団に招く感じ）
;CFLAG:쇠약(1以上=起きない
;CFLAG:초대(0以外=起きない
;==================================================
@M_KOJO_MESSAGE_COM_K89_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_354_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;360,身を任せる
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=スカートの中を見せる 53=パイズリ 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅきホールド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K89_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_360_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;361,抵抗する
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=スカートの中を見せる 53=パイズリ 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅきホールド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K89_361
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_361_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;363,読み聞かせ（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:동침중(1=布団orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_SUCCESS_COM_K89_363
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_363_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;364,豆まき(萃香、勇儀、スカーレット姉妹用
;TFLAG:193(豆まきに参加してる人数
;==================================================
@M_KOJO_MESSAGE_COM_K89_364
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_364_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:수면(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K89_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_403_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;405,出掛ける(同行時デート
;条件が厄介なので、COMF405 出掛ける.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K89_405
;出掛けるにTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K89_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGETとデート
	IF CFLAG:동행
		IF FIRSTTIME(SELECTCOM)
			PRINTFORMW 「뭐야와？나와 데이트를 하고 싶은이라면！？」
			PRINTFORMW 「…………………………」
			PRINTFORMW 「뭐, 있고 인가. 폐문시간까지는 돌아가자」
			PRINTFORMW  방향은 팍과 밝은 웃는 얼굴을 보였다……
		ELSE
		IF DATENAME_PLACE() == "하쿠레이 신사"
			PRINTFORMW 「물고기(생선)―, 신사에는 무서운 무녀가 있겠어―」
			PRINTFORMW 「너, 무녀와 친구인가？하지 말아라―」
		ELSEIF DATENAME_PLACE() == "명련사"
			PRINTFORMW 「비구니, 비구니의 고기를 먹으면 불로 불사가 될 수 있다…응이라고」
			PRINTFORMW 「%CALLNAME:MASTER%, 먹으면？죽는 것은 정말로 괴로워―」
		ELSEIF DATENAME_PLACE() == "인간마을"
			PRINTFORMW 「마을에서 좀비 패닉？」
			PRINTFORMW 「-오뷔페의 시간이다―！」
			PRINTFORMW  방향은 의욕에 넘쳐 있다……
		ELSEIF DATENAME_PLACE() == "안개의호수~홍마관"
			PRINTFORMW 「%CALLNAME:MASTER%쉿이라고 있는지, 흡혈귀에게 물리면(자) 시생인이 되는 것이야」
			PRINTFORMW  좀비와는 비슷하면서도 다른 것인것 같다……
		ELSEIF DATENAME_PLACE() == "미혹의 죽림"
			PRINTFORMW 「,―……타케바야시의 놈등은, 인간의 버릇에 죽지 않아」
			PRINTFORMW 「%CALLNAME:MASTER%도, 불사의 비결. 가르쳐 주어라―……」
		ELSEIF DATENAME_PLACE() == "마법의 숲"
			PRINTFORMW 「버섯……버섯 사냥의 좀비 우먼？뭐그것 먹을 수 있어？」
			PRINTFORMW  방향은 가부끼 같아 보인 포즈를 하고 있다……
		ELSEIF DATENAME_PLACE() == "삼도천~명계"
			PRINTFORMW 「있고-나-다―！！아직 성불은 하고 싶고 없다―！！」
			PRINTFORMW  타들을 빚는 방향에 정화되러 가는 것은 아니다고 설명했다……
		ELSEIF DATENAME_PLACE() == "요괴의 산(산록)"
			PRINTFORMW 「산……산을 보면(자) 무엇인가, 부르고 싶은 기분이 되지 말아라―」
			PRINTFORMW 「 그렇지만 무엇을 부르면 말해 던가？생각해 낼 수 없는데」
		ELSEIF DATENAME_PLACE() == "요괴의 산(산정)"
			PRINTFORMW 「등산인가―. 좀비 피크닉인가―」
			PRINTFORMW 「헤매면(자) 꼭대기를 목표로 하는 것이야―？내리면 좀비의 먹이다！」
		ELSEIF DATENAME_PLACE() == "지저"
			PRINTFORMW 「싫지-싫지-지옥에는행 묻는데-있고―」
			PRINTFORMW 「……이상한 고양이가 내가 아닌 나와 말한다. 저것은 불안하게 된다」
		ELSEIF DATENAME_PLACE() == "꿈의 세계~달"
			PRINTFORMW 「츠키에 가는이라면！？츠키까지 가 떡을 먹는 것인가―！」
			PRINTFORMW 「응떡떡―♪떡도―♪」
			PRINTFORMW 방향은 기분이 들떠소 뛰어 하고 있다……
		ENDIF
ENDIF
ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:현재위치)(野外掃除（冬は雪かき
;==================================================
@M_KOJO_MESSAGE_COM_K89_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		PRINTFORMW 「청소, 청소……좀비의 손은 히개 같습니까？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K89_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW 「네-싫다―」
	PRINTFORMW 「잘못해 죽여 버렸다들 싫구나. 정말로 괜찮은가？」
	PRINTFORMW 방향은 꽤 손대중을 하려고 노력하고 있는 것 같다……
ENDIF
RETURN 1
;==================================================
;412,勉強
;ABL:교양(ABL:MASTER:교양より大=MASTERが教えてもらう ABL:MASTER:교양より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K89_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW 「살아 있는 것의 훌륭함은 뇌된장의 새로움이다―」
	PRINTFORMW 「 나, 너, 식. 식은 두뇌 파워 손에 넣는,！」
ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=デザート 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K89_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;414,食事を取る
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:194(1=ノーパンしゃぶしゃぶ 2=禁断のメニュー 31=ドーピングコンソメスープ 30=モッツァレラチーズとトマトのサラダ 34=ギンギー料理
;TCVAR:MASTER:308(bit0=濃い味 bit1=薄味 bit3=激辛 bit4=激甘 bit5=わさび bit6=激酸っぱ
;==================================================
@M_KOJO_SUCCESS_COM_K89_414
;成否判定
;TFLAG:192(-2=コマンド終了(非TARGET時強制失敗)、-1＝強制失敗、0=COM依存(非TARGET時強制成功)、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_414_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;415,食事をふるまう
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=濃い味 bit1=薄味 bit3=激辛 bit4=激甘 bit5=わさび bit6=激酸っぱ
;==================================================
@M_KOJO_SUCCESS_COM_K89_415
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_415_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;416,演奏する
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:사용악기(1=キーボード 2=ピアノ 3=ギター 4=トランペット 5=ヴァイオリン)
;==================================================
@M_KOJO_SUCCESS_COM_K89_416
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_416_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;417,昼寝をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔にキスされた 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処orペニス揉み
;CFLAG:동침중(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K89_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_417_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

;==================================================
;422～430は、特殊コマンドなのでテンプレでは対応しません
;==================================================

;==================================================
;431,お風呂でくつろぐ
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;TFLAG:194(1=連続入浴不可(表示しない可能性あり？
;==================================================
@M_KOJO_MESSAGE_COM_K89_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_431_1
RETURN RESULT

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

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

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

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

@M_KOJO_MESSAGE_COM_K89_436_1
;==================================================
;440,待つ
;==================================================
@M_KOJO_MESSAGE_COM_K89_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_440_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;441,授業を受ける(慧音専用
;==================================================
@M_KOJO_MESSAGE_COM_K89_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_441_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;442,伐採する（未実装
;==================================================
@M_KOJO_MESSAGE_COM_K89_442
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_442_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;442以降のコマンドは、実行しても口上はおそらく表示されないのでテンプレでもスルー
;==================================================

;※※※※※※※※※※※※※※※※※※※※※※※※※
;デート系コマンド
;デート系口上は文字通り外出先で発生
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,デート会話
;==================================================
@M_KOJO_MESSAGE_COM_K89_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_600_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;601,デートスキンシップ
;==================================================
@M_KOJO_MESSAGE_COM_K89_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,デートキス
;==================================================
@M_KOJO_MESSAGE_COM_K89_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_602_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K89_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_603_1
RETURN RESULT

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

ENDIF
	PRINTFORMW 「손, 이라고……나, 손가락궤하 없다…………」
	PRINTFORMW %마스터는% 방향의 손가락을 상냥하게 감쌌다……
	PRINTFORMW 「……―♪」
RETURN 1

;==================================================
;604,散策する
;デート中の場合、CFLAG:현재위치に移動先の場所が既に入ってる
;==================================================
@M_KOJO_MESSAGE_COM_K89_604
;散策するにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K89_604_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;605,寄り道する
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_SUCCESS_COM_K89_605
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_605
;寄り道するにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K89_605_1
RETURN RESULT

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

	PRINTFORMW 「%CALLNAME:MASTER%, 기다려라―！맛있을 것 같은 가게를, 발견이다―！」
	PRINTFORMW 방향은 길가의 가게의 기둥에 설붙어 있다……
ENDIF
RETURN 1

;==================================================
;610,食事に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K89_610
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_610_1
RETURN RESULT

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

ENDIF
	PRINTFORMW 「밥？」
	PRINTFORMW 「먹을 수 있는 것은 뭐든지 먹겠어―」
RETURN 1

;==================================================
;613,お金稼ぎする（オミットされました
;==================================================
@M_KOJO_SUCCESS_COM_K89_613
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K89_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_613_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;614,食材の買い出し
;TFLAG:193(1=購入＆デート経験アップ 0=購入 -1=非購入)
;==================================================
@M_KOJO_MESSAGE_COM_K89_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_614_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;615,お弁当を食べる
;実行可能場所　お地蔵通り,枝垂れ柳の下,霧の湖,玄武の沢,大蝦蟇の池,絶景の丘,山の湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:요리기능(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_MESSAGE_COM_K89_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_615_1
RETURN RESULT

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

PRINTFORMW 방향은 허겁지겁 무엇인가를 준비하면(자),%CALLNAME:MASTER%의 전에 슬라임과 같은 물체를 내몄다……
PRINTFORMW 「얻은 지 얼마 안되는 코가미 영혼이다―！사양하지 않아 좋으니까, 먹어라！」

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

@M_KOJO_MESSAGE_COM_K89_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K89_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW 「간식, 간식……♪」
ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_MESSAGE_COM_K89_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_618_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;621,釣りをする
;TFLAG:193(0=釣れない 1～4=魚 11～15=うまい魚 610=木材 131=守矢の守札 21=ローター 609=氷の鱗 606=龍の爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K89_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_621_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;698,部屋に入る
;TARGETの部屋に入る場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K89_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_698_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;699,外に出る
;==================================================
@M_KOJO_MESSAGE_COM_K89_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K89_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,耳かき
;前ターン膝枕後スキンシップコマンド
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_SUCCESS_SCOM_K89_60
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

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

ENDIF
RETURN 1
;==================================================
;61,抱きまくら
;(TARGET睡眠時間or衰弱)添い寝中、前ターン抱きつく後就寝コマンド
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K89_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K89_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K89_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;62,デコちゅー
;前ターン頭撫で後キスする
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:욕망(5以上=物足りない
;ABL:친밀(5以上=照れる
;==================================================
@M_KOJO_SUCCESS_SCOM_K89_62
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

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

ENDIF
RETURN 1
;==================================================
;63,もっとキスする
;前ターンキスする後キスする
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_SUCCESS_SCOM_K89_63
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K89_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K89_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K89_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,手を引く
;デート出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_SCOM_K89_80
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K89_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K89_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K89_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW 「-오―！히---―！」
ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/089 요시카/M_KOJO_K89_日常系コマンド.ERB

license: mit


code: ;깡통

path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_イベント_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_セクハラコマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_刻印取得_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_奉仕系コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_弾幕勝負.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_性交系コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_愛撫系コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_日常系コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_派生コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_絶頂_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_自慰系(あなた)コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_道具系コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_가학계커맨드.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_가학계커맨드_t.ERB


code:
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K90
;このままだと地の文が表示されません
;地の文を表示したい方は、下記のコメントアウトを削除して下さい
;CALL MARK_MESSAGE
;苦痛刻印
IF TFLAG:22 == 1
	PRINTFORMW
ELSEIF TFLAG:22 == 2
	PRINTFORMW
ELSEIF TFLAG:22 == 3
	PRINTFORMW
ENDIF

;時姦刻印
IF TFLAG:시간각인취득 == 1
	PRINTFORMW
ELSEIF TFLAG:시간각인취득 == 2
	PRINTFORMW
ELSEIF TFLAG:시간각인취득 == 3
	PRINTFORMW
ENDIF

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

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

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

path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_각인취득.ERB


path: ERB/대사_메시지관련/개인대사/090 청아/M_KOJO_K90_도구계커맨드.ERB