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

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;TCVAR:70:350	フキゲン,3だと謝っても許してくれない
;TCVAR:70:351	押し倒されたフラグ
;TCVAR:70:352	デート会話リセット用フラグ
;;TCVAR:70:353	嫉妬フキゲン※廃止
;TCVAR:70:354	今日お誘いしたか
;TCVAR:70:355	満足フラグ（TCVAR）
;TCVAR:70:356	オナバレ分岐
;TCVAR:70:357	連打防止
;TCVAR:70:358	小鈴の施し
;TCVAR:70:359	状況会話（bit）
;TCVAR:70:360	一日一回,bit
;	0=デート同行会話
;	1=仕事手伝いの一回目
;	2=今日の来店
;	3=遭遇挨拶（小鈴の部屋遭遇時のみ）
;	4=デート回数カウント用
;	5=おはよう挨拶
;TCVAR:70:361	会話：霊夢(1)
;TCVAR:70:362	会話：魔理沙(11)
;TCVAR:70:363	会話：紫(26)
;TCVAR:70:364	会話：文(29)
;TCVAR:70:365	会話：猯藏(69)
;TCVAR:70:366	会話：阿求(80)
;※廃止▼ここから▼
;TCVAR:70:371	お茶：霊夢(1)
;TCVAR:70:372	お茶：魔理沙(11)
;TCVAR:70:373	お茶：紫(26)
;TCVAR:70:374	お茶：文(29)
;TCVAR:70:375	お茶：猯藏(69)
;TCVAR:70:376	お茶：阿求(80)
;※廃止▲ここまで▲
;TCVAR:70:380	最初から不機嫌
;TCVAR:70:381	貰った贈り物日記(1=はずれ妖魔本,2=当たり妖魔本)
;TCVAR:70:382	[お酒をふるまう]用
;TCVAR:70:383	1=泥酔してた,2=発情してた
;CFLAG:70:1001	満足フラグ
;CFLAG:70:1002	最後に会った日
;CFLAG:70:1003	遭遇イベント
;CFLAG:70:1004	自己紹介
;CFLAG:70:1005	来店経験
;CFLAG:70:1006	うふふ口上※廃止してるけどフラグだけは残ってます
;CFLAG:70:1010	無自覚出産
;CFLAG:70:1011～1020	子供の性格
;CFLAG:70:1021～1030	親が分からない
;CFLAG:70:1051～1070	日記用,書き込んだ日
;CFLAG:70:1071	デート回数
;CFLAG:70:1072	ハロウィンでイタズラされた回数
;CFLAG:70:1073	ハロウィンでキスされた最後の年
;CFLAG:70:1074	贈り物を保存した回数
;CFLAG:70:1080	マイブーム種類
;CFLAG:70:1081	マイブーム残り日数
;CFLAG:70:1082	マイブーム話した回数

;CFLAG:70:1100	バージョン
;
;******************************************************************************
;■専用関数
;不機嫌判定
@M_KOJO_K70_FUKIGEN(ARG)
#FUNCTION
SIF TALENT:ARG:心情 == -1
	RETURNF 1
SIF CFLAG:ARG:ブチギレ
	RETURNF 1
SIF MARK:ARG:反発刻印 >= 3
	RETURNF 1
SIF TCVAR:ARG:350 >= 3
	RETURNF 1
RETURNF 0

;鈴奈庵判定
;1=鈴奈庵,2=自分部屋（引っ越した後も考慮）,3=部屋追い出し
@M_KOJO_K70_SUZUNAAN(ARG)
#FUNCTION
IF MAIN_MAP == 2
	IF ARG == P213鈴奈庵
		RETURNF 1
	ELSEIF ARG == P226小鈴私室
		;連れ出す関数ができてました＆特定条件で連れ出せるので対応しました
		IF COM_351_CONDITION(70)
			RETURNF 2
		;不法侵入,恋慕でも思慕でもなく阿求と一緒でもなく連れ出すこともできない,要するに時止めて侵入した（一応阿求と一緒に入って阿求が出て行くパターンもある）
		ELSEIF !TALENT:[[小鈴]]:恋慕 && !TALENT:[[小鈴]]:思慕 && CFLAG:MASTER:現在位置 != CFLAG:[[阿求]]:現在位置 && COM_351_CONDITION([[小鈴]]) == 0
			RETURNF 3
		ELSE
			RETURNF 2
		ENDIF
	ENDIF
ELSE
	IF ARG == 商家町
		RETURNF 1
	ELSEIF CFLAG:[[小鈴]]:現在位置 == OMANEKIBEYA() || CFLAG:[[小鈴]]:現在位置 == CFLAG:[[小鈴]]:初期位置
		RETURNF 2
	ENDIF
ENDIF

;危ない地域判定
@M_KOJO_K70_ABUNAAI(ARG)
#FUNCTION
SIF AT_HOME([[小鈴]]) && GROUPMATCH(MAIN_MAP, 3, 4, 5, 6, 7, 8, 9, 10)
	RETURNF 1

;分岐用のゲストキャラ判定
@M_KOJO_K70_GUEST(ARGS)
#DIM CHARA
;ARGS=呼び出したコマンド
;RESUTS=ゲストキャラの名前
;RESULT=分岐用の値
;RESULT:1=キャラ番号
;RESULTS:1=ゲストキャラの呼び方
;会話,お茶以外は一日一回を無視する（現在は日常愛撫のみ）
VARSET RESULT
VARSET RESULTS
;阿求(80)は最優先,RETURNは1で固定
IF CFLAG:[[阿求]]:現在位置 == CFLAG:[[小鈴]]:現在位置 && M_KOJO_K70_GUEST_ABLE([[阿求]])
	IF !GROUPMATCH(ARGS, "会話", "お茶") || !TCVAR:[[小鈴]]:(M_KOJO_K70_GUEST_TCVAR([[阿求]]))
		RESULTS = 阿求
		RESULTS:1 = 阿求
		RESULT:1 = [[阿求]]
		RETURN 1
	ENDIF
ENDIF
FOR LOCAL, 1, 10
	;霊夢(1)、魔理沙(11)、紫(26)、文(29)、猯藏(69)
	CHARA = TARGET:LOCAL
	IF GROUPMATCH(CHARA, [[霊夢]], [[魔理沙]], [[紫]], [[文]], [[猯藏]]) && M_KOJO_K70_GUEST_ABLE(CHARA)
		IF !GROUPMATCH(ARGS, "会話", "お茶") || !TCVAR:[[小鈴]]:(M_KOJO_K70_GUEST_TCVAR(CHARA))
			RESULTS = %CALLNAME:CHARA%
			RESULTS:1 = %CALLNAME:CHARA%さん
			RESULT:1 = CHARA
			;台詞を先に考えてたらよくわからん分岐になってしまった
			;恋慕の小鈴と同行中（デート含む）
			IF CFLAG:[[小鈴]]:同行 && TALENT:[[小鈴]]:恋慕
				RETURN 4
			;鈴奈庵でゲストと同行中
			ELSEIF CFLAG:CHARA:同行 && M_KOJO_K70_SUZUNAAN(CFLAG:[[小鈴]]:現在位置) == 1
				RETURN 3
			;ゲストとデート中
			ELSEIF CFLAG:CHARA:同行 && FLAG:约会的对象 == CHARA
				RETURN 2
			;恋慕のゲストと同行中
			ELSEIF CFLAG:CHARA:同行 && TALENT:CHARA:恋慕
				RETURN 2
			;小鈴が恋慕
			ELSEIF TALENT:[[小鈴]]:恋慕
				RETURN 4
			ELSE
				RETURN 1
			ENDIF
		ENDIF
	ENDIF
NEXT

;ゲストの可否判定,0なら無効
@M_KOJO_K70_GUEST_ABLE(ARG)
#FUNCTION
;睡眠中
SIF CFLAG:ARG:睡眠
	RETURNF 0
SIF CFLAG:[[小鈴]]:睡眠
	RETURNF 0
;添い寝中
SIF CFLAG:ARG:陪睡中
	RETURNF 0
SIF CFLAG:[[小鈴]]:陪睡中
	RETURNF 0
;浴場
SIF BATHCHECK(CFLAG:MASTER:現在位置)
	RETURNF 0
RETURNF 1

;ゲストキャラ変換用,360代のフラグを扱う
;会話とお茶を統合したので簡略化
@M_KOJO_K70_GUEST_TCVAR(ARG)
#FUNCTION
VARSET LOCAL
SELECTCASE ARG
CASE [[霊夢]]
	LOCAL = 361
CASE [[魔理沙]]
	LOCAL = 362
CASE [[紫]]
	LOCAL = 363
CASE [[文]]
	LOCAL = 364
CASE [[猯藏]]
	LOCAL = 365
CASE [[阿求]]
	LOCAL = 366
ENDSELECT
RETURNF LOCAL

;関係性比較関数,小鈴と阿求にしか使ってないけど一応汎用できるように
@M_KOJO_K70_BALANCE(ARG:1, ARG:2)
#FUNCTIONS
;ARG:1	主対象
;ARG:2	比較対象
IF TALENT:(ARG:1):恋人 && TALENT:(ARG:2):恋人
	RETURNF "信頼"
ELSEIF TALENT:(ARG:1):恋人
	RETURNF "独占"
ELSEIF TALENT:(ARG:2):恋人 && TALENT:(ARG:1):恋慕
	RETURNF "悲恋"
ELSEIF TALENT:(ARG:2):恋人
	RETURNF "揶揄"
ELSEIF TALENT:(ARG:1):恋慕 && (TALENT:(ARG:2):恋慕 || TALENT:(ARG:2):思慕) && CFLAG:(ARG:1):信賴度> 1500
	RETURNF "信頼"
ELSEIF TALENT:(ARG:1):恋慕 && (TALENT:(ARG:2):恋慕 || TALENT:(ARG:2):思慕)
	RETURNF "敵対"
ELSEIF TALENT:(ARG:1):恋慕
	RETURNF "恋慕"
ELSEIF TALENT:(ARG:2):恋慕
	RETURNF "応援"
ELSE
	RETURNF "平穏"
ENDIF

;挨拶
@M_KOJO_K70_AISATSU()
#FUNCTIONS
SELECTCASE TIME
CASE 240 TO 599
	RETURNF "早上好"
CASE 600 TO 1079
	RETURNF "你好"
CASEELSE
	RETURNF "晚上好"
ENDSELECT

;挨拶２
@M_KOJO_K70_OKAERI()
#FUNCTIONS
IF CFLAG:MASTER:初期位置 == CFLAG:70:初期位置
	RETURNF "欢迎回来！"
ELSE
	RETURNF @"%CALLNAME:MASTER%桑、欢迎！"
ENDIF

;マイブーム出力
@M_KOJO_K70_KOSUZUBOOM()
#FUNCTIONS
;種類数をここで設定
RESULT = 5
SELECTCASE CFLAG:[[小鈴]]:1080 % 10
CASE 1
	RETURNF "推理小説"
CASE 2
	RETURNF "恋愛小説"
CASE 3
	RETURNF "SF小説"
CASE 4
	RETURNF "幻想小説"
CASE 5
	RETURNF "漫画"
CASE 6
	;現在発生しません
	RETURNF "轻小说"
ENDSELECT

;部屋から追い出し
@M_KOJO_K70_KOSUZU_BURST
BASE:[[小鈴]]:憤怒 += MAXBASE:[[小鈴]]:憤怒
CALL M_KOJO_K70_YAMETEKUDASAI([[小鈴]], 8, 1)
CALL GETOUT(MASTER)

;付き添いゲストキャラ算出,分岐用と似てるけど扱いが異なるので注意,ゲストキャラ以外は空欄
@M_KOJO_K70_FOLLOWER
#FUNCTIONS
#DIM CHARA
;阿求(80)は最優先
SIF CFLAG:[[阿求]]:同行
	RETURNF "阿求"
;霊夢(1)、魔理沙(11)、紫(26)、文(29)、猯藏(69)
FOR LOCAL, 1, 20
	CHARA = TARGET:LOCAL
	SIF GROUPMATCH(CHARA, [[霊夢]], [[魔理沙]], [[紫]], [[文]], [[猯藏]], [[阿求]]) && CFLAG:CHARA:同行
		RETURNF CALLNAME:CHARA
NEXT
RETURNF ""

;反感をPALAMLVごと上げる処理,一応汎用性あり
@M_KOJO_K70_YAMETEKUDASAI(ARG, ARG:1, ARG:2)
;ARG	上げるキャラ
;ARG:1	上げるLV量
;ARG:2	0=CUP, 1=PALAM
;コマンド等の精算前ならCUPにすることでソースに表示されたり刻印取得に関わる,そうできない場合はPALAMを直接上げる
SIF ARG:1 <= 0
	RETURN
LOCAL = PALAMLV:(GETPALAMLV(PALAM:ARG:反感, 15) + ARG:1) - PALAMLV:(GETPALAMLV(PALAM:ARG:反感, 15))
;反感ゼロの時は最低でも+2する
SIF ARG:1 == 1 && GETPALAMLV(PALAM:ARG:反感, 15) == 0
	LOCAL = PALAMLV:2
IF ARG:2
	PALAM:ARG:反感 += LOCAL
ELSE
	CUP:ARG:反感 += LOCAL
ENDIF

;うふふ口上,以前のCFLAG:70:1006
@M_KOJO_K70_UFUFU
#FUNCTION
SIF TALENT:[[小鈴]]:恋慕 || TALENT:[[小鈴]]:愛欲 || TALENT:[[小鈴]]:炮友 >= 2
	RETURNF 1
SIF TCVAR:[[小鈴]]:発情
	RETURNF 1

;性交不慣れフラグ
@M_KOJO_K70_FUNARE
#FUNCTION
SIF EXP:[[小鈴]]:Ｖ性交経験 < 30
	RETURNF 1
SIF CFLAG:[[小鈴]]:允许无套 < 1
	RETURNF 1

;サドっ気小鈴ちゃん,一応汎用化
@M_KOJO_K70_SADISTIC(ARG)
#FUNCTION
SIF ABL:ARG:施虐属性 >= 3 && ABL:ARG:施虐属性 > ABL:ARG:受虐属性 + 1
	RETURNF 1

;画像表示用,小鈴専用
@M_KOJO_K70_画像表示(ARG, ARGS:1, ARGS:2)
CALL 画像セット(@"顔絵_服_%ARGS:1%_{[[小鈴]]}", 0, 0, 75, 0, 0, "", @"顔絵_%ARGS:1%")
SIF ARG
	CALL 画像セット(@"顔絵_服_%ARGS:2%_{ARG}", 0, 0, 75, 0, 0, "", @"顔絵_%ARGS:2%")
CALL 画像一斉表示("左", 0, 1)

;ランダム台詞,ARGS:1は語尾,ARGは回数（ARG+1回表示）
@M_KOJO_K70_AUTO(ARGS, ARGS:1, ARG)
#FUNCTIONS
VARSET LOCAL
VARSET LOCALS
WHILE LOCAL <= ARG
	SELECTCASE ARGS
	CASE "喘ぎ：小"
		SELECTCASE RAND:48
		CASE 1, 2, 3, 4
			LOCALS += "啊"
		CASE 5, 6, 7
			LOCALS += "啊啊"
		CASE 8, 9
			LOCALS += "啊啊"
		CASE 10, 11
			LOCALS += "啊啊"
		CASE 12, 13
			LOCALS += "啊啊"
		CASE 14, 15
			LOCALS += "啊啊"
		CASE 16
			LOCALS += "啊嘿"
		CASE 17
			LOCALS += "啊呼"
		CASE 18
			LOCALS += "哦哦"
		CASE 19, 20
			LOCALS += "咿呀"
		CASE 21
			LOCALS += "那里"
		CASE 22
			LOCALS += "不行"
		CASE 23, 24
			LOCALS += "哈呜"
		CASE 25
			LOCALS += "哈呼"
		CASE 26
			LOCALS += "哈哇"
		CASE 27
			LOCALS += "嘻呜"
		CASE 28, 29
			LOCALS += "嘻呀"
		CASE 30
			LOCALS += "嘻呀"
		CASE 31
			LOCALS += "嘻呀"
		CASE 32
			LOCALS += "呀"
		CASE 33
			LOCALS += "呀啊"
		CASE 34, 35, 36
			LOCALS += "嗯啊"
		CASE 37, 38
			LOCALS += "嗯啊"
		CASE 39
			LOCALS += "嗯呀"
		CASE 40, 41
			LOCALS += "ふえっ"
		CASE 42, 43, 44
			LOCALS += "嗯"
		CASE 45, 46
			LOCALS += "嗯嗯"
		CASE 47
			LOCALS += "嗯呀"
		CASEELSE
			LOCALS += "嗯呼"
		ENDSELECT
	CASE "喘ぎ：挿入"
		SELECTCASE RAND:58
		CASE 1, 2, 3, 4, 5
			LOCALS += "啊"
		CASE 6, 7, 8, 9, 10
			LOCALS += "啊啊"
		CASE 11, 12
			LOCALS += "啊啊"
		CASE 13, 14
			LOCALS += "啊啊"
		CASE 15, 16
			LOCALS += "啊啊啊"
		CASE 17
			LOCALS += "啊呜"
		CASE 18, 19
			LOCALS += "啊嘻"
		CASE 20
			LOCALS += "啊呼"
		CASE 21
			LOCALS += "哦哦"
		CASE 22
			LOCALS += "咿呀"
		CASE 23
			LOCALS += "イくぅっ"
		CASE 24
			LOCALS += "哦"
		CASE 25
			LOCALS += "哦呼"
		CASE 26
			LOCALS += "咿呀"
		CASE 27
			LOCALS += "くるっ"
		CASE 28
			LOCALS += "爱你"
		CASE 29
			LOCALS += "那里"
		CASE 30
			LOCALS += "不行"
		CASE 31
			LOCALS += "にゃうっ"
		CASE 31, 32
			LOCALS += "哈"
		CASE 33
			LOCALS += "哈啊"
		CASE 34
			LOCALS += "哈嘻"
		CASE 35
			LOCALS += "哈哇"
		CASE 36
			LOCALS += "ふあっ"
		CASE 37
			LOCALS += "深爱"
		CASE 38
			LOCALS += "哈啊"
		CASE 39
			LOCALS += "咿呀"
		CASE 40, 41
			LOCALS += "哈呜"
		CASE 42
			LOCALS += "呀"
		CASE 43
			LOCALS += "呀啊"
		CASE 44
			LOCALS += "らめぇっ"
		CASE 45, 46, 47, 48
			LOCALS += "嗯啊"
		CASE 49, 50, 51, 52
			LOCALS += "嗯"
		CASE 53
			LOCALS += "嗯库"
		CASE 54
			LOCALS += "嗯哈"
		CASEELSE
			LOCALS += "嗯嗯"
		ENDSELECT
	CASE "喘ぎ：急"
		SELECTCASE RAND:24
		CASE 1, 2, 3
			LOCALS += "呀呀"
		CASE 4, 5
			LOCALS += "咿呀"
		CASE 6, 7
			LOCALS += "哈呜"
		CASE 8
			LOCALS += "呼呀"
		CASE 9
			LOCALS += "呼呀"
		CASE 10, 11
			LOCALS += "呼呀"
		CASE 12, 13, 14, 15
			LOCALS += "呼呀"
		CASE 16
			LOCALS += "呀"
		CASE 17, 18, 19
			LOCALS += "咿呀"
		CASE 20
			LOCALS += "嗯"
		CASE 21, 22, 23
			LOCALS += "嗯啊"
		CASEELSE
			LOCALS += "嗯嘛"
		ENDSELECT
	CASE "喘ぎ：被虐"
		SELECTCASE RAND:19
		CASE 1, 2
			LOCALS += "啊咕"
		CASE 3
			LOCALS += "啊咕"
		CASE 4
			LOCALS += "咕呜"
		CASE 5
			LOCALS += "嗯咕"
		CASE 6
			LOCALS += "富圭"
		CASE 7, 8
			LOCALS += "嗯啊"
		CASE 9
			LOCALS += "嗯嗯"
		CASE 10
			LOCALS += "啊啊"
		CASE 11, 12
			LOCALS += "ふぁんっ"
		CASE 13
			LOCALS += "ふにぁっ"
		CASE 14, 15
			LOCALS += "嗯啊"
		CASE 16, 17
			LOCALS += "哈呜"
		CASE 18
			LOCALS += "咿呜"
		CASEELSE
			LOCALS += "嘻啊"
		ENDSELECT
	CASE "喘ぎ：冷静"
		SELECTCASE RAND:26
		CASE 1, 2, 3
			LOCALS += "啊哈"
		CASE 4
			LOCALS += "嗯哈"
		CASE 5, 6, 7, 8
			LOCALS += "哈"
		CASE 9
			LOCALS += "哈哈"
		CASE 10, 11
			LOCALS += "啊呼"
		CASE 12, 13
			LOCALS += "哈呼"
		CASE 14
			LOCALS += "呼"
		CASE 15
			LOCALS += "呼呼呼"
		CASE 16
			LOCALS += "嗯呼"
		CASE 17, 18
			LOCALS += "呼呼"
		CASE 19, 20
			LOCALS += "嗯呼"
		CASE 21, 22
			LOCALS += "嗯呼呼"
		CASE 23
			LOCALS += "诶嘿"
		CASE 24
			LOCALS += "诶嘿嘿"
		CASE 25
			LOCALS += "ふぇ"
		CASEELSE
			LOCALS += "ふぇぇ"
		ENDSELECT
	CASE "びっくり"
		SELECTCASE RAND:14
		CASE 1, 2
			LOCALS += "啊"
		CASE 3
			LOCALS += "啊啊"
		CASE 4, 5, 6
			LOCALS += "咿呀"
		CASE 7
			LOCALS += "咿呀啊"
		CASE 8
			LOCALS += "なっ"
		CASE 9
			LOCALS += "嘻呀"
		CASE 10
			LOCALS += "嘻呜"
		CASE 11, 12
			LOCALS += "嘻呀啊"
		CASEELSE
			LOCALS += "哇"
		ENDSELECT
	CASE "キス：前"
		SELECTCASE RAND:18
		CASE 1, 2, 3, 4
			LOCALS += "嘟"
		CASE 5, 6
			LOCALS += "啊姆"
		CASE 7
			LOCALS += "啊姆"
		CASE 8, 9
			LOCALS += "嘟"
		CASE 10, 11
			LOCALS += "嘟呀"
		CASE 12
			LOCALS += "嘟呀"
		CASE 13
			LOCALS += "嘟嘟"
		CASE 14, 15
			LOCALS += "哈姆"
		CASE 16
			LOCALS += "哈姆"
		CASEELSE
			LOCALS += "嗯嘟"
		ENDSELECT
	CASE "キス：後"
		SELECTCASE RAND:24
		CASE 1, 2
			LOCALS += "嘟扑"
		CASE 3
			LOCALS += "嘟扑啊"
		CASE 4, 5
			LOCALS += "嘟哺"
		CASE 6
			LOCALS += "嘟噜"
		CASE 7, 8
			LOCALS += "嘟噜噜"
		CASE 9, 10
			LOCALS += "啪"
		CASE 11
			LOCALS += "啪啊"
		CASE 12, 13
			LOCALS += "れろ"
		CASE 14, 15
			LOCALS += "れろぉ"
		CASE 16
			LOCALS += "れろれろ"
		CASE 17, 18
			LOCALS += "嗯嘟"
		CASE 19
			LOCALS += "嗯弗"
		CASE 20
			LOCALS += "嗯哺"
		CASE 21, 22
			LOCALS += "嗯姆"
		CASE 23
			LOCALS += "嗯姆嗯姆"
		CASEELSE
			LOCALS += "嗯哈啊"
		ENDSELECT
	CASE "母乳"
		SELECTCASE RAND:2
		CASE 1
			LOCALS += "胸部"
		CASEELSE
			LOCALS += "奶汁"
		ENDSELECT
	CASE "おくち：前"
		SELECTCASE RAND:12
		CASE 1, 2, 3
			LOCALS += "啊姆"
		CASE 4, 5
			LOCALS += "啾"
		CASE 6, 7
			LOCALS += "啾"
		CASE 8, 9, 10
			LOCALS += "嘿姆"
		CASEELSE
			LOCALS += "嗯啾"
		ENDSELECT
	CASE "おくち：中"
		SELECTCASE RAND:44
		CASE 1
			LOCALS += "舔舔"
		CASE 2
			LOCALS += "舐舐"
		CASE 3
			LOCALS += "啾啾"
		CASE 4
			LOCALS += "勒勒"
		CASE 5
			LOCALS += "勒勒勒"
		CASE 6, 7, 8, 9
			LOCALS += "咕"
		CASE 10
			LOCALS += "啃啾"
		CASE 11, 12
			LOCALS += "咕噗"
		CASE 13
			LOCALS += "咕嘣"
		CASE 14
			LOCALS += "啾"
		CASE 15
			LOCALS += "咚"
		CASE 16
			LOCALS += "啾噜"
		CASE 17
			LOCALS += "咚噜"
		CASE 18
			LOCALS += "咚噜噜"
		CASE 19
			LOCALS += "啾噗"
		CASE 20
			LOCALS += "咚噗"
		CASE 21
			LOCALS += "啾哭"
		CASE 22, 23, 24, 25, 26, 27, 28, 29
			LOCALS += "嗯"
		CASE 30, 31, 32, 33, 34, 35
			LOCALS += "嗯咕"
		CASE 36
			LOCALS += "嗯啾"
		CASE 37, 38, 39
			LOCALS += "嗯弗"
		CASE 40
			LOCALS += "嗯噗"
		CASEELSE
			LOCALS += "嗯嗯"
		ENDSELECT
		SIF !RAND:8
			LOCALS += "…"
	ENDSELECT
	LOCALS = %LOCALS + ARGS:1%
	LOCAL ++
WEND
RETURNF LOCALS
;******************************************************************************
;### 口上存在判定 ###################################
@M_KOJO_K70(ARG)
;別人版を作成する際はこのテンプレではなく別人版用口上テンプレをご利用ください

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

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

;性格傾向を真面目系にする
CFLAG:[[小鈴]]:性格傾向 = 4

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

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

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

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

;来訪不能に1を入れると、来訪してこなくなります
;以下は面識があるまで来訪してこなくなる使用例
;IF !CFLAG:X:面識
;	CFLAG:X:来訪不能 = 1
;ELSE
;	CFLAG:X:来訪不能 = 0
;ENDIF
CALL BAN_COMMON_IRAI([[小鈴]], 1)
CALL BAN_COMMON_IRAI([[小鈴]], 2)
CALL BAN_COMMON_IRAI([[小鈴]], 3)
CALL BAN_COMMON_IRAI([[小鈴]], 5)
CALL BAN_COMMON_IRAI([[小鈴]], 7)

;### 口上色判定 ###################################
@M_KOJO_COLOR_K70
;甚三紅（じんざもみ）っていうらしい
SETCOLOR 0xEE827C

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K70
#DIM VERSION
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります
VERSION = 200
;うふふ口上ON
SIF TALENT:70:恋慕 || TALENT:70:愛欲 || TALENT:70:炮友 >= 2
	CFLAG:70:1006 = 1
CALL M_KOJO_COLOR_K70
IF !TALENT:70:無接吻経験 || EXP:70:接吻経験
	SIF FIRSTTIME("初吻", 0, 70)
		PRINTFORML ・小鈴已经有过亲吻的经验了
ENDIF
IF EXP:70:精飲経験
	SIF FIRSTTIME("精液の味", 0, 70)
		PRINTFORML ・小鈴已经知道了精液的味道
ENDIF
RESETCOLOR
IF CFLAG:70:1100 == VERSION
	CALL M_KOJO_COLOR_K70
	PRINTFORML 最新バージョンです(ver.{CFLAG:70:1100 / 100}.{CFLAG:70:1100 % 100})
	RESETCOLOR
ELSE
	SIF !CFLAG:70:1002
		CFLAG:70:1002 = DAY
	IF !CFLAG:70:1004 && ABL:70:親密
		PRINTFORML 小鈴是否已经做过自我介绍？
		PRINTL [1] - 是
		PRINTL [0] - 否
		INPUT
		IF RESULT
			CFLAG:70:1004 = 1
			PRINTFORMW 自我介绍已经完成了
		ELSE
			PRINTFORMW 我想总有一天会做自我介绍的
		ENDIF
	ENDIF
	IF !CFLAG:70:1005 && ABL:70:親密
		PRINTFORML 小鈴是否已经在铃奈庵工作?
        PRINTL [1] - 是
        PRINTL [0] - 否
		INPUT
		IF RESULT
			PRINTFORML 来铃奈庵的次数是?(目前没有特别的意义)
            PRINTL [5] - 很多次
            PRINTL [3] - 适中
            PRINTL [1] - 几次
            PRINTL [0] - 还是算了
			INPUT
			CFLAG:70:1005 = ABL:70:親密 * LIMIT(RESULT, 0, 5)
		ENDIF
		PRINTFORMW 你的到店次数目前大约是 {CFLAG:70:1005} 次的样子
	ENDIF
	IF TALENT:70:酒耐性 != -1
		PRINTFORML 好的,可以加上[酒量很差]的设定吗?
        PRINTL [1] - 好的
        PRINTL [0] - 不要
		INPUT
		IF RESULT
			TALENT:70:酒耐性 = -1
			CALL M_KOJO_COLOR_K70
			PRINTFORMW 「あは♪」
			RESETCOLOR
		ELSE
			PRINTPLAIN [332]提供酒水时的说话会变得有点奇怪,请谅解。
			PRINTW
		ENDIF
	ENDIF
	IF RELATION:[[小鈴]]:[[阿求]] < 200 || RELATION:[[小鈴]]:[[霊夢]] < 120 || RELATION:[[小鈴]]:[[魔理沙]] < 120 || RELATION:[[小鈴]]:[[紫]] < 120 || RELATION:[[小鈴]]:[[文]] < 120 || RELATION:[[小鈴]]:[[猯藏]] < 150
		PRINTFORML 好的,您是否可以修改故事中相关人物之间的关系?
		PRINTL [1] - 可以
		PRINTL [0] - 不可以
		INPUT
		IF RESULT
			;めんどくさいので無駄多いけど80番まで回す
			FOR LOCAL, 1, [[阿求]] + 1
				IF GROUPMATCH(LOCAL, [[霊夢]], [[魔理沙]], [[紫]], [[文]], [[猯藏]], [[阿求]])
					PRINTFORM %CALLNAME:LOCAL, 12, LEFT%{RELATION:70:LOCAL, 3}\% →
					IF LOCAL == [[阿求]]
						RELATION:70:LOCAL = 200
					ELSEIF LOCAL == [[猯藏]]
						RELATION:70:LOCAL = 150
					ELSE
						RELATION:70:LOCAL = 120
					ENDIF
					PRINTFORML {RELATION:70:LOCAL, 3}\%
				ENDIF
			NEXT
			PRINTFORMW 以上变更完毕
		ELSE
			PRINTFORMW 不做改变
		ENDIF
	ENDIF
	CFLAG:70:1100 = VERSION
	CALL M_KOJO_COLOR_K70
	PRINTFORML UPDATE完成！(ver.{CFLAG:70:1100 / 100}.{CFLAG:70:1100 % 100})
	RESETCOLOR
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K70
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
CALL M_KOJO_K70_画像表示(0, "通常")
;小鈴バースト,最低の出会いですが辻褄合わせに……初期のイベントはごっちゃになる
IF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 3
	PRINTFORMW 「え……？ 誰……？」
	PRINTL
	PRINTFORMDL 和突然回来的房间主人四目相对！
	PRINTW
	PRINTFORMW 「哇、哇啊ーーーー啊啊啊！！！！！」
	CALL M_KOJO_K70_KOSUZU_BURST
;鈴奈庵
ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 1
	PRINTFORMW PRINTFORMW 「欢迎光临~!」
    PRINTFORMW (哎呀,是不认识的客人啊……)
    PRINTFORMW (看起来不像妖怪……)
    PRINTL
    PRINTFORMW 「那个,客人,可以听我说两句吗?」
    PRINTFORMW 「客人,这是第一次来我们店吧」
    PRINTFORMW 「该不会是想要试试我们新上的商品吧?」
    PRINTFORMW 「看起来不像是"人间之里"的人呢……」
    PRINTL
    PRINTFORMDL %CALLNAME:MASTER%简单地自我介绍了一下
    PRINTW
    IF MAIN_MAP == 2
        PRINTFORMW 「诶呀!真是失礼了……」
        PRINTFORMW 「嗯,嗯,我们店里其实也有非"人间人里"的客人来光顾的哦……」
        PRINTFORMW 「村里不常见的人总是让人警惕,真是对不起……」
        PRINTFORML 「话说回来,作为赔礼,也可以借给客人新商品试用看看哦」
        PRINTFORMW 「请多多关照我们店里的商品呐……」
    ELSE
        PRINTFORMW 「哦—原来是这样啊」
        PRINTFORMW 「没想到幻想乡里还有这样的人居住着呢」
        PRINTFORML 「啊,如果是住在村外的话,也可以试用新商品哦!」
        PRINTFORMW 「请多多关照我们店里的商品呐~」
    ENDIF
	;自己紹介
	CFLAG:70:1004 = 1
;危ない所
ELSEIF M_KOJO_K70_ABUNAAI(CFLAG:70:現在位置)
	PRINTFORMW 「啊,那个~……非常抱歉……」
	PRINTL
	PRINTFORMDL 被叫到的声音回头一看,是一个少女站在那里,一脸不安的样子
	PRINTW
	PRINTFORMW 「嗯……您是人类吧?」
	PRINTFORMW 「我来收回在郊外借出的书,不知不觉就迷路了……」
	PRINTFORMW 「有人在就表示这里应该安全吧……太好了~」
	PRINTFORMW 「啊!我叫本居小鈴！」
	PRINTFORMW 「我在村里经营借书店,如果方便的话请您顺道来坐坐呀！」
	;遭遇イベント
	CFLAG:70:1003 = 1
;それ以外,人里・寺・神社（外出先は神社と人里のみ）
ELSE
	PRINTFORMW 「%M_KOJO_K70_AISATSU()%ー」
	PRINTFORMW 「嗯……您看起来不是本地人呢」
	PRINTL
	PRINTFORMDL %CALLNAME:MASTER%简单地自我介绍了一下
	PRINTW
	PRINTFORMW 「啊,是这样啊」
	PRINTFORMW 「初次见面、我叫本居小鈴」
	PRINTFORMW 「我在村里经营借书店,如果您有空欢迎来坐坐呀！」
	;自己紹介
	CFLAG:70:1004 = 1
ENDIF
;最後にあった日
CFLAG:70:1002 = DAY
;一日一回
SETBIT TCVAR:70:360, 3
RETURN 1

@K70_BEFORETRAIN
;一日の開始時、正確には来訪判定時に読み込む関数
;ここでCFLAG:XX:翌日来訪を設定して確実に来訪させたりTCVAR:XX:発情で朝っぱらからサカらせることもできる
;ただし「毎朝例外なく読み込まれる」ため、条件を設定しておくことが望ましい

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K70_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTL
	PRINTFORMDL 小鈴从约会回来的路上,脚步变得慢了下来,回头一看她停下了脚步
	PRINTW
	IF TALENT:70:恋慕
		PRINTFORMW 「%CALLNAME:MASTER%さん、今天\@ TCVAR:70:354 ? 陪我 # 接受我的约会邀请 \@谢谢您」
		;デート回数3回以下
		IF CFLAG:[[小鈴]]:1071 <= 3
			PRINTFORMW 「我平时除了工作之外很少出去,所以这次非常新鲜又开心」
			PRINTFORMW 「但是一直由您带领着我,我觉得自己只是一个累赘……」
		ELSE
			PRINTFORMW 「我玩得很开心,但是一直由您带领着,我觉得自己只是一个累赘呢……」
		ENDIF
		PRINTFORMW 「所以,为了表达谢意,我想着要……要做点什么作为回报……」
		PRINTL
		PRINTFORMDL 小鈴这样说着,走上前来,抱住%CALLNAME:MASTER%的脖颈,将他拉向自己
		PRINTW
		PRINTW
		SETCOLOR 255, 100, 255
		PRINTFORML 啾…❤
		CALL M_KOJO_COLOR_K70
		PRINTW
		PRINTFORMW 「嘻嘻,终于可以回报您了……❤」
		IF FIRSTTIME("初吻")
			PRINTFORML （啊啊啊…亲亲了……我的初次……是给了%CALLNAME:MASTER%さんに……）
			PRINTFORMW （原来亲亲这么……甜蜜啊……❤）
			CSTR:70:ファーストキス喪失履歴 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%约会后鼓起勇气第一次告白给恋人%CALLNAME:MASTER%献出了初吻
		ENDIF
	ELSE
		PRINTFORMW 「%CALLNAME:MASTER%さん,今天真是谢谢您\@ TCVAR:70:354 ? 陪我约会 # 邀请我 \@」
        ;约会次数3次以下
        IF CFLAG:[[小鈴]]:1071 <= 3
            PRINTFORMW 「我平时除了工作之外很少外出,所以这次觉得特别新鲜激动呢」
            PRINTFORMW 「但是一直被您牵着走,我觉得自己只会拖累您……」
        ELSE
            PRINTFORMW 「我玩得很高兴,但一直被您带着走,我觉得自己只是累赘吧……」
        ENDIF
        PRINTFORMW 「我好像什么忙都帮不上……那个……」
        PRINTFORMW 「没、没有什么!所以,嗯,下次我会找机会回报您的……啊哈哈」
		TCVAR:70:中止接吻 = 1
		;日記を書く
		CALL M_KOJO_DIARYSETTING_K70(40)
	ENDIF
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K70_2(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に受けるかどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;初回
		IF FIRSTTIME("告白")
			PRINTL
            PRINTFORMDW 从约会回来的路上,小鈴的脚步变得慢了下来,然后停了下来
            PRINTFORMDL 这种时候的她一定在烦恼着什么
            PRINTFORMDL 想到这里,%CALLNAME:MASTER%满怀关心地正对着小鈴,慢慢地凝视着她
            PRINTW
            PRINTFORMW 「%CALLNAME:MASTER%さん……那个……」
            PRINTFORMW 「那个……我……嗯……」
            PRINTFORMW 「喜、喜欢您啊!我、我最喜欢%CALLNAME:MASTER%さん了!!」
            PRINTFORMW 「真、真心的!我最不想输给任何人,也最不想被任何人抢走!」
            PRINTFORMW 「%CALLNAME:MASTER%さん不在的时候……您和其他女孩说话的时候……」
            PRINTFORMW 「我的心就像被紧紧揪住一样……好痛苦……所以……」
            PRINTFORMW 「所以%CALLNAME:MASTER%さん!请成为我……只属于我一个人的恋人吧!」
        ELSE
			PRINTL
            PRINTFORMDW 从约会回来的路上,小鈴的脚步变得不稳
            PRINTFORMDL 心里明白,她似乎还没有放弃
            PRINTW
            PRINTFORMW 「%CALLNAME:MASTER%さん……我不行吗……?」
            PRINTFORMW 「虽然您总是这样和我约会……」
            PRINTFORMW 「我很开心……很开心啊……但还是觉得难过……」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;お断りしてない
		IF FIRSTTIME("返答")
			PRINTFORMW 「真、真的吗……?」
			PRINTFORMW 「呜、好高兴……太好了……」
			PRINTFORMW 「我一直很害怕被拒绝……」
			PRINTFORMW 「但我鼓起勇气说出来了……被%CALLNAME:MASTER%さん接受了……真的太好了……」
			;日記を書く
			CALL M_KOJO_DIARYSETTING_K70(43)
		;お断りしたことある
		ELSE
			PRINTFORMW 「诶……现在……怎么了……」
			PRINTFORMW 「真、真的吗……?可以、可以吗……?」
			PRINTFORMW 「呜,太高兴了……太好了……」
			PRINTFORMW 「我一直很担心会被讨厌……」
			PRINTFORMW 「但我没有放弃希望……被%CALLNAME:MASTER%さん接受了……真是太好了……」
			;日記を書く
			CALL M_KOJO_DIARYSETTING_K70(45)
		ENDIF
		PRINTFORML 「ふふ……❤ 从今以后,不知道会发生什么」
		PRINTFORMW 「要一直在一起哦♪ %CALLNAME:MASTER%さん❤」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;初めてのお断り
		IF FIRSTTIME("返答")
			PRINTFORMW 「是、是这样吗……」
			PRINTFORMW 「唔……没关系的……如果%CALLNAME:MASTER%さん这样说的话……」
			PRINTFORMW 「但我不会放弃的……!」
			PRINTFORMW 「总有一天,我会成为一个配得上%CALLNAME:MASTER%さん的女人……!」
			PRINTFORMW 「所以……呜……呜呃……」
			;日記を書く
			CALL M_KOJO_DIARYSETTING_K70(42)
		;お断り二回目以降
		ELSE
			PRINTFORMW 「…………不、我才是……对不起……」
			PRINTFORMW 「纠缠不休的女人会被讨厌的吧……」
			PRINTFORMW 「但是和%CALLNAME:MASTER%さん在一起的时候……会觉得难过……」
			PRINTFORMW 「%CALLNAME:MASTER%さん的温柔……让我觉得难过……」
			PRINTFORMW 「所以……呜……啊……」
		ENDIF
		;泣かせんなよ
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K70_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;ただいま
		IF CFLAG:[[小鈴]]:神社在住
			PRINTFORML 「我回来啦！」
		ELSE
			PRINTFORML 「辛苦了！」
		ENDIF
		IF BASE:[[小鈴]]:体力 < MAXBASE:[[小鈴]]:体力 / 2 || BASE:[[小鈴]]:気力 < MAXBASE:[[小鈴]]:気力 / 2
			PRINTFORMW 「呼ー…好累呀～」
		ELSEIF TIME >= CFLAG:[[小鈴]]:就寝時間 + 60
			PRINTFORMW 「呼～啊…、好想睡觉……」
		ELSEIF TIME_PROGRESS(TCVAR:[[小鈴]]:空腹時刻)
			PRINTFORMW 「肚子饿了～」
		ELSE
			;お誘いした
			IF TCVAR:70:354
				PRINTFORML 「今天陪我一起,真的很感谢您!」
            ELSE
                PRINTFORML 「今天玩得超开心的!」
			ENDIF
			IF TALENT:[[小鈴]]:恋慕
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「人里外世界真是刺激多多呢♪」
				CASE 2
					PRINTFORMW 「开心的时间总是过得飞快呢~」
				CASE 3
					PRINTFORMW 「还想再玩久一点啊~」
				CASEELSE
					IF TCVAR:70:354
						PRINTFORMW 「我们下次再一起出去吧♪」
					ELSE
						PRINTFORMW 「记得再邀请我哦♪」
					ENDIF
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「人里外的世界真是刺激多多呢♪」
				CASE 2
					PRINTFORMW 「走了那么多路,好累啊……」
				CASEELSE
					IF TCVAR:70:354
						PRINTFORMW 「如果可以的话,我们再一起出去吧」
					ELSE
						PRINTFORMW 「如果可以的话,记得再邀请我哦」
					ENDIF
				ENDSELECT
			ENDIF
		ENDIF
		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_K70_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;やたら分岐あるけど全部正常に動くか確認できてない
	;まぁ変なの表示されたりしてなければ多少の死に分岐くらいは気にしない
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた＆TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && (ARG == 1 || ARG == 2) && !GETBIT(TCVAR:70:360, 3)
		CALL M_KOJO_EVENT_K70_1_MAINMAP(ARG)
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------

		;統合しました

	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「啊!! %CALLNAME:MASTER%さん!对、对对对、对不起!!」
        PRINTFORMW 「呃……可以和您一起吗……?」
        PRINTFORMW 「那、那就恭敬不如从命了……❤」
		CALL M_KOJO_EVENT_K70_1_END
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「啊!! %CALLNAME:MASTER%さん!对、对对对、对不起!!」
        PRINTFORMW 「我、我什么都没看见!非、非常对不起啊ーー!!」
        CALL M_KOJO_EVENT_K70_1_END
        RETURN 1
    ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;謎の設定
		PRINTFORML 「啊！！ %CALLNAME:MASTER%さんっ！」
		PRINTFORMW 「现在是女性使用的时间哦！！请您赶紧出去！！」
		CALL M_KOJO_EVENT_K70_1_END
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6 && !GETBIT(TCVAR:70:360, 3)
		;ハロウィン
		IF DAY:2 == 3 && DAY:3 == 30
			CALL M_KOJO_EVENT_K70_1_HALLOWEEN
		;元旦（2年目以降）
		ELSEIF DAY:2 == 1 && DAY:3 == 1 && DAY != 1
			CALL M_KOJO_EVENT_K70_1_GANTAN
		;クリスマスイブ
		ELSEIF DAY:2 == 4 && DAY:3 == 24 && !TCVAR:[[小鈴]]:今天的礼物
			CALL M_KOJO_EVENT_K70_1_XMAS
		;鈴奈庵
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 1
			CALL M_KOJO_EVENT_K70_1_ENTER_SUZUNAAN(M_KOJO_K70_FOLLOWER())
		ELSE
			IF TALENT:[[小鈴]]:恋慕
				PRINTFORML 「あ、%CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%！」
				;人里
				IF INRANGE(CFLAG:[[小鈴]]:現在位置, 200, 300)
					;非番
					IF CHARA_HOLIDAY([[小鈴]], 1)
						IF TALENT:[[小鈴]]:恋人
							PRINTFORMW 「今天是休息日!」
							SELECTCASE RAND:5
							CASE 1
								PRINTFORMW 「难道,是特意来见我的吗?」
							CASE 2
								PRINTFORMW 「嗯……,那个,要不要约会!?」
							CASE 3
								PRINTFORMW 「就是说今天有空!所以……」
							CASE 4
								PRINTFORMW 「如果愿意的话,一起外出怎么样……」
							CASEELSE
								PRINTFORMW 「那么,呃…一起吃饭怎么样?」
							ENDSELECT
						ELSE
							PRINTFORMW 「今天是休息日啊」
                            SELECTCASE RAND:5
                            CASE 1
                                PRINTFORMW 「要不要稍微聊聊天?」
                            CASE 2
                                PRINTFORMW 「如果愿意的话,一起……」
                            CASE 3
                                PRINTFORMW 「如果有空的话,要不要散步呢?」
                            CASE 4
                                PRINTFORMW 「嗯,一起喝茶之类的……」
                            CASEELSE
                                PRINTFORMW 「所以说整天有空……」
                            ENDSELECT
						ENDIF
					;仕事日
					ELSE
						SELECTCASE RAND:5
						CASE 1
							PRINTFORMW 「今天有什么吩咐?」
						CASE 2
							PRINTFORMW 「今天的事办完了吗?」
						CASE 3
							PRINTFORMW 「今天要去哪里?」
						CASE 4
							PRINTFORMW 「是来购物的吗?」
						CASEELSE
							PRINTFORMW 「看起来很忙的样子呢」
						ENDSELECT
					ENDIF
				;人里以外
				ELSE
					PRINTFORMW 「在这种地方相遇真是缘分呢」
				ENDIF
			ELSE
				PRINTFORMW 「啊、%CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%」
			ENDIF
		ENDIF
		;バレンタイン
		SIF DAY:2 == 4 && DAY:3 == 14
			CALL M_KOJO_EVENT_K70_1_VALENTINE
		CALL M_KOJO_EVENT_K70_1_END
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラとデート中に遭遇した
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7 && !GETBIT(TCVAR:70:360, 3)
		;ハロウィン
		IF DAY:2 == 3 && DAY:3 == 30
			CALL M_KOJO_EVENT_K70_1_HALLOWEEN
		;元旦（2年目以降）
		ELSEIF DAY:2 == 1 && DAY:3 == 1 && DAY != 1
			CALL M_KOJO_EVENT_K70_1_GANTAN
		;クリスマスイブ
		ELSEIF DAY:2 == 4 && DAY:3 == 24 && !TCVAR:[[小鈴]]:今天的礼物
			CALL M_KOJO_EVENT_K70_1_XMAS
		;鈴奈庵
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 1
			CALL M_KOJO_EVENT_K70_1_ENTER_SUZUNAAN(M_KOJO_K70_FOLLOWER())
		ELSE
			IF FLAG:约会的对象 == [[阿求]]
				;5の扱いが鈴奈庵で遭う時と異なってるのは仕様
				PRINTFORMW 「啊、%CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%\@ TALENT:70:恋慕 ? ！ # \@」
				SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
				CASE "独占", "信頼"
					PRINTFORML 「哎呀,今天和阿求约会吗~?」
					PRINTFORMW 「嗯,和%CALLNAME:MASTER%さん在一起,一定很开心吧」
					PRINTFORMW 「嘛,我也不会因为这种事老是翻旧账的ー」
					PRINTFORMW 「再说阿求也是重要的朋友,一些小事我不会放在心上的♪」
				CASE "悲恋"
					PRINTFORMW 「今日也是和阿求在一起呢」
					PRINTFORMW 「啊哈哈,我没有打扰到你们吧……」
				CASE "揶揄"
					PRINTFORML 「哎呀,不是阿求啊」
					PRINTFORMW 「今天也是约会吗?好热情啊~」
					PRINTFORMW 「要是有什么事也可以来我家坐坐♪」
				CASE "敵対", "恋慕"
					PRINTFORMW 「等等,为什么阿求也在这里」
				CASE "応援"
					PRINTFORMW 「哎呀,阿求也一起吗」
					PRINTFORMW 「该不会今天是约会吧~?」
				CASEELSE
					PRINTFORMW 「哎呀,阿求也一起呢」
				ENDSELECT
			ELSEIF TALENT:70:恋慕
				PRINTFORMW 「あ、%CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%……」
				IF FLAG:约会的对象 == [[霊夢]]
					PRINTFORML 「今日霊夢さん也一起吗」
					PRINTFORMW 「你们两个在做什么呢?」
				ELSEIF FLAG:约会的对象 == [[魔理沙]]
					PRINTFORML 「今天魔理沙小姐也一起吗」
					PRINTFORMW 「你们两个在做什么呢?」
				ELSEIF FLAG:约会的对象 == [[紫]]
					PRINTFORML 「竟、竟然和紫小姐一起吗……%M_KOJO_K70_AISATSU()%……」
					PRINTFORMW (不会是被拐跑了吧……不管怎么看这也太……嗯~!)
				ELSEIF FLAG:约会的对象 == [[文]]
					PRINTFORML 「连文小姐也一起吗……%M_KOJO_K70_AISATSU()%……」
					PRINTFORMW (作为采访也太亲密了吧……这绝对是……嗯~!)
				ELSEIF FLAG:约会的对象 == [[猯藏]]
					PRINTFORML 「居、居然和猯藏小姐一起吗……%M_KOJO_K70_AISATSU()%……」
					PRINTFORMW (%CALLNAME:MASTER%さん没问题吧……你们还手牵手呢……嗯~!)
				ELSE
					TALENT:70:心情 = MIN(TALENT:70:心情, 0)
					PRINTFORMW (嗯~……谁啊那个\@ TALENT:(FLAG:约会的对象):体型 >= 0 ? 人 # 娘 \@~!)
;					SIF TALENT:(FLAG:约会的对象):種族
;						PRINTFORMW (不会是妖怪吧…有点担心%CALLNAME:MASTER%さん……)
                ENDIF
            ELSE
                PRINTFORMW 「啊,%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%」
                IF FLAG:约会的对象 == [[霊夢]]
					PRINTFORMW 「哎呀,和霊夢小姐一起吗」
                ELSEIF FLAG:约会的对象 == [[魔理沙]]
                    PRINTFORMW 「哎呀,和魔理沙小姐一起吗」
                ELSEIF FLAG:约会的对象 == [[紫]]
                    PRINTFORMW 「欸,竟、竟然和紫小姐一起吗……」
                ELSEIF FLAG:约会的对象 == [[文]]
                    PRINTFORMW 「哎呀,连文小姐也一起吗」
                ELSEIF FLAG:约会的对象 == [[猯藏]]
                    PRINTFORMW 「欸,猯藏小姐也一起吗……」
                ELSE
					;とくになし
				ENDIF
			ENDIF
		ENDIF
		;バレンタイン
		SIF DAY:2 == 4 && DAY:3 == 14
			CALL M_KOJO_EVENT_K70_1_VALENTINE
		CALL M_KOJO_EVENT_K70_1_END
		RETURN 1
	ENDIF
;	;-------------------------------------------------
;	;MAIN_MAP上で一日最初の挨拶
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 8
;		;▼とりあえず封印
;		CALL M_KOJO_EVENT_K70_1_MAINMAP
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;外出先で一日最初の挨拶
;	;ARG:1にデート相手
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 9
;	ENDIF
ENDIF

@M_KOJO_EVENT_K70_1_MAINMAP(ARG)
;ARG,1=MASTERが入ってきた,2=TARGETが入ってきた
;不法侵入（親密ではなく時止めで入った）
IF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 3
	PRINTFORMW 「えっ！？」
	PRINTFORMW 「哇、哇啊ーーーー啊啊啊！！！！」
	CALL M_KOJO_K70_KOSUZU_BURST
	CALL M_KOJO_EVENT_K70_1_END
	RETURN 1
ENDIF
;バレンタイン機嫌補正
SIF DAY:2 == 4 && DAY:3 == 14
	TALENT:70:心情 = MAX(TALENT:70:心情, 0)
;;遭遇イベント,古いデータ用だったけどもういらんだろ＆別になくてもいいだろというわけで凍結
;IF CFLAG:70:1003 == 0 && M_KOJO_K70_ABUNAAI(CFLAG:70:現在位置)
;	;あまり親しくない場合は初期遭遇
;	IF ABL:70:親密 <= 4
;		PRINTFORMW 「啊、那、那个～……　抱歉，打扰了……」
;		PRINTL
;		PRINTFORMDL 听到呼唤的声音,回头一看,铃奈庵的女孩怯生生地站在那里。
;		PRINTW
;		;自己紹介まだ
;		IF CFLAG:70:1004 == 0
;			PRINTFORMW 「嗯嗯……是人里的人吗……?？」
;			PRINTFORMW 「我来回收借出的书籍,不知不觉就迷路了……」
;			PRINTFORMW 「有人在表示这个地方很安全吧……太好了~」
;			PRINTFORMW 「啊!我叫本居小鈴!」
;			PRINTFORM 「在人里经营借书店哦!」
;			IF CFLAG:70:1005 == 0
;				PRINTFORMW 「欢迎有机会来店里逛逛呀!」
;			ELSEIF CFLAG:70:1005 == 1
;				PRINTFORMW 「是之前来过的客人吧!请多关照!」
;			ELSEIF CFLAG:70:1005 <= 4
;				PRINTFORMW 「是来过好几次的熟客呢!一直非常感谢!」
;			ELSE
;				PRINTFORMW 「是经常来的熟客呢!一直非常感谢!」
;			ENDIF
;			CFLAG:70:1004 = 1
;		ELSE
;			PRINTFORMW 「啊!%CALLNAME:MASTER%さん!太好了~」
;            PRINTFORMW 「其实我来深山里回收书的时候不知不觉就迷路了……」
;            PRINTFORMW 「正纠结该怎么办的时候遇到您真是太好了……得救了……」
;        ENDIF
;	;親しい場合は自発的に来訪
;	ELSE
;		PRINTFORMW 「啊!%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%ー!」
;        PRINTFORMW 「嘻嘻……我知道这里很危险,但还是忍不住来玩啦」
;        PRINTFORMW 「没关系的~!有%CALLNAME:MASTER%さん在,就可以放心了,对吧♪」
;    ENDIF
;	CFLAG:70:1003 = 1
;ハロウィン
IF DAY:2 == 3 && DAY:3 == 30
	CALL M_KOJO_EVENT_K70_1_HALLOWEEN
;元旦（2年目以降）
ELSEIF DAY:2 == 1 && DAY:3 == 1 && DAY != 1
	CALL M_KOJO_EVENT_K70_1_GANTAN
;クリスマスイブ
ELSEIF DAY:2 == 4 && DAY:3 == 24
	CALL M_KOJO_EVENT_K70_1_XMAS
;おはよう挨拶をしていたら挨拶はしない,ただしバレンタインの日は変になるので必ず挨拶する
ELSEIF !GETBIT(TCVAR:70:360, 5) && !(DAY:2 == 4 && DAY:3 == 14)
	;発情中
	IF TCVAR:[[小鈴]]:発情
		PRINTFORMW 「啊,%CALLNAME:MASTER%さん❤ %M_KOJO_K70_AISATSU()%~❤」
		IF TALENT:[[小鈴]]:恋人
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「呜呜…好寂寞想见您…❤」
			CASE 2
				PRINTFORMW 「等啊等的身体都暖暖的了~❤」
			CASEELSE
				PRINTFORMW 「嘻嘻❤ 您特地来看我了吧❤」
			ENDSELECT
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「今晚让我在您房里睡好不好…❤」
			CASE 2
				PRINTFORMW 「今天我要撒娇个够…❤」
			CASEELSE
				PRINTFORMW 「今天我们一直在一起吧…❤」
			ENDSELECT
		ELSEIF TALENT:[[小鈴]]:恋慕
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「嘻嘻❤ 一直好想见您…❤」
			CASE 2
				PRINTFORMW 「哼~等了好久好久呢❤」
			CASEELSE
				PRINTFORMW 「嘻嘻❤ 一直想着您就见到您了呢❤」
			ENDSELECT
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「今晚让我在您房里睡好不好…❤」
			CASE 2
				PRINTFORMW 「今天我要撒娇个够…❤」
			CASEELSE
				PRINTFORMW 「今天我们一直在一起吧…❤」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「嘻嘻❤ 正想着要见您呢❤」
			CASE 2
				PRINTFORMW 「一直想着%CALLNAME:MASTER%さん会不会来看我呢~❤」
			CASEELSE
				PRINTFORMW 「一看到您我的脑袋就暖暖的了…❤」
			ENDSELECT
		ENDIF
		;機嫌補正
		TALENT:70:心情 = MAX(TALENT:70:心情, 0)
	;不機嫌
	ELSEIF M_KOJO_K70_FUKIGEN([[小鈴]])
		PRINTFORMW 「啊、 %CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%……」
	;オナバレ
	ELSEIF CFLAG:70:オナバレ
		SELECTCASE CFLAG:70:オナバレ
		;えっちした
	;	CASE 2
		;観賞された
	;	CASE 3
		;目撃
		CASEELSE
			IF TALENT:70:恋慕
				PRINTFORMW 「啊、 %CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%……」
				;機嫌補正
				TALENT:70:心情 = -1
			ELSE
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,您、您好……」
            ENDIF
        ENDSELECT
	;鈴奈庵
	ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 1
		CALL M_KOJO_EVENT_K70_1_ENTER_SUZUNAAN(M_KOJO_K70_FOLLOWER())
	;小鈴の部屋（拠点が人里）
	ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 2
		;MASTERが入ってきた
		;このパターンは小鈴が思慕以上か阿求と一緒に入った時,よって阿求以外は思慕以上と判定
		IF ARG == 1
			;阿求と一緒に入った,多分条件同じだけど一応
			IF CFLAG:MASTER:現在位置 == CFLAG:[[阿求]]:現在位置 || M_KOJO_K70_FOLLOWER() == "阿求"
				SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
				CASE "独占", "信頼", "恋慕"
					PRINTFORML 「哎呀,%M_KOJO_K70_OKAERI()%」
					PRINTFORMW 「欸,阿求也在啊」
				CASE "悲恋", "敵対"
					PRINTFORML 「哎呀,%M_KOJO_K70_OKAERI()%」
					PRINTFORMW 「啊……阿求也在一起啊……」
				CASEELSE
					IF TALENT:70:恋慕
						PRINTFORML 「哎呀,%M_KOJO_K70_OKAERI()%」
						PRINTFORMW 「欸,阿求也在啊」
					ELSE
						PRINTFORML 「哎呀,不是阿求吗,怎么了?」
						PRINTFORMW 「啊,%CALLNAME:MASTER%さん您也来了」
					ENDIF
				ENDSELECT
			;誰かと一緒に入った（恋慕）
			ELSEIF CFLAG:MASTER:同行 && TALENT:70:恋慕
				PRINTFORML 「あら、%M_KOJO_K70_OKAERI()%」
				SELECTCASE M_KOJO_K70_FOLLOWER()
				CASE "霊夢"
					PRINTFORML 「欸,霊夢小姐也在一起吗」
					PRINTFORMW 「那个,有什么事吗?」
				CASE "魔理沙"
					PRINTFORML 「欸,魔理沙小姐也在一起吗」
					PRINTFORMW 「那个,有什么事吗?」
				CASE "紫"
					PRINTFORML 「欸,诶?!紫、紫小姐…%M_KOJO_K70_AISATSU()%……」
					PRINTFORMW 「那个……有什么事吗…?」
				CASE "文"
					PRINTFORML 「欸,文小姐也在一起吗……」
					PRINTFORMW 「那个……有什么事吗…?」
				CASE "猯藏"
					PRINTFORML 「欸,猯藏小姐也在一起吗……」
					PRINTFORMW 「那个……有什么事吗…?」
				CASEELSE
					PRINTFORMW 「欸,您也带着伴侣一起来吗…%M_KOJO_K70_AISATSU()%……」
				ENDSELECT
			;誰かと一緒に入った（思慕以上）
			ELSEIF CFLAG:MASTER:同行
				SELECTCASE M_KOJO_K70_FOLLOWER()
				CASE "霊夢"
					PRINTFORML 「啊,霊夢小姐,怎么了吗?」
					PRINTFORMW 「欸,%CALLNAME:MASTER%さん也在一起吗 %M_KOJO_K70_AISATSU()%」
				CASE "魔理沙"
					PRINTFORML 「啊,魔理沙小姐,怎么了吗?」
					PRINTFORMW 「欸,%CALLNAME:MASTER%さん也在一起吗 %M_KOJO_K70_AISATSU()%」
				CASE "紫"
					PRINTFORML 「哎呀,紫、紫小姐……怎么了吗……?」
					PRINTFORMW 「哎呀,%CALLNAME:MASTER%さん也在一起吗……%M_KOJO_K70_AISATSU()%」
				CASE "文"
					PRINTFORML 「哎呀,文小姐吗……怎么了吗?」
					PRINTFORMW 「哎呀,%CALLNAME:MASTER%さん也在一起吗 %M_KOJO_K70_AISATSU()%」
				CASE "猯藏"
					PRINTFORML 「哎呀,猯藏小姐…怎么了吗……?」
					PRINTFORMW 「哎呀,%CALLNAME:MASTER%さん也在一起吗 %M_KOJO_K70_AISATSU()%」
				CASEELSE
					PRINTFORML 「啊,%CALLNAME:MASTER%さん,怎么了吗?」
					PRINTFORMW 「那个,您这边是……?」
				ENDSELECT
			;一人で入った（同居）
			ELSEIF CFLAG:MASTER:初期位置 == CFLAG:70:初期位置
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,欢迎回来♪」
			;一人进来(恋人)
			ELSEIF TALENT:70:恋人
				PRINTFORML 「哎呀!%CALLNAME:MASTER%さん,欢迎您!」
				PRINTFORMW 「嘻嘻,您是特地来看我的吗~我好开心♪」
			;一人进来(恋慕)
			ELSEIF TALENT:70:恋慕
				PRINTFORML 「哎呀!%CALLNAME:MASTER%さん,欢迎您!」
				PRINTFORMW 「那个,有什么事吗?」
			;一人进来(思慕以上)
			ELSE
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,有什么事吗?」
			ENDIF
		;TARGETが入ってきた
		;このパターンは基本的に小鈴が恋慕か阿求と一緒に入った後,よって阿求以外は恋慕と判定
		;一応時止めで入っていた場合は思慕もありうる（思慕未満は多分追い出される）
		ELSEIF ARG == 2
			;誰かと二人,小鈴と阿求が同時に入室してくるパターンもあるけど流石にめんどくさいので省略
			IF GET_TARGETNUM() == 2
				PRINTFORML 「あら！ %CALLNAME:MASTER%さん、\@ CFLAG:MASTER:初期位置 == CFLAG:70:初期位置 ? 帰ってたんですね # いらしてたんですね \@」
				SELECTCASE M_KOJO_K70_FOLLOWER()
				CASE "霊夢"
					PRINTFORML 「欸,霊夢小姐也在一起吗」
					PRINTFORMW 「那个,有什么事吗?」
				CASE "魔理沙"
					PRINTFORML 「欸,魔理沙小姐也在一起吗」
					PRINTFORMW 「那个,有什么事吗?」
				CASE "紫"
					PRINTFORML 「欸,诶?!紫、紫小姐…%M_KOJO_K70_AISATSU()%……」
					PRINTFORMW 「那个……有什么事吗…?」
				CASE "文"
					PRINTFORML 「欸,文小姐也在一起吗……」
					PRINTFORMW 「那个……有什么事吗…?」
				CASE "猯藏"
					PRINTFORML 「欸,猯藏小姐也在一起吗……」
					PRINTFORMW 「那个……有什么事吗…?」
				CASE "阿求"
					SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
					CASE "悲恋", "敵対"
						PRINTFORMW 「啊……阿求也在一起啊……」
					CASE "揶揄"
						PRINTFORML 「欸,阿求也在啊」
						PRINTFORMW 「在别人房间做什么呢……」
					CASEELSE
						PRINTFORMW 「欸,阿求也在啊」
					ENDSELECT
				CASEELSE
					PRINTFORMW 「欸,您也带着伴侣一起来吗…%M_KOJO_K70_AISATSU()%……」
				ENDSELECT
			;三人以上
			ELSEIF GET_TARGETNUM() >= 3
				PRINTFORML 「哎呀,%CALLNAME:MASTER%さん,您\@ CFLAG:MASTER:初期位置 == CFLAG:70:初期位置 ? 回来了呀 # 来这儿了呀 \@」
				PRINTFORMW 「那个,这么多人在一起……是怎么回事?」
			;一人
			ELSE
				IF CFLAG:MASTER:初期位置 == CFLAG:70:初期位置
					PRINTFORMW 「哎呀,%CALLNAME:MASTER%さん,您回来了呀」
				ELSEIF TALENT:70:恋人
					PRINTFORML 「哎呀,%CALLNAME:MASTER%さん,您来这儿了呀」
					PRINTFORMW 「嘻嘻,您特地来看我吗~我好开心♪」
				ELSE
					PRINTFORML 「哎呀,%CALLNAME:MASTER%さん,您来这儿了呀」
					PRINTFORMW 「那个,有什么事吗?」
				ENDIF
			ENDIF
		ENDIF
	;人里 or 同じ拠点 or 恋人 or 恋慕で確率
	ELSEIF INRANGE(CFLAG:70:現在位置, 200, 300) || CFLAG:[[小鈴]]:神社在住 || TALENT:70:恋人 || (TALENT:70:恋慕 && RAND:100 < 70)
	;	;自己紹介まだ
	;	IF CFLAG:70:1004 == 0
	;		PRINTFORMW 「%M_KOJO_K70_AISATSU()%ー」
		;阿求が一緒
		IF CFLAG:[[阿求]]:同行
			IF TALENT:70:恋人 || TALENT:70:恋慕
				PRINTFORML 「啊，%CALLNAME:MASTER%さん，%M_KOJO_K70_AISATSU()%ー\@ TALENT:70:恋人 ? ♪ # ！ \@」
			ELSE
				PRINTFORML 「啊，%CALLNAME:MASTER%さん，%M_KOJO_K70_AISATSU()%」
			ENDIF
			SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
			CASE "独占", "信頼", "恋慕"
				PRINTFORMW 「欸,阿求也在啊」
			CASE "悲恋", "敵対"
				PRINTFORMW 「啊……阿求也在一起啊……」
			CASE "揶揄", "応援"
				PRINTFORMW 「哎呀,和阿求约会吗?呵呵♪ 加油哦!」
			CASEELSE
				IF TALENT:70:恋慕
					PRINTFORMW 「欸,阿求也在啊」
				ELSE
					PRINTFORMW 「哎呀,阿求也在一起啊」
				ENDIF
			ENDSELECT
		ELSEIF TALENT:70:恋人 || TALENT:70:恋慕
			PRINTFORML 「啊，%CALLNAME:MASTER%さん，%M_KOJO_K70_AISATSU()%ー\@ TALENT:70:恋人 ? ♪ # ！ \@」
			IF BASE:MASTER:気力 <= MAXBASE:MASTER:気力 / 2
				PRINTFORMW 「……您看起来很累的样子,没事吧?」
			ELSE
				SELECTCASE DAY % 17
				CASE 1
					PRINTFORMW 「啊哈,还有起床气呢ー」
				CASE 2
					PRINTFORMW 「正好有件事想问问%CALLNAME:MASTER%さん――」
				CASE 3
					PRINTFORMW 「对了,昨天有新的书送到――」
				CASE 4
					;没有什么特别的变化
					PRINTFORMW 「嘻嘻,今天试着打扮了一下!」
				CASE 5
					PRINTFORMW 「今天也很精神呢~!」
				CASE 6
					PRINTFORMW 「啊,是发生什么好事了吗?」
				CASE 7
					PRINTFORMW 「话说最近很热门的是――」
				CASE 8
					IF !TCVAR:[[阿求]]:今天有否见面
						PRINTFORMW 「对了,刚才阿求还在找您呢?」
					ELSE
						PRINTFORML 「诶,和阿求说过话了吗?」
						PRINTFORMW 「没说奇怪的话吧…?」
					ENDIF
				CASE 9
					PRINTFORMW 「诶,黑眼圈很重…!?呜……这是有原因的……」
				CASE 10
					PRINTFORMW 「呼啊~嗯,对不起,昨晚没怎么睡觉……」
				CASE 11
					PRINTFORMW 「嘻嘻,看到%CALLNAME:MASTER%さん就会有精神♪」
				CASE 12
					PRINTFORMW 「啊?在干什么呢?」
				CASE 13
					PRINTFORMW 「要不要聊聊呀ー?」
				CASE 14
					PRINTFORMW 「今天那家店有特惠呢!」
				;ちょっと確率高め
				CASEELSE
					;ちょっと会話と被ってるけど
					;夏
					IF GET_MONTH() == "夏の月"
						PRINTFORMW 「今天真够闷的呢……」
					;冬
					ELSEIF GET_MONTH() == "冬の月"
						PRINTFORMW 「今天好冷啊……」
					ELSE
						PRINTFORMW 「今天的温度很舒适的ー」
					ENDIF
				ENDSELECT
			ENDIF
		ELSE
			PRINTFORMW 「啊、%CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%」
		ENDIF
	;危ない所
	ELSEIF M_KOJO_K70_ABUNAAI(CFLAG:70:現在位置)
		IF TALENT:70:恋慕
			PRINTFORML 「啊,%CALLNAME:MASTER%さん,\@ TALENT:70:恋人 ? 来约会了♪ # 来玩了~! \@」
			SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「这里的妖气还是让人兴奋啊♪」
			CASE 2
				PRINTFORMW 「今天也得依靠您保护了♪」
			CASE 3
				PRINTFORMW 「嘻嘻,我已经相当适应这里了♪」
			CASEELSE
				PRINTFORMW 「嘻嘻,有%CALLNAME:MASTER%さん在就不害怕♪」
			ENDSELECT
		ELSE
			PRINTFORMW 「啊,%CALLNAME:MASTER%さん,来玩了~」
		ENDIF
	ELSE
		IF TALENT:70:恋人
			PRINTFORMW 「啊,%CALLNAME:MASTER%さん,来约会了♪」
		ELSEIF TALENT:70:恋慕
			PRINTFORMW 「啊,%CALLNAME:MASTER%さん,来玩了~!」
		ELSE
			PRINTFORMW 「啊,%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%」
		ENDIF
	ENDIF
ENDIF

;バレンタインチョコ,挨拶のあとに追加
SIF DAY:2 == 4 && DAY:3 == 14
	CALL M_KOJO_EVENT_K70_1_VALENTINE
CALL M_KOJO_EVENT_K70_1_END

;鈴奈庵に来店
@M_KOJO_EVENT_K70_1_ENTER_SUZUNAAN(付き添い)
#DIMS 付き添い
IF 付き添い == "阿求"
	PRINTFORML 「いらっしゃいま……」
	SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
	CASE "独占", "信頼"
		PRINTFORMW 「啊,%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%!」
		PRINTFORML 「阿求也来了呀」
		PRINTFORMW 「您特意带阿求来吗?嘻嘻,我就喜欢您这点♪」
		TALENT:70:心情 = 1
	CASE "悲恋"
		PRINTFORMW 「啊,%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%!」
		PRINTFORML 「……今天也和阿求在一起呢」
		PRINTFORMW 「虽然很高兴您来了,但如果是约会的话,这里不是很好的地方哦」
	CASE "揶揄"
		PRINTFORMW 「哎呀,不是阿求吗」
		PRINTFORMW 「今天也在约会吗?好热情啊~」
	CASE "敵対", "恋慕"
		PRINTFORMW 「啊,%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%!」
		PRINTFORMW 「等等,怎么连阿求也在」
	CASE "応援"
		PRINTFORMW 「哎呀,是阿求呀」
		PRINTFORML 「今天和%CALLNAME:MASTER%さん约会吗?」
		PRINTFORMW 「呵呵,玩得开心点哦」
	CASEELSE
		PRINTFORMW 「怎么是阿求」
		PRINTFORMW 「啊,原来%CALLNAME:MASTER%さん也在这儿呀!」
	ENDSELECT
;鈴奈庵で同棲中
ELSEIF TALENT:70:恋慕 && CFLAG:MASTER:初期位置 == CFLAG:[[小鈴]]:初期位置 && CFLAG:MASTER:初期位置 == P226小鈴私室
	PRINTFORMW 「啊、%CALLNAME:MASTER%さん、%M_KOJO_K70_AISATSU()%♪」
ELSEIF TALENT:70:恋慕
	PRINTFORML 「欢迎光临……」
	IF 付き添い == "霊夢"
		PRINTFORML 「啊…%CALLNAME:MASTER%さん跟霊夢小姐在一起吗……」
		PRINTFORMW 「今天二人都做了什么呢?」
	ELSEIF 付き添い == "魔理沙"
		PRINTFORML 「啊…%CALLNAME:MASTER%さん跟魔理沙小姐在一起吗……」
		PRINTFORMW 「今天二人都做了什么呢?」
	ELSEIF 付き添い == "紫"
		PRINTFORML 「哎呀,%CALLNAME:MASTER%さん和紫小姐…?」
		PRINTFORMW  (%CALLNAME:MASTER%さん笑得很开心的样子,不过没问题吧……)
	ELSEIF 付き添い == "文"
		PRINTFORML 「啊…%CALLNAME:MASTER%さん跟文小姐在一起……」
		PRINTFORMW  (嗯…两人之间的距离有点近呢?%CALLNAME:MASTER%さん让我有点担心……)
	ELSEIF 付き添い == "猯藏"
		PRINTFORML 「啊…%CALLNAME:MASTER%さん跟猯藏小姐在一起……」
		PRINTFORMW  (嗯…两人之间的距离有点近呢?%CALLNAME:MASTER%さん让我有点担心……)
	ELSEIF CFLAG:MASTER:同行
		TALENT:70:心情 = MIN(TALENT:70:心情, 0)
		PRINTFORML 「啊…%CALLNAME:MASTER%さん,今天不是一个人啊……」
		IF FLAG:约会的对象
			PRINTFORMW  (唔~……那是谁呀~\@ TALENT:(FLAG:约会的对象):体型 >= 0 ? 小姐 # 小姑娘 \@!)
		ELSE
			PRINTFORMW  (唔~……那是谁呀~!)
		ENDIF
	ELSE
		PRINTFORMW 「啊,%CALLNAME:MASTER%さん,%M_KOJO_K70_AISATSU()%!」
	ENDIF
ELSE
	IF 付き添い == "霊夢"
		PRINTFORML 「欢迎光临ー!」
		PRINTFORMW 「哎呀,霊夢小姐跟%CALLNAME:MASTER%さん,今天都做了些什么呢?」
	ELSEIF 付き添い == "魔理沙"
		PRINTFORML 「欢迎光临ー!」
		PRINTFORMW 「哎呀,魔理沙小姐跟%CALLNAME:MASTER%さん,今天都做了些什么呢?」
	ELSEIF 付き添い == "紫"
		PRINTFORML 「欢迎光临……」
		PRINTFORML 「诶,哎呀,%CALLNAME:MASTER%さん跟,紫,小姐…?」
		PRINTFORMW  (怎,怎么%CALLNAME:MASTER%さん会和紫小姐在一起……)
	ELSEIF 付き添い == "文"
		PRINTFORML 「欢迎光临ー!」
		PRINTFORML 「哎呀,文小姐今天和%CALLNAME:MASTER%さん在一起吗」
		PRINTFORMW  (%CALLNAME:MASTER%さん也被利用了吧…真可怜……)
	ELSEIF 付き添い == "猯藏"
		PRINTFORML 「欢迎光临……」
		PRINTFORML 「诶,猯,猯藏小姐,今天和%CALLNAME:MASTER%さん在一起吗……」
		PRINTFORMW  (%CALLNAME:MASTER%さん笑得很开心的样子,不过没问题吧……)
	ELSEIF TALENT:70:心情 == -1 || CFLAG:70:ブチギレ
		PRINTFORMW 「欢迎光临ー」
	ELSE
		PRINTFORMW 「欢迎光临ー!」
	ENDIF
ENDIF

;ハロウィン挨拶
@M_KOJO_EVENT_K70_1_HALLOWEEN
IF TALENT:70:恋慕
	PRINTFORMW 「Trick ★ or ★ Treat♪」
	PRINTFORMW 「呵呵……%CALLNAME:MASTER%さん,如果不给我糖果的话,我就要用这本『梦迷宫之书』中隐藏的古老恶魔了――」
	PRINTFORMW 「啊~!等一下!不要没收我的书呀~!开玩笑的啦~!」
	PRINTFORMW 「真是的!今天可是万圣节,你应该明白我的玩笑才对嘛」
	PRINTFORMW 「对了,糖果我是会收下的哦♪」
	PRINTL
ELSE
	PRINTFORMW 「啊,%CALLNAME:MASTER%さん,不给糖就是搞怪哦♪」
	PRINTFORMW 「据说今天是万圣节,一个外国的节日」
	PRINTFORMW 「在这一天,冥界大门会敞开,亡灵都会爬出来似的」
	PRINTFORMW 「嗯,在幻想乡有盂兰盆节,所以这节日估计不太受欢迎吧」
	PRINTL
	PRINTFORMDL  (既然如此――)
ENDIF
PRINTDL [1] 给她糖果
PRINTDL [2] 不给糖果
;陥落＋接吻経験済みで解禁
SIF (TALENT:[[小鈴]]:恋慕 || TALENT:[[小鈴]]:恋人 || TALENT:[[小鈴]]:炮友) && !FIRSTTIME("初吻", 1, [[小鈴]])
	PRINTDL [ 0] エッチなイタズラなら……
INPUT
IF RESULT == 1 && ITEM:糖
	IF TALENT:[[小鈴]]:恋慕
		PRINTFORMW 「哇!真的给我了♪」
		PRINTFORMW 「嘿嘿~❤ 非常感谢您ー!」
	ELSE
		PRINTFORMW 「诶!?真的可以吃吗?」
		PRINTFORMW 「呵呵~❤ 那我就不客气了,非常感谢您~」
	ENDIF
	CALL LOST_ITEM("飴", 1, 2)
	;好感度と信頼度アップ
	CALL CHANGE_CFLAG(GETNUM(CFLAG, "好感度"), [[小鈴]], ABL:[[小鈴]]:親密 * 12 + RAND:20)
	CALL CHANGE_CFLAG(GETNUM(CFLAG, "信頼度"), [[小鈴]], ABL:[[小鈴]]:親密 * 4 + RAND:10)
ELSEIF RESULT == 0 && (TALENT:[[小鈴]]:恋慕 || TALENT:[[小鈴]]:恋人 || TALENT:[[小鈴]]:炮友) && !FIRSTTIME("初吻", 1, [[小鈴]])
	;初回
	IF !CFLAG:70:1073
		PRINTFORMW 「诶!?%CALLNAME:MASTER%さん,我觉得这样不太好吧~……」
		PRINTFORMW 「真是的,您太变态了,让我很困扰呢……」
		PRINTL
		PRINTFORMDL 一面说着,小鈴一脸嫌弃地慢慢把手放在%CALLNAME:MASTER%的脖子上,脸靠近过去。
		PRINTW
		PRINTFORML 「――算了吧…」
		FORCEWAIT
		SETCOLOR 255, 100, 255
		PRINTFORMW ……ちゅ❤
		PRINTL
		CALL M_KOJO_COLOR_K70
		PRINTFORMW 「……呵呵,谢谢款待♪」
		PRINTFORMW 「超级甜的哦❤」
	;前にやった
	ELSE
		;去年or一昨年やった
		IF CFLAG:70:1073 == DAY / 124 || CFLAG:70:1073 == DAY / 124 - 1
			IF CFLAG:70:1073 == DAY / 124
				PRINTFORMW 「%CALLNAME:MASTER%さん,这种事去年不是已经做过了吗!?」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%さん,这种事前年不是已经做过了吗!?」
			ENDIF
			PRINTFORMW 「真是的!太变态了!」
			PRINTL
			PRINTFORMDL 一脸愤怒的小鈴把脸凑到%CALLNAME:MASTER%面前。
			FORCEWAIT
			SETCOLOR 255, 100, 255
			PRINTFORMW ……啾❤
			PRINTL
			CALL M_KOJO_COLOR_K70
			PRINTFORMW 「好了!完事!」
		;もっと前にやった
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%さん,以前我不是说过了吗?」
			PRINTFORMW 「真是的,变态就是变态……」
			PRINTL
			PRINTFORMDL 小鈴一边直视着这里,一边用手遮住%CALLNAME:MASTER%的眼睛,低语道
			PRINTW
			PRINTFORML 「――我开动了…❤」
			FORCEWAIT
			SETCOLOR 255, 100, 255
			PRINTFORMW ……啾❤
			PRINTL
			CALL M_KOJO_COLOR_K70
			PRINTFORMW 「……呵呵❤ 这甜味还是和以前一样呢♪」
		ENDIF
	ENDIF
	EXP:[[小鈴]]:接吻経験 ++
	EXP:MASTER:接吻経験 ++
	EXP:[[小鈴]]:愛情経験 ++
	;最後の年を記録
	CFLAG:70:1073 = DAY / 124 + 1
ELSE
	IF RESULT == 1
		PRINTFORMDL 我没有准备糖果……
		PRINTW
	ENDIF
	IF TALENT:[[小鈴]]:恋慕
		PRINTFORMW 「诶!?%CALLNAME:MASTER%さん你没有准备吗!?」
		PRINTFORMW 「那就没办法了……我就只能使用恶魔的魔法来搞点恶作剧了!」
		SELECTCASE RAND:8
		CASE 1
			LOCALS:1 = 悪魔の
		CASE 2
			LOCALS:1 = 冥府の
		CASE 3
			LOCALS:1 = 冥界の
		CASE 4
			LOCALS:1 = 深淵の
		CASE 5
			LOCALS:1 = 暗黒の
		CASE 6
			LOCALS:1 = 闇の
		CASE 7
			LOCALS:1 = 血染めの
		CASEELSE
			LOCALS:1 = ワルプルギスの
		ENDSELECT
		SELECTCASE RAND:8
		CASE 1
			LOCALS:2 = 刻印
		CASE 2
			LOCALS:2 = 判子
		CASE 3
			LOCALS:2 = 掛け軸
		CASE 4
			;当然同人誌のこと
			LOCALS:2 = 薄い本
		CASEELSE
			LOCALS:2 = 禁書
		ENDSELECT
		CALL GIFT_ORDER_MADE_FROM_CHARA([[小鈴]], LOCALS:1, LOCALS:2)
		PRINTL
		CALL COLORMESSAGE(@"%CALLNAME:MASTER%得到了【%RESULTS%】！", C_RED, 2)
		;イタズラ回数カウント
		CFLAG:70:1072 ++
		PRINTL
		IF CFLAG:70:1072 >= 6
			PRINTFORMW 「……现在总共收集到多少个了呢?」
		ELSEIF CFLAG:70:1072 >= 3
			PRINTFORMW 「……该不会一直在收集吧?」
		ELSEIF CFLAG:70:1072 == 2
			PRINTFORMW 「啊哈哈♪这已经是第二次了♪」
		ELSE
			PRINTFORMW 「啊哈哈♪我一直想试一次呢~♪」
		ENDIF
	ELSE
		PRINTFORMW 「……不过能够搞点恶作剧还是个罕见的机会呢」
		PRINTFORMW 「也许我也想试试看」
	ENDIF
ENDIF
;機嫌補正
TALENT:70:心情 = MAX(TALENT:70:心情, 0)

;元旦挨拶
@M_KOJO_EVENT_K70_1_GANTAN
PRINTFORMW 「啊,%CALLNAME:MASTER%さん,新年好!」
IF TALENT:[[小鈴]]:恋慕
    PRINTFORMW 「今年也请多多关照!」
ELSE
    PRINTFORMW 「今年也请多多关照鈴奈庵哦~」
ENDIF
;機嫌補正
TALENT:70:心情 = MAX(TALENT:70:心情, 0)

;クリスマスイブ挨拶
@M_KOJO_EVENT_K70_1_XMAS
PRINTFORMW 「啊,%CALLNAME:MASTER%さん,圣诞快乐!」
IF TALENT:[[小鈴]]:恋慕 || TALENT:[[小鈴]]:恋人
    PRINTFORMW 「呵呵,因为能见到%CALLNAME:MASTER%さん,今晚似乎会成为一个美好的夜晚♪」
    SELECTCASE DAY % 3
    CASE 1
        PRINTFORML 「话说回来,圣诞老人会来幻想乡吗~?」
    CASE 2
        PRINTFORML 「话说回来,我们家没有烟囱,圣诞老人会来吗~?」
    CASEELSE
        PRINTFORML 「话说回来,圣诞老人真的存在吗~?」
    ENDSELECT
    PRINTDL [1] 圣诞老人当然存在啦!就在这里呢!
    PRINTDL [0] 小心邪恶的妖精
	INPUT
	IF RESULT
		RESETCOLOR
		PRINTFORMW ◆为小鈴定制送给她的礼物!
		CALL GIFT_ORDER_MADE_FROM_MASTER([[小鈴]])
		CALL M_KOJO_COLOR_K70
		;放弃送礼物
		IF RESULT == -1
			PRINTFORMW 「话说回来,圣诞老人做的事情,算是非法入侵吧」
			PRINTFORMW 「平时也做着盗贼的事情吗」
		;あげた
		ELSE
			CALL GIFTNAME(TCVAR:[[小鈴]]:今天的礼物, [[小鈴]])
			IF STRCOUNT(RESULTS, "(妖魔圖鑒)")
				LOCALS = 妖魔圖鑒
			ELSEIF STRCOUNT(RESULTS, "(指环|戒指)")
				LOCALS = 指环
			ELSEIF STRCOUNT(RESULTS, "(鈴)")
				LOCALS = 鈴
			ELSEIF STRCOUNT(RESULTS, "(書|本|卷書|魔法書|経典|記録|詞典)")
				LOCALS = 本
			ELSEIF STRCOUNT(RESULTS, "(护符|护身符|符箓|小装饰|驱魔护符|念珠|火箭|勾玉)")
				LOCALS = 护身符
			;ELSEIF STRCOUNT(RESULTS, "(結晶|宝玉|宝珠|オーブ|守護石|魔法石|妖玉|しずく)")
			;	LOCALS = 宝玉;保留
			ELSEIF STRCOUNT(RESULTS, "(遺物|秘宝|礦物碎片|人工制品|化石)")
				LOCALS = 遺物
			ELSE
				LOCALS =
			ENDIF
			PRINTL
			PRINTFORMDL %CALLNAME:MASTER%送给小鈴一份%RESULTS%作为礼物。
			PRINTW
			;[土産屋]参照
			IF RESULT:1 >= 700
				CALL M_KOJO_K70_GIFT("特注", RESULTS, LOCALS, 3)
			ELSEIF RESULT:1 >= 400
				CALL M_KOJO_K70_GIFT("特注", RESULTS, LOCALS, 2)
			ELSE
				CALL M_KOJO_K70_GIFT("特注", RESULTS, LOCALS, 1)
			ENDIF
		ENDIF
	ELSE
		PRINTFORMW 「诶!该不会圣诞老人是小偷吧!?」
	ENDIF
ELSE
	PRINTFORMW 「听说如果晚上在壁炉上挂袜子,第二天早上就会有礼物……」
	SELECTCASE DAY % 3
	CASE 1
		PRINTFORMW 「话说回来,我们家压根没有壁炉呢……」
	CASE 2
		PRINTFORMW 「完完全全就是非法入侵者啊……」
	CASEELSE
		PRINTFORMW 「唔~先说好,我希望能收到足以放进书的袜子……」
	ENDSELECT
ENDIF
;機嫌補正
TALENT:70:心情 = MAX(TALENT:70:心情, 0)

;バレンタイン挨拶（通常挨拶後に追加）
@M_KOJO_EVENT_K70_1_VALENTINE
SIF CFLAG:70:好感度 <= 5000 || EXP:70:愛情経験 < 100
	PRINTFORML 「对了!今天是情人节,所以我正在派发巧克力哦」
SELECTCASE CFLAG:70:好感度
CASE 1000 TO 3000
	;ブラックサンダー
	PRINTFORMW 「%CALLNAME:MASTER%さん也请收下这一份吧！」
CASE 3001 TO 5000
	;チョコレート
	PRINTFORMW 「%CALLNAME:MASTER%さん也请收下这一份吧♪」
CASE IS > 5000
	PRINTFORML 「那、那个今天是情人节，所以……」
	IF EXP:70:愛情経験 < 100
		;高級チョコ
		PRINTFORMW 「一直以来受您照顾的%CALLNAME:MASTER%さん,我特意为您准备了一份特别的礼物♪」
	ELSE
	    ;手作巧克力
	    PRINTFORMW 「我亲手为%CALLNAME:MASTER%さん制作了巧克力……❤」
	    PRINTFORMW 「虽然做得不太好,但请您一定要收下……❤」
;					＞＜*
	ENDIF
ENDSELECT
;機嫌補正
TALENT:70:心情 = MAX(TALENT:70:心情, 0)

;挨拶口上終了処理
;口上が表示されなくても処理されます
@M_KOJO_EVENT_K70_1_END
;最後に会った日
CFLAG:70:1002 = DAY
;一日一回
SETBIT TCVAR:70:360, 3
;最初から不機嫌かどうか
SIF TALENT:[[小鈴]]:心情 < 0 && !CFLAG:70:オナバレ
	TCVAR:[[小鈴]]:380 = 1
;恋慕で、不機嫌ではなく、デート中ではなく、欲求不満が75%以上、発情していない
IF TALENT:70:恋慕 && TALENT:70:心情 >= 0 && !FLAG:约会的对象 && CFLAG:70:积攒度 >= 750 && !TCVAR:[[小鈴]]:発情
	PRINTL
	PRINTFORMDL 小鈴的脸颊红扑扑的,一副局促不安的样子……
	PRINTW
	SELECTCASE RAND:6
	CASE 1
		PRINTFORMW 「%CALLNAME:MASTER%さん,那个,我……」
	CASE 2
		PRINTFORMW 「……那个,如果可以的话,我们两个人一起去哪里走走好吗……?」
	CASE 3
		PRINTFORMW 「……那个,如果可以的话,一起……那个……」
	CASE 4
		PRINTFORMW 「……因为一直在想%CALLNAME:MASTER%さん的事,不知怎的……」
	CASE 5
		PRINTFORMW 「诶?不,没什么……就是很想见你……❤」
	CASEELSE
		;今天天气不错啊之类的话
		IF GET_MONTH() == "夏の月"
			PRINTFORMW 「啊,啊哈哈,今天怎么格外地热呢~!」
		ELSEIF GET_MONTH() == "冬の月"
			PRINTFORMW 「啊,啊哈哈,今天怎么这么暖和呢~!」
		ELSE
			PRINTFORMW 「啊,啊哈哈,今天怎么这么热呢~!」
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K70_2(ARG,ARG:1)
#DIM 分岐
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && (ARG == 1 || ARG == 2)
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時添い寝中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			分岐 = RAND:10
			PRINTL
			IF GROUPMATCH(分岐, 1, 2, 3) || TALENT:70:心情 == 1 || CFLAG:70:1001 == DAY - 1
				CALL M_KOJO_K70_画像表示(0, "笑顔")
;				;昨晩満足,ズレ修正したけどまだ懸念アリ
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好♪」
				IF CFLAG:70:1001 == DAY - 1
					PRINTFORML 「嘻嘻❤昨天真是太棒了♪」
					PRINTFORMW 「下次再来吧♪」
					TALENT:70:心情 = 1
				ELSE
					PRINTFORMW 「啊哈♪偷看了%CALLNAME:MASTER%さん的睡脸♪」
				ENDIF
			ELSEIF 分岐 == 0 || TALENT:70:心情 == -1
				CALL M_KOJO_K70_画像表示(0, "憤怒")
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好……」
				PRINTL
				PRINTFORMDL 小鈴似乎正在气头上……
				PRINTFORMDL 也许是昨天做了什么让她不高兴的事……
				PRINTW
				SELECTCASE TIME
				CASE 240 TO 599
					PRINTFORMW 「……怎么了?已经早上了哦」
				CASE 600 TO 1079
					PRINTFORMW 「……怎么了?已经中午了吧?」
				CASEELSE
					PRINTFORMW 「……怎么了?已经晚上了哦……」
				ENDSELECT
				TALENT:70:心情 = -1
			ELSEIF GROUPMATCH(分岐, 4, 5, 6)
				CALL M_KOJO_K70_画像表示(0, "通常")
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好!」
				PRINTFORML 「呵呵♪睡脸看起来很开心的样子呢」
				PRINTFORMW 「到底做了什么好梦啊?」
			ELSE
				CALL M_KOJO_K70_画像表示(0, "通常")
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好!」
				IF GET_MONTH() == "春の月"
					PRINTFORML 「已经变暖和了不少呢」
					PRINTFORMW 「不过,赖床是不行的哦ー」
				ELSEIF GET_MONTH() == "夏の月"
					PRINTFORML 「今天又这么热呢……」
					PRINTFORMW 「要不要帮您擦擦汗?」
				ELSEIF GET_MONTH() == "秋の月"
					PRINTFORML 「已经变冷了不少呢」
					PRINTFORMW 「要、要不我来暖暖你……也行……❤」
				ELSEIF GET_MONTH() == "冬の月"
					PRINTFORML 「今天会更冷呢……」
					PRINTFORMW 「即使这样,也不能一直窝在被窝里哦ー」
				ENDIF
			ENDIF
			;最後に会った日
			CFLAG:70:1002 = DAY
			;一日一回（おはよう挨拶）
			SETBIT TCVAR:70:360, 5
			;最初から不機嫌かどうか
			SIF TALENT:[[小鈴]]:心情 < 0
				TCVAR:[[小鈴]]:380 = 1
			RETURN 1
		ENDIF
;		;-------------------------------------------------
;		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
;		;記入チェック（=0, 非表示、1, 表示）
;		LOCAL:1 = 0
;		;-------------------------------------------------

		;統合しました

	ENDIF
;	;-------------------------------------------------
;	;同棲かつ相手が起きている
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 1
;	;-------------------------------------------------

		;統合しました

;	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「嗯……呜呜……」
		CASE 2
			PRINTFORMW 「呼……呼……」
		CASE 3
			PRINTFORMW 「呼啊……%CALLNAME:MASTER%さん……」
		CASE 4
			PRINTFORMW 「嗯……嗯唔……」
		CASEELSE
			PRINTFORMW 「呱啦~……呼~……」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲＆同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			分岐 = RAND:10
			PRINTL
			PRINTFORML 「嗯……喵嗯……哈」
			IF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 2
				IF GROUPMATCH(分岐, 1, 2, 3) || TALENT:70:心情 == 1
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好~♪」
					IF CFLAG:70:1001 == DAY - 1
						PRINTFORML 「嘻嘻❤昨天真是太棒了♪」
						PRINTFORMW 「下次再来吧♪」
						TALENT:70:心情 = 1
					ELSE
						PRINTFORMW 「嘻嘻♪梦里出现了%CALLNAME:MASTER%さん…❤」
					ENDIF
				ELSEIF 分岐 == 0 || TALENT:70:心情 == -1
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好……」
					PRINTL
					PRINTFORMDL 小鈴似乎正在气头上……
					PRINTFORMDL 也许是昨天做了什么让她不高兴的事……
					PRINTW
					PRINTFORMW 「怎么了吗~?脸上沾到什么了吗ー?」
					TALENT:70:心情 = -1
				ELSEIF GROUPMATCH(分岐, 4, 5, 6)
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好ー」
					PRINTFORMW 「呼呼呼♪一睁眼就能看到%CALLNAME:MASTER%さん的脸,感觉真好~」
				ELSE
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん,早上好ー」
					IF GET_MONTH() == "春の月"
						PRINTFORML 「已经变暖和了不少呢」
						PRINTFORMW 「再睡一会儿的心情……」
					ELSEIF GET_MONTH() == "夏の月"
						PRINTFORML 「今天又这么热呢……」
						PRINTFORMW 「%CALLNAME:MASTER%さん,汗没出多吧?」
					ELSEIF GET_MONTH() == "秋の月"
						PRINTFORML 「已经变冷了不少呢」
						PRINTFORMW 「%CALLNAME:MASTER%さん,请给我取暖吧……❤」
						;＞＜*
					ELSEIF GET_MONTH() == "冬の月"
						PRINTFORML 「今天会更冷呢……」
						PRINTFORMW 「呜呜……真的不想从被窝里出来……」
					ENDIF
				ENDIF
			ELSE
				PRINTFORMW 「……咦?%CALLNAME:MASTER%さん?这里是……」
				PRINTFORMW 「啊,对了,我……抱、抱歉……❤」
			ENDIF
			;最後に会った日
			CFLAG:70:1002 = DAY
			;一日一回
			SETBIT TCVAR:70:360, 3
			;最初から不機嫌かどうか
			SIF TALENT:[[小鈴]]:心情 < 0
				TCVAR:[[小鈴]]:380 = 1
			RETURN 1
		ENDIF
;		;-------------------------------------------------
;		;同棲中
;		;記入チェック（=0, 非表示、1, 表示）
;		LOCAL:1 = 1
;		;-------------------------------------------------

		;統合しました

	ENDIF
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K70_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰って寝る（～は【現在地】から【キャラの自室】に戻りました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF ARG:1
			;デート中に眠くて帰って寝る（拠点キャラのみ）
			IF TALENT:[[小鈴]]:恋慕
				SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「呼呀~……」
					PRINTFORMW 「%CALLNAME:MASTER%さん,我已经好困了~……」
				CASE 2
					PRINTFORML 「啊,都这个时间了!」
					PRINTFORMW 「这么晚继续下去会有危险的,我们回去吧」
				CASEELSE
					PRINTFORML 「已经完全黑下来了呢……」
					PRINTFORMW 「虽然遗憾,但要回去了」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「%CALLNAME:MASTER%さん,要不要回去了呢……?」
				CASE 2
					PRINTFORMW 「对不起,我已经很困了……」
				CASEELSE
					PRINTFORMW 「天已经黑了,我们该回村子里了」
				ENDSELECT
			ENDIF
		ELSEIF CFLAG:诶嘿嘿
			;うふふ中に眠くて自室に帰って寝る（拠点キャラのみ）
			PRINTFORML 「呼呀~……」
			PRINTFORMW 「对不起…我已经好困了……呼啊」
			PRINTL
			PRINTFORMDW 没办法,%CALLNAME:MASTER%只能背着已经睡意朦胧的小鈴回到房间。
		;里在住
		ELSEIF MAIN_MAP == 2
			;同棲中
			IF CFLAG:MASTER:初期位置 == CFLAG:[[小鈴]]:初期位置
				SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「呼呀……我先去睡了哦……」
				CASE 2
					PRINTFORMW 「呼啊……我要睡了~……」
				CASE 3
					PRINTFORMW 「喵嗯……已经到极限了~……」
				CASE 4
					PRINTFORMW 「啊…眼皮好重……要睡了……」
				CASEELSE
					PRINTFORMW 「失陪了~……呜呜……」
				ENDSELECT
			ELSE
				SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「呼呀……已经困了……」
				CASE 2
					PRINTFORMW 「喵嗯……该睡觉了呢……」
				CASE 3
					PRINTFORMW 「呼啊……今天好累呢……」
				CASE 4
					PRINTFORMW 「嗯嗯……要睡了哦……」
				CASEELSE
					PRINTFORMW 「我就到这里……喵嗯」
				ENDSELECT
			ENDIF
			;おやすみセット
			CALL M_KOJO_EVENT_K70_3_OYASUMI
		;それ以外
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「呼呀……今天好累啊……」
			CASE 2
				PRINTFORMW 「该回去了呢……」
			CASEELSE
				PRINTFORMW 「已经全黑了呢……」
			ENDSELECT
			;おやすみセット
			CALL M_KOJO_EVENT_K70_3_OYASUMI
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている（～は眠そうにしている）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「呼呀……好困~……」
		CASE 2
			PRINTFORMW 「嗯~……哈欠~……」
		CASE 3
			PRINTFORMW 「嗯……呜呜……」
		CASE 4
			PRINTFORMW 「呼啊……困了……」
		CASEELSE
			PRINTFORMW 「好困呢……」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（～は眠っている）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE RAND:7
		CASE 1, 2
		    PRINTFORMW 「呼……呼……」
		CASE 3, 4
		    PRINTFORMW 「呜呜……呼……」
		CASE 5, 6
		    PRINTFORMW 「嗯……呵呵……」
		CASEELSE
		    PRINTFORMW 「呼啊……困了……困了……」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱して寝る（体力500以下,うふふ時はうふふ強制終了）
	;（キャラの自室以外：～を【現在地】から【キャラの自室】に運びました）
	;（キャラの自室　　：～は疲れたと言って、横になりました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「哈……哈……」
		PRINTFORMW 「对不起%CALLNAME:MASTER%さん,不知怎的有点累了……呜呜……」
		IF M_KOJO_K70_SUZUNAAN(CFLAG:MASTER:現在位置) != 2
			PRINTL
			PRINTFORMDW %CALLNAME:MASTER%背起力竭的小鈴回到了房间。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（恋慕のみ,そのまま一日が終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW 「啊啊!!%CALLNAME:MASTER%さん,您没事吧!?」
		IF BASE:MASTER:酒気 >= MAXBASE:MASTER:酒気
			PRINTFORML 「原来%CALLNAME:MASTER%さん那么不能喝酒呢……」
			PRINTFORMW 「不对!!总之先让您躺下」
		ELSE
			IF ARG:1
				;在自己房间倒下,(~把【MASTER】抱到床上……)
				PRINTFORML 「对不起,让您太劳累了……」
				PRINTFORMW 「请在这里好好休息吧……」
			ELSE
				;被背到房间,(~把【MASTER】背回了房间……)
				PRINTFORML 「那个,要怎么办呢……」
				PRINTFORMW 「%CALLNAME:MASTER%さん的房间在……」
			ENDIF
		ENDIF
		PRINTFORMW 「嗯唔!哎,好重啊……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た（【TARGET】が部屋に戻ってきた→寝間着へと着替え、寝床に潜った）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			IF DAY % 12 == 0
				PRINTFORMW 「啊,%CALLNAME:MASTER%さん! 我好~累了!」
				PRINTL
				PRINTFORMDL 小鈴用力扑到%CALLNAME:MASTER%怀里,然后一起拉倒在床上。
				PRINTW
				PRINTFORMW 「一起睡吧~❤」
			ELSE
				SELECTCASE RAND:4
				CASE 1
  					  PRINTFORMW 「啊,%CALLNAME:MASTER%さん……失陪了哦」
				CASE 2
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん……我要睡了哟~」
				CASE 3
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん……我好累啊」
				CASEELSE
					PRINTFORMW 「啊,%CALLNAME:MASTER%さん……我要睡了~」
				ENDSELECT
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「晚安啦……喵嗯……」
				CASE 2
					PRINTFORMW 「那我先睡了哟~……」
				CASE 3
					PRINTFORMW 「已经……困了……晚安呼……」
				CASEELSE
					PRINTFORMW 「要一起的话……呜呜……」
				ENDSELECT
				RETURN 1
			ENDIF
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された（眠そうな【TARGET】に追い出された…）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF CFLAG:[[小鈴]]:前一次的位置 == CFLAG:[[小鈴]]:現在位置
				;前のターンまで一緒に部屋にいた
				PRINTFORMW 「对不起,我要睡了,就到这里吧……」
			ELSE
				;为了睡觉而回到房间
				PRINTFORML 「啊,%CALLNAME:MASTER%さん……」
				PRINTFORMW 「对不起,我要睡了,就到这里吧……」
			ENDIF
			;おやすみセット
			CALL M_KOJO_EVENT_K70_3_OYASUMI
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た（【TARGET】が部屋に戻ってきた→唇をとがらせる【TARGET】に、【MASTER】は渋々【Ｈの相手】から離れた）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「怎么可以随便进入别人的房间!」
			PRINTFORMW 「快给我出去!」
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;来訪キャラが拠点で休憩（～は疲れ切っている→ちょっと休んでいきなよ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW 「对不起,%CALLNAME:MASTER%さん……给您添麻烦了……」
		PRINTFORMW 「呼呀~……呜呜……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝室に居る状態でその場で寝る（～は眠気に負け、眠りについた…）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF CFLAG:诶嘿嘿
			;うふふ中に寝る
			PRINTFORMW 「呼呀~……」
			PRINTFORMW 「对不起%CALLNAME:MASTER%さん,我太困了…呜呜……」
			PRINTL
			PRINTFORMDW 无奈之下,%CALLNAME:MASTER%给眼睛睁不开的小鈴盖上了被子。
		ELSE
			SELECTCASE RAND:5
			CASE 1
				PRINTFORMW 「呼啊~……我先睡了哟……」
			CASE 2
				PRINTFORMW 「呼啊~……我要睡了~……」
			CASE 3
				PRINTFORMW 「呼啊~……好困啊……」
			CASE 4
				PRINTFORMW 「呼啊~……今天好累呢……」
			CASEELSE
				PRINTFORMW 「呼啊~……已经到极限了~……」
			ENDSELECT
			PRINTFORMW 「%CALLNAME:MASTER%さん,晚安……」
			SIF TALENT:[[小鈴]]:恋慕
				PRINTFORMW 「……能在我身边陪到天亮吗……?」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;拠点外で自宅前に居るキャラが自室に帰って寝る（眠くなった～は自室に帰って行きました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「呼……越来越想睡了……」
		CASE 2
			PRINTFORMW 「呼……该睡觉了……」
		CASEELSE
			PRINTFORMW 「呼……今天好累啊……」
		ENDSELECT
		PRINTFORMW 「那么,晚安……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;小鈴のおやすみセット（拠点用）
@M_KOJO_EVENT_K70_3_OYASUMI
IF ABL:[[小鈴]]:親密 < 5
	PRINTFORMW 「晚安……」
ELSE
	SELECTCASE RAND:6
	CASE 1
	    PRINTFORMW 「晚安%CALLNAME:MASTER%さん……」
	CASE 2
	    PRINTFORMW 「%CALLNAME:MASTER%さん,晚安……」
	CASE 3
	    PRINTFORMW 「晚安啦……喵嗯……」
	CASE 4
	    PRINTFORMW 「那么晚安了~……」
	CASE 5
	    PRINTFORMW 「晚安呼……」
	CASEELSE
		IF TALENT:[[小鈴]]:恋慕
	        PRINTFORMW 「%CALLNAME:MASTER%さん,一起……不是的,什么也不是!」
		ELSE
	        PRINTFORMW 「晚安……」
    ENDIF
	ENDSELECT
ENDIF

;;==================================================
;;移動時すれちがい
;;==================================================
;@M_KOJO_EVENT_K70_4(ARG,ARG:1)
;;口上主はTARGET
;;--------------------------------------------------
;;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;;-------------
;
;IF LOCAL
;	;-------------------------------------------------
;	;小分岐
;	;-------------------------------------------------
;	;立ち止まった
;	;この後遭遇口上に接続
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 1
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;軽く会釈して通り過ぎた
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 2
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;無視して通り過ぎた
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 3
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;その他
;	PRINTFORML
;ENDIF
;RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == [[霊夢]]
		PRINTFORMW 「啊，灵梦小姐，%M_KOJO_K70_AISATSU()%～」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;魔理沙が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == [[魔理沙]]
		PRINTFORMW 「啊，魔理沙小姐，%M_KOJO_K70_AISATSU()%～」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;紫が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == [[紫]]
		PRINTFORMW 「啊！ 喂，紫小姐……%M_KOJO_K70_AISATSU()%……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;文が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == [[文]]
		PRINTFORMW 「啊！ 喂，文小姐！ 这个是，那个……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;猯藏が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == [[猯藏]]
	    PRINTFORMW 「啊！ 猯藏小姐！ 这个是，那个……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;阿求が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == [[阿求]]
		SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
		CASE "独占", "信頼"
			PRINTFORMW 「阿求!别插手啦,正好到兴头上呢!」
		CASE "悲恋", "揶揄"
			;阿求是恋人却在这里么……?
			PRINTFORMW 「阿求!抱、抱歉呢……啊哈」
		CASE "敵対", "恋慕"
			PRINTFORMW 「阿求!别插手啦,正好到兴头上呢!你去别处玩去!」
		CASEELSE
			PRINTFORMW 「怎么是阿求呢,看看氛围好不好」
		ENDSELECT
		RETURN 1
	ENDIF
	;其他
	SELECTCASE RAND:6
	CASE 1
		PRINTFORML 「啊,来人了呢……」
	CASE 2
		PRINTFORML 「唔~……正好到好处呢……」
	CASE 3
		PRINTFORML 「啊,来人了……咳嗯」
	CASE 4
		PRINTFORML 「对、对不起,有点太近了吧……」
	CASE 5
		PRINTFORML 「啊~……我们保持点距离吧……」
	CASEELSE
		PRINTFORML 「唔唔……就到这里吧……」
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K70_6(ARG,ARG:1)
;口上主はTARGET
;ARGに情事相手
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（馴れ合い度:低）＆気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && (ARG:1 == 1 || ARG:1 == 3)
		IF TALENT:70:恋人
			PRINTFORML 「あっ！！！」
			;霊夢と
			IF ARG == 1
				PRINTFORMW 「れ……灵梦小姐……?」
				PRINTFORMW 「是这样吗……对不起」
			;和魔理沙
			ELSEIF ARG == 11
				PRINTFORMW 「ま……魔理沙小姐……?」
				PRINTFORMW 「是这样吗……对不起」
			;和紫
			ELSEIF ARG == 26
				PRINTFORMW 「ゆ……紫小姐っ……!? 再、再见了!」
				PRINTFORMW  (%CALLNAME:MASTER%さん……没事吧……)
			;和文
			ELSEIF ARG == 29
				PRINTFORMW 「啊……文小姐……?」
				PRINTFORMW 「怎么会…………」
			;和猯藏
			ELSEIF ARG == 69
				PRINTFORMW 「マ……猯藏小姐っ……!? 再、再见了!」
				PRINTFORMW  (%CALLNAME:MASTER%さん……没事吧……)
			;和阿求
			ELSEIF ARG == 80
				PRINTFORMW 「啊……阿求!?」
				PRINTFORMW 「%CALLNAME:MASTER%さん你这个白痴ーーーっっっ!!」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%さん……太过分了……呜咕……」
			ENDIF
		ELSEIF TALENT:70:恋慕
			PRINTFORML 「啊!!」
			;和灵梦
			IF ARG == 1
				PRINTFORMW 「れ……灵梦小姐……?」
				PRINTFORMW 「那、那么再见了…………」
			;和魔理沙
			ELSEIF ARG == 11
				PRINTFORMW 「ま……魔理沙小姐……?」
				PRINTFORMW 「那、那么再见了…………」
			;和紫
			ELSEIF ARG == 26
				PRINTFORMW 「ゆ……紫小姐っ……!? 那、那么再见了!」
				PRINTFORMW  (%CALLNAME:MASTER%さん……没事吧……)
			;和文
			ELSEIF ARG == 29
				PRINTFORMW 「啊……文小姐……?」
				PRINTFORMW 「不会吧…………」
			;和猯藏
			ELSEIF ARG == 69
				PRINTFORMW 「マ……猯藏小姐っ……!? 那、那么再见了!」
				PRINTFORMW  (%CALLNAME:MASTER%さん……没事吧……)
			;和阿求
			ELSEIF ARG == 80
				SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
				CASE "信頼", "揶揄", "応援"
					PRINTFORMW 「啊……阿求!?」
					PRINTFORMW 「对、对不起!慢慢欣赏吧ー…♪」
				CASEELSE
					PRINTFORMW 「啊……阿求!?」
					PRINTFORMW 「呜呜……%CALLNAME:MASTER%さん你这个白痴……!」
				ENDSELECT
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%さん……白痴……」
			ENDIF
		ELSE
			PRINTFORML 「啊!」
			;和灵梦
			IF ARG == 1
				PRINTFORMW 「れ……灵梦小姐……?」
				PRINTFORMW 「啊,那个,请、请慢慢享受……」
			;和魔理沙
			ELSEIF ARG == 11
				PRINTFORMW 「ま……魔理沙小姐……?」
				PRINTFORMW 「啊,那个,请、请慢慢享受……」
			;和紫
			ELSEIF ARG == 26
				PRINTFORMW 「ゆ……紫小姐っ……!? 非、非常抱歉!」
				PRINTFORMW  (%CALLNAME:MASTER%さん……没事吧……)
			;和文
			ELSEIF ARG == 29
				PRINTFORMW 「啊……文小姐……?」
				PRINTFORMW 「嗯,那个,请多保重……」
			;和猯藏
			ELSEIF ARG == 69
				PRINTFORMW 「マ……猯藏小姐っ……!? 非、非常抱歉!」
				PRINTFORMW  (%CALLNAME:MASTER%さん……没事吧……)
			;和阿求
			ELSEIF ARG == 80
				SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
				CASE "信頼", "揶揄", "応援"
					PRINTFORMW 「啊……阿求!?」
					PRINTFORMW 「对、对不起!请慢慢欣赏吧ー…♪」
				CASEELSE
					PRINTFORMW 「啊……阿求!?」
					PRINTFORMW 「嗯,那个,对、对啊,哈哈」
				ENDSELECT
			ELSE
				PRINTFORMW 「啊,那个,请、请慢慢享受……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		;かわいい
		IF TALENT:70:恋人
			PRINTFORML 「あっ！！」
			;和霊夢
			IF ARG == 1
				PRINTFORMW 「呀,霊夢小姐!! 不可以的哦!!」
				PRINTFORMW 「%CALLNAME:MASTER%是我一个人的哦~!」
			;和魔理沙
			ELSEIF ARG == 11
				PRINTFORMW 「喂,魔理沙小姐!! 不可以的哦!!」
				PRINTFORMW 「%CALLNAME:MASTER%是我一个人的哦~!」
			;和紫
			ELSEIF ARG == 26
				PRINTFORMW 「紫、紫小姐!! 不、不可以的!」
				PRINTFORMW 「%CALLNAME:MASTER%我会好好保护的!」
			;和文
			ELSEIF ARG == 29
				PRINTFORMW 「诶,文小姐!! 不可以的哦!!」
				PRINTFORMW 「%CALLNAME:MASTER%是我一个人的哦~!」
			;和马米兹
			ELSEIF ARG == 69
				PRINTFORMW 「猯、猯藏!! 不、不可以的!」
				PRINTFORMW 「%CALLNAME:MASTER%我会好好保护的!」
			;和阿求
			ELSEIF ARG == 80
				PRINTFORMW 「咦,阿求!! 不行啦!!」
				PRINTFORMW 「%CALLNAME:MASTER%明明是我一个人的呜~!」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%! 太过分了!」
				PRINTFORMW 「也让我参与嘛!」
			ENDIF
		;恋慕と非恋慕では分けません,非恋慕でも十分仲良くなってると想定しているので
		ELSE
			PRINTFORML 「あっ！！」
			;和霊夢
			IF ARG == 1
				PRINTFORMW 「呜,霊夢小姐……!」
				PRINTFORMW 「呵呵……❤ 也让我参与吧♪」
			;和魔理沙
			ELSEIF ARG == 11
				PRINTFORMW 「嘿,魔理沙小姐……!」
				PRINTFORMW 「呵呵……❤ 也让我参与吧♪」
			;和紫
			ELSEIF ARG == 26
				PRINTFORMW 「紫、紫小姐!?」
				PRINTFORMW 「不、不可以!我、我也要一起……!」
			;和文
			ELSEIF ARG == 29
				PRINTFORMW 「诶,文小姐……!」
				PRINTFORMW 「呵呵……❤ 也让我参与吧♪」
			;和马米兹
			ELSEIF ARG == 69
				PRINTFORMW 「猯、猯藏小姐!?」
				PRINTFORMW 「不、不可以!我、我也要一起……!」
			;和阿求
			ELSEIF ARG == 80
					PRINTFORMW 「咦,阿求!?」
					SELECTCASE M_KOJO_K70_BALANCE([[小鈴]],[[阿求]])
				CASE "悲恋"
					PRINTFORMW 「没关系,我就是阿求的后辈也可以……!」
					PRINTFORMW 「所以请不要抛下我……!」
				CASE "信頼"
					PRINTFORMW 「喂!不是说过不许独占的吗!」
					PRINTFORMW 「一起让%CALLNAME:MASTER%舒服起来吧♪」
				CASE "敵対", "恋慕"
					PRINTFORMW 「不行ー!%CALLNAME:MASTER%我绝不会让出去的!!」
				CASE "揶揄"
					PRINTFORMW 「真是的!阿求那么狡猾!」
					PRINTFORMW 「%CALLNAME:MASTER%并不只属于阿求一个人的哦ー!」
					;自己的时候就是自己一个人的,女孩子就是这样
				CASEELSE
					PRINTFORMW 「嗯,对不起……♪要、要是方便的话我也参与吧……❤」
				ENDSELECT
			ELSE
				PRINTFORMW 「怎么这样,%CALLNAME:MASTER%……!」
				PRINTFORMW 「请不要丢下我~!」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
;	;-------------------------------------------------
;	;気まずそうに立ち去る
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 1
;	;-------------------------------------------------

	;統合しました

;	;-------------------------------------------------
;	;MASTERに誘われて参加
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	;IF LOCAL:1 && ARG:1 == 4
;		;PRINTFORML
;		;RETURN 1
;	;ENDIF
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K70_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の馴れ合い度:低）＆目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && (ARG:1 == 1 || ARG:1 == 3)
		;被灵梦看到了
        IF ARG == 1
            PRINTFORMW 「啊哈哈……灵梦小姐,慌张了吧……♪」
        ;被魔理沙看到了
        ELSEIF ARG == 11
            PRINTFORMW 「啊哈哈……魔理沙小姐,慌张了吧……♪」
        ;被紫看到了
        ELSEIF ARG == 26
            PRINTFORMW 「啊嘛嘛……我们没事吧……?」
        ;被文看到了
        ELSEIF ARG == 29
            PRINTFORMW 「啊哈哈……被抓拍了吧……」
        ;被猯藏看到了
        ELSEIF ARG == 69
            PRINTFORMW 「啊嘛嘛……我们没事吧……?」
        ;被阿求看到了
        ELSEIF ARG == 80
            SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
            CASE "独占", "信頼", "恋慕", "平穏"
                PRINTFORMW 「唔哼……如果是阿求的话,我没关系的……」
            CASE "悲恋", "敵対"
                PRINTFORMW 「唔呼❤ 感觉很好哦♪」
            CASE "揶揄", "応援"
                PRINTFORMW 「啊……对不起阿求……不是那个意思的啦……」
            ENDSELECT
        ELSE
            PRINTFORMW 「啊哈哈……就不要纠结了吧……♪」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		;灵梦参战了
        IF ARG == 1
            PRINTFORMW 「唔嗯❤ 和灵梦小姐一起吗……♪」
        ;魔理沙参战了
        ELSEIF ARG == 11
            PRINTFORMW 「唔嗯❤ 和魔理沙小姐一起吗……♪」
        ;紫参战了
        ELSEIF ARG == 26
            PRINTFORMW 「哇哇……紫、紫小姐也一起吗~~」
        ;文参战了
        ELSEIF ARG == 29
            PRINTFORMW 「哎唷♪ 文小姐您也喜欢的样子吧~❤」
        ;魔蛮象参战了
        ELSEIF ARG == 69
            PRINTFORMW 「哇哇……猯、猯藏小姐也一起吗~~」
        ;阿求参战了
        ELSEIF ARG == 80
            SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
            CASE "独占", "信頼", "平穏"
                PRINTFORMW 「来吧阿求! 一起让%CALLNAME:MASTER%さん舒服起来吧♪」
            CASE "悲恋"
                PRINTFORMW 「唔哼,没办法呢」
            CASE "敵対", "恋慕"
                PRINTFORMW 「啧……! 来吧,比赛看看阿求!!」
            CASEELSE
                PRINTFORMW 「对不起了阿求♪ %CALLNAME:MASTER%さん,让我多多疼爱你❤」
            ENDSELECT
        ELSE
            PRINTFORMW 「呵呵…❤ 我没问题的❤」
        ENDIF
		RETURN 1
	ENDIF
;	;-------------------------------------------------
;	;目撃者が立ち去る
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 1
;	;-------------------------------------------------

	;統合しました

;	;-------------------------------------------------
;	;MASTERに誘われて目撃者も参加
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	;IF LOCAL:1 && ARG:1 == 4
;		;PRINTFORML
;		;RETURN 1
;	;ENDIF
ENDIF
RETURN 1

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

;==================================================
;パンツ没収された
;==================================================
@M_KOJO_EVENT_K70_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF FIRSTTIME("パンツ没収")
            PRINTFORMW 「哎呀? %CALLNAME:MASTER%さん,掉了哦」
            PRINTFORMW 「这是什么呀……」
            PRINTL
            PRINTFORMDL %CALLNAME:MASTER%慌忙夺回了战利品!
            PRINTW
            PRINTFORMW 「诶……%CALLNAME:MASTER%さん……啊,您……!」
            PRINTFORMW 「哈啊……太过分了……真恶心……请不要靠近我……」
        ELSE
            PRINTFORMW 「哎? %CALLNAME:MASTER%小……」
            PRINTFORMW 「%CALLNAME:MASTER%さん!? 您又在……!!」
            PRINTL
            PRINTFORMDL %CALLNAME:MASTER%以迅雷不及掩耳之势夺回了战利品!
            PRINTW
            PRINTFORMW 「难道说,您一直在收集吗……?」
            PRINTFORMW 「太过分了……简直下流无耻……总有一天会被内裤妖怪附身的……」
            PRINTFORMW 「到时候我一定告诉灵梦小姐,请她不吝赐教……」
        ENDIF
		TCVAR:70:350 = 3
		TALENT:70:心情 = -1
		CALL M_KOJO_K70_YAMETEKUDASAI(70, 2, 1)
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;押し倒した
;==================================================
@M_KOJO_EVENT_K70_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;うふふ==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを押し倒した（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			;こすずちゃん妖気モード
			SELECTCASE RAND:9
			CASE 1
				PRINTFORML 「啊哈……❤」
				PRINTFORML 「%CALLNAME:MASTER%さん,如此无防备……❤」
			CASE 2
				PRINTFORML 「对不起%CALLNAME:MASTER%さん……」
				PRINTFORML 「我再也忍不住了……❤」
			CASE 3
				PRINTFORML 「哎呀,%CALLNAME:MASTER%さん」
				PRINTFORML 「被我的力量压倒,莫非您就是在期待吗~?」
			CASE 4
				PRINTFORML 「呵呵……❤」
				PRINTFORML 「%CALLNAME:MASTER%さん……逃不掉的❤」
			CASE 5
				PRINTFORML 「%CALLNAME:MASTER%さん,不能掉以轻心呢」
				PRINTFORML 「幻想乡到处都是危险的东西❤」
			CASE 6
				PRINTFORML 「%CALLNAME:MASTER%さん,您这么坏嘛…?」
				PRINTFORML 「刚刚一直用猥亵的眼光看着我吧?」
			CASE 7
				PRINTFORML 「哈啊…哈啊……❤」
				PRINTFORML 「%CALLNAME:MASTER%さん的气味……我忍不住了…❤」
			CASE 8
				PRINTFORML 「啊……❤%CALLNAME:MASTER%さん……❤」
				PRINTFORML 「怎么会有这么好闻的气味…❤ 怎么会有这么完美的身体…❤」
			CASEELSE
				PRINTFORML 「啊!%CALLNAME:MASTER%さん,太弱了!」
				PRINTFORML 「竟然会让我…对您起了邪念……❤」
			ENDSELECT
			IF TALENT:70:恋慕
				IF M_KOJO_K70_SADISTIC(70)
					SELECTCASE RAND:6
					CASE 1
						PRINTFORMW 「……没关系的……会让您不痛苦的…❤」
					CASE 2
						PRINTFORMW 「……会狠狠地折磨您的…❤」
					CASE 3
						PRINTFORMW 「……这正是您所希望的对吧♪ 我明白的…❤」
					CASE 4
						PRINTFORMW 「……呵呵♪ 您真会撩拨人心啊…❤」
					CASE 4
						PRINTFORMW 「……请不要受伤哦…❤」
					CASEELSE
						PRINTFORMW 「……今天要如何对您呢…❤」
					ENDSELECT
				ELSE
					SELECTCASE RAND:6
					CASE 1
						PRINTFORMW 「……没关系的……会温柔对您的…❤」
					CASE 2
						PRINTFORMW 「……可以放心依靠我…❤」
					CASE 3
						PRINTFORMW 「……您已经在勾引我了吧…❤」
					CASE 4
						PRINTFORMW 「……因为%CALLNAME:MASTER%さん注视我的眼神…❤」
					CASE 5
						PRINTFORMW 「……现在您是属于我的…❤」
					CASEELSE
						PRINTFORMW 「……%CALLNAME:MASTER%さん……喜欢您…❤」
					ENDSELECT
				ENDIF
			ELSE
				PRINTFORMW 「下次为您服务吧……❤」
			ENDIF
			;如果怀孕中
			IF TALENT:70:妊娠 && CFLAG:70:妊娠自覚状態 == 1
				PRINTFORML
				PRINTFORMW 「啊……! 我肚子里有宝宝,请温柔一点哦?」
			;如果是危险日
			ELSEIF CFLAG:70:生理周期 == 7 && !TALENT:70:妊娠 && CFLAG:70:允许无套 == 2
				PRINTFORML
				PRINTFORMW (呵呵……❤ 真期待呢~♪)
				;使い方ちがくないですかぁ？
			ENDIF
			TCVAR:70:351 = 1
			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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE ARG:1
		CASE 0
			;抜け出した
			IF TALENT:70:恋慕
				;如果怀孕
                IF TALENT:70:妊娠 && CFLAG:70:妊娠自覚状態 == 1
                    PRINTFORML 「啊……没办法呢……」
                    PRINTFORMW 「要珍惜宝宝嘛……」
                ;如果是危险日
                ELSEIF CFLAG:70:生理周期 == 7 && !TALENT:70:妊娠 && CFLAG:70:允许无套 == 2
                    PRINTFORML 「啊……不过嘛……」
                    PRINTFORMW 「这还不够哟——!」
                ELSE
                    SELECTCASE RAND:5
                    CASE 1
                        PRINTFORML 「啊……」
                        PRINTFORMW 「%CALLNAME:MASTER%さん太吝啬了……」
                    CASE 2
                        PRINTFORML 「对、对不起……」
                        PRINTFORMW 「%CALLNAME:MASTER%さん,这种程度您不喜欢吧……」
                    CASE 3
                        PRINTFORML 「那、那个嘛……」
                        PRINTFORMW 「明明刚刚进入正题了~!」
                    CASE 4
                        PRINTFORML 「抱、抱歉……」
                        PRINTFORMW 「我有点得意忘形了……」
                    CASEELSE
                        PRINTFORML 「嗯~……」
                        PRINTFORMW 「但是,我会忍耐的……」
                    ENDSELECT
                ENDIF
            ELSE
                PRINTFORML 「啊……」
                PRINTFORMW 「对、对不起,我不小心……!」
            ENDIF
		CASE 1
;		;抱き着きモード満足終了
;			RETURN 1
;		CASE 2
;		;抱き着きモード強制終了
;			RETURN 1
		ENDSELECT
		TCVAR:70:351 = 0
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;抜け出す失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE ARG:1
		CASE 1
		;好きにして状態から抜け出せなかった
			SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「不行~❤」
				PRINTFORMW 「您不知道吗?从小兔子的嘴这里是逃不掉的!」
			CASE 2
				PRINTFORML 「真遗憾❤」
				PRINTFORMW 「今天我已经决定要彻底榨干您了❤」
			CASEELSE
				PRINTFORML 「逃跑是没用的哦~❤ %CALLNAME:MASTER%さ~ん!」
				PRINTFORMW 「今天的您是我的宠物呢~♪」
			ENDSELECT
			RETURN 1
		CASE 2
        ;欲求不满,跑不掉了
			SELECTCASE RAND:5
			CASE 1
	            PRINTFORMW 「不行~!还不够呢~!」
	        CASE 2
	            PRINTFORML 「对不起!再多一点可以吗!」
	            PRINTFORMW 「我也有想做的事啊~!」
	        CASE 3
	            PRINTFORML 「啊!等一下!」
	            PRINTFORMW 「再多一点,就一点点!」
	        CASE 4
	            PRINTFORMW 「徒劳无用!❤轮到我了!」
	        CASEELSE
 	            PRINTFORMW 「对不起%CALLNAME:MASTER%さん,我也有想做的时候啊~!」
	        ENDSELECT
			RETURN 1
		ENDSELECT
	ENDIF
	;-------------------------------------------------
	;誘ってきた（人目につかない場所に行きたがるやつ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		SELECTCASE ARG:1
	    CASE IS < 600
	        PRINTFORML 「那个,%CALLNAME:MASTER%さん……要不要找个地方短暂休息一下呢……?」
	    CASE IS < 800
	        PRINTFORML 「那个,%CALLNAME:MASTER%さん……我从刚才开始心跳就没停过呢……❤」
	    CASEELSE
	        PRINTFORML 「%CALLNAME:MASTER%さん……我已经……❤」
	    ENDSELECT
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K70_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「呀啊ーーー!!」
		PRINTFORMW 「进、进来了ーーー!!❤」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;阿求也在
		IF CFLAG:80:同行
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……啊,阿求……」
			PRINTFORMW 「嘻嘻❤ 一起来吧♪」
		;灵梦也在
		ELSEIF CFLAG:1:同行
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……灵、灵梦小姐……」
			PRINTFORMW 「啊……一、一起来吧……」
		;魔理沙也在
		ELSEIF CFLAG:11:同行
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……魔、魔理沙小姐……」
			PRINTFORMW 「啊……一、一起来吧……」
		;紫也在
		ELSEIF CFLAG:26:同行
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……紫、紫小姐……」
			PRINTFORMW 「啊……一、一起来吧……」
		;文也在
		ELSEIF CFLAG:29:同行
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……文、文小姐……」
			PRINTFORMW 「啊……一、一起来吧……」
		;猯藏也在
		ELSEIF CFLAG:69:同行
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……猯、猯藏小姐……」
			PRINTFORMW 「啊……一、一起来吧……」
		ELSE
			PRINTFORML 「呀!%CALLNAME:MASTER%さん……!」
			PRINTFORMW 「一、一起来可以吗……❤」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K70_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:2
		CASE 1
			PRINTFORML 「……嗯!」
		CASEELSE
			PRINTFORML 「……嗯嗯!」
		ENDSELECT
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「请、请出去!!」
		CASEELSE
			PRINTFORMW 「请、请不要打扰我!!」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「呜……哈……」
		CASE 2
			PRINTFORMW 「嗯嗯……呜呜……」
		CASEELSE
			PRINTFORMW 「呼……呼……」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && (ARG:1 == 2 || ARG:1 == 3)
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「呜……哈……嗯!」
		CASE 2
			PRINTFORMW 「嗯嗯……呜呜……嗯!」
		CASEELSE
			PRINTFORMW 「呼……呼……嗯!」
		ENDSELECT
		;可能是多余的分支
		IF CFLAG:MASTER:初期位置 == CFLAG:70:初期位置
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「%CALLNAME:MASTER%さん……您醒着吗……」
			CASE 2
				PRINTFORMW 「呜……%CALLNAME:MASTER%さん……晚安……」
			CASEELSE
				PRINTFORMW 「呼……%CALLNAME:MASTER%さん……一个人好寂寞呢~……」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「怎么回事……%CALLNAME:MASTER%さん吗……吓了一跳……」
			CASE 2
				PRINTFORMW 「呜……%CALLNAME:MASTER%さん……? 您怎么了吗……?」
			CASEELSE
				PRINTFORMW 「呼……%CALLNAME:MASTER%さん……一起……」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------

	;統合しました

	;-----------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && (ARG:1 == 4 || ARG:1 == 5)
		SELECTCASE RAND:2
		CASE 1
			PRINTFORML 「……嗯!」
		CASEELSE
			PRINTFORML 「……嗯嗯!」
		ENDSELECT
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「这、这是非法入侵!请出去!」
		CASE 2
			PRINTFORMW 「您、您在做什么啊!!请出去!」
		CASEELSE
			PRINTFORMW 「您、您打算做什么啊!!请出去!」
		ENDSELECT
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------

	;統合しました

ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K70_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている仕事量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;通常の仕事以外（宴会）では発生しない
IF LOCAL && TCVAR:70:357 != TIME && GROUPMATCH(CFLAG:70:職種, 40, 41)
	;連打防止
	TCVAR:70:357 = TIME
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;仕事開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;在铃的房间
		IF M_KOJO_K70_SUZUNAAN(CFLAG:MASTER:現在位置) == 2
			PRINTFORMW 「对不起%CALLNAME:MASTER%さん,我还有工作要做,所以差不多到此为止吧……」
			SIF TALENT:70:恋慕 && PALAM:70:欲情
				PRINTFORMW 「接下来再继续吧……❤」
		ELSEIF CFLAG:MASTER:現在位置 == CFLAG:[[小鈴]]:現在位置
			IF TALENT:70:恋慕
				SELECTCASE RAND:4
				CASE 1
					PRINTFORML 「啊,工作时间到了!」
					PRINTFORMW 「虽然还想继续聊天,但是失陪了~」
				CASE 2
					PRINTFORML 「该去工作了」
					PRINTFORMW 「聊天之后再继续吧」
				CASE 3
					PRINTFORML 「对不起,我要到此为止了……」
					PRINTFORMW 「去工作了~」
				CASEELSE
					PRINTFORML 「我要回家工作去了」
					PRINTFORMW (啊,真想再多待一会儿呢)
				ENDSELECT
			ELSE
				PRINTFORMW 「啊,这个时候,我该回家了」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;店番
		IF CFLAG:70:職種 == 47
			SELECTCASE RAND:10
			CASE 1
				PRINTFORML 「%M_KOJO_K70_AISATSU()%~」
			CASE 2
				PRINTFORML 「这个书是——」
			CASE 3
				PRINTFORML 「欢迎光临~」
			CASE 4
				PRINTFORML 「谢谢您的归还~」
			CASE 5
				PRINTFORML 「如果那里没有的话,那就没有了」
			;半分はまったり
			CASEELSE
				PRINTFORML 「♪～～」
			ENDSELECT
		;蔵書整理
		ELSEIF CFLAG:70:職種 == 40
			;特に要らない気がした
			;WAIT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;仕事終了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	;小鈴の仕事って活動時間外に終わるからデート誘えないのよねー
	IF LOCAL:1 && ARG == 3
		;店番
		IF CFLAG:70:職種 == 47
			;仕事手伝った
			IF GETBIT(TCVAR:70:360, 1)
				IF TALENT:70:恋慕
					PRINTFORML 「ふぅ、好累呀～」
					;同棲中
					IF CFLAG:MASTER:初期位置 == CFLAG:70:初期位置
						SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「能和%CALLNAME:MASTER%さん一起工作真是太棒了♪」
							PRINTFORMW 「如果%CALLNAME:MASTER%さん愿意的话,就这样一直……啊,不不,没什么❤」
						CASE 2
							;老爸会登场吗?
							PRINTFORMW 「多亏了%CALLNAME:MASTER%さん,最近销售额有所提高!」
							PRINTFORMW 「老爸也一直感谢您帮了大忙哦~」
						CASEELSE
							PRINTFORMW 「有%CALLNAME:MASTER%さん在真是帮大忙了~」
							PRINTFORMW 「之后要吃饭吗?洗澡吗?还是……❤」
						ENDSELECT
					ELSE
						PRINTFORMW 「今天辛苦您了!」
						SELECTCASE RAND:5
						CASE 1
							;并不是特别的事件,只是催促搬家
							PRINTFORML 「如果%CALLNAME:MASTER%さん愿意的话,可以正式在我们店里工作哦ー」
							PRINTFORMW 「这样的话,可以住在我们家,或者我的房间里面…同、同居之类的……❤」
						CASEELSE
							PRINTFORMW 「嘻嘻,%CALLNAME:MASTER%さん一起工作真开心♪」
						ENDSELECT
					ENDIF
				ELSE
					PRINTFORML 「唷,辛苦了」
					PRINTFORMW 「报酬之后再给您吧」
				ENDIF
			ELSE
				IF TALENT:70:恋慕
					PRINTFORML 「呼,累死了~」
					PRINTFORMW 「如果%CALLNAME:MASTER%さん能帮忙的话会很感激哦,怎、怎么样?」
				ELSE
					PRINTFORMW 「呼,累死了~」
				ENDIF
			ENDIF
		;蔵書整理
		ELSEIF CFLAG:70:職種 == 40
			;仕事手伝った
			IF GETBIT(TCVAR:70:360, 1)
				IF TALENT:70:恋慕
					PRINTFORML 「唷,辛苦您了~」
					PRINTFORMW 「有%CALLNAME:MASTER%さん帮忙的话,可以更快结束,很感谢♪」
				ELSE
					PRINTFORML 「唷,辛苦您了」
					PRINTFORML 「多亏您的帮助,提早完成了~」
					PRINTFORMW 「太感谢您了ー!」
				ENDIF
			ELSE
				PRINTFORMW 「呼,终于完成了~」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;食事系
;==================================================
@M_KOJO_EVENT_K70_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		;一起做的
		IF DISH_ASSI == 70
			PRINTFORML 「您不吃吗? 那我开始吃了哦」
		;没有做
		ELSE
			PRINTFORML 「哎呀,看起来很好吃♪ 我开动了哦!」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;MASTERが押し倒した
;==================================================
@M_KOJO_EVENT_K70_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（押し倒しコマンドに統合？
	;MASTERが押し倒した（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
			RETURN 1
		ELSEIF GET_TARGETNUM() >= 3
			PRINTFORMW 「哈啊……❤ 辛苦您了……」
		ELSEIF M_KOJO_K70_UFUFU()
			;溜まってる度0ならこの時点でも満足させちゃう
			SIF CFLAG:[[小鈴]]:积攒度 <= 0
				TCVAR:70:355 = 1
			;満足
			IF TCVAR:70:355 && TALENT:70:恋慕
				SELECTCASE RAND:4
				CASE 1
						PRINTFORML 「啊哈……❤ 呵呵❤」
				CASE 2
						PRINTFORML 「哈……哈……嗯❤」
				CASE 4
						PRINTFORML 「哈啊……❤ 啊哈……❤」
				CASEELSE
						PRINTFORML 「嗯……❤ 呵呵呜❤」
				ENDSELECT
				SELECTCASE RAND:5
				CASE 1
						PRINTFORMW 「感觉太棒了~❤ 再做一次吧❤」
				CASE 2
						PRINTFORMW 「最棒了~❤ 感觉要爱上做这个了…❤」
				CASE 3
						PRINTFORMW 「被您照顾了那么多次❤ 太幸福了~❤❤」
				CASE 4
						PRINTFORMW 「太刺激了~❤ 脑袋晕乎乎的❤」
				CASEELSE
						PRINTFORMW 「%CALLNAME:MASTER%最喜欢了❤❤」
				ENDSELECT
				IF EX:70:膣内精液
					IF TALENT:70:妊娠
						PRINTFORMW 「宝宝也喝到了很多牛奶……❤」
					ELSEIF CFLAG:70:生理周期 == 7
						PRINTFORMW 「啊哈❤ 这样会怀宝宝吗❤❤」
					ELSEIF EX:70:膣内精液 < 500
						PRINTFORMW 「啊哈❤ 肚子暖暖的~❤」
					ELSEIF EX:70:膣内精液 < 1000
						PRINTFORMW 「呀啊❤ 牛奶要溢出来了~❤」
					ELSE
						PRINTFORMW 「嘻嘻❤ 满满的幸福感❤」
					ENDIF
				ENDIF
			ELSEIF CFLAG:70:积攒度 < 200
				PRINTFORML 「哈哈……❤」
				PRINTFORMW 「呵呵❤ 我们再来一次吧❤」
			ELSEIF CFLAG:70:积攒度 < 500
				PRINTFORML 「已经够了吗?」
				PRINTFORMW 「还、还想再做一会儿…❤」
			ELSEIF CFLAG:70:积攒度 < 800
				PRINTFORML 「咿!已经结束了吗?」
				PRINTFORMW 「可以再多做一点嘛……❤」
			ELSE
				PRINTFORML 「欸,已经结束了吗……?」
				PRINTFORMW 「哼……还不够哦~!」
			ENDIF
			SELECTCASE M_KOJO_K70_BALANCE([[小鈴]], [[阿求]])
			CASE "揶揄", "応援"
				PRINTFORMW  (啊哈…❤ 对不起阿求……♪)
			CASE "悲恋", "敵対"
				PRINTFORMW  (嘻嘻…❤ 绝对不能输给阿求啦……!)
			ENDSELECT
		ELSE
			PRINTFORMW 「啊……已经结束了吗……?」
		ENDIF
		;発情してたらリセットかける,悩んだけど一律でリセット
		IF TCVAR:[[小鈴]]:発情
			TCVAR:[[小鈴]]:発情 = 0
			;発情してたフラグ（一応）
			TCVAR:[[小鈴]]:383 = 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW (啊…❤ 这个样子出去会很麻烦的…❤)
			CASE 2
				PRINTFORMW 「唔~!这样怎么办好呢~!」
			CASEELSE
				PRINTFORMW (啊…❤ %CALLNAME:MASTER%的牛奶…❤)
			ENDSELECT
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			SELECTCASE RAND:3
			CASE 1
				;为什么要道歉
				PRINTFORMW 「对、对不起!不是故意的!」
			CASE 2
				PRINTFORMW 「啊…❤ 还在兴奋着…❤」
			CASEELSE
				PRINTFORMW 「喀!❤ 好、好害羞……❤」
			ENDSELECT
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後のムード
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			;恋人がいる
			IF TALENT:MASTER:恋人
				SELECTCASE TALENT:MASTER:恋人
				CASE [[小鈴]]
					SELECTCASE RAND:5
					CASE 1
						PRINTFORML 「嘻嘻,我一直在收获%CALLNAME:MASTER%的爱啊」
						PRINTFORMW 「当然,我也很爱%CALLNAME:MASTER%❤」
					CASE 2
						PRINTFORML 「这也是爱的一种形式对吧❤」
						PRINTFORMW 「我要好好感谢%CALLNAME:MASTER%教会我这么多爱♪」
					CASE 3
						PRINTFORML 「%CALLNAME:MASTER%! 我最喜欢你了❤」
						PRINTFORMW 「不仅是这样爱我,其他方面也都是❤」
					CASE 4
						PRINTFORML 「感受到了%CALLNAME:MASTER%浓浓的爱…❤」
						PRINTFORMW 「我的爱,也传达到你了吗…?」
					CASEELSE
						PRINTFORML 「又跟%CALLNAME:MASTER%留下了一段回忆❤」
						PRINTFORMW 「我会永远记住今天发生的事的!」
					ENDSELECT
				CASE [[阿求]]
					;和阿求的关系几乎都是悲恋
					;一起H
					IF CFLAG:[[阿求]]:現在位置 == CFLAG:[[小鈴]]:現在位置
						PRINTFORML 「%CALLNAME:MASTER%我和阿求,哪一个更舒服呢?」
						PRINTFORMW 「请您诚实地回答!」
					ELSEIF CFLAG:[[阿求]]:既成事實 & 合意_诶嘿嘿
						PRINTFORML 「嘻嘻……我知道的,阿求目前为止还不是"まだ"」
						PRINTFORMW 「没关系吗? 和我做了之后」
						PRINTFORMW 「真是个恶劣的问题呢…❤」
					ELSE
						SELECTCASE RAND:5
						CASE 1
							PRINTFORML 「嘻嘻…❤ 对阿求做了坏事呢♪」
							PRINTFORMW 「没关系的!保密就不会被发现!」
						CASE 2
							PRINTFORML 「啊哈哈……这样的我,绝对不能让阿求看到呢……」
							PRINTFORMW 「但那家伙很迟钝,所以没问题的♪」
						CASE 3
							PRINTFORML 「那么%CALLNAME:MASTER%さん,我和阿求,您更喜欢哪一个呢……?」
							PRINTFORMW 「……请当我没有问这个问题……」
;                        CASE 4
;                            ;有点可怕所以封印
;                            PRINTFORML 「嗯~%CALLNAME:MASTER%さん,和阿求比起来,我的身体怎么样…?」
;                            PRINTFORMW 「说这种话的人,怎么可能相信呢…啊哈哈」
                        CASE 4
							PRINTFORML 「这绝对是对阿求的秘密哦❤」
							PRINTFORMW 「我当然也会保密的♪」
						CASEELSE
							PRINTFORML 「如果阿求知道我和%CALLNAME:MASTER%这样,会变成什么样呢……」
							PRINTFORMW 「阿求一定会原谅我的,一定会的……」
						ENDSELECT
					ENDIF
				CASE [[霊夢]]
                    IF CFLAG:[[霊夢]]:現在位置 == CFLAG:[[小鈴]]:現在位置
                        PRINTFORML 「呵呵…❤ 没想到霊夢小姐会露出那种表情…♪」
                        PRINTFORMW 「如果方便的话,请再邀请我…❤」
                    ELSE
                        ;正在努力些什么
                        PRINTFORML 「啊哈哈…❤ 如果被霊夢小姐发现,可就大事不妙了呢」
                        PRINTFORMW 「我也是同谋,一定要努力啊♪」
                    ENDIF
                CASE [[魔理沙]]
                    IF CFLAG:[[魔理沙]]:現在位置 == CFLAG:[[小鈴]]:現在位置
                        PRINTFORML 「呵呵…❤ 没想到魔理沙小姐会露出那种表情…♪」
                        PRINTFORMW 「如果方便的话,请再邀请我…❤」
                    ELSE
                        PRINTFORML 「哎~要是被魔理沙小姐发现这种事…♪」
                        PRINTFORMW 「开玩笑的,我会保密的!」
                    ENDIF
                CASE [[紫]]
                    IF CFLAG:[[紫]]:現在位置 == CFLAG:[[小鈴]]:現在位置
                        PRINTFORML 「呵呵…❤ 紫小姐在%CALLNAME:MASTER%さん面前也是一位女性呢…♪」
                        PRINTFORMW 「如果不介意的话,请再邀请我…❤」
                    ELSE
                        PRINTFORML 「啊!要是被紫小姐发现这种事,该怎么办!?」
                        PRINTFORMW 「我还不想死……对不起~……」
                    ENDIF
                CASE [[文]]
                    IF CFLAG:[[文]]:現在位置 == CFLAG:[[小鈴]]:現在位置
                        PRINTFORML 「呵呵…❤ 文小姐在%CALLNAME:MASTER%さん面前也是一位女性呢…♪」
                        PRINTFORMW 「如果不介意的话,请再邀请我…❤」
                    ELSE
                        PRINTFORML 「哈!这里没有监控摄像头或窃听器吧!?」
                        PRINTFORMW 「一定要瞒过文小姐,否则我就社会性死亡了……」
                    ENDIF
                CASE [[猯藏]]
                    IF CFLAG:[[猯藏]]:現在位置 == CFLAG:[[小鈴]]:現在位置
                        PRINTFORML 「呵呵…❤ 猯藏小姐在%CALLNAME:MASTER%さん面前也是一位女性呢…♪」
                        PRINTFORMW 「如果不介意的话,请再邀请我…❤」
                    ELSE
                        PRINTFORML 「啊…❤ 猯藏小姐对不起…♪」
                        PRINTFORMW 「我也一定是个坏孩子~…!」
                    ENDIF
				CASEELSE
					IF CFLAG:(TALENT:MASTER:恋人):現在位置 == CFLAG:[[小鈴]]:現在位置
						PRINTFORML 「对不起,让我也一起参与其中…♪」
						PRINTFORMW 「如果方便的话,请再邀请我…❤」
					ELSE
						SELECTCASE RAND:3
						CASE 1
							PRINTFORML 「%CALLNAME:MASTER%さん……那个,您有女朋友吧……」
							PRINTFORMW 「一定保密的!我绝对保密!」
						CASE 2
							PRINTFORML 「那个……这样算是出轨了吧……」
							PRINTFORMW  (啊,但是这样的背德感觉也……❤)
						CASEELSE
							PRINTFORML 「啊……尽管有女朋友,我还是……对不起……」
							PRINTFORMW 「没关系,我也会承担罪过的……」
						ENDSELECT
					ENDIF
				ENDSELECT
			;没有恋人
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「哈……❤%CALLNAME:MASTER%さん和我的H,太舒服了…❤」
					PRINTFORMW 「我们再来吧…❤」
				CASE 2
					PRINTFORML 「呵呵…❤ 总觉得内心被幸福充盈着♪」
					PRINTFORMW 「H真是太棒了…❤」
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%さん,感、感觉怎么样…?」
					PRINTFORMW 「我、我很舒服哦!非常…❤」
				ENDSELECT
			ENDIF
			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_K70_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_K70_17(ARG,ARG:1)
#DIM 表示済み
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
表示済み = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「嗯嗯……！？」
		PRINTFORMW （现在……是什么……）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「啊呜!!」
		PRINTFORMDW 小鈴流着眼泪,脸颊染上淡淡的红晕
		PRINTFORMW 「诶…?诶?这、这是……什么啊……??」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「啊!?」
		PRINTFORMW  (怎么股间那里……)
		;不知道内裤被没收的情况
		IF FIRSTTIME("パンツ没収", 1)
			PRINTFORMW  (咦……没有!? 不会吧……!)
		;以前有没收过内裤的情况
		ELSE
			PRINTFORML  (难、难道……!?)
			PRINTFORMW  (不……不可能的吧……)
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;不知道味道
		IF ARG:1 == 1
			;味を知らない
			IF FIRSTTIME("精液の味", 1)
				PRINTFORML 「嗯咕!? 咳咳咳!」
				PRINTFORMW 「这、这是什么味道,咳咳!」
				PRINTFORMW 「我、我不小心喝了一点……」
			;知道味道
			ELSE
				PRINTFORML 「嗯咕!? 咳咳咳!」
				PRINTFORMW 「这、这怎么可能,咳咳!」
				PRINTFORMW 「呜……太恶心了……」
			ENDIF
		;精液中毒低吐出&浓精液
		ELSEIF ARG:1 == 2 || ARG:1 == 5
			;不知道味道
			IF FIRSTTIME("精液の味", 1)
				PRINTFORML 「嗯咕!? 咳咳咳!」
				PRINTFORMW 「这、这是什么味道,咳咳!」
				PRINTFORMW 「呜……什么啊,这太恶心了……」
			;知道味道
			ELSE
				PRINTFORML 「嗯咕!? 咳咳咳!」
				PRINTFORMW 「这、怎么可能,咳咳!」
				PRINTFORMW 「呜……为什么突然……讨厌……」
			ENDIF
		;精液中毒低用手遮住
		ELSEIF ARG:1 == 3
			;不知道味道
			IF FIRSTTIME("精液の味", 1)
				PRINTFORML 「嗯咕!? 咳咳咳!」
				PRINTFORMW 「这、这是什么味道,咳咳!」
				PRINTFORMW 「呜……什么东西,好苦又恶心……」
			;知道味道
			ELSE
				PRINTFORML 「嗯咕!? 咳咳咳!」
				PRINTFORMW 「这、怎么可能,咳咳!」
				PRINTFORMW 「呜……为什么突然……不要……」
			ENDIF
		;精液中毒高饮下&浓精液
		ELSEIF ARG:1 == 4 || ARG:1 == 6
			PRINTFORML 「嗯咕!? 咕咚!」
			PRINTFORMW 「呜……刚刚那是什么」
			PRINTFORMW 「我、我都喝下去了……」
		ENDIF
		表示済み = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;幼稚持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常用手擦拭
		ELSEIF ARG:1 == 2
			IF 表示済み
				PRINTFORMW 「呜……脸上也沾到了……」
			ELSE
				PRINTFORML 「嗯……这是什么啊……」
				PRINTFORMW 「为什么会这样……真恶心……」
			ENDIF
		;舔食颜射精液
		ELSEIF ARG:1 == 3
			IF 表示済み
				PRINTFORMW 「啊……脸上也粘到了……嘴巴……」
			ELSE
				PRINTFORML 「嗯……怎么会这样……」
				PRINTFORMW 「唔……嘴巴……」
			ENDIF
		ENDIF
		表示済み = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;擦拭
		IF ARG:1 == 1
			IF 表示済み
				PRINTFORMW 「这里也沾到了……」
			ELSE
				PRINTFORML 「呜……这是什么啊……」
				PRINTFORMW 「该、该怎么办才好……」
			ENDIF
		;舔食
		ELSEIF ARG:1 == 2
			IF 表示済み
				PRINTFORMW 「啊……手上也有……嘴巴……」
			ELSE
				PRINTFORML 「呜……为什么会这样……」
				PRINTFORMW 「唔……嘴巴……」
			ENDIF
		ENDIF
		表示済み = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚0
		IF ARG:1 == 1
			PRINTFORML 「咿!」
			PRINTFORMW 「呜……突、突然……屁股好痛……」
		;除了那个以外
		ELSEIF ARG:1 == 2
			PRINTFORML 「咿!」
			PRINTFORMW 「呜……突、突然……屁股好痛……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF 表示済み == 2
			PRINTFORML 「啊嘎……!!」
			PRINTFORMW 「什、什么……疼、疼得要死……有人、救我……」
		ELSE
			PRINTFORML 「咿!」
			PRINTFORMW 「什、什么……疼、疼得要死……有人、救我……」
		ENDIF
		表示済み = 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML 「呜……这到底是什么啊……」
		PRINTFORMW 「妈妈……救我……\@ TALENT:70:恋慕 ? %CALLNAME:MASTER% # 霊夢 \@……呜呜……」
		表示済み = 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;小鈴の部屋追い出し
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:現在位置) == 3
			PRINTFORMW 「哇、哇啊ーーーー啊啊啊！！！」
			CALL M_KOJO_K70_KOSUZU_BURST
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K70_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「诶……那、那个是……!」
		PRINTFORMW 「还、还太早了吧,我想……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「对、对不起……」
		PRINTFORMW 「我、我很害怕……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「不、不可以噢!」
		PRINTFORMW 「即使是%CALLNAME:MASTER%さん也不行!」
		PRINTFORMW 「请您也考虑一下我的感受!」
		TCVAR:70:350 = 3
		TALENT:70:心情 = -1
		BASE:70:憤怒 += MAXBASE:70:憤怒
		CALL M_KOJO_K70_YAMETEKUDASAI(70, 3, 1)
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「唔……我明白了……」
		IF TALENT:[[小鈴]]:恋人
			PRINTFORMW 「我们毕竟是恋人嘛……❤」
		ELSE
			PRINTFORMW 「为了%CALLNAME:MASTER%さん……❤」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「唔……我明白了,做、做好觉悟了……!」
		PRINTFORMW 「要、要负责到底哦❤」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K70_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;本当にこうなるとしたら完全に霊夢と同類になるわけだからきっとすごく喜ぶと思う
		;でも大切な鈴奈庵があるから一概には言えない
		;つまるところあなたへの愛情が鈴奈庵を勝ったということです
		PRINTFORMW 「哈哈!!」
		PRINTFORMW 「那我马上就去告诉爸爸妈妈!」
		PRINTL
		PRINTFORMDL 小鈴看来已经和父母说好了
		PRINTFORMDL 她似乎早有预谋
		PRINTW
		PRINTFORML 「离开铃奈庵会很寂寞」
		PRINTFORMW 「但从现在开始我要在这里经营博丽神社分店啦♪」
		PRINTFORMW 「有%CALLNAME:MASTER%さん在一定没问题的!」
		PRINTFORMW 「啊……我的新生活终于要开始了……!」
		PRINTL
		PRINTFORMDW ――一个人烟稀少的神社,租书店能成立吗
		PRINTFORMDW 但对妖怪来说,这里的妖魔书籍反而会红火
		PRINTFORMDW 就算遇到危险,只要在神社里就是安全的
		PRINTFORMDW 一定会顺利的――
		PRINTFORMDL %CALLNAME:MASTER%满怀着对与小鈴崭新生活的期待……
		PRINTW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「呜呜……是这样吗……」
		PRINTFORMW 「没、没办法呢……哈啊」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;あなたの私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「嗯~…如果您不介意的话,我房间随时欢迎…❤」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K70_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:[[小鈴]]:诶嘿嘿
			PRINTFORML 「呵呵~……」
            PRINTFORMW 「对不起,我已经很困了……哈欠……」
            PRINTL
            PRINTFORMDW 没办法,%CALLNAME:MASTER%只好催小鈴赶紧回去休息。
            ELSEIF TALENT:[[小鈴]]:恋慕
            SELECTCASE RAND:3
            CASE 1
                PRINTFORML 「啊啊,该回去了呢……」
                PRINTFORML 「还有好多想和%CALLNAME:MASTER%さん聊的话题呢~」
            CASE 2
                PRINTFORML 「哈欠~困了……」
                PRINTFORML 「虽然依依不舍,不过该回去了」
            CASEELSE
                PRINTFORML 「哎呀,天都黑了」
                PRINTFORML 「那今天就到这里告辞了」
            ENDSELECT
            PRINTFORML 「%CALLNAME:MASTER%さん,我们再见面吧」
            ;亲吻过且5分之1概率
            IF TALENT:[[小鈴]]:恋人 && !FIRSTTIME("初吻", 1, [[小鈴]]) && !RAND:5
                PRINTFORMW 「再见!啾❤」
                PRINTFORMDW 在离别时,小鈴突然亲吻了%CALLNAME:MASTER%的脸颊。
            ELSE
                PRINTFORMW 「再见~」
			ENDIF
		ELSE
			SELECTCASE RAND:3
			CASE 1
                PRINTFORML 「哈欠~要回去了」
            CASE 2
                PRINTFORML 「天已经黑了,该回去了」
            CASEELSE
                PRINTFORML 「啊,已经这么晚了,我该回去了」
            ENDSELECT
            IF TALENT:[[小鈴]]:思慕
                PRINTFORMW 「再见%CALLNAME:MASTER%さん,那我们之后见」
            ELSE
                PRINTFORMW 「再见~」
            ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:诶嘿嘿
			IF CFLAG:衰弱
				;うふふ中に疲れて帰る
				PRINTFORML 「呜呜……对不起,%CALLNAME:MASTER%さん……」
				PRINTFORMW 「我已经……到极限了~……」
				PRINTL
				PRINTFORMDW 小鈴已经累垮了,所以日期就到此结束了。
			ELSE
				;在哈欠中感到困倦地回家
				PRINTFORML 「喵呜~……对不起,%CALLNAME:MASTER%さん……」
				PRINTFORMW 「我已经……很困了~……」
				PRINTL
				PRINTFORMDW 小鈴看起来真的很困倦,所以日期就此结束了。
			ENDIF
		ELSE
			;通常帰宅と大体同じ
			IF TALENT:[[小鈴]]:恋慕
				SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「啊啊,该回去了呢……」
				CASE 2
					PRINTFORML 「哈欠~……困了……」
				CASEELSE
					PRINTFORML 「哎呀,天已经黑了」
				ENDSELECT
				SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「还想和%CALLNAME:MASTER%さん玩更久呢~」
				CASE 2
					PRINTFORML 「虽然依依不舍,不过该回去了」
				CASEELSE
					PRINTFORML 「那今天就到这里告辞了」
				ENDSELECT

			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「哈欠~要回去了」
				CASE 2
					PRINTFORML 「天已经黑了,该回去了」
				CASEELSE
					PRINTFORML 「啊,已经这么晚了,我该回去了」
				ENDSELECT
            ENDIF
            PRINTFORMW 「那么,今天玩得很开心♪ 下次再来一起玩吧!」
			;接吻経験済みで5分の1
			IF TALENT:[[小鈴]]:恋人 && !FIRSTTIME("初吻", 1, [[小鈴]]) && !RAND:5
				PRINTFORMW 「再见! 啾❤」
                PRINTFORMDW 在离别时,小鈴突然亲吻了%CALLNAME:MASTER%的脸颊。
            ELSE
                PRINTFORMW 「再见~」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り（キャラの自宅位置、またはキャラの部屋でデート終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;お招き部屋
		IF CFLAG:[[小鈴]]:現在位置 == OMANEKIBEYA()
			PRINTFORMW 「呼啊……越来越困了……」
            PRINTFORMW 「%CALLNAME:MASTER%さん,晚安……」
            IF !TCVAR:(CFLAG:MASTER:招待):连住禁止 && NEMUKE() < 720
                PRINTFORMW 「……要不,明早再离开可以吗……?」
            ELSEIF TALENT:70:恋慕
                PRINTFORMW 「……要不,明早再离开可以吗……?」
            ENDIF
        ELSE
            PRINTFORML 「啊,到宵禁时间了,我就先告辞了」
            PRINTFORMW 「今天玩得很开心♪ 再见%CALLNAME:MASTER%さん,\@ TCVAR:70:354 ? 下次我会再约您的 # 下次请再邀请我吧 \@」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート終了時に部屋に来ないかと誘う（～から部屋に来ないかと誘われた）
	;（来訪キャラのみ,自宅が無いキャラでも発生します）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:[[小鈴]]:恋人
			PRINTFORML 「那个,%CALLNAME:MASTER%さん……我们去我房间继续怎么样…?」
        ELSE
            PRINTFORML 「那个,%CALLNAME:MASTER%さん……如果方便的话,能来我房间吗…?」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「行く」を選択（～に誘われるまま、【MASTER】は【TARGET】の部屋へと向かった……）
	;（これが発生すると十中八九押し倒されます）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:[[小鈴]]:恋人
			PRINTFORMW 「嘿嘿❤ 好,那我们就走吧♪」
        ELSE
            PRINTFORMW 「太好了! 那走吧♪」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「やめとく」を選択（～は心なしか寂しそうだ……）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML 「是、是这样吗……」
        PRINTFORMW 「那就再约个时间见面吧,再见~」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくないと言い出す（～は今夜は帰りたくないと言い出した…）
	;（来訪キャラの帰宅時に欲求不満と欲望が高いと発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF TALENT:[[小鈴]]:恋人
			PRINTFORML 「%CALLNAME:MASTER%さん,我今天不想回去…!」
            PRINTFORMW 「我们一起睡觉好不好…?❤」
        ELSE
            PRINTFORML 「%CALLNAME:MASTER%さん,我今天真的不想回去……」
            PRINTFORMW 「拜托了!就一晚上!」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊める」を選択（～は【MASTERの自室】に泊まっていくことになりました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML 「真的吗!?太好了!」
		IF CFLAG:[[小鈴]]:現在位置 == CFLAG:MASTER:初期位置 && TALENT:[[小鈴]]:恋人
			PRINTFORMW 「那我们赶紧……❤」
        ELSE
            PRINTFORMW 「太棒了ー!非常感谢~!」
        ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊めない」を選択、または家主が居る（【MASTER】は丁重に断った）
	;（家主が居る＝MASTERの私室に他のキャラの私室を設定している）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML 「是、是这样吗……我明白了」
        PRINTFORMW 「那再下次见吧……再见~」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;疲れて帰宅（疲れきった～は帰って行きました）
	;（～は疲れ切っている→（入り口）まで送るよ でも発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		IF CFLAG:诶嘿嘿
			;うふふ中に疲れて帰る
			PRINTFORML 「呜呜……对不起,%CALLNAME:MASTER%さん……」
            PRINTFORMW 「我已经……到极限了~……」
            PRINTL
            PRINTFORMDW %CALLNAME:MASTER%背起疲倦的小鈴,送她回家了。
        ELSE
            PRINTFORML 「呜呜……%CALLNAME:MASTER%さん,我已经累坏了~…」
            PRINTFORMW 「我要回去休息了……再见~」
        ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K70_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「%CALLNAME:MASTER%さん…………」
        PRINTL
        PRINTFORMDL 在日常生活中,小鈴注意到了在自己心中萌芽的、小而炽热的感情
        PRINTW
        ;阿求的好感度
        IF TALENT:80:恋人
            PRINTFORMW 「该怎么办……我对%CALLNAME:MASTER%さん……」
            PRINTFORMW 「啊…明明是阿求的恋人,然而我却……」
            PRINTFORMW 「这样的……这种感觉……真痛苦……太痛苦了……」
            PRINTFORMW 「即使我不是正牌,我也……但是阿求会……」
            PRINTFORMW 「该怎么办……阿求…对不起……」
            PRINTFORMW 「我该怎么办啊……谁来帮帮我…%CALLNAME:MASTER%さん…阿求……呜呜……」
            PRINTL
            PRINTFORMDL ――在前所未有的汹涌情感的漩涡中,小鈴的心沉入了深深的黑暗
            PRINTW
        ELSE
            ;有点病娇但恋爱中的少女就是这样吧
            PRINTFORMW 「%CALLNAME:MASTER%さん……喜欢…好喜欢好喜欢……」
            PRINTFORMW 「想见你……想被你抱在怀里……一直在一起……」
            IF TALENT:80:恋慕
                PRINTFORMW 「阿求,对不起……我本来打算支持你的,可是……」
                PRINTFORMW 「我也喜欢上了%CALLNAME:MASTER%さん,这没办法啊……」
                PRINTFORMW 「不能输给她……我必须胜过阿求……!」
                PRINTFORMW 「为此,连友谊都可以舍弃……!」
                PRINTFORMW 「哈……%CALLNAME:MASTER%さん……我会努力的……」
                PRINTL
                PRINTFORMDL ――被蓝色燃烧的情感火焰包围,小鈴的心有力地跳动着
                PRINTW
            ELSEIF TALENT:80:思慕
                PRINTFORMW 「我要去跟阿求商量……她会嘲笑我的吧……」
                PRINTFORMW 「她和%CALLNAME:MASTER%さん也很亲近,如果我不加快的话,会被抢先的」
                PRINTFORMW 「嗯,书上说恋爱要抓住先机……好,我决定了……!」
                PRINTFORMW 「哈……%CALLNAME:MASTER%さん……喜欢你……」
                PRINTL
                PRINTFORMDL ――被汹涌情感的波浪冲击着,小鈴的心缓缓飘荡
                PRINTW
            ELSE
                PRINTFORMW 「要、要不写封情书…然后偷偷夹在书里给他……」
                PRINTFORMW 「不行…我没有这种文采…如果让阿求看到会…被她嘲笑的吧……」
                PRINTFORMW 「哈……%CALLNAME:MASTER%さん……我喜欢你……」
                PRINTL
                PRINTFORMDL ――在微热的感情风中,小鈴的心融化在淡淡的光芒中
                PRINTW
            ENDIF
		ENDIF
		CFLAG:70:1006 = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「为了您,我愿意献出这具肉体和灵魂,成为妖魔也在所不惜」
        PRINTL
        PRINTFORMW 「啊…多么凄美的台词啊……为什么要做到那种程度呢……」
        PRINTFORMW 「哈……真希望有一天我也能体验一次这样甜蜜燃烧般的恋情」
        PRINTFORMW 「但是我周围的人们似乎都――」
        PRINTFORMW 「啊,要是有%CALLNAME:MASTER%さん就好了呢」
        PRINTFORMW 「嗯……%CALLNAME:MASTER%さん啊……」
        ;阿求的好感度
        IF TALENT:80:恋人
            PRINTFORMW 「……不行不行,我可没有那种属性」
            PRINTFORMW 「阿求是我重要的朋友……我不能这样」
            PRINTFORMW 「嗯,还是找个别的好人吧」
        ELSEIF TALENT:80:恋慕
            PRINTFORMW 「做那种事会对阿求不好的」
            IF !TALENT:MASTER:恋人
                PRINTFORMW 「她应该赶快采取行动」
                PRINTFORML 「磨磨蹭蹭的话,我就要抢先噢~」
                PRINTFORMW 「呵呵……♪」
            ELSE
                PRINTFORMW 「她为什么不采取行动呢」
                PRINTFORMW 「%CALLNAME:MASTER%さん应该已经有恋人了吧」
                PRINTFORMW 「那我再喜欢他,也只会是无望的单恋了呢……」
            ENDIF
        ELSEIF TALENT:80:思慕
            PRINTFORMW 「他会不会已经有恋人了呢……总觉得他周围老是有女生」
            PRINTFORMW 「对了,他和阿求关系也很好吧」
            PRINTFORML 「不知道阿求对他怎么看」
            PRINTFORMW 「阿求看起来不太会注意绯闻……但她应该有所察觉吧」
            PRINTFORMW 「下次见到她时我要问问看」
            PRINTFORMW 「啊,也可以问问%CALLNAME:MASTER%さん对阿求的看法,一定很有意思」
        ELSE
            PRINTFORMW 「他会不会已经有恋人了呢……总觉得他周围老是有女生」
            PRINTFORMW 「不过跟他在一起很开心,是一个让人放心的人呢……还不赖嘛」
        ENDIF
		RETURN 1
	ENDIF
;	;-------------------------------------------------
;	;愛欲取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 1
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 3
;		;フラグだけ
;		CFLAG:70:1006 = 1
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;愛人取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 1
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 4
;		;フラグだけ
;		CFLAG:70:1006 = 1
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;セフレ取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 5
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;キス魔取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 6
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;自慰狂い取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 7
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;ポルチオ性感取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 8
;		PRINTFORML
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;おもらし癖取得
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 9
;		PRINTFORML
;		RETURN 1
;	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K70_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;全部一括
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
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	;我慢
    IF ARG == 7
        PRINTFORML 「哈哈……今天怎么这么欲求不满嘛……」
        PRINTFORML 「对了,明天去找%CALLNAME:MASTER%さん安慰一下~……❤」
    ;同室
    ELSEIF ARG == 2
        PRINTFORML 「%CALLNAME:MASTER%さん,睡着了吗……?」
        PRINTFORML 「………………」
        PRINTL
        PRINTFORML 「%CALLNAME:MASTER%さん就在这么近的地方……」
        PRINTFORML 「唔……❤ 啊……❤ %CALLNAME:MASTER%さん……❤」
        PRINTFORML 「现在……不要醒来……啊……❤」
    ;orz
    ELSEIF TALENT:70:恋慕 && (ABL:70:百合属性 >= 3 || EXP:70:百合経験 >= 100) && ABL:70:百合属性 > RAND:15
        PRINTFORML 「啊……阿求……嗯!」
        IF !RAND:2
            PRINTFORML 「呵呵…❤ 偶尔这样也不错嘛……❤」
            PRINTFORML 「阿求,喜欢你……❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            PRINTFORML 「来……❤ 嗯……❤ 一起高潮吧……%M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
        ELSE
            PRINTFORML 「这样的…! 阿求…我们……❤」
            PRINTFORML 「嗯…❤ 喜欢…❤ 没关系的……❤」
            PRINTFORML 「%M_KOJO_K70_AUTO("喘ぎ：小", "❤")% %M_KOJO_K70_AUTO("喘ぎ：小", "❤")% 唔唔❤ 不行❤ 要去了……❤」
        ENDIF
	;恋慕
    ELSEIF TALENT:70:恋慕
        PRINTFORML 「啊……%CALLNAME:MASTER%さん……嗯!」
        IF TALENT:70:恋人 && !RAND:3
            PRINTFORML 「今天是特别服务哦…❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            PRINTFORML 「不、不行…客人会听见的…%M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            PRINTFORML 「啊…好激烈…❤ 要、要去了…❤」
        ELSEIF TALENT:80:恋人 && !RAND:3
            PRINTFORML 「不行,%CALLNAME:MASTER%さん…阿求在的话…啊!」
            PRINTFORML 「不、不行…会、会被听见的…%M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            PRINTFORML 「阿求…对不起,对不起…嗯,去了…❤」
        ELSEIF !GROUPMATCH(TALENT:MASTER:恋人, 0, 70, 80) && !RAND:3
            PRINTFORML 「不行,%CALLNAME:MASTER%さん…你已经有女朋友了…啊!」
            PRINTFORML 「不、不行…会、会被听见的…%M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            PRINTFORML 「啊…好激烈…❤ 要、要去了…❤」
        ELSE
            SELECTCASE RAND:5
            CASE 1
                PRINTFORML 「今天很温柔呢…嗯!」
                PRINTFORML 「好的…当然可以…啊❤ 请继续…❤」
                PRINTFORML 「%M_KOJO_K70_AUTO("喘ぎ：小", "❤ ", 1)%%M_KOJO_K70_AUTO("喘ぎ：小", "❤")% 要去了❤ 要去了❤」
            CASE 2
                PRINTFORML 「感觉真棒…啊!」
                PRINTFORML 「%M_KOJO_K70_AUTO("喘ぎ：小", "❤")% 再用力一点…❤ 用、用力一点…%M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
                PRINTFORML 「啊…要去了…❤ 去了❤ 嗯……❤」
            CASE 3
                PRINTFORML 「别怕,我不会咬你的…❤ 乖乖的别动哦❤」
                PRINTFORML 「啊哈❤ 你这样我好开心❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
                PRINTFORML 「那,我们一起高潮吧…❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")% 啊……❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            CASE 4
                PRINTFORML 「呼…❤ 再来…❤ 多做一些吧…❤」
                PRINTFORML 「啊……❤ 对……❤ 嗯❤ 喜欢%CALLNAME:MASTER%さん…❤」
                PRINTFORML 「让我舒服…❤ 搞坏我吧…❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")% %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
            CASEELSE
                PRINTFORML 「暖暖的…❤ 就这样一直在一起……❤」
                PRINTFORML 「呃……嗯,啊……❤」
                PRINTFORML 「啊…不是这样的…❤ 不行…❤要去了……❤」
            ENDSELECT
        ENDIF
        PRINTFORML 「…………呼❤」
    ;思慕
    ELSEIF TALENT:70:思慕 && ABL:70:親密 > RAND:10
        PRINTFORML 「啊……%CALLNAME:MASTER%さん…嗯❤」
        PRINTFORML 「…………呼❤」
    ;通常
    ELSE
        PRINTFORML 「嗯❤」
        PRINTFORML 「…………呼」
    ENDIF
	PRINTL
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K70_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「诶,不,那个……」
        PRINTFORMW 「你、你在想什么呢!」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「诶,要、要去洗澡吗……?」
        PRINTFORMW 「好、好的……❤ 别看太仔细……❤」
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K70_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:70:兒童人数
			PRINTFORMW 「嗯!这、这一定是……!」
			PRINTFORML
			PRINTFORMDL 小鈴注意到了身体的异样,向%CALLNAME:MASTER%走去。
			PRINTFORMW
			PRINTFORMW 「%CALLNAME:MASTER%さん……那个,又、又怀孕了……❤」
			PRINTFORMW 「天啊!我这样的,怎么可能生这么多孩子……❤」
			PRINTFORML 「这多亏了%CALLNAME:MASTER%さん您呢!」
			PRINTFORMW 「我们一起抚养这个孩子吧!」
		ELSE
			PRINTFORMW 「嗯!这、这一定就是……!」
			PRINTFORML
			PRINTFORMDL 小鈴注意到了身体的异样,
			PRINTFORMDL 想赶紧向%CALLNAME:MASTER%汇报,却突然止住了脚步。
			PRINTFORMW
			PRINTFORMW 「%CALLNAME:MASTER%さん……那个,我、我怀孕了……❤」
			PRINTFORMW 「多亏了%CALLNAME:MASTER%さん对我的深爱……❤」
			PRINTFORML 「我、我要当妈妈了……!」
			PRINTFORMW 「一定要把这个孩子养得幸福……!」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「嗯!这、这一定就是……!」
        PRINTFORML
        PRINTFORMDL 小鈴注意到了身体的异样,
        PRINTFORMDL 想赶紧向%CALLNAME:MASTER%汇报,却突然止住了脚步。
        PRINTFORMW
        PRINTFORMW 「%CALLNAME:MASTER%さん……那个,我、我怀孕了……❤」
        RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;状況がむずい,辛辣だと思う
		PRINTFORMW 「嗯!这、这一定就是……!」
		PRINTFORML
		PRINTFORMDL 小鈴注意到了身体的异样,
		PRINTFORMDL 想赶紧向%CALLNAME:MASTER%汇报,却突然止住了脚步。
		PRINTFORMW
		PRINTFORMW 「%CALLNAME:MASTER%さん……那个,我、我怀孕了……」
		PRINTFORMW 「不需要您的额外照顾,我一个人也可以把孩子养大……!」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「诶!? 这、这不会吧……」
		PRINTFORMW 「呜……骗人的吧……怎么会这样……好可怕……」
		PRINTFORMW 「爸爸……妈妈……救救我……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K70_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の子供か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;子供の性格設定（まだ）
;	CALL M_KOJO_K70_CHILD_TYPE_SETTING(ARG:1)
	;無自覚リセット
	CFLAG:70:1010 = 0
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「哈啊……哈啊……」
		PRINTFORMW 「呜……嗯嗯……!」
		PRINTL
		PRINTFORMW 「哈……啊……啊……我和%CALLNAME:MASTER%さん的孩子……❤」
		PRINTFORMW 「好、好可爱……❤ 呵呵……我要当妈妈了❤」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「哈啊……哈啊……」
		PRINTFORMW 「呜……嗯嗯……!」
		PRINTL
		PRINTFORMW 「哈……啊……啊……我和%CALLNAME:MASTER%さん的孩子……❤」
		PRINTFORMW 「好、好可爱……❤ 呵呵……我要当妈妈了❤」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW 「哈啊……哈啊……」
		PRINTFORMW 「呜……嗯嗯……!」
		PRINTL
		PRINTFORMW 「哈……啊……啊……我和%CALLNAME:MASTER%さん的孩子……❤」
		PRINTFORMW 「好、好可爱……❤ 呵呵……我要当妈妈了❤」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「哈啊……哈啊……」
		PRINTFORMW 「呜……嗯嗯……!」
		PRINTL
		PRINTFORMW 「哈……啊……宝宝……怎么会这样……」
		PRINTFORMW 「呜……、呜……、呜呜~~~……」
		;無自覚出産,親が分からない
		CFLAG:70:1010 = 1
		CFLAG:70:(1020 + ARG:1) = 1
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K70_26(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;-------------------------------------------------
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF FIRSTTIME("オナバレ")
				PRINTFORMW 「啊……%CALLNAME:MASTER%さん……你、你从什么时候在那里……」
				PRINTFORMW 「我、我不要啊ーーーー!!\/\/\/ 嫁不出去啦ーーーー!!\/\/\/」
				TCVAR:70:350 += 1
				TALENT:70:心情 = -1
				TCVAR:70:356 = 1
			ELSEIF TALENT:70:恋慕 && GETBIT(CFLAG:70:既成事實, 1)
				;20日以上会ってない
				IF DAY - CFLAG:70:1002 >= 20
					PRINTFORML 「啊……%CALLNAME:MASTER%さん……!」
					PRINTFORMW 「这个是……那个,因为……」
					PRINTFORMW 「因为~最近都见不到,很寂寞的说~……」
					PRINTFORMW 「都是%CALLNAME:MASTER%さん的错~……呜呜……」
					TCVAR:70:356 = 4
				ELSE
					PRINTFORML 「啊……%CALLNAME:MASTER%さん……!」
					PRINTFORMW 「这个是……那个,读了一本那种内容的书……稍微有点……」
					PRINTFORMW 「一想到%CALLNAME:MASTER%さん就忍不住了……\/\/\/」
					TCVAR:70:356 = 3
				ENDIF
			ELSE
				PRINTFORML 「啊……%CALLNAME:MASTER%さん……!」
				PRINTFORMW 「你、你为什么在这里啊ーー!!\/\/\/ 笨蛋ーーー!!\/\/\/」
				TCVAR:70:356 = 2
			ENDIF
			RETURN 1
		ENDIF
	CASE 1
		;-------------------------------------------------
		;何もしない
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTL
			;初回、恋慕なしor合意まだ
			IF TCVAR:70:356 == 1 || TCVAR:70:356 == 2
				PRINTFORMW 「请出去ーーーー!!\/\/\/」
			;恋慕+合意
			ELSEIF TCVAR:70:356 == 3
				PRINTFORMW 「啊!等一下…啊……」
			;久しぶり
			ELSEIF TCVAR:70:356 == 4
				PRINTFORMW 「啊!不要这样……呜……」
			ENDIF
			RETURN 1
		ENDIF
	CASE 2
		;-------------------------------------------------
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTL
			;初回,恋慕なしor合意まだ
			IF TCVAR:70:356 == 1 || TCVAR:70:356 == 2
				PRINTFORMW 「不要看哦~~\/\/\/」
			;恋慕+合意,久しぶ里
			ELSEIF TCVAR:70:356 == 3 || TCVAR:70:356 == 4
				;自慰口上を表示
				IF EXP:70:調教自慰経験 >= 30
					SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「啊……❤ 嗯❤ 感觉好舒服…❤」
						PRINTFORMW 「再看着我吧……❤ 看,一想到%CALLNAME:MASTER%さん我就会……❤」
					CASE 2
						PRINTFORMW 「哈~❤ 被%CALLNAME:MASTER%さん看着自慰❤ 变成了习惯❤」
						PRINTFORMW 「呀……❤ 没办法停下来呢……%M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
					CASEELSE
						PRINTFORMW 「%CALLNAME:MASTER%さん……❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")% %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
						PRINTFORMW 「来、摸摸我吧……❤ 呜……」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「%CALLNAME:MASTER%さん,我好寂寞……❤ %M_KOJO_K70_AUTO("喘ぎ：小", "❤")%」
						PRINTFORMW 「因为这样的话……❤ 只有我一个人……嗯❤」
					CASEELSE
						PRINTFORMW 「平、平时都是……一边想着%CALLNAME:MASTER%さん……❤」
						PRINTFORMW 「%M_KOJO_K70_AUTO("喘ぎ：小", "❤ ", 1)%哈啊……!」
					ENDSELECT
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
	CASE 3
		;-------------------------------------------------
		;追い出し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTL
			PRINTFORMW 「%CALLNAME:MASTER%さん笨蛋啊ーーーっっ！！\/\/\/」
			TCVAR:70:350 = 3
			TALENT:70:心情 = -1
			BASE:70:憤怒 += MAXBASE:70:憤怒
			CALL M_KOJO_K70_YAMETEKUDASAI(70, 3, 1)
			RETURN 1
		ENDIF
	CASE 4
		;-------------------------------------------------
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = M_KOJO_K70_UFUFU()
		;-------------------------------------------------
		IF LOCAL:1
			PRINTL
			PRINTFORMW 「嗯……❤ 那样的话……❤ 但是……❤」
			PRINTFORMW 「啊嗯❤ 嘿嘿❤ 一直在等待您❤❤」
			PRINTFORMW 「请对我温柔一点❤ 多多疼爱我吧……❤」
			RETURN 1
		ENDIF
	CASE 5
		;-------------------------------------------------
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = M_KOJO_K70_UFUFU()
		;-------------------------------------------------
		IF LOCAL:1
			PRINTL
			PRINTFORML 「哈啊哈啊……舒服……❤」
			PRINTFORMW 「但、但是敲门之类的……还是要做一下的呢……」
			RETURN 1
		ENDIF
	CASE 6
		;-------------------------------------------------
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = M_KOJO_K70_UFUFU()
		;-------------------------------------------------
		IF LOCAL:1
			PRINTL
			PRINTFORMW 「啊,要留下过夜吗?呵呵,当然可以哦♪」
			PRINTFORMW 「正好有想让您看看的书」
			PRINTFORMW 「如果可以的话,一起然后――之后就是――」
			PRINTFORMW 「……❤」
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF

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

;使用例
;IF !TALENT:XX:恋慕
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:濃厚精液
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF

;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K70_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;-------------------------------------------------
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE STR:(5000 + ARG:1)
			CASE "博麗神社"
				PRINTFORML 「那个,要一起去博丽神社吗?」
				PRINTFORMW 「上次借给灵梦的书,想知道她看了没有啊♪」
			CASE "命蓮寺"
				PRINTFORML 「那个,要一起去命莲寺吗?」
				PRINTFORMW 「呵呵,我虽然不练,但可以念经哦♪」
			CASE "人間之里"
				PRINTFORML 「那个,要不要一起去人间之里?」
				PRINTFORMW 「那个……想和你约会……❤」
			CASE "霧之湖～紅魔館"
				PRINTFORML 「那个,要不要一起去雾之湖散步?」
				PRINTFORMW 「偶尔也想悠闲地散个步啊♪」
			CASE "迷途竹林"
				PRINTFORML 「那个,要不要一起去迷途竹林?」
				PRINTFORMW 「那边的客人老是迷路,很难碰到呢~」
			CASE "魔法之森"
				PRINTFORML 「那个,要不要一起去魔法之森?」
				PRINTFORMW 「上次借给魔理沙的书,想知道她看了没有啊♪」
			CASE "三途之川～冥界"
				PRINTFORML 「那个,要不要一起去中有之道吗?」
				PRINTFORMW 「不、不是去死掉啦!是有客人在那里等我的!」
			CASE "妖怪之山 (山麓)"
				PRINTFORML 「那个,要不要一起去山麓?」
				PRINTFORMW 「河童们借了些感兴趣的书走了,我很担心呢」
			CASE "妖怪之山 (山頂)"
				PRINTFORML 「那个,要不要一起去山顶的神社?」
				PRINTFORMW 「那边的神社经常借书,去取回来很麻烦呢」
			CASE "地底"
				PRINTFORML 「那个,我想去一次地底!」
				PRINTFORMW 「有一点可怕,不过有%CALLNAME:MASTER%さん陪我的话……」
			CASE "夢之世界～月"
				PRINTFORML 「那个,我想去月球旅行!」
				PRINTFORMW 「会、会很浪漫吧……!」
			ENDSELECT
			RETURN 1
		ENDIF
	CASE 1
		;-------------------------------------------------
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORMW 「太好了!没问题,我已经准备好啦♪」
			TCVAR:70:354 = 1
			TALENT:70:心情 = 1
			;日記を書く
			CALL M_KOJO_DIARYSETTING_K70(39)
			RETURN 1
		ENDIF
	CASE 2
		;-------------------------------------------------
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「是吗……啊,别介意」
			PRINTFORMW 「那就下次再约吧」
			RETURN 1
		ENDIF
	CASE 3
		;-------------------------------------------------
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「那个,今天要来我家吗……?」
			IF FIRSTTIME("お招き", 1, 70)
				;什么情况可以不用店番
				PRINTFORMW 「今天父母都出去了,所以……那个……」
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「有想让%CALLNAME:MASTER%看看我家的猫会后空翻……」
				CASE 2
					PRINTFORMW 「有想向您请教的事情……」
				CASEELSE
					PRINTFORMW 「今天父母都出去了……」
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
	CASE 4
		;-------------------------------------------------
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF FIRSTTIME("お招き", 0, 70)
				PRINTFORML 「真的吗!?太好了!」
				PRINTFORMW  (把房间收拾干净真是正确的选择……)
			ELSE
				PRINTFORML 「哇─♪」
				PRINTFORMW 「那我们马上出发吧!」
			ENDIF
			TALENT:70:心情 = 1
			TCVAR:70:354 = 1
			RETURN 1
		ENDIF
	CASE 5
		;-------------------------------------------------
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「这样啊…… 啊,请别介意」
            PRINTFORMW 「下次有机会务必……!」
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K70_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF FLAG:時間停止
			ELSE
				SELECTCASE RAND:5
				CASE 1
                    PRINTFORMW 「啊,请不要看的太仔细……❤」
                CASE 2
                    PRINTFORMW 「那、那么,拜托了……❤」
                CASE 3
                    PRINTFORMW 「好,好害羞……❤」
                CASE 4
                    PRINTFORMW 「心跳得厉害……❤」
                CASEELSE
                    PRINTFORMW 「啊!自,自己可以脱的哟~❤」
                ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;下着姿にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF FLAG:時間停止
			ELSE
				PRINTFORMW 「あぁ……❤」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱ぎ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF FLAG:時間停止
			ELSE
				PRINTFORMW 「あぁ……❤」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;パンツちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
			CASE 0
				;-------------------------------------------------
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「诶……❤ 那,那个%CALLNAME:MASTER%さん拜托你了……❤」
                    RETURN 1
				ENDIF
			CASE 1
				;-------------------------------------------------
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「哎……❤ 这种话……好H哦……❤」
                    RETURN 1
				ENDIF
			CASE 2
				;-------------------------------------------------
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「哎……为,为什么……」
                    PRINTFORMW 「你,你这个人……是变态吗……」
                    RETURN 1
				ENDIF
			CASE 3
				;-------------------------------------------------
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「哎……你,你在说什么呢……」
                    PRINTFORMW 「%CALLNAME:MASTER%さん,好恶心……」
                    RETURN 1
				ENDIF
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K70_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:70:恋慕
			PRINTFORMW 「再也不要和%CALLNAME:MASTER%さん说话了!」
        ELSE
			PRINTFORMW 「…………！」
		ENDIF
		RETURN 1
	ENDIF
;	;-------------------------------------------------
;	;泣かせてしまった　[臆病]持ち
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 2
;		RETURN 1
;	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が押し倒しを解除
;==================================================
@M_KOJO_EVENT_K70_30(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲れた
		PRINTFORML 「呼……我好累哦」
        PRINTFORMW 「%CALLNAME:MASTER%さん,对不起❤」
		TCVAR:70:351 = 0
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML 「呼……❤」
        PRINTFORMW 「%CALLNAME:MASTER%さん,非常感谢您❤」
		TCVAR:70:351 = 0
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを押し倒された
		PRINTFORML 「呀啊❤」
        SELECTCASE RAND:2
        CASE 1
            PRINTFORMW 「啊~❤请您原谅我~!」
        CASEELSE
            PRINTFORMW 「啊~❤对不起~!」
        ENDSELECT
		TCVAR:70:351 = 0
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		;ダーク小鈴ちゃん
		PRINTFORML 「呵呵呵……❤ %CALLNAME:MASTER%さん,没关系的呢……❤」
        PRINTFORMW 「终于到了使用这个『サキュバスの花園』的力量的时候了呢……❤」
        RETURN 1
	ENDIF
ENDIF
RETURN 1

;[SKIPSTART]
;;-------------------------------------------------
;;オナバレ遭遇時の地の文。
;;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;;置き換える気がないならスルー。
;;-------------------------------------------------
;@M_KOJO_EVENT_K70_ONABARE_1(ARG)
;;-------------------------------------------------
;IF ARG
;	PRINTFORML A弄ってる場合
;ELSE
;	PRINTFORML V弄ってる場合
;ENDIF
;;-------------------------------------------------
;[SKIPEND]
;
;
;[SKIPSTART]
;;-------------------------------------------------
;;オナバレでそのまま続けてもらう場合の地の文。
;;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;;置き換える気がないならスルー。
;;-------------------------------------------------
;@M_KOJO_EVENT_K70_ONABARE_2(ARG)
;;-------------------------------------------------
;IF ARG
;	PRINTFORML A弄ってる場合
;ELSE
;	PRINTFORML V弄ってる場合
;ENDIF
;;-------------------------------------------------
;[SKIPEND]
;
;
;[SKIPSTART]
;;-------------------------------------------------
;;オナバレなし崩しックスの地の文。
;;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;;置き換える気がないならスルー。
;;-------------------------------------------------
;@M_KOJO_EVENT_K70_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;;-------------------------------------------------
;#DIM 前戯１
;;1=C 2=B 3=M
;#DIM 本番はどっちか
;;0でＶ、1でＡ
;#DIM 注入量
;#DIM 回数
;
;SELECTCASE 前戯１
;	CASE 1
;		PRINTFORML Ｃ責め
;	CASE 2
;		PRINTFORML Ｂ責め
;	CASE 3
;		PRINTFORML Ｍ責め
;ENDSELECT
;
;IF 本番はどっちか
;	PRINTFORML Aで本番
;ELSE
;	PRINTFORML Vで本番
;ENDIF
;;-------------------------------------------------
;[SKIPEND]

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K70_31(ARG,ARG:1)
#DIM 前回のブーム
#DIM 今回のブーム
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;※口上はないけどフラグの管理だけする
	;マイブームが無い場合、確率で発生
	IF (!CFLAG:[[小鈴]]:1080 || CFLAG:[[小鈴]]:1080 > 10)
		IF !RAND:24
			前回のブーム = CFLAG:[[小鈴]]:1080 % 10
			CFLAG:[[小鈴]]:1080 = 0
			WHILE !CFLAG:[[小鈴]]:1080
				;種類数を取得
				CALLF M_KOJO_K70_KOSUZUBOOM()
				今回のブーム = RAND:RESULT + 1
				SIF 今回のブーム != 前回のブーム
					CFLAG:[[小鈴]]:1080 = 今回のブーム
			WEND
			;残り日数は40～80日
			CFLAG:[[小鈴]]:1081 = 40 + RAND:41
			CFLAG:[[小鈴]]:1082 = 0
			[IF_DEBUG]
				PRINTFORML ※小鈴口上デバッグ用
				PRINTFORML ！マイブーム発生
			[ENDIF]
		ENDIF
	;残り日数が無くなったらマイブーム終了,
	ELSEIF CFLAG:[[小鈴]]:1081 <= 0
		CFLAG:[[小鈴]]:1080 += 10
		CFLAG:[[小鈴]]:1081 = 0
		CFLAG:[[小鈴]]:1082 = 0
	ELSE
		;マイブームカウントダウン
		CFLAG:[[小鈴]]:1081 --
	ENDIF
	[IF_DEBUG]
		PRINTFORML ※小鈴口上デバッグ用
		PRINTFORML マイブーム：%M_KOJO_K70_KOSUZUBOOM()%（あと {CFLAG:[[小鈴]]:1081}日）
		PRINTFORML 数値：{CFLAG:[[小鈴]]:1080}, 回数：{CFLAG:[[小鈴]]:1082}
	[ENDIF]
;	;-------------------------------------------------
;	;小分岐
;	;-------------------------------------------------
;	;今日会っていない
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG
;		RETURN 1
;	ENDIF
;	;-------------------------------------------------
;	;今日会っている
;	;記入チェック（=0, 非表示、1, 表示）
;	LOCAL:1 = 0
;	;-------------------------------------------------
;	IF LOCAL:1 && ARG == 0
;		RETURN 1
;	ENDIF
ENDIF
RETURN 1

;==================================================
;自由行動中
;ARG:1      0=行動中,1=完了時
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_EVENT_K70_32(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;▼考え事,（～は考えに耽っている。）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
                PRINTFORML 「唔~……」
            CASE 2
                PRINTFORML 「嗯嗯……」
            CASE 3
                PRINTFORML 「唔~……」
            CASEELSE
                PRINTFORML 「……………」
            ENDSELECT
        ELSE
            ;完事时
            SELECTCASE RAND:3
            CASE 1
                PRINTFORML 「……嗯!」
            CASE 2
                PRINTFORML 「……好的!」
            CASEELSE
                PRINTFORML 「哈……」
			ENDSELECT
		ENDIF
	CASE 1
;		;▼遊ぶ,（～は走り回っている。）
;		;※[幼稚]持ちのみ
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 2
		;▼食事,（～は食事を摂っている。）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
				PRINTFORML 「咕咕……」
			CASE 2
				PRINTFORML 「啷啷……」
			CASE 3
				PRINTFORML 「哈哈……」
			CASEELSE
				PRINTFORML 「……咽下去」
			ENDSELECT
		ELSE
			;完了時
			PRINTFORML 「多谢款待～」
		ENDIF
	CASE 3
;		;▼つまみ食い（～はこっそりつまみ食いをしている。）
;		;※[妖精]持ちとルーミア、こいし、幽々子、紫苑のみ
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 4
		;▼掃除,（～はテキパキと部屋の掃除をしている。）
		;※[掃除係]持ちまたは汚臭耐性-1以下のみ
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
                PRINTFORML 「好的,稍微地」
            CASE 2
                PRINTFORML 「啊,这本书……」
            CASE 3
                PRINTFORML 「呼……」
            CASEELSE
                PRINTFORML 「刷刷地」
            ENDSELECT
        ELSE
            ;完事时
            PRINTFORML 「好的!打扫结束~」
		ENDIF
	CASE 5
		;▼運動,（～は張り切って運動している。）
		;※[音楽知識]持ちは除く（演奏になる）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
				PRINTFORML 「一、二、三、四！」
			CASE 2
				PRINTFORML 「五、六，七、八！」
			CASE 3
				PRINTFORML 「嘿呼、嘿呼」
			CASEELSE
				PRINTFORML 「呼，呼，哈ー！」
			ENDSELECT
		ELSE
			;完了時
			PRINTFORML 「呼……」
		ENDIF
	CASE 6
		;▼読書,（～は黙々と本を読んでいる。）
		IF !ARG:1
			;行動中
			PRINTFORML 「……………」
		ELSE
			;完了時
			PRINTFORML 「读完了……」
		ENDIF
	CASE 7
		;▼料理,
		IF !ARG:1
			;行動中
			IF Activity_Duration:TARGET > 30
				;料理中（～は軽快に料理をしている。）
				SELECTCASE RAND:4
				CASE 1
                    PRINTFORML 「唔~让我看看,这样……」
                CASE 2
                    PRINTFORML 「♪~~」
                CASE 3
                    PRINTFORML 「会是这样吗…?」
				CASEELSE
					PRINTFORML 「咕噜……嗯！」
				ENDSELECT
			ELSE
				;食事中（～は作った料理を食べている。）
				SELECTCASE RAND:4
				CASE 1
					PRINTFORML 「咕咕……」
				CASE 2
					PRINTFORML 「啷啷……」
				CASE 3
					PRINTFORML 「哈哈……」
				CASEELSE
					PRINTFORML 「……咽下去」
				ENDSELECT
			ENDIF
		ELSE
			;完了時
			PRINTFORML 「多谢款待～」
		ENDIF
;	CASE 8
;		;▼演奏
;		;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
;		;1,～は小気味よく演奏している。
;		;2,～は気ままに歌っている。
;		;3,～は華麗に踊っている。
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 9
;		;▼採集,（～使える素材を探している。）
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 10
;		;▼釣り,（～はのんびり釣りをしている。）
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 11
;		;▼実験,（～は怪しい実験をしている。）
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 12
		;▼のんびり,（～はのんびりしている。）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
				PRINTFORML 「♪～～」
			CASE 2
				PRINTFORML 「ふぁ～ぁ……」
			CASE 3
				PRINTFORML 「ふぅ……」
			CASEELSE
				;悪天候時
				IF GROUPMATCH(天候, 5, 9, 13, 14, 15)
					IF M_KOJO_K70_SUZUNAAN(CFLAG:[[小鈴]]:現在位置)
						PRINTFORML 「像这样的日子就懒洋洋地呆在家里吧」
					ELSE
						PRINTFORML 「像这样的日子就悠闲地度过吧」
					ENDIF
				ELSEIF GET_MONTH() == "春の月"
					PRINTFORML 「真是悠闲的气氛呢～…」
				ELSEIF GET_MONTH() == "夏の月"
					PRINTFORML 「今天也好热啊～…」
				ELSEIF GET_MONTH() == "秋の月"
					PRINTFORML 「真凉快呢～…」
				ELSEIF GET_MONTH() == "冬の月"
					PRINTFORML 「今天也好冷呀～…」
				ENDIF
			ENDSELECT
		ELSE
;			;完了時
;			PRINTFORML 「」
		ENDIF
	CASE 13
;		;▼晩酌,（～はまったりとお酒を飲んでいる。）
;		;※酒耐性0以上のみ
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 14
		;▼買い物,（～は気ままに買い物している。）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
                PRINTFORML 「唔~让我想想……」
            CASE 2
                PRINTFORML 「那个已经买过了……」
            CASE 3
                PRINTFORML 「剩下的是ー……」
            CASEELSE
                PRINTFORML 「啊,这个很便宜」
			ENDSELECT
		ELSE
;			;完了時
;			PRINTFORML
		ENDIF
	CASE 15
;		;▼説教,（～はじっと聞いている…）
;		;※神霊・蓬莱人は除く
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時
;			PRINTFORML
;		ENDIF
	CASE 16
;		;▼落とし穴,（～は落とし穴を増やしている）
;		;※三月精・チルノ・クラウンピースのみ
;		;それ以外は落ちる側
;		IF !ARG:1
;			;行動中
;			PRINTFORML
;		ELSE
;			;完了時,
;			;（仕掛け人（失敗時）,誰も引っかからないので～は飽きてしまったようだ…）
;			;（落ちた側（戦闘能力2～4）,～はすぐに穴から飛び出して周りをキョロキョロ見回している…）
;			PRINTFORML
;		ENDIF
	CASE 17
		;▼雪だるま作り（～は雪を集めている）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
                PRINTFORML 「呵呵♪」
            CASE 2
                PRINTFORML 「好的,好的」
            CASE 3
                PRINTFORML 「哈…哈……好重……」
            CASEELSE
                PRINTFORML 「啊~手好冷」
            ENDSELECT
        ELSE
            ;完成时
            PRINTFORML 「做好了~♪」
		ENDIF
	CASE 18
		;▼炬燵でのんびり（～は炬燵に入って温まっている）
		IF !ARG:1
			;行動中
			SELECTCASE RAND:4
			CASE 1
                PRINTFORML 「暖暖的♪」
            CASE 2
                PRINTFORML 「好温暖~♪」
            CASE 3
                PRINTFORML 「呼~……」
            CASEELSE
				IF CFLAG:[[小鈴]]:現在位置 == P221稗田邸
                    PRINTFORML 「阿求的家真好~♪」
                ELSE
                    PRINTFORML 「有暖炉的家真好♪」
                ENDIF
			ENDSELECT
		ELSE
;			;完了時
;			PRINTFORML
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;ハッピーニューイヤー
;年越しの瞬間に同じ部屋に居ると発生
;==================================================
@M_KOJO_EVENT_K70_33(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORML 「あけましておめでとうございます～！」
	PRINTFORMW 「ふわぁ～ぁ……ねむい～…」
ENDIF
RETURN 1

;==================================================
;技能レベルアップ
;各ABL値はレベルアップ後の値になってます
;==================================================
@M_KOJO_EVENT_K70_34(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 1
		;戦闘能力
		IF ABL:[[小鈴]]:戦闘能力 >= 4
			PRINTFORML 「感觉变强了不少!」
        ELSE
            PRINTFORML 「应该变强了一点吧…?」
		ENDIF
	CASE 3
		;清掃技能
		PRINTFORML 「打扫打扫～」
	CASE 4
		;教養
		PRINTFORML 「得多看些书ー！」
	CASE 5
		;料理技能
		PRINTFORML 「下次尝试点什么好呢～♪」
	CASE 11, 12, 13, 14, 15, 16
		PRINTFORML 「ふふ…❤」
	CASEELSE
		PRINTFORML 「おや…？」
	ENDSELECT
	PRINTL
ENDIF
RETURN 1

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

;==================================================
;デイリーイベント4,物思い
;;親密5以上で発生（来訪キャラのみ）
;▼地の文--------------------------------------------------
;とりとめもない思考に耽っていた【TARGET】は、いつの間にか【MASTER】のことを考えていたことに気づいた
;【TARGET】は明日【MASTER】に会いに行くことにしたようだ
;==================================================
@M_KOJO_DAILY_EVENT_K70_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
CALL DAILY_MESSAGE_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:[[小鈴]]:恋人
		PRINTFORML 「呜……一个人待着好寂寞啊……」
        PRINTFORMW 「好的!明天要对%CALLNAME:MASTER%撒娇个够♪」
    ELSEIF TALENT:[[小鈴]]:恋慕
        PRINTFORMW 「明天去%CALLNAME:MASTER%那里吧♪」
    ELSE
        PRINTFORMW 「明天去%CALLNAME:MASTER%那里看看吧」
    ENDIF
ENDIF
RETURN 1

;==================================================
;デイリーイベント12,特訓
;信頼100以上で発生（拠点キャラのみ）
;==================================================
@M_KOJO_DAILY_EVENT_K70_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;コメントアウトできるのはARG:1=1,2のみです
CALL DAILY_MESSAGE_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG:1
	CASE 1
        ;被要求特训
        ;被~请求帮忙进行新技能的训练
        PRINTFORML 「%CALLNAME:MASTER%!突然说这个,您能帮我进行特训吗!?」
    CASE 2
        ;拒绝
        ;~看起来很失望
        PRINTFORML 「是、是这样吗……真遗憾……」
    CASE 3
        ;~攻击!
        ;※ここはWAITしないでください
        PRINTFORML 「咿!」
    CASE 4
        IF ARG:2
            ;时间停止躲避
            PRINTFORML 「欸?我明明觉得刚才打中了」
        ELSE
            ;躲避成功
            PRINTFORML 「唔唔……不愧是您呢」
        ENDIF
    CASE 5
        ;躲避失败
        PRINTFORML 「干得好!打中了ー!」
    ENDSELECT
ENDIF
RETURN 1

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

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（デート帰りキスなど）を見るまでうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K70_PERMISSION_1
;-------------------------------------------------
IF M_KOJO_K70_FUKIGEN([[小鈴]])
	;口上本体は押し倒す側で
	RETURN -1
ELSE
	RETURN 0
ENDIF
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_通常がオンになっている場合のみ有効。
;合意付きで押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常通り成功させます。
;合意があっても何らかの理由でうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K70_PERMISSION_2
;-------------------------------------------------
IF M_KOJO_K70_FUKIGEN([[小鈴]])
	;口上本体は押し倒す側で
	RETURN -1
ELSE
	RETURN 0
ENDIF
;-------------------------------------------------

;-------------------------------------------------
;部屋描写用関数
;口上キャラのOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
@K70_ROOM_DESCRIPTION
;贈り物を3回以上保存しているとき
IF CFLAG:[[小鈴]]:1074 >= 3 && !RAND:3
    PRINTFORML 架子上放着%CALLNAME:MASTER%送的礼物
ELSE
    SELECTCASE RAND:5
    CASE 1
        PRINTFORML 房间的角落里堆积着大量的书
    CASE 2
        PRINTFORML 是一个给人舒适感的小房间
    CASE 3
        PRINTFORML 摆着一张令人怀旧的书桌
    CASE 4
        PRINTFORML 房间里充满了草席和木头的气味
    CASEELSE
        PRINTFORML 闪烁的灰尘在空中飞舞
    ENDSELECT
ENDIF

;==================================================
;贈り物イベント
;==================================================
@M_KOJO_EVENT_K70_GIFT(ARG, GIFT_ID, 評価点, GIFT_NAME, SENSE)
#DIM GIFT_ID
#DIM 評価点
#DIMS GIFT_NAME
#DIMS SENSE
;---------------------------------------------------------------------------------------------------
;評価点       贈り物の評価点（1～999）,口上主があげた場合でも口上主の評価点
;GIFT_NAME    贈り物の名称
;SENSE        贈り物に設定された属性。STRCOUNT(SENSE, "ほげほげ/")を使うと特定の属性を判定できます。
;GIFT_ID      これ単体では使いません。以下の式内関数を使うとデータを抽出できます（こだわりたい人用）
;　GET_GIFTDATA(GIFT_ID, "回数")    貰った（あげた）回数
;　GET_GIFTDATA(GIFT_ID, "得点")    得点（1～999）,口上テンプレ内では用意されてます。
;　GET_GIFTDATA(GIFT_ID, "日付")    貰った（あげた）日付（1～9999）
;　GET_GIFTDATA(GIFT_ID, "場所")    買った場所（デートの行き先）
;　GET_GIFTDATA(GIFT_ID, "形容詞")  形容詞番号（贈り物_形容詞.erb参照）
;　GET_GIFTDATA(GIFT_ID, "本体")    本体番号（贈り物_本体.erb参照）
;--------------------------------------------------------------------------------------------------
;デート帰りに口上主があなたに贈り物を渡す（陥落や好感度に関わらず親密5以上から発生）
;評価点は701～999（渡すキャラ本人の評価）
;--------------------------------------------------------------------------------------------------
IF ARG == 1
	SELECTCASE RAND:5
	CASE 1
        PRINTFORMW 「啊!差点忘记了!」
        PRINTFORMW 「今天有想送给%CALLNAME:MASTER%的东西……」
    CASE 2
        PRINTFORMW 「%CALLNAME:MASTER%!%CALLNAME:MASTER%!」
        PRINTFORMW 「今天准备了看家本领的礼物,请一定要收下!」
    CASE 3
        PRINTFORMW 「那个,今天带着对%CALLNAME:MASTER%的谢意,准备了礼物」
        PRINTFORMW 「是为了这一天才精心挑选的…!」
    CASE 4
        PRINTFORMW 「%CALLNAME:MASTER%,等一下」
        PRINTFORMW 「这个,是想送给%CALLNAME:MASTER%的……拿去吧!」
    CASEELSE
        PRINTFORMW 「那个,%CALLNAME:MASTER%!」
        PRINTFORMW 「其实我搞到了一点东西……」
    ENDSELECT
    PRINTL
    SELECTCASE RAND:3
    CASE 1
        PRINTFORMDW 小鈴拿出一个小包裹,恭敬地递了过来。
    CASE 2
        PRINTFORMDW 小鈴郑重其事地递出一个小小的包裹。
    CASEELSE
        PRINTFORMDW 小鈴羞怯怯地从怀里取出一个包裹。
    ENDSELECT
    PRINTFORMDL 包裹里装着%GIFT_NAME%が入っていた。
    PRINTW
	IF STRCOUNT(SENSE, "(鈴)")
		PRINTFORMW 「请把它当做我的心意…❤」
	ELSEIF STRCOUNT(SENSE, "(妖魔圖鑒)")
		PRINTFORMW 「这可真是最好最好的礼物！！」
	ELSEIF STRCOUNT(SENSE, "(書物)") && !STRCOUNT(SENSE, "(手賬)")
		PRINTFORMW 「请务必读一读！」
	ELSEIF STRCOUNT(SENSE, "(眼鏡)")
		PRINTFORMW 「%CALLNAME:MASTER%さん很合适呢！」
	ELSEIF STRCOUNT(SENSE, "(狂熱)")
		PRINTFORMW 「这可是稀有物品哦！」
	ELSEIF STRCOUNT(SENSE, "(帥氣的)")
		PRINTFORMW 「酷酷的%CALLNAME:MASTER%さん就应该有这个…❤」
	ELSE
		PRINTFORMW 「若您喜欢的话，我会很开心的……」
	ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物を大事にする（700点以上）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 2
	IF STRCOUNT(SENSE, "(妖魔圖鑒)")
		;あなたから貰えたという事よりも妖魔本を貰えたという事の方が大事になってしまう素直な小鈴
		PRINTFORMW 「呀啊❤%CALLNAME:MASTER%送我妖魔圖鑒了!我都不敢相信!」
        PRINTFORMW 「哈啊……不行,我太兴奋了…❤」
        PRINTFORMW 「而且这本的质量看起来很高呢…!」
        PRINTFORMW 「啊……期待得都不舍得打开了…!」
        ;日记用的标志
        TCVAR:[[小鈴]]:381 = 2
    ELSEIF STRCOUNT(SENSE, "(鈴)")
        PRINTFORMW 「%CALLNAME:MASTER%送我的,%GIFT_NAME%……」
        PRINTFORMW 「%CALLNAME:MASTER%为我挑选的铃铛……❤」
        IF TALENT:[[小鈴]]:恋人
            PRINTFORMW 「这铃铛所表达的心意……我清清楚楚地感受到了……」
            PRINTFORMW 「我会永远珍惜的…❤」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「这铃铛到底代表着什么呢……」
            PRINTFORMW 「不行!我在自作多情!但我也确实这么想…!」
            PRINTFORMW 「啊~%CALLNAME:MASTER%你这个人,太狡猾了~!」
        ELSE
            PRINTFORMW 「呵呵……怎么感觉有点不好意思呢…♪」
        ENDIF
	ELSEIF STRCOUNT(SENSE, "(書物)") && !STRCOUNT(SENSE, "(手賬)")
		PRINTFORMW 「ふふ…❤ %CALLNAME:MASTER%さんか送的这个\@ STRCOUNT(SENSE, "(卷書)") ? 卷書 # 本 \@、已经迫不及待想读了！」
		PRINTFORMW 「光看封面的程度就绝对是精品呢～♪」
		PRINTFORMW 「而且比我想的还要厚呢……看来内容丰富的样子!」
	ELSEIF STRCOUNT(SENSE, "(眼鏡)")
		PRINTFORMW 「我试试戴上%CALLNAME:MASTER%送我的这副眼镜……」
        IF STRCOUNT(SENSE, "(太阳镜)")
            PRINTFORMW 「哦,这就是所谓的酷炫吗!」
		ELSEIF STRCOUNT(SENSE, "(可愛的)")
			PRINTFORMW 「啊,好可爱~❤」
        ELSE
            PRINTFORMW 「啊,感觉变得有点聪明了♪」
        ENDIF
        PRINTFORMW 「呵呵♪收到了好东西呢」
	ELSEIF STRCOUNT(SENSE, "(狂熱)")
		PRINTFORML 「这个%GIFT_NAME%……不知道%CALLNAME:MASTER%是从哪里找到的」
        PRINTFORMW 「是因为知道我喜欢这种东西,所以特意挑选的吗……」
		IF TALENT:[[小鈴]]:恋人
            PRINTFORMW 「该不会%CALLNAME:MASTER%也喜欢这种东西吧?」
            PRINTFORMW 「呵呵,要是真的就很有趣了♪」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「嗯,有点不好意思但很开心…❤」
        ELSE
            PRINTFORMW 「也、也许是巧合吧……」
		ENDIF
	;「怖い」は本当にレアです,2%ぐらい
	ELSEIF STRCOUNT(SENSE, "(可怕的)")
		PRINTFORML 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……」
        PRINTFORMW 「有点诡异但不知为何又很吸引人……」
        IF TALENT:[[小鈴]]:恋人
            PRINTFORMW 「不愧是%CALLNAME:MASTER%,品味太好了…!」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「%CALLNAME:MASTER%的品味真是无与伦比啊」
        ELSE
            PRINTFORMW 「%CALLNAME:MASTER%的品味很特别呢」
        ENDIF
    ELSEIF STRCOUNT(SENSE, "(不思議)")
        PRINTFORML 「从%CALLNAME:MASTER%那里收到的这个%GIFT_NAME%,怎么感觉好神秘~」
        IF TALENT:[[小鈴]]:恋人
            PRINTFORMW 「不愧是%CALLNAME:MASTER%,我的品味完全不及啊…!」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「真是神秘的%CALLNAME:MASTER%的作风」
        ELSE
            PRINTFORMW 「%CALLNAME:MASTER%还真是一个不可思议的人」
        ENDIF
	ELSEIF STRCOUNT(SENSE, "(帥氣的)")
		IF TALENT:[[小鈴]]:恋人
			;恍惚
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……超级帅!」
            PRINTFORMW 「不愧是%CALLNAME:MASTER%……太帅了…❤」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……好酷~!」
            PRINTFORMW 「%CALLNAME:MASTER%的品味,太帅了…❤」
        ELSE
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……好酷~!」
            PRINTFORMW 「%CALLNAME:MASTER%你啊,品味真不错~」
        ENDIF
    ELSEIF STRCOUNT(SENSE, "(可愛的)")
        IF TALENT:[[小鈴]]:恋人
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……超级可爱!」
            PRINTFORMW 「不愧是%CALLNAME:MASTER%,很了解我呢…❤」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……好可爱~!」
            PRINTFORMW 「虽然不甘心,但%CALLNAME:MASTER%的品味是真的不错…❤」
        ELSE
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……好可爱~!」
            PRINTFORMW 「%CALLNAME:MASTER%你啊,品味真不错~」
        ENDIF
    ELSE
        IF TALENT:[[小鈴]]:恋人
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%……品味太好了~!」
            PRINTFORMW 「不愧是%CALLNAME:MASTER%,很了解我呢…❤」
        ELSEIF TALENT:[[小鈴]]:恋慕
            PRINTFORMW 「呵呵,收到了%CALLNAME:MASTER%的礼物…❤」
            PRINTFORMW 「而且这个%GIFT_NAME%质量很高…!不愧是%CALLNAME:MASTER%」
        ELSE
            PRINTFORMW 「%CALLNAME:MASTER%送我的这个%GIFT_NAME%,质量很高…!」
            PRINTFORMW 「%CALLNAME:MASTER%你啊,品味真不错~」
        ENDIF
    ENDIF
    IF STRCOUNT(SENSE, "(卡片|稀有卡片)")
        PRINTFORMW 「对了,我要把它当书签用♪」
    ELSE
        PRINTFORMW 「我会好好保管的♪」
    ENDIF
	;保存した回数をカウント
	CFLAG:[[小鈴]]:1074 ++
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をお気に入りにする（↑の大事にするから続き）（700点以上かつ最高得点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 3
	PRINTL
	IF STRCOUNT(SENSE, "(卡片|稀有卡片)")
        PRINTFORMW 「呵呵……我要把它当做我最喜欢的书签…❤」
    ELSEIF TALENT:[[小鈴]]:恋人
        PRINTFORML 「不过,我还是会随身携带的」
        PRINTFORMW 「这样我随时随地都能感受到%CALLNAME:MASTER%对我的守护…❤」
    ELSEIF TALENT:[[小鈴]]:恋慕
        PRINTFORML 「不过,我还是会随身携带的」
        PRINTFORMW 「这样我随时随地都能感受到%CALLNAME:MASTER%…❤」
    ELSE
        PRINTFORMW 「不过,随身携带可能更好」
    ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をとりあえず保管する（400～699点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 4
	IF STRCOUNT(SENSE, "(妖魔圖鑒)")
		PRINTFORMW 「%CALLNAME:MASTER%送我的这本妖魔书……」
        PRINTFORMW 「我明白……从封面一看就知道这绝对是本劣质书……」
        PRINTFORMW 「但、但是,这毕竟是妖魔书! 我还是要感谢%CALLNAME:MASTER%!」
        ;日记用的旗标
        TCVAR:[[小鈴]]:381 = 1
    ELSEIF STRCOUNT(SENSE, "(鈴)")
        ;送女孩子不合适的礼物会让她难过
        PRINTFORMW 「%CALLNAME:MASTER%送我铃铛,嗯……」
        PRINTFORMW 「要是送点更时髦的东西会更好呢」
    ELSEIF STRCOUNT(SENSE, "(書物)") && !STRCOUNT(SENSE, "(手賬)")
        PRINTFORMW 「%CALLNAME:MASTER%送我的这本书……」
        PRINTFORMW 「我会试着读读看,不过……光看封面就能看出来好像不是很有趣呢」
    ELSEIF STRCOUNT(SENSE, "(眼鏡)")
        PRINTFORMW 「%CALLNAME:MASTER%送我的眼镜,该拿它怎么办呢」
        PRINTFORMW 「嘛,偶尔戴戴也好,不然对%CALLNAME:MASTER%不好意思呢」
    ENDIF
    IF STRCOUNT(SENSE, "(卡片|稀有卡片)")
        PRINTFORMW 「对了,我要把它当书签用」
    ELSE
        SELECTCASE CFLAG:[[小鈴]]:1074 % 5
        CASE 1
            PRINTFORMW 「先把它放在这里吧」
        CASE 2
            PRINTFORMW 「要不把它摆在这里装饰一下?」
        CASE 3
            PRINTFORMW 「把它收藏在这里就可以了」
        CASE 4
            PRINTFORMW 「嗯~要把它放到哪里好呢……」
        CASEELSE
            PRINTFORMW 「把它放在这里应该不会被认为是店里的商品吧」
        ENDSELECT
		IF CFLAG:[[小鈴]]:1074 >= 3
			;順当にいけば3から
			SELECTCASE CFLAG:[[小鈴]]:1074 % 4
			CASE 1
				PRINTFORMW 「不知不觉就收到了这么多……」
			CASE 2
				PRINTFORMW 「啊,这里已经放不下了么……」
			CASE 3
				PRINTFORMW 「收到的礼物也越来越多呢」
			CASEELSE
				PRINTFORMW 「呵呵,%CALLNAME:MASTER%さん的物品变多了呢」
			ENDSELECT
		ENDIF
	ENDIF
	;保存した回数をカウント
	CFLAG:[[小鈴]]:1074 ++
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をこっそり質に入れる（400点未満）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 5
	IF TALENT:[[小鈴]]:恋人
		PRINTFORML 「哈……%CALLNAME:MASTER%さん,我本以为你更了解我的喜好…」
		PRINTFORMW 「这种玩意儿有点……」
	ELSEIF TALENT:[[小鈴]]:恋慕
		PRINTFORMW 「唔~嗯……%CALLNAME:MASTER%さん,可能你的审美不是很好吧……」
	ELSE
		PRINTFORMW 「%CALLNAME:MASTER%さん这个人,怎么说呢,可能审美比较差劲吧…」
	ENDIF
	PRINTFORMW 「没办法,我去找妈妈帮忙暗中处理掉吧……」
	RETURN 1
ENDIF
RETURN 1

;==================================================
;ムシバトル
;ムシバトルの口上は少し特殊で、PRINTを使うのではなく、
;台詞一行のみをRESULTSに入れてください
;ムシの名前は %MUSHI_NAME% で表示できます
;ムシの名前の最長はアレキサンドラトリバネアゲハの全角14文字です
;文字数制限があります。はみ出ないように気をつけてください
;ARGは残りムシ数か順位です
;==================================================
@M_KOJO_MESSAGE_COM_K70_MUSHI_BATTLE(ARGS, ARG)
#DIM 残りムシ数
#DIM 順位
SELECTCASE ARGS
CASE "試合前"
	;-------------------------------------------------
	;キャラセレクト時,ARGは使えません
	;全角50文字くらいまで
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「嗯...是我吗......？」
	ENDIF
CASE "戦場に出した"
	;-------------------------------------------------
	;"【（キャラ）】は《（ムシ）》を戦場に出した！」"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「那么，就用这个孩子吧」
	ENDIF
CASE "攻撃時"
	;-------------------------------------------------
	;"【（キャラ）】《（ムシ）》の『（攻撃名）』！」"の直前
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「加油！ %MUSHI_NAME%！」
	ENDIF
CASE "倒れた時"
	;-------------------------------------------------
	;"【（キャラ）】《（ムシ）》は倒れた！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「啊，被打败了」
	ENDIF
CASE "敗退時"
	;-------------------------------------------------
	;"【（キャラ）】敗退！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「哎，已经结束了吗…？」
	ENDIF
CASE "タイマン：勝ち"
	;-------------------------------------------------
	;順位は1位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「输掉了～」
	ENDIF
CASE "タイマン：負け"
	;-------------------------------------------------
	;順位は2位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「哎，是我的胜利吗...？」
	ENDIF
CASE "バトルロイヤル：優勝"
	;-------------------------------------------------
	;順位は1位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「竟然赢了呢……」
	ENDIF
CASE "バトルロイヤル：２位以下"
	;-------------------------------------------------
	;順位は2～4位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「遗憾呢～」
	ENDIF
CASE "チーム戦：勝ち"
	;-------------------------------------------------
	;順位は1位（やられていても）
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「赢了吗？太好了～」
	ENDIF
CASE "チーム戦：負け"
	;-------------------------------------------------
	;順位は2位
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
		RESULTS = 「哎呀呀，真遗憾」
	ENDIF
ENDSELECT
SIF RESULTS != ""
	RETURN 1

;;==================================================
;;引力操作
;;TCVAR:引力点に場所IDを入れるとその地点に引っ張られていきます
;;場所IDと同じ拠点マップでしか効果はありません（博麗神社の境内なら拠点が博麗神社のときだけ）
;;条件を付けないと永久に引っ張られ続けるので注意
;;RANDは基本的に使えません。CFLAG:今日の運勢にその日のランダム数値（0～999）が入っているのでこれを使うと良いです
;;==================================================
;@M_KOJO_EVENT_K70_GRAVITY(ARG)
;
;SIF 0
;	TCVAR:引力点 = 0
;
;;▼共通設定で使われているサンプル
;[SKIPSTART]
;	;平日の昼間はランダムで遊びに行く
;	IF YOUBI_MATCH(DAY, "月火水木金") && INRANGE(TIME, 600, 960)
;		SELECTCASE CFLAG:今日の運勢 % 5
;		CASE 1
;			TCVAR:引力点 = P2境内
;		CASE 2
;			TCVAR:引力点 = P10縁側
;		CASE 3
;			TCVAR:引力点 = P11庭
;		CASE 4
;			TCVAR:引力点 = P25鎮守の森
;		CASEELSE
;			TCVAR:引力点 = 0
;		ENDSELECT
;	ENDIF
;	;水木曜日に2分の1の確率で遊びに行く
;	SIF YOUBI_MATCH(DAY, "水木") && INRANGE(TIME, 720, 1020) && CFLAG:今日の運勢 % 2 == 0
;		TCVAR:引力点 = P213鈴奈庵
;	;特定の人物が特定の場所にいるとそこへ引っ張られる
;	SIF CFLAG:[[白蓮]]:現在位置 == P103本堂 && !CFLAG:[[白蓮]]:うふふ && SHIRAHU([[白蓮]])
;		TCVAR:引力点 = P103本堂
;	;土日に10分の1の確率で特定の人物にくっついてまわる
;	SIF YOUBI_MATCH(DAY, "土日") && CFLAG:今日の運勢 % 10 == 0 && !CFLAG:[[さとり]]:うふふ && SHIRAHU([[さとり]])
;		TCVAR:引力点 = CFLAG:[[さとり]]:現在位置
;[SKIPEND]

;==================================================
;スイカ割り
;スイカ割りの口上はムシバトル同様、PRINTを使うのではなく、
;台詞一行のみをRESULTSに入れてください
;カギ括弧は自動で付きます
;"衝突","結果"のみ、口上色が自動で付きます
;"衝突","結果"以外は半角26文字（全角13文字）までの文字数制限があります。はみ出ないように気をつけてください
;数パターンあると雰囲気が出ます（%TEXTR( / )%を使うと良い）
;==================================================
@M_KOJO_MESSAGE_COM_K70_SUIKA(ARGS, ARG)
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL:1 = 1
;-------------------------------------------------
IF LOCAL:1
	SELECTCASE ARGS
	CASE "衝突"
		;-------------------------------------------------
		;場外に出てあなたがキャラと衝突した際の台詞
		;文字数制限はありません,汎用台詞もありません
		;-------------------------------------------------
		RESULTS = 碰！那是我！
	CASE "そこだ！"
		RESULTS = %TEXTR("那里！/现在！/现在！")%
	CASE "近い"
		RESULTS = %TEXTR("离得很近！/正在靠近！/就快了！")%
	CASE "遠い"
		RESULTS = %TEXTR("还很远/离得很远呢～/还有距离")%
	CASE "かなり遠い"
		RESULTS = %TEXTR("一直很远哦/还很远呢")%
	CASE "前"
		RESULTS = %TEXTR("前方/一直直走/那边")%
	CASE "少し前"
		RESULTS = %TEXTR("再往前一点！/稍微前一些！/再走一步吧？")%
	CASE "後ろ"
		RESULTS = %TEXTR("反方向哦！/不是那边哦！/朝相反方向！")%
	CASE "少し後ろ"
		RESULTS = %TEXTR("就在后面！/正在转身哦/稍微后一些！")%
	CASE "右"
		RESULTS = %TEXTR("右边/就在右边哦/再往右一些")%
	CASE "少し右"
		RESULTS = %TEXTR("稍微往右/稍微右边")%
	CASE "左"
		RESULTS = %TEXTR("左边/就在左边哦/再往左一些")%
	CASE "少し左"
		RESULTS = %TEXTR("稍微往左/稍微左边")%
	CASE "結果"
		;-------------------------------------------------
		;終了後の一言
		;文字数制限はありません,汎用台詞もありません
		;TFLAG:193,
		;   -1=失敗
		;    0=成功
		;    1=大成功
		;    2=木刀で大成功（ボーナス点）
		;ARG
		;    0=正直者
		;    1=ウソつき
		;-------------------------------------------------
		IF ARG
			SELECTCASE TFLAG:193
			CASE -1
				RESULTS = "啊哈哈，真可惜～♪"
			CASE 0
				RESULTS = "哦，做得好啊！"
			CASE 1
				RESULTS = "太厉害了！真不错！"
			CASE 2
				RESULTS = "哇，直接分成两半！"
			ENDSELECT
		ELSE
			SELECTCASE TFLAG:193
			CASE -1
				RESULTS = "嗯～，有点遗憾......"
			CASE 0
				RESULTS = "哇，做到了！"
			CASE 1
				RESULTS = "太厉害了！真不错！"
			CASE 2
				RESULTS = "哇！直接分成两半！"
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【70】小鈴/M_KOJO_K70_01_イベント.ERB