From 79323ab8324a46e878e2df708d0b196af93a3b21 Mon Sep 17 00:00:00 2001
From: vinumsabbathi <vinumsabbathi789@proton.me>
Date: Fri, 19 Jan 2024 09:16:37 -0500
Subject: [PATCH] [Neodev ready] Bugfixes for Parsee and Wriggle

---
 ...4\343\203\231\343\203\263\343\203\210.ERB" | 152 ++++++------
 ...3\343\203\236\343\203\263\343\203\211.ERB" | 152 ++++++------
 ...3\343\203\236\343\203\263\343\203\211.ERB" | 222 ++++++++++++++----
 ...3\343\203\236\343\203\263\343\203\211.ERB" |   2 +-
 ...3\343\203\236\343\203\263\343\203\211.ERB" |  17 +-
 .../M_KOJO_K27_\347\265\266\351\240\202.ERB"  |   4 +-
 .../Parsee/M_KOJO_K60_functions.ERB"          |   2 +-
 ...3\343\203\236\343\203\263\343\203\211.ERB" |   7 +-
 8 files changed, 368 insertions(+), 190 deletions(-)

diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\202\244\343\203\231\343\203\263\343\203\210.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\202\244\343\203\231\343\203\263\343\203\210.ERB"
index 640cf2030c..82f9089c52 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\202\244\343\203\231\343\203\263\343\203\210.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\202\244\343\203\231\343\203\263\343\203\210.ERB"	
@@ -2405,93 +2405,95 @@ IF LOCAL
 	LOCAL:1 = 1
 	;-------------------------------------------------
 	IF LOCAL:1 && ARG == 2
-		IF IN_HEAT()
-			IF HAS_VAGINA([[リグル]])
-				PRINTFORMW 「%MOAN("l")%... %MOAN("l")%...」
-				IF FIRSTTIME("WrigglesBreedingKink")
-					PRINTFORMDW %CALLNAME:[[リグル]]% rolls over and covers %HIS_HER([[リグル]])% face.
-					PRINTFORMW 「Aaaahh... I can't believe I said all that stuff when you came inside me...」
-					PRINTFORMW 「I think my heat drove me a little crazy.」
-					PRINTFORMDW You pat %CALLNAME:[[リグル]]%'s shoulder and tell %HIS_HER([[リグル]])% %HE_SHE([[リグル]])% has nothing to be ashamed of.
-					PRINTFORMDW It was %HIS_HER([[リグル]])% heat talking, not %HIM_HER([[リグル]])%. And honestly... it was kind of hot.
-					PRINTFORMW 「...Really?」
-					PRINTFORMDW %CALLNAME:[[リグル]]% rolls back over and smiles at you.
-					PRINTFORMW 「Even the "Get me pregnant! Get me pregnant!" stuff?」
-					PRINTFORMDW Okay, that was a little over the top... but everything else was good.
-					PRINTFORMDW %CALLNAME:[[リグル]]% laughs and snuggles up against you.
+		IF SHIRAHU([[リグル]])
+			IF IN_HEAT()
+				IF HAS_VAGINA([[リグル]])
+					PRINTFORMW 「%MOAN("l")%... %MOAN("l")%...」
+					IF FIRSTTIME("WrigglesBreedingKink")
+						PRINTFORMDW %CALLNAME:[[リグル]]% rolls over and covers %HIS_HER([[リグル]])% face.
+						PRINTFORMW 「Aaaahh... I can't believe I said all that stuff when you came inside me...」
+						PRINTFORMW 「I think my heat drove me a little crazy.」
+						PRINTFORMDW You pat %CALLNAME:[[リグル]]%'s shoulder and tell %HIS_HER([[リグル]])% %HE_SHE([[リグル]])% has nothing to be ashamed of.
+						PRINTFORMDW It was %HIS_HER([[リグル]])% heat talking, not %HIM_HER([[リグル]])%. And honestly... it was kind of hot.
+						PRINTFORMW 「...Really?」
+						PRINTFORMDW %CALLNAME:[[リグル]]% rolls back over and smiles at you.
+						PRINTFORMW 「Even the "Get me pregnant! Get me pregnant!" stuff?」
+						PRINTFORMDW Okay, that was a little over the top... but everything else was good.
+						PRINTFORMDW %CALLNAME:[[リグル]]% laughs and snuggles up against you.
+					ELSE
+						PRINTFORMW 「I'm really starting to enjoy mating season now that I have you.」
+						PRINTFORMDW %CALLNAME:[[リグル]]% smiles and snuggles up against you.
+					ENDIF
 				ELSE
-					PRINTFORMW 「I'm really starting to enjoy mating season now that I have you.」
-					PRINTFORMDW %CALLNAME:[[リグル]]% smiles and snuggles up against you.
+					IF FIRSTTIME("MaleWrigglePostHeatSex")
+						PRINTFORMW 「Ahh... I feel like a new man.」
+						PRINTFORMDW %CALLNAME:[[リグル]]% props %HIMSELF_HERSELF([[リグル]])% up on an arm and grins at you.
+						PRINTFORMW 「How about you?」
+						SIF !IS_MALE(MASTER)
+							PRINTFORMW 「Well, for you, I guess it'd be "a new woman"...」
+					ELSE
+						PRINTFORMW 「Ahh... that's better.」
+						PRINTFORMDW %CALLNAME:[[リグル]]% props %HIMSELF_HERSELF([[リグル]])% up on an arm and grins at you.
+						PRINTFORMW 「Was it good for you, too?」
+					ENDIF
 				ENDIF
 			ELSE
-				IF FIRSTTIME("MaleWrigglePostHeatSex")
-					PRINTFORMW 「Ahh... I feel like a new man.」
-					PRINTFORMDW %CALLNAME:[[リグル]]% props %HIMSELF_HERSELF([[リグル]])% up on an arm and grins at you.
-					PRINTFORMW 「How about you?」
-					SIF !IS_MALE(MASTER)
-						PRINTFORMW 「Well, for you, I guess it'd be "a new woman"...」
-				ELSE
-					PRINTFORMW 「Ahh... that's better.」
-					PRINTFORMDW %CALLNAME:[[リグル]]% props %HIMSELF_HERSELF([[リグル]])% up on an arm and grins at you.
-					PRINTFORMW 「Was it good for you, too?」
-				ENDIF
-			ENDIF
-		ELSE
-			PRINTFORMW 「Mmm... that was nice.」
-			PRINTFORMDW %CALLNAME:[[リグル]]% strokes your cheek.
-			IF !FIRSTTIME("WrigglesBreedingKink", 1) || !FIRSTTIME("MaleWrigglePostHeatSex", 1)
-				IF FIRSTTIME("RegularSexAfterHeatSex")
-					PRINTFORMW 「It wasn't as intense as sex when I'm in heat... but I liked it.」
-					PRINTFORMW 「It was nice being able to focus on making love and not just "having sex", you know?」
-					PRINTFORMDW %CALLNAME:[[リグル]]% grins.
-					PRINTFORMW 「Plus I didn't sound like a crazy slut. At least, I hope I didn't.」
-				ELSE
-					SELECTCASE RAND:2
-						CASE 0
-							PRINTFORML 「I like sex with you when I'm in heat, and I like sex with you when I'm not...」
-							PRINTFORMW 「But I really like cuddling afterwards.」
-							PRINTFORMDW %CALLNAME:[[リグル]]% kisses your cheek.
-							PRINTFORMW 「I guess I'm just real sentimental, huh?」
+				PRINTFORMW 「Mmm... that was nice.」
+				PRINTFORMDW %CALLNAME:[[リグル]]% strokes your cheek.
+				IF !FIRSTTIME("WrigglesBreedingKink", 1) || !FIRSTTIME("MaleWrigglePostHeatSex", 1)
+					IF FIRSTTIME("RegularSexAfterHeatSex")
+						PRINTFORMW 「It wasn't as intense as sex when I'm in heat... but I liked it.」
+						PRINTFORMW 「It was nice being able to focus on making love and not just "having sex", you know?」
+						PRINTFORMDW %CALLNAME:[[リグル]]% grins.
+						PRINTFORMW 「Plus I didn't sound like a crazy slut. At least, I hope I didn't.」
+					ELSE
+						SELECTCASE RAND:2
+							CASE 0
+								PRINTFORML 「I like sex with you when I'm in heat, and I like sex with you when I'm not...」
+								PRINTFORMW 「But I really like cuddling afterwards.」
+								PRINTFORMDW %CALLNAME:[[リグル]]% kisses your cheek.
+								PRINTFORMW 「I guess I'm just real sentimental, huh?」
 
-						CASE 1
-							PRINTFORMW 「So am I getting better? I wanna keep honing my skills until I become a true master of sex!」
-					ENDSELECT
-				ENDIF
-			ELSE
-				IF FIRSTTIME("HeatSexHelpRequest")
-					PRINTFORMW 「So you'll help me out when I go into heat, right～?」
+							CASE 1
+								PRINTFORMW 「So am I getting better? I wanna keep honing my skills until I become a true master of sex!」
+						ENDSELECT
+					ENDIF
 				ELSE
-					PRINTFORML 「So, when do you wanna do it again? I wanna keep "training" with you!」
-					PRINTFORMW 「I'll become the best sexer ever! Just you wait and see!」
+					IF FIRSTTIME("HeatSexHelpRequest")
+						PRINTFORMW 「So you'll help me out when I go into heat, right～?」
+					ELSE
+						PRINTFORML 「So, when do you wanna do it again? I wanna keep "training" with you!」
+						PRINTFORMW 「I'll become the best sexer ever! Just you wait and see!」
+					ENDIF
 				ENDIF
 			ENDIF
-		ENDIF
 
 		;Cumflation reactions
-		IF NOWEX:TARGET:膣内精液 >= 3000
-			PRINTFORMDL 
-			IF NOWEX:TARGET:膣内精液 >= 30000
-				PRINTFORMW 「Oooh...」
-				PRINTFORMDW You can't even see %CALLNAME:[[リグル]]% anymore. %HES_SHES([[リグル]],1)% completely hidden behind %HIS_HER([[リグル]])% cum-filled belly.
-				PRINTFORMW 「I think I'm just gonna... stay here for a while.」
-				PRINTFORMW 「I don't think I can even fly with this much of your stuff inside me...」
-			ELSEIF NOWEX:TARGET:膣内精液 >= 10000
-				PRINTFORMDW %CALLNAME:[[リグル]]% stares at %HIS_HER([[リグル]])% cum-filled belly in awe.
-				PRINTFORMW 「It's almost as big as the rest of me. Good thing I can fly...」
-			ELSEIF NOWEX:TARGET:膣内精液 >= 6000
-				IF CFLAG:[[リグル]]:現在位置 == CFLAG:MASTER:初期位置
-					PRINTFORMW 「Um... do you mind if I sleep here tonight?」
+			IF NOWEX:TARGET:膣内精液 >= 3000
+				PRINTFORMDL 
+				IF NOWEX:TARGET:膣内精液 >= 30000
+					PRINTFORMW 「Oooh...」
+					PRINTFORMDW You can't even see %CALLNAME:[[リグル]]% anymore. %HES_SHES([[リグル]],1)% completely hidden behind %HIS_HER([[リグル]])% cum-filled belly.
+					PRINTFORMW 「I think I'm just gonna... stay here for a while.」
+					PRINTFORMW 「I don't think I can even fly with this much of your stuff inside me...」
+				ELSEIF NOWEX:TARGET:膣内精液 >= 10000
+					PRINTFORMDW %CALLNAME:[[リグル]]% stares at %HIS_HER([[リグル]])% cum-filled belly in awe.
+					PRINTFORMW 「It's almost as big as the rest of me. Good thing I can fly...」
+				ELSEIF NOWEX:TARGET:膣内精液 >= 6000
+					IF CFLAG:[[リグル]]:現在位置 == CFLAG:MASTER:初期位置
+						PRINTFORMW 「Um... do you mind if I sleep here tonight?」
+					ELSE
+						PRINTFORMW 「Um... can you give me a hand? I think I need some help getting back to my room without anyone else seeing me.」
+					ENDIF
+					PRINTFORMDW %CALLNAME:[[リグル]]% grins sheepishly and pats %HIS_HER([[リグル]])% cum-filled belly.
+					PRINTFORMW 「I don't want people thinking I'm nine months pregnant with a couple thousand eggs. Plus, I'm not sure if I can even walk...」
 				ELSE
-					PRINTFORMW 「Um... can you give me a hand? I think I need some help getting back to my room without anyone else seeing me.」
+					PRINTFORMW 「Hey... can you help pull me up?」
+					PRINTFORMDW You take %CALLNAME:[[リグル]]%'s arm and help %HIM_HER([[リグル]])% get into a sitting position.
+					PRINTFORMW 「Thanks. After how much you came inside me, I feel like I'm pregnant with a dozen clutches of eggs...」
 				ENDIF
-				PRINTFORMDW %CALLNAME:[[リグル]]% grins sheepishly and pats %HIS_HER([[リグル]])% cum-filled belly.
-				PRINTFORMW 「I don't want people thinking I'm nine months pregnant with a couple thousand eggs. Plus, I'm not sure if I can even walk...」
-			ELSE
-				PRINTFORMW 「Hey... can you help pull me up?」
-				PRINTFORMDW You take %CALLNAME:[[リグル]]%'s arm and help %HIM_HER([[リグル]])% get into a sitting position.
-				PRINTFORMW 「Thanks. After how much you came inside me, I feel like I'm pregnant with a dozen clutches of eggs...」
+				PRINTFORMW 「How the heck did I manage to take it all, anyway? And how the heck did you manage to make that much?」
 			ENDIF
-			PRINTFORMW 「How the heck did I manage to take it all, anyway? And how the heck did you manage to make that much?」
 		ENDIF
 		RETURN 1
 	ENDIF
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\203\217\343\203\274\343\203\211\343\201\252\343\202\263\343\203\236\343\203\263\343\203\211.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\203\217\343\203\274\343\203\211\343\201\252\343\202\263\343\203\236\343\203\263\343\203\211.ERB"
index 54846f4bd6..f59667d46f 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\203\217\343\203\274\343\203\211\343\201\252\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\343\203\217\343\203\274\343\203\211\343\201\252\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
@@ -24,74 +24,90 @@ IF LOCAL
 	;記入チェック
 	LOCAL:1 = 1
 	;-------------------------------------------------
-	IF LOCAL:1 && FIRSTTIME("WriggleFacefuck",1) && SHIRAHU([[リグル]])
-		PRINTFORMDW %CALLNAME:[[リグル]]% rubs %HIS_HER(TARGET)% forehead.
-		PRINTFORMW 「Okay, one last try. Three fingers means "stop", two fingers means "slow down"...」
-		PRINTFORMDW You resist the urge to sigh and explain for maybe the sixth time that one finger means "stop".
-		PRINTFORMDW Three fingers mean "keep going".
-		PRINTFORMW 「Ah, I'm never gonna remember this crap!」
-		PRINTFORMDW %CALLNAME:[[リグル]]% makes a face.
-		PRINTFORMW 「Do we really need safewords? I'm a youkai, and you're a human. It's not like you can do any real harm to me.」
-		PRINTFORMW 「And if I want you to stop, I can just push you off me.」
-		PRINTFORMDW Now you do sigh.
-		PRINTFORMDW You look %CALLNAME:[[リグル]]% straight in the eyes and explain in your best \@ IS_MALE(MASTER) ? dom # domme\@ voice:
-		PRINTFORMDW If %HE_SHE([[リグル]])% going to act like a brat instead of keeping things safe, sane, and consensual...
-		PRINTFORMDW You aren't doing anything with %HIM_HER([[リグル]])% other than vanilla sex.
-		PRINTFORMDW %CALLNAME:[[リグル]]% swallows and licks %HIS_HER([[リグル]])% lips.
-		PRINTFORMW 「Y-Yes, \@ IS_MALE(MASTER) ? Master # Mistress\@. Got it...」
-		PRINTFORMDW %HE_SHE([[リグル]])% thinks for a moment.
-		PRINTFORMW 「How about I just squeeze your shoulder if I want you to stop or back off? I can tell you which one once we pause.」
-		PRINTFORMDW Perfect. You smile, give her a hug and quick kiss on the cheek, and tell %HIM_HER([[リグル]])% what a good %PRINT_MALE("boy", [[リグル]])% she is.
-		PRINTFORMDW %CALLNAME:[[リグル]]% grins and blushes.
-		PRINTFORMW 「Ehe... thank you, \@ IS_MALE(MASTER) ? Master # Mistress\@.」
-		PRINTFORMW 「But I think I've done enough talking. Why don't you show me what my mouth is for?」
-		PRINTFORMDW You look her in the eyes again, and grin a predator's grin.
-		PRINTFORMDW You don't make a move yet. You want to build up the tension to make it more exciting for %HIM_HER([[リグル]])%.
-		PRINTFORMDW And then, once you think you've made %HIM_HER([[リグル]])% wait long enough...
-		PRINTFORMDW %BREAKENG(@"You grab %CALLNAME:[[リグル]]%'s hair, yank %HIS_HER([[リグル]])% head down to your crotch, and slam %HIS_HER([[リグル]])% head down onto your %FSYN("penis")%.")%
-		CALLF FIRSTTIME("WriggleFacefuck");
-		RETURN 1
-	ELSEIF ABL:[[リグル]]:舌 <= 1
-		SELECTCASE RAND:3
-			CASE 0
-				PRINTFORMW 「Gk!」
-				PRINTFORMDL %CALLNAME:[[リグル]]% starts gagging as you thrust into %HIS_HER([[リグル]])% mouth.
-				PRINTFORMDW You pull %HIM_HER([[リグル]])% off your %FSYN("penis")% and ask if everything's okay.
-				PRINTFORMDW %HE_SHE([[リグル]],1)% coughs a few times, wipes %HIS_HER([[リグル]])% mouth, and smiles at you.
-				PRINTFORMW 「Y-Yeah, I'm fine... I think I'm not used to taking you that deep.」
-				PRINTFORMW 「Maybe... half as deep would work?」
-				PRINTFORMDL You nod, move %HIS_HER([[リグル]])% head back down, and start facefucking %HIS_HER([[リグル]])% again.
-				PRINTFORMDW This time you move slower and don't go as deep into %HIS_HER([[リグル]])% throat.
-			CASE 1
-				PRINTFORMDW %CALLNAME:[[リグル]]% sits there awkwardly while you facefuck %HIM_HER([[リグル]])%.
-			CASE 2
-				PRINTFORMDW %CALLNAME:[[リグル]]% awkwardly moves %HIS_HER([[リグル]])% tongue around while you facefuck %HIM_HER([[リグル]])%.
-		ENDSELECT
-	ELSEIF ABL:[[リグル]]:舌 <= 3
-		SELECTCASE RAND:3
-			CASE 0
-				PRINTFORMDW %CALLNAME:[[リグル]]% is taking almost your entire length down %HIS_HER([[リグル]])% throat.
-				PRINTFORMDW %BREAKENG(@"%HE_SHE([[リグル]],1)% isn't doing anything other than letting you use %HIS_HER([[リグル]])% mouth as a meat onahole, but %HE_SHE([[リグル]])% doesn't need to.")%
-				PRINTFORMDW %HIS_HER([[リグル]],1)% throat is almost as good as a %FSYN("vagina")%.
-			CASE 1
-				PRINTFORMDW %CALLNAME:[[リグル]]% adjusts %HIS_HER([[リグル]])% tongue %FSYN("penis")% as you facefuck %HIM_HER([[リグル]])%.
-				PRINTFORMDW Now it feels like you're bottoming out inside %HIS_HER([[リグル]])% mouth.
-			CASE 2
-				PRINTFORMDW %CALLNAME:[[リグル]]% takes your hand and guides it to one of %HIS_HER([[リグル]])% nipples.
-				PRINTFORMDW You smile, and alternate between teasing it and thrusting into her mouth.
-		ENDSELECT
-	ELSE
-		SELECTCASE RAND:3
-			CASE 0
-				PRINTFORMW 「F'str!」
-				PRINTFORMDW You speed up the pace of your thrusts.
-				PRINTFORMDW %CALLNAME:[[リグル]]% moans around your %FSYN("penis")% as %HE_SHE([[リグル]])% pleasures %HIM_HER([[リグル]])%with %HIS_HER([[リグル]])% free hand.
-			CASE 1
-				PRINTFORMDW %CALLNAME:[[リグル]]% moves %HIS_HER([[リグル]])% head in time with your strokes, ensuring you bottom out every time you thrust.
-			CASE 2
-				PRINTFORMDW %CALLNAME:[[リグル]]% adjusts %HIS_HER([[リグル]])% tongue as you facefuck %HIS_HER([[リグル]])%.
-				PRINTFORMDW %BREAKENG(@"As %HE_SHE([[リグル]])% does, %HE_SHE([[リグル]])% listens to your moans, trying to figure out what position gives you the most pleasure.")%
-		ENDSELECT
+	IF LOCAL:1
+		;Time stop
+		;時姦中
+		IF FLAG:70
+			RETURN 1
+		;睡姦中
+		;Sleep rape
+		ELSEIF CFLAG:MASTER:イタズラ == 2
+			RETURN 1
+		;Character is drunk
+	;Conscious rape
+		ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+			RETURN 1
+		ELSEIF TCVAR:TARGET:泥酔 == 1
+			RETURN 1
+		ELSEIF FIRSTTIME("WriggleFacefuck",1)
+			PRINTFORMDW %CALLNAME:[[リグル]]% rubs %HIS_HER(TARGET)% forehead.
+			PRINTFORMW 「Okay, one last try. Three fingers means "stop", two fingers means "slow down"...」
+			PRINTFORMDW You resist the urge to sigh and explain for maybe the sixth time that one finger means "stop".
+			PRINTFORMDW Three fingers means "keep going".
+			PRINTFORMW 「Ah, I'm never gonna remember this crap!」
+			PRINTFORMDW %CALLNAME:[[リグル]]% makes a face.
+			PRINTFORMW 「Do we really need safewords? I'm a youkai, and you're a human. It's not like you can do any real harm to me.」
+			PRINTFORMW 「And if I want you to stop, I can just push you off me.」
+			PRINTFORMDW Now you do sigh.
+			PRINTFORMDW You look %CALLNAME:[[リグル]]% straight in the eyes and explain in your best \@ IS_MALE(MASTER) ? dom # domme\@ voice:
+			PRINTFORMDW If %HE_SHE([[リグル]])% going to act like a brat instead of keeping things safe, sane, and consensual...
+			PRINTFORMDW You aren't doing anything with %HIM_HER([[リグル]])% other than vanilla sex.
+			PRINTFORMDW %CALLNAME:[[リグル]]% swallows and licks %HIS_HER([[リグル]])% lips.
+			PRINTFORMW 「Y-Yes, \@ IS_MALE(MASTER) ? Master # Mistress\@. Got it...」
+			PRINTFORMDW %HE_SHE([[リグル]])% thinks for a moment.
+			PRINTFORMW 「How about I just squeeze your shoulder if I want you to stop or back off? I can tell you which one once we pause.」
+			PRINTFORMDW Perfect. You smile, give her a hug and quick kiss on the cheek, and tell %HIM_HER([[リグル]])% what a good %PRINT_MALE("boy", [[リグル]])% she is.
+			PRINTFORMDW %CALLNAME:[[リグル]]% grins and blushes.
+			PRINTFORMW 「Ehe... thank you, \@ IS_MALE(MASTER) ? Master # Mistress\@.」
+			PRINTFORMW 「But I think I've done enough talking. Why don't you show me what my mouth is for?」
+			PRINTFORMDW You look her in the eyes again, and grin a predator's grin.
+			PRINTFORMDW You don't make a move yet. You want to build up the tension to make it more exciting for %HIM_HER([[リグル]])%.
+			PRINTFORMDW And then, once you think you've made %HIM_HER([[リグル]])% wait long enough...
+			PRINTFORMDW %BREAKENG(@"You grab %CALLNAME:[[リグル]]%'s hair, yank %HIS_HER([[リグル]])% head down to your crotch, and slam %HIS_HER([[リグル]])% head down onto your %FSYN("penis")%.")%
+			CALLF FIRSTTIME("WriggleFacefuck")
+			RETURN 1
+		ELSEIF ABL:[[リグル]]:舌 <= 1
+			SELECTCASE RAND:3
+				CASE 0
+					PRINTFORMW 「Gk!」
+					PRINTFORMDL %CALLNAME:[[リグル]]% starts gagging as you thrust into %HIS_HER([[リグル]])% mouth.
+					PRINTFORMDW You pull %HIM_HER([[リグル]])% off your %FSYN("penis")% and ask if everything's okay.
+					PRINTFORMDW %HE_SHE([[リグル]],1)% coughs a few times, wipes %HIS_HER([[リグル]])% mouth, and smiles at you.
+					PRINTFORMW 「Y-Yeah, I'm fine... I think I'm not used to taking you that deep.」
+					PRINTFORMW 「Maybe... half as deep would work?」
+					PRINTFORMDL You nod, move %HIS_HER([[リグル]])% head back down, and start facefucking %HIS_HER([[リグル]])% again.
+					PRINTFORMDW This time you move slower and don't go as deep into %HIS_HER([[リグル]])% throat.
+				CASE 1
+					PRINTFORMDW %CALLNAME:[[リグル]]% sits there awkwardly while you facefuck %HIM_HER([[リグル]])%.
+				CASE 2
+					PRINTFORMDW %CALLNAME:[[リグル]]% awkwardly moves %HIS_HER([[リグル]])% tongue around while you facefuck %HIM_HER([[リグル]])%.
+			ENDSELECT
+		ELSEIF ABL:[[リグル]]:舌 <= 3
+			SELECTCASE RAND:3
+				CASE 0
+					PRINTFORMDW %CALLNAME:[[リグル]]% is taking almost your entire length down %HIS_HER([[リグル]])% throat.
+					PRINTFORMDW %BREAKENG(@"%HE_SHE([[リグル]],1)% isn't doing anything other than letting you use %HIS_HER([[リグル]])% mouth as a meat onahole, but %HE_SHE([[リグル]])% doesn't need to.")%
+					PRINTFORMDW %HIS_HER([[リグル]],1)% throat is almost as good as a %FSYN("vagina")%.
+				CASE 1
+					PRINTFORMDW %CALLNAME:[[リグル]]% adjusts %HIS_HER([[リグル]])% tongue %FSYN("penis")% as you facefuck %HIM_HER([[リグル]])%.
+					PRINTFORMDW Now it feels like you're bottoming out inside %HIS_HER([[リグル]])% mouth.
+				CASE 2
+					PRINTFORMDW %CALLNAME:[[リグル]]% takes your hand and guides it to one of %HIS_HER([[リグル]])% nipples.
+					PRINTFORMDW You smile, and alternate between teasing it and thrusting into her mouth.
+			ENDSELECT
+		ELSE
+			SELECTCASE RAND:3
+				CASE 0
+					PRINTFORMW 「F'str!」
+					PRINTFORMDW You speed up the pace of your thrusts.
+					PRINTFORMDW %CALLNAME:[[リグル]]% moans around your %FSYN("penis")% as %HE_SHE([[リグル]])% pleasures %HIM_HER([[リグル]])%with %HIS_HER([[リグル]])% free hand.
+				CASE 1
+					PRINTFORMDW %CALLNAME:[[リグル]]% moves %HIS_HER([[リグル]])% head in time with your strokes, ensuring you bottom out every time you thrust.
+				CASE 2
+					PRINTFORMDW %CALLNAME:[[リグル]]% adjusts %HIS_HER([[リグル]])% tongue as you facefuck %HIS_HER([[リグル]])%.
+					PRINTFORMDW %BREAKENG(@"As %HE_SHE([[リグル]])% does, %HE_SHE([[リグル]])% listens to your moans, trying to figure out what position gives you the most pleasure.")%
+			ENDSELECT
+		ENDIF
 	ENDIF
 ENDIF
 RETURN 1
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\200\247\344\272\244\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\200\247\344\272\244\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"
index 773367f15a..5083f1baec 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\200\247\344\272\244\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\200\247\344\272\244\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
@@ -29,8 +29,24 @@ IF LOCAL && TFLAG:193
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			CALL K27_VAGINAL_VIRGINITY_LOSS()
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				CALL K27_VAGINAL_VIRGINITY_LOSS()
+				RETURN 1
+			ENDIF
 		ELSE
 			PRINTFORMW 
 			RETURN 1
@@ -87,10 +103,26 @@ IF LOCAL
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			PRINTFORMDW %CALLNAME:[[リグル]]% smiles nervously at you and spreads %HIS_HER([[リグル]])% legs.
-			PRINTFORMW 「I, um..uh...」
-			CALL K27_VAGINAL_VIRGINITY_LOSS("missionary")
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				PRINTFORMDW %CALLNAME:[[リグル]]% smiles nervously at you and spreads %HIS_HER([[リグル]])% legs.
+				PRINTFORMW 「I, um..uh...」
+				CALL K27_VAGINAL_VIRGINITY_LOSS("missionary")
+				RETURN 1
+			ENDIF
 		ELSE
 			PRINTFORMW 
 			RETURN 1
@@ -161,10 +193,26 @@ IF LOCAL && TFLAG:193
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			PRINTFORMW 「Uhh... I'd rather look at your face when we do it.」
-			PRINTFORMW 「But I guess this is okay. It's just...」
-			CALL K27_VAGINAL_VIRGINITY_LOSS()
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				PRINTFORMW 「Uhh... I'd rather look at your face when we do it.」
+				PRINTFORMW 「But I guess this is okay. It's just...」
+				CALL K27_VAGINAL_VIRGINITY_LOSS()
+				RETURN 1
+			ENDIF
 		ELSE
 			RETURN 1
 		ENDIF
@@ -219,18 +267,50 @@ IF LOCAL
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			PRINTFORMDW %CALLNAME:[[リグル]]% smiles at you before %HE_SHE([[リグル]])% gets on %HIS_HER([[リグル]])% hands and knees.
-			PRINTFORMW 「Doing it this way feels... natural, somehow.」
-			PRINTFORMW 「But, um...」
-			CALL K27_VAGINAL_VIRGINITY_LOSS()
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				PRINTFORMDW %CALLNAME:[[リグル]]% smiles at you before %HE_SHE([[リグル]])% gets on %HIS_HER([[リグル]])% hands and knees.
+				PRINTFORMW 「Doing it this way feels... natural, somehow.」
+				PRINTFORMW 「But, um...」
+				CALL K27_VAGINAL_VIRGINITY_LOSS()
+			ENDIF
 			RETURN 1
 		ELSE
-			PRINTFORMW 「Heh... it's weird, but doing it this way feels... natural, somehow.」
-			PRINTFORML 「Maybe it's 'cause I'm a bug youkai? I always see bugs mating that wa-」
-			PRINTFORMW 「Crap, I'm killing the mood again...」
-			PRINTFORMDW Wriggle sighs.
-			PRINTFORMW 「I'll make it up to you by doing something you like after you cum.」
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				PRINTFORMW 「Heh... it's weird, but doing it this way feels... natural, somehow.」
+				PRINTFORML 「Maybe it's 'cause I'm a bug youkai? I always see bugs mating that wa-」
+				PRINTFORMW 「Crap, I'm killing the mood again...」
+				PRINTFORMDW Wriggle sighs.
+				PRINTFORMW 「I'll make it up to you by doing something you like after you cum.」
+				RETURN 1
+			ENDIF
 		ENDIF
 	ENDIF
 	;-------------------------------------------------
@@ -424,11 +504,27 @@ IF LOCAL && TFLAG:193
 			PRINTFORMW 
 			RETURN 1
 		ELSE
-			CALL HPH_PRINT, @"「You really like my butt, huh? You pervHPH」", "W"
-			PRINTFORMDW %CALLNAME:[[リグル]]% looks over %HIS_HER([[リグル]])% shoulder, smiles, and gives %HIS_HER([[リグル]])% ass a playful slap.
-			PRINTFORML 「But it's okay. You've made me into a perv too～」
-			CALL HPH_PRINT, @"「And this perv likes it when cute %PRINT_MALE("guy", MASTER)%s stick it in %HIS_HER([[リグル]])% buttHPH」", "W"
-			RETURN 1
+					;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				CALL HPH_PRINT, @"「You really like my butt, huh? You pervHPH」", "W"
+				PRINTFORMDW %CALLNAME:[[リグル]]% looks over %HIS_HER([[リグル]])% shoulder, smiles, and gives %HIS_HER([[リグル]])% ass a playful slap.
+				PRINTFORML 「But it's okay. You've made me into a perv too～」
+				CALL HPH_PRINT, @"「And this perv likes it when cute %PRINT_MALE("guy", MASTER)%s stick it in %HIS_HER([[リグル]])% buttHPH」", "W"
+				RETURN 1
+			ENDIF
 		ENDIF
 	ENDIF
 	;-------------------------------------------------
@@ -615,11 +711,27 @@ IF LOCAL
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			PRINTFORMW 「Hehe... it's weird for a bug to be squashing someone else, isn't it?」
-			PRINTFORMDW %CALLNAME:[[リグル]]% leans forward and kisses your forehead.
-			PRINTFORMW 「But, um...」
-			CALL K27_VAGINAL_VIRGINITY_LOSS()
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+			ELSE
+				PRINTFORMW 「Hehe... it's weird for a bug to be squashing someone else, isn't it?」
+				PRINTFORMDW %CALLNAME:[[リグル]]% leans forward and kisses your forehead.
+				PRINTFORMW 「But, um...」
+				CALL K27_VAGINAL_VIRGINITY_LOSS()
+				RETURN 1
+			ENDIF
 		ELSE
 			PRINTFORMW 
 			RETURN 1
@@ -754,11 +866,26 @@ IF LOCAL
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			PRINTFORMW 「What did you say this position was called again?」
-			PRINTFORMW 「The lotus position? Huh.」
-			PRINTFORMW 「Well, I'm never gonna forget that! Because, um...」
-			CALL K27_VAGINAL_VIRGINITY_LOSS()
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+				PRINTFORMW 「What did you say this position was called again?」
+				PRINTFORMW 「The lotus position? Huh.」
+				PRINTFORMW 「Well, I'm never gonna forget that! Because, um...」
+				CALL K27_VAGINAL_VIRGINITY_LOSS()
+				RETURN 1
+			ENDIF
 		ELSE
 			PRINTFORMW 
 			RETURN 1
@@ -821,11 +948,26 @@ IF LOCAL
 	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
 		;処女
 		IF TCVAR:破瓜 == 1
-			PRINTFORMW 「What did you say this position was called again?」
-			PRINTFORMW 「The reverse lotus position? Huh.」
-			PRINTFORMW 「Well, I'm never gonna forget that! Because, um...」
-			CALL K27_VAGINAL_VIRGINITY_LOSS()
-			RETURN 1
+				;Time stop
+		;時姦中
+			IF FLAG:70
+				RETURN 1
+		;睡姦中
+		;Sleep rape
+			ELSEIF CFLAG:MASTER:イタズラ == 2
+				RETURN 1
+		;Character is drunk
+	;Conscious rape
+			ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+				RETURN 1
+			ELSEIF TCVAR:TARGET:泥酔 == 1
+				RETURN 1
+				PRINTFORMW 「What did you say this position was called again?」
+				PRINTFORMW 「The reverse lotus position? Huh.」
+				PRINTFORMW 「Well, I'm never gonna forget that! Because, um...」
+				CALL K27_VAGINAL_VIRGINITY_LOSS()
+				RETURN 1
+			ENDIF
 		ELSE
 			PRINTFORMW 
 			RETURN 1
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\204\233\346\222\253\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\204\233\346\222\253\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"
index 1786a0e6b5..a3efb80bfb 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\204\233\346\222\253\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\204\233\346\222\253\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
@@ -852,7 +852,7 @@ IF LOCAL
 	;記入チェック
 	LOCAL:1 = 1
 	;-------------------------------------------------
-	IF LOCAL:1 && CFLAG:[[リグル]]:K27EN_WRIGGLE_OLD_RAW_PERMISSION != 2 && HAS_VAGINA([[リグル]])
+	IF LOCAL:1 && CFLAG:[[リグル]]:K27EN_WRIGGLE_OLD_RAW_PERMISSION != 2 && HAS_VAGINA([[リグル]]) && SHIRAHU([[リグル]])
 		PRINTFORML 「Hm? Why'd you stop?」
 		PRINTFORMW 「Is something wrong?」
 		CALL ASK_M("No, nothing's wrong", 1, @"I was wondering if you \@ K27EN_WRIGGLE_OLD_RAW_PERMISSION == 1 ? wanted to have children with me # want to do it raw when it's not a dangerous day\@", CFLAG:[[リグル]]:K27EN_WRIGGLE_OLD_RAW_PERMISSION < 2)
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"
index 40d57552b5..5ea01b9105 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
@@ -1645,7 +1645,22 @@ LOCAL = 1
 ;-------------------------------------------------
 IF LOCAL
 
-	IF TCVAR:抱き寄せ初回
+		;Time stop
+		;時姦中
+	IF FLAG:70
+		RETURN 1
+		;睡姦中
+		;Sleep rape
+	ELSEIF CFLAG:MASTER:イタズラ == 2
+		RETURN 1
+		;Character is drunk
+	;Conscious rape
+	ELSEIF (TCVAR:無理矢理 || CFLAG:無理矢理膣射)
+		RETURN 1
+	ELSEIF TCVAR:TARGET:泥酔 == 1
+		RETURN 1
+
+	ELSEIF TCVAR:抱き寄せ初回
 		SELECTCASE TCVAR:抱き寄せ初回
 
 			CASE 1
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\347\265\266\351\240\202.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\347\265\266\351\240\202.ERB"
index ee7f6ed6ee..448834414d 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\347\265\266\351\240\202.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/027 Wriggle [\343\203\252\343\202\260\343\203\253]/Wriggle/M_KOJO_K27_\347\265\266\351\240\202.ERB"	
@@ -701,7 +701,7 @@ CALL PALAM_MESSAGE_A
 ;記入チェック（=0, 非表示、1, 表示）
 LOCAL = 1
 ;-------------------------------------------------
-IF LOCAL
+IF LOCAL && SHIRAHU([[リグル]])
 	IF IN_HEAT() && HAS_VAGINA([[リグル]])
 		PRINTFORML 「No... no!」
 		PRINTFORMW 「That's the wrong hole...!」
@@ -762,7 +762,7 @@ CALL PALAM_MESSAGE_A
 ;記入チェック（=0, 非表示、1, 表示）
 LOCAL = 1
 ;-------------------------------------------------
-IF LOCAL
+IF LOCAL && SHIRAHU([[リグル]])
 	IF IN_HEAT() 
 		IF TEQUIP:PLAYER:コンドーム
 			PRINTFORML 「No! Take it off!」
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_functions.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_functions.ERB"
index b4e214c24f..3f092f2f1a 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_functions.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_functions.ERB"	
@@ -2889,7 +2889,7 @@ IF ARG
             PRINTFORMW 「Finally...」
             PRINTFORMW 「I don't have to be ashamed of being a virgin any longer. Thank you, %K60_MASTER()%...」
             SIF ARGS == "missionary" || ARGS == "cowgirl"
-                PRINTFORMDW Parsee grARGS == "missionary" || ARGS == "cowgirl"abs you and hugs you tightly.
+                PRINTFORMDW Parsee grabs you and hugs you tightly.
             PRINTFORMDW It really doesn't seem that big of a deal to you... but it clearly means a lot to her, so you smile and hug her back.
     ENDSELECT
 ELSE
diff --git "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB" "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"
index 71c0663ce0..b2b6834357 100644
--- "a/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
+++ "b/ERB/\345\217\243\344\270\212\343\203\273\343\203\241\343\203\203\343\202\273\343\203\274\343\202\270\351\226\242\351\200\243/\345\200\213\344\272\272\345\217\243\344\270\212/060 Parsee [\343\203\221\343\203\253\343\202\271\343\202\243]/Parsee/M_KOJO_K60_\346\227\245\345\270\270\347\263\273\343\202\263\343\203\236\343\203\263\343\203\211.ERB"	
@@ -771,11 +771,12 @@ CALL PARSEE_RANT(1)
 PRINTFORMDW Parsee starts \@ ARG == 1 ? ranting drunkenly... # ranting...\@
 RANT_SUBJECT = K60_RANT_GET_SUBJECT()
 IF RANT_SUBJECT != 60 && RANT_SUBJECT != 187
+    CALL M_KOJO_COLOR_K60_JEALOUS
     PRINTFORM 「I hate that
 ELSE
-    PRINTFORM 「I hate
     ;Parsee isn't going to get jealous of herself, and she loves Vahbiz too much to say that she hates her
     CALL M_KOJO_COLOR_K60_VERY_JEALOUS
+    PRINTFORM 「I hate
 ENDIF
 $PARSEE_RANT_SELECTCASE
 SELECTCASE RANT_SUBJECT
@@ -1925,7 +1926,7 @@ ELSEIF CFLAG:RANT_SUBJECT:面識 || FLAG:なりきり == RANT_SUBJECT
 	;If the player is playing as whoever she's ranting about
     IF FLAG:なりきり == RANT_SUBJECT
         PRINTFORMDW %BREAKENG(@"Is %HE_SHE(TARGET)% really so \@ ARG == 1 ? drunk # angry\@ that %HE_SHE(TARGET)% doesn't realize that %HE_SHE(TARGET)%'s badmouthing %PARSE("you")% to %PARSE("your")% face?")%
-    ELSEIF RANT_SUBJECT < CHARANUM && CFLAG:RANT_SUBJECT:現在位置 == CFLAG:[[パルスィ]]:現在位置
+    ELSEIF RANT_SUBJECT < CHARANUM && RANT_SUBJECT != 60 && CFLAG:RANT_SUBJECT:現在位置 == CFLAG:[[パルスィ]]:現在位置
         PRINTFORMDW %BREAKENG(@"Is %HE_SHE(TARGET)% really so \@ ARG == 1 ? drunk # angry\@ that %HE_SHE(TARGET)% doesn't realize that %CALLNAME:RANT_SUBJECT%'s standing right there?")%
     ENDIF
     PRINTFORMD %PARSE("You tune")% Parsee out as %HE_SHE(TARGET)% continues to rant about 
@@ -1939,11 +1940,13 @@ ELSEIF CFLAG:RANT_SUBJECT:面識 || FLAG:なりきり == RANT_SUBJECT
     PRINTFORMDW ...
 ELSE
     $PARSEE_WHAT_THE_FUCK_ARE_YOU_TALKING_ABOUT
+    PRINTFORMDL
     PRINTFORMDW You have no idea who Parsee is talking about.
     PRINTFORMDW %PARSE("You tune")% %HIM_HER(TARGET)% out as %HE_SHE(TARGET)% continues to rant...
 ENDIF
 ;"Imagine five 2hus on the edge of a cliff..."
 ARRAYSHIFT ParseeRants, 1, RANT_SUBJECT
+PRINTFORMDL
 [IF_DEBUG]
 TALENT:[[パルスィ]]:機嫌 = -1
 [ENDIF]
-- 
GitLab