code:
@TALK
#DIM daysCount
#DIM penalty
daysCount = DAY - SCHOOL_FIRST_GOING_DAY:GET_CHARA_GO_SCHOOL_INDEX(MASTER)
penalty = 0

CALL DISPLAY_COMMON , 11
SIF RESULT == 999
	RETURN 0

RESULT = 0
TRYCALLFORM SCENARIO_EVENT_CHARACTER_CONTACT_INTERCEPT_EVENT_{NO:C}("TALK",C,-1,-1,daysCount)
SELECTCASE RESULT
	CASE IS > 1
		penalty = RESULT - 1
	CASE 1
		BEGIN TURNEND
	CASE 0
		;아무것도안한다
	CASE IS < 0
		penalty = RESULT
ENDSELECT

CALL EVENT_TALK(C,penalty)

PRINTFORML 関係進展度+{MAX(1,RESULT-TALENT:C:경계)}
CFLAG:C:1010 += MAX(1,RESULT-TALENT:C:경계)
IF CFLAG:C:1010 > 100
	IF TALENT:C:남편있음
		IF TALENT:C:ＮＴＬ == 0
			IF TALENT:C:밀회 != 1
				PRINTFORMW 時々、%NAME:C%から熱い視線を受けることがある。
				PRINTFORMW どうやら、%CALLNAME:C%의 心をこちらに向けることに成功したようだ。
			ELSE
				PRINTFORMW 時々、%NAME:C%から熱い視線を受けることがある。
				PRINTFORMW どうやら、何か大きな心境の変化があったようだが････？
			ENDIF

			TALENT:C:ＮＴＬ = 1

			;進展度を減らす
			CFLAG:C:1010 = 65
		ELSE
			;RESULT EVENT_TALKからの戻り値が30以上=특수イベント発生してる
			IF TALENT:C:밀회 != 1
				IF RESULT >= 30
					;처녀はキスまで
					IF TALENT:C:처녀
						PRINTFORML 今日の事で、%NAME:C%의 心が%PARTNER_NAME_CORE(C)%から離れた事が確信できた。
						PRINTFORMW ……これなら、押し倒しても저항しないのではないだろうか‥‥

						CALL DIARY_SET,NAME:C+"と不倫関係となった。"
					;非처녀はエッチまで
					ELSE
						PRINTFORML 今日の事で、%NAME:C%의 心が%PARTNER_NAME_CORE(C)%から離れた事が確信できた。
						PRINTFORMW ……次に会った時に肉体関係を求めても拒みはしないだろう‥‥

						CALL DIARY_SET,NAME:C+"と不倫関係となった。"
					ENDIF
				ELSE
					PRINTFORM %NAME:C%의 心は%PARTNER_NAME_CORE(C)%から離れた事が確信できた。
					PRINTFORMW ……これなら、押し倒しても저항しないのではないだろうか‥‥
					CALL DIARY_SET,NAME:C+"と不倫関係となった。"
				ENDIF
			ELSE
				PRINTFORML 今日の事で、%NAME:C%의 心を掴んだ事が確信できた。
				PRINTFORMW ……これなら、押し倒しても저항しないのではないだろうか‥‥
				CALL DIARY_SET,NAME:C+"と恋人関係となった。"
			ENDIF

			;告白時입上
			B = NO:C
			TRYCALL KOKUHAKU_KOJO,B
			CFLAG:C:1000 = 5

			TALENT:C:교제 = 1
			TALENT:C:경계 = 0
		ENDIF
	ELSEIF TALENT:C:남친있음
		IF TALENT:C:밀회 != 1
			PRINTFORMW 聞いた話によると、%NAME:C%と%PARTNER_NAME_CORE(C)%が別れたらしい……
			PRINTFORMW さて、どうするべきか……

			CALL DIARY_SET,NAME:C+"と"+PARTNER_NAME_CORE(C)+"が別れた。"
		ELSE
			PRINTFORMW 聞いた話によると、%NAME:C%は誰かと大げんかしたらしい････。
		ENDIF

		;남친있음を消す
		TALENT:C:남친있음 = 0
		;좋아하는사람있음を消す
		TALENT:C:좋아하는사람있음 = 0
		TALENT:C:밀회 = 0

		TALENT:C:ＮＴＬ = 1

		;進展度を減らす
		CFLAG:C:1010 = 40
	ELSEIF TALENT:C:좋아하는사람있음
		PRINTFORMW 時々、%NAME:C%から熱い視線を受けることがある。
		IF TALENT:C:밀회 != 1
			PRINTFORMW どうやら、%CALLNAME:C%의 心をこちらに向けることに成功したようだ。
		ELSE
			PRINTFORMW どうやら、%CALLNAME:C%의 心を掴むことに成功したようだ。
		ENDIF

		;좋아하는사람있음を消す
		TALENT:C:좋아하는사람있음 = 0
		TALENT:C:밀회 = 0
		;TALENT:C:ＮＴＬ = 1

		;進展度を減らす
		CFLAG:C:1010 = 80
	ELSE
	; 미망인分岐も追加する?
		PRINTFORMW ‥‥そろそろ%NAME:C%を押し倒しても저항しないのではないだろうか‥‥

		CALL DIARY_SET,NAME:C+"と교제を始めた。"

		;告白時입上
		B = NO:C
		TRYCALL KOKUHAKU_KOJO,B
		CFLAG:C:1000 = 5
		TALENT:C:경계 = 0

		;SIF TALENT:C:남편있음
		;	TALENT:C:ＮＴＬ = 1

		TALENT:C:교제 = 1
	ENDIF
ELSE
	IF TALENT:C:남편있음 && !TALENT:C:ＮＴＬ
		IF CFLAG:C:1010 > 70
			PRINTL 色々なことを相談されるようになってきた。
			PRINTW 親友といってもいいのかもしれない。
		ELSEIF CFLAG:C:1010 > 40
			PRINTW かなり気を許してくれるようになってきたようだ。
		ELSEIF CFLAG:C:1010 > 10
			PRINTW 一応、友人と名乗ることは出来るだろう。
		ELSE
			PRINTW 取りあえず、嫌われてはいないだろう。
		ENDIF
	ELSEIF TALENT:C:남친있음 && !TALENT:C:ＮＴＬ
		IF CFLAG:C:1010 > 70
			PRINTL 色々なことを相談されるようになってきた。
			PRINTW 親友といってもいいのかもしれない。
		ELSEIF CFLAG:C:1010 > 40
			PRINTW かなり気を許してくれるようになってきたようだ。
		ELSEIF CFLAG:C:1010 > 10
			PRINTW 一応、友人と名乗ることは出来るだろう。
		ELSE
			PRINTW 取りあえず、嫌われてはいないだろう。
		ENDIF
	ELSE
	; 미망인分岐も追加する?
		IF CFLAG:C:1010 > 70
			PRINTW 時々、熱っぽい視線を感じる。
		ELSEIF CFLAG:C:1010 > 40
			PRINTW 時々、いい雰囲気になっているような気がする。
		ELSEIF CFLAG:C:1010 > 10
			PRINTW 一応、友人と名乗ることは出来るだろう。
		ELSE
			PRINTW 取りあえず、嫌われてはいないだろう。
		ENDIF
	ENDIF
ENDIF
PRINTW
BEGIN TURNEND

@EVENT_TALK(ARG, ARG:1=0)
A = 5
LOCAL = RAND:5 - 2
;能力の比較
IF TALENT:ARG:체육부
;運動の対抗判定
	CALL COMPATITION, ARG, 23, 0, MASTER
ELSEIF TALENT:ARG:격투기부
;戦闘の対抗判定
	CALL COMPATITION, ARG, 24, 0, MASTER
ELSEIF TALENT:ARG:위원회
;학력の対抗判定
	CALL COMPATITION, ARG, 22, 0, MASTER
ELSE
;감성の対抗判定
	CALL COMPATITION, ARG, 25, 0, MASTER
ENDIF
IF RESULT == 0
	A += 2
	SIF TALENT:ARG:영애 == 1
		A += 1
ELSE
	A -= 1
	SIF TALENT:ARG:영애 == 1
		A -= 2
ENDIF
SIF TALENT:ARG:반항적 == 1 && RAND:3 == 0
	A -= 1
SIF TALENT:ARG:솔직 == 1 && RAND:3 == 0
	A += 1
SIF TALENT:ARG:츤데레 == 1 && RAND:3 == 0 && CFLAG:C:1010 < 50
	A -= 1
SIF TALENT:ARG:감정부족 == 1 && RAND:3 == 0
	A -= 1
SIF TALENT:ARG:호기심 == 1 && RAND:3 == 0
	A += 1
SIF TALENT:ARG:보수적 == 1 && RAND:3 == 0
	A -= 1
SIF TALENT:ARG:낙관적 == 1 && RAND:3 == 0
	A += 1
SIF TALENT:ARG:비관적 == 1 && RAND:3 == 0
	A -= 1
SIF TALENT:ARG:정조관념 == 1 && RAND:3 == 0 && CFLAG:C:1010 < 50
	A -= 1
SIF TALENT:ARG:남성혐오 == 1 && RAND:2 == 0 && TALENT:MASTER:남자
	A -= 2
SIF TALENT:ARG:반항적 == 1 && RAND:3 == 0
	A -= 1
SIF TALENT:ARG:청초 == 1 && RAND:2 == 0
	A -= 1
SIF TALENT:ARG:쾌활 == 1 && RAND:2 == 0
	A += 1
SIF TALENT:ARG:보이쉬 == 1 && RAND:2 == 0
	A += 1
SIF TALENT:ARG:어린애같음 == 1 && RAND:2 == 0
	A += 1
SIF TALENT:ARG:치유계 == 1 && RAND:2 == 0
	A += 1
SIF TALENT:ARG:쿨함 == 1 && RAND:2 == 0
	A -= 1
SIF CFLAG:MASTER:1002 == CFLAG:ARG:1002
	A += 2
SIF TALENT:ARG:고고함 == 1 && CFLAG:ARG:1010 < 30
	A -= 1
SIF TALENT:ARG:친구많음 == 1 && CFLAG:ARG:1010 > 50
	A -= 1
SIF TALENT:ARG:영애 == 1 && RAND:2 == 0
	A -= 1
SIF TALENT:ARG:좋아하는사람있음
	A -= 1
SIF TALENT:ARG:미망인
	A -= 1
SIF TALENT:ARG:느슨함
	A += 5

;남편있음や남친있음はＮＴＬまでは遠いがＮＴＬにすると、そこからは早い
SIF TALENT:ARG:남친있음
	A -= 2
SIF TALENT:ARG:ＮＴＬ
	A += 1
SIF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0
	A -= 3
SIF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ
	A += 1

SIF TALENT:ARG:반하기쉬움
	A += 2
;즉각함락は落としやすい
SIF TALENT:ARG:즉각함락
	A += 3
SIF TALENT:ARG:철벽
	A -= 3
SIF TALENT:ARG:걸레녀
	A += 1
SIF TALENT:ARG:공주님소망
	A += 1

A += ARG:1

SIF A < 1
	A = 1
;입説きイベント
PRINTL ･･･････････････････････････････････････････････････････････････････････････････

LOCAL = CFLAG:ARG:1010 / 30
SIF CFLAG:ARG:1010 % 30 == 0 && CFLAG:ARG:1010 > 0
	LOCAL -= 1
LOCAL:1 = CFLAG:ARG:1010 + A
LOCAL:1 /= 30
;好感度30上昇毎に특수イベント(現状３種＋남친있음１種)
IF LOCAL:1 > LOCAL
;특수イベント
	LOCAL = RAND:4
	;人妻ＮＴＬ時は특수イベントに行きやすくする
	SIF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 1 && CFLAG:ARG:1010 > 70
		LOCAL -= 3

	;結婚してるのに……
	IF LOCAL <= 0 && TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 1 && CFLAG:ARG:1010 > 70
;家に誘う
		IF FLAG:8 == 1
;平日
			PRINT 学校からの帰り道に偶然、
		ELSE
			PRINT 休日に偶然、
		ENDIF
		PRINTFORML %NAME:ARG%と顔を合わせた。
		PRINTFORML ここは、%CALLNAME:MASTER%의 家からも近いのだが、少し誘ってみようか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML %CALLNAME:ARG%に少し家に寄って、お茶でも飲んで行かないかと誘ってみた。
;YES;好感度判定　RAND:50+20で好感度より小さい値が出れば成功(かなり難しい)、특수イベントなので問答無用で成功する
			CALL CHECK_LIKES, ARG, 50, 0
			IF RESULT == 1
				PRINTFORML %마스터호칭이% 誘ってくれるならと、%ARG는% 少し照れながら頷いた。
				PRINTFORML ……%CALLNAME:MASTER%의 部屋に案内した。
				PRINTFORML お茶を飲みながら、話をして時間を過ごした。
				PRINTFORML ………………
				PRINTFORML …………
				PRINTFORML ……
				PRINTFORML 楽しい時間は過ぎるのが早い。　そろそろ帰る時間だろう。
				PRINTFORML %CALLNAME:ARG%を送り出そうと、立ちあがった%마스터호칭은%、フローリングで足を滑らせてしまった。
				PRINTFORML %CALLNAME:ARG%を巻き込むようにしてひっくり返り、我に帰って見れば%CALLNAME:MASTER%의 손は、
				PRINTFORM %CALLNAME:ARG%의
				IF TALENT:ARG:거유 || TALENT:ARG:폭유
					PRINTFORM 가슴にある大きなふくらみを鷲掴み
					IF TALENT:ARG:Ｂ민감
						PRINTFORML にしていて……
						PRINTFORML その刺激で、%CALLNAME:ARG%に고통と喘ぎ声のどちらにもとれるような声をあげさせてしまっている……
					ELSE
						PRINTFORML に……
					ENDIF
				ELSE
					PRINTFORM 가슴のふくらみの上
					IF TALENT:ARG:Ｂ민감
						PRINTFORML にあって……
						PRINTFORML その刺激で、%CALLNAME:ARG%に고통と喘ぎ声のどちらにもとれるような声をあげさせてしまっている……
					ELSE
						PRINTFORML に……
					ENDIF
				ENDIF
				PRINTFORML ……取りあえず謝るべきだろうか？
				CALL CHECK_YN
				IF RESULT == 0
					PRINTFORML ……取りあえず謝っておくべきだろう。
					PRINTFORMW そう思って、謝罪の言葉とともに離れようとする%CALLNAME:MASTER%의 손を上から%CALLNAME:ARG%의 손が押さえつけた。
				ELSE
					PRINTFORML あえて謝らない。これは悪意のない事故なのだ。
					PRINTFORMW そう思って、無言で離れようとする%CALLNAME:MASTER%의 손を上から%CALLNAME:ARG%의 손が押さえつけた。
				ENDIF
				PRINTFORMW これは？と顔をあげると、頬を赤く染めた%CALLNAME:ARG%が潤んだ瞳で、こちらを見つめていた。
				PRINTL
				PRINTFORML いきなりの事に戸惑う%CALLNAME:MASTER%に向け%CALLNAME:ARG%が小さく頷く。
				PRINTFORMW ……それを%CALLNAME:ARG%からの誘いと受け取った%마스터호칭은%%CALLNAME:ARG%に顔を近づけ、ゆっくりと唇と唇を重ね合わせた……
				PRINTL
				;처녀はキスまで、非처녀は最後まで
				IF TALENT:ARG:처녀
					PRINTFORML 重ね合わせるだけだったのが、ついばむ様なキスを経て舌と舌を絡み合わせるものへと変わる。
					PRINTFORMW そうして、입づけを交わし、お互いの唾液が混ざり合ってでできた糸を残し、二人の唇が離れた。
					PRINTL
					PRINTFORML 時間としては、そこまで長くないキスが終わると、%ARG는% 、はっとしたように表情になり、
					PRINTFORMW 今の事は忘れてと、逃げるように帰っていった……
					PRINTL
					PRINTFORML %CALLNAME:ARG%의 【순종】に＋1、【욕망】に＋1された
					ABL:ARG:0 += 1
					ABL:ARG:1 += 1
					PRINTFORMW %타겟호칭은% 【굴복각인：2】を得た
					MARK:ARG:2 = 2
				ELSE
					PRINTFORML 重ね合わせるだけだったのが、ついばむ様に変わり、그리고、舌と舌を絡み合わせるものへとなる。
					PRINTFORM そのまま%CALLNAME:ARG%의
					IF TALENT:ARG:거유 || TALENT:ARG:폭유
						PRINTFORM 掌に収まりきらない程のふくらみを服の上から堪能しながら、
					ELSEIF TALENT:ARG:거유
						PRINTFORM 豊かなふくらみを服の上から揉みしだきながら、
					ELSE
						PRINTFORM 가슴を服の上から애무しながら、
					ENDIF
					PRINTFORMW %CALLNAME:ARG%의 服をはだけさせていった……
					PRINTL
					PRINTFORML %CALLNAME:MASTER%의 前に裸体を압박붕대、恥ずかしそうにしている%CALLNAME:ARG%。
					PRINTFORMW キスと가슴への刺激だけで、すっかり準備の整った秘所を指で軽く刺激した後、両足を開かせ挿入の体勢を取る。
					PRINTL
					PRINTFORMW 硬くなった페니스の先端と%CALLNAME:ARG%의 질を合わせ、腰をおし進めようとすると、%CALLNAME:ARG%がビクッと身じろぎをした。
					PRINTFORM 挿入間際になって、
					PRINTFORMW これが%PARTNER_NAME_CORE(ARG)%に対する決定的な裏切りである事に思い至ったのか、
					PRINTFORMW %ARG는% 震える声でやっぱりダメと言った。
					PRINTFORMW ……が、ここまで来てやめられるわけがない。
					PRINTFORML %CALLNAME:ARG%의 弱々しい거절を%CALLNAME:ARG%への愛情を示す言葉と입づけで説得する。
					PRINTFORMW 本心では%마스터호칭을% 求めていた%ARG는% 、最後には説得に折れ、外に出してくれるならと顔を横に向きつぶやいた……
					PRINTL
					PRINTFORML まだ少し逡巡が残るのか、페니스が挿入される瞬間に%ARG는% 小さな声をあげる。
					PRINTFORMW それをキスでふさぎつつ、%마스터호칭은%ゆっくりと腰を突き入れていった……
					PRINTL
					PRINTFORML 最近、ご無沙汰だったらしい%ARG는% 、根元まで挿入をはたした%마스터호칭이%
					PRINTFORMW 何度か페니스を抜き差ししただけで軽く達し、体をのけ反らせ可愛らしい声をあげた。
					PRINTL
					PRINTFORML その声を聞きながら抽挿を激しくしていき、%CALLNAME:ARG%と一緒に快楽の階段を駆け上ると、
					PRINTFORMW 絶頂に喘ぐ%CALLNAME:ARG%から射精寸前の페니스を引き抜き、%CALLNAME:ARG%의 裸身へと精を放った……
					PRINTFORML ………………
					PRINTFORML …………
					PRINTFORMW ……
					PRINTFORMW ……あれから何度交わっただろうか？
					PRINTFORML 　입づけを交わしながら―
					PRINTFORML 　後ろから가슴を揉みしだきながら―
					PRINTFORML 　恋人同士のように抱きしめあいながら－
					PRINTFORML 　%CALLNAME:ARG%を上に乗せ下から突き上げながら―
					PRINTFORM その度に%ARG는% 快楽に乱れ、
					IF TALENT:ARG:밀회 != 1
						PRINTFORM %PARTNER_NAME_CORE(ARG)%以外には見せたことがないであろう
					ELSE
						PRINTFORM 誰も見たことがないであろう
					ENDIF
					PRINTFORMW 姿を%CALLNAME:MASTER%にさらけ出した。
					PRINTL
					PRINTFORMW ……夕暮れが過ぎ辺りが暗くなる頃。
					PRINTFORML その日、最後となる精液を%CALLNAME:ARG%へと浴びせかけた%마스터호칭이% 、疲労根倍といった様子で、
					PRINTFORM %CALLNAME:MASTER%의 精液で
					IF TALENT:ARG:갈색피부
						PRINTFORM 褐色の肌を白く
					ELSE
						PRINTFORM 体中を
					ENDIF
					PRINTFORMW マーキングされた%CALLNAME:ARG%의 方へと倒れこんだ。
					PRINTFORMW 그대로、汗と体液でしっとりと濡れた体を寄り添わせ、二人は名残を惜しむかのように体温と心臓の鼓動を共有した……
					PRINTFORML ………………
					PRINTFORML …………
					PRINTFORMW ……
					PRINTFORML 行為を終え손早く身支度を済ませた%ARG는% 、冷静になってきたのか、
					PRINTFORMW 帰り際になって%CALLNAME:MASTER%에게、今日の事はお互いに忘れようと告げてきた。
					PRINTFORML その言葉に忘れられるわけがないと返すと、%ARG는% 困ったような、また嬉しそうな表情を浮かべ、
					PRINTFORMW 逃げるように帰っていった……

					;経験処理
					PRINTL
					;V経験
					EXP:ARG:0 += 6
					PRINTFORML Ｖ경험＋6
					;절정경험
					EXP:ARG:2 += 10
					PRINTFORML 절정경험＋10
					;성교경험
					EXP:ARG:4 += 6
					PRINTFORML 성교경험＋6
					;질사경험
					;EXP:ARG:5 += 6
					;PRINTFORML 질사경험＋6
					;정액경험
					EXP:ARG:20 += 8
					PRINTFORML 정액경험＋8
					;펠라경험
					EXP:ARG:22 += 2
					PRINTFORML 펠라경험＋2
					PRINTL

					PRINTFORML %CALLNAME:ARG%의 【순종】に＋2、【욕망】に＋2、【Ｖ감각】に＋1された
					ABL:ARG:0 += 2
					ABL:ARG:1 += 2
					ABL:ARG:4 += 1
					PRINTFORML %ARG는% 【쾌락각인：2】、【굴복각인：2】を得た
					MARK:ARG:1 = 2
					MARK:ARG:2 = 2
				ENDIF

				;好感度大量増加
				A += 60
			ELSE
				IF TALENT:ARG:남편있음 && TALENT:ARG:밀회 != 1 && TALENT:ARG:ＮＴＬ == 0
					PRINTFORML %PARTNER_NAME_CORE(ARG)%が家で待ってるから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					PRINTFORML %PARTNER_NAME_CORE(ARG)%의 家に行くところだから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:좋아하는사람있음 && TALENT:ARG:밀회 != 1
					PRINTFORML 友人の家に行くところだから、と%ARG는% 申し訳なさそうに首を振った。
				ELSE
					PRINTFORML 今日は、外せない用事があるから、と%ARG는% 申し訳なさそうに首を振った。
				ENDIF
			ENDIF
		ELSE
;No
			PRINTFORML 少し話をして別れた。
		ENDIF
	;夫と喧嘩
	ELSEIF LOCAL == 0 && TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0 && CFLAG:ARG:1010 > 70
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が歩いてるのを見かけた。
		ELSEIF TALENT:ARG:사회인 || TALENT:ARG:주부
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が歩いてるのを見かけた。
		ELSE
			PRINTFORML 休日に外出先で偶然、%NAME:ARG%が歩いてるのを見かけた。
		ENDIF
		PRINTFORML その様子はどこか悲しそうに見える
		PRINTFORML 彼女に話しかけますか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML
			IF TALENT:ARG:밀회 != 1
				PRINTFORML 声をかけると、%ARG는% %PARTNER_NAME_CORE(ARG)%と喧嘩中であることを悲しそうに話し始めた。
			ELSE
				PRINTFORML 声をかけると、%ARG는% 黙ったまま、悲しそうに首を振った。
			ENDIF
			PRINTFORML 今にも泣き出しそうな%CALLNAME:ARG%を慰めながら、ゆっくりと歩いた。

			A += 1
		ELSE
			PRINTFORML
			PRINTFORML 声をかける必要はないだろう。
			PRINTFORML とぼとぼ歩く彼女の後姿を見送った。

			A -= 1
		ENDIF
	;彼氏と喧嘩
	ELSEIF LOCAL == 0 && TALENT:ARG:남친있음 && CFLAG:ARG:1010 > 70
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が歩いてるのを見かけた。
		ELSEIF TALENT:ARG:사회인 || TALENT:ARG:주부
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が歩いてるのを見かけた。
		ELSE
			PRINTFORML 休日に外出先で偶然、%NAME:ARG%が歩いてるのを見かけた。
		ENDIF
		PRINTFORML その様子はどこか悲しそうに見える
		PRINTFORML 彼女に話しかけますか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML
			IF TALENT:ARG:밀회 != 1
				PRINTFORML 声をかけると、%ARG는% %PARTNER_NAME_CORE(ARG)%と喧嘩中であることを悲しそうに話し始めた。
			ELSE
				PRINTFORML 声をかけると、%ARG는% 涙声のまますがりついてきた。
			ENDIF
			PRINTFORML 今にも泣き出しそうな%CALLNAME:ARG%を慰めながら、ゆっくりと歩いた。

			A += 1
		ELSE
			PRINTFORML
			PRINTFORML 声をかける必要はないだろう。
			PRINTFORML とぼとぼ歩く彼女の後姿を見送った。

			A -= 1
		ENDIF
	ELSEIF LOCAL == 1
;家に誘う
		IF FLAG:8 == 1
;平日
			PRINT 学校からの帰り道に偶然、
		ELSE
			PRINT 休日に偶然、
		ENDIF
		PRINTFORML %NAME:ARG%と顔を合わせた。
		PRINTFORML ここは、%CALLNAME:MASTER%의 家からも近いのだが、少し誘ってみようか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML %CALLNAME:ARG%に少し家に寄って、お茶でも飲んで行かないかと誘ってみた。
;YES;好感度判定　RAND:50+20で好感度より小さい値が出れば成功(かなり難しい)
			;彼氏や남편있음はもっと難しい
			IF (TALENT:ARG:남편있음 || TALENT:ARG:남친있음) && TALENT:ARG:ＮＴＬ == 0
				CALL CHECK_LIKES, ARG, 50, 30
			ELSEIF TALENT:ARG:미망인
				CALL CHECK_LIKES, ARG, 50, 25; 미망인はちょっと難しい
			ELSE
				CALL CHECK_LIKES, ARG, 50, 20
			ENDIF
			IF RESULT == 1
				IF TALENT:ARG:남편있음 && TALENT:ARG:밀회 != 1 && TALENT:ARG:ＮＴＬ == 0
					;彼氏、思い人名あり
					PRINTFORML 最初、%PARTNER_NAME_CORE(ARG)%がいるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には少しだけならと頷いてくれた。
					PRINTFORMW
					PRINTFORML ……%CALLNAME:MASTER%의 部屋に案内した。
					PRINTFORML お茶を飲みながら、話をして時間を過ごした。
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					;彼氏、思い人名あり
					PRINTFORML 最初、%PARTNER_NAME_CORE(ARG)%がいるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には少しだけならと頷いてくれた。
					PRINTFORMW
					PRINTFORML ……%CALLNAME:MASTER%의 部屋に案内した。
					PRINTFORML お茶を飲みながら、話をして時間を過ごした。
				ELSEIF TALENT:ARG:밀회 == 1
					PRINTFORML 最初、大切な用事があるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には少しだけならと頷いてくれた。
					PRINTFORMW
					PRINTFORML ……%CALLNAME:MASTER%의 部屋に案内した。
					PRINTFORML お茶を飲みながら、話をして時間を過ごした。
				ELSE
					PRINTFORML %ARG는% 、少し照れながら頷いた。
					PRINTFORML ……%CALLNAME:MASTER%의 部屋に案内した。
					PRINTFORML お茶を飲みながら、軽く話をしたり、ゲームをしたりしながら時間を過ごした。
				ENDIF
				PRINTFORML ………………
				PRINTFORML …………
				PRINTFORML ……
				PRINTFORML 楽しい時間は過ぎるのが早い。　そろそろ帰る時間だろう。
				PRINTFORML %CALLNAME:ARG%を送り出そうと、立ちあがった%마스터호칭은%、フローリングで足を滑らせてしまった。
				PRINTFORML %CALLNAME:ARG%を巻き込むようにしてひっくり返り、我に帰って見れば%CALLNAME:MASTER%의 손は、
				PRINTFORM %CALLNAME:ARG%의
				IF TALENT:ARG:거유 || TALENT:ARG:폭유
					PRINTFORM 가슴にある大きなふくらみを鷲掴み
					IF TALENT:ARG:Ｂ민감
						PRINTFORML にしていて……
						PRINTFORML その刺激で、%CALLNAME:ARG%に고통と喘ぎ声のどちらにもとれるような声をあげさせてしまっている……
					ELSE
						PRINTFORML に……
					ENDIF
				ELSE
					PRINTFORM 가슴のふくらみの上
					IF TALENT:ARG:Ｂ민감
						PRINTFORML にあって……
						PRINTFORML その刺激で、%CALLNAME:ARG%に고통と喘ぎ声のどちらにもとれるような声をあげさせてしまっている……
					ELSE
						PRINTFORML に……
					ENDIF
				ENDIF
				PRINTFORML ……取りあえず謝るべきだろうか？
				CALL CHECK_YN
				IF RESULT == 0
					PRINTFORML ……取りあえず謝っておくべきだろう。
;好感度判定
					CALL CHECK_LIKES, ARG, 50, 20
					IF RESULT == 1
						IF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0
							PRINTFORMW %ARG는% 、こういうのはダメだと窘めてきたが、本気で怒っているわけではないようだ。
						ELSEIF TALENT:ARG:남친있음
							PRINTFORMW %ARG는% 、こういうのはダメだと窘めてきたが、本気で怒っているわけではないようだ。
						ELSEIF TALENT:ARG:미망인
							PRINTFORMW %ARG는% 、こういうのはダメだと窘めてきたが、本気で怒っているわけではないようだ。
						ELSE
							PRINTFORMW %ARG는% 顔を真っ赤にして가슴をかばう様にしているが、怒ってはいない様子だ。
						ENDIF
						A += 6
;입上呼び出し部分ARGはキャラクター番号　2はイベント番号
						B = NO:ARG
						TRYCALL TALK_KOJO,B,3,0
					ELSE
						PRINTL
						PRINTFORML %마스터호칭이% 謝罪の言葉を言い終えるやいなや、%ARG는% 顔を真っ赤にして悲鳴を上げた。
						SIF TALENT:ARG:치유계 == 0 && TALENT:ARG:무기력 == 0
							PRINTFORM そのまま%CALLNAME:MASTER%의 頬に平손が飛び、
						PRINTFORML %ARG는% 慌てて逃げていく。
						PRINTFORMW こう言う心算ではなかったのだが、誤解されただろうか……？
						A += 3
					ENDIF
				ELSE
					PRINTFORML あえて謝らない。これは悪意のない事故なのだ。
					PRINTFORMW %CALLNAME:ARG%がどう思っていたのかは分からないが、良い気分ではないのではないだろうか？
					A += 1
				ENDIF
			ELSE
				IF TALENT:ARG:남편있음 && TALENT:ARG:밀회 != 1 && TALENT:ARG:ＮＴＬ == 0
					PRINTFORML %PARTNER_NAME_CORE(ARG)%が家で待ってるから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					PRINTFORML %PARTNER_NAME_CORE(ARG)%의 家に行くところだから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:좋아하는사람있음 && TALENT:ARG:밀회 != 1
					PRINTFORML 友人の家に行くところだから、と%ARG는% 申し訳なさそうに首を振った。
				ELSE
					PRINTFORML %ARG는% 申し訳なさそうに首を振った。
				ENDIF
			ENDIF
		ELSE
;No
			PRINTFORML 少し話をして別れた。
		ENDIF
	ELSEIF LOCAL == 2
;誰かに絡まれている
		IF FLAG:8 == 1
;平日
			PRINT 学校からの帰り道に偶然、
		ELSE
			PRINT 休日に偶然、
		ENDIF
		PRINTFORML %ARG이름을%見かけた。
		PRINTFORML だが、%ARG는% ガラの悪い男に絡まれている様だ。
		SIF TALENT:ARG:청초 == 1
			PRINTFORML %ARG는% 困った顔で、色々と訴えかけている様だが、相손に聞く気はない様だ。
		SIF TALENT:ARG:쾌활 == 1
			PRINTFORML %ARG는% あからさまな言いがかりに怒っているが、相손は却って面白がっている様だ。
		SIF TALENT:ARG:색기 == 1
			PRINTFORML %ARG는% 困っているのだが、その姿さえ何処か煽情的だ。
		SIF TALENT:ARG:보이쉬 == 1
			PRINTFORML %ARG는% あからさまな言いがかりに怒っているが、相손は却って面白がっている様だ。
		SIF TALENT:ARG:천연 == 1
			PRINTFORML %ARG는% 固い表情で淡々と正論を告げているが、火に油を注ぐ効果しかなさそうだ。
		SIF TALENT:ARG:어린애같음 == 1
			PRINTFORML %ARG는% 色々と訴えかけている様だが、微妙にずれている気がしないでもない。
		SIF TALENT:ARG:치유계 == 1
			PRINTFORML %ARG는% 色々と訴えかけている様だが、微妙にずれている気がしないでもない。
		SIF TALENT:ARG:쿨함 == 1
			PRINTFORML %ARG는% 相손の言いがかりを無視してその場を去ろうとしているが、相손が許さないようだ。
		SIF TALENT:ARG:무기력 == 1
			PRINTFORML %ARG는% 困った顔で、色々と訴えかけている様だが、声が小さすぎて相손にまともに届いているかどうか……
		SIF TALENT:ARG:기가셈 == 1
			PRINTFORML %ARG는% あからさまな言いがかりに怒って言い返し、火に油を注いでいる。
		PRINTFORML 助けに入るべきだろうか……？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML ……では、どうやって……？
			PRINTFORML [0]割って入って庇う
			PRINTFORML [1]彼女を連れて逃げる
			PRINTFORML [2]警察を呼んだとハッタリを掛ける
			CALL CHECK_TRI
;3択関数
			LOCAL:1 = 0
			IF RESULT == 0
				PRINTFORML %마스터호칭은%強引に二人の間に割って入り、ガラの悪い男を睨みつける。
				PRINTFORML ………………
				PRINTFORML …………
				PRINTFORML ……
				IF ((ABL:MASTER:24 > RAND:10 + 1) && TALENT:MASTER:작은체형 == 0) || ((ABL:MASTER:24 > RAND:10 + 3) && TALENT:MASTER:작은체형 == 1)
					PRINTFORML ガラの悪い男は、捨て台詞を残して立ち去った。
					LOCAL:1 = 1
				ELSE
					PRINTFORML ガラの悪い男は、かえってヒートアップしている。
					PRINTFORML 火に油を注いでしまった様だ。
				ENDIF
			ELSEIF RESULT == 1
				PRINTFORML %마스터호칭은%強引に二人の間に割って入り、驚いている%CALLNAME:ARG%의 손を取って走り出した。
				PRINTFORML ………………
				PRINTFORML …………
				PRINTFORML ……
				IF ((ABL:MASTER:23 > RAND:10 + 1) && TALENT:MASTER:작은체형 == 0) || ((ABL:MASTER:23 > RAND:10 + 3) && TALENT:MASTER:작은체형 == 1)
					PRINTFORML 追ってきたガラの悪い男を、あっさりと振り切って駆け去った。
					LOCAL:1 = 1
				ELSE
					PRINTFORML 下손に逃げようとしたため、かえって追い詰められてしまった。
					PRINTFORML 火に油を注いでしまった様だ。
				ENDIF
			ELSEIF RESULT == 2
				PRINTFORML %마스터호칭은%少し離れた所から警察を呼んだ振りをしてみた。
				PRINTFORML ………………
				PRINTFORML …………
				PRINTFORML ……
				IF ABL:MASTER:25 > RAND:10 + 1
					PRINTFORML ガラの悪い男は、捨て台詞を残して立ち去った。
					LOCAL:1 = 1
				ELSE
					PRINTFORML ガラの悪い男は、かえってヒートアップしている。
					PRINTFORML 火に油を注いでしまった様だ。
				ENDIF
			ENDIF

			IF LOCAL:1 == 1
				PRINTFORML ……なんとか、%CALLNAME:ARG%を助ける事が出来た様だ。
				A += 8
;입上呼び出し部分ARGはキャラクター番号　2はイベント番号
				B = NO:ARG
				TRYCALL TALK_KOJO,B,4,0
			ELSE
				PRINTFORML ……%마스터호칭은%役に立てなかったが、結局騒ぎが大きくなって来た為、ガラの悪い男は立ち去った。
				A += 4
			ENDIF
		ELSE
;No
			PRINTFORML ……見なかった事にするか。
			PRINTFORML 幸い、%CALLNAME:ARG%も、自分の事で精一杯でこちらにまでは気が付いていない様ではある。
			A = 0
		ENDIF
	ELSE
;にわか雨２
		PRINTFORML ……急に雨が降り出した……
		PRINTFORML 傘の用意はなかったので、慌てて屋根の下に駆け込んだが、そこには先客……%NAME:ARG%がいた。
		TRYCALL TALK_KOJO,B,6,0
		PRINTFORML %CALLNAME:ARG%も傘の用意はなかったらしく、困ったように空を見上げている。
		PRINTFORML ……その服が雨にぬれて、素肌にぴったりと張り付いているのに気が付いていないのだろうか……
		PRINTFORML 指摘するべきだろうか……？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML このままと言うのも如何なものかと思うので、言葉に気をつけながら指摘して見た。
			PRINTFORML ………………
			PRINTFORML …………
			PRINTFORML ……
;감성判定
			IF ABL:MASTER:25 > RAND:10 + 1
				PRINTFORML %ARG는% 顔を真っ赤にしながら、鞄を抱いて透けた下着を隠そうとしている。
				TRYCALL TALK_KOJO,B,6,0
				A += 4
			ELSE
				PRINTFORML %ARG는% 顔を真っ赤にして、走って逃げてしまった。
				PRINTFORML 言葉の使い方が拙かったか……？
				A += 2
			ENDIF
		ELSE
;No
			PRINTFORML 見なかった事にして、暫く一緒に雨宿りをした。
			PRINTFORML ………………
			PRINTFORML …………
			PRINTFORML ……
			PRINTFORML ふと眼を落した%ARG는% 、ようやく自分の服の状態に気がついた様だ。
;好感度判定
			CALL CHECK_LIKES, ARG, 50, 0
			IF RESULT == 1
				PRINTFORML %ARG는% 顔を真っ赤にして、鞄を抱いて透けた下着を隠そうとしながら、%CALLNAME:MASTER%に見たのかどうか尋ねてきた。
				TRYCALL TALK_KOJO,B,6,1
				A += 6
			ELSE
				PRINTFORML %ARG는% 顔を真っ赤にして、%마스터호칭을% 非難すると、雨の中を走って逃げてしまった。
			ENDIF
		ENDIF
	ENDIF
ELSE
;汎用イベント(現状４種＋남친있음１種)
	LOCAL = RAND:5
	IF LOCAL == 0 && TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0 && TALENT:ARG:밀회 != 1
		;夫といる
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が夫婦で歩いてるのを見かけた。
		ELSEIF FLAG:8 == 1 && (TALENT:ARG:사회인 || TALENT:ARG:주부)
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が夫婦で歩いてるのを見かけた。
		ELSE
			PRINTFORML 休日に外出先で偶然、夫婦で出かけている%CALLNAME:ARG%と顔を合わせた。
		ENDIF
		IF CFLAG:ARG:1010 > 70
			PRINTFORML 二人は並んで歩いているものの、회화は途切れがちのようだ。
		ELSEIF CFLAG:ARG:1010 > 40
			PRINTFORML 二人は楽しそうに話しながら歩いてる。
		ELSE
			PRINTFORML 二人は손をつなぎ仲睦まじげに歩いている。
		ENDIF
		PRINTFORML 二人に話しかけますか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML
			IF CFLAG:ARG:1010 > 70
				PRINTFORML 声をかけると、%ARG는% 嬉しそうに近づいてきて、話しはじめた。
				PRINTFORML 一方、%PARTNER_NAME_CORE(ARG)%は%마스터호칭과% %CALLNAME:ARG%의 회화が弾むのを見て不機嫌そうにしていた。
			ELSEIF CFLAG:ARG:1010 > 40
				PRINTFORML 声をかけると、%CALLNAME:ARG%達は近づいてきて、話しはじめた。
				PRINTFORML 三人での회화は盛り上がり、楽しい時を過ごせた
			ELSE
				PRINTFORML 話しかけると、二人のラブラブぶりを見せ付けられた。
			ENDIF
		ELSE
			PRINTFORML
			IF CFLAG:ARG:1010 > 70
				PRINTFORML あの雰囲気の二人に話しかけると面倒なことになりそうだ。
				PRINTFORML 軽く挨拶をして通り過ぎた。
			ELSE
				PRINTFORML あえて邪魔をすることもないだろう。
				PRINTFORML 軽く挨拶をして通り過ぎた。
			ENDIF
		ENDIF
	ELSEIF LOCAL == 0 && TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
		;彼氏といる
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
			;平日
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が%PARTNER_NAME_CORE(ARG)%と歩いてるのを見かけた。
		ELSEIF FLAG:8 == 1 && (TALENT:ARG:사회인 || TALENT:ARG:주부)
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が%PARTNER_NAME_CORE(ARG)%と歩いてるのを見かけた。
		ELSE
			PRINTFORML 休日に外出先で偶然、%PARTNER_NAME_CORE(ARG)%とデート中の%CALLNAME:ARG%と顔を合わせた。
		ENDIF
		IF CFLAG:ARG:1010 > 70
			PRINTFORML 二人は並んで歩いているものの、회화は途切れがちのようだ。
		ELSEIF CFLAG:ARG:1010 > 40
			PRINTFORML 二人は楽しそうに話しながら歩いてる。
		ELSE
			PRINTFORML 二人は손をつなぎ仲睦まじげに歩いている。
		ENDIF
		PRINTFORML 二人に話しかけますか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML
			IF CFLAG:ARG:1010 > 70
				PRINTFORML 声をかけると、%ARG는% 嬉しそうに近づいてきて、話しはじめた。
				PRINTFORML 一方、%PARTNER_NAME_CORE(ARG)%は%마스터호칭과% %CALLNAME:ARG%의 회화が弾むのを見て不機嫌そうにしていた。
			ELSEIF CFLAG:ARG:1010 > 40
				PRINTFORML 声をかけると、%CALLNAME:ARG%達は近づいてきて、話しはじめた。
				PRINTFORML 三人での회화は盛り上がり、楽しい時を過ごせた
			ELSE
				PRINTFORML 話しかけると、二人のラブラブぶりを見せ付けられた。
			ENDIF
		ELSE
			PRINTFORML
			IF CFLAG:ARG:1010 > 70
				PRINTFORML あの雰囲気の二人に話しかけると面倒なことになりそうだ。
				PRINTFORML 軽く挨拶をして通り過ぎた。
			ELSE
				PRINTFORML あえて邪魔をすることもないだろう。
				PRINTFORML 軽く挨拶をして通り過ぎた。
			ENDIF
		ENDIF
	ELSEIF LOCAL == 0 && (TALENT:ARG:남편있음 || TALENT:ARG:남친있음) && TALENT:ARG:밀회 == 1 && CFLAG:ARG:1010 > 30
		;彼氏といる
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
			;平日
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が見慣れない男と歩いてるのを見かけた。
		ELSEIF FLAG:8 == 1 && (TALENT:ARG:사회인 || TALENT:ARG:주부)
			PRINTFORML 学校帰りに偶然、%NAME:ARG%が見慣れない男と歩いてるのを見かけた。
		ELSE
			PRINTFORML 休日に外出先で偶然、見慣れない男と一緒の%CALLNAME:ARG%と顔を合わせた。
		ENDIF
		PRINTFORML 相손はどうやら、\@ TALENT:ARG:남편있음 ? 夫 # 彼氏 \@の%PARTNER_NAME_CORE(ARG)%らしく、事情があって関係を秘密にしているようだ。
		PRINTFORML このことは内密にするよう念押しすると、二人は楽しそうに去っていった。
		PRINTFORML ････さて、これはどうしたものだろうか････。
		TALENT:ARG:밀회 = -1
	ELSEIF LOCAL == 1
;昼食
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINTFORML 昼休みに、学校の廊下で%NAME:ARG%と顔を合わせた。
			PRINTFORML 그녀는 これから昼食の様だ。
			PRINTFORML 彼女を昼食に誘いますか？
		ELSEIF FLAG:8 == 1 && (TALENT:ARG:사회인 || TALENT:ARG:주부)
			PRINTFORML 学校帰りに偶然、%NAME:ARG%と顔を合わせた。
			PRINTFORML 그녀는 これから夕食の様だ。
			PRINTFORML 彼女を夕食に誘いますか？
		ELSE
			PRINTFORML 休日に偶然、%NAME:ARG%と顔を合わせた。
			PRINTFORML 그녀는 これから昼食の様だ。
			PRINTFORML 彼女を昼食に誘いますか？
		ENDIF
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML %CALLNAME:ARG%に一緒に食事をしないかと誘ってみた……
;YES;好感度判定　RAND:40で好感度より小さい値が出れば成功
			CALL CHECK_LIKES, ARG, 40, 0
			IF RESULT == 1
				PRINTFORML %ARG는% 快くうなずいた。
				PRINTFORML ……食堂に向かった……
				PRINTFORML 食事中、どんな話題を出しますか？
				PRINTFORML [0]勉強や試験についての話題
				PRINTFORML [1]課外活動についての話題
				PRINTFORML [2]趣味や遊びの話題
				CALL CHECK_TRI
;3択関数
				E:1 = RESULT
;関心の確認
				CALL CHECK_KANSIN,ARG
				E:2 = RESULT
				IF E:1 == E:2
					PRINTFORML 上손く%CALLNAME:ARG%의 話題とかみ合い、楽しく話をする事が出来た。
					A += 2
				ELSE
					PRINTFORML 今一つ、興味のある話題がかみ合わなかったが、それでも何とか話を合わせた。
					A += 1
				ENDIF
				;남친있음、남편있음だと追加
				IF TALENT:ARG:남편있음 && TALENT:ARG:밀회 != 1 && TALENT:ARG:ＮＴＬ == 0
					SELECTCASE CFLAG:ARG:1010
						CASE IS > 70
							PRINTFORML 회화の中、ふとした拍子に%PARTNER_NAME_CORE(ARG)%의 話題が出ると%ARG는% 言葉をとぎらせ暗い表情を見せた。
							PRINTFORML 夫婦生活が上손くいってないのだろうか？
						CASE IS > 40
							PRINTFORML 회화の中には、%PARTNER_NAME_CORE(ARG)%への愚痴が少し混ざっていた。
							PRINTFORML 夫婦生活が上손くいってないのだろうか？
						CASEELSE
							PRINTFORML 회화の中、%PARTNER_NAME_CORE(ARG)%との惚気話も聞かされた。
							PRINTFORML %CALLNAME:ARG%と夫婦仲は良いようだ……
					ENDSELECT
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					SELECTCASE CFLAG:ARG:1010
						CASE IS > 70
							PRINTFORML 회화の中、ふとした拍子に%PARTNER_NAME_CORE(ARG)%의 話題が出ると%ARG는% 言葉をとぎらせ暗い表情を見せた。
							PRINTFORML %PARTNER_NAME_CORE(ARG)%と上손くいってないのだろうか？
						CASE IS > 40
							PRINTFORML 회화の中には、%PARTNER_NAME_CORE(ARG)%への愚痴が少し混ざっていた。
							PRINTFORML %PARTNER_NAME_CORE(ARG)%と上손くいってないのだろうか？
						CASEELSE
							PRINTFORML 회화の中、%PARTNER_NAME_CORE(ARG)%との惚気話も聞かされた。
							PRINTFORML %CALLNAME:ARG%と%PARTNER_NAME_CORE(ARG)%의 仲は良いようだ……
					ENDSELECT
				ELSE
					SELECTCASE CFLAG:ARG:1010
						CASE IS > 70
							PRINTFORML 회화の中、ふとした拍子に%ARG는% 言葉をとぎらせ暗い表情を見せた。
							PRINTFORML 何か心配事でもあるのだろうか。
						CASE IS > 40
							PRINTFORML 회화の途中で、%ARG는% 何か言いたげな表情で押し黙っていた。
							PRINTFORML どうやら言えない事情があるようだが････？
						CASEELSE
							PRINTFORML 회화の間、%ARG는% ずっと楽しそうに笑っていた。
							PRINTFORML どうやら心配事はないようだ････。
					ENDSELECT
				ENDIF
;입上呼び出し部分ARGはキャラクター番号　1はイベント番号
				B = NO:ARG
				TRYCALL TALK_KOJO,B,1,0
			ELSE
				IF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0 && TALENT:ARG:밀회 != 1
					PRINTFORML %PARTNER_NAME_CORE(ARG)%と約束してるから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					PRINTFORML %PARTNER_NAME_CORE(ARG)%と約束してるから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:좋아하는사람있음 && TALENT:ARG:밀회 != 1
					PRINTFORML 先約があるから、と%ARG는% 申し訳なさそうに首を振った。
				ELSE
					PRINTFORML %ARG는% 申し訳なさそうに首を振った。
				ENDIF
			ENDIF
		ELSE
;No
			PRINTFORML 少し話をして別れた。
		ENDIF
	ELSEIF LOCAL == 2
;皆で遊びに
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINT 学校から帰ろうとしたところで偶然、
			SIF TALENT:ARG:고고함 == 0
				PRINT 友人と一緒に帰ろうとしている
		ELSEIF TALENT:ARG:사회인 || TALENT:ARG:주부
			PRINTFORML 学校帰りに偶然、
		ELSE
			PRINT 休日に偶然、
		ENDIF
		PRINTFORML %NAME:ARG%と顔を合わせた。
		PRINTL
		PRINTFORML ちょっと何処かに遊びに誘ってみようか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML %CALLNAME:ARG%に一緒に遊びに行かないかと誘ってみた……
;YES;好感度判定　RAND:50で好感度より小さい値が出れば成功(昼食よりはやや難しい)
			;ボッチだと誘いにくい、彼氏や남편있음はもっと誘いにくい
			IF (TALENT:ARG:남편있음 || TALENT:ARG:남친있음) && TALENT:ARG:ＮＴＬ == 0
				CALL CHECK_LIKES, ARG, 70, 0
			ELSEIF TALENT:ARG:고고함
				CALL CHECK_LIKES, ARG, 60, 0
			ELSEIF TALENT:ARG:미망인
				CALL CHECK_LIKES, ARG, 55, 0
			ELSE
				CALL CHECK_LIKES, ARG, 50, 0
			ENDIF
			IF RESULT == 1
				IF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0 && TALENT:ARG:밀회 != 1
					PRINTFORML 最初、%PARTNER_NAME_CORE(ARG)%がいるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には仕方ないなぁと頷いてくれた。
					PRINTFORM ……%CALLNAME:ARG%と二人で街に繰り出す事になった。
				ELSEIF TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ && TALENT:ARG:밀회 != 1
					PRINTFORML 最初、%PARTNER_NAME_CORE(ARG)%がいるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には仕方ないなぁと頷いてくれた。
					PRINTFORM ……%CALLNAME:ARG%と二人で街に繰り出す事になった。
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					PRINTFORML 最初、%PARTNER_NAME_CORE(ARG)%がいるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には仕方ないなぁと頷いてくれた。
					PRINTFORM ……%CALLNAME:ARG%と二人で街に繰り出す事になった。
				ELSEIF TALENT:ARG:밀회 == 1
					PRINTFORML 最初、用事があるからと言っていた%CALLNAME:ARG%だったが、
					PRINTFORML %CALLNAME:MASTER%의 熱心な誘いに最後には仕方ないなぁと頷いてくれた。
					PRINTFORM ……%CALLNAME:ARG%と二人で街に繰り出す事になった。
				ELSE
				;미망인分岐も追加しようかな
					PRINTFORML %ARG는% 快くうなずいた。
					PRINTFORM ……
					SIF TALENT:ARG:고고함 == 0
						PRINTFORM %CALLNAME:ARG%의 友人達も含めて、
					PRINTL 街に繰り出す事になった。
				ENDIF
				PRINTFORML 買い物やカラオケ、楽しい時間が過ぎていく……
				PRINTFORML ………………
				PRINTFORML …………
				PRINTFORML ……
				PRINTFORML 楽しい時間は過ぎるのが早い。　そろそろ解散の時間だろう。
				IF (TALENT:ARG:남편있음 || TALENT:ARG:남친있음) && TALENT:ARG:ＮＴＬ == 0

				ELSEIF TALENT:ARG:고고함 == 0
					PRINTFORM %CALLNAME:ARG%의 友人達の何人かは帰り支度をしている。
				ENDIF
				PRINTFORML 少し遊び疲れたのか、%ARG는% ベンチに腰を下ろしている。
				PRINTFORML ……上손く機を見れば、손を握る位は出来るのではないだろうか？

				CALL CHECK_YN
				IF RESULT == 0
;好感度判定
					CALL CHECK_LIKES, ARG, 50, 10
					IF RESULT == 1
						PRINTFORML ベンチの隣に腰を掛け、話を続けながら、機を見て%CALLNAME:ARG%의 손を握った。
						IF (TALENT:ARG:남편있음 || TALENT:ARG:남친있음) && TALENT:ARG:ＮＴＬ == 0
							PRINTFORMW %ARG는% 、一瞬の間の後、驚き손を振り払ってきたが、その顔は嫌がってはいなかった。
						ELSE
							PRINTFORMW %ARG는% 、顔を赤らめてはいたが、嫌がってはいなかった。
						ENDIF
						A += 3
;입上呼び出し部分ARGはキャラクター番号　2はイベント番号
						B = NO:ARG
						TRYCALL TALK_KOJO,B,2,0
					ELSE
						PRINTFORML 話をしながら、機会を見て……と思っていたのだが、上손くチャンスを掴む事が出来ない。
						PRINTFORMW そうしているうちに、%ARG는% 帰ってしまった……
						A += 1
					ENDIF
				ELSE
					PRINTFORML しくじって楽しい時間の余韻を壊す事も無いだろう。
					PRINTFORMW 軽く挨拶をした後、%CALLNAME:ARG%と別れた。
					A += 2
				ENDIF
			ELSE
				PRINTFORML %ARG는% 申し訳なさそうに首を振った。
			ENDIF
		ELSE
;No
			PRINTFORML 少し話をして別れた。
		ENDIF
	ELSEIF LOCAL == 3
;にわか雨
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINT 下校時に下駄箱で、
		ELSEIF TALENT:ARG:사회인 || TALENT:ARG:주부
			PRINTFORML 学校帰りに偶然、
		ELSE
			PRINT 休日に偶然、
		ENDIF
		PRINTFORML %ARG이름을%見かけた。
		PRINTFORML 外ではパラパラと雨が降り出していて、%ARG는% 困ったように空を見上げている。
		PRINTFORML 幸い%CALLNAME:MASTER%には傘の持ちあわせは有るのだが……？
		PRINTFORML [0]1本しかない傘を貸し出す
		PRINTFORML [1]相合傘を持ちかける
		PRINTFORML [2]スルーする
		CALL CHECK_TRI
;3択関数
		IF RESULT == 0
			PRINTFORML %CALLNAME:ARG%に自分の傘を差し出した。
			PRINTFORML 遠慮する%CALLNAME:ARG%에게、自分用のは別にあると言って、傘を受け取らせる事が出来た。
			TRYCALL TALK_KOJO,B,5,0
			PRINTFORMW ……さて、傘を貸したは良いが自分の分はどうした物だろうか……
			A += 2
		ELSEIF RESULT == 1
			PRINTFORML 傘は一本しかないのだから仕方が無い。
			PRINTFORML %마스터호칭은%相合傘を申し出た。
;好感度判定
			CALL CHECK_LIKES, ARG, 40, 0
			IF RESULT == 1
				IF TALENT:ARG:남친있음 || TALENT:ARG:좋아하는사람있음 || TALENT:ARG:미망인 || (TALENT:ARG:남편있음 && TALENT:ARG:ＮＴＬ == 0)
					PRINTFORML %ARG는% 少し躊躇したが、降り止みそうにない空模様をみて、%CALLNAME:MASTER%의 差し出す傘の下に入った。
				ELSE
					PRINTFORML %ARG는% 少し躊躇したが、結局は%CALLNAME:MASTER%의 差し出す傘の下に入った。
				ENDIF
				TRYCALL TALK_KOJO,B,5,1
				A += 4
			ELSE
				PRINTFORML %ARG는% 礼を言いながらも、傘を貸してくれる友人を探すと言って、申し出を断った。
			ENDIF
		ELSEIF RESULT == 2
			PRINTFORML ……まぁ運が無かったのと、備えが悪かったと言う事だ。
			PRINTFORML 濡れて帰って貰うのも仕方が無いと言う物だろう。
			A = 0
		ENDIF
	ELSE
;一緒に帰宅
		IF FLAG:8 == 1 && TALENT:ARG:사회인 == 0 && !TALENT:ARG:주부
;平日
			PRINTFORML 学校の下駄箱で偶然、%NAME:ARG%と顔を合わせた。
		ELSEIF TALENT:ARG:사회인 || TALENT:ARG:주부
			PRINTFORML 学校帰りに偶然、%NAME:ARG%と顔を合わせた。
		ELSE
			PRINTFORML 休日に外出先で偶然、%NAME:ARG%と顔を合わせた。
		ENDIF
		PRINTFORML 그녀는 これから家に帰る様だ。　途中までは同じ道を通る筈だが……
		PRINTFORML 彼女に一緒に帰ろうと誘いますか？
		CALL CHECK_YN
		IF RESULT == 0
			PRINTFORML %CALLNAME:ARG%に途中まで一緒に帰らないかと誘ってみた……
;YES;好感度判定　RAND:40で好感度より小さい値が出れば成功
			CALL CHECK_LIKES, ARG, 30, 0
			IF RESULT == 1
				PRINTFORML %ARG는% 快くうなずいた。
				PRINTFORML 帰り道、どんな話題を出しますか？
				PRINTFORML [0]勉強や試験についての話題
				PRINTFORML [1]課外活動についての話題
				PRINTFORML [2]趣味や遊びの話題
				CALL CHECK_TRI
;3択関数
				E:1 = RESULT
;関心の確認
				CALL CHECK_KANSIN,ARG
				E:2 = RESULT
				IF E:1 == E:2
					PRINTFORML 上손く%CALLNAME:ARG%의 話題とかみ合い、楽しく話をする事が出来た。
					A += 2
				ELSE
					PRINTFORML 今一つ、興味のある話題がかみ合わなかったが、それでも何とか話を合わせた。
					A += 1
				ENDIF
				;남친있음、남편있음だと追加
				IF TALENT:ARG:남편있음 && TALENT:ARG:밀회 != 1 && TALENT:ARG:ＮＴＬ == 0
					;彼氏、思い人名あり
					SELECTCASE CFLAG:ARG:1010
						CASE IS > 70
							PRINTFORML 회화の中、ふとした拍子に%PARTNER_NAME_CORE(ARG)%의 話題が出ると%ARG는% 言葉をとぎらせ暗い表情を見せた。
							PRINTFORML 夫婦生活が上손くいってないのだろうか？
						CASE IS  > 40
							PRINTFORML 회화の中には、%PARTNER_NAME_CORE(ARG)%への愚痴が少し混ざっていた。
							PRINTFORML 夫婦生活が上손くいってないのだろうか？
						CASEELSE
							PRINTFORML 회화の中、%PARTNER_NAME_CORE(ARG)%との惚気話も聞かされた。
							PRINTFORML %CALLNAME:ARG%と夫婦仲は良いようだ……
					ENDSELECT
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					SELECTCASE CFLAG:ARG:1010
						CASE IS > 70
							PRINTFORML 회화の中、ふとした拍子に%PARTNER_NAME_CORE(ARG)%의 話題が出ると%ARG는% 言葉をとぎらせ暗い表情を見せた。
							PRINTFORML %PARTNER_NAME_CORE(ARG)%と上손くいってないのだろうか？
						CASE IS > 40
							PRINTFORML 회화の中には、%PARTNER_NAME_CORE(ARG)%への愚痴が少し混ざっていた。
							PRINTFORML %PARTNER_NAME_CORE(ARG)%と上손くいってないのだろうか？
						CASEELSE
							PRINTFORML 회화の中、%PARTNER_NAME_CORE(ARG)%との惚気話も聞かされた。
							PRINTFORML %CALLNAME:ARG%と%PARTNER_NAME_CORE(ARG)%의 仲は良いようだ……
					ENDSELECT
				ELSEIF TALENT:ARG:밀회 == 1
					SELECTCASE CFLAG:ARG:1010
						CASE IS > 70
							PRINTFORML 회화の中、ふとした拍子に%ARG는% 言葉をとぎらせ暗い表情を見せた。
							PRINTFORML 何か心配事でもあるのだろうか。
						CASE IS > 40
							PRINTFORML 회화の途中で、%ARG는% 何か言いたげな表情で押し黙っていた。
							PRINTFORML どうやら言えない事情があるようだが････？
						CASEELSE
							PRINTFORML 회화の間、%ARG는% ずっと楽しそうに笑っていた。
							PRINTFORML どうやら心配事はないようだ････。
					ENDSELECT
				ENDIF
;입上呼び出し部分ARGはキャラクター番号　1はイベント番号
				B = NO:ARG
				TRYCALL TALK_KOJO,B,7,0
			ELSE
				IF TALENT:ARG:남편있음 && TALENT:ARG:밀회 != 1 && TALENT:ARG:ＮＴＬ == 0
					PRINTFORML %PARTNER_NAME_CORE(ARG)%と帰るから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:남친있음 && TALENT:ARG:밀회 != 1
					PRINTFORML %PARTNER_NAME_CORE(ARG)%と帰るから、と%ARG는% 申し訳なさそうに首を振った。
				ELSEIF TALENT:ARG:좋아하는사람있음 && TALENT:ARG:밀회 != 1
					PRINTFORML 他の人と帰るから、と%ARG는% 申し訳なさそうに首を振った。
				ELSE
					PRINTFORML %ARG는% 申し訳なさそうに首を振った。
				ENDIF
			ENDIF
		ELSE
;No
			PRINTFORML 少し話をして別れた。
		ENDIF
	ENDIF
ENDIF
PRINTL
PRINTL ………………
PRINTL …………
PRINTW ……

RETURN A


code:
@TENTACLE_RAPE
#DIM targetChara
#DIM slaveAttack
#DIM targetResist
#DIM sexCount
#DIM playType

;対象を選択
PRINTFORML 誰を罠に掛けますか？
CALL SELECT_TRAP_CHARA(14)
SIF RESULT == -1
	RETURN -1
targetChara = RESULT

slaveAttack  = CALC_CHARA_RANGED_DATA("ABL",MASTER,"전투능력","3,1|7,3|*,5") + CALC_CHARA_RANGED_DATA("ABL",MASTER,"기교","1,1|3,2|5,3|7,5|*,10") + CALC_CHARA_SINGLE_DATA("TALENT",MASTER,"유연한신체,바늘다루기,조합지식*3,약독내성,마술기능*10,카리스마*3,인기,수수께끼의매력*5,깨우침*3,경계*-10") + CFLAG:targetChara:1013 + ITEM:촉수활성화약 * 10
;저항判定　파이터＋5、魔術+10追加
targetResist = CALC_CHARA_RANGED_DATA("ABL",targetChara,"전투능력","3,1|7,3|*,5") + CALC_CHARA_RANGED_DATA("ABL",targetChara,"감성","3,1|7,2|*,3") + CALC_CHARA_SINGLE_DATA("TALENT",targetChara,"꿋꿋함,얌전함*-1,겁쟁이*-1,레이프소망*-5,도착적*5,쾌활,쿨함,기가셈,닌자*10,성직자*10,마술기능*10,파이터*5,공주님소망*-10,약독내성*8,경계*2") + 10 - ITEM:냉정아로마 * 10

PRINTFORMW 暗い夜道で待ち伏せていると、家路を急ぐ%NAME:targetChara%의 姿が見えた････。

PRINTFORML
PRINTFORML %NAME:MASTER%의 襲撃判定　：　{slaveAttack}
PRINTFORML %NAME:targetChara%의 対抗判定　：　{targetResist}
PRINTFORML

SELECTCASE slaveAttack - targetResist
	CASE IS <= 0
		PRINTFORML %타겟캐릭은%襲いかかったこちらの촉수を素早く跳ね退けると、距離をとって身構えた。
		PRINTFORML この動き、%CALLNAME:targetChara%의 力量を甘く見たか････？
		PRINTFORML このままでは不味い。一度退いて、別の손を考えよう。
		PRINTFORMW 結果　：　大失敗！
		CFLAG:targetChara:1015 = 0
		CFLAG:targetChara:1000 = 4
		CFLAG:targetChara:1013 = 0
		TALENT:targetChara:경계 += 5
	CASE IS < 5
		PRINTFORML しかし、もう少しで射程内に入る、というところで、誰かが%CALLNAME:targetChara%に話しかけてきた。
		PRINTFORML どうやら偶然友人と出会ったらしい。そのまま楽しそうにおしゃべりし始めた。
		PRINTFORML ････このまま襲うのは無理だろう。またの機会を待つことにしよう････。
		CFLAG:targetChara:1013 ++
		PRINTFORMW 結果　：　失敗！
	CASEELSE
		PRINTFORMW 結果　：　成功！
		PRINTFORMW %타겟캐릭은%、近くの茂みからのかさっという音に顔を上げた。
		PRINTFORMW 犬か何かがいるのか、と思ったのだろう。足をとめ、怪訝そうに茂みの向こうを見つめている。
		PRINTFORMW ････しかし次の瞬間、茂みから飛び出してきたのは、細長く채찍のようにしなる촉수だった。
		PRINTFORMW 驚き、逃げ出そうとする%CALLNAME:targetChara%。その腕を、足を、体を、촉수が掴み、茂みへと引きずり込む。
		PRINTFORMW %CALLNAME:targetChara%의 必死の悲鳴も、誰にも聞かれることはなかった････。
		PRINTFORML
		PRINTFORMW 茂みの中央の広間に放り出された%타겟캐릭은%、震える目で周囲を見回す。
		PRINTFORMW そこにいたのは、一面を埋めつくし、不気味にうごめく촉수たち。
		PRINTFORMW %타겟캐릭은%공포のあまり力なく座り込み、身体を震わせている。
		PRINTFORMW やがて、촉수たちが一斉に動き始める。まずは両손両足に絡み付き、身体の動きを封じる。
		PRINTFORMW %타겟캐릭은%逃げ出そうと必死で暴れるが、손足をがっちりと絡めとられて身動きがとれない。
		PRINTFORMW そうこうしているうちに服の가슴元が破られ、%CALLNAME:targetChara%의 가슴が露になる。
		PRINTFORMW 촉수が乳房に巻き付き、揉むようにうごめき始める。
		PRINTFORMW それだけでなく、촉수に触れられたところがじんじんと熱くなり始める。촉수の表面を塗らしている粘液が皮膚から%CALLNAME:targetChara%의 体内に入り込み、미약として働いているのだ。
		PRINTFORMW 刺激に思わず声をあげ、身を震わせる%CALLNAME:targetChara%。その입から思わず、熱い吐息が漏れた。
		PRINTFORML
		PRINTFORMW 揉まれているうちに乳首がピンと立ち、さらなる刺激を求めて自己主張を始める。
		PRINTFORMW そこに先端が割れた촉수が吸い付き、中に生えたさらに細い촉수が捏ねはじめる。
		PRINTFORMW その瞬間、乳首から流れる電気のような快楽。
		PRINTFORMW %타겟캐릭은%思わず声をあげ、首を振る。
		PRINTFORMW 촉수は構わず、가슴を、乳首を、嬲りつづける。そしてその度に、敏感になった乳首にさらに미약を塗りこんでいく。
		PRINTFORMW その休みない刺激に、%타겟캐릭은%背筋を震わせ、絶頂に達した････。
		PRINTFORML
		PRINTFORMW おぞましい촉수に가슴を嬲られ、それだけで絶頂に達してしまった事実。
		PRINTFORMW %타겟캐릭은%それにショックを受け、저항する기력を無くしてしまう。
		PRINTFORMW それを見透かしたように、今度は細長い촉수がクリトリスに絡み付き、しごきはじめる。
		PRINTFORMW %타겟캐릭은%目を見開き、喘ぎ声を隠せなくなった。舌をはあはあと出し、刺激に身悶えしている。
		PRINTFORMW 皮を剥き、ぷっくらと膨らんだクリトリスをざらざらとした촉수が舐め回し、磨きあげる。
		PRINTFORMW %타겟캐릭은%あまりの刺激に絶叫し、再び絶頂に達した。
		PRINTFORML
		PRINTFORMW 二度の絶頂に、くたり、と脱力する%CALLNAME:targetChara%。
		PRINTFORMW しかし、新たな、そして恐ろしい感触に、はっと目を見開く。
		PRINTFORMW 次のポイントを探すように、股間回りで太い촉수がゆらゆらと揺れているのだ。
		IF TALENT:targetChara:처녀
			PRINTFORMW 流石に촉수に처녀を奪われるのは嫌なのだろう。
		ELSE
			PRINTFORMW 既に男を知っているとはいえ、촉수に犯されるのは嫌なのだろう。
		ENDIF
		PRINTFORM なんとか逃れようと、
		IF (TALENT:targetChara:좋아하는사람있음 || TALENT:targetChara:남친있음 || TALENT:targetChara:남편있음) && TALENT:targetChara:밀회 != 1
			PRINTFORML %타겟캐릭은%この場にはいない愛する人へ助けを求めもがいている。
		ELSEIF TALENT:targetChara:미망인 && TALENT:targetChara:밀회 != 1
			PRINTFORML %타겟캐릭은%この世にはいない愛する人へ助けを求めもがいている。
		ELSEIF TALENT:targetChara:기혼 && TALENT:targetChara:밀회 != 1
			PRINTFORML %타겟캐릭은%かつての愛する人へ助けを求めもがいている。
		ELSEIF TALENT:targetChara:청초 == 1 || TALENT:targetChara:무기력 == 1
			PRINTFORML %타겟캐릭은%泣きながら、いや、やめてと哀願している。
		ELSEIF TALENT:targetChara:천연 == 1 || TALENT:targetChara:쾌활 == 1 || TALENT:targetChara:보이쉬 == 1 || TALENT:targetChara:기가셈 == 1 || TALENT:targetChara:고결 == 1
			PRINTFORML %타겟캐릭은%촉수を振りほどこうと、最後の力を振り絞って暴れている。
		ELSEIF TALENT:targetChara:성악 == 1 && TALENT:targetChara:쿨함 == 1
			PRINTFORML %타겟캐릭은%快楽に蕩けた頭を必死に振りながら、この場から逃げる손段を考え続けている。
		ELSEIF TALENT:targetChara:색기 == 1
			PRINTFORML %타겟캐릭은%それだけはやめてと哀願している。
		ELSEIF TALENT:targetChara:어린애같음 == 1 || TALENT:targetChara:치유계 == 1
			PRINTFORML %타겟캐릭은%怯えて泣き叫びながら、許しを懇願している。
		ELSE
			PRINTFORML %타겟캐릭은%さめざめと泣きながら、お願い、許して、と懇願している。
		ENDIF
		PRINTFORMW そのささやかな저항が촉수の気に障ったのだろう。
		PRINTFORMW 快楽で半開きとなっている입に、別の촉수が強引に入り込み、喉まで犯すように動き始める。
		PRINTFORMW そし그대로、どくん、どくんと粘液を注がれる。すなわち、体内に미약を直接注がれる。
		PRINTFORMW そのことに気づき、공포する%CALLNAME:targetChara%。だがどうすることもできず、溺れないように注がれる粘液を飲み込むしかない。
		PRINTFORMW その効果はすぐに出てきた。%타겟캐릭은%すっかり発情してとろん、と瞳を蕩けさせ、先程まで공포していた촉수を熱っぽい瞳で見つめている。
		CALL SET_ACTUAL_FIRST_PLAY_TYPE(MASTER)
		playType = RESULT
		IF playType == 0
			PRINTFORMW 頃はよし、と、촉수がぐっと%CALLNAME:targetChara%의 秘所に入り込む。それを%타겟캐릭은%、歓喜の絶叫で迎え入れた。
			SIF TALENT:targetChara:처녀
				PRINTFORML %CALLNAME:targetChara%의 秘所から、처녀を失った証である鮮血が一筋、流れ落ちた････。
			PRINTFORML
			PRINTFORMW ぐちゅぐちゅと촉수が動くたび、腰をくねらせ、歓喜する%CALLNAME:targetChara%。
			PRINTFORMW 既に何度絶頂したかわからない。미약に染められ、発情しきった身体は、촉수が一突きする度に絶頂を極めている。
			IF TALENT:targetChara:처녀
				PRINTFORML ついさっきまで처녀だったのに、촉수に처녀を奪われ、正体なく感じてしまっている自分。
			ELSE
				PRINTFORML おぞましい촉수に犯されているのに、嫌悪するどころか悦びを感じ、はしたなく絶頂している自分。
			ENDIF
			PRINTFORML %타겟캐릭은%それを自깨우침し、完全に心が折れてしまった。
			PRINTFORMW だが、촉수は次の場所を探すようにゆらゆらとうごめく。
		ELSE
			PRINTFORMW だが、촉수は何かを探すように、%CALLNAME:targetChara%의 下腹部をうろうろしているばかりだ。
		ENDIF
		PRINTFORMW どこを探しているのか、ようやく気づいた%타겟캐릭은%、顔を真っ青にし、首を振る。
		PRINTFORMW そこは違う、と抗議の声を上げようとするが、입を塞がれていてはくぐもった呻き声が漏れるだけだ。
		PRINTFORMW 촉수はかまわず、%CALLNAME:targetChara%의 애널に狙いを定め、ずぶずぶと潜り込み始める。
		PRINTFORMW 出すところに入れられるおぞましい感触に、目を見開き、くぐもった絶叫を漏らす%CALLNAME:targetChara%。
		PRINTFORMW そしてそれが快感であることに愕然とし、涙をこぼす。
		PRINTFORMW ありえない現実に、とうとう%CALLNAME:targetChara%의 精神は限界を迎えてしまった。
			PRINTFORMW 壊れたように笑いながら、全身を凌辱され、歓喜する%CALLNAME:targetChara%。
		PRINTFORM そこにいたのは、
		IF (TALENT:targetChara:좋아하는사람있음 || TALENT:targetChara:남친있음 || TALENT:targetChara:남편있음) && TALENT:targetChara:밀회 != 1
			PRINTFORM 愛する人のことなど忘れて촉수の快楽を貪る、
		ELSEIF TALENT:targetChara:미망인
			PRINTFORM 愛した人のことなど忘れて촉수の快楽を貪る、
		ELSEIF TALENT:targetChara:기혼
			PRINTFORML かつて愛した人のことなど忘れて촉수の快楽を貪る、
		ELSEIF TALENT:targetChara:청초 == 1 || TALENT:targetChara:무기력 == 1
			PRINTFORM かつての청초な淑女だった面影なぞどこにもない、
		ELSEIF TALENT:targetChara:천연 == 1 || TALENT:targetChara:쾌활 == 1 || TALENT:targetChara:보이쉬 == 1 || TALENT:targetChara:기가셈 == 1 || TALENT:targetChara:고결 == 1
			PRINTFORM かつての천연とした姿はどこにもない、
		ELSEIF TALENT:targetChara:성악 == 1
			PRINTFORML かつての悪企みを巡らす姿など想像もできない、
		ELSEIF TALENT:targetChara:쿨함 == 1
			PRINTFORML かつての女生徒たちの憧れの的だった姿など信じられない、
		ELSEIF TALENT:targetChara:색기 == 1
			PRINTFORML かつての男子生徒の憧れの的だった姿など欠片もない、
		ELSEIF TALENT:targetChara:어린애같음 == 1 || TALENT:targetChara:치유계 == 1
			PRINTFORML 先程まで感じさせていた幼さなど既にどこにもない、妖艶に成熟した
		ELSE
			PRINTFORML もはやすっかり촉수の快楽に染まりきった、
		ENDIF
		PRINTFORMW ただのメスであった････。
		PRINTFORML
		PRINTFORML ････
		PRINTFORML ････････
		PRINTFORML ････････････
		PRINTFORML
		PRINTFORMW どれほど凌辱しただろう？
		PRINTFORMW %타겟캐릭은%체력を使い果たし、촉수の粘液と自らの愛液が作り出した池に沈んでいた。
		PRINTFORMW そこに、一本の細い촉수が、ゆっくりと近づいてくる。
		PRINTFORMW 촉수の先端に種子のような肉塊を抱えていることに気づき、%타겟캐릭은%この後起こることを想像したのだろう。
		PRINTFORMW だめ、やめて････と、力なく呟く。だが、既に脱力しきった体ではどうにもならない。
		IF playType == 0
			PRINTFORMW 촉수は何の妨害もなく질내に入り込み、さらに奥へ奥へと進んでいく。
			PRINTFORMW 子宮입がこじ開けられるのを感じ、背筋を強ばらせる%CALLNAME:targetChara%。だが、あぁ、と絶望のうめきを漏らす以外、何もできない。
			PRINTFORMW 촉수は子宮内に入り込み、抱えていた肉塊を大事そうに植え付けた。
			PRINTFORMW 種子はすぐに根を張り、%CALLNAME:targetChara%의 子宮を、卵巣を、身体そのものを、そして精神さえも、촉수の繁殖に適したものに作り変えていくだろう。
		ELSE
			PRINTFORMW 촉수は耳から%CALLNAME:targetChara%의 体内に入り込み、さらに奥へ奥へと進んでいく。
			PRINTFORMW 그리고、先ほどまで力なく喘いでいた%타겟캐릭이% 、あぁっと不意に高い声をあげた。
			PRINTFORMW 촉수の先端が、ついに脳へと入り込んだのだ。
			PRINTFORMW ぐちゅぐちゅと脳内を直接掻き回される異様な感깨우침に、目を見開いて身体を痙攣させる%CALLNAME:targetChara%。
			PRINTFORMW そして。入り込んだ촉수は脳の一番奥に、촉수の種子を植え付けた。
			PRINTFORMW 種子はすぐに根を張り、%CALLNAME:targetChara%의 脳を、身体そのものを、そして精神さえも、촉수の繁殖に適したものに作り変えていくだろう。
		ENDIF
		PRINTFORMW %CALLNAME:targetChara%의 悪夢は、終わらない。

		CALL DIARY_SET,NAME:targetChara+"を촉수で犯して種を植え付け、굴복させた。"

		CFLAG:targetChara:1000 = 5
		TALENT:targetChara:기생 = 1
		TALENT:targetChara:경계 = 0
		;●ＮＴＬ取得
		SIF TALENT:targetChara:좋아하는사람있음 || TALENT:targetChara:남친있음 || TALENT:targetChara:남편있음
			TALENT:targetChara:ＮＴＬ = 1
		;●이상경험取得
		EXP:targetChara:50 += 5
		PRINTFORML 이상경험＋5
		;●의존도
		CFLAG:targetChara:2 = -750
		;●セックス回数
		sexCount = RAND:2 + 3 + CALC_CHARA_SINGLE_DATA("TALENT",targetChara,"성악*5,고결*10,청초*5,쾌활,색기*7,보이쉬,천연,어린애같음,치유계*5,쿨함*5,무기력,기가셈,영애,우등생,유명인,학생회장,성직자*10,닌자*10,연예인*5,프린세스*5,메이드*5")
		IF playType == 0
			;●처녀喪失
			SIF TALENT:targetChara:처녀 == 1
				TALENT:targetChara:처녀 = 0
			;●V経験
			EXP:targetChara:0 += sexCount
			PRINTFORML Ｖ경험＋{sexCount}
			;●질사경험
			EXP:targetChara:5 += sexCount
			PRINTFORML 질사경험＋{sexCount}
			;●A経験
			EXP:targetChara:Ａ경험 += MAX(sexCount / 2,1)
			PRINTFORML Ａ경험＋{MAX(sexCount / 2,1)}
			;●절정경험
			EXP:targetChara:2 += sexCount / 10
		ELSE
			;●A経験
			EXP:targetChara:Ａ경험 += sexCount
			PRINTFORML Ａ경험＋{sexCount}
			;●질사경험
			EXP:targetChara:Ａ개발경험 += sexCount
			PRINTFORML Ａ개발경험＋{sexCount}
			;●절정경험
			EXP:targetChara:2 += sexCount / 20
		ENDIF
		PRINTFORML 절정경험＋{EXP:targetChara:2}
		;●성교경험
		EXP:targetChara:4 += sexCount
		PRINTFORML 성교경험＋{sexCount}
		;●펠라경험
		EXP:targetChara:22 += sexCount
		PRINTFORML 펠라경험＋{sexCount}
		;●정액경험
		EXP:targetChara:20 += sexCount
		PRINTFORML 정액경험＋{sexCount}
		;●촉수경험
		EXP:targetChara:촉수경험 += sexCount
		PRINTFORML 촉수경험＋{sexCount}

		;●각인　(손抜き)
		MARK:targetChara:굴복각인 = MIN(sexCount / 100,3)
		MARK:targetChara:반발각인 = MIN(sexCount / 100,3)
		MARK:targetChara:4        = MARK:targetChara:반발각인
ENDSELECT
DRAWLINE
RETURN

@TENTACLE_INVITATION
#DIM index
#DIM targetChara
#DIM slaveChara
#DIM slaveAttack
#DIM targetMindResist
#DIM targetBodyResist
#DIMS rapePlace
#DIM sexCount
#DIM playType
#DIM daysCount
daysCount = DAY - SCHOOL_FIRST_GOING_DAY:GET_CHARA_GO_SCHOOL_INDEX(MASTER)

rapePlace = \@ IS_GO_SAMESCHOOL(targetChara,slaveChara) ? 빈교실 # 폐허 \@

FOR index,1,CHARANUM
	IF CFLAG:index:1000 == 15
		targetChara = index
		slaveChara = getChara(CFLAG:targetChara:1015)
		CALL SET_ACTUAL_FIRST_PLAY_TYPE(slaveChara)
		playType = RESULT
		SIF IS_UNCONTACTABLE(targetChara) || IS_UNCONTACTABLE(slaveChara)
			CONTINUE

		PRINTFORMW %CALLNAME:slaveChara%は、理由をつけて%rapePlace%に%조사처리(NAME:targetChara,"을")% 誘い出した････。

		slaveAttack  = CALC_CHARA_RANGED_DATA("ABL",slaveChara,"전투능력","3,1|7,3|*,5") + CALC_CHARA_RANGED_DATA("ABL",slaveChara,"감성","3,1|7,2|*,3") + CALC_CHARA_SINGLE_DATA("TALENT",slaveChara,"성악*10,고결*-10,겁쟁이*-5,솔직*5,얌전함*-5,충동적*3,도착적*5,바이*10,소악마*5,카리스마*3,인기*2,수수께끼의매력*5,헌신적,무기력*-5,음험*5,애교,마술기능*10,조합지식*5,정화*-30,모판*10") + CFLAG:targetChara:1013 * 2 + ITEM:촉수활성화약 * 10
		targetMindResist = CALC_CHARA_RANGED_DATA("ABL",targetChara,"전투능력","3,1|7,3|*,5") + CALC_CHARA_RANGED_DATA("ABL",targetChara,"감성","3,1|7,2|*,3") + CALC_CHARA_SINGLE_DATA("TALENT",targetChara,"꿋꿋함,프라이드낮음*-1,얌전함*-1,겁쟁이*-1,레이프소망*-5,도착적*5,쾌활,쿨함,기가셈,닌자*10,성직자*10,마술기능*10,공주님소망*-10,금단의지식*5,경계") - (RELATION:targetChara:(NO:slaveChara) / 10 - 10) - (EXP:targetChara:촉수경험 / 10 - 10) - ABL:targetChara:순종 - ITEM:냉정아로마 * 10
		targetBodyResist = CALC_CHARA_RANGED_DATA("ABL",targetChara,"학력","3,1|7,3|*,5") + CALC_CHARA_RANGED_DATA("ABL",targetChara,"감성","3,1|7,2|*,3") + CALC_CHARA_SINGLE_DATA("TALENT",targetChara,"Ｃ민감*-3,Ｖ민감*-3,Ａ민감*-3,Ｂ민감*-3,쾌감에솔직*-5,쾌감을부정*10,닌자*10,성직자*5,마술기능*10,공주님소망*-10,약독내성*8,금단의지식*5,경계") - (RELATION:targetChara:(NO:slaveChara) / 10 - 10) - (EXP:targetChara:촉수경험 / 10 - 10) - ABL:targetChara:욕망 - ITEM:냉정아로마 * 10
		PRINTFORMW

		IF slaveAttack - targetMindResist <= -10 && slaveAttack - targetBodyResist <= -10
			IF TALENT:targetChara:마술기능
				PRINTFORMW %CALLNAME:slaveChara%は%CALLNAME:targetChara%に敗北し、촉수の種を封印されてしまった。
				TALENT:slaveChara:정화 = 1
				CFLAG:slaveChara:1018 = NO:targetChara
			ELSE
				PRINTFORMW %CALLNAME:targetChara%に逃げられてしまった。
			ENDIF
			PRINTFORMW これは、方바늘を練り直す必要がありそうだ････。
			PRINTFORMW 結果　：　大失敗！
			CFLAG:targetChara:1015 = 0
			CFLAG:targetChara:1000 = 4
			CFLAG:targetChara:1013 = 0
			TALENT:targetChara:경계 += 5
			DRAWLINE
			continue
		ENDIF
		IF slaveAttack - targetMindResist < 10 && slaveAttack - targetBodyResist < 10
			PRINTFORMW ････しかし、慌てた%NAME:targetChara%から%CALLNAME:slaveChara%に電話が入った。
			PRINTFORMW なんでも、急用が入ってすぐに帰らなければならないらしい。
			PRINTFORMW ････しょうがない。また次の機会を待つとしよう。
			CFLAG:targetChara:1013 ++
			PRINTFORMW 結果　：　失敗！
			DRAWLINE
			continue
		ENDIF
		RESULT = 0
		TRYCALLFORM SCENARIO_EVENT_CHARACTER_CONTACT_INTERCEPT_EVENT_{NO:targetChara}("TENTACLE_FRIEND",targetChara,slaveChara,NO:slaveChara,daysCount)
		SIF RESULT != 0
			CONTINUE

		PRINTFORMW 結果　：　成功！
		sexCount = RAND:2 + 3 + CALC_CHARA_SINGLE_DATA("TALENT",targetChara,"성악*5,고결*10,청초*5,쾌활,색기*7,보이쉬,천연,어린애같음,치유계*5,쿨함*5,무기력,기가셈,영애,우등생,유명인,학생회장,성직자*10,닌자*10,연예인*5,프린세스*5,메이드*5") + CALC_CHARA_SINGLE_DATA("ABL",targetChara,"Ｃ감각,Ｂ감각,Ｖ감각,Ａ감각,욕망*2,순종*2,촉수중독") + CFLAG:targetChara:1013 * 2
		CFLAG:targetChara:1013 ++

		;開始前イベントは簡略化の対象外。
		SELECTCASE ABL:targetChara:욕망
			CASE 0
				;初回。なお、終了時に순종・욕망両方を1にするので、片方だけ1のパターンは起こらない。
				PRINTFORMW %CALLNAME:slaveChara%は一瞬の隙をついて、%CALLNAME:targetChara%의 腕を촉수で絡めとった。
				PRINTFORMW %타겟캐릭은%突然のことに驚き、逃げようとして････今度はその腕を、逃がさない、と%CALLNAME:slaveChara%が掴む。
				PRINTFORMW これで両손を捕まれ、動けなくなった。そのまま素早く他の촉수が足を絡めとり、空中に持ち上げる。
				PRINTFORMW %타겟캐릭은%もはや逃げることすらできず、공포に震えることしかできない。
				PRINTFORM ただ、傍にいる%CALLNAME:slaveChara%に
				IF TALENT:targetChara:천연 == 1 || TALENT:targetChara:쾌활 == 1 || TALENT:targetChara:보이쉬 == 1 || TALENT:targetChara:기가셈 == 1 || TALENT:targetChara:고결 == 1 || TALENT:targetChara:쿨함 == 1
					PRINTFORM 今のうちに早く逃げて、と叫ぶだけだ。
				ELSE
					PRINTFORML お願い、助けて、と訴えるだけだ。
				ENDIF
				PRINTFORMW %CALLNAME:slaveChara%は薄く笑むと、そんな%CALLNAME:targetChara%의 耳元に顔を寄せ、そっと囁いた。
				PRINTFORML
				IF TALENT:slaveChara:모판
					PRINTFORMW 大丈夫。%GET_CALL_NAME(slaveChara,targetChara)%も、すぐに촉수のよさがわかるから。
				ELSEIF TALENT:slaveChara:동화
					PRINTFORMW 怖がらなくていいよ。すぐに気持ちよくなれるから。
				ELSE
					;ここには来ない。
				ENDIF
				PRINTFORML
				PRINTFORMW 信じられない言葉に、ようやく、この촉수が%CALLNAME:slaveChara%의 ものであることに気づいたらしい。
				PRINTFORMW 化け物、%GET_CALL_NAME(targetChara,slaveChara)%をどこへやったの、返して、と、暴れ始めた。
				PRINTFORMW %CALLNAME:slaveChara%はその%GET_RELATIONSHIP_TEXT(slaveChara,targetChara,0)%にふふ、と妖艶に笑み、自分が%CALLNAME:slaveChara%本人であることを告げた。
				PRINTFORMW その普段の%CALLNAME:slaveChara%とは似ても似つかない態度に、%CALLNAME:targetChara%의 顔がさっと青ざめる。
				PRINTFORMW %타겟캐릭은%このとき、ようやく理解したのだ。
				PRINTFORMW 自分が%CALLNAME:slaveChara%의 罠にはまり、촉수の生け贄にされたのだ、ということを････。
				PRINTFORML
				PRINTFORMW %CALLNAME:targetChara%의 服が破られ、露になった가슴に、촉수が吸い付く。
				PRINTFORMW 得体の知れない生物に辱しめられる공포に身を固くし――次に無数の촉수に가슴を舐め回され、息をのむ%CALLNAME:targetChara%。
				PRINTFORMW それだけでなく、촉수に触れられたところがじんじんと熱くなり始める。촉수の表面を塗らしている粘液が皮膚から%CALLNAME:targetChara%의 体内に入り込み、미약として働いているのだ。
				PRINTFORMW 刺激に身を震わせる%CALLNAME:targetChara%의 입から思わず、熱い吐息が漏れた。
				PRINTFORMW 感じてるみたいだね。気持ちいいんでしょ？
				PRINTFORMW 話しかけられてハッとし、首を振る%CALLNAME:targetChara%。
				PRINTFORMW こんなの気持ちよくなんてない。それより%GET_CALL_NAME(targetChara,slaveChara)%、正気に戻って。
				PRINTFORMW そう、必死に訴える%타겟호칭을%、%CALLNAME:slaveChara%は妖艶な瞳で見下ろしつつ、傍に寄ってくる촉수をぺろり、と舐めた。
				PRINTFORMW じゃ、次の場所に教えてあげないとね。
				PRINTFORMW その声と同時に、촉수たちがパンツを破り、中に納められていた秘豆に絡み付く。ひっ、と声を上げ、震え始める%CALLNAME:targetChara%。
				PRINTFORMW 細長い촉수たちがうぞうぞと秘豆を撫で回し、捏ね回す。電気のような刺激が全身に走り、身体を震わせる。
				PRINTFORMW %타겟캐릭은%必死で唇を噛み締め、喘ぎ声を抑えようとするが、堪えられるはずもなく、んんっとくぐもった悲鳴を漏らす。
				PRINTFORML
				PRINTFORMW ほぐれてきたね。じゃあ、次は････
				PRINTFORMW %CALLNAME:slaveChara%は妖しい笑みを崩さぬまま、촉수に新たな指示を出す。
				PRINTFORMW それに従い、촉수たちは%CALLNAME:slaveChara%의 秘所へと集まり始めた。
				PRINTFORMW 予想していなかった行動に驚き、%CALLNAME:slaveChara%의 名前を呼ぶ%CALLNAME:targetChara%。
				PRINTFORMW だが、次第に%CALLNAME:slaveChara%의 股間に盛り上がっていくモノを見て、絶句してしまった。
				PRINTFORMW それはまさに、隆々とした페니스のよう。
				PRINTFORMW あまりにおぞましいその姿を誇らしげに見せつけながら、%CALLNAME:slaveChara%は%타겟호칭을%抱えあげ、その\@ playType == 0 ? 膣입 # 애널 \@にぴたりと、촉수페니스をあてがう。
				PRINTFORM 次に起こることを察したのだろう、
				IF (TALENT:targetChara:좋아하는사람있음 || TALENT:targetChara:남친있음 || TALENT:targetChara:남편있음) && TALENT:targetChara:밀회 != 1
					PRINTFORML %타겟캐릭은%この場にはいない愛する人へ助けを求め、泣き叫ぶ。
				ELSEIF (TALENT:targetChara:미망인) && TALENT:targetChara:밀회 != 1
					PRINTFORML %타겟캐릭은%この世にはいない愛する人へ助けを求め、泣き叫ぶ。
				ELSEIF (TALENT:targetChara:기혼) && TALENT:targetChara:밀회 != 1
					PRINTFORML %타겟캐릭은%かつての愛する人へ助けを求め、泣き叫ぶ。
				ELSEIF TALENT:targetChara:청초 == 1 || TALENT:targetChara:무기력 == 1
					PRINTFORML %타겟캐릭은%泣きながら、いや、それだけはやめてと哀願する。
				ELSEIF TALENT:targetChara:천연 == 1 || TALENT:targetChara:쾌활 == 1 || TALENT:targetChara:보이쉬 == 1 || TALENT:targetChara:기가셈 == 1 || TALENT:targetChara:고결 == 1
					PRINTFORML %타겟캐릭은%촉수を振りほどこうと、最後の力を振り絞って暴れだす。
				ELSEIF TALENT:targetChara:성악 == 1 && TALENT:targetChara:쿨함 == 1
					PRINTFORML %타겟캐릭은%正体なく取り乱し、やめて、許してと哀願する。
				ELSEIF TALENT:targetChara:색기 == 1
					PRINTFORML %타겟캐릭은%涙を溢しながら、それだけはやめてと懇願する。
				ELSEIF TALENT:targetChara:어린애같음 == 1 || TALENT:targetChara:치유계 == 1
					PRINTFORML %타겟캐릭은%、本能的に공포を感じ、最後の力を振り絞って暴れ始める。
				ELSE
					PRINTFORML %타겟캐릭은%さめざめと泣きながら、お願い、許して、と懇願する。
				ENDIF
				IF playtype == 0
					PRINTFORMW %GET_RELATIONSHIP_TEXT(slaveChara,targetChara,0)%의 哀れな저항にふふっと笑みを浮かべながら、%CALLNAME:slaveChara%は\@ TALENT:targetChara:처녀 ? まだ男を知らない #  既に濡れそぼっている \@%CALLNAME:targetChara%의 秘所へと、촉수페니스を一気にねじ込んだ。
					SIF TALENT:targetChara:처녀
						PRINTFORML %CALLNAME:targetChara%의 秘所から、처녀を失った証である鮮血が一筋、流れ落ちた････。
					PRINTFORML
					PRINTFORMW %GET_RELATIONSHIP_TEXT(targetChara,slaveChara,0)%의 촉수페니스に一気に貫かれ、%타겟캐릭은%ぱくぱく、と声にならない悲鳴をあげる。
					PRINTFORMW その姿を満足げに眺めながら、%CALLNAME:slaveChara%は激しく腰を動かし始める。
					PRINTFORMW されるがままに촉수페니스に질내を掻き回され、正体なく絶叫する%CALLNAME:targetChara%。
					IF TALENT:targetChara:처녀
						PRINTFORMW %GET_RELATIONSHIP_TEXT(targetChara,slaveChara,0)%に犯され、ついさっきまで처녀だったとは思えない痴態を晒している自分。
					ELSE
						PRINTFORMW %GET_RELATIONSHIP_TEXT(targetChara,slaveChara,0)%의 촉수페니스に질내の奥まで穢され、信じられないほどの快楽を味わう自分。
					ENDIF
					PRINTFORMW その現実に心が折れてしまい、%타겟캐릭은%저항する기력を完全に失ってしまう。
					PRINTFORMW その殊勝な態度に満足げに頷くと、%CALLNAME:slaveChara%は再び촉수を操り、最後の穴に狙いを定める。
					PRINTFORMW その視線の意味に気づき、力なくそこはだめ････と訴える%CALLNAME:targetChara%。
					PRINTFORMW しかし%CALLNAME:slaveChara%は遠慮なく촉수を操り、最後の穴････すなわち、%CALLNAME:targetChara%의 可愛らしい애널を、貫くのだった。
					PRINTFORML
					PRINTFORMW すっかり敏感になった가슴を揉まれ、乳首を촉수が捏ね回す。
					PRINTFORMW ぷっくらと膨らみ、敏感になったクリトリスを촉수に激しくしごかれる。
					PRINTFORMW 秘所は촉수페니스を通じて%GET_RELATIONSHIP_TEXT(targetChara,slaveChara,0)%と繋がり、ごりごりと削るように激しく犯される。
					PRINTFORMW 애널にすらも太い페니스を迎え入れ、腸壁をほじられ、撫でられるたびに、ゾクゾクとする快楽を受け止める。
					PRINTFORMW あらゆる性感帯を同時に責められ、信じられない快楽地獄に悶える%CALLNAME:targetChara%。
				ELSE
					PRINTFORMW %GET_RELATIONSHIP_TEXT(slaveChara,targetChara,0)%의 無駄な저항にふふっと笑みを浮かべながら、%CALLNAME:slaveChara%はまだぴっちりと閉じている애널へと、촉수페니스を一気に強引にねじ込んだ。
					PRINTFORML
					PRINTFORMW %GET_RELATIONSHIP_TEXT(targetChara,slaveChara,0)%의 촉수페니스に一気に貫かれ、%타겟캐릭은%ぱくぱく、と声にならない悲鳴をあげる。
					PRINTFORMW その姿を満足げに眺めながら、%CALLNAME:slaveChara%は激しく腰を動かし始める。
					PRINTFORMW されるがままに촉수페니스に排泄の穴を凌辱され、正体なく絶叫する%CALLNAME:targetChara%。
					PRINTFORMW その現実に心が折れてしまい、%타겟캐릭은%저항する기력を完全に失ってしまった････。
					PRINTFORML
					PRINTFORMW すっかり敏感になった가슴を揉まれ、乳首を촉수が捏ね回す。
					PRINTFORMW ぷっくらと膨らみ、敏感になったクリトリスを촉수に激しくしごかれる。
					PRINTFORMW 애널に太い페니스を迎え入れ、ゴリゴリと削りたてられ、そのたびに魂まで腐り落ちてしまいそうな快楽を受け止める。
					PRINTFORMW あらゆる性感帯を同時に責められ、信じられない快楽地獄に悶える%CALLNAME:targetChara%。
					PRINTFORMW 純潔の証こそ破られてはいないが、それにどれほどの意味があるというのだろう。
				ENDIF
				PRINTFORMW もはや毎秒毎に絶頂し、思考のすべてを快楽に支配されている。
				PRINTFORM もはや、%CALLNAME:targetChara%의 普段の
				IF (TALENT:targetChara:좋아하는사람있음 || TALENT:targetChara:남친있음) && TALENT:targetChara:밀회 != 1
					PRINTFORM 恋する乙女の姿はどこにもなく、はしたなく快楽を貪る
				ELSEIF TALENT:targetChara:남편있음
					PRINTFORM 愛する夫のために尽くす妻の姿はどこにもなく、獣のように快楽を貪る
				ELSEIF TALENT:targetChara:미망인
					PRINTFORM 亡き夫の冥福を祈る貞淑な妻の姿はどこにもなく、本能のままに快楽を貪る
				ELSEIF TALENT:targetChara:기혼
					PRINTFORML かつて愛した人を想う姿などどこにもなく、全身を痙攣させながらイキ狂う
				ELSEIF TALENT:targetChara:청초 == 1 || TALENT:targetChara:무기력 == 1
					PRINTFORM 慎ましやかな姿はどこにもなく、正体なく快楽を貪る
				ELSEIF TALENT:targetChara:천연 == 1 || TALENT:targetChara:쾌활 == 1 || TALENT:targetChara:보이쉬 == 1 || TALENT:targetChara:기가셈 == 1 || TALENT:targetChara:고결 == 1
					PRINTFORM 勇ましい姿はどこにもなく、涙を溢しながら快楽を貪る
				ELSEIF TALENT:targetChara:성악 == 1
					PRINTFORM 寒気すら感じさせる笑みはどこにもなく、白目すら剥いて快楽を貪る
				ELSEIF TALENT:targetChara:쿨함 == 1
					PRINTFORM 女生徒たちの憧れる凛々しい姿はどこにもなく、はしたない声をあげてイキ狂う
				ELSEIF TALENT:targetChara:색기 == 1
					PRINTFORM 男子生徒たちの憧れる大人びた魅力はどこにもなく、正体なくイキ狂う
				ELSEIF TALENT:targetChara:어린애같음 == 1 || TALENT:targetChara:치유계 == 1
					PRINTFORM 幼さを感じさせる仕草はどこにもなく、獣のような叫び声をあげてイキ狂う
				ELSE
					PRINTFORM 人懐っこい笑みはどこにもなく、はしたない絶叫をあげイキ狂う
				ENDIF
				PRINTFORMW メスがいるだけだ。
				PRINTFORMW その、快楽の絶叫をあげるだけの虚ろになった瞳を見つめつつ、%CALLNAME:slaveChara%は耳をよせ、囁いた。
				PRINTFORML
				PRINTFORMW 思いっきりイッちゃいなよ。私の見てる前で촉수に責められて、はしたないイキ顔晒してイッちゃいなよ。
				PRINTFORML
				PRINTFORMW 耳元で囁く%CALLNAME:slaveChara%의 言葉が、麻薬のように%CALLNAME:targetChara%의 脳に染み込んでいく。
				PRINTFORMW 그대로、獣のような叫び声をあげ、潮を吹き出して一際強く絶頂した････。
				PRINTFORML
				PRINTFORMW あまりの激しい絶頂に체력を使い果たし、くたり、と倒れこむ%CALLNAME:targetChara%。
				PRINTFORMW すごいイキ方だったね。そんなに気持ちよかったの？
				PRINTFORMW %CALLNAME:slaveChara%의 声にも反応せず、時折全身をびくびくと震わせるだけだ。
				PRINTFORMW やれやれ、と息をついて、촉수を仕舞いこむと、支えを失った%CALLNAME:targetChara%의 身体は重力に従って床に落ち、촉수の出した体液と自身の愛液が作った池に沈む。
				PRINTFORMW びちゃっと、粘り気のある水音がした。
				PRINTFORMW それじゃ、私はもう行くから。また次の機会に呼ぶから、愉しみにしててね。
				PRINTFORMW そう言いおいて、立ち去っていく%CALLNAME:slaveChara%。
				PRINTFORMW 残された%타겟캐릭은%しかし、反応もせず、虚ろな目で痙攣を繰り返すだけだった････。

				ABL:targetChara:순종 = 1
				ABL:targetChara:욕망 = 1
				ABL:targetChara:Ｃ감각 = 1
				ABL:targetChara:Ａ감각 = 1
				ABL:targetChara:Ｂ감각 = 1
				EXP:targetChara:촉수경험 += sexCount
				EXP:targetChara:성교경험 += sexCount
				EXP:targetChara:고통쾌락경험 += sexCount / 10
				IF playType == 0
					SIF TALENT:targetChara:처녀 == 1
						TALENT:targetChara:처녀 = 0
					ABL:targetChara:Ｖ감각 = 1
					EXP:targetChara:Ｖ경험 += sexCount
					EXP:targetChara:질사경험 += sexCount
					EXP:targetChara:절정경험 += sexCount / 10
				ELSE
					EXP:targetChara:Ａ개발경험 += sexCount
					EXP:targetChara:절정경험 += sexCount / 20
				ENDIF
				EXP:targetChara:Ａ경험 += sexCount
				EXP:targetChara:이상경험 += 5
				DRAWLINE
				CONTINUE
			CASE 1
		;순종が1:やめさせるつもりでやって来る 2:逆らえないことに疑問を感じつつ。3촉수をむしろ期待して
		;욕망が1:感じていない、と必死に부정。2:なんでこんな････ 3:もっとください的な
				PRINTFORMW %rapePlace%で待っている%CALLNAME:slaveChara%의 もとに、%타겟캐릭이% 現れた。
				PRINTFORM 遅かったね。どうしたの？　と尋ねる%CALLNAME:slaveChara%에게、%타겟캐릭은%、
				SELECTCASE ABL:targetChara:순종
					CASE 1
						PRINTFORMW ････お願い、%GET_CALL_NAME(targetChara,slaveChara)%。もうこんなことはやめて、正気に戻って。と訴えた。
						PRINTFORMW そんなこと言って、あんなに気持ちよくなってたのに、と笑う%CALLNAME:slaveChara%を涙目で見つめながら、
						PRINTFORMW 違う。私は気持ちよくなんてなってない、と言い切る。
						PRINTFORMW なら、もっと촉수のよさを教えてあげるね。%CALLNAME:slaveChara%はそう、妖艶に微笑んだ。
						PRINTFORMW それと同時にうぞうぞと沸き上がり、溢れ始める촉수。
						PRINTFORMW 後ずさり、逃げ出す%타겟캐릭이% 再び捕まるまで、ほとんど時間はかからなかった。
					CASE 2
						PRINTFORMW ････お願い、%GET_CALL_NAME(targetChara,slaveChara)%。もうやめて、と、言葉少なに訴えた。
						PRINTFORMW %타겟캐릭은%そんなこといって、あれだけ気持ちよくなってたのに、と笑い出す。
						PRINTFORMW ････違う。違う。気持ちよくなんか、ない。と、うつむいたまま首を振り、涙を溢す%CALLNAME:targetChara%。
						PRINTFORMW じゃあ、저항してごらん。気持ちよくないなら、できるはずだよね？
						PRINTFORMW うぞうぞ、と촉수が現れ、自身の四肢を絡めとるのを、%타겟캐릭은%さしたる저항もせずに待っていた････。
					CASEELSE
						PRINTFORMW 無言のままうつむき、ぎゅっと自分の손を握りしめている。
						PRINTFORMW どうしたの？　何も言う気がないなら、今日はこれまでにしようか。
						PRINTFORMW そう言って立ち去ろうとする%CALLNAME:slaveChara%의 손を、ぎゅっと掴んだ。
						PRINTFORMW ････お願い。もう私、촉수がないと耐えられない。
						PRINTFORMW %GET_CALL_NAME(targetChara,slaveChara)%의 촉수で、何もかも忘れられるくらいに辱しめてください。
						PRINTFORMW そう、涙を溢しながら訴える%CALLNAME:targetChara%。
						PRINTFORMW %CALLNAME:slaveChara%はその言葉に満足げに笑み、촉수を展開し始める。
						PRINTFORMW %타겟캐릭은%それを、崇拝すら感じさせる目で見つめていた････。
				ENDSELECT
			CASE 2
		;순종が1:やめさせるつもりでやって来る 2:逆らえないことに疑問を感じつつ。3촉수をむしろ期待して
		;욕망が1:感じていない、と必死に부정。2:なんでこんな････ 3:もっとください的な
				PRINTFORMW %rapePlace%にやってきた%타겟캐릭은%、うつむき、言葉少なだった。
				PRINTFORMW どうしたの。何か言いたいことでもあるの？　そう言って笑いかける%CALLNAME:slaveChara%。
				PRINTFORM %타겟캐릭은%顔をあげ、
				SELECTCASE ABL:targetChara:순종
					CASE 1
						PRINTFORMW ････お願い、%GET_CALL_NAME(targetChara,slaveChara)%。正気に戻って。と、目に涙を浮かべて訴えた。
						PRINTFORMW そんなこと言って、あんなに気持ちよくなってたのに、と笑う%CALLNAME:slaveChara%。
						PRINTFORMW その指摘に力なく違う、と首を振る。
						PRINTFORMW じゃあ、確かめてみようか、と%CALLNAME:slaveChara%が촉수を展開する。
						PRINTFORMW それを見て、凌辱の記憶を思い出したのだろう。一瞬だけ体を固くしたあと、ふらつく足取りで逃げ始める。
						PRINTFORMW そのよろよろとした逃走はあっという間に終わり、まもなく%CALLNAME:targetChara%의 嬌声が響き始めた。
					CASE 2
						PRINTFORMW お願い、もうこんなことは終わりにして、と訴えた。
						PRINTFORMW 終わりにって、あんなに촉수で気持ちよくなってたのに。と笑い出す%CALLNAME:slaveChara%。
						PRINTFORMW その言葉にうつむき、唇を噛み締める%CALLNAME:targetChara%。
						PRINTFORMW 뭐、言葉より、身体に聞いてみようじゃない。
						PRINTFORMW そう言って笑いながら、촉수を展開する%CALLNAME:slaveChara%。
						PRINTFORMW %타겟캐릭은%迫り来る촉수を、ろくに저항もせず受け入れていった････。
					CASEELSE
						PRINTFORMW 何かを訴えようとするが、すぐに顔を真っ赤にし、黙り混んでしまう。
						PRINTFORMW ････その分だと、촉수に犯されたのを思い出してオナニーしたけど、どうやっても満足できなかった。そんなところ？
						PRINTFORMW 薄い笑みを浮かべながらの指摘に、%타겟캐릭은%ハッと顔をあげる。
						PRINTFORMW 図星、みたいだね。それなら、どうすればいいか、わかるよね？
						PRINTFORMW そう囁かれ、%타겟캐릭은%瞳をとろんと蕩けさせながら、自らの服をはだけ始めた。
						PRINTFORMW ････お願い、%GET_CALL_NAME(targetChara,slaveChara)%。あなたの촉수で、思いっきり気持ちよくして。何もかも、忘れられるくらいに。
						PRINTFORMW その訴えに満足そうにうなずき、촉수を展開する%CALLNAME:slaveChara%だった。
				ENDSELECT
			CASE 3
				PRINTFORMW %rapePlace%に%CALLNAME:slaveChara%が着いた時には、すでに%타겟캐릭이% 待っていた。
				PRINTFORM 随分早いね。待ちきれなかったの？　という%CALLNAME:slaveChara%에게、%타겟캐릭은%
				SELECTCASE ABL:targetChara:순종
					CASE 1
						PRINTFORMW 首を振り、%GET_CALL_NAME(targetChara,slaveChara)%を正気に戻すために来たの、と答えた。
						PRINTFORMW そんなこと言って、촉수に犯されるのが気持ちよくて、たまらないんでしょ？
						PRINTFORMW その物言いにキッと顔をあげ、違う、と부정する。
						PRINTFORMW その態度に面白そうに笑いながら、じゃあ、試してみようか、と、%CALLNAME:slaveChara%は촉수を展開する。
						PRINTFORMW その光景に、圧倒的な快楽を思い出したのだろう。頬を染めながらふらふらと逃げ出す%CALLNAME:targetChara%。
						PRINTFORMW その、足元のおぼつかない逃亡は、あっという間に終わってしまった････。
					CASE 2
						PRINTFORMW 違うの････と力なく首を振る。
						PRINTFORMW 何が違うの？　どうせ、촉수に犯されたのを思い出して、体が疼いてるんでしょ？
						PRINTFORMW %CALLNAME:slaveChara%의 冗談混じりの指摘に、顔を真っ赤にしてうつむく%CALLNAME:targetChara%。
						PRINTFORMW %CALLNAME:slaveChara%は満足げに笑み、じゃあ、もっと솔직になれるように、気持ちよくしてあげるよ、と촉수を展開する。
						PRINTFORMW %타겟캐릭은%逃げようともせず、迫り来る촉수を受け入れるのだった････。
					CASEELSE
						PRINTFORMW 스커트をたくしあげながら、うん。%GET_CALL_NAME(targetChara,slaveChara)%의 촉수に犯して貰えるって思うと、待ってられなかったの、と答えた。
						PRINTFORMW 言葉通り、%CALLNAME:targetChara%의 パンツは愛液が染みを作り、その奥の秘所の輪郭すら浮かび上がらせている。
						PRINTFORMW そのはしたない姿に、%CALLNAME:slaveChara%は、それじゃあ、期待通りに思いっきり気持ちよくしてあげるね、と微笑んで、촉수を展開するのだった････。
				ENDSELECT
			CASEELSE
				;ここには来ない。
		ENDSELECT
		PRINTFORML
		IF slaveAttack - targetBodyResist >= 10
			IF ABL:targetChara:Ｂ감각 + 1 <= (sexCount / 3 + TALENT:targetChara:Ｂ민감 * 10 + EXP:targetChara:촉수경험 / 20) / 10
				PRINTFORML
				SELECTCASE ABL:targetChara:Ｂ감각
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 乳房に巻き付いた촉수は、揉むようにぐにぐにと動き、同時に前後に動く。
							PRINTFORMW それはまるで、乳房を揉まれているような感触。
							PRINTFORMW 思わず、快楽に体を震わせる%CALLNAME:targetChara%。乳首はさらなる責めを期待するように、ぷっくりと膨らんでいる。
							PRINTFORMW だが、%타겟캐릭은%首を降り、その快楽を거절する。
							PRINTFORMW むしろ、腰を捻り、촉수を振り払おうと、無意味な저항を続けている。
							PRINTFORMW その、저항とも言えない저항を見つめていた%CALLNAME:slaveChara%だが、焦れたのか、次の責めを始める。
							PRINTFORMW イボが大量に生えた、ヒトデ状の촉수が乳首にとりつき、吸い、舐め始める。
							PRINTFORMW 時に焦らすように、時に壊すように激しく、予想できない動きで責め立てるヒトデ。
							PRINTFORMW %타겟캐릭은%首を振りながら、断続的に背筋を痙攣させている。
							PRINTFORMW その時、不意に乳房に走った아픔に、%타겟캐릭은%目を見開いた。
							PRINTFORMW ヒトデの内部から現れた바늘が乳房に刺さり、何かの薬を長しこんでいる。
							PRINTFORMW その事実に気づき、ヒトデを振り払おうとする%CALLNAME:targetChara%。
							PRINTFORMW しかし、바늘できっちりと食い込んでいるヒトデは、動かない。
							PRINTFORMW むしろ바늘に無理な力がかかる分だけ、%CALLNAME:targetChara%に아픔をもたらすだけに終わり、%타겟캐릭은%体を震わせながら、耐えているしかない。
							PRINTFORMW やがて、注入が終わったのか。ヒトデが바늘を仕舞う。
							PRINTFORMW 外れやすくなったと、%타겟캐릭이% ヒトデを振り払おうとした瞬間。
							PRINTFORMW ヒトデの舌のような촉수で乳首を舐められ、それだけで%타겟캐릭은%絶頂した。
							PRINTFORMW 信じられない刺激に混乱し、動けなくなる%CALLNAME:targetChara%。
							PRINTFORMW その間にヒトデの촉수が、さらに乳首を責め始める。
							PRINTFORMW 圧倒的な快楽に저항できなくなった%타겟캐릭은%、ただひたすら乳房を촉수に弄ばれ続けるのだった。
						ELSE
							PRINTFORMW %CALLNAME:targetChara%의 乳房に촉수がとりつき、미약を注入しはじめた。
							PRINTFORMW みるみるうちに勃起していく乳首。そこから溢れる快楽に、%타겟캐릭은%悲鳴を上げている････。
						ENDIF
						ABL:targetChara:Ｂ감각++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 가슴にとりついた촉수が膨らんだ乳首をしごき、撫で回す。
							PRINTFORMW %타겟캐릭은%その刺激に髪を振り乱し、絶頂しつづけている。
							PRINTFORMW 本来は子供を育むための器官を、촉수に弄ばれ、快感に身悶えている。
							PRINTFORMW その事実に身を震わせ、涙を流す%CALLNAME:targetChara%。
							PRINTFORMW そんな%CALLNAME:targetChara%의 様子を見ながら、%CALLNAME:slaveChara%は面白そうに声をかけた。
							PRINTFORML
							PRINTFORMW そんなに가슴の촉수が気持ちいいの？　なら、もっと気持ちよくしてあげようか？
							PRINTFORML
							PRINTFORMW 違う、違う、という%CALLNAME:targetChara%의 叫びを無視して、新しい촉수が가슴にとりつく
							PRINTFORMW 今度は太い촉수でなめ回すタイプらしい。であれば、耐えられなくはない。そう思って、歯を食い縛る%CALLNAME:targetChara%
							PRINTFORML
							PRINTFORMW ････次の瞬間、太い촉수の中から細い촉수が現れ、乳房の中に入り込み始めた。
							PRINTFORML
							PRINTFORMW 想像もしなかった刺激に、身体を強ばらせ、悲鳴をあげる%CALLNAME:targetChara%。
							PRINTFORMW その間に촉수は가슴の奥へたどり着き････くちゅくちゅと音をたてて、乳腺を弄り始める。
							PRINTFORMW 그리고、촉수が動くたびに流し込まれる、気が狂いそうなほどの快楽、
							PRINTFORMW ――乳腺を直接改造されている。
							PRINTFORMW それに気づき、촉수を引き抜こうと狂ったように暴れる%CALLNAME:targetChara%。
							PRINTFORMW ････しかし、快楽に力が抜けてしまう%타겟캐릭은%、結局なすすべなく乳腺を改造されてしまうのだった。
						ELSE
							PRINTFORMW 乳首にとりついた촉수が、乳房の内側に侵入し、内部を直接改造しはじめた。
							PRINTFORMW おぞましい感触に、%타겟캐릭은%必死で首を振って逃れようとしている。
						ENDIF
						ABL:targetChara:Ｂ감각++
					CASEELSE
						IF GETBIT(CFLAG:targetChara:1019,0)
							IF !IS_SKIP_TENTACLE_INVITATION
								PRINTFORMW 乳腺の中に細い촉수が入り込むのを、%타겟캐릭은%저항もせずに受け入れた。
								PRINTFORMW 体内でぐちゅぐちゅと촉수が音をたてる。そのたびに、%타겟캐릭은%母乳を吹き出しているかのような快楽を感じ、快楽に声をあげる。
								PRINTFORML
								PRINTFORMW すっかり가슴に촉수が馴染んだみたいだね。改造されるの、そんなに気持ちよかった？
								PRINTFORML
								PRINTFORMW %CALLNAME:slaveChara%의 言葉に、躊躇いながらうなずく。
								PRINTFORMW 体内を直接改造される禁断の快楽は、すでに%CALLNAME:targetChara%にしっかりと刻み込まれている。
								PRINTFORMW それに気づいた%CALLNAME:slaveChara%はにっこりと微笑むと、うっとりした顔で語り始めた。
								PRINTFORML
								PRINTFORMW こうやって촉수に改造されてるとね、そのうち가슴の中に촉수の卵を産み付けてもらえるようになるんだよ。
								PRINTFORMW 中で孵った卵が、おっぱいの中で動くの。うぞうぞ、うぞうぞって。
								PRINTFORMW それで十分育ったら、乳腺を内側から刺激しながら、這い出してくるんだよ。
								PRINTFORMW そしたらどれだけ気持ちいいんだろうね。楽しみだね。
								PRINTFORML
								PRINTFORMW %CALLNAME:slaveChara%が語る、普通の人間なら、想像しただけで正気を失いそうなおぞましい未来。
								PRINTFORMW それに%타겟캐릭은%、そんな････と、絶望の吐息を漏らす。
								PRINTFORMW ････しかし、禁断の快楽を期待した秘所は、ぼたぼたと愛液を溢れさせるのだった。
							ELSE
								PRINTFORMW 再び、乳腺に촉수が入り込み、ぐちゅぐちゅと責め立て始めた。
								PRINTFORMW %타겟캐릭은%禁断の快楽に身を震わせている････。
							ENDIF
							SETBIT CFLAG:targetChara:1019,0
						ENDIF
				ENDSELECT
			ENDIF
			IF ABL:targetChara:Ｃ감각 + 1 <= (sexCount / 3 + TALENT:targetChara:Ｃ민감 * 10 + EXP:targetChara:촉수경험 / 20) / 10
				PRINTFORML
				SELECTCASE ABL:targetChara:Ｃ감각
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 細長い촉수がくるり、とクリトリスの皮を剥き、敏感な内部を直接責めたてる。
							PRINTFORMW それだけで、%타겟캐릭은%腰を震わせて絶頂してしまう。
							PRINTFORMW 休みなくクリトリスを責め立てられ、朦朧とした視界に、パンツのような何かが映った。
							PRINTFORMW その内側にイボのような촉수が無数に生えている。それに気づいた瞬間、%타겟캐릭은%自分を襲う運命に気づき、必死で暴れて逃げようとする。
							PRINTFORMW しかし저항むなしく、そのパンツを無理矢理に穿かされ････次の瞬間、無数のイボが、膨らんだクリトリスを撫で回し始めた。
							PRINTFORMW ぴったりと貼り付いた肉パンツを脱ぐこともできず、%타겟캐릭은%終わりない刺激に、絶頂し続けるのだった････。
						ELSE
							PRINTFORMW 下着のような촉수が勃起したクリトリスを覆い、休み無く責め立て始める。
							PRINTFORMW %타겟캐릭은%脱ぐこともできず、絶頂しつづけている････。
						ENDIF
						ABL:targetChara:Ｃ감각++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 度重なる刺激に、%CALLNAME:targetChara%의 クリトリスはぷっくりと膨らむ。
							PRINTFORMW %CALLNAME:slaveChara%はそれに気づき、いやらしいクリトリスだね、と笑い出した。
							PRINTFORMW 酷い言われように、顔を歪める%CALLNAME:targetChara%。
							PRINTFORMW と。次の瞬間、クリトリスへの激しい아픔にひっと声を漏らす。
							PRINTFORMW どうやら、鋭い바늘のような촉수が刺さり、何かの薬品を注入しているようだ。
							PRINTFORMW 得体の知れない薬品を注がれる공포に怯える間もなく、%CALLNAME:targetChara%의 クリトリスが熱を持ち始める。
							PRINTFORMW そしてだんだんと大きくなり、親指ほどの長さへと成長した。
							PRINTFORMW 想像もしなかった変化に、混乱する%CALLNAME:targetChara%。
							PRINTFORMW だが、そのクリトリスが太い촉수に呑み込まれると、白目を剥いて絶頂してしまう。
							PRINTFORMW 촉수の内側はブラシのようで、クリトリス全体を刺激しているのだ。
							PRINTFORMW 信じられない快楽に、%타겟캐릭은%ひたすら喘ぎ続けることしかできなかった････。
						ELSE
							PRINTFORMW 바늘のような촉수が%CALLNAME:targetChara%의 クリトリスに刺さり、内部に肥大化の薬品を注いだ。
							PRINTFORMW 指ほどの大きさに膨らんだクリトリスをしごかれ、%타겟캐릭은%白目を剥いて叫んでいる････。
						ENDIF
						ABL:targetChara:Ｃ감각++
					CASEELSE
						IF GETBIT(CFLAG:targetChara:1019,1)
							IF !IS_SKIP_TENTACLE_INVITATION
								PRINTFORMW すっかり膨らんだクリトリスを呑み込んだ촉수。その촉수にクリトリスをしごかれ、%타겟캐릭은%歓喜の声をあげて泣き叫ぶ。
								PRINTFORMW はしたなくぷっくらと膨らんだクリトリスは、既にどれ程乱暴に責められても、%CALLNAME:targetChara%に恐ろしい絶頂をもたらす快楽器官へと変化していた。
								PRINTFORMW 全体をブラシのような촉수がこすり、時に先端を、細い촉수が弄り回す。
									PRINTFORMW %CALLNAME:targetChara%にはもはや、腰をはしたなく突きだし、촉수のおぞましい快楽を受け入れるしか、残されていなかった････。
							ELSE
								PRINTFORMW すっかり膨らんだクリトリスを、ブラシのような촉수にこすられている。
								PRINTFORMW %타겟캐릭은%はしたなく腰を突き出し、촉수に与えられる快楽に身悶えている････。
							ENDIF
							SETBIT CFLAG:targetChara:1019,1
						ENDIF
				ENDSELECT
			ENDIF
			;Ｖ감각が0だった=最初はplayType == 1だった
			IF playType == 0 && ABL:targetChara:Ｖ감각 > 0 && ABL:targetChara:Ｖ감각 + 1 <= (sexCount / 3 + TALENT:targetChara:Ｖ민감 * 10 + EXP:targetChara:촉수경험 / 20) / 10
				PRINTFORML
				SELECTCASE ABL:targetChara:Ｖ감각
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 次々と秘所に入り込んでくる、太い촉수たち。
							PRINTFORMW %타겟캐릭은%そのたびに、禁断の快楽に身を振るわせ、イキ狂う。
							PRINTFORMW 自身の身体が際限なく汚されていることを感じ、%CALLNAME:targetChara%의 意識が、朦朧としはじめて。
							PRINTFORMW ――それが、冷水を浴びせかけられたようにハッキリとした。
							PRINTFORMW 視界に映ったのは、%CALLNAME:targetChara%의 腕ほども太く、全体にトゲのようなイボを生やした、凶悪な촉수。
							PRINTFORMW それが自身に近づいてくるのを感じ、공포で悲鳴をあげる。
							PRINTFORML
							PRINTFORMW やだ、壊される、%GET_CALL_NAME(targetChara,slaveChara)%、助けて。
							PRINTFORML
							PRINTFORMW 無駄と知りつつ、%CALLNAME:slaveChara%に助けを求める。
							PRINTFORMW %CALLNAME:slaveChara%はそれを聞き、くすりと微笑むと････その촉수を勢いよく、%CALLNAME:targetChara%へと挿入した。
							PRINTFORMW 声にならない悲鳴をあげ、一瞬意識を失う。
							PRINTFORMW だが、それも許されない。容赦ないピストンにより、%CALLNAME:targetChara%의 意識は無理矢理깨우침醒し、また気絶する。
							PRINTFORMW 地獄のような責め。それからすらも%타겟캐릭이% 快感を得られるようになるまで、そう長くはかからなかった････。
						ELSE
							PRINTFORMW 腕ほどの太さの촉수が、%타겟호칭을%犯している。
							PRINTFORMW あまりの快楽に、%타겟캐릭은%絶頂と気絶をひたすらに繰り返している････。
						ENDIF
						ABL:targetChara:Ｖ감각++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 自身の腕ほどの촉수に犯され続ける、%CALLNAME:targetChara%。
							PRINTFORMW 普通なら身を裂かれるほどの아픔を感じるだろうに、%타겟캐릭은%狂おしいほどの快楽に呑まれ、イキ狂う。
							PRINTFORMW 自分がどんどんと堕ちていることを嫌が応にも思い知らされ、快楽に絶叫を上げながら涙を溢している。
							PRINTFORMW ――その、快楽に歪む視界に、奇妙な肉塊が写った。
							PRINTFORMW ラグビーボールのような形の肉の塊に、隙間無く細い촉수を生やした何か。
							PRINTFORMW 見るだけで背筋が寒くなる何かをうっとりと眺めながら、%CALLNAME:slaveChara%はぺろり、と舌なめずりした。
							PRINTFORML
							PRINTFORMW 凄いでしょう？　この子、子宮を촉수用に改造してくれるんだよ？
							PRINTFORML
							PRINTFORMW さらり、と告げられた怖ろしい言葉に、%타겟캐릭은%顔を真っ青にし、逃げようと暴れ出す。
							PRINTFORMW だが、四肢をしっかりと拘束され、逃げられはしない。
							PRINTFORMW 助けを求めて必死に叫ぶが、%CALLNAME:slaveChara%は愉しそうに笑いながら、肉塊を%CALLNAME:targetChara%의 秘部へと押し込む。
							PRINTFORMW 蠢く何かが身体の奥へと入っていくのを感じ、涙を流して――不意に、甘い叫びをあげた。
							PRINTFORMW 突然溢れ出してきた快感に、前後不깨우침に泣きわめく。
							PRINTFORMW ざわざわと蠢く肉塊が%CALLNAME:targetChara%의 膣へ、子宮へととりつき、それを촉수と同じモノに作り替えている。
							PRINTFORMW その事実を嫌が応にも思い知らされ、%타겟캐릭은%快楽の叫びをあげながら、絶望に涙を溢すのだった。
						ELSE
							PRINTFORMW 촉수が%CALLNAME:targetChara%의 子宮の中に入り込み、内側から改造し始めた。
							PRINTFORMW 体内を作り替えられていくおぞましい感触に、%타겟캐릭은%快楽の叫びをあげながら、絶望に涙を溢している。
						ENDIF
						ABL:targetChara:Ｖ감각++
					CASEELSE
						IF GETBIT(CFLAG:targetChara:1019,2)
							IF !IS_SKIP_TENTACLE_INVITATION
								PRINTFORMW 촉수が질내を激しく犯すのを感じ、%타겟캐릭은%髪を降り乱して絶叫する。。
								PRINTFORMW 既に膣も子宮も촉수によって作り替えられ、촉수が動く度に、一生かかっても味わえないほどの快楽が押し寄せる。
								PRINTFORMW 自分がすっかり촉수専用の오나홀に改造されたことを悟り、涙を流す%CALLNAME:targetChara%。
								PRINTFORMW そしてその事実に快楽を味わい、快感に酔っている。
								PRINTFORMW 自分が촉수にふさわしい淫らな女になったことを感じ、질내の촉수をぎゅっと絞める。
								PRINTFORMW それが新たな快楽を作り出し、%타겟캐릭은%わななくのだった････。
							ELSE
								PRINTFORMW %타겟캐릭은%すっかり촉수専用の오나홀に改造された子宮で、際限なく絶叫し続けている。
							ENDIF
							SETBIT CFLAG:targetChara:1019,2
						ENDIF
				ENDSELECT
			ENDIF
			IF ABL:targetChara:Ａ감각 + 1 <= (sexCount / 3 + TALENT:targetChara:Ａ민감 * 10 + EXP:targetChara:촉수경험 / 20) / 10
				PRINTFORML
				SELECTCASE ABL:targetChara:Ａ감각
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 애널の襞を伸ばすように、ぐにぐにと촉수が蠢いている。
							PRINTFORMW 애널の中も外も、촉수が出入りしている。
							PRINTFORMW %타겟캐릭은%しかし、ぐっと唇を噛み締めて耐えている。
							PRINTFORMW 不浄の穴を犯されているという事実を嫌悪し、声を漏らさないようにしているのだろう。
							PRINTFORMW しかしよく見れば、その頬は既に薄い紅に染まり、快楽を感じていることが見てとれる。
							PRINTFORMW 既に촉수に身体中を嬲られ、絶頂した身体だ。미약効果のある촉수の体液は、当然、애널にもたっぷりと染み込んでいる。
							PRINTFORMW それでも、%타겟캐릭은%必死に耐え続ける。
							PRINTfORMW それはまるで、애널を犯されて感じているという事実を認めれば、촉수の奴隷に堕ちてしまう、ということを知っているようでもあった。
							PRINTFORML
							PRINTFORMW それをしばらく眺めていた%CALLNAME:slavechara%は、くすり、と微笑むと、しばらくそのままでもいいけど、時間がないから、一気にいくね、と囁いた。
							PRINTFORMW 同時に一本の촉수が、ゆっくりと釜首をもたげる。その先端は鋭い바늘となっており、%CALLNAME:targetChara%의 肌など紙のように貫いてしまいそうだ。
							PRINTFORMW それによく見れば、尖端に小さな穴が空いている。どうやらこれで、注射のように何かを注ぎ込むらしい。
							PRINTFORMW ――何を注ぎ込むのか、と考えて････%타겟캐릭은%恐ろしい想像をし、真っ青になる。
							PRINTFORML
							PRINTFORMW 気づいた？　この子にお尻だけで絶頂できるよう、お薬打ってもらおうね。
							PRINTFORML
							PRINTFORMW %CALLNAME:slaveChara%의 楽しそうな囁きに、%타겟캐릭은%いや、やめて、と叫ぶが、聞き入れてもらえるわけもなく。
							PRINTFORMW ぶすり、と、바늘が肛門に刺さる。
							PRINTFORMW ひぃっ！　と、あまりの아픔に悲鳴をあげ････すぐに、その表情が快楽に蕩け始めた。
							PRINTFORMW 촉수から直接体内に送り込まれた미약により、애널は開発されきった淫売のように敏感になっているのだ。
							PRINTFORMW そのせいだろう。촉수が回りを撫でるだけで、肛門がひくひくとうごめき、%타겟캐릭은%物欲しそうに촉수を目で追っている。
							PRINTFORMW やがて太い촉수が、再び애널を犯し始めたとき、%타겟캐릭은%はしたなく叫び声をあげ、あっさりと絶頂した。
						ELSE
							PRINTFORMW 바늘のような촉수が%CALLNAME:targetChara%의 애널に、感度増強の薬品を注入しはじめた。
							PRINTFORMW 得体の知れない薬品を注ぎ込まれる공포に、身を震わせている････。
						ENDIF
						ABL:targetChara:Ａ감각++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 애널に촉수をぐちゅぐちゅと犯され、正体なく喘ぎ続ける%CALLNAME:targetChara%。
							PRINTFORMW 不浄の穴を犯されているというのに、%CALLNAME:targetChara%의 表情は快楽に歪み、だらしなく舌を出している。
							PRINTFORML
							PRINTFORMW こんな太い촉수を咥えこんで、こんなに気持ち良さそうに喘いで。%CALLNAME:targetChara%って、エッチな変態なんだね。
							PRINTFORML
							PRINTFORMW %CALLNAME:slaveChara%に違う、違うと首を振り、%GET_CALL_NAME(targetChara,slaveChara)%의 せいと、恨めしげな声をあげる。
							PRINTFORML
							PRINTFORMW 私のせいにするの？　変態なのは%GET_CALL_NAME(slaveChara,targetChara)%なのに。これはおしおきが必要だね。
							PRINTFORML
							PRINTFORMW 言葉とは裏腹に、音符でもついてそうなウキウキとした声で囁く%CALLNAME:slaveChara%。
							PRINTFORMW %타겟캐릭은%自分が凌辱の입実を与えてしまったことに気がつき、必死で謝罪する。
							PRINTFORML
							PRINTFORMW だーめ。%GET_CALL_NAME(slaveChara,targetChara)%には、自分の変態さを思い知ってもらわないと。
							PRINTFORML
							PRINTFORMW あっという間に애널に新しい촉수を挿入され、許しを乞う声は快楽に中断される。
							PRINTFORMW 그리고、一番奥まで突き入れると、今度はぱちん、と、その촉수を切り離した。
							PRINTFORMW 次の瞬間、切り離された촉수は完全に애널の中に入り込み、暴れ始めた。
							PRINTFORMW 予想外の激しい刺激に目を見開き、ぱくぱくと声にならない悲鳴をあげながら、悶え狂う%CALLNAME:targetChara%。
							PRINTFORML
							PRINTFORMW すごいでしょ。その子、切り離すと独立した生き物になるんだよ。中で一生懸命暴れてくれるの。
							PRINTFORML
							PRINTFORMW うっとりと呟く%CALLNAME:slaveChara%は、続けて、
							PRINTFORML
							PRINTFORMW それにね。その子、애널にずっといると、애널を自分が棲みやすいように改造していくの。
							PRINTFORMW 촉수に触れられただけでも、毎日のおトイレでも絶頂できる、음란애널に改造してくれるんだよ。
							PRINTFORMW それが嫌なら、私の見ている前で、一生懸命촉수ウンチひりだしてね？
							PRINTFORML
							PRINTFORMW にこやかに告げられた死刑宣告に、真っ青になる%CALLNAME:targetChara%。
							PRINTFORMW 自分の体内を作り替えられていく공포に、あわてて腸内の촉수を出そうと、力を込める。
							PRINTFORMW その甲斐あって、徐々に外に顔を出す촉수。････だが。
							PRINTFORMW 安住の地を追い出されまいと、촉수が一層激しく暴れ始める。
							PRINTFORMW それに敏感になった애널を刺激され、腰が砕けそうになる。
							PRINTFORMW 首を振りながら、それでも排泄しようと力をこめ。
							PRINTFORML
							PRINTFORMW %GET_CALL_NAME(slaveChara,targetChara)%って、私にウンチを見られて感じてるんだね。変態だね。
							PRINTFORML
							PRINTFORMW %CALLNAME:slaveChara%의 言葉に、排泄を%GET_RELATIONSHIP_TEXT(targetChara,slaveChara,0)%に見られるという恥辱を思いだし、一瞬、排泄の力が緩む。
							PRINTFORMW それが、致命的な隙になった。
							PRINTFORMW 次の瞬間、暴れていた촉수の動きが変わる。出されまいと暴れる動きから、奥へ奥へと戻ろうとする動きへ。
							PRINTFORMW 再び奥を貫かれる感触に、見悶える%CALLNAME:targetChara% 。再び力を込め、촉수を排泄しなければならないのに、촉수が奥へと向かう麻薬のような快楽に腰が砕け、正体なくイキ続けるだけだ。
							PRINTFORMW やがて、촉수が再び애널に収まると、落ち着いた%CALLNAME:targetChara%に再び改造の未来を告げる%CALLNAME:slaveChara%。
							PRINTFORMW %타겟캐릭이% 체력を使い果たし、촉수を排泄できなくなるまでその凌辱は続き････排泄の恥辱と애널の快楽とを、自らの손で自分自身に刻みこんでいくのだった････。
						ELSE
							PRINTFORMW 芋虫のような촉수が%CALLNAME:targetChara%의 腸内に入り込み、暴れ始めた。
							PRINTFORMW 身体の内側からの激しい刺激に、%타겟캐릭은%わなないている････。
						ENDIF
						ABL:targetChara:Ａ감각++
					CASEELSE
						IF GETBIT(CFLAG:targetChara:1019,3)
							IF !IS_SKIP_TENTACLE_INVITATION
								PRINTFORMW 尻を촉수に高く持ち上げられ、恥ずかしそうに身をよじる%CALLNAME:targetChara%。
								PRINTFORMW だが、저항らしい저항はそれだけだ。丸出しの애널を촉수に晒しながら、顔を背け、荒い呼吸を繰り返している。
								PRINTFORML
								PRINTFORMW どうしたの。お尻をそんなに突き上げて、恥ずかしくないの？
								PRINTFORML
								PRINTFORMW %CALLNAME:slaveChara%의 楽しそうな声に、%타겟캐릭은%ぐっと唇を噛み締めた。
								PRINTFORML
								PRINTFORMW お願い････。촉수に애널を犯される感触が、忘れられないの。
								PRINTFORMW お尻を촉수に汚されてる変態でいいから、慰めて。
								PRINTFORML
								PRINTFORMW 顔を歪めながら、肛虐の快楽をせがむ%CALLNAME:targetChara%。
								PRINTFORMW その様子に満足した%CALLNAME:slaveChara%は、太い촉수を%CALLNAME:targetChara%의 애널に潜りこませた････。
							ELSE
								PRINTFORMW 애널の촉수が近づいてきたのに気づき、%타겟캐릭은%挿入しやすいように尻を高く持ち上げる。
								PRINTFORMW ズブズブと入り込んでいる촉수に歓喜し、涙を流して絶頂している････。
							ENDIF
							SETBIT CFLAG:targetChara:1019,3
						ENDIF
				ENDSELECT
			ENDIF
		ENDIF
		IF slaveAttack - targetMindResist >= 10
			IF ABL:targetChara:순종 + 1 <= (sexCount / 3 + slaveAttack - targetMindResist + EXP:targetChara:촉수경험 / 20) / 10
				PRINTFORML
				SELECTCASE ABL:targetChara:순종
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW %타겟캐릭은%촉수の責めに唇を噛み、絶頂しないように耐えている。
							PRINTFORMW ここで絶頂してしまえば、戻れなくなる、ということを理解しているからだろう。
							PRINTFORMW %타겟캐릭은%そんな%타겟호칭을%面白そうに見下ろしながら、一際太く、何重にもくびれた촉수を\@ playType == 0 ? 질내 # 애널 \@へと潜りこませた。
							PRINTFORMW その刺激に歯を食い縛りながら、声を漏らしてしまう%CALLNAME:targetChara%。
							PRINTFORMW そのままぐちゅぐちゅと촉수が動き始めると、声を押し殺すこともできず、正体なく喘ぎ始めた。
							PRINTFORML
							PRINTFORMW ････楽しんでるみたいだけど、いいの？　早くしないとその子、卵産み付けちゃうよ？
							PRINTFORML
							PRINTFORMW 耳元で囁かれた事実が信じられず、え、と聞き返してしまう%CALLNAME:targetChara%。
							PRINTFORML
							PRINTFORMW え、じゃなくて。それ、産卵管だから、早く抜かないと子宮に卵を産み付けられるよ。
							PRINTFORML
							PRINTFORMW 続けて告げられた言葉に真っ青になり、慌てて引き抜こうと動き出す。
							PRINTFORMW しかし、ぬるつく촉수がそう簡単に抜けるわけもなく、しかも\@ playType == 0 ? 질내 # 애널 \@の촉수は相変わらず動き続ける。
							PRINTFORMW 渾身の力で引き抜こうとすれば、촉수のくびれが\@ playType == 0 ? 膣 # 腸 \@襞を削り、さらなる快楽をもたらす。
							PRINTFORMW 途中で力尽き、休もうとすれば、その隙に촉수は再び奥へと進み、犯し始める。
							PRINTFORML
							PRINTFORMW そんなに激しくオナニーするなんて、その産卵管、そんなに気に入ったの？
							PRINTFORML
							PRINTFORMW 愉しそうな%CALLNAME:slaveChara%의 言葉に、違う、違うと首を振る%CALLNAME:targetChara%。
							PRINTFORMW しかし、その奮闘も空しく、産卵管を引き抜くことはできず、\@ playType == 0 ? 子宮 # 直腸 \@一杯に卵を産み付けられてしまうのだった････。
						ELSE
							PRINTFORMW ぼこり、ぼこりと音を立てて、촉수が%CALLNAME:targetChara%의 \@ playType == 0 ? 胎内 # 直腸 \@に卵を産み付け始めた。
							PRINTFORMW %타겟캐릭은%おぞましい感触に首を振り、助けを懇願している････。
						ENDIF
						ABL:targetChara:순종++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 촉수に刺激されながら、断続的に絶頂を繰り返す%CALLNAME:targetChara%。
							PRINTFORMW 촉수に犯されることに공포と嫌悪を感じながら、せめてもの저항をするのがやっとだ。
							PRINTFORMW その%CALLNAME:targetChara%의 頭にしっかりと촉수がとりつくと、ずるり、と耳へと촉수が入り込んだ。
							PRINTFORMW あまりの事態に驚愕し、頭を振って촉수を振り払おうとする。
							PRINTFORMW しかし、しっかりと頭にとりついた촉수は離れることなく、%CALLNAME:targetChara%의 耳の奥へ、奥へと入っていく。
							PRINTFORML
							PRINTFORMW 耳の奥の奥、すなわち、脳へと。
							PRINTFORML
							PRINTFORMW その事実に気がついた%타겟캐릭이% 、必死になって촉수を振り払おうと足掻く。
							PRINTFORMW だが、とっくに快楽に砕けてしまった身体では、저항らしい저항にもならない。
							PRINTFORMW 그리고、脳にたどり着いた촉수が、直接その中を弄り始める。
							PRINTFORMW ぐちゅぐちゅと、脳に直接響く音。それは、頭の中を直接書き換えられ、自分が自分でなくなっていく音だ。
							PRINTFORMW その공포におののきながら、同時に背徳的な快楽を叩き込まれ、喘ぎ狂う%CALLNAME:targetChara%。
							PRINTFORMW その間にも彼女の脳は촉수に書き換えられ、촉수の모판としての意識に置き換えられていく。
							PRINTFORML
							PRINTFORMW ････やがて、一際甲高い声をあげて、%타겟캐릭이% 絶頂する。
							PRINTFORMW その瞳には既に촉수に対する嫌悪は微塵もなく、ただ快楽だけに染まっていた。
						ELSE
							PRINTFORMW %CALLNAME:targetChara%의 耳から脳内に촉수が入り込み、ぐちゅぐちゅと弄り始めた。
							PRINTFORMW 頭の中を直接弄られる背徳的な快楽に、%타겟캐릭은%涙を流しながら快感に喘いでいる････。
						ENDIF
						ABL:targetChara:순종++
					CASEELSE
						IF GETBIT(CFLAG:targetChara:1019,4)
							IF !IS_SKIP_TENTACLE_INVITATION
								PRINTFORMW 全身を촉수に嬲られ、舌を出してイキ狂う%CALLNAME:targetChara%。
								PRINTFORMW 身体中の穴に촉수を受け入れ、快楽に喘ぎながら、愛しげに촉수を撫でている。
								PRINTFORMW 最初の頃にあった촉수への嫌悪はとっくに消え失せ、次々と襲いくる촉수を我が子のように抱き締め、舐め、そして自らの体で愛でる。
								PRINTFORMW 촉수の모판としての人生を受け入れたその瞳は、蕩けるほどの幸福さに浸っていた。
							ELSE
								PRINTFORMW 촉수の모판としての意識を上書きされた%타겟캐릭은%、촉수を愛しげに撫でている。
								PRINTFORMW その顔は蕩けるほどに幸福そうだ。
							ENDIF
							SETBIT CFLAG:targetChara:1019,4
						ENDIF
				ENDSELECT
			ENDIF
			IF ABL:targetChara:욕망 + 1 <= (sexCount / 3 + slaveAttack - targetBodyResist + EXP:targetChara:촉수경험 / 20) / 10
				PRINTFORML
				SELECTCASE ABL:targetChara:욕망
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW 촉수に絡めとられ、いいように嬲られる%CALLNAME:targetChara%。
							PRINTFORMW 何度となく絶頂を迎えているにも関わらず、その瞳にははっきりとした意思の光がある。
							PRINTFORMW 既に腰は砕け、촉수に吊るされてようやく立っている有り様なのに、%타겟캐릭은%事態を打開する손を探しているようだった。
							PRINTFORMW ････その瞳が、自分に迫ってくる太い촉수を捉えた。
							PRINTFORMW また、犯されるのか。諦めに近い気持ちで見つめていた%타겟캐릭은%、妙なことに気づいた。
							PRINTFORMW 촉수は%CALLNAME:targetChara%의 下半身ではなく、その顔に向かってまっすぐに延びてくるのだ。
							PRINTFORMW その意図するところに気づき、입を強く結ぶ%CALLNAME:targetChara%。
							PRINTFORMW 彼女の予想通り、촉수は彼女の首に巻き付き、そして입回りでゆらゆらと揺れ始める。
							PRINTFORMW 彼女の입を犯そうと、待ち構えているのは明らかだ。だが、입をしっかりと閉じていれば、入り込まれることはない。
							PRINTFORMW そう、油断していた彼女の鼻の中に、細い촉수が入り込んでくる。
							PRINTFORMW 予想もしなかった凌辱に混乱し、対応が遅れる。そのうちに촉수は鼻の奥に入り込み、完全に塞いでしまった。
							PRINTFORMW 입は、彼女自身が塞いでいる。その状況で鼻を塞がれれば、どうなるかは明らかだ。
							PRINTFORMW 呼吸を止め、なんとか저항しようとする%CALLNAME:targetChara%。しかし、いつまでも止めていることなどできない。
							PRINTFORMW 酸素を求めて입を開けば、素早く촉수が入り込む。그리고、そのまま喉を秘所のように犯し始める。
							PRINTFORMW 喉の奥に촉수が入り込み、こみ上げてくる吐き気にえづく。
							PRINTFORMW その動きが刺激となったのだろうか。촉수が震え、喉の奥に大量の体液を吐き出した。
							PRINTFORMW 否応なく身体の奥に촉수の体液を注がれ、%CALLNAME:targetChara%의 瞳が絶望に染まる。
							PRINTFORML
							PRINTFORMW ････次の瞬間、その身体がカッと熱くなり、疼き始めた。
							PRINTFORMW ゆらゆらと自分の周囲に漂う촉수から、目が離せなくなる。
							PRINTFORMW ････もっと、もっと気持ちよくなりたい。
							PRINTFORMW そう、ぽつりと呟くと同時に彼女に殺到しはじめる촉수。
							PRINTFORMW 그녀는 それを、歓喜の目で見つめていた････。
						ELSE
							PRINTFORMW 촉수が強引に%CALLNAME:targetChara%의 입に入り込み、犯し始めた。
							PRINTFORMW 体内に直接미약を注ぎ込まれ、%타겟캐릭은%発情した雌の表情になっている。
						ENDIF
						ABL:targetChara:욕망++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW %타겟캐릭은%、穴という穴に촉수を受け入れ、歓喜の声をあげている。
							PRINTFORMW いや、声らしきもの、といった方が正しい。
							PRINTFORMW 喉の奥まで촉수を受け入れ、必死に舐めしゃぶる。
							PRINTFORMW 촉수が体液を吐き出せば、それを嬉しそうにごくごくと飲み込んでいく。
							PRINTFORMW 体液を飲めば、もっと気持ちよくなれる、ということをわかっているからだ。
							PRINTFORMW くぐもった獣のような叫びをあげながら、가슴を捏ね回され、クリトリスをしごかれ、\@ playType == 0 ? 秘所と # \@애널に촉수を受け入れながら、なおも嬉しそうに腰を振る。
							PRINTFORMW ････だが。それでも、まだ瞳の光は失われていなかった。
							PRINTFORMW 快楽に染まりきった身体で、ギリギリの一線で持ちこたえているらしい。
							PRINTFORMW まだ、この状況を打開できると信じ、きっかけを探しているようだ。
							PRINTFORML
							PRINTFORMW それに気づいた%CALLNAME:slaveChara%は、無駄なことを、と呟いた。
							PRINTFORML
							PRINTFORMW ････次の瞬間、%CALLNAME:targetChara%의 背中に、見慣れない촉수がとりつく。
							PRINTFORMW 予想していなかった刺激に驚き、振り落とそうとする%CALLNAME:targetChara%。
							PRINTFORMW 촉수は構わず、彼女の背中に바늘の生えた촉수を突き刺した。
							PRINTFORMW %타겟캐릭은%鋭い고통に顔をゆがめ････그리고、体内から沸き上がる異様な感触に、顔を青ざめさせた。
							PRINTFORMW 体内の神経一本一本を、촉수が這いずり回っている。彼女が感じたのは、それだった。
							PRINTFORMW ――神経を、作り替えられている。
							PRINTFORMW その可能性に気づき、必死で暴れだす%CALLNAME:targetChara%。
							PRINTFORMW ････その가슴を촉수が一舐めした瞬間、%타겟캐릭은%これまで感じたことのない強い刺激に、あっさりと絶頂した。
							PRINTFORMW 背筋を痙攣させながら、想像以上の事態に混乱する%CALLNAME:targetChara%。
							PRINTFORMW 自身の身体が촉수に適したものに作り替えられていることを感じ、次々と迫り来る촉수を、絶望の瞳で眺めていた････。
						ELSE
							PRINTFORMW 太い촉수が背中から%CALLNAME:targetChara%의 体内に入り、神経を改造し始めた。
							PRINTFORMW %타겟캐릭은%生きたままに自身の身体が作り替えられていることを感じ、絶望の瞳で絶頂しつづけている････。
						ENDIF
						ABL:targetChara:욕망++
					CASEELSE
						IF GETBIT(CFLAG:targetChara:1019,5)
							IF !IS_SKIP_TENTACLE_INVITATION
								PRINTFORMW 촉수に全身を嬲られている%CALLNAME:targetChara%의 体は、ひっきりなしに痙攣している。
								PRINTFORMW 許容量を越えた刺激に、目を見開き、입をだらしなく開いたまま、腰をなまめかしくくねらせている。
								PRINTFORMW その입に太い촉수がねじ込まれ、まるで질のように犯し始めた。
								PRINTFORMW 喉の奥まで入り込む촉수に白目を剥きながら、입の中で必死に촉수を舐めしゃぶる。
								PRINTFORMW やがて촉수が一際震えだし、%CALLNAME:targetChara%의 입の中に体液を吐き出した。
								PRINTFORMW 快楽に呑まれた%타겟캐릭은%、それが何なのかもわからないまま、ごくごくと音を立てて飲み干していく。
								PRINTFORMW そのたびに%CALLNAME:targetChara%의 身体を、内側から미약が侵食していく。
								PRINTFORMW 촉수に変質させられた%CALLNAME:targetChara%의 神経は、そのおぞましい侵食に歓喜し、さらなる快楽を産み出していった。
								PRINTFORMW いつ果てるともしれない快楽地獄に、%CALLNAME:targetChara%의 瞳は濁りきり、もはや何も写してはいなかった････
							ELSE
								PRINTFORMW 全身を改造された%타겟캐릭은%次々と迫り来る촉수を受け入れながら、歓喜に喘いでいる。
								PRINTFORMW その瞳は濁りきり、何も写していない････。
							ENDIF
							SETBIT CFLAG:targetChara:1019,5
						ENDIF
				ENDSELECT
			ENDIF
			IF ABL:targetChara:촉수중독 + 1 <= (sexCount / 2 + EXP:targetChara:촉수경험 + 100) / 200
				PRINTFORML
				SELECTCASE ABL:targetChara:촉수중독
					CASE 0
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW ････どれ程凌辱されただろう？
							PRINTFORMW %타겟캐릭은%瞳に涙を湛えて、そう考えた。
							PRINTFORMW ついこの間まで、普通の日常を暮らしていたハズなのに。
							PRINTFORMW いつの間にか、촉수が身体中を這い回り、%타겟호칭을%責め立てる。
							PRINTFORMW 気持ち悪い촉수に全身をなで回され、おぞましい感触に首を振る。
							PRINTFORMW ････だが、そのたびに身体の奥が熱くなっていることも、%타겟캐릭은%自깨우침していた。
							PRINTFORMW 違う。촉수なんかに感じさせられてるわけない。そう頭で부정してみても、身体の奥の熱さはどんどん強くなっている。
							PRINTFORMW もしこのまま、熱さに呑み込まれてしまったら････。最悪の想像に、背筋が寒くなる。
							PRINTFORML
							PRINTFORMW お願い。誰でもいい。早く、助けて。でないと私････。
							PRINTFORML
							PRINTFORMW ぽろぽろと涙を零しながら、%타겟캐릭은%次の촉수を身体で受け止める。
							PRINTFORMW その、挿入された時の嫌悪感が、前よりもっと薄れていることを感じながら。
						ELSE
							PRINTFORMW %타겟캐릭은%촉수を受け入れつつある自分に공포し、身を震わせている････。
						ENDIF
						ABL:targetChara:촉수중독++
					CASE 1
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW ････どれ程凌辱されただろう？
							PRINTFORMW %타겟캐릭은%快楽に澱みきった頭で、そう考えた。
							PRINTFORMW ほんの少し前まで、%CALLNAME:slaveChara%と笑い会う、普通の日常があったはずなのに。
							PRINTFORMW その%CALLNAME:slaveChara%は촉수を操って、自分を容赦なく犯している。
							PRINTFORMW 그리고、それを受け入れて、自分は正体なく感じている、
							PRINTFORMW どこで間違ったんだろう。そう考えて、なぁんだ。と思い直した。
							PRINTFORML
							PRINTFORMW どこで間違ってなぞいない。これが私の本当の姿。촉수の体液を注がれ、嬲られ、際限なくイキ狂う。
							PRINTFORMW 無限に続く、촉수の玩具としての人生。それが私、だったんだ。
							PRINTFORML
							PRINTFORMW %타겟캐릭은%己の未来を悟り、表情を歪ませる。
							PRINTFORMW それは、泣いているようにも、微笑んでいるように見えた。
						ELSE
							PRINTFORMW %타겟캐릭은%촉수の玩具にされることを受け入れたようだ。
						ENDIF
						ABL:targetChara:촉수중독++
					CASE 2
						IF !IS_SKIP_TENTACLE_INVITATION
							PRINTFORMW ････どれ程凌辱されただろう？
							PRINTFORMW %타겟캐릭은%次々と촉수を受け入れながら、そう考えた。
							PRINTFORMW もはや、촉수を受け入れていない瞬間など存在しない。顔を、가슴を、クリトリスを、애널を、容赦なく촉수に嬲られる。
							PRINTFORMW それに%CALLNAME:targetChara%의 身体はびくびくと震え、秒ごとに絶頂を味わいながら、満足することなく次の촉수を求めている。
							PRINTFORML
							PRINTFORMW ようやく、촉수の良さがわかったみたいだね。
							PRINTFORML
							PRINTFORMW %CALLNAME:slaveChara%의 囁きに、こくり、と頷く。
							PRINTFORMW 普通に生きていたら決して味わえないだろう、終わりのない快楽責め。%타겟캐릭은%それを、素晴らしいものと感じていた。
							PRINTFORML
							PRINTFORMW これで、私たちはおんなじだね。おんなじ、촉수の奴隷だよ。
							PRINTFORML
							PRINTFORMW %CALLNAME:slaveChara%의 囁きが、頭の中に染み込んでいく。
							PRINTFORMW 全身を촉수に犯されながら、唯一自由になる右손を、%CALLNAME:slaveChara%의 方に伸ばす。
							PRINTFORMW %CALLNAME:slaveChara%がその손をとると、%CALLNAME:targetChara%의 心が暖かくなる。
							PRINTFORML
							PRINTFORMW さあ、行こう。このまま一緒に、どこまでも堕ちていこう。
							PRINTFORML
							PRINTFORMW 嬉しそうな%CALLNAME:slaveChara%에게、%CALLNAME:targetChara%も同じように微笑むのだった････。
						ELSE
							PRINTFORMW %타겟캐릭은%촉수の모판としての人生を受け入れ、微笑んでいる。
						ENDIF
						ABL:targetChara:촉수중독++
					CASEELSE
						;ここには来ない。
						;(촉수중독が3になっているのであれば、先に기생イベントが発生してイベントそのものに入らなくなっているはず)
				ENDSELECT
			ENDIF
		ENDIF
		EXP:targetChara:촉수경험 += sexcount * 2
		EXP:targetChara:성교경험 += sexCount * 2
		EXP:targetChara:질사경험 += sexCount * 2
		EXP:targetChara:고통쾌락경험 += sexCount / 5
		EXP:targetChara:Ｖ경험 += sexCount * 2
		EXP:targetChara:Ａ경험 += sexCount * 2
		EXP:targetChara:절정경험 += sexCount / 5
		EXP:targetChara:펠라경험 += sexCount * 2

		;終了イベントは簡略化の対象外
		IF ABL:targetChara:촉수중독 >= 3
			PRINTFORML
			PRINTFORMW ････････････
			PRINTFORMW ････････
			PRINTFORMW ････
			PRINTFORML
			PRINTFORMW 그리고、%CALLNAME:slaveChara%に連れられた%타겟캐릭이% %CALLNAME:MASTER%의 前に姿を現した、
			PRINTFORMW %CALLNAME:slaveChara%に言われるがまま、%CALLNAME:MASTER%의 前に膝をつく%CALLNAME:targetChara%。
			PRINTFORMW それを満足げに眺めながら、%마스터호칭은%懐から촉수の種子を取り出した。
			PRINTFORM それが意味するところを%CALLNAME:slaveChara%に教えられていたのだろう。%타겟캐릭은%
			IF ABL:targetChara:순종 == 3 && ABL:targetChara:욕망 == 3
				PRINTFORMW 目を期待に輝かせ、순종に입を開いて主人の恵みを待っている。
			ELSEIF ABL:targetChara:순종 == 3
				PRINTFORMW 瞳からつぅっと涙を溢しながら、순종に입を開いた。
			ELSEIF ABL:targetChara:욕망 == 3
				PRINTFORMW 躊躇いながらも、ごくりと喉を鳴らし、입を開いた。
			ELSE
				PRINTFORMW しばし迷っていたが、やがて意を決したように입を開いた。
			ENDIF
			PRINTFORMW その입に落とされた촉수の種子を、ごくん、と飲み込む%CALLNAME:targetChara%。
			PRINTFORMW 直後、%타겟캐릭은%あぁ、と悩ましげな声を上げ、自分を抱きしめた。
			PRINTFORMW 種子が早速、彼女に기생するために蠢きだしたのだ。
			PRINTFORMW 種子はやがて彼女の体内に根付き、%CALLNAME:targetChara%의 子宮を、卵巣を、身体そのものを、そして精神さえも、촉수の繁殖に適したものに作り変えていくだろう。
			PRINTFORM そう教えてやると、%타겟캐릭은%あまりにおぞましい自分の未来に
			IF ABL:targetChara:순종 == 3 && ABL:targetChara:욕망 == 3
				PRINTFORMW 期待して目をうっとりさせ、嬉しそうに微笑んだ。
			ELSEIF ABL:targetChara:순종 == 3
				PRINTFORMW 、ああ、と絶望のうめきを漏らした。
			ELSEIF ABL:targetChara:욕망 == 3
				PRINTFORMW 、そんな、と泣きそうな表情を浮かべながら、しかし秘所を期待に湿らせていた。
			ELSE
				PRINTFORMW 、いやぁ、と涙を溢しながら首を振った。
			ENDIF

			CALL DIARY_SET,CALLNAME:slaveChara + "の손で" + NAME:targetChara + "に촉수の快楽を刻み込み、種を植え付けて굴복させた。"
			CFLAG:targetChara:2 = -750

			CFLAG:targetChara:1000 = 5
			TALENT:targetChara:기생 = 1
			TALENT:targetChara:경계 = 0
			SIF TALENT:targetChara:좋아하는사람있음 || TALENT:targetChara:남친있음 || TALENT:targetChara:남편있음
				TALENT:targetChara:ＮＴＬ = 1
		ENDIF
		DRAWLINE
	ENDIF
NEXT

@DAILY_TENTACLE
#DIM index
#DIM sealer
#DIM addPoint
FOR index,0,CHARANUM
	IF TALENT:index:정화 && !IS_UNCONTACTABLE(index)
		sealer = GETCHARA(CFLAG:index:1018)
		SIF sealer == -1
			CONTINUE
		IF sealer == 0 || IS_FALLEN(sealer)  ;0の可能性は、旧バージョンで정화が付与された場合
			IF sealer != 0 && !IS_UNCONTACTABLE(sealer)
				PRINTFORM %CALLNAME:sealer%에게、%CALLNAME:index%의 촉수の種子への封印を解除するよう
				SELECTCASE 1
					CASE IS_LOVING(sealer)
						PRINTFORMW 부탁하니、しぶしぶながら解除してくれた。
					CASE IS_SURRENDER(sealer)
						PRINTFORMW 命じると、最初は拒否していたが、強く命じると諦めたように解除の儀式を始めた。
					CASE IS_SEXMIND(sealer) || IS_TENTACLE(sealer)
						PRINTFORMW 命じると、ごくりと唾を飲み込み、すぐに解除の儀式を始めた。
					PRINTFORMW
					PRINTFORMW ････････････
					PRINTFORMW ････････
					PRINTFORMW ････
					PRINTFORMW
				ENDSELECT
				PRINTFORMW いつも通り支度をしていた%NAME:index%は、不意に体の中で何かがもぞり、と蠢くのを感じた。
				PRINTFORMW 異様な感触に目を見張り、ぺたりと力なく座り込む。
				PRINTFORMW その間にその何かはうぞうぞと蠢き続け、封印された鬱憤を晴らすかのように%CALLNAME:index%의 全身を陵辱し始めた。
				PRINTFORMW ････自身が촉수の玩具であることを%NAME:index%が思い出したのは、それからまもなくのことだった････
				DRAWLINE
			ENDIF
			TALENT:index:정화 = 0
			CFLAG:index:1018 = 0
		ENDIF
	ELSEIF TALENT:index:기생 && !IS_UNCONTACTABLE(index)
		addPoint = ABL:index:촉수중독 + CALC_CHARA_SINGLE_DATA("TALENT",index,"반항적,꿋꿋함,프라이드높음*2,고결*3,자제심,보수적,정조관념,억압,저항,영체*5,마술기능*10,헌신적*3,쾌감을부정*2,중독되기쉬움*3,영구발정*4,여우*6,요괴여우*8,수수께끼의매력*5,카리스마*7,Ｃ민감*2,Ｃ둔감*2,Ａ민감*2,Ａ둔감*2,Ｂ민감*2,Ｂ둔감*2,Ｖ민감*2,Ｖ둔감*2,흡혈귀*8,반인반요*5,동물귀*3,금단의지식*6,요마*7,음문*5,성직자*5,로봇소녀*-10,닌자*4")
		SIF TALENT:index:동화
			TIMES addPoint,1.5
		SIF TALENT:index:모판
			TIMES addPoint,2
		TENTACLE_MANA_POINT += addPoint
	ENDIF
NEXT

@TENTACLE_PLANT_ACTION()
#DIM targetChara
#DIM index = 0
#DIMS actionName
#DIM needPoint
#DIM actionCount = 0
targetChara = TARGET
PRINTFORML マナポイントを使用して、特別な効果を起こせます。

IF ITEM:촉수사역술 == 0
	TRYCALLFORM TENTACLE_PLANT_ACTION_MANA_POINT_M1()
	needPoint = RESULT
	PRINTFORML 촉수改造には촉수사역술の습득が必要です。
	PRINTFORML 습득しますか？(必要ポイント：{needPoint,5,RIGHT})
	IF TENTACLE_MANA_POINT < needPoint
		PRINTFORMW マナポイントが足りません。(現在のマナポイント：{TENTACLE_MANA_POINT})
		RETURN 0
	ENDIF
	PRINTFORML [0] - 습득する
	PRINTFORML [1] - 습득しない
	WHILE 1
		INPUT
		SELECTCASE RESULT
			CASE 0
				PRINTFORMW 촉수사역술を습득しました。
				ITEM:촉수사역술++
				BREAK
			CASE 1
				RETURN 0
			CASEELSE
				CONTINUE
		ENDSELECT
	WEND
ENDIF

IF targetChara < 0 || !TALENT:targetChara:기생
	targetChara = GET_RULED_SINGLE_CHARA("TALENT:index:기생 && !TALENT:index:정화")
	IF targetChara < 0
		PRINTFORMW 対象キャラがいません。
		RETURN 0
	ENDIF
ENDIF

WHILE 1
	index = 0
	PRINTFORML どんな改造をしますか？
	PRINTFORML 現在の改造対象 : %NAME:targetChara%
	PRINTFORML 現在のマナポイント : {TENTACLE_MANA_POINT}
	PRINTFORML

	RESULT = 0
	TRYCALLFORM TENTACLE_PLANT_ACTION_NAME_{index}(actionName)
	WHILE RESULT
		TRYCALLFORM TENTACLE_PLANT_ACTION_CHECK_{index}(targetChara)
		SIF RESULT == 0
			CONTINUE

		TRYCALLFORM TENTACLE_PLANT_ACTION_MANA_POINT_{index}()
		needPoint = RESULT

		IF needPoint == 0
			PRINTFORML [{index,2,RIGHT}] - %actionName,20,LEFT%
		ELSE
			PRINTFORML [{index,2,RIGHT}] - %actionName,20,LEFT%(必要ポイント：{needPoint,5,RIGHT})
		ENDIF

		index++
		RESULT = 0
		TRYCALLFORM TENTACLE_PLANT_ACTION_NAME_{index}(actionName)
	WEND
	PRINTFORML [99] - 돌아온다
	INPUT

	index = RESULT
	SIF RESULT == 99
		BREAK

	TRYCALLFORM TENTACLE_PLANT_ACTION_CHECK_{index}(targetChara)
	IF RESULT == 0
		PRINTFORMW 選択できません。
		CONTINUE
	ENDIF

	TRYCALLFORM TENTACLE_PLANT_ACTION_MANA_POINT_{index}()
	needPoint = RESULT
	IF TENTACLE_MANA_POINT < needPoint
		PRINTFORMW マナポイントが足りません。
		CONTINUE
	ENDIF

	TRYCALLFORM TENTACLE_PLANT_ACTION_DO_{index}(targetChara)
	IF RESULT != 0
		TENTACLE_MANA_POINT -= needPoint
	ENDIF
WEND
RETURN 0

@IS_FRIEND_TENTACLE_APPROCHING(targetChara)
#FUNCTION
#DIM targetChara
RETURNF (COUNT_RULED_CHARAS("CFLAG:index:1000 == 15 && CFLAG:index:1015 == " + TOSTR(NO:targetChara)) > 0)

repo_name: Catalyst/B

license: unknown