code:
@NIGHT_TOILET
;魔改造パッチフラグの確認
IF FLAG:95 >= 1
	CALL NT_DR_FIRST
	RETURN 0
ENDIF

;フラグの初期化
LOCAL = 0
REPEAT CHARANUM
	IF CFLAG:COUNT:12 == 4 && LOCAL < 6
		SIF COUNT == MASTER
			CONTINUE
		SIF IS_UNCONTACTABLE(COUNT)
			CONTINUE
		SIF !IS_TOILETTABLE(COUNT)
			CONTINUE
;체력一定以下で無視
		SIF BASE:COUNT:0 < 500
			CONTINUE
		LOCAL += 1
		SIF LOCAL == 1
			CALL TILET_PLACE
		CALL TOILET_RESULT,COUNT
	ENDIF
REND

@TOILET_RESULT, ARG
PRINTFORML %CALLNAME:ARG% (체력：{BASE:ARG:체력}、스트레스：{CFLAG:ARG:스트레스치}）
;変数初期化
C = 0
;ABL:순종をみる
IF ABL:ARG:0 == 0
	P = 0
ELSEIF ABL:ARG:0 == 1
	P = 1400
ELSEIF ABL:ARG:0 == 2
	P = 1800
ELSEIF ABL:ARG:0 == 3
	P = 2100
ELSEIF ABL:ARG:0 == 4
	P = 3000
ELSEIF ABL:ARG:0 == 5
	P = 4200
ELSEIF ABL:ARG:0 == 6
	P = 5000
ELSEIF ABL:ARG:0 == 7
	P = 6000
ELSEIF ABL:ARG:0 == 8
	P = 7000
ELSEIF ABL:ARG:0 == 9
	P = 9000
ELSE
	P = 10000
ENDIF
C += P

;ABL:욕망をみる
IF ABL:ARG:1 == 0
	P = 0
ELSEIF ABL:ARG:1 == 1
	P = 1000
ELSEIF ABL:ARG:1 == 2
	P = 1500
ELSEIF ABL:ARG:1 == 3
	P = 2000
ELSEIF ABL:ARG:1 == 4
	P = 2500
ELSEIF ABL:ARG:1 == 5
	P = 3000
ELSEIF ABL:ARG:1 == 6
	P = 3800
ELSEIF ABL:ARG:1 == 7
	P = 4600
ELSEIF ABL:ARG:1 == 8
	P = 5500
ELSEIF ABL:ARG:1 == 9
	P = 6000
ELSE
	P = 8000
ENDIF
C += P

;애널好きの客
;ABL:Ａ감각をみる
IF ABL:ARG:5 == 0
	P = 0
ELSEIF ABL:ARG:5 == 1
	P = 600
ELSEIF ABL:ARG:5 == 2
	P = 1000
ELSEIF ABL:ARG:5 == 3
	P = 1500
ELSEIF ABL:ARG:5 == 4
	P = 2000
ELSEIF ABL:ARG:5 == 5
	P = 2600
ELSEIF ABL:ARG:5 == 6
	P = 3300
ELSEIF ABL:ARG:5 == 7
	P = 4000
ELSEIF ABL:ARG:5 == 8
	P = 4700
ELSEIF ABL:ARG:5 == 9
	P = 5400
ELSE
	P = 6200
ENDIF
C += P

;ABL:Ｖ감각をみる
IF ABL:ARG:4 == 0
	P = 0
ELSEIF ABL:ARG:4 == 1
	P = 700
ELSEIF ABL:ARG:4 == 2
	P = 1200
ELSEIF ABL:ARG:4 == 3
	P = 1700
ELSEIF ABL:ARG:4 == 4
	P = 2300
ELSEIF ABL:ARG:4 == 5
	P = 2900
ELSEIF ABL:ARG:4 == 6
	P = 3600
ELSEIF ABL:ARG:4 == 7
	P = 4300
ELSEIF ABL:ARG:4 == 8
	P = 5100
ELSEIF ABL:ARG:4 == 9
	P = 5800
ELSE
	P = 6700
ENDIF
C += P

;ABL:정액中毒をみる
IF ABL:ARG:16 == 0
	P = 0
ELSEIF ABL:ARG:16 == 1
	P = 500
ELSEIF ABL:ARG:16 == 2
	P = 700
ELSEIF ABL:ARG:16 == 3
	P = 1000
ELSEIF ABL:ARG:16 == 4
	P = 1300
ELSEIF ABL:ARG:16 == 5
	P = 1700
ELSEIF ABL:ARG:16 == 6
	P = 2100
ELSEIF ABL:ARG:16 == 7
	P = 2500
ELSEIF ABL:ARG:16 == 8
	P = 2900
ELSEIF ABL:ARG:16 == 9
	P = 3400
ELSE
	P = 4000
ENDIF
C += P
S = C
;陥落素質
;연모
IF TALENT:ARG:3
	S *= 8
	S /= 10
	PRINTFORM 　%TALENTNAME:3% －20％
;복종
ELSEIF TALENT:ARG:5
	S *= 15
	S /= 10
	PRINTFORM 　%TALENTNAME:5% ＋50％
;친애
ELSEIF TALENT:ARG:6
	S *= 6
	S /= 10
	PRINTFORM 　%TALENTNAME:6% －40％
;창녀
ELSEIF TALENT:ARG:7
	S *= 180
	S /= 100
	PRINTFORM 　%TALENTNAME:7% ＋80％
;예속
ELSEIF TALENT:ARG:8
	S *= 2
	PRINTFORM 　%TALENTNAME:8% ＋100％
ELSEIF TALENT:ARG:동화
	S *= 3
	S /= 3
	PRINTFORM 　동화 ＋50％
ELSEIF TALENT:ARG:모판
	S *= 2
	PRINTFORM 　모판 ＋100％
ELSE
	S *= 7
	S /= 10
	PRINTFORM 　미함락 -30％
ENDIF

IF TALENT:ARG:처녀 == 1
;最初の一人しかメリットないから倍率低め
	S *= 12
	S /= 10
	PRINTFORML 、%TALENTNAME:0% +20％
ENDIF
IF TALENT:ARG:인기 == 1
	S *= 3
	S /= 2
	PRINTFORM 、%TALENTNAME:295% +50％
ENDIF

IF TALENT:ARG:수수께끼의매력 == 1
	S *= 3
	S /= 2
	PRINTFORM 、%TALENTNAME:214% +50％
ENDIF
IF TALENT:ARG:논외 == 1
	S /= 100
	PRINTFORM 、논외 -99％
ENDIF

;붕괴,광기,임신は報酬をかなり低くする（순종에 의해 、80％まで回復）
IF TALENT:ARG:붕괴 || TALENT:ARG:광기 || TALENT:ARG:임신
	PRINTL
		IF TALENT:ARG:붕괴
			S *= ABL:ARG:0
			TIMES S , 0.08
			Z = ABL:ARG:0
			Z *= 8
			PRINTFORM 　%TALENTNAME:9% ×{Z}％
		ELSEIF TALENT:ARG:광기
			S *= ABL:ARG:0
			TIMES S , 0.08
			Z = ABL:ARG:0
			Z *= 8
			PRINTFORM 　%TALENTNAME:291% ×{Z}％
		ELSEIF TALENT:ARG:임신
			S *= ABL:ARG:0
			TIMES S , 0.08
			Z = ABL:ARG:0
			Z *= 8
			PRINTFORM 　%TALENTNAME:303% ×{Z}％
		ENDIF
ENDIF
PRINTL
PRINTL 　피임할 방법을  선택해주세요
PRINTL 　　[0]   - 피임하지 않는다
SIF MONEY > 500
	PRINTFORML 　　[1]   - 콘돔($500）
PRINTL 　　[100] -   오늘은 쉬게 한다
$INPUT_LOOP_2
INPUT
IF RESULT == 0
	V = 1
ELSEIF RESULT == 1 && MONEY > 500
	MONEY -= 500
;피임による修正
	TIMES S , 0.8
	PRINTFORML 피임 ×80％
	V = 2
ELSEIF RESULT == 100
	RETURN 0
ELSE
	GOTO INPUT_LOOP_2
ENDIF
;난이도処理
;EASY
IF FLAG:4 == 1
	PRINTFORML 난이도:EASY ×120％
	TIMES S , 1.20
;NORMAL
ELSEIF FLAG:4 == 2
	TIMES S , 1.00
;HARD
ELSEIF FLAG:4 == 3
	PRINTFORML 난이도:HARD ×80％
	TIMES S , 0.80
ENDIF
;報酬額調整
TIMES S , 0.5
;公衆便所プレイを実行するか？
IF S > 0
	PRINTFORML 이익은 ${S} 정도를 올릴 수 있습니다
ELSE
	PRINTFORMW 이익을 기대할 수 없어서 중지합니다
	RETURN 0
ENDIF
PRINTL

;実行処理
;체력の감소
BASE:ARG:0 -= 500
;스트레스値の付加
D = GET_PROSTITUTION_STRESS(0 ,ARG)*3/2
C = S / 1000

CALL TOILET_MESSAGE,ARG

;経験その他
;노예が처녀の場合
IF TALENT:ARG:0
	PRINTFORML 처녀상실
	PRINTFORML %EXPNAME:50%＋2
	EXP:ARG:50 += 2
	TALENT:ARG:0 = 0
	;체력の감소
	BASE:ARG:0 -= 500
	;스트레스値の付加
	D *= 2
ELSEIF TALENT:ARG:1
	PRINTFORML 재생처녀상실
	TALENT:ARG:1 = 0
	;체력の감소
	BASE:ARG:0 -= 250
	;스트레스値の付加
	D *= 3
	D /= 2
ENDIF

IF C > 1
	IF EXP:ARG:42 == 0
		PRINTL 첫 윤간：이상경험＋1
		EXP:ARG:50 += 1
	ENDIF
	EXP:ARG:42 += 1
	PRINTFORML 피윤간경험＋1
ENDIF

;펠라경험
IF B != 3
	PRINTFORML %EXPNAME:22%＋{1 + C / 2}
	EXP:ARG:22 += 1 + C / 2
ENDIF

;V経験
PRINTFORML %EXPNAME:0%＋{C}
EXP:ARG:0 += C
;A経験
EXP:ARG:1 += C / 2
PRINTFORML %EXPNAME:1%＋{C / 2}
;성교경험
EXP:ARG:4 += C + C / 2
PRINTFORML %EXPNAME:4%＋{C + C / 2}

;절정경험
IF ABL:ARG:Ｖ감각 >= 3 && ABL:ARG:Ａ감각 >= 3
	EXP:ARG:2 += C / 2 + C / 4
	PRINTFORML %EXPNAME:2%＋{C / 2 + C / 4}
ELSEIF ABL:ARG:Ｖ감각 >= 3
	EXP:2 += C / 2
	PRINTFORML %EXPNAME:2%＋{C / 2}
ELSEIF ABL:ARG:Ａ감각 >= 3
	EXP:ARG:2 += C / 4
	PRINTFORML %EXPNAME:2%＋{C / 4}
ENDIF

;정액경험
IF B == 3
	PRINTFORML %EXPNAME:20%＋{C + C / 2}
	EXP:ARG:20 += C + C / 2
ELSE
	PRINTFORML %EXPNAME:20%＋{1 + C / 2 + C + C / 2}
	EXP:ARG:20 += 1 + C / 2 + C + C / 2
ENDIF

;콘돔なし
IF V == 1
	EXP:ARG:5 += C
	CFLAG:ARG:105 += C
	PRINTFORML %EXPNAME:5%＋{C}
	D += 2
ENDIF

;입上呼び出し順を変更してみる
;CALL TOILET_MESSAGE,ARG

;협박中
IF CFLAG:ARG:117 == 3
	PRINTFORML ……？:×50％
	S /= 2
ENDIF

MONEY += S
PRINTFORML 보수로 %조사처리({S},"를")% 얻었다.

;公衆便所売上記録
CFLAG:ARG:182 += S

;タレントによる스트레스への補正
;미함락は스트레스急上昇
SIF TALENT:ARG:연모 == 0 && !IS_FALLEN(ARG)
	D += 3
SIF TALENT:ARG:음란 == 1
	D -= 1
SIF TALENT:ARG:복종 == 1 || TALENT:ARG:예속 == 1
	D -= 1
SIF TALENT:ARG:창녀 == 1
	D -= 2
SIF TALENT:ARG:동화 == 1 || TALENT:ARG:모판 == 1
	D -= 1
SIF TALENT:ARG:반항적 == 1
	D += 1
SIF TALENT:ARG:프라이드높음 == 1
	D += 1
SIF TALENT:ARG:프라이드낮음 == 1
	D -= 1
SIF TALENT:ARG:보수적 == 1
	D += 1
SIF TALENT:ARG:낙관적 == 1
	D -= 1
SIF TALENT:ARG:비관적 == 1
	D += 1
SIF TALENT:ARG:정조관념 == 1
	D += 1
SIF TALENT:ARG:정조무관심 == 1
	D -= 1
SIF TALENT:ARG:쾌감에솔직 == 1
	D -= 1
SIF TALENT:ARG:쾌감을부정 == 1
	D += 1
SIF TALENT:ARG:감정부족 == 1
	D -= 1
SIF TALENT:ARG:인간혐오 == 1
	D += 1
SIF TALENT:ARG:고결 == 1
	D += 1
SIF TALENT:ARG:성악 == 1
	D -= 1
SIF TALENT:ARG:결벽성 == 1
	D += 1
SIF TALENT:ARG:레이프소망 == 1
	D -= 1
SIF TALENT:ARG:걸레녀 == 1
	D -= 2
SIF TALENT:ARG:영구발정 == 1
	D -= 2
SIF D <= 0
	D = 1

IF EXP:ARG:57 == 0
	PRINTFORML 첫 매춘：%EXPNAME:50%＋1
	EXP:ARG:50 += 1
ENDIF
EXP:ARG:57 += 1
PRINTFORML %EXPNAME:57%＋1

;정신의존による軽減
D = MAX(0, D - ABL:ARG:정신의존)

;스트레스値の付加
CFLAG:ARG:10 += D
PRINTFORML 스트레스＋{D}

;스트레스値100이상で붕괴を得る
IF CFLAG:ARG:10 >= 100 && TALENT:ARG:9 == 0
	;肉便器で【붕괴】を得た場合のイベント
	PRINTFORMW %CALLNAME:ARG%의 모습이 이상하다
	PRINTFORMW 육변기로 취급되는 것을 견디지 못하고 %CALLNAME:ARG%의 정신에 이상이 생긴 것 같다
	PRINTFORMW %조사처리(NAME:ARG,"은")% 【붕괴】해버렸다
	PRINTFORML
		TALENT:ARG:붕괴 = 1
;붕괴による素質の変化をコメントアウト
;	IF TALENT:RESULT:3 || TALENT:RESULT:4 || TALENT:RESULT:5 || TALENT:RESULT:6 || TALENT:RESULT:7 || TALENT:RESULT:8
;		PRINTFORM %CALLNAME:RESULT%は[
;		SIF TALENT:RESULT:3
;			PRINTS TALENTNAME:3
;		SIF TALENT:RESULT:4
;			PRINTS TALENTNAME:4
;		SIF TALENT:RESULT:5
;			PRINTS TALENTNAME:5
;		SIF TALENT:RESULT:6
;			PRINTS TALENTNAME:6
;		SIF TALENT:RESULT:7
;			PRINTS TALENTNAME:7
;		SIF TALENT:RESULT:8
;			PRINTS TALENTNAME:8
;		PRINTW ]を失った
;		SIF TALENT:RESULT:3
;			TALENT:RESULT:3 = 0
;		SIF TALENT:RESULT:4
;			TALENT:RESULT:4 = 0
;		SIF TALENT:RESULT:5
;			TALENT:RESULT:5 = 0
;		SIF TALENT:RESULT:6
;			TALENT:RESULT:6 = 0
;		SIF TALENT:RESULT:7
;			TALENT:RESULT:7 = 0
;		SIF TALENT:RESULT:8
;			TALENT:RESULT:8 = 0
;	ENDIF

	;;붕괴による素質の変化
	;CALL EVENT_CHANGE_TALENT_HOUKAI

	CALL DIARY_SET,"肉便器と扱われることに耐えられず、"+NAME:ARG+"の精神が壊れてしまった。"
ENDIF

PRINTW
DRAWLINE

@TILET_PLACE
PRINTL 공중변소플레이를 행할 장소를  선택해주세요
PRINTL [0]   - 사용하지 않는 교실
PRINTL [1]   - 痴漢バス
PRINTL [2]   - 치한전철
PRINTL [3]   - 壁尻部屋

DRAWLINE
$INPUT_LOOP
INPUT
IF RESULT == 0
	B = 0
ELSEIF RESULT == 1
	B = 1
ELSEIF RESULT == 2
	B = 2
ELSEIF RESULT == 3
	B = 3
ELSE
	GOTO INPUT_LOOP
ENDIF

@TOILET_MESSAGE,ARG
;イベント입上の표시
T = TARGET
TARGET = ARG
TFLAG:13 = 22
CALL KOJO_MESSAGE_EVENT
TARGET = T
PRINTW

;☆☆☆これ以降、魔改造パッチ側処理☆☆☆

;＠魔改造パッチ初期処理ルーチン
@NT_DR_FIRST
;■■■フラグ・変数の初期化・EVENT_NIGHT.ERB側の変数保管
D = 0
J = 0

;使用変数の増加により、プレイ処理後通常売春など後処理工程に影響を及ぼさないための処置
;それぞれ3桁までの数値なら一時保管可能
;（4桁이상の数字が適用された場合復元に影響がでるため、保管処理・復元処理ともに修正が必須）

D += V			;Dに元変数【V】の値を代入
D += W * 1000		;Dに元変数【W】の値を1000倍して加算
J += X			;Jに元変数【X】の値を代入
J += Y * 1000		;Jに元変数【Y】の値を1000倍にして加算
J += Z * 1000000	;Jに元変数【Z】の値を1000000倍にして加算

CALL NT_DR_INIT		;保管後に各変数の初期化を実行

;■■■대상者呼び出し
REPEAT CHARANUM
	IF CFLAG:COUNT:12 == 4 && LOCAL < 6	;公衆便所プレイ指定のある대상者を呼び出し
		SIF COUNT == MASTER		;それが【あなた】の場合は除外
			CONTINUE
		SIF BASE:COUNT:0 <= 500		;また、체력が500以下の캐릭터も除外
			CONTINUE
		SIF FLAG:96 == 0 && TALENT:COUNT:290
			CONTINUE
		SIF IS_UNCONTACTABLE(COUNT)
			CONTINUE
		SIF !IS_TOILETTABLE(COUNT)
			CONTINUE
		CALL NT_DR_PLACE,COUNT		;シチュエーション選択に処理を移行（ループはしない）
		CALL NT_DR_LEVEL_CORRECTION,COUNT
						;能力補正ルーチンに処理を移行
		CALL NT_DR_MARK_CORRECTION,COUNT;각인補正ルーチンに処理を移行
		CALL NT_DR_CAP_CORRECTION,COUNT	;素質補正ルーチンに処理を移行
		CALL NT_DR_MARK_REPELLENCE_CORRECTION,COUNT
						;반발각인補正ルーチンに処理を移行
		CALL NT_DR_RESULT,COUNT		;算入・표시ルーチンに処理を移行
	ENDIF
REND

;＠フラグ・変数初期化ルーチン（兼フラグ・変数の使用目的一覧）
@NT_DR_INIT
A = 0		;①A経験			②
B = 0		;①プレイシチュエーションフラグ	②반발각인付加フラグ
C = 0		;①C経験			②
;D = 0		;①外部変数保管1（クリアしない）
E = 0		;①절정経験			②
F = 0		;①펠라경험			②
G = 0		;①레즈경험（女）		②게이경험（男）
H = 0		;①봉사쾌락경험			②
I = 0		;①성교경험			②
;J = 0		;①外部変数保管2（クリアしない）
K = 0		;①고통쾌락경험			②
L = 0		;①정액経験（女／ゲイ）		②
M = 0		;①プレイモードフラグ		②
N = 0		;①				②
O = 0		;①性別判定			②
P = 0		;①補正値（PARAMETER）		②終了復元処理
Q = 0		;①報酬				②
R = 0		;①補正処理フラグ		②첫 매춘フラグ
S = 0		;①스트레스値			②
T = 0		;①補正値（TOTAL）		②조교대상者一時保管
U = 0		;①				②
V = 0		;①V経験（女）			②사정経験（男）
W = 0		;①B経験			②분유経験（모유체질）
X = 0		;①각인プロセスフラグ		②피임判定フラグ
Y = 0		;①				②
Z = 0		;なぜか캐릭터番号が入るために使用できず

;＠シチュエーション選択
@NT_DR_PLACE,ARG
;■■■대상者の名称표시
T = TARGET				;現在の조교대상者を変数に一時退避
TARGET = ARG				;대상を公衆便所プレイ대상者に変更
DRAWLINE
PRINTFORML 대상者【%NAME:TARGET%】
TARGET = T				;プレイ대상者を표시後、一時退避させた조교대상者を復元

;■■■プレイシチュエーション選択
PRINTL 공중변소플레이를 행할 장소를  선택해주세요
IF TALENT:ARG:290			;대상者が【남자】を持っている場合
	O = 1				;Oに1を代入
ELSE					;持っていない（女性の）場合
	O = 0				;Oに0を代入
ENDIF
DRAWLINE
IF O == 0				;女노예の場合、下記を표시し
	PRINTL [0]   - 사용하지 않는 교실
	PRINTL [1]   - 전세낸 치한버스
	PRINTL [2]   - 전세낸 치한전철
	IF FLAG:96 == 1 || FLAG:96 == 3 || FLAG:96 == 4
					;レズプレイフラグがたっていれば下記を追加표시
		DRAWLINE
		PRINTL [10]   - 백합의 화원
		PRINTL [11]   - 전세낸 백합버스
		PRINTL [12]   - 전세낸 백합전철
	ENDIF
ENDIF
IF O == 1				;男노예で痴女追加フラグがたっている場合
	IF FLAG:96 == 1 || FLAG:96 == 3 || FLAG:96 == 4
		PRINTL [20]   - 여자탈의실
		PRINTL [21]   - 전세낸 치녀버스
		PRINTL [22]   - 전세낸 치녀전철
	ENDIF
	IF FLAG:96 >= 2 && FLAG:96 <= 4
		DRAWLINE
		PRINTL [30]   - 장미의 화원
		PRINTL [31]   - 전세낸 장미버스
		PRINTL [32]   - 전세낸 장미전철
	ENDIF
ENDIF
IF BASE:ARG:0 >= 1000 && FLAG:96 == 4
	DRAWLINE
	PRINTL [40]   - 난교교실
	PRINTL [41]   - 전세낸 난교버스
	PRINTL [42]   - 전세낸 난교전철
ENDIF
DRAWLINE
$INPUT_LOOP
INPUT
IF RESULT == 0
	B = 0
ELSEIF RESULT == 1
	B = 1000
ELSEIF RESULT == 2
	B = 2000
ELSEIF RESULT == 10
	B = 10000
ELSEIF RESULT == 11
	B = 11000
ELSEIF RESULT == 12
	B = 12000
ELSEIF RESULT == 20
	B = 20000
ELSEIF RESULT == 21
	B = 21000
ELSEIF RESULT == 22
	B = 22000
ELSEIF RESULT == 30
	B = 30000
ELSEIF RESULT == 31
	B = 31000
ELSEIF RESULT == 32
	B = 32000
ELSEIF RESULT == 40
	B = 40000
ELSEIF RESULT == 41
	B = 41000
ELSEIF RESULT == 42
	B = 42000
ELSE
	GOTO INPUT_LOOP
ENDIF
M = B / 10000

;デバッグ用표시1
;PRINTFORMW プレイ표시【B:{B}】【M:{M}】

;＠캐릭터素質補正ルーチン
@NT_DR_CAP_CORRECTION,ARG

;■■■各種素質補正値設定
;----------陥落素質による補正
IF TALENT:ARG:음란 == 1
	Q = 1
	S -= 1
	E += 100
	V += 100
ELSEIF TALENT:ARG:창녀 == 1
	Q = 2
	S -= 2
	E += 200
	V += 100
ELSEIF TALENT:ARG:복종 == 1
	Q = 3
	H += 100
	K += 100
ELSEIF TALENT:ARG:예속 == 1
	Q = 4
	S -= 1
	H += 200
	K += 200
ELSEIF TALENT:ARG:동화 == 1
	Q = 5
	S -= 1
	H += 75
	K += 200
ELSEIF TALENT:ARG:모판 == 1
	Q = 6
	S -= 1
	H += 100
	K += 100
ELSE
	B += 3
	Q = 0
ENDIF

;----------性格素質による補正
IF TALENT:ARG:겁쟁이 == 1
	S += 1
	F += 100
	K -= 100
ENDIF

IF TALENT:ARG:반항적 == 1
	B += 2
	S += 1
	F -= 300
	V -= 200
ENDIF

IF TALENT:ARG:솔직 == 1
	E += 100
	F += 200
ENDIF

IF TALENT:ARG:얌전함 == 1
	F += 100
	H += 100
ENDIF

IF TALENT:ARG:프라이드높음 == 1
	B += 1
	S += 1
	H -= 200
	K += 100
ENDIF

IF TALENT:ARG:건방짐 == 1
	F -= 200
	H -= 200
ENDIF

IF TALENT:ARG:프라이드낮음 == 1
	S -= 1
	F += 100
	H += 100
ENDIF

IF TALENT:ARG:츤데레 == 1
	H += 200
	K -= 200
ENDIF

IF TALENT:ARG:감정풍부 == 1
	H += 300
	K += 200
ENDIF

IF TALENT:ARG:감정부족 == 1
	S -= 1
	H -= 300
	K -= 200
ENDIF

IF TALENT:ARG:사교적 == 1
	E += 100
	F += 200
ENDIF

IF TALENT:ARG:내향적 == 1
	S += 1
	F += 100
	K += 100
ENDIF

IF TALENT:ARG:인간혐오 == 1
	S += 1
	F -= 200
	H -= 200
ENDIF

IF TALENT:ARG:고결 == 1
	S += 1
	F -= 200
	H -= 200
ENDIF

IF TALENT:ARG:성악 == 1
	S -= 1
	V += 100
	W += 100
ENDIF
;----------性への関心素質による補正
IF TALENT:ARG:자제심 == 1
	E -= 300
	K -= 100
ENDIF

IF TALENT:ARG:무관심 == 1
	H -= 200
	K -= 200
ENDIF

IF TALENT:ARG:호기심 == 1
	A += 100
	F += 100
ENDIF

IF TALENT:ARG:보수적 == 1
	B += 1
	F -= 300
	V -= 200
ENDIF

IF TALENT:ARG:낙관적 == 1
	S -= 1
	F += 200
	H += 100
ENDIF

IF TALENT:ARG:비관적 == 1
	S += 1
	H -= 200
	K += 300
ENDIF

IF TALENT:ARG:일선을넘지않음 == 1
	B += 2
	S += 2
	A -= 300
	V -= 300
ENDIF

IF TALENT:ARG:눈에띄고싶어함 == 1
	S -= 1
	E += 100
	F += 100
ENDIF

IF TALENT:ARG:충동적 == 1
	C += 100
	V += 100
ENDIF

IF TALENT:ARG:결벽성 == 1
	S += 1
	H -= 200
	K += 300
ENDIF
;----------乙女心素質による補正
IF TALENT:ARG:정조관념 == 1
	B += 2
	S += 1
	F -= 100
	V -= 300
ENDIF

IF TALENT:ARG:정조무관심 == 1
	S -= 1
	E += 200
ENDIF

IF TALENT:ARG:억압 == 1
	B += 1
	S += 1
	H -= 200
	K -= 300
ENDIF

IF TALENT:ARG:해방 == 1
	S -= 1
	E += 100
	H += 100
ENDIF

IF TALENT:ARG:저항 == 1
	B += 2
	S += 1
	A -= 300
	V -= 300
ENDIF

IF TALENT:ARG:부끄럼쟁이 == 1
	E += 100
	F -= 100
ENDIF

IF TALENT:ARG:수치심없음 == 1
	E -= 100
	F += 100
ENDIF

;【약점】は除外

IF TALENT:ARG:굴복 == 1
	F += 100
	V += 100
ENDIF

IF TALENT:ARG:Ｂ열등감 == 1
	W -= 300
	C += 100
ENDIF

IF TALENT:ARG:반하기쉬움 == 1
	F += 100
	H += 100
ENDIF

IF TALENT:ARG:철벽 == 1
	F -= 300
	H -= 300
ENDIF
;----------体質素質による補正

IF TALENT:ARG:아픔에약함 == 1
	H -= 100
	K += 300
ENDIF

IF TALENT:ARG:아픔에강함 == 1
	H += 100
	K -= 300
ENDIF

IF TALENT:ARG:젖기쉬움 == 1
	A += 100
	V += 100
ENDIF

IF TALENT:ARG:젖기어려움 == 1
	A -= 100
	V -= 200
ENDIF

;【영체】【유연한신체】は除外

IF TALENT:ARG:흡정 == 1
	F += 200
	V += 200
ENDIF
;----------技術素質による補正
IF TALENT:ARG:습득빠름 == 1
	A += 100
	F += 100
ENDIF

IF TALENT:ARG:습득느림 == 1
	A -= 100
	F -= 200
ENDIF

IF TALENT:ARG:혀놀림 == 1
	F += 100
	H += 200
ENDIF

;【바늘다루기】【고양이혀】【薬物耐性】【오줌싸개버릇】【도구지식】【ＳＭ지식】【마술기능】は除外

IF TALENT:ARG:교섭술 == 1
	C += 100
	W += 100
	F += 200
ENDIF

;----------潔癖度素質による補正
;【자위하기쉬움】は除外

IF TALENT:ARG:악취둔감 == 1
	A += 100
	F += 100
ENDIF

IF TALENT:ARG:악취민감 == 1
	A -= 200
	F -= 200
ENDIF

IF TALENT:ARG:헌신적 == 1
	F += 100
	H += 200
ENDIF

;【더러움무시】は除外

IF TALENT:ARG:레이프소망 == 1
	S -= 1
	A += 100
	V += 200
ENDIF

IF TALENT:ARG:Ａ거부 == 1
	A -= 300
	F += 200
ENDIF

IF TALENT:ARG:키스좋아함 == 1
	F += 100
	H += 100
ENDIF

IF TALENT:ARG:걸레녀 == 1
	S -= 1
	V += 300
	E += 200
ENDIF

IF TALENT:ARG:거절 == 1
	H -= 200
	K += 100
ENDIF
;----------正直度素質による補正
IF TALENT:ARG:쾌감에솔직 == 1
	E += 300
	H += 100
ENDIF

IF TALENT:ARG:쾌감을부정 == 1
	E -= 200
	H -= 200
ENDIF

;【중독되기쉬움】は別算出（珠取得モードで使用予定）
;【즉각함락】は除外

IF TALENT:ARG:음핵 == 1
	C += 200
	IF M <= 1
		W += 100
	ENDIF
ENDIF

IF TALENT:ARG:음호 == 1
	E += 300
	V += 300
	SIF M == 1 || M == 3
		G += 100
ENDIF

IF TALENT:ARG:음항 == 1
	A += 200
	E += 200
ENDIF

IF TALENT:ARG:음유 == 1 && M <= 1
	E += 100
	W += 200
ENDIF

IF TALENT:ARG:영구발정
	S -= 1
	E += 400
	H += 200
ENDIF

;----------性愛性素質による補正
IF TALENT:ARG:도착적 == 1
	H += 100
	K += 100
	SIF M == 1 || M == 3
		G += 100
ENDIF

IF TALENT:ARG:바이 == 1
	H += 100
	SIF M == 1 || M == 3
		G += 2000
ENDIF

IF TALENT:ARG:남성혐오 == 1
	IF M == 0
		B += 2
		F -= 300
		V -= 300
	ELSEIF M == 3
		B += 2
		G -= 300
		A -= 300
		F -= 300
	ENDIF
ENDIF

;【새드】は除外

IF TALENT:ARG:마조 == 1
	S -= 2
	F += 200
	K += 200
ENDIF

;【질투】は除外

IF TALENT:ARG:망신 == 1
	S -= 1
	A += 100
	V += 100
ENDIF

IF TALENT:ARG:소악마 == 1
	A += 100
	V += 100
ENDIF

IF TALENT:ARG:여성혐오 == 1
	IF M == 1
		B += 2
		G -= 300
		E -= 300
		V -= 300
	ELSEIF M == 2
		B += 2
		A -= 300
		E -= 300
	ENDIF
ENDIF

;【공주님소망】は除外

;魅了素質について【여우】【요괴여우】は除外
;【수수께끼의매력】については別算出

;----------身体特徴素質による補正
IF TALENT:ARG:작은체형 == 1
	S += 1
	K += 100
	V -= 100
ENDIF

IF TALENT:ARG:Ｃ둔감 == 1
	C -= 100
	E -= 100
ENDIF

IF TALENT:ARG:Ｃ민감 == 1
	C += 100
	E += 200
ENDIF

IF TALENT:ARG:Ｖ둔감 == 1
	E -= 100
	V -= 100
ENDIF

IF TALENT:ARG:Ｖ민감 == 1
	E += 200
	V += 100
ENDIF

IF TALENT:ARG:Ａ둔감 == 1
	A -= 100
	E -= 100
ENDIF

IF TALENT:ARG:Ａ민감 == 1
	A += 100
	E += 200
ENDIF

IF TALENT:ARG:Ｂ둔감 == 1
	E -= 100
	W -= 100
ENDIF

IF TALENT:ARG:Ｂ민감 == 1
	E += 200
	W += 100
ENDIF

IF O == 1
	W += 0
ELSEIF TALENT:ARG:빈유
	W += 100
ELSEIF TALENT:ARG:절벽
	W += 200
ELSEIF TALENT:ARG:거유
	W -= 100
ELSEIF TALENT:ARG:폭유
	W -= 200
ENDIF

;----------특수素質による補正
;【후타나리】以外の특수素質は除外
;ただし、【회복빠름】【회복느림】【인기】は別算出

;現状、후타나리での性行為（사정など）には未対応

IF TALENT:ARG:후타나리 == 1
	IF M == 1
		C += 200
		G += 200
	ENDIF
ENDIF

;＠캐릭터能力補正ルーチン
@NT_DR_LEVEL_CORRECTION,ARG
;■■■各経験別補正基本値設定
;----------V経験／사정経験補正
P = 0
R = 1					;処理変数を1に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
V = T					;대상者が女노예の場合はV経験に、男노예の場合は사정経験に設定

;----------A経験補正
P = 0
R = 2					;処理変数を2に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
A = T					;A経験に設定

;----------절정経験補正
P = 0
R = 3					;処理変数を3に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
E = T					;절정経験に設定

;----------정액経験補正
P = 0
R = 4					;処理変数を4に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
L = T					;정액経験に設定

;----------봉사쾌락경험補正
P = 0
R = 5					;処理変数を5に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
H = T					;봉사쾌락경험に設定

;----------펠라경험補正
P = 0
R = 6					;処理変数を6に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
F = T					;펠라경험に設定

;----------고통쾌락경험補正
P = 0
R = 7					;処理変数を7に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
K = T					;고통쾌락경험に設定

;----------레즈경험／게이경험補正
P = 0
R = 8					;処理変数を8に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
G = T					;대상者が女노예の場合は레즈경험に、男노예の場合は게이경험に設定

;----------분유경험／B経験補正
P = 0
R = 9					;処理変数を9に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
W = T					;분유経験兼B経験に設定

;----------C経験補正
P = 0
R = 10					;処理変数を10に設定
CALL NT_DR_LEVEL_PROCESS,ARG		;能力別処理ルーチンに処理を移行
C = T					;C経験に設定

;デバッグ用표시2
;PRINTL 【レベル補正値】
;IF O == 1
;	PRINTFORML 【사정値：{V}】【A値：{A}】【절정値：{E}】【정액値：{L}】
;	PRINTFORML 【奉仕快楽値：{H}】【フェラ値：{F}】【고통快楽値：{K}】
;	PRINTFORML 【ゲイ値：{G}】【B値：{W}】【C値：{C}】
;ELSE
;	PRINTFORML 【V値：{V}】【A値：{A}】【절정値：{E}】【정액値：{L}】
;	PRINTFORML 【奉仕快楽値：{H}】【フェラ値：{F}】【고통快楽値：{K}】
;	PRINTFORML 【レズ値：{G}】【B値：{W}】【C値：{C}】
;ENDIF

;＠能力別処理ルーチン
@NT_DR_LEVEL_PROCESS,ARG
;■■■各能力別レベル補正
;----------순종レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 50		;補正基本値は50
		SIF M == 0		;男相손の場合
			P = 50		;補正基本値は50
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 50		;補正基本値は50
		SIF M == 2		;女相손の場合
			P = 50		;補正基本値は50
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 50		;補正基本値は50
		SIF M == 0		;男相손の場合
			P = 50		;補正基本値は50
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 80		;補正基本値は80
		SIF M == 2		;女相손の場合
			P = 80		;補正基本値は80
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 100		;補正基本値は100
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 100		;補正基本値は100
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 50		;補正基本値は50
		SIF M == 2		;女相손の場合
			P = 50		;補正基本値は50
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 50		;補正基本値は50
		SIF M == 0		;男相손の場合
			P = 50		;補正基本値は50
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 20		;補正基本値は20
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 30		;補正基本値は30
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ENDIF
P *= ABL:ARG:0				;補正基本値×保有レベルの値を算出
T = P

;----------욕망レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 60		;補正基本値は60
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 80		;補正基本値は80
		SIF M == 0		;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 70		;補正基本値は70
		SIF M == 2		;女相손の場合
			P = 70		;補正基本値は70
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 80		;補正基本値は80
		SIF M == 0		;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 160		;補正基本値は160
		SIF M == 2		;女相손の場合
			P = 160		;補正基本値は160
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 160		;補正基本値は160
		SIF M == 0		;男相손の場合
			P = 160		;補正基本値は160
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 60		;補正基本値は60
		SIF M == 0		;男相손の場合
			P = 60		;補正基本値は60
	ENDIF
ENDIF
P *= ABL:ARG:1				;補正基本値×保有レベルの値を算出
T += P

;----------기교レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 20		;補正基本値は20
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:2				;補正基本値×保有レベルの値を算出
T += P

;----------C감각レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 120		;補正基本値は120
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 20		;補正基本値は20
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 200		;補正基本値は200
		SIF M == 2		;女相손の場合
			P = 200		;補正基本値は200
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 200		;補正基本値は200
		SIF M == 0		;男相손の場合
			P = 200		;補正基本値は200
	ENDIF
ENDIF
P *= ABL:ARG:3				;補正基本値×保有レベルの値を算出
T += P

;----------V感깨우침レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 180		;補正基本値は180
		SIF M == 0		;男相손の場合
			P = 180		;補正基本値は180
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 100		;補正基本値は100
		SIF M == 0		;男相손の場合
			P = 100		;補正基本値は100
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 120		;補正基本値は120
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:4				;補正基本値×保有レベルの値を算出
T += P

;----------A感깨우침レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 160		;補正基本値は160
		SIF M == 2		;女相손の場合
			P = 160		;補正基本値は160
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 180		;補正基本値は180
		SIF M == 0		;男相손の場合
			P = 180		;補正基本値は180
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 100		;補正基本値は100
		SIF M == 2		;女相손の場合
			P = 100		;補正基本値は100
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 60		;補正基本値は60
		SIF M == 0		;男相손の場合
			P = 60		;補正基本値は60
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 60		;補正基本値は60
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:5				;補正基本値×保有レベルの値を算出
T += P

;----------B感깨우침レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 200		;補正基本値は200
		SIF M == 2		;女相손の場合
			P = 200		;補正基本値は200
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 200		;補正基本値は200
		SIF M == 0		;男相손の場合
			P = 200		;補正基本値は200
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:6				;補正基本値×保有レベルの値を算出
T += P

;----------봉사정신レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 60		;補正基本値は60
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 120		;補正基本値は120
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 140		;補正基本値は140
		SIF M == 0		;男相손の場合
			P = 140		;補正基本値は140
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 80		;補正基本値は80
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 80		;補正基本値は80
		SIF M == 2		;女相손の場合
			P = 80		;補正基本値は80
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 80		;補正基本値は80
		SIF M == 0		;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 10		;補正基本値は10
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 10		;補正基本値は10
	ENDIF
ENDIF
P *= ABL:ARG:7				;補正基本値×保有レベルの値を算出
T += P

;----------노출증レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 10		;補正基本値は10
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 20		;補正基本値は20
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ENDIF
P *= ABL:ARG:8				;補正基本値×保有レベルの値を算出
T += P

;----------마조끼レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 20		;補正基本値は20
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 30		;補正基本値は30
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 10		;補正基本値は10
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 10		;補正基本値は10
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 120		;補正基本値は120
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 140		;補正基本値は140
		SIF M == 0		;男相손の場合
			P = 140		;補正基本値は140
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 80		;補正基本値は80
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 120		;補正基本値は120
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 160		;補正基本値は160
		SIF M == 0		;男相손の場合
			P = 160		;補正基本値は160
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 30		;補正基本値は30
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 40		;補正基本値は40
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ENDIF
P *= ABL:ARG:9				;補正基本値×保有レベルの値を算出
T += P

;새드끼レベルは補正から除外

;----------레즈끼レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 120		;補正基本値は120
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:11				;補正基本値×保有レベルの値を算出
T += P

;요리기능～가창기능レベルは補正から除外

;----------자위중독レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 10		;補正基本値は10
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 10		;補正基本値は10
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 30		;補正基本値は30
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 60		;補正基本値は60
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 60		;補正基本値は60
		SIF M == 0		;男相손の場合
			P = 60		;補正基本値は60
	ENDIF
ENDIF
P *= ABL:ARG:15				;補正基本値×保有レベルの値を算出
T += P

;----------정액中毒レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 60		;補正基本値は60
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 20		;補正基本値は20
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 10		;補正基本値は10
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 10		;補正基本値は10
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 120		;補正基本値は120
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 80		;補正基本値は80
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 100		;補正基本値は100
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 80		;補正基本値は80
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 60		;補正基本値は60
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:16				;補正基本値×保有レベルの値を算出
T += P

;----------레즈중독レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 120		;補正基本値は120
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:17				;補正基本値×保有レベルの値を算出
T += P

;----------섹스중독レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 100		;補正基本値は100
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 80		;補正基本値は80
		SIF M == 0		;男相손の場合
			P = 100		;補正基本値は100
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 70		;補正基本値は70
		SIF M == 2		;女相손の場合
			P = 130		;補正基本値は130
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 80		;補正基本値は80
		SIF M == 0		;男相손の場合
			P = 100		;補正基本値は100
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 50		;補正基本値は50
		SIF M == 2		;女相손の場合
			P = 70		;補正基本値は70
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 60		;補正基本値は60
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 60		;補正基本値は60
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 60		;補正基本値は60
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 20		;補正基本値は20
		SIF M == 0		;男相손の場合
			P = 20		;補正基本値は20
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 40		;補正基本値は40
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 90		;補正基本値は90
		SIF M == 2		;女相손の場合
			P = 130		;補正基本値は130
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 10		;補正基本値は10
		SIF M == 0		;男相손の場合
			P = 70		;補正基本値は70
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 100		;補正基本値は100
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 40		;補正基本値は40
		SIF M == 0		;男相손の場合
			P = 80		;補正基本値は80
	ENDIF
ENDIF
P *= ABL:ARG:18				;補正基本値×保有レベルの値を算出
T += P

;----------분유中毒レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 30		;補正基本値は30
		SIF M == 0		;男相손の場合
			P = 30		;補正基本値は30
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 0		;補正基本値は0
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:19				;補正基本値×保有レベルの値を算出
T += P

;----------호모끼レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:20				;補正基本値×保有レベルの値を算出
T += P

;----------게이중독レベル補正
IF R == 1				;処理変数値が1（V経験／사정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 2				;処理変数値が2（A経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 3				;処理変数値が3（절정경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 10		;補正基本値は10
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 4				;処理変数値が4（정액경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 5				;処理変数値が5（봉사쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 6				;処理変数値が6（펠라경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1		;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0 || M == 4	;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 7				;処理変数値が7（고통쾌락경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 20		;補正基本値は20
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 8				;処理変数値が8（레즈경험／게이경험）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 120		;補正基本値は120
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 9				;処理変数値が9（분유경험／B経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 30		;補正基本値は30
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ELSEIF R == 10				;処理変数値が10（C経験）の場合
	IF O == 1			;대상者が男노예で
		SIF M == 3 || M == 4	;ゲイプレイの場合
			P = 40		;補正基本値は40
		SIF M == 2		;女相손の場合
			P = 0		;補正基本値は0
	ELSE				;대상者が女노예で
		SIF M == 1 || M == 4	;レズプレイの場合
			P = 0		;補正基本値は0
		SIF M == 0		;男相손の場合
			P = 0		;補正基本値は0
	ENDIF
ENDIF
P *= ABL:ARG:20				;補正基本値×保有レベルの値を算出
T += P

;＠각인補正ルーチン
@NT_DR_MARK_CORRECTION,ARG
;■■■実行前処理
;変数부족のため、強引な補正基準値設定処理を実施
;補正値を10000倍し、5桁目이상を基準値として設定
V *= 10000
A *= 10000
E *= 10000
L *= 10000
H *= 10000
F *= 10000
K *= 10000
G *= 10000
W *= 10000
C *= 10000

;■■■각종 각인보정치 설정
;고통・快楽・굴복의 각 각인을 통한 보정은 합계 100％가 되도록 설정
;ex.A経験の場合、고통=20％、快楽=50％、굴복=30％로 합계 100％가 된다

;----------고통각인による補正
X = 0					;각인プロセスに【고통】を選択

;●V経験：能力基準値の10％／사정경험：同10％が대상
T = V / 10000				;基準値を抽出
TIMES T , 0.1				;基準値の0.1倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
V += T					;結果をV経験変数に加算

;●A経験：能力補正値の20％が대상
T = A / 10000				;基準値を抽出
TIMES T , 0.2				;基準値の0.2倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
A += T					;結果をA経験変数に加算

;●절정경험：能力補正値の20％が대상
T = E / 10000				;基準値を抽出
TIMES T , 0.2				;基準値の0.2倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
E += T					;結果を절정経験変数に加算

;●정액경험：能力補正値の10％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = L / 10000		;基準値を抽出
		TIMES T , 0.1		;基準値の0.1倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		L += T			;結果を정액経験変数に加算
	ELSE				;女相손の場合
		L += 0			;0を정액経験変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 0 || M == 4		;男相손の場合
		T = L / 10000		;基準値を抽出
		TIMES T , 0.1		;基準値の0.1倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		L += T			;結果を정액経験変数に加算
	ELSE				;レズプレイの場合
		L += 0			;0を정액経験変数に加算
	ENDIF
ENDIF

;●봉사쾌락경험：能力補正値の10％が대상
T = H / 10000				;基準値を抽出
TIMES T , 0.1				;基準値の0.1倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
H += T					;結果を봉사쾌락경험変数に加算

;●펠라경험：能力補正値の10％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = F / 10000		;基準値を抽出
		TIMES T , 0.1		;基準値の0.1倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		F += T			;結果を펠라경험変数に加算
	ELSE				;女相손の場合
		F += 0			;0を펠라경험変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 0 || M == 4		;男相손の場合
		T = F / 10000		;基準値を抽出
		TIMES T , 0.1		;基準値の0.1倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		F += T			;結果を펠라경험変数に加算
	ELSE				;レズプレイの場合
		F += 0			;0を펠라경험変数に加算
	ENDIF
ENDIF

;●고통쾌락경험：能力補正値の70％が대상
T = K / 10000				;基準値を抽出
TIMES T , 0.7				;基準値の0.7倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
K += T					;結果を고통쾌락경험変数に加算

;●레즈경험：能力補正値の20％／게이경험：同20％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = G / 10000		;基準値を抽出
		TIMES T , 0.2		;基準値の0.2倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		G += T			;結果を게이경험変数に加算
	ELSE				;女相손の場合
		G += 0			;0を게이경험変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 1 || M == 4		;レズプレイの場合
		T = G / 10000		;基準値を抽出
		TIMES T , 0.2		;基準値の0.2倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		G += T			;結果を레즈경험変数に加算
	ELSE				;男相손の場合
		G += 0			;0を레즈경험変数に加算
	ENDIF
ENDIF

;●B経験：能力補正値の10％／분유경험：同20％が대상
IF TALENT:ARG:299			;대상者が【모유체질】の場合
	T = W / 10000			;基準値を抽出
	TIMES T , 0.2			;基準値の0.2倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	W += T				;結果を분유経験変数に加算
ELSE					;それ以外の場合
	T = W / 10000			;基準値を抽出
	TIMES T , 0.1			;基準値の0.1倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	W += T				;結果をB経験変数に加算
ENDIF
;●C経験：能力補正値の10％が대상
T = C / 10000				;基準値を抽出
TIMES T , 0.1				;基準値の0.1倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
C += T					;結果をC経験変数に加算

;----------쾌락각인による補正
X = 1					;각인プロセスに【快楽】を選択

;●V経験：能力基準値の70％／사정경험：同60％が대상
IF O == 1				;대상者が男노예の場合
	T = V / 10000			;基準値を抽出
	TIMES T , 0.6			;基準値の0.6倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	V += T				;結果を사정経験変数に加算
ELSE					;대상者が女노예の場合
	T = V / 10000			;基準値を抽出
	TIMES T , 0.7			;基準値の0.7倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	V += T				;結果をV経験変数に加算
ENDIF

;●A経験：能力補正値の50％が대상
T = A / 10000				;基準値を抽出
TIMES T , 0.5				;基準値の0.5倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
A += T					;結果をA経験変数に加算

;●절정경험：能力補正値の70％が대상
T = E / 10000				;基準値を抽出
TIMES T , 0.7				;基準値の0.7倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
E += T					;結果を절정経験変数に加算

;●정액경험：能力補正値の50％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = L / 10000		;基準値を抽出
		TIMES T , 0.5		;基準値の0.5倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		L += T			;結果を정액経験変数に加算
	ELSE				;女相손の場合
		L += 0			;0を정액経験変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 0 || M == 4		;男相손の場合
		T = L / 10000		;基準値を抽出
		TIMES T , 0.5		;基準値の0.5倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		L += T			;結果を정액経験変数に加算
	ELSE				;レズプレイの場合
		L += 0			;0を정액経験変数に加算
	ENDIF
ENDIF

;●봉사쾌락경험：能力補正値の40％が대상
T = H / 10000				;基準値を抽出
TIMES T , 0.4				;基準値の0.4倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
H += T					;結果を봉사쾌락경험変数に加算

;●펠라경험：能力補正値の30％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = F / 10000		;基準値を抽出
		TIMES T , 0.3		;基準値の0.3倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		F += T			;結果を펠라경험変数に加算
	ELSE				;女相손の場合
		F += 0			;0を펠라경험変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 0 || M == 4		;男相손の場合
		T = F / 10000		;基準値を抽出
		TIMES T , 0.3		;基準値の0.3倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		F += T			;結果を펠라경험変数に加算
	ELSE				;レズプレイの場合
		F += 0			;0を펠라경험変数に加算
	ENDIF
ENDIF

;●고통쾌락경험：能力補正値の20％が대상
T = K / 10000				;基準値を抽出
TIMES T , 0.2				;基準値の0.2倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
K += T					;結果を고통쾌락경험変数に加算

;●레즈경험：能力補正値の40％／게이경험：同40％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = G / 10000		;基準値を抽出
		TIMES T , 0.4		;基準値の0.4倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		G += T			;結果を게이경험変数に加算
	ELSE				;女相손の場合
		G += 0			;0を게이경험変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 1 || M == 4		;レズプレイの場合
		T = G / 10000		;基準値を抽出
		TIMES T , 0.4		;基準値の0.4倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		G += T			;結果を레즈경험変数に加算
	ELSE				;男相손の場合
		G += 0			;0を레즈경험変数に加算
	ENDIF
ENDIF

;●B経験：能力補正値の60％／분유경험：同50％が대상
IF TALENT:ARG:299			;대상者が【모유체질】の場合
	T = W / 10000			;基準値を抽出
	TIMES T , 0.5			;基準値の0.5倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	W += T				;結果を분유経験変数に加算
ELSE					;それ以外の場合
	T = W / 10000			;基準値を抽出
	TIMES T , 0.6			;基準値の0.6倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	W += T				;結果をB経験変数に加算
ENDIF

;●C経験：能力補正値の60％が대상
T = C / 10000				;基準値を抽出
TIMES T , 0.6				;基準値の0.6倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
C += T					;結果をC経験変数に加算

;----------굴복각인による補正
X = 2					;각인プロセスに【굴복】を選択

;●V経験：能力基準値の20％／사정경험：同30％が대상
IF O == 1				;대상者が男노예の場合
	T = V / 10000			;基準値を抽出
	TIMES T , 0.3			;基準値の0.3倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	V += T				;結果を사정経験変数に加算
ELSE					;대상者が女노예の場合
	T = V / 10000			;基準値を抽出
	TIMES T , 0.2			;基準値の0.2倍を算出
	CALL NT_DR_MARK_PROCESS,ARG	;각인処理ルーチンに移行
	V += T				;結果をV経験変数に加算
ENDIF

;●A経験：能力補正値の30％が대상
T = A / 10000				;基準値を抽出
TIMES T , 0.3				;基準値の0.3倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
A += T					;結果をA経験変数に加算

;●절정경험：能力補正値の10％が대상
T = E / 10000				;基準値を抽出
TIMES T , 0.1				;基準値の0.1倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
E += T					;結果を절정経験変数に加算

;●정액경험：能力補正値の40％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = L / 10000		;基準値を抽出
		TIMES T , 0.4		;基準値の0.4倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		L += T			;結果を정액経験変数に加算
	ELSE				;女相손の場合
		L += 0			;0を정액経験変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 0 || M == 4		;男相손の場合
		T = L / 10000		;基準値を抽出
		TIMES T , 0.4		;基準値の0.4倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		L += T			;結果を정액経験変数に加算
	ELSE				;レズプレイの場合
		L += 0			;0を정액経験変数に加算
	ENDIF
ENDIF

;●봉사쾌락경험：能力補正値の50％が대상
T = H / 10000				;基準値を抽出
TIMES T , 0.5				;基準値の0.5倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
H += T					;結果を봉사쾌락경험変数に加算

;●펠라경험：能力補正値の60％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = F / 10000		;基準値を抽出
		TIMES T , 0.6		;基準値の0.6倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		F += T			;結果を펠라경험変数に加算
	ELSE				;女相손の場合
		F += 0			;0を펠라경험変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 0 || M == 4		;男相손の場合
		T = F / 10000		;基準値を抽出
		TIMES T , 0.6		;基準値の0.6倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		F += T			;結果を펠라경험変数に加算
	ELSE				;レズプレイの場合
		F += 0			;0を펠라경험変数に加算
	ENDIF
ENDIF

;●고통쾌락경험：能力補正値の10％が대상
T = K / 10000				;基準値を抽出
TIMES T , 0.1				;基準値の0.1倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
K += T					;結果を고통쾌락경험変数に加算

;●레즈경험：能力補正値の40％／게이경험：同40％が대상
IF O == 1				;대상자가 남자 노예인 한편
	IF M == 3 || M == 4		;ゲイプレイの場合
		T = G / 10000		;基準値を抽出
		TIMES T , 0.4		;基準値の0.4倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		G += T			;結果を게이경험変数に加算
	ELSE				;女相손の場合
		G += 0			;0を게이경험変数に加算
	ENDIF
ELSE					;대상者が女노예또한
	IF M == 1 || M == 4		;レズプレイの場合
		T = G / 10000		;基準値を抽出
		TIMES T , 0.4		;基準値の0.4倍を算出
		CALL NT_DR_MARK_PROCESS,ARG
					;각인処理ルーチンに移行
		G += T			;結果を레즈경험変数に加算
	ELSE				;男相손の場合
		G += 0			;0を레즈경험変数に加算
	ENDIF
ENDIF

;●B経験：能力補正値の30％／분유경험：同30％が대상
T = W / 10000				;基準値を抽出
TIMES T , 0.3				;基準値の0.3倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
W += T					;結果をB経験変数に加算

;●C経験：能力補正値の30％が대상
T = C / 10000				;基準値を抽出
TIMES T , 0.3				;基準値の0.3倍を算出
CALL NT_DR_MARK_PROCESS,ARG		;각인処理ルーチンに移行
C += T					;結果をC経験変数に加算

;■■■実行後処理
;基準値とした5桁이상の数値は不要のため、切捨て処理
V %= 10000
A %= 10000
E %= 10000
L %= 10000
H %= 10000
F %= 10000
K %= 10000
G %= 10000
W %= 10000
C %= 10000

;＠반발각인補正ルーチン
@NT_DR_MARK_REPELLENCE_CORRECTION,ARG
;----------반발각인による補正
;他の각인と異なり、각인ありだと減算補正となる
;●V経験／사정経験補正
T = V					;女노예はV経験、男노예は사정経験
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
V = T					;각인補正を終了して経験値を確定

;●A経験補正
T = A
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
A = T					;각인補正を終了して経験値を確定

;●절정経験補正
T = E
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
E = T					;각인補正を終了して経験値を確定

;●정액経験補正
T = L
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
L = T					;각인補正を終了して経験値を確定

;●봉사쾌락경험補正
T = H
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
H = T					;각인補正を終了して経験値を確定

;●펠라경험補正
T = F
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
F = T					;각인補正を終了して経験値を確定

;●고통쾌락경험補正
T = K
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
K = T					;각인補正を終了して経験値を確定

;●レズ／게이경험補正
T = G
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
G = T					;각인補正を終了して経験値を確定

;●분유경험／B経験補正
T = W
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
W = T					;각인補正を終了して経験値を確定

;●C経験補正
T = C
CALL NT_DR_MARK_REPELLENCE_PROCESS,ARG	;반발각인処理ルーチンに移行
C = T					;각인補正を終了して経験値を確定

;デバッグ用표시3
;IF O == 1
;	PRINTFORML 性別：男／プレイ内容：{M}
;	PRINTFORML 【사정경험：{V}】【A経験：{A}】【절정경험：{E}】【정액경험：{L}】
;	PRINTFORML 【봉사쾌락경험：{H}】【펠라경험：{F}】【고통쾌락경험：{K}】
;	PRINTFORML 【게이경험：{G}】【B経験：{W}】【C経験：{C}】
;ELSE
;	PRINTFORML 性別：女／プレイ内容：{M}
;	PRINTFORML 【V経験：{V}】【A経験：{A}】【절정경험：{E}】【정액경험：{L}】
;	PRINTFORML 【봉사쾌락경험：{H}】【펠라경험：{F}】【고통쾌락경험：{K}】
;	PRINTFORML 【레즈경험：{G}】【분유／B経験：{W}】【C経験：{C}】
;ENDIF

;＠각인補正処理ルーチン（同じ処理を何度も繰り返す必要があるため、ルーチン化）
;■■■고통・快楽・굴복각인処理
@NT_DR_MARK_PROCESS,ARG
;각인プロセス（Xの値）が0なら고통、1なら快楽、2なら굴복を処理

IF MARK:ARG:X == 0		;각인が0の場合、대상補正値を「25％」に
	TIMES T , 0.25
ELSEIF MARK:ARG:X == 1		;각인が1の場合、대상補正値を「50％」に
	TIMES T , 0.5
ELSEIF MARK:ARG:X == 2		;각인が2の場合、대상補正値を「75％」に
	TIMES T , 0.75
ENDIF				;각인が3の場合、대상補正値を100％に

;■■■반발각인処理
@NT_DR_MARK_REPELLENCE_PROCESS,ARG
IF T > 0			;補正値の±を判定し、プラスの場合
	IF MARK:ARG:3 == 3	;반발각인が3の場合、대상補正値を10％に
		TIMES T , 0.1
	ELSEIF MARK:ARG:3 == 2	;반발각인が2の場合、대상補正値を30％に
		TIMES T , 0.3
		B += 2
	ELSEIF MARK:ARG:3 == 1	;반발각인が1の場合、대상補正値を50％に
		TIMES T , 0.5
		B += 1
	ENDIF			;반발각인が0の場合、대상補正値を100％に

ELSEIF T < 0			;補正値がマイナスの場合
	IF MARK:ARG:3 == 3	;반발각인が3の場合、대상補正値を300％に
		TIMES T , 3.0
	ELSEIF MARK:ARG:3 == 2	;반발각인が2の場合、대상補正値を200％に
		TIMES T , 2.0
		B += 4
	ELSEIF MARK:ARG:3 == 1	;반발각인が1の場合、대상補正値を150％に
		TIMES T , 1.5
		B += 3
	ENDIF			;반발각인が0の場合、대상補正値を100％に

ENDIF				;補正値が0の場合、반발각인補正を行わない

;＠算入・표시ルーチン
@NT_DR_RESULT,ARG
;■■■報酬設定処理
P = V * 4				;行為に対する報酬の割合はV経験「4」に対し
P += A * 3				;A経験は「3」
P += F * 2				;펠라경험は「2」となるように設定

TIMES P , 0.625				;既存報酬と同程度にするため、「62.5%」で算出

SIF P <= 0				;マイナスになる可能性があるため±判定を行い
	P = 0				;マイナスなら報酬なしとする

;----------陥落素質による補正
IF Q == 1				;【음란】だと報酬が30％増
	TIMES P , 1.3
	PRINTFORML %TALENTNAME:4% ＋30％
ELSEIF Q == 2				;【창녀】だと報酬が50％増
	TIMES P , 1.5
	PRINTFORML %TALENTNAME:7% ＋50％
ELSEIF Q == 3				;【복종】だと報酬が50％増
	TIMES P , 1.5
	PRINTFORML %TALENTNAME:5% ＋50％
ELSEIF Q == 4				;【예속】だと報酬が100％増
	TIMES P , 2.0
	PRINTFORML %TALENTNAME:8% ＋100％
ELSEIF Q == 4				;【동화】だと報酬が20％増
	TIMES P , 1.2
	PRINTFORML 동화 ＋100％
ELSEIF Q == 4				;【모판】だと報酬が50％増
	TIMES P , 1.5
	PRINTFORML 모판 ＋100％
ELSE					;미함락だと報酬が30％減
	TIMES P , 0.7
	PRINTFORML 미함락 -30％
ENDIF
Q = P
;----------その他スキルなどによる補正
IF TALENT:ARG:처녀			;【처녀】は最初の一人のみのメリットなので倍率低め（20％増）
	TIMES Q , 1.2
	PRINTFORML %TALENTNAME:0% +20％
ENDIF
IF TALENT:ARG:교섭술			;【교섭술】は倍率低め（20％増）
	TIMES Q , 1.2
	PRINTFORML %TALENTNAME:0% +20％
ENDIF
					;【인기】と【수수께끼의매력】をともに保有している場合
IF TALENT:ARG:인기 && TALENT:ARG:수수께끼의매력
	TIMES Q , 2.0			;報酬を100％増に
	PRINTFORML %TALENTNAME:295%＋%TALENTNAME:214% +100％
ELSEIF TALENT:ARG:인기			;【인기】のみ保有している場合、報酬が20％増に
	TIMES Q , 1.2
	PRINTFORML %TALENTNAME:295% +20％
ELSEIF TALENT:ARG:수수께끼의매력		;【수수께끼의매력】のみ保有している場合、報酬が50％増に
	TIMES Q , 1.5
	PRINTFORML %TALENTNAME:214% +50％
ENDIF
;----------붕괴,광기,임신による補正（순종レベル에 의해 、最大80％まで回復）
IF TALENT:ARG:붕괴 || TALENT:ARG:광기 || TALENT:ARG:임신
					;【임신】【광기】【붕괴】の順に素質保有確認を行い
					;上記項目のどれかにヒットすれば適用され、重複はしない
PRINTL
	IF TALENT:ARG:붕괴			;【붕괴】を持っている場合
		Q *= ABL:ARG:0		;報酬に対し【순종】レベル数を乗算
		TIMES Q , 0.08		;上記補正の8％分が報酬となる
		P = ABL:ARG:0		;【순종】レベルを見て
		P *= 8			;それに8を乗算したものを【붕괴】の報酬減額割合として표시
		PRINTFORML %TALENTNAME:9% ×{P}％

	ELSEIF TALENT:ARG:광기		;【광기】を持っている場合
		Q *= ABL:ARG:0		;報酬に対し【순종】レベル数を乗算
		TIMES Q , 0.08		;上記補正の8％分が報酬となる
		P = ABL:ARG:0		;【순종】レベルを見て
		P *= 8			;それに8を乗算したものを【광기】の報酬減額割合として표시
		PRINTFORML %TALENTNAME:291% ×{P}％

	ELSEIF TALENT:ARG:임신		;【임신】を持っている場合
		Q *= ABL:ARG:0		;報酬に対し【순종】レベル数を乗算
		TIMES Q , 0.08		;上記補正の8％分が報酬となる
		P = ABL:ARG:0		;【순종】レベルを見て
		P *= 8			;それに8を乗算したものを【임신】の報酬減額割合として표시
		PRINTFORML %TALENTNAME:303% ×{P}％
	ENDIF
PRINTL
ENDIF

;----------난이도による補正
IF FLAG:4 == 1				;난이도を確認し、EASYなら
	PRINTFORML 난이도:EASY ×120％
	TIMES Q , 1.20			;報酬を1.2倍に

ELSEIF FLAG:4 == 3			;HARDなら
	PRINTFORML 난이도:HARD ×80％
	TIMES Q , 0.80			;報酬を0.8倍に

ENDIF					;NORMALなら보수는 そのまま

;----------プレイ内容による補正
IF M == 4				;乱交プレイの場合
	PRINTL 乱交プレイ補正: ×150％
	TIMES Q , 1.5			;報酬を1.5倍に
	B += 1
ENDIF

;■■■피임関連処理
IF O == 1 || M == 1			;대상자가 남자노예 아니면 레즈플레이인 경우
	IF Q > 0			;報酬の有無を判定し
		PRINTFORML 이익은 ${Q} 정도를 올릴 수 있습니다
	ELSE				;報酬がない場合
		PRINTFORMW 이익을 기대할 수 없어서 중지합니다
		CALL NT_DR_INIT		;フラグ・変数を初期化
		CALL BACK_NTDR_EVENT_NIGHT
					;復元処理に移行
		RETURN 0
	ENDIF
	PRINTL 플레이를 실행시킵니까?？
	PRINTL [0]   - 실행한다
	PRINTL [100]   - 실행시키지 않는다
	$INPUT_LOOP_2
	INPUT
	IF RESULT == 0			;プレイさせる場合
		X = 1			;임신はありえないので피임フラグをたてる
	ELSEIF RESULT == 100		;プレイを취소する場合
		CALL NT_DR_INIT		;フラグ・変数を初期化
		CALL BACK_NTDR_EVENT_NIGHT
					;復元処理に移行
		RETURN 0
	ELSE
		GOTO INPUT_LOOP_2
	ENDIF
ELSEIF CFLAG:ARG:108			;대상者が女노예또한피임결계を使用している場合
	IF Q > 0			;報酬の有無を判定し
		PRINTFORML 이익은 ${Q} 정도를 올릴 수 있습니다
	ELSE				;報酬がない場合
		PRINTFORMW 이익을 기대할 수 없어서 중지합니다
		CALL NT_DR_INIT		;フラグ・変数を初期化
		CALL BACK_NTDR_EVENT_NIGHT
					;復元処理に移行
		RETURN 0
	ENDIF
	PRINTL
	PRINTL <자궁내피임결계>사용 중
	PRINTL
	PRINTL 어떤 플레이를 시킵니까？
	PRINTL [0]   - 질내사정 플레이
	PRINTL [1]   - 질외사정 플레이
	PRINTL [100]   - 실행시키지 않는다
	$INPUT_LOOP_3
	INPUT
	IF RESULT == 0			;질내사정 플레이をさせる場合
		X = 0			;피임フラグをたおす
		B += 2
	ELSEIF RESULT == 1		;질외사정 플레이をさせる場合
		X = 1			;피임フラグをたてる
		B += 1
	ELSEIF RESULT == 100		;プレイを취소する場合
		CALL NT_DR_INIT		;フラグ・変数を初期化
		CALL BACK_NTDR_EVENT_NIGHT
					;復元処理に移行
		RETURN 0
	ELSE
		GOTO INPUT_LOOP_3
	ENDIF
ELSE					;上記以外の場合
	IF Q > 0			;報酬の有無を判定し
		PRINTFORML 이익은 ${Q} 정도를 올릴 수 있습니다
	ELSE				;報酬がない場合
		PRINTFORMW 이익을 기대할 수 없어서 중지합니다
		CALL NT_DR_INIT		;フラグ・変数を初期化
		CALL BACK_NTDR_EVENT_NIGHT
					;復元処理に移行
		RETURN 0
	ENDIF
	PRINTL 피임할 방법을  선택해주세요
	PRINTL [0]   - 피임하지 않는다
	SIF MONEY > 500			;保有金額が500이상の場合、콘돔使用選択を표시
		PRINTFORML [1]   - 콘돔($500）
	PRINTL [100] -   실행시키지 않는다
	$INPUT_LOOP_4
	INPUT
	IF RESULT == 0			;콘돔을 使用しない場合
		X = 0			;피임フラグをたてない
		B += 3
	ELSEIF RESULT == 1 && MONEY > 500
					;콘돔使用を選択および保有金額500이상の場合
		MONEY -= 500		;소지금から500を減算
		TIMES Q , 0.8		;콘돔使用により、報酬を0.8倍に
		PRINTFORML 피임 ×80％
		X = 1			;피임フラグをたてる
		B += 1
	ELSEIF RESULT == 100		;プレイを취소する場合
		CALL NT_DR_INIT		;フラグ・変数を初期化
		CALL BACK_NTDR_EVENT_NIGHT
					;復元処理に移行
		RETURN 0
	ELSE
		GOTO INPUT_LOOP_4
	ENDIF
ENDIF

;■■■実行処理
;----------체력の減算処理
IF TALENT:ARG:회복빠름 == 1			;【회복빠름】を保有している場合
	BASE:ARG:0 -= 400		;체력消耗値を「400」に
ELSEIF TALENT:ARG:회복느림 == 1		;【회복느림】を保有している場合
	BASE:ARG:0 -= 600		;체력消耗値を「600」に
ELSE					;それ以外の場合は
	BASE:ARG:0 -= 500		;체력消耗値を「500」に設定
ENDIF

;----------스트레스基準値設定
S += 8					;基準値「8」を設定

;----------처녀判定
IF TALENT:ARG:0				;노예が【처녀】の場合
	EXP:ARG:50 += 2			;이상경험を2、経験算入
	TALENT:ARG:0 = 0		;처녀상실処理を行い
	BASE:ARG:0 -= 500		;체력を「500」追加消耗
					;【음란】【복종】状態の場合は
	IF TALENT:ARG:4 == 1 || TALENT:ARG:5 == 1
		TIMES S , 1.5		;스트레스가 1.5倍に
		B += 2
					;【창녀】【예속】状態の場合は
	ELSEIF TALENT:ARG:7 == 1 || TALENT:ARG:8 == 1
		TIMES S , 1.2		;스트레스가 1.2倍に
		B += 1
	ELSEIF TALENT:ARG:동화 == 1 || TALENT:ARG:모판 == 1
		TIMES S , 1.3		;스트레스가 1.3倍に
		B += 1
	ELSEIF MARK:ARG:3 >= 1		;陥落素質なし또한반발각인が1이상で
		IF ABL:ARG:0 >= 3	;【순종】レベルが3이상なら
			TIMES S , 6.0	;스트레스가 6倍に
			B += 4
		ELSE			;【순종】レベル2以下の場合
			TIMES S , 10.0 	;스트레스가 10倍に
			B += 5
		ENDIF
	ELSE				;上記以外の場合
		TIMES S , 2.0		;스트레스가 2倍になる
		B += 3
	ENDIF
	PRINTFORML 처녀상실
	PRINTFORML %EXPNAME:50%＋2
ELSEIF TALENT:ARG:1			;【재생처녀】の場合
	TALENT:ARG:1 = 0		;재생처녀상실処理を行い
	BASE:ARG:0 -= 250		;체력を「250」追加消耗
	B += 2
	TIMES S , 1.5			;스트레스を1.5倍に
	PRINTFORML 재생처녀상실
ENDIF

;----------乱交プレイ実施判定
IF M == 4				;乱交プレイが選択されている場合
	BASE:ARG:0 = 500		;結果如何にかかわらず、체력は500に固定
	TIMES S , 1.5			;스트레스가 1.5倍に
	B += 1
ENDIF

;----------V経験・사정経験算出
V /= 100				;補正後の値を「100」で除算
IF V > 0 && M == 4			;V／사정経験があり또한乱交プレイの場合
	TIMES V , 1.2			;経験を1.2倍に
ELSEIF V <= 0				;V経験がない場合
	V = 0				;経験を0に固定
ENDIF
IF O == 1				;대상者が男노예の場合
	EXP:ARG:3 += V			;사정経験として経験算入
ELSE					;대상者が女노예の場合
	EXP:ARG:0 += V			;V経験として経験算入
ENDIF

;----------A経験算出
A /= 100				;補正後の値を「100」で除算
IF A > 0 && M == 4			;A経験があり또한乱交プレイの場合
	TIMES A , 1.2			;経験を1.2倍に
ELSEIF A <= 0				;A経験がない場合
	A = 0				;経験を0に固定
ENDIF
EXP:ARG:1 += A				;A経験として経験算入

;----------절정経験算出
E /= 100				;補正後の値を「100」で除算
IF E > 0 && M == 4			;절정経験があり또한乱交プレイの場合
	TIMES E , 1.2			;経験を1.2倍に
ELSEIF E <= 0				;절정経験がない場合
	E = 0				;経験を0に固定
ENDIF
EXP:ARG:2 += E				;절정経験として経験算入

;----------성교경험算出
I = V + A				;女노예ならV経験+A経験、男노예ならA経験+사정経験が성교경험となる
SIF I <= 0				;行為の有無を判定し
	I = 0				;ないなら0に固定
EXP:ARG:4 += I				;성교경험として経験算入

;----------질사경험算出
IF  V > 0 && X == 0			;V経験があり피임フラグがたおれており
	IF CFLAG:ARG:108		;피임결계を使用している場合
		EXP:ARG:5 += V		;V経験と同数を経験算入
	ELSE				;피임결계を使用していない場合
		EXP:ARG:5 += V		;V経験と同数を経験算入
		CFLAG:ARG:105 += V	;さらに娼館客による中出し経験を算入
		P = V
		TIMES P , 0.05
		S += P			;질사경험5％分の스트레스を加算（膣射20回で스트레스+1）
	ENDIF
ENDIF

;----------정액経験算出
L /= 100				;補正後の値を「100」で除算
IF L > 0 && M == 4			;정액経験があり또한乱交プレイの場合
	TIMES L , 1.2			;経験を1.2倍に
ELSEIF L <= 0				;정액経験がない場合
	L = 0				;経験を0に固定
ENDIF
EXP:ARG:20 += L				;정액経験として経験算入

;----------봉사쾌락경험算出
H /= 100				;補正後の値を「100」で除算
IF H > 0 && M == 4			;봉사쾌락경험があり또한乱交プレイの場合
	TIMES H , 1.2			;経験を1.2倍に
ELSEIF H <= 0				;봉사쾌락경험がない場合
	H = 0				;経験を0に固定
ENDIF
EXP:ARG:21 += H				;봉사쾌락경험として経験算入

;----------펠라경험算出
F /= 100				;補正後の値を「100」で除算
IF F > 0 && M == 4			;펠라경험があり또한乱交プレイの場合
	TIMES F , 1.2			;経験を1.2倍に
ELSEIF F <= 0				;펠라경험がない場合
	F = 0				;経験を0に固定
ENDIF
EXP:ARG:22 += F				;펠라경험として経験算入

;----------고통쾌락경험算出
K /= 100				;補正後の値を「100」で除算
IF K > 0 && M == 4			;고통쾌락경험があり또한乱交プレイの場合
	TIMES K , 1.2			;経験を1.2倍に
ELSEIF K <= 0				;고통쾌락경험がない場合
	K = 0				;経験を0に固定
ENDIF
EXP:ARG:30 += K				;고통쾌락경험として経験算入

;----------레즈경험／게이경험算出
G /= 100				;補正後の値を「100」で除算
IF G > 0 && M == 4			;レズ／게이경험があり또한乱交プレイの場合
	TIMES G , 1.2			;経験を1.2倍に
ELSEIF G <= 0				;レズ／게이경험がない場合
	G = 0				;経験を0に固定
ENDIF
IF O == 1				;대상者が男노예の場合
	EXP:ARG:41 += G			;게이경험として経験算入
ELSE					;대상者が女노예の場合
	EXP:ARG:40 += G			;레즈경험として経験算入
ENDIF

;----------분유経験算出
IF TALENT:ARG:299			;대상者が【모유체질】保有の場合
	W /= 100			;補正後の値を「100」で除算
	SIF W <= 0			;経験の有無を判定し
		W = 0			;ないなら0に固定
	SIF M == 4			;乱交プレイの場合
		TIMES W , 1.2		;経験を1.2倍に
	EXP:ARG:54 += W			;분유経験として経験算入
ENDIF

;----------報酬加算処理
MONEY += Q				;報酬値を金額算入

;----------初回売春時処理
IF EXP:ARG:57 == 0			;매춘경험がこれまで一度もない場合
	R = 1				;첫 매춘フラグをたて
	EXP:ARG:50 += 1			;이상경험を1、経験算入
	S += 1				;さらに스트레스+1
ELSE					;一度でも経験があれば
	R = 0				;첫 매춘フラグをたおす
ENDIF

;----------반발각인付加判定
P = B % 1000
IF MARK:ARG:4 == 2
	IF P >= 9
		CALL NT_DR_RM_MESSAGE,ARG
		MARK:ARG:3 = 3
		MARK:ARG:4 = 3
	ENDIF
ELSEIF MARK:ARG:4 == 1
	IF P >= 9
		CALL NT_DR_RM_MESSAGE,ARG
		MARK:ARG:3 = 3
		MARK:ARG:4 = 3
	ELSEIF P >= 7
		CALL NT_DR_RM_MESSAGE,ARG
		MARK:ARG:3 = 2
		MARK:ARG:4 = 2
	ENDIF
ELSEIF MARK:ARG:4 == 0
	IF P >= 9
		CALL NT_DR_RM_MESSAGE,ARG
		MARK:ARG:3 = 3
		MARK:ARG:4 = 3
	ELSEIF P >= 7
		CALL NT_DR_RM_MESSAGE,ARG
		MARK:ARG:3 = 2
		MARK:ARG:4 = 2
	ELSEIF P >= 4
		CALL NT_DR_RM_MESSAGE,ARG
		MARK:ARG:3 = 1
		MARK:ARG:4 = 1
	ENDIF
ENDIF

;----------매춘경험
EXP:ARG:57 += 1				;매춘경험を1、経験算入

;----------스트레스処理
P = EXP:ARG:57
IF P <= 5				;매춘경험が5回未満の場合
	S += 1				;ビギナーのため스트레스+1
ELSEIF P <= 50 && P >= 31		;매춘경험が31回이상50回以下の場合
	S -= 1				;慣れのため스트레스-1
ELSEIF P <= 100 && P >= 51		;매춘경험が51回이상100回以下の場合
	S -= 2				;ベテランとなったため스트레스-2
ELSEIF P >= 101				;매춘경험が101回이상の場合
	S -= 3				;熟達者となったため스트레스-3
ENDIF					;それ以外（5～30回）の場合は스트레스の増減なし

SIF S <= 0				;스트레스가 マイナスになっても
	S = 1				;必ず「1」は스트레스가 かかるように
CFLAG:ARG:10 += S			;스트레스値を대상者に算入

;■■■メッセージ표시処理
;----------입上処理
B /= 1000
CALL TOILET_MESSAGE,ARG

;----------첫 매춘표시
SIF R == 1				;첫 매춘フラグがたっているなら표시
	PRINTFORML 첫 매춘：%EXPNAME:50%＋1

;----------レズ・게이경험표시
IF O == 1				;대상자가 남자 노예인 한편
	SIF G > 0			;게이경험がある場合は下記を표시
		PRINTFORML %EXPNAME:41%＋{G}
ELSE					;대상者が女노예또한
	SIF G > 0			;레즈경험がある場合は下記を표시
		PRINTFORML %EXPNAME:40%＋{G}
ENDIF

;----------V経験표시
IF O == 0				;대상者が女노예の場合
	SIF CFLAG:ARG:108		;子宮内피임결계を使用している場合は下記を표시
		PRINTL <자궁내피임결계>사용 중
	SIF V > 0 && X == 0		;V経験があり또한피임なしの場合は下記を표시
		PRINTFORML %EXPNAME:0%＋{V}（%EXPNAME:5%＋{V}）
	SIF V > 0 && X == 1		;V経験があり또한임신できない場合は下記を표시
		PRINTFORML %EXPNAME:0%＋{V}
ENDIF

;----------A経験표시
SIF A > 0				;A経験がある場合は표시
	PRINTFORML %EXPNAME:1%＋{A}

;----------펠라경험표시
SIF F > 0				;펠라경험がある場合は표시
	PRINTFORML %EXPNAME:22%＋{F}

;----------분유経験표시			;모유体質の女노예또한분유経験がある場合は표시
SIF TALENT:ARG:299 && W > 0
	PRINTFORML %EXPNAME:54%＋{W}

;----------사정経験표시
SIF O == 1 && V > 0			;대상자가 남자 노예인 한편사정 경험이 있는 경우 표시
	PRINTFORML %EXPNAME:3%＋{V}

;----------정액経験표시
SIF L > 0				;정액経験がある場合は표시
	PRINTFORML %EXPNAME:20%＋{L}

;----------성교경험표시
SIF I > 0				;성교경험がある場合は표시
	PRINTFORML %EXPNAME:4%＋{I}

;----------절정経験표시
SIF E > 0				;절정経験がある場合は표시
	PRINTFORML %EXPNAME:2%＋{E}

;----------봉사쾌락경험표시
SIF H > 0				;봉사쾌락경험がある場合は표시
	PRINTFORML %EXPNAME:21%＋{H}

;----------고통쾌락경험표시
SIF K > 0				;고통쾌락경험がある場合は표시
	PRINTFORML %EXPNAME:30%＋{K}

;----------매춘경험표시
PRINTFORML %EXPNAME:57%＋1

;----------獲得報酬표시
PRINTFORML 보수로 {Q}만큼 얻었다.

;公衆便所売上記録（魔改造用）
CFLAG:ARG:182 += Q

;----------増加스트레스표시
;정신의존による軽減
S = MAX(0, S - ABL:ARG:정신의존)
PRINTFORML 스트레스가 {S}増えた。
PRINTW

;■■■終了処理
CALL NT_DR_INIT				;フラグ・変数を初期化
CALL BACK_NTDR_EVENT_NIGHT		;復元処理に移行

;＠반발각인付加時メッセージ処理
@NT_DR_RM_MESSAGE,ARG
T = TARGET
TARGET = ARG
IF P >= 9
	PRINTFORML %타겟호칭은% 분노로 얼굴을 일그러뜨리고 원망의 말을 중얼거리고 있다……
	PRINTFORML %타겟호칭은% 【반발각인：3】을 얻었다
ELSEIF P >= 7
	PRINTFORML %타겟호칭은% 노여움을 띤 표정을 짓고 있다……
	PRINTFORML %타겟호칭은% 【반발각인：2】를 얻었다
ELSEIF P >= 4
	PRINTFORML %타겟호칭은% 날카로운 시선을 이쪽으로 향하고 있다……
	PRINTFORML %타겟호칭은% 【반발각인：1】을 얻었다
ENDIF
PRINTW
TARGET = T

;＠終了時処理（EVENT_NIGHT.ERB側変数の復元処理）
@BACK_NTDR_EVENT_NIGHT
;■■■復元処理
P = J % 1000000
V = D % 1000
W = D / 1000
X = P % 1000
Y = P / 1000
Z = J / 1000000

@IS_TOILETTABLE(charaIndex)
#FUNCTION
#DIM charaIndex
RETURNF !EXTRA_WORK_IS_DOING(charaIndex) && charaIndex != MASTER && BASE:charaIndex:0 > 500 && !TALENT:charaIndex:기생 && CFLAG:charaIndex:12 == 4 && CFLAG:charaIndex:51 < 1 && CFLAG:charaIndex:1012 == 0 && !IS_FRIEND_TENTACLE_APPROCHING(charaIndex)