code:
@CHARAMOVE_DATA_99(ARG, ARG:2)
LOCAL = 99
SELECTCASE ARG
	;연동설정 (RETURN=의존하는 캐릭터, RESULT:1~3=대등하게 연동되는 캐릭터)
	CASE 1
	;특수생활시간 설정 (CFLAG:LOCAL:생활시간보정 을 설정)
	CASE 3
	;이동경향 (±~10=가기 쉽다/가기 어렵다, -100=가지 않는다)
	CASE 4
		SELECTCASE ARG:2
			;몽환관には行かない
			CASE P450몽환관현관 TO P466몽환관정원
				RETURN -100
			;他人の家には入らない
			CASE P432카게로의집, P437메디슨의집, P439라바의집, P443미스티아의집, P445모코우의집
				RETURN -100
			;縁側,居間によく居る
			CASE P409툇마루, P416거실
				RETURN 5

			;고요의바다の方へは行かない
			CASE P1016후미, P1060순호저택・현관 TO P1072헤카티아방
				RETURN -100
			;ドレミー宅には行かない
			CASE P1050도레미댁・거실 TO P1055도레미댁・화장실
				RETURN -100
			;詰め所は行かない
			CASE P1023문지기초소 TO P1025옥토초소
				RETURN -100
			;書斎、식당によく居る
			CASE P1043서재, P1026식당
				RETURN 5
		ENDSELECT
	;출현장소
	CASE 7
		SELECTCASE ARG:2
			CASE 달의도시, 와타츠키정, 옥토거리, 복숭아숲～모래사장
				RETURN 1
		ENDSELECT
	;인력설정 (CFLAG:LOCAL:인력점을 설정한다)
	CASE 8
ENDSELECT

@EXIST_캐릭터데이터99
#LOCALSIZE 1
#LOCALSSIZE 1

@캐릭터데이터99(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "통칭"
	CALLF MAKE_STR(V_NAME, "토요히메")
;여기서부터 의상 설정
CASE "오늘의 파자마"
	CALLF MAKE_STR(V_NAME, "파자마(주반) 세트")

CASE "평상복：모자"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("모자", "모자"))
CASE "평상복：신발"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("신발", "신발"))
; CASE "평상복：양말"
; 	CALLF MAKE_INT(V_NAME, CLOTHES_ID("양말", "양말"))
CASE "평상복：치마"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("치마", "살로페트 스커트"))
CASE "평상복：상반신윗도리2"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("상반신윗도리2", "프릴 블라우스"))
CASE "평상복：그외1"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("그외1", "새시 벨트"))

CASE "고유 속옷 형용사"
	CALLF MAKE_STR(V_NAME, "영원불괴의")
CASE "고유 하반신속옷명"
	CALLF MAKE_STR(V_NAME, "F섬유 팬티")
CASE "고유 상반신속옷"
	CALLF MAKE_INT(V_NAME, 1)
CASE "고유 상반신속옷명"
	CALLF MAKE_STR(V_NAME, "F섬유 브라")
CASE "고유 속옷 착용 조건"
	SIF !RAND:3
		CALLF MAKE_INT(V_NAME, 1)
CASE "고유 속옷 비쳐보이는(앞)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "고유 속옷 비쳐보이는(뒤)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "고유 속옷 옷감 두께"
	CALLF MAKE_INT(V_NAME, 3)

;요리 관련
CASE "요리：좋아하는 맛"
	CALLF MAKE_STR(V_NAME, "생선 요리/나베/건강한/담백/품위있는/야취/가정적/말랑말랑/달도시풍/달구경/맛있는물/중화/중화/단/단/매운/매운/")
CASE "요리：싫어하는 맛"
	CALLF MAKE_STR(V_NAME, "양식/정키/시큼한/시큼한/" + "개구리/벌레고기/그로테스크/" * 3 + "수수께끼 요리/생명력/" * 5)
CASE "요리：조수 효과"
	CALLF MAKE_STR(V_NAME, "달도시풍/행운/")
;선물 관련
CASE "감성：좋아함"
	CALLF MAKE_STR(V_NAME, "보랏빛/질서/아름다운/예술적/대륙풍/섬세/지적/" + "물/달/주술/부적/부채/" * 3 + "팸토파이버의/복숭아의/해신의/바다의/때묻지 않은/" * 5)
CASE "감성：싫어함"
	CALLF MAKE_STR(V_NAME, "혼돈/기묘/파워풀/로리타/매니악/" + "흙/어둠/사생/생체품/손목호구/" * 3 + "지상의/판데모닉한/" * 10)
ENDSELECT

;-------------------------------------------------
;고유요리설정
;DISH_NAME          요리명
;RESULTS            요리의 종류(경식/주식/디저트）
;CALL 재료설정("")  재료의 설정。"범용"을 넣으면 자동으로 범용 식재료가 된다
;DISH_TASTE         맛의 설정
;DISH_COMMENT       (임의）한줄 코멘트
;DISH_TIME          (임의）조리 소요 시간
;DISH_MAXLIMIT      (임의）요리의 지속 시간
;-------------------------------------------------
@SPECIAL_MENU_99
DISH_NAME = 우미사치야마사치
RESULTS = 주식
CALL 재료설정("고급식재")
DISH_TASTE = 고기 요리/생선 요리/담백/호화/품위있는/선명한/색배합/맛있는물/
DISH_COMMENT = 바다의 행복과 산의 행복을 푸짐하게 사용한 사치스러운 요리。이름에 깊은 뜻은 없을…것이다。
RETURN 1
; 번역 주, うみさちやまさち【海幸山幸】, 일본의 신화중 하나. 海の幸, 山の幸는 합쳐서 산해진미의 의미

;IMAGE_I99_特殊服装(CHARA)-------------------------------------------------------------------
;キャラクター特有の服装表示条件
;エフェクトを共有する服装差分はこちらで指定する
;使用時注意点:
;	RESULTSに特殊服装を格納すること
;	書式は %服装%%特殊服装% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_I99_特殊服装(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF CHECK_NUDE(CHARA)
		;裸
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ELSE
		;服
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ENDIF
ELSE
	;通常画像
	IF CHECK_NUDE(CHARA)
		;裸
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ELSE
		;服
		IF CFLAG:CHARA:의상일시변경 == 55 || (CFLAG:CHARA:기본복장세트 == 55 && CFLAG:CHARA:의상일시변경==0)
			IF FLAG:스탠딩종류
				;顔絵
				RESULTS = _バニー
			ELSE
				;立ち絵
				RESULTS = _バニー
			ENDIF
		ENDIF
	ENDIF
ENDIF


code:
@CHARAMOVE_DATA_9(ARG, ARG:2)
LOCAL = 9
SELECTCASE ARG
	;연동설정 (RETURN=의존하는 캐릭터, RESULT:1~3=대등하게 연동되는 캐릭터)
	CASE 1
	;특수생활시간 설정 (CFLAG:LOCAL:생활시간보정 을 설정)
	CASE 3
	;이동경향 (±~10=가기 쉽다/가기 어렵다, -100=가지 않는다)
	CASE 4
		SELECTCASE ARG:2
			;よく居る
			CASE P49몽환유적・연구실
				RETURN 5
			;他所
			CASE P27삼요정의집・객실 TO P35삼요정의집・지하실, P15레이무방, P56아운의거처
				RETURN -100
		ENDSELECT
	;출현장소
	CASE 7
		SELECTCASE ARG:2
			CASE 벚꽃길토리이, 신사경내, 몽환유적
				RETURN 1
			CASE 광장, 상가거리, 술집소로, 주택가
				RETURN 1
		ENDSELECT
	;引力設定
	CASE 8
		;日曜日はちゆりと一緒に境内まで出てくる
		SIF YOUBI_MATCH(DAY, "일") && INRANGE(TIME, 600, 960)
			TCVAR:LOCAL:인력점 = P2경내
ENDSELECT

@EXIST_캐릭터데이터9
#LOCALSIZE 1
#LOCALSSIZE 1

@캐릭터데이터9(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "통칭"
	CALLF MAKE_STR(V_NAME, "유메미")
;여기서부터 의상 설정
CASE "오늘의 파자마"
	CALLF MAKE_STR(V_NAME, "파자마(바지) 세트")

CASE "평상복：외투"
	SELECTCASE DAY:2
	CASE 1
		CALLF MAKE_INT(V_NAME, CLOTHES_ID("외투", "케이프"))
	CASE 3
		CALLF MAKE_INT(V_NAME, CLOTHES_ID("외투", "망토"))
	CASE 4
		CALLF MAKE_INT(V_NAME, CLOTHES_ID("외투", "케이프 망토"))
	ENDSELECT
CASE "평상복：신발"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("신발", "신발"))
CASE "평상복：양말"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("양말", "양말"))
CASE "평상복：치마"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("치마", "롱 스커트"))
CASE "평상복：상반신윗도리2"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("상반신윗도리2", "블라우스"))

CASE "고유 속옷 형용사"
	CALLF MAKE_STR(V_NAME, "찢어져도 재생하는")
CASE "고유 하반신속옷명"
	CALLF MAKE_STR(V_NAME, "나노테크 팬티")
CASE "고유 상반신속옷"
	CALLF MAKE_INT(V_NAME, 1)
CASE "고유 상반신속옷명"
	CALLF MAKE_STR(V_NAME, "나노테크 브라")
CASE "고유 속옷 착용 조건"
	SIF !RAND:(1 + (2 * 승부속옷판정([[유메미]])))
		CALLF MAKE_INT(V_NAME, 1)
CASE "고유 속옷 비쳐보이는(앞)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "고유 속옷 비쳐보이는(뒤)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "고유 속옷 옷감 두께"
	CALLF MAKE_INT(V_NAME, 3)

;농민 관련
CASE "농민：설명"
	CALLF MAKE_STR(V_NAME, "딸기 농가")
CASE "농민：작물"
	CALLF MAKE_STR(V_NAME, "딸기")
CASE "농민：밭의 종류"
	CALLF MAKE_STR(V_NAME, "딸기밭")
CASE "농민：밭의 맵"
	CALLF MAKE_STR(V_NAME, "몽환유적")

CASE "농민：맵 ID"
	CALLF MAKE_INT(V_NAME, 0)
CASE "농민：장소 ID"
	CALLF MAKE_INT(V_NAME, 36)
CASE "농민：보수"
	CALLF MAKE_INT(V_NAME, 400)
CASE "농민：금리"
	CALLF MAKE_INT(V_NAME, 5)

;요리 관련
CASE "요리：좋아하는 맛"
	CALLF MAKE_STR(V_NAME, "빵/양식/국물/드링크/정키/농후/선명한/사각사각/마력/화학적/빵/빵/단/단/단/기능적/기능적/기능적/딸기/딸기/딸기/딸기/딸기/")
CASE "요리：싫어하는 맛"
	CALLF MAKE_STR(V_NAME, "튀겨짐/담백/야취/매운/매운/개구리/개구리/개구리/")
CASE "요리：조수 효과"
	CALLF MAKE_STR(V_NAME, "화학적/")
;선물 관련
CASE "감성：좋아함"
	CALLF MAKE_STR(V_NAME, "기술/아름다운/미래/지적/매니악/" + "빨강빛/마법/유물/" * 3 + "십자형의/딸기의/아티팩트/기계/" * 5)
CASE "감성：싫어함"
	CALLF MAKE_STR(V_NAME, "심플/레트로/시크/로리타/" + "손목호구/" * 3)
ENDSELECT

;-------------------------------------------------
;고유요리설정
;DISH_NAME          요리명
;RESULTS            요리의 종류(경식/주식/디저트）
;CALL 재료설정("")  재료의 설정。"범용"을 넣으면 자동으로 범용 식재료가 된다
;DISH_TASTE         맛의 설정
;DISH_COMMENT       (임의）한줄 코멘트
;DISH_TIME          (임의）조리 소요 시간
;DISH_MAXLIMIT      (임의）요리의 지속 시간
;-------------------------------------------------
@SPECIAL_MENU_9
DISH_NAME = 딸기스페셜
RESULTS = 디저트
CALL 재료설정("딸기")
DISH_TASTE = 양식/케이크/알/우유/단/호화/선명한/푹신푹신/
DISH_COMMENT = 스펀지 케이크에 딸기와 생크림을 샌드한 스페셜한 카시빵(菓子パン)。
RETURN 1

;IMAGE_I9_特殊服装(CHARA)-------------------------------------------------------------------
;キャラクター特有の服装表示条件
;エフェクトを共有する服装差分はこちらで指定する
;使用時注意点:
;   RESULTSに特殊服装を格納すること
;   書式は %服装%%特殊服装% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊服装(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF CHECK_NUDE(CHARA)
        ;裸
        IF FLAG:스탠딩종류
            ;顔絵
        ELSE
            ;立ち絵
        ENDIF
    ELSE
        ;服
        IF FLAG:스탠딩종류
            ;顔絵
        ELSE
            ;立ち絵
        ENDIF
    ENDIF
ELSE
    ;通常画像
    IF CHECK_NUDE(CHARA)
        ;裸
        IF FLAG:스탠딩종류
            ;顔絵
        ELSE
            ;立ち絵
        ENDIF
    ELSE
        ;服
        IF FLAG:스탠딩종류
            ;顔絵
            ;下着のみ(TEQUIP:1 = [n])
            ;SIF TEQUIP:TARGET:상반신착의상황 == 2
            SIF TEQUIP:CHARA:5
                RESULTS = _下着のみ
            ;半脱ぎ着衣(上半身はだけ:TEQUIP:3)
            SIF TEQUIP:CHARA:상반신탈의상태 == 1
                RESULTS = _半脱ぎ
            ;バニースーツ
            SIF CFLAG:CHARA:의상일시변경 == 55 || (CFLAG:CHARA:기본복장세트 == 55 && CFLAG:CHARA:의상일시변경==0)
                RESULTS = _バニー
            ;変T
            SIF (CFLAG:CHARA:의상일시변경 == 62 || (CFLAG:CHARA:기본복장세트 == 62 && CFLAG:CHARA:의상일시변경==0) ) && TEQUIP:CHARA:상반신탈의상태 == 1
                RESULTS = _地獄Ｔシャツ_半脱ぎ
            SIF CFLAG:CHARA:의상일시변경 == 62 || (CFLAG:CHARA:기본복장세트 == 62 && CFLAG:CHARA:의상일시변경==0)
                RESULTS = _地獄Ｔシャツ
            ;セーラー服
            SIF CFLAG:CHARA:의상일시변경 == 74 || (CFLAG:CHARA:기본복장세트 == 74 && CFLAG:CHARA:의상일시변경==0)
                RESULTS = _セーラー
        ELSE
            ;立ち絵
            ;下着のみ(TEQUIP:1 = [n])
            IF TEQUIP:CHARA:5
                IF CFLAG:CHARA:291
                    RESULTS = _ブラのみ
                ELSEIF TEQUIP:CHARA:하반신착의상황 <= 3
                    RESULTS = _下着のみ
                ENDIF
            ENDIF
            ;半脱ぎ着衣(上半身はだけ:TEQUIP:3)
            IF TEQUIP:CHARA:상반신탈의상태 == 1
                IF CFLAG:CHARA:291
                    RESULTS = _半脱ぎノーパン
                ELSE
                    RESULTS = _半脱ぎ
                ENDIF
            ENDIF

            ;バニースーツ
            SIF CFLAG:CHARA:의상일시변경 == 55 || (CFLAG:CHARA:기본복장세트 == 55 && CFLAG:CHARA:의상일시변경==0)
                RESULTS = _バニー

            ;変T
            IF CFLAG:CHARA:의상일시변경 == 62 || (CFLAG:CHARA:기본복장세트 == 62 && CFLAG:CHARA:의상일시변경==0)
                IF TEQUIP:CHARA:상반신탈의상태 == 1 && CFLAG:CHARA:291
                    RESULTS = _地獄Ｔシャツ_半脱ぎノーパン
                ELSEIF TEQUIP:CHARA:상반신탈의상태 == 1
                    RESULTS = _地獄Ｔシャツ_半脱ぎ
                ELSE
                    RESULTS = _地獄Ｔシャツ
                ENDIF
            ENDIF
            ;세라복
            SIF CFLAG:CHARA:의상일시변경 == 74 || (CFLAG:CHARA:기본복장세트 == 74 && CFLAG:CHARA:의상일시변경==0)
                RESULTS = _セーラー
        ENDIF
    ENDIF
ENDIF

;IMAGE_I9_体形(CHARA)-----------------------------------------------------------------------
;キャラクター特有の体形表示条件
;エフェクトを共有する体形差分はこちら
;服装を指定しても自動で表示されるので注意
;使用時注意点:
;   RESULTSに体形を格納すること
;   書式は %体形%%服装% 適宜"_"等入れること
;   "巨乳"は本編で実装済み %体形%巨乳%服装% で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I9_体形(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_特殊表情(CHARA)--------------------------------------------------------------------
;キャラクター特有の表情表示条件
;時間停止中でも維持する表情はこちら
;使用時注意点:
;   RESULTS:0に表情を格納
;   RESULTS:1にマウスオーバー時の表情を格納すること
;   "通常","笑顔","怒り","発情","睡眠"は本編で実装済み
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊表情(CHARA)
#DIM CHARA

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_特殊表情COM(CHARA, コマンド)-------------------------------------------------------
;直前のコマンドで変化するキャラクター特有の表情表示条件
;時間停止中は変化しない表情はこちら
;使用時注意点:
;   RESULTS:0に表情を格納
;   RESULTS:1にマウスオーバー時の表情を格納すること
;   "オナニー","愛撫","性交"は本編で実装済み
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊表情COM(CHARA, コマンド)
#DIM CHARA
#DIM コマンド

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_差分(CHARA)-----------------------------------------------------------------------
;キャラクター特有の差分表示条件
;裸やエフェクトを共有しない画像はこちら
;使用時注意点:
;   RESULTSに差分を格納すること
;   書式は {CHARA}%差分% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_I9_差分(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_特殊照れ(CHARA)--------------------------------------------------------------------
;キャラクター特有の照れエフェクト表示条件
;使用時注意点:
;   RESULTSに特殊照れを格納すること
;   書式は %特殊照れ%照れ
;   "裸"は本編で実装済み %特殊照れ%裸照れ で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊照れ(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_特殊吐息(CHARA)--------------------------------------------------------------------
;キャラクター特有の吐息エフェクト表示条件
;使用時注意点:
;   RESULTSに特殊吐息を格納すること
;   書式は %特殊吐息%吐息
;   "裸"は本編で実装済み %特殊吐息%裸吐息 で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊吐息(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_特殊汗(CHARA)--------------------------------------------------------------------
;キャラクター特有の汗エフェクト表示条件
;使用時注意点:
;   RESULTSに特殊汗を格納すること
;   書式は %特殊汗%汗
;   "裸"は本編で実装済み %特殊汗%裸汗 で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊汗(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ENDIF

;IMAGE_I9_特殊エフェクトチェック(CHAR, エフェクト)--------------------------------------------
;キャラクター特有のエフェクト判定  特殊エフェクトを直接指定したい場合に参照
;引数 "エフェクト" に固有のエフェクトが含まれるかを判定する
;例の通り、STRFINDを使用してください
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊エフェクトチェック(CHARA, エフェクト)
#DIM CHARA
#DIMS エフェクト

IF CFLAG:CHARA:대체적용
    ;差し替え画像
ELSE
    ;通常画像
    ;SIF STRFIND(エフェクト, "母乳") != -1
    ;    RETURN 1
    ;SIF STRFIND(エフェクト, "顔射") != -1
    ;    RETURN 1
    ;SIF STRFIND(エフェクト, "口射") != -1
    ;    RETURN 1
ENDIF

RETURN 0

;IMAGE_I9_特殊エフェクト(CHARA)--------------------------------------------------------------------
;キャラクター特有のエフェクト表示条件
;使用時注意点:
;   RESULTS配列に特殊エフェクトを格納
;   RETURNで追加するエフェクト数を返却すること
;-------------------------------------------------------------------------------------------
@IMAGE_I9_特殊エフェクト(CHARA)
#DIM CHARA
#DIM DYNAMIC エフェクト数 = 0
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
        ;IF CFLAG:CHARA:안면정액
        ;    RESULTS:エフェクト数 = 顔射
        ;    エフェクト数 += 1
        ;ENDIF
        ;IF CFLAG:CHARA:구내정액
        ;    RESULTS:エフェクト数 = 口射
        ;    エフェクト数 += 1
        ;ENDIF
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
        IF CFLAG:CHARA:안면정액
            RESULTS:エフェクト数 = 顔射
            エフェクト数 += 1
        ENDIF
        IF CFLAG:CHARA:구내정액
            RESULTS:エフェクト数 = 口射
            エフェクト数 += 1
        ENDIF
    ELSE
        ;立ち絵
        IF CFLAG:CHARA:안면정액
            RESULTS:エフェクト数 = 顔射
            エフェクト数 += 1
        ENDIF
        IF CFLAG:CHARA:구내정액
            RESULTS:エフェクト数 = 口射
            エフェクト数 += 1
        ENDIF

        ;愛液/中だし表示(半脱ぎまたは裸にしないと出さない)
        IF (TEQUIP:CHARA:하반신착의상황 == 0 && TEQUIP:CHARA:상반신착의상황 == 0) || TEQUIP:CHARA:상반신탈의상태 == 1
            ;愛液
            IF PALAM:윤활 >= PALAMLV:5
                RESULTS:エフェクト数 = 愛液多
                エフェクト数 += 1
            ELSEIF PALAM:윤활 >= PALAMLV:3
                RESULTS:エフェクト数 = 愛液
                エフェクト数 += 1
            ENDIF

            ;精液
            IF 충전율(9, 1) >= 100 || 충전율(9, 2) >= 100
                RESULTS:エフェクト数 = 下精液多
                エフェクト数 += 1
            ELSEIF 충전율(9, 1) >= 30 || 충전율(9, 2) >= 30
                RESULTS:エフェクト数 = 下精液
                エフェクト数 += 1
            ENDIF
        ENDIF

    ENDIF
ENDIF

RETURN エフェクト数

;IMAGE_I9_自慰エフェクト(CHARA)--------------------------------------------------------------------
;キャラクター特有の自慰エフェクト表示条件
;使用時注意点:
;   RESULTS配列に自慰エフェクトを格納
;   RETURNで追加するエフェクト数を返却すること
;-------------------------------------------------------------------------------------------
@IMAGE_I9_自慰エフェクト(CHARA)
#DIM CHARA
#DIM DYNAMIC エフェクト数 = 0
VARSET RESULTS

IF CFLAG:CHARA:대체적용
    ;差し替え画像
    IF FLAG:스탠딩종류
        ;顔絵
    ELSE
        ;立ち絵
    ENDIF
ELSE
    ;通常画像
    IF FLAG:스탠딩종류
        ;顔絵
        ;SIF COM_ABLE9() == 1
        ;IF CHECK_NUDE(CHARA)
        ;    RESULTS:エフェクト数 = 自慰
        ;    エフェクト数 += 1
        ;ELSE
        ;    RESULTS:エフェクト数 = 半脱ぎオナニー
        ;    エフェクト数 += 1
        ;ENDIF
    ELSE
        ;立ち絵
    ENDIF
ENDIF

RETURN エフェクト数

repo_name: DNS/eraTWKR

license: mit


code:
;********************************************************************************************
;キャラ別画像表示テンプレ IMAGE_IXX_○○.ERB
;2020/11/07 画像表示修正パッチv2.0 版
;制作者		:画像修正パッチの人
;Licence	:ライセンスフリー(CC0)
;
;キャラ特有の表情やエフェクト画像を個別に表示できるようにしたもの。
;使用方法は ERB\ステータス表示関連\キャラ別画像表示 フォルダにある他キャラのファイルを参照してください。
;使用時は"XX"をキャラクター番号に全置換すること。
;********************************************************************************************
;IMAGE_IXX_特殊服装(CHARA)-------------------------------------------------------------------
;キャラクター特有の服装表示条件
;エフェクトを共有する服装差分はこちらで指定する
;使用時注意点:
;	RESULTSに特殊服装を格納すること
;	書式は %服装%%特殊服装% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊服装(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF CHECK_NUDE(CHARA)
		;裸
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ELSE
		;服
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ENDIF
ELSE
	;通常画像
	IF CHECK_NUDE(CHARA)
		;裸
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ELSE
		;服
		IF FLAG:스탠딩종류
			;顔絵
		ELSE
			;立ち絵
		ENDIF
	ENDIF
ENDIF

;IMAGE_IXX_体形(CHARA)-----------------------------------------------------------------------
;キャラクター特有の体形表示条件
;エフェクトを共有する体形差分はこちら
;服装を指定しても自動で表示されるので注意
;使用時注意点:
;	RESULTSに体形を格納すること
;	書式は %体形%%服装% 適宜"_"等入れること
;	"巨乳"は本編で実装済み %体形%巨乳%服装% で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_体形(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_特殊表情(CHARA)--------------------------------------------------------------------
;キャラクター特有の表情表示条件
;時間停止中でも維持する表情はこちら
;使用時注意点:
;	RESULTS:0に表情を格納
;	RESULTS:1にマウスオーバー時の表情を格納すること
;	"通常","笑顔","怒り","発情","睡眠"は本編で実装済み
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊表情(CHARA)
#DIM CHARA

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_特殊表情COM(CHARA, コマンド)-------------------------------------------------------
;直前のコマンドで変化するキャラクター特有の表情表示条件
;時間停止中は変化しない表情はこちら
;使用時注意点:
;	RESULTS:0に表情を格納
;	RESULTS:1にマウスオーバー時の表情を格納すること
;	"オナニー","愛撫","性交"は本編で実装済み
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊表情COM(CHARA, コマンド)
#DIM CHARA
#DIM コマンド

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_差分(CHARA)-----------------------------------------------------------------------
;キャラクター特有の差分表示条件
;裸やエフェクトを共有しない画像はこちら
;使用時注意点:
;	RESULTSに差分を格納すること
;	書式は {CHARA}%差分% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_差分(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_特殊照れ(CHARA)--------------------------------------------------------------------
;キャラクター特有の照れエフェクト表示条件
;使用時注意点:
;	RESULTSに特殊照れを格納すること
;	書式は %特殊照れ%照れ
;	"裸"は本編で実装済み %特殊照れ%裸照れ で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊照れ(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_特殊吐息(CHARA)--------------------------------------------------------------------
;キャラクター特有の吐息エフェクト表示条件
;使用時注意点:
;	RESULTSに特殊吐息を格納すること
;	書式は %特殊吐息%吐息
;	"裸"は本編で実装済み %特殊吐息%裸吐息 で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊吐息(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_特殊汗(CHARA)--------------------------------------------------------------------
;キャラクター特有の汗エフェクト表示条件
;使用時注意点:
;	RESULTSに特殊汗を格納すること
;	書式は %特殊汗%汗
;	"裸"は本編で実装済み %特殊汗%裸汗 で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊汗(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

;IMAGE_IXX_特殊エフェクトチェック(CHAR, エフェクト)--------------------------------------------
;キャラクター特有のエフェクト判定  特殊エフェクトを直接指定したい場合に参照
;引数 "エフェクト" に固有のエフェクトが含まれるかを判定する
;例の通り、STRFINDを使用してください
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊エフェクトチェック(CHARA, エフェクト)
#DIM CHARA
#DIMS エフェクト

IF CFLAG:CHARA:대체적용
	;差し替え画像
ELSE
	;通常画像
	;SIF STRFIND(エフェクト, "母乳") != -1
	;	RETURN 1
ENDIF

RETURN 0

;IMAGE_IXX_特殊エフェクト(CHARA)--------------------------------------------------------------------
;キャラクター特有のエフェクト表示条件
;使用時注意点:
;	RESULTS配列に特殊エフェクトを格納
;	RETURNで追加するエフェクト数を返却すること
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_特殊エフェクト(CHARA)
#DIM CHARA
#DIM DYNAMIC エフェクト数 = 0
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

RETURN エフェクト数

;IMAGE_IXX_自慰エフェクト(CHARA)--------------------------------------------------------------------
;キャラクター特有の自慰エフェクト表示条件
;使用時注意点:
;	RESULTS配列に自慰エフェクトを格納
;	RETURNで追加するエフェクト数を返却すること
;-------------------------------------------------------------------------------------------
@IMAGE_IXX_自慰エフェクト(CHARA)
#DIM CHARA
#DIM DYNAMIC エフェクト数 = 0
VARSET RESULTS

IF CFLAG:CHARA:대체적용
	;差し替え画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:스탠딩종류
		;顔絵
	ELSE
		;立ち絵
	ENDIF
ENDIF

RETURN エフェクト数


code:
@NUDITYCHECK(CHARA)
#FUNCTION
#DIM CHARA
#DIM NUDITY

SIF CHARA == -1
	CHARA = TARGET
NUDITY = 0

;全身下着
IF EQUIP:(CHARA):9 > 0
	NUDITY += 3
ELSEIF EQUIP:(CHARA):10 > 0
	NUDITY += 3
ELSE
	;下半身下着
	IF EQUIP:(CHARA):5 > 0
		NUDITY += 1
	ELSEIF EQUIP:(CHARA):6 > 0
		NUDITY += 1
	ENDIF
	;上半身下着
	IF EQUIP:(CHARA):7 > 0
		NUDITY += 2
	ELSEIF EQUIP:(CHARA):8 > 0
		NUDITY += 2
	ENDIF
ENDIF

;外衣
SIF EQUIP:(CHARA):18 > 0
	NUDITY += 20

;全身上着
IF EQUIP:(CHARA):13 > 0
	NUDITY += 9
ELSEIF EQUIP:(CHARA):14 > 0
	NUDITY += 9
ELSE
	;上半身上着
	IF EQUIP:(CHARA):16 > 0
		NUDITY += 5
	ELSEIF EQUIP:(CHARA):17 > 0
		NUDITY += 5
	ENDIF
	;下半身上着
	IF EQUIP:(CHARA):11 > 0
		NUDITY += 4
	ELSEIF EQUIP:(CHARA):12 > 0
		NUDITY += 4
	;スカート
	ELSEIF EQUIP:(CHARA):13 > 0
		NUDITY += 4
	ELSEIF EQUIP:(CHARA):14 > 0
		NUDITY += 4
	ENDIF
ENDIF

RETURNF NUDITY

@絶頂判定(CHARA)
#FUNCTION
#DIM CHARA

RETURNF (NOWEX:CHARA:A절정 + NOWEX:CHARA:B절정 + NOWEX:CHARA:C절정 + NOWEX:CHARA:V절정 + NOWEX:CHARA:M절정)

@絶頂判定2(CHARA)
#FUNCTION
#DIM CHARA

SIF EX:CHARA:무자각C절정 + EX:CHARA:무자각V절정 + EX:CHARA:무자각A절정 + EX:CHARA:무자각B절정 + EX:CHARA:무자각M절정 >= 20
	RETURNF 1
RETURNF 0

path: ERB/캐릭터데이터/별도화상용함수.ERB


code:
납득 있고인가-응! 라는 사람은 게시판으로 외칠까 각자 수정할까 패치를 주세요
거동의 바꾸는 방법은 「개조라든지 해 보고 싶은 사람을 위한 이것저것」에 있는 「캐릭터 추가의 추천(전진)」을 참조
-------------------------------------------------------------------
·이동율은 거점내에서의 이동의 하기 쉬움
·절도는 거점내에서 어느 정도 절도를 분별해 이동할까
　-1이하는 사실에 들어 올 가능성이 있다
·연동은 대상이 출금이나 거주해 상태에서도 괜찮아
·연동하고 있는 캐릭터의 나 가장 사이의 좋은 캐릭터에게 의존하고 있다
◎=자주 가는 지역. 자택도 있는 것이 많기 때문에 출현한다면 대체로 여기
○=출현하는 지역. 출현하지 않는 포인트있다
●=일부만 출현하는 지역. 출현하는 포인트가 적은 것뿐으로 확률이 낮은 것은 아니다
　　명계 방면의 것●은 삼도내는 건너지 않는다
☆=조건부로 출현하는 일이 있는 지역
－=출현하지 않는다

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
레이무　　　　　　　　　◎  －  ○  －  －  －  －  －  －  －  －  자택은 신사 툇마루
루코토  　　　　　 +1   ◎  －  －  －  －  －  －  －  －  －  －  자택은 신사 툇마루
카나　　　　　　　 -1   ◎  －  －  －  －  －  －  －  －  －  －  자택은 신사 툇마루
미마　　　　　　　 -1   ◎  －  ○  －  －  ○  －  －  －  －  －  자택은 신사 툇마루
서니　　  　+5　　 -1   ○  －  －  ○  －  ◎  －  －  －  －  －  자택은 요정의 큰 나무. 3월정령으로 연동
루나　　　　　　　 -1   ○  －  －  ○  －  ◎  －  －  －  －  －  자택은 요정의 큰 나무. 3월정령으로 연동
스타　　　  　　　 -1   ○  －  －  ○  －  ◎  －  －  －  －  －  자택은 요정의 큰 나무. 3월정령으로 연동
치유리　　　　　　 +1   －  －  ○  －  －  －  －  －  －  －  －  자택은 몽환 유적
유메미　　　　　　 +1   －  －  ○  －  －  －  －  －  －  －  －  자택은 몽환 유적
스이카　　　　　　　　　○  －  －  －  －  －  －  ○  ◎  －  －  자택은 신사 툇마루

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
마리사　　　　　　　　　－  －  ○  ○  ○  ◎  －  －  －  －  －  자택은 키리사메 마법점
루미아　　  　　　　　　－  ○  －  －  －  ◎  ●  －  －  －  －  자택은 숲의 입구
대요정　　　　　　 +1   ○  －  －  ◎  －  ○  －  －  －  －  －  자택은 안개호
치르노　　　+5　　 -1   ○  －  －  ◎  －  ○  －  ○  －  －  －  자택은 얼음의 카마쿠라
사쿠야　　　　　　 +1   ○  －  ○  ◎  －  ○  －  －  －  －  －  자택은 객실
레밀리아　　+5　　　　　○  －  －  ◎  －  －  －  －  －  －  －  자택은 객실
앨리스　　　　　　　　　○  －  ○  ○  －  ◎  －  －  －  －  －  자택은 인형의 양관
릴리 W 　　　 　　　　　－  －  ☆  ○  －  ○  －  ◎  －  －  －  자택은 산기슭의 수해. 봄은 마을에도 출현
릴리 B 　　　　 　　　　－  －  ☆  －  －  ○  ●  ◎  －  －  －  자택은 산기슭의 수해. 봄은 마을에도 출현
리리카　　　　　　　　　－  －  ○  ○  －  －  ◎  －  －  －  －  자택은 폐양관. 3 자매로 연동

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
메를랑　　  　　　　　　－  －  ○  ○  －  －  ◎  －  －  －  －  자택은 폐양관. 3 자매로 연동
루나사　　　　　　　　　－  －  ○  ○  －  －  ◎  －  －  －  －  자택은 폐양관. 3 자매로 연동
요우무　　　　　　 +1   ○  －  ◎  －  －  －  ○  －  －  －  －  자택은 백옥루
첸　　　　　+5　　 -1   －  －  －  －  －  －  ●  ◎  ○  －  －  자택은 마요이가（명）
란　　　　　　　　 +1   ○  －  ●  －  －  －  ○  ○  －  －  －  자택은 마요이가（명）. 마을에는 삼켜 가게만
유카리　　　　　　 -1   ◎  －  ○  ○  －  ○  ○  ○  －  －  －  자택은 마요이가（명）
리글　　　　  　　 +1   －  －  －  －  ○  ◎  －  －  －  －  －  자택은 고목의 큰 나무
미스티아　　　  　 +1   －  ○  ○  －  ◎  ○  －  －  －  －  －  자택은 대나무숲 입구
아야　　　　+5　　 -1   ○  －  ○  ○  －  ○  －  ◎  ○  －  －  자택은 구천의 폭포
에이키　　　　　　 +1   －  ○  ○  －  －  －  ◎  －  －  －  －  자택은 피안

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
사나에　　　　　　 +1   ○  －  ○  －  －  －  －  ○  ◎  －  －  자택은 모리야사 본전
카나코　　　　　　 +1   －  －  ○  －  －  －  －  ○  ◎  －  －  자택은 모리야사 본전
스와코　　　　　　　　　－  －  －  ●  －  －  －  ○  ◎  －  －  자택은 모리야사 본전
텐시　　　　　　　 +1   ○  －  ○  －  －  －  －  ○  ○  －  －  자택은 천계
이쿠　　　　　　　 +1   －  －  ○  －  －  －  －  ○  ○  －  －  자택은 천계
린　　  　　+5　　　　　○  ●  －  －  －  －  －  ●  －  ◎  －  자택은 지령전. 묘우렌절은 묘지만. 산은 지하만
우츠호　　　　　　　　　－  －  －  －  －  －  －  ●  －  ◎  －  자택은 지령전. 지하만
코이시　　 +10　　 -2   －  ○  ○  ○  －  －  －  －  ○  ○  －  자택은 지령전
나즈린　    　　　　　　－  ◎  ○  －  －  ○  ●  －  －  －  －  자택은 묘우렌 테라모토당
코가사　　　　　　　　　○  ◎  ○  －  －  ○  －  －  －  －  －  자택은 묘우렌절경내

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
누에　　　　+5　　 -1   －  ◎  －  －  －  －  －  ○  －  －  －  자택은 묘우렌 테라모토당
하타테　　　　　　　　　－  －  ○  ○  －  －  －  ◎  ○  －  －  자택은 구천의 폭포
카센　　　　　　　 +1   ◎  －  ○  －  －  －  －  ○  ○  －  －  자택은 신선의 저택
엘렌　　  　　　　　　　●  －  ○  ●  ○  ◎  －  －  －  －  －  자택은 마법의숲 입구（구상측에서 선택했을 때 마셔）
리카코　　　　　　　　　●  －  ○  －  －  ○  －  －  －  －  －  ※자택 없음
메이라　　　+5　　　　　－  －  ○  －  －  －  －  －  －  －  －  ※자택 없음
리카　　　　　　　　　　－  －  ○  －  －  －  －  －  －  －  －  ※자택 없음
루이즈　　　　　　 -1   －  －  ○  －  －  ○  －  －  －  －  －  ※자택 없음
사토리　　　-5　　 +1   －  －  －  －  －  －  －  －  －  ◎  －  자택은 지령전
플랑　　  　+5　　　　　－  －  －  ◎  －  －  －  －  －  －  －  자택은 지하실

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
니토리　　　　　　　　　－  －  ○  －  －  －  －  ◎  ○  －  －  자택은 현무의 늪
레이센　　　　　　 +1   ○  －  ○  －  ◎  －  －  －  －  －  －  자택은 영원정
테위　　　　+5　　 -1   －  －  －  －  ◎  ○  －  －  －  －  －  자택은 영원정
파츄리      -5　　 +1   －  －  －  ◎  －  －  －  －  －  －  －  자택은 대도서관
뱌쿠렌　　　　　　 +1   －  ◎  ○  －  －  －  －  －  －  －  －  자택은 묘우렌 테라모토당
미코　　　　　　　 +1   ○  ◎  ○  －  －  －  －  －  －  －  －  자택은 마사노리 도장
코코로　　　　　　　　　－  ○  ◎  －  －  －  －  －  －  －  －  자택은 신사 툇마루
메이링　　　　　　　　　－  －  －  ◎  －  －  －  －  －  －  －  자택은 정문
소악마　　　　　　 -1   －  －  －  ◎  －  －  －  －  －  －  －  자택은 대도서관
파르시　    　　　　　　－  －  －  －  －  －  －  －  －  ◎  －  자택은 지옥의 후카미치

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
모코우　　　　　　 +1   －  －  ○  －  ◎  －  －  －  －  －  －  자택은 경사각의 대나무숲
카구야　　　　　　 +1   －  －  ○  －  ◎  －  －  －  －  －  －  자택은 영원정오노원
카게로　　　　　　　　　－  －  ○  ●  ◎  －  －  －  －  －  －  자택은 경사각의 대나무숲. 호수는 안개호만
유우기　　　　　　　　　－  －  ☆  －  －  －  －  ☆  －  ◎  －  자택은 구지옥 큰길. 봄과 가을은 마을（이해가게）와 산에도 출현
모미지　  　　　　　　　－  －  －  －  －  －  －  ◎  ○  －  －  자택은 구천의 폭포
유유코　　　+5　　 -1   －  ○  ○  －  －  －  ◎  －  －  －  －  자택은 백옥루
케이네　　　　　　 +1   －  －  ◎  －  ○  －  －  －  －  －  －  자택은 연립 주택거리
유카　　　　　　　　　　－  －  －  －  ○  ○  －  －  －  －  －  자택은 몽환관
마미조　　  　　　　　　－  ○  ◎  －  －  －  －  －  －  －  －  자택은 묘우렌절경내
코스즈　　　　　　 +1   ○  －  ◎  －  －  －  －  －  －  －  －  자택은 상가마을

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
신묘마루　　　　　　　　◎  ○  ○  －  －  －  －  －  －  －  －  자택은 신사 툇마루
에이린　　　　　　 +1   －  －  ○  －  ◎  －  －  －  －  －  －  자택은 영원정
반키　　　　　　　　　　－  ○  ◎  －  －  －  －  －  －  －  －  자택은 연립 주택거리
레티　　　  　　　　　　－  －  ☆  ◎  －  ○  －  －  －  －  －  자택은 얼음의 카마쿠라. 겨울은 마을에도 출현
메디슨　　　    　　　　－  －  －  －  ◎  ○  ●  －  －  －  －  자택은 무명의 언덕
코마치　　　+5　　 -1   ○  －  ●  －  －  －  ○  ○  －  －  －  자택은 피안. 마을은 삼켜 가게만
시즈하　　　　　　 +1   －  －  ☆  －  －  －  －  ◎  ○  －  －  자택은 산기슭의 수해. 가을은 마을에도 출현
미노리코　　　　　 +1   －  －  ☆  －  －  －  －  ◎  ○  －  －  자택은 산기슭의 수해. 가을은 마을에도 출현. 시즈하와 연동
히나　　　　　　　　　　－  －  －  －  －  ●  ●  ◎  －  －  －  자택은 산기슭의 수해
아큐　　　　-5　　 +1   ○  －  ◎  －  －  －  －  －  －  －  －  자택은 연립 주택거리

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
렌코　　　　　　　　　　○  ○  ◎  －  ○  －  ●  －  －  －  －  자택은 연립 주택거리. 연꽃 메리로 연동
메리　　  　　　　　　　○  ○  ◎  －  ○  －  ●  －  －  －  －  자택은 연립 주택거리. 연꽃 메리로 연동
키스메　　　　　　　　　－  －  －  －  －  －  －  －  －  ◎  －  자택은 환상 바람구멍
야마메　　　　　　　　　－  －  －  －  －  －  －  －  －  ◎  －  자택은 환상 바람구멍
이치린　　　　　　　　　－  ◎  ○  －  －  －  －  －  －  －  －  자택은 묘우렌 테라모토당
무라사　　　　　　　　　－  ◎  －  ●  －  －  ●  ●  －  －  －  자택은 묘우렌 테라모토당. 안개호만
쇼　　　　　　　　　　　－  ◎  ○  －  －  －  －  －  －  －  －  자택은 묘우렌 테라모토당
쿄코　　　　　　　　　　－  ◎  －  －  －  －  －  ○  －  －  －  자택은 묘우렌절경내
요시카　　　-5　　 -2   －  ◎  －  －  －  －  －  －  －  －  －  자택은 묘지
청아　　　　+5　　 -2   －  ◎  ○  －  －  －  ●  －  －  －  －  자택은 마사노리 도장

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
토지코　　　　　　　　　－  ◎  －  －  －  －  ○  －  －  －  －  자택은 마사노리 도장
후토　　　　　　　　　　－  ◎  ○  －  －  －  －  －  －  －  －  자택은 마사노리 도장
와카사기히메　　　　　　－  －  －  ◎  ☆  －  －  －  －  －  －  자택은 안개호. 거품이 없으면 이동하지 않는다
벤벤　　　　　　　　　　－  －  ○  －  －  ○  －  －  －  －  －  츠쿠모 자매로 연동 ※자택 없음
야츠하시　　　　　　　　－  －  ○  －  －  ○  －  －  －  －  －  츠쿠모 자매로 연동 ※자택 없음
라이코　　　　　　　　　－  －  ○  －  －  ○  －  －  －  －  －  ※자택 없음
세이자　　　　　　　　　－  －  －  ○  ○  ○  ●  ○  －  －  －  ※자택 없음
요리히메　　　　　 +1   －  －  －  －  －  －  －  －  －  －  ◎  자택은 와타츠키정
토요히메　　　　　 +1   －  －  －  －  －  －  －  －  －  －  ◎  자택은 와타츠키정
레이센　　　　  　 +1   －  －  －  －  －  －  －  －  －  －  ◎  자택은 와타츠키정

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
토키코　　　　　　　　　－  －  －  ○  －  ◎  －  ○  －  －  －  자택은 고목의 큰 나무
신키　　　　　　　　　　－  －  ○  －  －  ◎  －  －  －  －  －  자택은 인형의 양관
유메코　　　　　　　　　－  －  ○  －  －  ◎  －  －  －  －  －  자택은 인형의 양관
유키　　　　　　　　　　－  －  ○  －  －  ◎  －  －  －  －  －  자택은 연립 주택거리
마이　　　　　　　　　　－  －  ○  －  －  ◎  －  －  －  －  －  자택은 연립 주택거리
스미레코　　　　　　　　◎  ○  ○  －  －  －  －  －  －  －  －  ※자택 없음
세이란　　　　　　　　　－  －  －  －  ○  －  －  －  ●  －  ◎  자택은 달궁전. 산록은 산기슭의 수해만
링고　　　　　　　　　　－  －  －  －  ○  －  －  －  ●  －  ◎  자택은 달궁전. 산록은 산기슭의 수해만
도레미　　  　　　　　　－  －  －  －  －  －  －  －  －  －  ◎  자택은 가이안 통로. 가이안 통로만
사구메　　　　　　 +1   －  －  －  －  －  －  －  －  －  －  ◎  자택은 달궁전

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
클라운피스　　　　　　　－  －  ○  －  －  －  －  －  －  －  ◎  자택은 정인가의 바다
순호　　　　　　　　　　－  －  －  －  ○  －  －  －  －  －  ◎  자택은 정인가의 바다
헤카　　　　　　　　　　－  －  ○  －  －  －  －  －  －  －  ◎  자택은 정인가의 바다
쿠루미　　　　　　　　　－  －  －  －  ◎  －  －  －  －  －  －  자택은 몽환관
에리　　　  　　　　　　－  －  －  －  ◎  －  －  －  －  －  －  자택은 몽환관
무게츠　　　 　 　　　　－  －  －  －  ◎  －  －  －  －  －  －  자택은 몽환관
겐게츠　　　　　　　　　－  －  －  －  ◎  －  －  －  －  －  －  자택은 몽환관
라바　  　　+5　　 -1   －  －  －  ○  －  ○  －  －  －  －  －  자택은 태양의 밭
네무노　　　　　　 +1   －  －  －  －  －  －  －  ◎  －  －  －  자택은 산기슭의 수해
아운　　  　　　　 +1   ◎  ○  －  －  －  －  －  －  －  －  －  자택은 신사 경내

캐릭터　　이동율  절도  박  절  주  호  죽  숲  명  산  수  지  월  비고
나루미　　　-5　　 +1   －  －  －  －  －  ◎  －  －  －  －  －  자택은 숲의 입구
마이　　　　　　　　　　－  －  ○  －  ○  ○  －  －  －  －  －  ※자택 없음
사토노　　　　　　　　　－  －  ○  －  ○  ○  －  －  －  －  －  ※자택 없음
오키나　　　　　　 +1   －  －  ○  －  －  ○  ○  －  ○  －  －  ※자택 없음
조온　　　　　　　 -1   －  ◎  ○  －  －  －  －  －  －  －  －  자택은 묘우렌 테라모토당
시온 　 　　　　　 -1   ◎  －  －  －  －  －  －  －  ○  －  －  자택은 천계

path: ERB/캐릭터데이터/캐릭터의 거동 메모_t.txt


code:
;COMABLE 일괄관리
@GLOBAL_COMABLE(ARG)
#FUNCTION
;커맨드필터
LOCALS = /{ARG}/
IF STRCOUNT(SAVESTR:0, LOCALS)
	RESULT = 0
	RETURNF 1
ENDIF
;일괄관리
SELECTCASE ARG
	;우후후
	CASE IS < 300
		IF TFLAG:102 != 2 || !TARGET
			RESULT = 0
			RETURNF 1
		ENDIF
	;의뢰실행과 子供とふれあう은 TARGET없이 실행할 수 있도록(듯이) 예외 취급
	CASE 367, 337
		IF GROUPMATCH(TFLAG:102, 2, 3)
			RESULT = 0
			RETURNF 1
		ENDIF
	;일상 커맨드
	CASE 300 TO 303, 305, 331 TO 336, 351 , 352 , 363 TO 399
		IF TFLAG:102 != 1 || !TARGET
			RESULT = 0
			RETURNF 1
		ENDIF
	;껴안기모드
	CASE 306 TO 311
		IF !TFLAG:껴안기모드 && (TFLAG:102 > 1 || !TARGET)
			RESULT = 0
			RETURNF 1
		ENDIF
	;소프트인 우후후
	CASE 310 TO 330, 350, 360, 361
		IF TARGET == 0
			RESULT = 0
			RETURNF 1
		ENDIF
		IF TFLAG:102 != 1 && FLAG:70 == 1 && CFLAG:TARGET:344 == 0
			RESULT = 0
			RETURNF 1
		ENDIF
		IF TFLAG:102 == 2
			RESULT = 0
			RETURNF 1
		ENDIF
		IF TFLAG:껴안기모드 && ARG != 350 && ARG != 360 && ARG != 361
			RESULT = 0
			RETURNF 1
		ENDIF
		;목욕탕에서는 가치에로가 되므로
		IF BATHCHECK(CFLAG:MASTER:현재위치) && CFLAG:우후후 != 2
			IF ARG != 350 && ARG != 351
				RESULT = 0
				RETURNF 1
			ENDIF
		ENDIF
	CASE 355
		IF FLAG:70 && CFLAG:TARGET:344 == 0 || CFLAG:MASTER:장난 || CFLAG:우후후 == 2
			RESULT = 0
			RETURNF 1
		ENDIF
	CASE 400 TO 499
	;단체 실행 가능 커맨드
		IF TFLAG:102 == 2 && ARG != 410 && ARG != 490
			RESULT = 0
			RETURNF 1
		ENDIF
	CASE 501 TO 559
	;우후후 파생
		IF TFLAG:102 != 2
			RESULT = 0
			RETURNF 1
		ENDIF
	CASE 560 TO 579
	;일상 파생
		IF TFLAG:102 == 2
			RESULT = 0
			RETURNF 1
		ENDIF
	CASE 580 TO 699
	;데이트
		IF !TFLAG:100
			RESULT = 0
			RETURNF 1
		ENDIF
		IF TFLAG:102 == 2
			RESULT = 0
			RETURNF 1
		ENDIF
	CASE 700 TO 799
	;자위 전용 커맨드
	;	IF TFLAG:102 != 2
	;		RESULT = 0
	;		RETURNF 1
	;	ENDIF
	;	IF ARG == 751 && (!CFLAG:PLAYER:지금바쁨)
	;		RESULT = 0
	;		RETURNF 1
	;	ELSEIF ARG != 751 && ((CFLAG:지금바쁨 != 1) || (TARGET > 0 && CFLAG:지금바쁨 != 1 && !FLAG:시간정지))
	IF !CFLAG:PLAYER:지금바쁨
			RESULT = 0
			RETURNF 1
		ENDIF
ENDSELECT

;비디오 처리(고정 카메라라면 제한 없음)
;촬영자가 조교중, 비디오 한 손에서는 여러 가지 제한된다
IF (TFLAG:105 == 1 && !ASSIPLAY) || (TFLAG:105 == 2 && ASSIPLAY)
	IF ARG == 0 || ARG == 3 || ARG == 5 || ARG == 6 || ARG == 7 || ARG == 8 || ARG == 9 || ARG == 21 || (ARG >= 40 && ARG <= 48) || ARG == 65 || ARG == 66 || (ARG >= 80 && ARG <= 87) || (ARG >= 100 && ARG <= 105) || (ARG >= 122 && ARG <= 125) || (ARG >= 140 && ARG <= 148 && ARG != 143) || (ARG >= 180 && ARG <= 189) || ARG == 503 || ARG == 504 || ARG == 510 || ARG == 511
		RETURNF 0
	ELSE
		RESULT = 0
		RETURNF 1
	ENDIF
;MASTER가 촬영중, 조수가 조교중
ELSEIF TFLAG:105 == 1 && ASSIPLAY
	IF ARG == 71 || ARG == 124 || ARG == 125 || ARG == 185
		RESULT = 0
		RETURNF 1
	ENDIF
;조수가 촬영중, MASTER가 조교중
ELSEIF TFLAG:105 == 2 && !ASSIPLAY
	IF ARG == 71 || ARG == 124 || ARG == 125 || ARG == 185 || ARG == 510 || ARG == 511
		RESULT = 0
		RETURNF 1
	ENDIF
ENDIF

;COMABLE 일괄관리
@GLOBAL_COMABLE2(ARG)
#FUNCTION
;커맨드필터
LOCALS = /{ARG}/
SIF STRCOUNT(SAVESTR:0, LOCALS)
	RETURNF 1

;일괄관리
SELECTCASE ARG
	;우후후
	CASE IS < 300
		SIF TFLAG:102 != 2 || !TARGET
			RETURNF 1
	;의뢰실행과 と子供とふれあう은 TARGET없이 실행할 수 있도록(듯이) 예외 취급
	CASE 367, 337
		IF GROUPMATCH(TFLAG:102, 2, 3)
			RESULT = 0
			RETURNF 1
		ENDIF
	;일상 커맨드
	CASE 300 TO 303, 305, 331 TO 336, 351 , 352 , 363 TO 399
		SIF TFLAG:102 != 1 || !TARGET
			RETURNF 1
	;껴안기모드
	CASE 306 TO 311
		IF !TFLAG:껴안기모드 && (TFLAG:102 > 1 || !TARGET)
			RESULT = 0
			RETURNF 1
		ENDIF
	;소프트인 우후후
	CASE 310 TO 330, 350, 360, 361
		IF TARGET == 0
			RETURNF 1
		ENDIF
		IF TFLAG:102 != 1 && FLAG:70 == 1 && CFLAG:TARGET:344 == 0
			RETURNF 1
		ENDIF
		IF TFLAG:102 == 2
			RETURNF 1
		ENDIF
		IF TFLAG:껴안기모드 && ARG != 350 && ARG != 360 && ARG != 361
			RESULT = 0
			RETURNF 1
		ENDIF
		;목욕탕에서는 가치에로가 되므로
		IF BATHCHECK(CFLAG:MASTER:현재위치) && CFLAG:우후후 != 2
			IF ARG != 350 && ARG != 351
				RETURNF 1
			ENDIF
		ENDIF
	CASE 355
		IF FLAG:70 && CFLAG:TARGET:344 == 0 || CFLAG:MASTER:장난 || CFLAG:우후후 == 2
			RETURNF 1
		ENDIF
	CASE 400 TO 499
	;단체 실행 가능 커맨드
		IF TFLAG:102 == 2 && ARG != 410 && ARG != 490
			RETURNF 1
		ENDIF
	CASE 501 TO 559
	;우후후 파생
		IF TFLAG:102 != 2
			RETURNF 1
		ENDIF
	CASE 560 TO 579
	;일상 파생
		IF TFLAG:102 == 2
			RETURNF 1
		ENDIF
	CASE 580 TO 699
	;데이트
		IF !TFLAG:100
			RETURNF 1
		ENDIF
		IF TFLAG:102 == 2
			RETURNF 1
		ENDIF
ENDSELECT


code:
;-------------------------------------------------
;300접수대, 일상(상대가 필요)
;-------------------------------------------------
[SKIPSTART]
;대응 커맨드 불명
;허리를움직인다(A)
@COM_ABLE318
;실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(318)
	RETURN RESULT
;정지 중에는 불가
SIF FLAG:70
	RETURN 0
;친해져 강도 2
SIF (TCVAR:MASTER:친해져 < 2) && CFLAG:수면 == 0
	RETURN 0
;착의
SIF TEQUIP:0 & 4
	RETURN 0
;수면중
SIF CFLAG:수면 && CFLAG:장난 < 2
	RETURN 0
;업무중
SIF CFLAG:행동 == 5
	RETURN 0
;데이트중
SIF CHK_DATENOW(CFLAG:데이트중) && CFLAG:현재위치 != OMANEKIBEYA()
	RETURN 0
;동침중
SIF CFLAG:동침중
	RETURN 0
SIF TCVAR:TARGET:101 != PLAYER
	RETURN 0
;기력 0
SIF BASE:MASTER:기력 <= 0
	RETURN 0
SIF GETBIT (TCVAR:26, 8)
	RETURN 0
SIF CFLAG:우후후 != 2
	RETURN 0
RETURN 1
[SKIPEND]

;저항한다
;이식제

;대응 커맨드 불명
;도망친다
@COM_ABLE362
;정지 중에는 불가
SIF FLAG:70
	RETURN 0
;도망치는 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(362)
	RETURN RESULT
;기력 0
SIF BASE:MASTER:기력 <= 0
	RETURN 0
SIF TFLAG:102 != 4
	RETURN 0
RETURN 1


code:
;-------------------------------------------------
;600접수대, 데이트
;-------------------------------------------------

;대응 커맨드 불명
;쇼핑 한다
@COM_ABLE611
;일괄관리
SIF GLOBAL_COMABLE(611)
	RETURN RESULT
;お出掛け道中
SIF TFLAG:데이트도중
	RETURN 0
;수면중
SIF CFLAG:MASTER:수면
	RETURN 0
;시간정지중
SIF FLAG:70
	RETURN 0
RETURN 1

;대응 커맨드 불명
;선물
@COM_ABLE612
;일괄관리
SIF GLOBAL_COMABLE(612)
	RETURN RESULT
;상대가 없다
SIF !TARGET
	RETURN 0
;데이트중 이외
SIF !CHK_DATENOW(CFLAG:12)
	RETURN 0
;데이트 도중
SIF TFLAG:데이트도중
	RETURN 0
;수면중
SIF CFLAG:수면
	RETURN 0
;시간정지중
SIF FLAG:70
	RETURN 0
RETURN 1


code:
@COM460
;망상 자위
VARSET LOCAL

IF FLAG == 70
	TCVAR:194 = 1
	RETURN 0
ELSEIF GET_TARGETNUM() > 0
	TCVAR:194 = 2
	RETURN 0
ELSE
	TCVAR:194 = 3
	$LOOP_MOUSOU
	FOR LOCAL, 1, CHARANUM
	SIF !CFLAG:LOCAL:출금
		PRINTFORMLC [{LOCAL}] %CALLNAME:LOCAL%
	NEXT
	PRINTL
	DRAWLINE
	PRINTL [900] 그만둔다
	PRINTL 누구를 떠올립니까?
	INPUT
	SELECTCASE RESULT
	CASE 1 TO CHARANUM - 1
		ADDCOPYCHARA RESULT
		CFLAG:MASTER:현재위치 = 260
		CFLAG:(CHARANUM - 1):현재위치 = 260
		CFLAG:(CHARANUM - 1):안면 = 1
		CFLAG:(CHARANUM - 1):2 = 100000
		CFLAG:(CHARANUM - 1):4 = 10000
		CFLAG:(CHARANUM - 1):생해금 = 2
		CFLAG:(CHARANUM - 1):동행 = 300
		CFLAG:TARGET:데이트중 = 2
		CFLAG:MASTER:데이트중 = 2
		TFLAG:망상중 = 1
		MARK:(CHARANUM - 1):쾌락각인 = 3
		MARK:(CHARANUM - 1):괘씸각인 = 3
		CFLAG:(CHARANUM - 1):우후후 = 0
		CFLAG:(CHARANUM - 1):수면 = 0
		CFLAG:(CHARANUM - 1):행동 = 0
		TALENT:(CHARANUM - 1):망상의산물 = 1
		BASE:(CHARANUM - 1):일량 = 0
		PRINTFORMW %조사처리(CALLNAME:RESULT,"와")% 섹스 합니다
		PRINTL 망상으로 팡팡 할 수 있도록, 비처녀로 설정해 둡니다만……
		PRINTL 처녀로 합니까?
		PRINTL [0]네 [1]아니오
		$INPUT_VIRGIN
		INPUT
		IF RESULT == 0
			PRINTW 상냥하게 해 주세요
			PRINTW 다만, V감각은 10이다
			TALENT:(CHARANUM - 1):처녀 = 1
			ABL:(CHARANUM - 1):V감각 = 10
			EXP:(CHARANUM - 1):정음경험 = 0
			EXP:(CHARANUM - 1):V성교경험 = 0
		ELSEIF RESULT == 1
			PRINTW 그대로 개시합니다
		ELSE
			GOTO INPUT_VIRGIN
		ENDIF
		PRINTL 그런데, 엉덩이의 구멍에 흥미는……
		PRINTL [0]있는 [1]없다
		$INPUT_ANUS
		INPUT
		IF RESULT == 0
			PRINTW 감각, 경험을 줍니다
			ABL:(CHARANUM - 1):A감각 = 10
			EXP:(CHARANUM - 1):A경험 = 100
			EXP:(CHARANUM - 1):A확장경험 = 50
		ELSEIF RESULT == 1
			PRINTW 그대로 개시합니다
		ELSE
			GOTO INPUT_ANUS
		ENDIF
		BEFORE_MOUSOU_EXP14 = EXP:MASTER:14
		BEFORE_MOUSOU_EXP15 = EXP:MASTER:15
		BEFORE_MOUSOU_EXP16 = EXP:MASTER:16
		BEFORE_MOUSOU_EXP20 = EXP:MASTER:20
		BEFORE_MOUSOU_EXP21 = EXP:MASTER:21
		BEFORE_MOUSOU_EXP24 = EXP:MASTER:24
		BEFORE_MOUSOU_EXP25 = EXP:MASTER:25
		BEFORE_MOUSOU_EXP27 = EXP:MASTER:27
		BEFORE_MOUSOU_EXP28 = EXP:MASTER:28
		BEFORE_MOUSOU_EXP29 = EXP:MASTER:29
		BEFORE_MOUSOU_EXP53 = EXP:MASTER:53
	CASE 900
		TCVAR:194 = 4
		RETURN 0
	CASEELSE
		GOTO LOOP_MOUSOU
	ENDSELECT
ENDIF

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE460
;망상 실행 판정
SIF !TFLAG:100
	RETURN 0
SIF CFLAG:MASTER:현재위치 != CFLAG:MASTER:311
	RETURN 0
;SIF GLOBAL_COMABLE(460)
	RETURN RESULT
SIF TFLAG:망상중
	RETURN 0
;기력 0에서는 불가
SIF BASE:MASTER:기력 <= 0
	RETURN 0
;할 수 있는 것은 낮 12시~밤 0시
SIF TIME:0 > 0 && TIME:0 < 720
	RETURN 0
RETURN 1


code:
@COM461
;망상 자위를 그만두는 용
VARSET LOCAL

STAIN:MASTER:구 = 0
STAIN:MASTER:4 = 8

IF TALENT:MASTER:2 == 2
	STAIN:MASTER:1 = 6
	STAIN:MASTER:2 = 6
	STAIN:MASTER:5 = 0
ELSEIF TALENT:MASTER:2 == 1
	STAIN:MASTER:1 = 1
	STAIN:MASTER:3 = 1
	STAIN:MASTER:5 = 1
ELSE
	STAIN:MASTER:1 = 7
	STAIN:MASTER:2 = 7
	STAIN:MASTER:3 = 7
	STAIN:MASTER:5 = 7
ENDIF

STAIN:구 = 0
STAIN:1 = 0
STAIN:2 = 2
STAIN:3 = 1
STAIN:4 = 8
STAIN:5 = 0
STAIN:6 = 1
STAIN:7 = 8

EXP:MASTER:14 = BEFORE_MOUSOU_EXP14
EXP:MASTER:15 = BEFORE_MOUSOU_EXP15
EXP:MASTER:16 = BEFORE_MOUSOU_EXP16
EXP:MASTER:20 = BEFORE_MOUSOU_EXP20
EXP:MASTER:21 = BEFORE_MOUSOU_EXP21
EXP:MASTER:24 = BEFORE_MOUSOU_EXP24
EXP:MASTER:25 = BEFORE_MOUSOU_EXP25
EXP:MASTER:27 = BEFORE_MOUSOU_EXP27
EXP:MASTER:28 = BEFORE_MOUSOU_EXP28
EXP:MASTER:29 = BEFORE_MOUSOU_EXP29
EXP:MASTER:53 = BEFORE_MOUSOU_EXP53

SIF BEFORE_MOUSOU_EXP29 == 0 && TALENT:MASTER:2 >= 2
	TALENT:MASTER:1 = 0
SIF BEFORE_MOUSOU_EXP20 == 0 && TALENT:MASTER:2 != 2
	TALENT:MASTER:0 = 1

TFLAG:망상중 = 2
CFLAG:(CHARANUM - 1):현재위치 = SUKIMA()
CFLAG:(CHARANUM - 1):동행 = 0
CFLAG:(CHARANUM - 1):출금 = 1
CFLAG:TARGET:데이트중 = MAIN_MAP
CFLAG:MASTER:데이트중 = MAIN_MAP

CFLAG:MASTER:현재위치 = CFLAG:MASTER:311
	FOR LOCAL, 1, CHARANUM
		SIF CFLAG:LOCAL:현재위치 == CFLAG:MASTER:311
			CFLAG:LOCAL:현재위치 = CFLAG:LOCAL:311
	NEXT

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
;제 정신을 차린다
@COM_ABLE461
;현실 귀환 실행 판정
SIF !TFLAG:100
	RETURN 0
SIF TFLAG:망상중 != 1
	RETURN 0
RETURN 1


code:
;-------------------------------------------------
;애무
;자위계 커맨드 레벨 2
;-------------------------------------------------
@COM700
PRINTFORML 애무 실행
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:PLAYER:체력 += 5
DOWNBASE:PLAYER:기력 += 50

SOURCE:PLAYER:쾌C = 80
SOURCE:PLAYER:쾌B = 80
SOURCE:PLAYER:사랑 = 50
SOURCE:PLAYER:성행동 = 60
SOURCE:PLAYER:노출 = 20
SOURCE:PLAYER:불결 = 30
SOURCE:PLAYER:일탈 = 20
SOURCE:PLAYER:반감 = 20

;성기술보정
SOURCE:PLAYER:쾌C += ABL:PLAYER:손가락 * 5
SOURCE:PLAYER:쾌B += ABL:PLAYER:손가락 * 5

;혀를 사용하는 조교에서는, 조교자의 혀놀림에 의해, 쾌감의 소스 증가
IF TALENT:PLAYER:능숙한손가락
	TIMES SOURCE:PLAYER:쾌C , 1.50
	TIMES SOURCE:PLAYER:쾌B , 1.50
ENDIF

SIF TALENT:PLAYER:혀놀림
	TIMES SOURCE:PLAYER:사랑 , 1.50
;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:PLAYER:자기애 < 0 || TALENT:PLAYER:저항
	SOURCE:PLAYER:울굴 += 20
;-------------------------------------------------
;더러움의 처리
;-------------------------------------------------
IF (FIRSTTIME(312,1) || FIRSTTIME(20,1)) || (MASTER_POSE(SET_M, SET_M) != TARGET && MASTER_POSE(0,4)) || (STAIN:구 >= 2 && (STAIN:구 != 16 && STAIN:구 != 17) && ASSIPLAY == 0 && TALENT:MASTER:악취내성 < 2) || TEQUIP:20
;노예의 입의 더러움이 있을 때 키스는 없다(애액과 모유 얼룩은 OK, 더러움 무시나 조수 조교시는 문제 없음)
;볼개그 사용중도 없음
	SOURCE:PLAYER:불결 = 0
	SOURCE:PLAYER:사랑 /= 4
	SOURCE:PLAYER:액체 /= 2
ELSE
	;악취 둔감
	SIF TALENT:PLAYER:악취내성 > 0
		SOURCE:PLAYER:불결 /= 4
	;악취 민감
	SIF TALENT:PLAYER:악취내성 < 0
		SOURCE:PLAYER:불결 *= 3
	;자존심 높음
	SIF TALENT:PLAYER:자존심 > 0
		SOURCE:PLAYER:불결 *= 2
ENDIF

;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;조교자가 고양이혀 소유의 경우는, 조교자에게 가학쾌락경험을 추가
SIF TALENT:PLAYER:고양이혀
	EXP:PLAYER:가학쾌락경험 += 1
;수음경험
EXP:PLAYER:수음경험 ++
;자위경험
CFLAG:PLAYER:자위했다 ++
SIF !FLAG:시간정지
	TIME += 5
RETURN 1

;-------------------------------------------------
;실행 가능 판정
;-------------------------------------------------
@COM_ABLE700
;애무 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(700)
	RETURN RESULT
RETURN 1


path: ERB/커맨드관련/COMF/700 자위계/COMF703 손가락삽입_자위_t.ERB


path: ERB/커맨드관련/COMF/700 자위계/COMF708 보지벌리기_자위_t.ERB


path: ERB/커맨드관련/COMF/700 자위계/COMF712 가슴주무르기_자위_t.ERB


path: ERB/커맨드관련/COMF/700 자위계/COMF713 애널벌리기_자위_t.ERB


path: ERB/커맨드관련/COMF/700 자위계/COMF741 Ｅ마사지기_자위_t.ERB


path: ERB/커맨드관련/COMF/700 자위계/COMF745 애널바이브_자위_t.ERB


code:
;-------------------------------------------------
;자위 종료
;-------------------------------------------------
@COM751
;CALL ENDUFUFU(PLAYER)
IF FLAG:70 == 1
	;시간정지중은 복장 세트 하지 않는다
ELSEIF CFLAG:PLAYER:장난 > 1
	;(은)탈의 안은 복장 세트 하지 않는다
ELSEIF LOCK:(CFLAG:PLAYER:311) && CFLAG:PLAYER:장난 < 2
	;장난 Lv1 이하라면 파자마 세트
	CALL CTRL_CLOTHES_SET(PLAYER, "현재 의상의 변경_파자마")
ELSE
	;장난 이외라면 평상복 세트
	CALL CTRL_CLOTHES_SET(PLAYER, "현재 의상의 변경_평상복")
	CFLAG:PLAYER:파자마 = 0
ENDIF

;복장을 TEQUIP에(↓로 하고 있기 때문에 삭제)

;우후후시 계 장비 리셋
;TEQUIP:ARG:10-TEQUIP:ARG:149를 초기화한다
;PLAYER:1을 카운트에 사용하는 것은 그만두자
VARSET TEQUIP:(PLAYER):0, 0, 10, 150

;사정 관계 리셋
IF TFLAG:102 < 2
	BASE:PLAYER:사정 = 0
	TCVAR:PLAYER:이기초 = 0
ENDIF
CFLAG:지금바쁨 = 0
TEQUIP:PLAYER:50 = -1
TEQUIP:PLAYER:51 = -1
TEQUIP:PLAYER:상반신탈의상태 = 0
TEQUIP:PLAYER:하반신비켜놓기상태 = 0
TCVAR:PLAYER:억지로 = 0
IF !FLAG:70
	TFLAG:운반 = 0
	IF CFLAG:PLAYER:구내정액
		PRINTFORML %조교자는% 입속에 남아 있던 정액을 \@ ABL:PLAYER:정액중독 > 2 ?  모두 마셨다 # 토해냈다 \@
		CFLAG:PLAYER:구내정액 = 0
	ENDIF
	IF CFLAG:PLAYER:안면정액 || CFLAG:PLAYER:손에정액
		PRINTFORM %조교자는%
		IF CFLAG:PLAYER:안면정액 && !CFLAG:PLAYER:손에정액
			PRINTFORM 얼굴에 달라 붙은
		ELSEIF !CFLAG:PLAYER:안면정액 && CFLAG:PLAYER:손에정액
			PRINTFORM 손에 달라붙은
		ELSE
			PRINTFORM 얼굴과 손을 더럽힌
		ENDIF
		PRINTFORM 정액을 \@ ABL:PLAYER:정액중독 > 2 ?  입에 넣었다 # 닦았다 \@
		CFLAG:PLAYER:안면정액 = 0
		CFLAG:PLAYER:손에정액 = 0
	ENDIF
ENDIF
TEQUIP:PLAYER:유두빨기자위 = 0
TEQUIP:PLAYER:가슴주무르기자위 = 0
TFLAG:106 = 0
;(은)탈의 플래그를 오프
TEQUIP:PLAYER:2 = 0
TEQUIP:PLAYER:상반신탈의상태 = 0
CALL CLOTHES_SETTING_TRAIN(PLAYER)
;윗도리탈의가끝난상태 플래그를 오프
TEQUIP:PLAYER:5 = 0
SIF !FLAG:시간정지
	TIME += 5
;자위경험
SIF CFLAG:PLAYER:자위했다 > 0
	EXP:PLAYER:자위경험 ++
CFLAG:PLAYER:자위했다 = 0
RETURN 1

;-------------------------------------------------
;실행 가능 판정
;-------------------------------------------------
@COM_ABLE751
;자위 종료 실행 판정
SIF !TFLAG:100
	RETURN 0
SIF TARGET > 0 && FLAG:70 && CFLAG:PLAYER:지금바쁨
	RETURN 1
;일괄관리
SIF GLOBAL_COMABLE(751)
	RETURN RESULT
RETURN 1


code:
;-------------------------------------------------
;애무
;애무계 커맨드 레벨 2
;-------------------------------------------------
@COM0
#DIM 키스한다
IF (FIRSTTIME(312,1) && FIRSTTIME(20,1)) || (MASTER_POSE(SET_M, SET_M) != TARGET && MASTER_POSE(0,4)) || (STAIN:구 >= 2 && (STAIN:구 != 16 && STAIN:구 != 17) && ASSIPLAY == 0 && TALENT:PLAYER:악취내성 < 2) || TEQUIP:20
;노예의 입의 더러움이 있을 때 키스는 없다(애액과 모유 얼룩은 OK, 더러움 무시나 조수 조교시는 문제 없음)
;볼개그 사용중도 없음
	키스한다 = 0
ELSEIF !CFLAG:기정사실 & 합의_키스
	키스한다 = 0
ELSE
	키스한다 = 1
ENDIF
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER
;봉사 쾌락
TCVAR:PLAYER:108 = 1

;TARGET가 후타나리의 경우에는 사정 가능하게
CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 3
;강도
TCVAR:TARGET:4 = 1500

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
IF FLAG:70 == 1
	BASE:MASTER:TSP -= 20
	SOURCE:쾌C = 40
	SOURCE:쾌B = 40
	;성기술보정
	SOURCE:쾌C += ABL:PLAYER:손가락 * 4
	SOURCE:쾌B += ABL:PLAYER:손가락 * 4
	;손가락을 사용하는 조교에서는, 조교자의 손가락 사용에 의해, 쾌감의 소스 증가
	IF TALENT:PLAYER:능숙한손가락
		TIMES SOURCE:쾌C , 1.50
		TIMES SOURCE:쾌B , 1.50
	ENDIF
	IF 키스한다
		SOURCE:쾌M = 20
		SOURCE:쾌M += ABL:PLAYER:혀 * 3
		 SIF TALENT:PLAYER:혀놀림
			TIMES SOURCE:쾌M , 1.50
		;키스경험
		EXP:PLAYER:키스경험 ++
		;노예의 입⇔조교자의 입의 더러움이 이동
		STAIN:구 |= STAIN:PLAYER:구
		STAIN:PLAYER:구 |= STAIN:구
	ENDIF
	;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
	IF HETEROSEX(TARGET, PLAYER)
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 5
	ENDIF

	;조교자가 고양이혀 소유의 경우는, 조교자에게 가학쾌락경험을 추가
	SIF TALENT:PLAYER:고양이혀
		EXP:PLAYER:가학쾌락경험 += 1
	;경험
	EXP:PLAYER:수음경험 ++
ELSE

	DOWNBASE:TARGET:체력 += 10
	DOWNBASE:TARGET:기력 += 40
	DOWNBASE:MASTER:체력 += 20
	DOWNBASE:MASTER:기력 += 20

	SOURCE:쾌C = 40
	SOURCE:쾌B = 40
	IF 키스한다
		SOURCE:쾌M = 20 + ABL:PLAYER:혀 * 3
		SOURCE:PLAYER:쾌M = 20 + ABL:TARGET:혀 * 3
	ENDIF

	SOURCE:사랑 = 50
	SOURCE:성행동 = 60
	SOURCE:노출 = 20
	SOURCE:불결 = 30
	SOURCE:일탈 = 20
	SOURCE:반감 = 20

	;성기술보정
	SOURCE:쾌C += ABL:PLAYER:손가락 * 4
	SOURCE:쾌B += ABL:PLAYER:손가락 * 4

	IF TALENT:PLAYER:능숙한손가락
		TIMES SOURCE:쾌C , 1.50
		TIMES SOURCE:쾌B , 1.50
	ENDIF
	SIF 키스한다 && TALENT:PLAYER:혀놀림
		TIMES SOURCE:쾌M , 1.50

	SIF TALENT:PLAYER:혀놀림
		TIMES SOURCE:사랑 , 1.50
	;-------------------------------------------------
	;특수소스처리
	;-------------------------------------------------
	;억압, 저항 소유에는, 억울소스 추가
	SIF TALENT:자기애 < 0 || TALENT:저항
		SOURCE:울굴 += 20
	;-------------------------------------------------
	;더러움의 처리
	;-------------------------------------------------
	IF !키스한다
		SOURCE:불결 = 0
		SOURCE:사랑 /= 4
		SOURCE:액체 /= 2
	ELSE
		;키스경험
		EXP:키스경험 ++
		EXP:PLAYER:키스경험 ++
		;악취 둔감
		SIF TALENT:악취내성 > 0
			SOURCE:불결 /= 4
		;악취 민감
		SIF TALENT:악취내성 < 0
			SOURCE:불결 *= 3
		;자존심 높음
		SIF TALENT:자존심 > 0
			SOURCE:불결 *= 2
		IF STAIN:PLAYER:구
		;주인의 입의 더러움이 있으면(자) 불결150%
			SOURCE:불결 *= 3
			SOURCE:불결 /= 2
		ENDIF
		;노예의 입⇔조교자의 입의 더러움이 이동
		STAIN:구 |= STAIN:PLAYER:구
		STAIN:PLAYER:구 |= STAIN:구
	ENDIF

	;-------------------------------------------------
	;경험의 처리
	;-------------------------------------------------
	;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
	CALL ADD_EXP_LESNIAN(5)

	;조교자가 고양이혀 소유의 경우는, 조교자에게 가학쾌락경험을 추가
	SIF TALENT:PLAYER:고양이혀
		EXP:PLAYER:가학쾌락경험 += 1
	;경험
	EXP:PLAYER:수음경험 ++
ENDIF
RETURN 1

;-------------------------------------------------
;애무 실행 판정
;-------------------------------------------------
@COM_ABLE0
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(0)
	RETURN RESULT
SIF !TARGET
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF0 애무_t.ERB


path: ERB/커맨드관련/COMF/COMF1 커닐링구스_t.ERB


path: ERB/커맨드관련/COMF/COMF10 유두빨기_t.ERB


path: ERB/커맨드관련/COMF/COMF100 스팽킹_t.ERB


path: ERB/커맨드관련/COMF/COMF101 채찍_t.ERB


path: ERB/커맨드관련/COMF/COMF102 양초_t.ERB


path: ERB/커맨드관련/COMF/COMF103 바늘_t.ERB


path: ERB/커맨드관련/COMF/COMF104 눈가리개_t.ERB


path: ERB/커맨드관련/COMF/COMF105 밧줄_t.ERB


path: ERB/커맨드관련/COMF/COMF106 볼개그_t.ERB


code:
;-------------------------------------------------
;구속
;SM계 커맨드, 레벨 1
;-------------------------------------------------
@COM107
IF CFLAG:억지로질내사정 == 1 && !TEQUIP:구속
	PRINTFORML 이전에 억지로 질내사정당한 %타겟은% 굉장히 싫어하는 것 같다…
	PRINTFORML [0] 포기한다
	PRINTFORML [1] 이제 안할거니까
	$LOOP
	INPUT
	IF RESULT == 0
		PRINTFORML %타겟이% 화내는 것도 지당해서, 구속을 포기했다
		RETURN -1
	ELSEIF RESULT == 1
		IF ABL:마조끼 >= 3 || (CFLAG:4 + ABL:PLAYER:화술기능 * 100) > 1500
			PRINTFORML 사정사정해 어떻게든 %타겟을% 설득했다
			CFLAG:억지로질내사정 = 2
		ELSE
			PRINTFORML %조교자가% 뭐라고 하든, %타겟은% 허락해 주지 않았다…
			SOURCE:반감 += 10000
			BASE:무드 /= 2
			TFLAG:193 = 1
			RETURN -1
		ENDIF
	ELSE
		GOTO LOOP
	ENDIF
ELSEIF CFLAG:억지로질내사정 == 3 && !TEQUIP:구속
	PRINTFORML 뻔뻔스럽게도 또 구속하고 싶다고 말하기 시작한 %CALLNAME:PLAYER%에게, %타겟은% 차가운 시선을 향했다
	CALL ASK_YN("미안해요",@"그런데도 구속된 %타겟을% 좋아합니다")
	IF RESULT == 0
		PRINTFORML 위험을 헤아린 %조교자는% 곧바로 물러났다
		RETURN -1
	ELSEIF RESULT == 1
		IF ABL:마조끼 >= 3 || (CFLAG:4 + ABL:PLAYER:화술기능 * 100) > 3000
			PRINTFORML %타겟은% 왠지 그렇게 말하면서도, 마지막에는 구속되어 주었다
			PRINTW 아주 쉽다!
		ELSE
			PRINTFORML %타겟은% 아무것도 말하지 않고 %CALLNAME:PLAYER%에 등을 돌리고 옷을 입어 버렸다
			CUP:욕정 = 0
			SOURCE:반감 += 10000
			BASE:무드 = 0
			FOR LOCAL, 0, CHARANUM
				SIF CFLAG:우후후 == 2
					CALL SET_DERAY(5, LOCAL)
				CALL ENDUFUFU(LOCAL)
			NEXT
			TFLAG:106 = 0
			;PLAYER와의 접촉 위치를 리셋
			CALL TOUCH_SET(0,0,0,1)
			;(은)탈의 플래그를 오프
			TEQUIP:2 = 0
			TEQUIP:상반신탈의상태 = 0
			;캐릭터 전원의 복재세팅
			FOR LOCAL, 0, CHARANUM
				CALL CLOTHES_SETTING_TRAIN(LOCAL)
				;윗도리탈의가끝난상태 플래그를 오프
				TEQUIP:LOCAL:5 = 0
			NEXT
			TFLAG:193 = 1
			RETURN 1
		ENDIF
	ENDIF
ENDIF
;-------------------------------------------------
;착탈의처리
IF TEQUIP:구속
	TEQUIP:구속 = 0
	TCVAR:억지로 = 0
ELSE
	TEQUIP:구속 = 1
ENDIF

;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER
;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:체력 += 10
DOWNBASE:기력 += 80

SOURCE:고통 = 60
SOURCE:공포 = 180
SOURCE:굴종 = 100
SOURCE:반감 = 350
;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;긴박경험이 높으면 소비 감소
IF EXP:긴박경험 < EXPLV:3
	TIMES DOWNBASE:체력 , 1.00
	TIMES DOWNBASE:기력 , 1.00
ELSEIF EXP:긴박경험 < EXPLV:4
	TIMES DOWNBASE:체력 , 0.90
	TIMES DOWNBASE:기력 , 0.90
ELSE
	TIMES DOWNBASE:체력 , 0.70
	TIMES DOWNBASE:기력 , 0.70
ENDIF
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
EXP:긴박경험 += 1
;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
;IF HETEROSEX(TARGET, PLAYER)
;	EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 1
;	EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
;ENDIF
RETURN 1
;-------------------------------------------------
;장착 계속의 처리
;-------------------------------------------------
@EQUIP_COM107(ARG)
PRINTL ＜구속중＞
;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:ARG:체력 += 10

SOURCE:ARG:고통 += 30
SOURCE:ARG:공포 += 180
SOURCE:ARG:굴종 += 50
SOURCE:ARG:반감 += 200
;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;긴박경험이 높으면 소비 감소
LOCAL = 60
IF EXP:ARG:긴박경험 < EXPLV:3
	TIMES LOCAL , 1.00
ELSEIF EXP:ARG:긴박경험 < EXPLV:4
	TIMES LOCAL , 0.90
ELSE
	TIMES LOCAL , 0.70
ENDIF
DOWNBASE:ARG:기력 += LOCAL

;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
EXP:ARG:긴박경험 ++
EXP:PLAYER:가학쾌락경험 += 1
RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE107
;구속플레이 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(107)
	RETURN RESULT
;밧줄로 묶고 있으면 안 돼
SIF TEQUIP:밧줄
	RETURN 0
;수면간중
SIF CFLAG:장난 > 1
	RETURN 0
;정지 중에는 불가
SIF FLAG:70
	RETURN 0
;해제는 언제라도 가능
SIF TEQUIP:구속
	RETURN 1
;아이템 을 가지고 있는인가, 아이템 없음 설정이 아니면 안 돼
SIF ITEM:27 == 0 && NOITEM == 0
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF107 구속플레이_t.ERB


path: ERB/커맨드관련/COMF/COMF108 젖스팽킹_t.ERB


path: ERB/커맨드관련/COMF/COMF11 유두빨기_t.ERB


path: ERB/커맨드관련/COMF/COMF12 가슴주무르기_t.ERB


path: ERB/커맨드관련/COMF/COMF120 커닐링구스강제_t.ERB


path: ERB/커맨드관련/COMF/COMF121 짝맞추기_t.ERB


code:
;-------------------------------------------------
;조수를 범하게 한다
;조수에 의한 커맨드, 및 레즈비언 플레이, 레벨 4
;-------------------------------------------------
@COM122
PRINTL 조수를 범하게 한다
;-------------------------------------------------
;실행 판정 처리
;-------------------------------------------------
A = 0
S = 0

;모든 명령에 공통의 요소를 고려
;(순종이 높다고 명령에 따르기 쉬운 등)
CALL COM_ORDER

;ABL:욕망
IF ABL:욕망
	SIF S
		PRINT  +
	A += ABL:욕망 * 2
	PRINT 욕망
	PRINTV 'LV, ABL:욕망, '(, ABL:욕망 * 2, ')
	S = 1
ENDIF
;ABL:봉사정신
IF ABL:봉사정신
	SIF S
		PRINT  +
	A += ABL:봉사정신 * 4
	PRINT 봉사정신
	PRINTV 'LV, ABL:봉사정신, '(, ABL:봉사정신 * 4, ')
	S = 1
ENDIF

IF MARK:쾌락각인
	SIF S
		PRINT  +
	A += MARK:쾌락각인 * 2
	PRINT 쾌락각인
	PRINTV 'LV, MARK:쾌락각인, '(, MARK:쾌락각인 * 2, ')
	S = 1
ENDIF
;PALAM:욕정
IF GETPALAMLV(PALAM:욕정, 5)
	SIF S
		PRINT  +
	A += GETPALAMLV(PALAM:욕정, 5) * 2
	PRINT 욕정
	PRINTV 'LV, GETPALAMLV(PALAM:욕정, 5), '(, GETPALAMLV(PALAM:욕정, 5) * 2, ')
	S = 1
ENDIF
;수줍음
IF TALENT:수치심 > 0
	PRINT  -
	A -= 1
	PRINT 수줍음
	PRINTV '(, 1, ')
	S = 1
ENDIF
;헌신적
IF TALENT:헌신적
	SIF S
		PRINT  +
	A += 6
	PRINT 헌신적
	PRINTV '(, 6, ')
	S = 1
ENDIF
;쾌감에 솔직
IF TALENT:쾌감응답 > 0
	SIF S
		PRINT  +
	A += 2
	PRINT 쾌감에 솔직
	PRINTV '(, 2, ')
	S = 1
ENDIF
;쾌감에 부정(음란, 창부로 무효)
IF TALENT:쾌감응답 < 0 && !TALENT:음란
	PRINT  -
	A -= 2
	PRINT 쾌감에 부정
	PRINTV '(, 2, ')
	S = 1
ENDIF
;음란
IF TALENT:음란 && ASSIPLAY == 0
	SIF S
		PRINT  +
	A += 5
	PRINT 음란
	PRINTV '(, 5, ')
	S = 5
ENDIF
;창부
IF TALENT:음란 > 1 && ASSIPLAY == 0
	SIF S
		PRINT  +
	A += 5
	PRINT 창부
	PRINTV '(, 5, ')
	S = 5
ENDIF

;조수가 처녀
IF TALENT:PLAYER:처녀
	PRINT  -
	A -= 15
	PRINT 조수가 처녀
	PRINTV '(, 15, ')
	S = 1
ENDIF

;합계를 표시(40이상으로 실행)
PRINT  =
PRINTV A

V = 40
SIF A < V
	PRINT  <
SIF A == V
	PRINT  =
SIF A > V
	PRINT  >
PRINT 실행치
PRINTV V

WAIT

;실행할 수 없다
SIF A < V
	RETURN 0

;-------------------------------------------------
;실행 결정
;-------------------------------------------------
STR:0 = 조수를 범하게 한다
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = TARGET
;TCVAR:0 사정 대상 플래그(비트 0=TARGET 1=PLAYER 2=MASTER 3=ASSI)
;TCVAR:1 예비 사정 대상 플래그(비트를 사용하고 싶지 않은 인용, CFLAG:100으로 번역됩니다)	(1=TARGET 2=PLAYER 3=MASTER 4=ASSI 5=TARGET+ASSI 6=MASTER+ASSI)
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)

SETBIT TCVAR:TARGET:0, 3
TCVAR:TARGET:2 = 1
;강도
TCVAR:TARGET:4 = 2000

TEQUIP:ASSI:50 = TARGET
;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:체력 += 50
DOWNBASE:기력 += 150

SOURCE:쾌C = 400
SOURCE:성행동 = 500
SOURCE:달성 = 400
SOURCE:굴종 = 700
SOURCE:일탈 = 500
SOURCE:반감 = 500

;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:자기애 < 0 || TALENT:저항
	SOURCE:울굴 += 500

;조수가 처녀의 경우, 굴복 일탈이 배화해, 순종이 2가 된다. 다만 한번뿐
IF TALENT:PLAYER:처녀 == 1
	TIMES SOURCE:굴종 , 5.00
	TIMES SOURCE:일탈 , 3.00
	TALENT:PLAYER:처녀 = 0
	IF !GETBIT(CFLAG:3, 4)
		;이상경험 추가(일회뿐)
		EXP:이상경험 += 1
		SETBIT CFLAG:3, 4
	ENDIF
	IF ABL:순종 < 2
		PRINTFORML 그리고 %ABLNAME:0%가 2가 되었다
		ABL:순종 = 2
	ENDIF
ENDIF
EXP:ASSI:V경험 += 1
;-------------------------------------------------
;더러움의 처리
;-------------------------------------------------
;사정에 관계없이 행해지는 처리는 여기에서
IF HAS_PENIS(TARGET)
	;노예의 P⇔조교자의 V의 더러움이 이동
	STAIN:2 |= STAIN:PLAYER:3
	STAIN:PLAYER:3 |= STAIN:2
ENDIF

;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
SIF HETEROSEX(TARGET, ASSI)
	EXP:(50 + HETEROSEX(TARGET, ASSI)) += 10

RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE122
;조수를 범하게 하는 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(122)
	RETURN RESULT
;조수가 아니면 안 돼
SIF PLAYER != ASSI
	RETURN 0
;조수가 남자라면 안 돼
SIF !(TALENT:ASSI:2 & 1)
	RETURN 0
;체격 차이가 있는 경우는 주인이 금단의지식 소유가 아니면 안 돼
SIF ABS(TALENT:체형 - TALENT:ASSI:체형) > 2 && TALENT:MASTER:금단의지식 == 0
	RETURN 0
;남자, 반인반요, 후타나리, 혹은 페니스밴드가 없으면 안 돼
SIF !(HAS_PENIS(TARGET)) && ITEM:PBAND == 0
	RETURN 0
;오나홀사용중은 안 돼
SIF TEQUIP:12
	RETURN 0
;하반신속옷착의
SIF TEQUIP:0 & 4
	RETURN 0
;목욕탕플레이중은 플레이매트가 없으면 안 돼
IF TEQUIP:31
	SIF ITEM:20 == 0 && NOITEM == 0
		RETURN 0
ENDIF
;정지 중에는 불가
SIF FLAG:70 == 1
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF122 조수를범하게함_t.ERB


path: ERB/커맨드관련/COMF/COMF123 풋잡_t.ERB


code:
;-------------------------------------------------
;풋잡한다
;조수에 의한 커맨드, 및 레즈비언 플레이, 레벨 1
;-------------------------------------------------
@COM123
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER
;봉사 쾌락 플래그
TCVAR:PLAYER:108 = 1

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 7
;강도
TCVAR:TARGET:4 = 1000

TCVAR:PLAYER:기학플래그 = 1

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:체력 += 30
DOWNBASE:기력 += 150

SOURCE:쾌C = 250
SOURCE:달성 = 200
SOURCE:노출 = 300
SOURCE:굴종 = 300
SOURCE:일탈 = 350
SOURCE:반감 = 350

;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:자기애 < 0 || TALENT:저항
	SOURCE:울굴 += 400

;고통을 수반하지 않는 마조끼 및 마조의 처리는 먼저 해 둔다
;마조끼를 본다
SELECTCASE ABL:마조끼
	CASE 0
		TIMES SOURCE:달성 , 0.80
		TIMES SOURCE:굴종 , 0.80
		SOURCE:액체 += 0
		SOURCE:욕정 += 0
	CASE 1
		TIMES SOURCE:달성 , 1.00
		TIMES SOURCE:굴종 , 1.00
		SOURCE:액체 += 20
		SOURCE:욕정 += 30
	CASE 2
		TIMES SOURCE:달성 , 1.20
		TIMES SOURCE:굴종 , 1.20
		SOURCE:액체 += 40
		SOURCE:욕정 += 70
	CASE 3
		TIMES SOURCE:달성 , 1.40
		TIMES SOURCE:굴종 , 1.40
		SOURCE:액체 += 70
		SOURCE:욕정 += 120
	CASE 4
		TIMES SOURCE:달성 , 1.50
		TIMES SOURCE:굴종 , 1.50
		SOURCE:액체 += 110
		SOURCE:욕정 += 180
	CASE 5
		TIMES SOURCE:달성 , 1.70
		TIMES SOURCE:굴종 , 1.70
		SOURCE:액체 += 150
		SOURCE:욕정 += 250
	CASE 6
		TIMES SOURCE:달성 , 1.90
		TIMES SOURCE:굴종 , 1.90
		SOURCE:액체 += 200
		SOURCE:욕정 += 300
	CASE 7
		TIMES SOURCE:달성 , 2.10
		TIMES SOURCE:굴종 , 2.10
		SOURCE:액체 += 250
		SOURCE:욕정 += 350
	CASE 8
		TIMES SOURCE:달성 , 2.30
		TIMES SOURCE:굴종 , 2.30
		SOURCE:액체 += 300
		SOURCE:욕정 += 400
	CASE 9
		TIMES SOURCE:달성 , 2.50
		TIMES SOURCE:굴종 , 2.50
		SOURCE:액체 += 350
		SOURCE:욕정 += 450
	CASEELSE
		TIMES SOURCE:달성 , 3.00
		TIMES SOURCE:굴종 , 3.00
		SOURCE:액체 += 500
		SOURCE:욕정 += 500
ENDSELECT

;마조를 본다
IF TALENT:마조
	TIMES SOURCE:달성 , 2.50
	TIMES SOURCE:굴종 , 2.50
	TIMES SOURCE:액체 , 1.20
	TIMES SOURCE:욕정 , 1.20
ENDIF

;도착적
SIF TALENT:도착적
	TIMES SOURCE:달성 , 1.80

;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
IF HETEROSEX(TARGET, PLAYER)
	EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 4
	EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 4
ENDIF

RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE123
;풋잡 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(123)
	RETURN RESULT
;남자나 반인반요인가 양성이 아니면 안 돼
SIF !(HAS_PENIS(TARGET))
	RETURN 0
;하반신속옷착의
SIF TEQUIP:0 > 1
	RETURN 0
;정지 중에는 불가
SIF FLAG:70 == 1
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF123 풋잡받는다_t.ERB


path: ERB/커맨드관련/COMF/COMF124 수음한다_t.ERB


path: ERB/커맨드관련/COMF/COMF125 애무시킨다_t.ERB


path: ERB/커맨드관련/COMF/COMF126 젖몸싸움_t.ERB


path: ERB/커맨드관련/COMF/COMF127 Ａ펄을넣는다_t.ERB


path: ERB/커맨드관련/COMF/COMF13 애널벌리기_t.ERB


path: ERB/커맨드관련/COMF/COMF130 정상위된다_t.ERB


path: ERB/커맨드관련/COMF/COMF131 후배위된다_t.ERB


path: ERB/커맨드관련/COMF/COMF132 대면좌위된다_t.ERB


path: ERB/커맨드관련/COMF/COMF133 배면좌위된다_t.ERB


path: ERB/커맨드관련/COMF/COMF140 이라마치오_t.ERB


code:
;-------------------------------------------------
;피스트성교
;하드한 조교 커맨드, 레벨 4
;-------------------------------------------------
@COM141
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 13
;강도
TCVAR:TARGET:4 = 1600

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
IF FLAG:70 == 1
	BASE:MASTER:TSP -= 300
	SOURCE:쾌V = 200
	SOURCE:고통 = 750

	;피스트등의 V에의 큰 고통은 먼저 처리해 둔다
	;EXP:V경험을 본다
	IF EXP:V경험 < EXPLV:1
		TIMES SOURCE:고통 , 2.50
	ELSEIF EXP:V경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.00
	ELSEIF EXP:V경험 < EXPLV:3
		TIMES SOURCE:고통 , 1.80
	ELSEIF EXP:V경험 < EXPLV:4
		TIMES SOURCE:고통 , 1.60
	ELSEIF EXP:V경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.40
	ELSEIF EXP:V경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.20
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

ELSE

	DOWNBASE:체력 += 300
	DOWNBASE:기력 += 150

	SOURCE:쾌V = 200
	SOURCE:고통 = 1500
	SOURCE:노출 = 100
	SOURCE:굴종 = 1200
	SOURCE:일탈 = 1200
	SOURCE:반감 = 1200

	;-------------------------------------------------
	;특수소스처리
	;-------------------------------------------------
	;피스트등의 V에의 큰 고통은 먼저 처리해 둔다
	;EXP:V경험을 본다
	IF EXP:V경험 < EXPLV:1
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 4.00
	ELSEIF EXP:V경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 3.50
	ELSEIF EXP:V경험 < EXPLV:3
		TIMES SOURCE:고통 , 1.80
		TIMES SOURCE:반감 , 3.00
	ELSEIF EXP:V경험 < EXPLV:4
		TIMES SOURCE:고통 , 1.60
		TIMES SOURCE:반감 , 2.50
	ELSEIF EXP:V경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.40
		TIMES SOURCE:반감 , 2.00
	ELSEIF EXP:V경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.20
		TIMES SOURCE:반감 , 2.00
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 1.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 1.20
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

ENDIF
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;V경험
EXP:V경험 += 24
;V확장경험
IF !EXP:V확장경험 && !EXP:A확장경험 && !GETBIT(CFLAG:4 , 5)
	EXP:이상경험 ++
	SETBIT CFLAG:4, 5
ENDIF

EXP:V확장경험 += 5

;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
IF FLAG:70 == 1
	IF HETEROSEX(TARGET, PLAYER)
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ELSE
	IF HETEROSEX(TARGET, PLAYER)
		EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 1
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ENDIF
RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE141
;피스트성교
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(141)
	RETURN RESULT
;바이브 사용중은 불가
SIF TEQUIP:13
	RETURN 0
;남자라면 안 돼
SIF !(TALENT:2 & 1)
	RETURN 0
;ASSI의 경우, 순종 4이상이나 새드가 아니면 할 수 없다.
IF ASSIPLAY
	SIF ABL:ASSI:순종 < 4 && TALENT:ASSI:새드 == 0
	RETURN 0
ENDIF
IF FLAG:70 == 1
ELSE
	;일정한 V경험이 필요
	SIF EXP:0 < 150
		RETURN 0
	;작은 체형이라면 순종이 4이상 또한 마조끼이 4이상이 아니면 실행할 수 없다
	IF TALENT:체형 < 0
		SIF ABL:순종 <= 3 || ABL:마조끼 <= 3
			RETURN 0
	ENDIF
ENDIF
;조교 대상이 난쟁이 체형의 경우는 주인이 금단의지식 소유가 아니면 안 돼
SIF ABS(TALENT:체형 - TALENT:PLAYER:체형) > 2 && TALENT:MASTER:금단의지식 == 0
	RETURN 0

;하반신착의
SIF TEQUIP:0 > 1
	RETURN 0
;샤워중은 안 돼
SIF TEQUIP:32
	RETURN 0
;목욕탕플레이중은 플레이매트가 없으면 안 돼
IF TEQUIP:31
	SIF ITEM:20 == 0 && NOITEM == 0
		RETURN 0
ENDIF
;새댁플레이중은 안 돼
SIF TEQUIP:33
	RETURN 0
;침대 룸이 아니면 안 돼
SIF !BEDROOM(CFLAG:PLAYER:현재위치)
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF141 피스트퍽_t.ERB


code:
;-------------------------------------------------
;애널피스트
;계 커맨드, 레벨
;-------------------------------------------------
@COM142
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 12
;강도
TCVAR:TARGET:4 = 1600

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
IF FLAG:70 == 1
	BASE:MASTER:TSP -= 300
	SOURCE:쾌A = 200
	SOURCE:고통 = 750

	;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	IF EXP:A경험 < EXPLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF EXP:A경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.50
	ELSEIF EXP:A경험 < EXPLV:3
		TIMES SOURCE:고통 , 2.40
	ELSEIF EXP:A경험 < EXPLV:4
		TIMES SOURCE:고통 , 2.00
	ELSEIF EXP:A경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.80
	ELSEIF EXP:A경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.60
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

ELSE

	DOWNBASE:체력 += 300
	DOWNBASE:기력 += 150

	SOURCE:쾌A = 200
	SOURCE:고통 = 1500
	SOURCE:노출 = 100
	SOURCE:굴종 = 1200
	SOURCE:일탈 = 1200
	SOURCE:반감 = 1200

	;-------------------------------------------------
	;특수소스처리
	;-------------------------------------------------
	;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	IF EXP:A경험 < EXPLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 4.00
	ELSEIF EXP:A경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 3.50
	ELSEIF EXP:A경험 < EXPLV:3
		TIMES SOURCE:고통 , 2.40
		TIMES SOURCE:반감 , 3.00
	ELSEIF EXP:A경험 < EXPLV:4
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 2.50
	ELSEIF EXP:A경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.80
		TIMES SOURCE:반감 , 2.00
	ELSEIF EXP:A경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.60
		TIMES SOURCE:반감 , 1.50
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 1.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 1.20
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

ENDIF
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;A경험
EXP:A경험 += 24

;A확장경험
IF !EXP:V확장경험 && !EXP:A확장경험 && !CFLAG:3 & 이상_확장
	EXP:이상경험 += 1
	CFLAG:3 |= 이상_확장
ENDIF

EXP:A확장경험 += 5
;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
IF FLAG:70 == 1
	IF HETEROSEX(TARGET, PLAYER)
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ELSE
	IF HETEROSEX(TARGET, PLAYER)
		EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 1
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ENDIF
RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE142
;애널피스트
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(142)
	RETURN RESULT
;애널바이브 사용중은 불가
SIF TEQUIP:14
	RETURN 0
;관장＋애널 플러그 사용중은 불가
SIF TEQUIP:21
	RETURN 0
;ASSI의 경우, 순종 3이상이나 새드가 아니면 할 수 없다.
IF ASSIPLAY
	SIF ABL:ASSI:순종 < 4 && TALENT:ASSI:새드 == 0
	RETURN 0
ENDIF
IF FLAG:70 == 1
ELSE
;일정한 A경험이 필요
SIF EXP:1 < 150
	RETURN 0
;작은 체형이라면 순종이 4이상 또한 마조끼이 4이상이 아니면 실행할 수 없다
IF TALENT:체형 < 0
	SIF ABL:순종 <= 3 || ABL:마조끼 <= 3
		RETURN 0
ENDIF
ENDIF
;조교 대상이 난쟁이 체형의 경우는 주인이 금단의지식 소유가 아니면 안 돼
SIF ABS(TALENT:체형 - TALENT:PLAYER:체형) > 2 && TALENT:MASTER:금단의지식 == 0
	RETURN 0

;하반신착의
SIF TEQUIP:0 > 1
	RETURN 0
;애널비즈 사용중은 불가
SIF TEQUIP:15
	RETURN 0
;풍선 사용중은 불가
SIF TEQUIP:22
	RETURN 0
;전극 사용중은 불가
SIF TEQUIP:23
	RETURN 0
;샤워중은 안 돼
SIF TEQUIP:32
	RETURN 0
;목욕탕플레이중은 플레이매트가 없으면 안 돼
IF TEQUIP:31
	SIF ITEM:20 == 0 && NOITEM == 0
		RETURN 0
ENDIF
;새댁플레이중은 안 돼
SIF TEQUIP:33
	RETURN 0
;침대 룸이 아니면 안 돼
SIF !BEDROOM(CFLAG:PLAYER:현재위치)
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF142 애널피스트_t.ERB


code:
;-------------------------------------------------
;두 구멍 피스트
;하드한 조교 커맨드, 레벨 4
;-------------------------------------------------
@COM143
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
IF ABL:V감각 >= ABL:A감각
	TCVAR:TARGET:2 = 13
ELSE
	TCVAR:TARGET:2 = 12
ENDIF
;강도
TCVAR:TARGET:4 = 1800

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
IF FLAG:70 == 1
	BASE:MASTER:TSP -= 500
	SOURCE:쾌V = 200
	SOURCE:쾌A = 200
	SOURCE:고통 = 900

	;피스트등의 V에의 큰 고통은 먼저 처리해 둔다
	;EXP:V경험을 본다
	IF EXP:V경험 < EXPLV:1
		TIMES SOURCE:고통 , 2.50
	ELSEIF EXP:V경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.00
	ELSEIF EXP:V경험 < EXPLV:3
		TIMES SOURCE:고통 , 1.80
	ELSEIF EXP:V경험 < EXPLV:4
		TIMES SOURCE:고통 , 1.60
	ELSEIF EXP:V경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.40
	ELSEIF EXP:V경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.20
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

	;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	IF EXP:A경험 < EXPLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF EXP:A경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.50
	ELSEIF EXP:A경험 < EXPLV:3
		TIMES SOURCE:고통 , 2.40
	ELSEIF EXP:A경험 < EXPLV:4
		TIMES SOURCE:고통 , 2.00
	ELSEIF EXP:A경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.80
	ELSEIF EXP:A경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.60
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

ELSE

	DOWNBASE:체력 += 500
	DOWNBASE:기력 += 300

	SOURCE:쾌V = 200
	SOURCE:쾌A = 200
	SOURCE:고통 = 1800
	SOURCE:노출 = 100
	SOURCE:굴종 = 2000
	SOURCE:일탈 = 2000
	SOURCE:반감 = 2000

	;-------------------------------------------------
	;특수소스처리
	;-------------------------------------------------
	;피스트등의 V에의 큰 고통은 먼저 처리해 둔다
	;EXP:V경험을 본다
	IF EXP:V경험 < EXPLV:1
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 4.00
	ELSEIF EXP:V경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 3.50
	ELSEIF EXP:V경험 < EXPLV:3
		TIMES SOURCE:고통 , 1.80
		TIMES SOURCE:반감 , 3.00
	ELSEIF EXP:V경험 < EXPLV:4
		TIMES SOURCE:고통 , 1.60
		TIMES SOURCE:반감 , 2.50
	ELSEIF EXP:V경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.40
		TIMES SOURCE:반감 , 2.00
	ELSEIF EXP:V경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.20
		TIMES SOURCE:반감 , 2.00
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 1.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 1.20
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF

	;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	IF EXP:A경험 < EXPLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 4.00
	ELSEIF EXP:A경험 < EXPLV:2
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 3.50
	ELSEIF EXP:A경험 < EXPLV:3
		TIMES SOURCE:고통 , 2.40
		TIMES SOURCE:반감 , 3.00
	ELSEIF EXP:A경험 < EXPLV:4
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 2.50
	ELSEIF EXP:A경험 < EXPLV:5
		TIMES SOURCE:고통 , 1.80
		TIMES SOURCE:반감 , 2.00
	ELSEIF EXP:A경험 >= EXPLV:5
		TIMES SOURCE:고통 , 1.60
		TIMES SOURCE:반감 , 1.50
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 2.50
		TIMES SOURCE:반감 , 1.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 2.00
		TIMES SOURCE:반감 , 1.20
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 1.50
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 1.00
	ENDIF
ENDIF

;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;V경험
EXP:V경험 += 24

;A경험
EXP:A경험 += 24

;V, A확장경험
IF !EXP:A확장경험 && !EXP:V확장경험 && !GETBIT(CFLAG:3, 5)
	EXP:이상경험 += 1
	SETBIT CFLAG:3, 5
ENDIF

EXP:A확장경험 += 5
EXP:V확장경험 += 5
;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
IF FLAG:70 == 1
	IF HETEROSEX(TARGET, PLAYER)
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ELSE
	IF HETEROSEX(TARGET, PLAYER)
		EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 1
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ENDIF
RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE143
;두 구멍 피스트
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(143)
	RETURN RESULT
;바이브 사용중은 불가
SIF TEQUIP:13
	RETURN 0
;애널바이브 사용중은 불가
SIF TEQUIP:14
	RETURN 0
;관장＋애널 플러그 사용중은 불가
SIF TEQUIP:21
	RETURN 0
;애널비즈 사용중은 불가
SIF TEQUIP:15
	RETURN 0
;풍선 사용중은 불가
SIF TEQUIP:22
	RETURN 0
;전극 사용중은 불가
SIF TEQUIP:23
	RETURN 0
;남자라면 안 돼
SIF !(TALENT:2 & 1)
	RETURN 0
;ASSI의 경우, 순종 4이상이나 새드가 아니면 할 수 없다.
IF ASSIPLAY
	SIF ABL:ASSI:순종 < 4 && TALENT:ASSI:새드 == 0
		RETURN 0
ENDIF
IF FLAG:70 == 1
ELSE
	;일정한 V·A경험이 필요
	IF EXP:0 < 300 || EXP:1 < 300
		RETURN 0
	ENDIF
	;작은 체형이라면 순종이 4이상 또한 마조끼이 4이상 또한 확장경험 10이상이 아니면 실행할 수 없다
	IF TALENT:체형 < 0
		SIF ABL:순종 <= 3 || ABL:마조끼 <= 3 || EXP:V확장경험 < 10 || EXP:A확장경험 < 10
			RETURN 0
	ENDIF
ENDIF
;조교 대상이 난쟁이 체형의 경우는 주인이 금단의지식 소유가 아니면 안 돼
SIF ABS(TALENT:체형 - TALENT:PLAYER:체형) > 2 && TALENT:MASTER:금단의지식 == 0
	RETURN 0

;하반신착의
SIF TEQUIP:0 > 1
	RETURN 0
;샤워중은 안 돼
SIF TEQUIP:32
	RETURN 0
;목욕탕플레이중은 플레이매트가 없으면 안 돼
IF TEQUIP:31
	SIF ITEM:20 == 0 && NOITEM == 0
		RETURN 0
ENDIF
;새댁플레이중은 안 돼
SIF TEQUIP:33
	RETURN 0
;침대 룸이 아니면 안 돼
SIF !BEDROOM(CFLAG:PLAYER:현재위치)
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF143 양구멍피스트_t.ERB


path: ERB/커맨드관련/COMF/COMF144 방뇨_t.ERB


path: ERB/커맨드관련/COMF/COMF145 애널봉사_t.ERB


path: ERB/커맨드관련/COMF/COMF146 관장기_t.ERB


code:
;-------------------------------------------------
;확장벌룬
;하드한 조교 커맨드, 레벨 4
;-------------------------------------------------
@COM147
;착탈의처리
TEQUIP:확장벌룬 = !TEQUIP:확장벌룬

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 12
;강도
TCVAR:TARGET:4 = 1200

;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER
;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
IF FLAG:70 == 1
	BASE:MASTER:TSP -= 150
	SOURCE:쾌A = 200
	SOURCE:고통 = 400

	;A에의 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	IF EXP:A경험 < EXPLV:1
		TIMES SOURCE:고통 , 3.00
	ELSEIF EXP:A경험 < EXPLV:2
		TIMES SOURCE:고통 , 1.20
	ELSEIF EXP:A경험 < EXPLV:3
		TIMES SOURCE:고통 , 0.80
	ELSEIF EXP:A경험 < EXPLV:4
		TIMES SOURCE:고통 , 0.60
	ELSEIF EXP:A경험 < EXPLV:5
		TIMES SOURCE:고통 , 0.40
	ELSEIF EXP:A경험 >= EXPLV:5
		TIMES SOURCE:고통 , 0.20
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 1.20
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 1.00
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 0.60
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 0.30
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 0.20
	ENDIF

ELSE

	DOWNBASE:체력 += 150
	DOWNBASE:기력 += 200

	SOURCE:쾌A = 200
	SOURCE:고통 = 800
	SOURCE:노출 = 300
	SOURCE:굴종 = 400
	SOURCE:일탈 = 700
	SOURCE:반감 = 700

	;-------------------------------------------------
	;특수소스처리
	;-------------------------------------------------
	;억압, 저항 소유에는, 억울소스 추가
	SIF TALENT:자기애 < 0 || TALENT:저항
		SOURCE:울굴 += 700

	;A에의 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	IF EXP:A경험 < EXPLV:1
		TIMES SOURCE:고통 , 3.00
		TIMES SOURCE:반감 , 3.00
	ELSEIF EXP:A경험 < EXPLV:2
		TIMES SOURCE:고통 , 1.20
		TIMES SOURCE:반감 , 2.00
	ELSEIF EXP:A경험 < EXPLV:3
		TIMES SOURCE:고통 , 0.80
		TIMES SOURCE:반감 , 1.50
	ELSEIF EXP:A경험 < EXPLV:4
		TIMES SOURCE:고통 , 0.60
		TIMES SOURCE:반감 , 1.20
	ELSEIF EXP:A경험 < EXPLV:5
		TIMES SOURCE:고통 , 0.40
	ELSEIF EXP:A경험 >= EXPLV:5
		TIMES SOURCE:고통 , 0.20
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:윤활 < PALAMLV:1
		TIMES SOURCE:고통 , 1.20
		TIMES SOURCE:반감 , 2.00
	ELSEIF PALAM:윤활 < PALAMLV:2
		TIMES SOURCE:고통 , 1.00
		TIMES SOURCE:반감 , 1.50
	ELSEIF PALAM:윤활 < PALAMLV:3
		TIMES SOURCE:고통 , 0.60
	ELSEIF PALAM:윤활 < PALAMLV:4
		TIMES SOURCE:고통 , 0.30
	ELSEIF PALAM:윤활 >= PALAMLV:4
		TIMES SOURCE:고통 , 0.20
	ENDIF
ENDIF
;-------------------------------------------------
;더러움의 처리
;-------------------------------------------------
STAIN:7 |= STAIN:4
STAIN:4 |= STAIN:7
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
EXP:A경험 += 4

IF !EXP:V확장경험 && !EXP:A확장경험 && !GETBIT(CFLAG:3, 5)
	EXP:이상경험 += 1
	SETBIT CFLAG:3, 5
ENDIF

EXP:A확장경험 += 1
;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
IF FLAG:70 == 1
	IF HETEROSEX(TARGET, PLAYER)
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ELSE
	IF HETEROSEX(TARGET, PLAYER)
		EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 1
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ENDIF
RETURN 1
;-------------------------------------------------
;장착 계속의 처리
;-------------------------------------------------
@EQUIP_COM147(ARG)
;확장벌룬

PRINTL ＜확장벌룬 삽입중＞

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 12
;강도
TCVAR:TARGET:4 = 600

IF FLAG:70 == 1
	BASE:MASTER:TSP -= 70
	SOURCE:ARG:쾌A += 100

	;A에의 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	LOCAL = 400
	IF EXP:ARG:A경험 < EXPLV:1
		TIMES LOCAL , 3.00
	ELSEIF EXP:ARG:A경험 < EXPLV:2
		TIMES LOCAL , 1.20
	ELSEIF EXP:ARG:A경험 < EXPLV:3
		TIMES LOCAL , 0.80
	ELSEIF EXP:ARG:A경험 < EXPLV:4
		TIMES LOCAL , 0.60
	ELSEIF EXP:ARG:A경험 < EXPLV:5
		TIMES LOCAL , 0.40
	ELSEIF EXP:ARG:A경험 >= EXPLV:5
		TIMES LOCAL , 0.20
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:ARG:윤활 < PALAMLV:1
		TIMES LOCAL , 1.20
	ELSEIF PALAM:ARG:윤활 < PALAMLV:2
		TIMES LOCAL , 1.00
	ELSEIF PALAM:ARG:윤활 < PALAMLV:3
		TIMES LOCAL , 0.60
	ELSEIF PALAM:ARG:윤활 < PALAMLV:4
		TIMES LOCAL , 0.30
	ELSEIF PALAM:ARG:윤활 >= PALAMLV:4
		TIMES LOCAL , 0.20
	ENDIF
	SOURCE:ARG:고통 += LOCAL

ELSE

	DOWNBASE:ARG:체력 += 75
	DOWNBASE:ARG:기력 += 100

	SOURCE:ARG:쾌A += 100
	SOURCE:ARG:노출 += 150
	SOURCE:ARG:굴종 += 200
	SOURCE:ARG:일탈 += 350

	;-------------------------------------------------
	;특수소스처리
	;-------------------------------------------------
	;억압, 저항 소유에는, 억울소스 추가
	SIF TALENT:ARG:자기애 < 0 || TALENT:ARG:저항
		SOURCE:ARG:울굴 += 350

	;A에의 고통은 먼저 처리해 둔다
	;EXP:A경험을 본다
	LOCAL = 400
	LOCAL:1 = 350
	IF EXP:ARG:A경험 < EXPLV:1
		TIMES LOCAL , 3.00
		TIMES LOCAL:1 , 3.00
	ELSEIF EXP:ARG:A경험 < EXPLV:2
		TIMES LOCAL , 1.20
		TIMES LOCAL:1 , 2.00
	ELSEIF EXP:ARG:A경험 < EXPLV:3
		TIMES LOCAL , 0.80
		TIMES LOCAL:1 , 1.50
	ELSEIF EXP:ARG:A경험 < EXPLV:4
		TIMES LOCAL , 0.60
		TIMES LOCAL:1 , 1.20
	ELSEIF EXP:ARG:A경험 < EXPLV:5
		TIMES LOCAL , 0.40
	ELSEIF EXP:ARG:A경험 >= EXPLV:5
		TIMES LOCAL , 0.20
	ENDIF

	;PALAM:윤활을 본다
	IF PALAM:ARG:윤활 < PALAMLV:1
		TIMES LOCAL , 1.20
		TIMES LOCAL:1 , 2.00
	ELSEIF PALAM:ARG:윤활 < PALAMLV:2
		TIMES LOCAL , 1.00
		TIMES LOCAL:1 , 1.50
	ELSEIF PALAM:ARG:윤활 < PALAMLV:3
		TIMES LOCAL , 0.60
	ELSEIF PALAM:ARG:윤활 < PALAMLV:4
		TIMES LOCAL , 0.30
	ELSEIF PALAM:ARG:윤활 >= PALAMLV:4
		TIMES LOCAL , 0.20
	ENDIF
	SOURCE:ARG:고통 += LOCAL
	SOURCE:ARG:반감 += LOCAL:1
ENDIF
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
EXP:ARG:A경험 += 1
EXP:ARG:A확장경험 += 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE147
;확장벌룬 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(147)
	RETURN RESULT
;하반신착의
SIF TEQUIP:0 > 1
	RETURN 0
;해제는 언제라도 가능
SIF TEQUIP:22
	RETURN 1
;아이템 을 가지고 있는인가, 아이템 없음 설정이 아니면 안 돼
SIF ITEM:8 == 0 && NOITEM == 0
	RETURN 0
;애널바이브 사용중은 불가
SIF TEQUIP:14
	RETURN 0
;애널비즈 사용중은 불가
SIF TEQUIP:15
	RETURN 0
;보통 관장 사용중은 불가
SIF TEQUIP:21
	RETURN 0
;전극 사용중은 불가
SIF TEQUIP:23
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF147 확장벌룬_t.ERB


code:
;-------------------------------------------------
;애널전극
;하드한 조교 커맨드, 레벨 4
;-------------------------------------------------
@COM148
;착탈의처리
TEQUIP:애널전극 = !TEQUIP:애널전극
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 12
;강도
TCVAR:TARGET:4 = 1000

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
IF FLAG:70 == 1
BASE:MASTER:TSP -= 300
SOURCE:쾌A = 500
SOURCE:고통 = 750

;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
;EXP:A경험을 본다
IF EXP:A경험 < EXPLV:1
	TIMES SOURCE:고통 , 3.00
ELSEIF EXP:A경험 < EXPLV:2
	TIMES SOURCE:고통 , 2.50
ELSEIF EXP:A경험 < EXPLV:3
	TIMES SOURCE:고통 , 2.40
ELSEIF EXP:A경험 < EXPLV:4
	TIMES SOURCE:고통 , 2.00
ELSEIF EXP:A경험 < EXPLV:5
	TIMES SOURCE:고통 , 1.80
ELSEIF EXP:A경험 >= EXPLV:5
	TIMES SOURCE:고통 , 1.60
ENDIF

;PALAM:윤활을 본다
IF PALAM:윤활 < PALAMLV:1
	TIMES SOURCE:고통 , 3.00
ELSEIF PALAM:윤활 < PALAMLV:2
	TIMES SOURCE:고통 , 2.50
ELSEIF PALAM:윤활 < PALAMLV:3
	TIMES SOURCE:고통 , 2.00
ELSEIF PALAM:윤활 < PALAMLV:4
	TIMES SOURCE:고통 , 1.50
ELSEIF PALAM:윤활 >= PALAMLV:4
	TIMES SOURCE:고통 , 1.00
ENDIF

ELSE

DOWNBASE:체력 += 300
DOWNBASE:기력 += 450

SOURCE:쾌A = 500
SOURCE:고통 = 1500
SOURCE:노출 = 300
SOURCE:굴종 = 800
SOURCE:일탈 = 1200
SOURCE:반감 = 1200

;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:자기애 < 0 || TALENT:저항
	SOURCE:울굴 += 1200

;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
;EXP:A경험을 본다
IF EXP:A경험 < EXPLV:1
	TIMES SOURCE:고통 , 3.00
	TIMES SOURCE:반감 , 4.00
ELSEIF EXP:A경험 < EXPLV:2
	TIMES SOURCE:고통 , 2.50
	TIMES SOURCE:반감 , 3.50
ELSEIF EXP:A경험 < EXPLV:3
	TIMES SOURCE:고통 , 2.40
	TIMES SOURCE:반감 , 3.00
ELSEIF EXP:A경험 < EXPLV:4
	TIMES SOURCE:고통 , 2.00
	TIMES SOURCE:반감 , 2.50
ELSEIF EXP:A경험 < EXPLV:5
	TIMES SOURCE:고통 , 1.80
	TIMES SOURCE:반감 , 2.00
ELSEIF EXP:A경험 >= EXPLV:5
	TIMES SOURCE:고통 , 1.60
	TIMES SOURCE:반감 , 1.50
ENDIF

;PALAM:윤활을 본다
IF PALAM:윤활 < PALAMLV:1
	TIMES SOURCE:고통 , 3.00
	TIMES SOURCE:반감 , 2.00
ELSEIF PALAM:윤활 < PALAMLV:2
	TIMES SOURCE:고통 , 2.50
	TIMES SOURCE:반감 , 1.50
ELSEIF PALAM:윤활 < PALAMLV:3
	TIMES SOURCE:고통 , 2.00
	TIMES SOURCE:반감 , 1.20
ELSEIF PALAM:윤활 < PALAMLV:4
	TIMES SOURCE:고통 , 1.50
ELSEIF PALAM:윤활 >= PALAMLV:4
	TIMES SOURCE:고통 , 1.00
ENDIF
ENDIF
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;A경험
EXP:A경험 += 4

SIF !GETBIT (CFLAG:3, 8)
	EXP:이상경험 += 1

;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
IF FLAG:70 == 1
	IF HETEROSEX(TARGET, PLAYER)
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ELSE
	IF HETEROSEX(TARGET, PLAYER)
		EXP:(50 + HETEROSEX(TARGET, PLAYER)) += 1
		EXP:PLAYER:(50 + HETEROSEX(TARGET, PLAYER)) += 1
	ENDIF
ENDIF
RETURN 1
;-------------------------------------------------
;장착 계속의 처리
;-------------------------------------------------
@EQUIP_COM148(ARG)
;애널전극

PRINTL ＜애널전극 삽입중＞

CSTR:TARGET:10 += @"{PLAYER}/"
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수 12=A고문 13=V 꾸짖고)
TCVAR:TARGET:2 = 12
;강도
TCVAR:TARGET:4 = 500

IF FLAG:70 == 1
BASE:MASTER:TSP -= 200
SOURCE:ARG:쾌A += 250

;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
;EXP:A경험을 본다
LOCAL = 750
LOCAL:1 = 600
IF EXP:ARG:A경험 < EXPLV:1
	TIMES LOCAL , 3.00
ELSEIF EXP:ARG:A경험 < EXPLV:2
	TIMES LOCAL , 2.50
ELSEIF EXP:ARG:A경험 < EXPLV:3
	TIMES LOCAL , 2.40
ELSEIF EXP:ARG:A경험 < EXPLV:4
	TIMES LOCAL , 2.00
ELSEIF EXP:ARG:A경험 < EXPLV:5
	TIMES LOCAL , 1.80
ELSEIF EXP:ARG:A경험 >= EXPLV:5
	TIMES LOCAL , 1.60
ENDIF

;PALAM:윤활을 본다
IF PALAM:ARG:윤활 < PALAMLV:1
	TIMES LOCAL , 3.00
ELSEIF PALAM:ARG:윤활 < PALAMLV:2
	TIMES LOCAL , 2.50
ELSEIF PALAM:ARG:윤활 < PALAMLV:3
	TIMES LOCAL , 2.00
ELSEIF PALAM:ARG:윤활 < PALAMLV:4
	TIMES LOCAL , 1.50
ELSEIF PALAM:ARG:윤활 >= PALAMLV:4
	TIMES LOCAL , 1.00
ENDIF
SOURCE:ARG:고통 += LOCAL

ELSE

DOWNBASE:ARG:체력 += 200
DOWNBASE:ARG:기력 += 250

SOURCE:ARG:쾌A += 250
SOURCE:ARG:굴종 += 400
SOURCE:ARG:일탈 += 600

;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:ARG:자기애 < 0 || TALENT:ARG:저항
	SOURCE:ARG:울굴 += 600

;피스트등의 A에의 큰 고통은 먼저 처리해 둔다
;EXP:A경험을 본다
LOCAL = 750
LOCAL:1 = 600
IF EXP:ARG:A경험 < EXPLV:1
	TIMES LOCAL , 3.00
	TIMES LOCAL:1 , 4.00
ELSEIF EXP:ARG:A경험 < EXPLV:2
	TIMES LOCAL , 2.50
	TIMES LOCAL:1 , 3.50
ELSEIF EXP:ARG:A경험 < EXPLV:3
	TIMES LOCAL , 2.40
	TIMES LOCAL:1 , 3.00
ELSEIF EXP:ARG:A경험 < EXPLV:4
	TIMES LOCAL , 2.00
	TIMES LOCAL:1 , 2.50
ELSEIF EXP:ARG:A경험 < EXPLV:5
	TIMES LOCAL , 1.80
	TIMES LOCAL:1 , 2.00
ELSEIF EXP:ARG:A경험 >= EXPLV:5
	TIMES LOCAL , 1.60
	TIMES LOCAL:1 , 1.50
ENDIF

;PALAM:윤활을 본다
IF PALAM:ARG:윤활 < PALAMLV:1
	TIMES LOCAL , 3.00
	TIMES LOCAL:1 , 2.00
ELSEIF PALAM:ARG:윤활 < PALAMLV:2
	TIMES LOCAL , 2.50
	TIMES LOCAL:1 , 1.50
ELSEIF PALAM:ARG:윤활 < PALAMLV:3
	TIMES LOCAL , 2.00
	TIMES LOCAL:1 , 1.20
ELSEIF PALAM:ARG:윤활 < PALAMLV:4
	TIMES LOCAL , 1.50
ELSEIF PALAM:ARG:윤활 >= PALAMLV:4
	TIMES LOCAL , 1.00
ENDIF
SOURCE:ARG:고통 += LOCAL
SOURCE:ARG:반감 += LOCAL:1
ENDIF
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;A경험
EXP:ARG:A경험 += 1

RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE148
;애널전극 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(148)
	RETURN RESULT
;하반신착의
SIF TEQUIP:0 > 1
	RETURN 0
;해제는 언제라도 가능
SIF TEQUIP:23
	RETURN 1
;아이템 을 가지고 있는인가, 아이템 없음 설정이 아니면 안 돼
SIF ITEM:24 == 0 && NOITEM == 0
	RETURN 0
;애널바이브 사용중은 불가
SIF TEQUIP:14
	RETURN 0
;애널비즈 사용중은 불가
SIF TEQUIP:15
	RETURN 0
;보통 관장 사용중은 불가
SIF TEQUIP:21
	RETURN 0
;풍선 사용중은 불가
SIF TEQUIP:22
	RETURN 0
;목욕탕플레이중은 안 돼
SIF TEQUIP:31
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF148 애널전극_t.ERB


path: ERB/커맨드관련/COMF/COMF15 클리애무.ERB


path: ERB/커맨드관련/COMF/COMF150 가슴골을범함_t.ERB


path: ERB/커맨드관련/COMF/COMF180 로션_t.ERB


path: ERB/커맨드관련/COMF/COMF181 미약_t.ERB


path: ERB/커맨드관련/COMF/COMF182 이뇨제_t.ERB


code:
;-------------------------------------------------
;비디오카메라
;특수 커맨드
;-------------------------------------------------
@COM183

;촬영자의 처리
$INPUT_LOOP
IF TEQUIP:MASTER:28 == 0
;	PRINTL 촬영자를 선택해 주세요 도중 변경은 할 수 없습니다
;	PRINTL (촬영자를 변경하는 경우, 한 번 촬영을 종료해 주세요)
;	PRINTL
;	PRINTFORML [0] 고정 카메라
;	PRINTFORML [1] %CALLNAME:MASTER%
;	SIF ASSI > 0
;	PRINTFORML [2] %CALLNAME:ASSI%
;	PRINTFORML
;	INPUT
;	TFLAG:105 = RESULT
;	IF RESULT == 0
;		PRINTFORML 카메라를 고정해 촬영합니다
;	ELSEIF RESULT == 1
;		PRINTFORML 촬영자는 %CALLNAME:MASTER%입니다
;	ELSEIF RESULT == 2 && ASSI > 0
;		PRINTFORML 촬영자는 %CALLNAME:ASSI%입니다
;	ELSE
;		GOTO INPUT_LOOP
;	ENDIF
	;비디오테잎
	ITEM:43 --
	;자동 보충
	IF !ITEM:43 && MONEY >= 500 && FLAG:소모품자동구입
		MONEY -= 500
		ITEM:43 ++
	ENDIF
ENDIF

;착탈의처리
IF TEQUIP:MASTER:비디오촬영
;비디오촬영이 되고 있으면 종료시킨다
	TEQUIP:MASTER:비디오촬영 = 0
	PRINTW ★★★비디오촬영을 종료합니다★★★
ELSE
;비디오촬영하고 있지 않으면 초기화해 개시
;TODO 기동 조건을 작성한다
	TEQUIP:MASTER:비디오촬영 = 11
	TSTR:1 = /
	PRINTW ★★★비디오촬영을 개시합니다★★★
ENDIF
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER

RETURN 1
;-------------------------------------------------
;장착 계속의 처리
;-------------------------------------------------
@EQUIP_COM183(ARG)
;촬영 개시시는 카운트에 넣지 않는다

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:ARG:체력 += 0
DOWNBASE:ARG:기력 += 50

SOURCE:ARG:공포 += 1000
SOURCE:ARG:일탈 += 400
SOURCE:ARG:반감 += 700

;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:ARG:자기애 < 0 || TALENT:ARG:저항
	SOURCE:ARG:울굴 += 700

;고통을 수반하지 않는 마조끼 및 마조의 처리는 먼저 해 둔다
;마조끼를 본다
LOCAL = 1000
SELECTCASE ABL:ARG:마조끼
	CASE 0
		TIMES LOCAL , 0.80
		SOURCE:ARG:액체 += 0
		SOURCE:ARG:욕정 += 0
	CASE 1
		TIMES LOCAL , 1.00
		SOURCE:ARG:액체 += 20
		SOURCE:ARG:욕정 += 30
	CASE 2
		TIMES LOCAL , 1.20
		SOURCE:ARG:액체 += 40
		SOURCE:ARG:욕정 += 70
	CASE 3
		TIMES LOCAL , 1.40
		SOURCE:ARG:액체 += 70
		SOURCE:ARG:욕정 += 120
	CASE 4
		TIMES LOCAL , 1.50
		SOURCE:ARG:액체 += 110
		SOURCE:ARG:욕정 += 180
	CASE 5
		TIMES LOCAL , 1.70
		SOURCE:ARG:액체 += 150
		SOURCE:ARG:욕정 += 250
	CASE 6
		TIMES LOCAL , 1.90
		SOURCE:ARG:액체 += 200
		SOURCE:ARG:욕정 += 300
	CASE 7
		TIMES LOCAL , 2.10
		SOURCE:ARG:액체 += 250
		SOURCE:ARG:욕정 += 350
	CASE 8
		TIMES LOCAL , 2.30
		SOURCE:ARG:액체 += 300
		SOURCE:ARG:욕정 += 400
	CASE 9
		TIMES LOCAL , 2.50
		SOURCE:ARG:액체 += 350
		SOURCE:ARG:욕정 += 450
	CASEELSE
		TIMES LOCAL , 3.00
		SOURCE:ARG:액체 += 500
		SOURCE:ARG:욕정 += 500
ENDSELECT
SOURCE:ARG:노출 += LOCAL

;-------------------------------------------------
;비디오의 처리
;-------------------------------------------------
;촬영 개시 직후
SIF TEQUIP:MASTER:비디오촬영 == 11
	RETURN 1
LOCALS = {SELECTCOM}/
TSTR:1 += LOCALS
;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;IF TFLAG:105 == 1
;	EXP:MASTER:촬영경험 += 1
;ELSEIF TFLAG:105 == 2
;	EXP:ASSI:촬영경험 += 1
;ENDIF
EXP:ARG:피사경험 += 1

RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE183
;비디오촬영 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(183)
	RETURN RESULT
;해제는 언제라도 가능
SIF TEQUIP:28
	RETURN 1
;카메라와 테이프의 아이템 을 가지고 있는인가, 아이템 없음 설정이 아니면 안 돼
SIF (ITEM:18 == 0 || ITEM:43 == 0) && NOITEM == 0
	RETURN 0
;정지 중에는 불가
SIF FLAG:70 == 1
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF183 비디오카메라_t.ERB


path: ERB/커맨드관련/COMF/COMF184 야외플레이_t.ERB


code:
;-------------------------------------------------
;조수를 범한다
;특수 커맨드
;-------------------------------------------------
@COM185
PRINTL 조수를 범한다
;-------------------------------------------------
;실행 판정 처리
;-------------------------------------------------
A = 0
S = 0

;모든 명령에 공통의 요소를 고려
;(순종이 높다고 명령에 따르기 쉬운 등)
CALL COM_ORDER

;ABL:욕망
IF ABL:욕망
	SIF S
		PRINT  +
	A += ABL:욕망 * 2
	PRINT 욕망
	PRINTV 'LV, ABL:욕망, '(, ABL:욕망 * 2, ')
	S = 1
ENDIF

IF MARK:쾌락각인
	SIF S
		PRINT  +
	A += MARK:쾌락각인 * 2
	PRINT 쾌락각인
	PRINTV 'LV, MARK:쾌락각인, '(, MARK:쾌락각인 * 2, ')
	S = 1
ENDIF
;PALAM:욕정
IF GETPALAMLV(PALAM:욕정, 5)
	SIF S
		PRINT  +
	A += GETPALAMLV(PALAM:욕정, 5) * 2
	PRINT 욕정
	PRINTV 'LV, GETPALAMLV(PALAM:욕정, 5), '(, GETPALAMLV(PALAM:욕정, 5) * 2, ')
	S = 1
ENDIF
;조수의 ABL:노출벽
IF ABL:ASSI:노출벽
	SIF S
		PRINT  +
	A += ABL:ASSI:노출벽 * 2
	PRINT 조수의 노출벽
	PRINTV 'LV, ABL:ASSI:노출벽, '(, ABL:ASSI:노출벽 * 2, ')
	S = 1
ENDIF

;조수가 연모
IF TALENT:ASSI:연모 && ASSIPLAY == 0
	SIF S
		PRINT  +
	A += 10
	PRINT 조수가 연모
	PRINTV '(, 10, ')
	S = 1
ENDIF

;조수가 친애
IF TALENT:ASSI:연모 > 1 && ASSIPLAY == 0
	SIF S
		PRINT  +
	A += 15
	PRINT 조수가 친애
	PRINTV '(, 15, ')
	S = 1
ENDIF

;조수가 처녀
IF TALENT:ASSI:처녀 == 1
	PRINT  -
	A -= 50
	PRINT 조수가 처녀
	PRINTV '(, 50, ')
	S = 1
ENDIF

;합계를 표시(40이상으로 실행)
PRINT  =
PRINTV A

V = 40
SIF A < V
	PRINT  <
SIF A == V
	PRINT  =
SIF A > V
	PRINT  >
PRINT 실행치
PRINTV V

WAIT

;실행할 수 없다
SIF A < V
	RETURN 0

;-------------------------------------------------
;실행 결정
;-------------------------------------------------
STR:0 = 조수를 범한다
;-------------------------------------------------
;COM별 FLAG의 설정
;-------------------------------------------------
;행위자
TCVAR:116 = PLAYER
;TCVAR:0 사정 대상 플래그(비트 0=TARGET 1=PLAYER 2=MASTER 3=ASSI)
;TCVAR:1 예비 사정 대상 플래그(비트를 사용하고 싶지 않은 인용, CFLAG:100으로 번역됩니다)	(1=TARGET 2=PLAYER 3=MASTER 4=ASSI 5=TARGET+ASSI 6=MASTER+ASSI)
;TCVAR:2 사정장소 플래그(-1=콘돔 1=질내 2=애널 3=수음 4=펠라티오 5=파이즈리 6=가랑이 7=풋잡 8=체표 9=애널 봉사 10=도구 11=촉수)

SETBIT TCVAR:MASTER:0, 3
TCVAR:MASTER:2 = 1
;강도
TCVAR:MASTER:4 = 1500

TEQUIP:ASSI:50 = MASTER

;-------------------------------------------------
;소스 추가 처리
;-------------------------------------------------
;소비 체력, 기력
DOWNBASE:체력 += 0
DOWNBASE:기력 += 250

SOURCE:사랑 = 200
SOURCE:액체 = 100
SOURCE:굴종 = 1500
SOURCE:일탈 = 700
SOURCE:반감 = 700

;-------------------------------------------------
;특수소스처리
;-------------------------------------------------
;억압, 저항 소유에는, 억울소스 추가
SIF TALENT:자기애 < 0 || TALENT:저항
	SOURCE:울굴 += 700

;조수가 처녀상실을 했을 경우, 굴복과 일탈을 증가
IF TALENT:ASSI:처녀 == 1
	TIMES SOURCE:일탈 , 20.00
	TIMES SOURCE:굴종 , 3.00
ENDIF

;-------------------------------------------------
;더러움의 처리
;-------------------------------------------------
;사정에 관계없이 행해지는 처리는 여기에서
IF TALENT:MASTER:2 & 2
	;주인의 P⇔조수의 V의 더러움이 이동
	STAIN:MASTER:2 |= STAIN:ASSI:3
	STAIN:ASSI:3 |= STAIN:MASTER:2
ENDIF

;-------------------------------------------------
;경험의 처리
;-------------------------------------------------
;조수의 V경험
EXP:ASSI:V경험 += 1

;조수의 레즈경험;동성애 레즈비언이라면 반환값 1 동성애자라면 반환값 2
SIF HETEROSEX(ASSI, MASTER) == 1
	EXP:ASSI:레즈경험 += 10

RETURN 1

;-------------------------------------------------
;실행 판정
;-------------------------------------------------
@COM_ABLE185
LOCAL = 0
;조수를 범하는 실행 판정
SIF !TFLAG:100
	RETURN 0
;일괄관리
SIF GLOBAL_COMABLE(185)
	RETURN RESULT
;조수가 없으면 안 돼
SIF ASSI < 1
	RETURN 0
;주인이 아니면 안 돼
SIF ASSIPLAY
	RETURN 0
;조수가 남자라면 안 돼
SIF !(TALENT:ASSI:2 & 1)
	RETURN 0
;체격 차이가 있는 경우는 주인이 금단의지식 소유가 아니면 안 돼
SIF ABS(TALENT:체형 - TALENT:ASSI:체형) > 2 && (TALENT:MASTER:금단의지식 == 0)
	RETURN 0
;주인이 남자, 반인반요, 후타나리, 혹은 페니스밴드가 없으면 안 돼
SIF !(TALENT:MASTER:2 & 2) && ITEM:PBAND == 0
	RETURN 0
;밧줄 사용 중이거나 순종이 3이상 없으면 안 돼
SIF TEQUIP:밧줄 == 0 && ABL:순종 < 3
	RETURN 0
;목욕탕플레이중은 플레이매트가 없으면 안 돼
IF TEQUIP:31
	SIF ITEM:20 == 0 && NOITEM == 0
		RETURN 0
ENDIF
;새댁플레이중은 안 돼
SIF TEQUIP:33
	RETURN 0
;정지 중에는 불가
SIF FLAG:70 == 1
	RETURN 0
RETURN 1

path: ERB/커맨드관련/COMF/COMF185 조수를범함_t.ERB


path: ERB/커맨드관련/COMF/COMF186 수치플레이_t.ERB


path: ERB/커맨드관련/COMF/COMF187 욕실플레이_t.ERB


path: ERB/커맨드관련/COMF/COMF188 샤워_t.ERB


path: ERB/커맨드관련/COMF/COMF189 새댁플레이_t.ERB


path: ERB/커맨드관련/COMF/COMF19 키스_계속_t.ERB


path: ERB/커맨드관련/COMF/COMF190 에이프런을입힘_t.ERB


path: ERB/커맨드관련/COMF/COMF191 수면제_t.ERB