@Flag(AV_AllowMasturb) @NullResponse @Goto(AV_Allowed)
So, @RT(you've been #JerkingOff, you've been #Stroking, you #Stroked that #Cock) without my permission?
[yes] @NullResponse
[no] @NullResponse @Goto(must have misunderstood)
@DifferentAnswer #YesorNo
Did you cum?
[yes] @NullResponse @MoodDown @TempFlag(Called_from_AV_HaveBeenMasturbating) @Goto(Sub came)
[no] At least you've not messed it up...
@DifferentAnswer #YesorNo
@RT(You've been bad again, You're a bad boy, You've been a bad boy again) @RT(#SubName, #PetName) @InterruptsOn @CheckFlag(pthevCompleteControlYES)
But at least you've had the @RT(balls, courage, guts) to tell me
It @RT(shows, means) that you know you made @RT(a mistake, an error)...
And that are ready to take the consequences of your actions
Because there will be consequences...
But @RT(I could forgive you, I could get over it)...
But only if @RT(you're willing, you want) to become a better @RT(#PetName, sub, slave) for #Me...
You should be ready to @RT(give in to me your masturbation and orgasm privileges, give me control over your masturbation and orgasm privileges, give me control over <u>all</u> your masturbation habits)
@RT(Would you do that for me, Will you do it for me, Would you do it for me)?
[yes] @RT(#Good, #GoodBoy) @DeleteFlag(pthevCompleteControlNO) @SetFlag(pthevCompleteControlYES)
[no] @RT(Well,, you leave me no choice then..., You leave me no choice..., I have no choice then..., Then I have no choice...) @SetFlag(pthevCompleteControlNO) @Goto(Choose punishment)
@DifferentAnswer #YesorNo
From now on, your #Cock fully and truly belongs to #Me
From now on you will #Stroke and cum <i>only</i> @RT(on my command, if I allow you)
@RT(You're, Your #Hands are) not allowed to touch @RT(<i>my</i> #Cock,it) unless @RT(I, <u>I</u>) give you permission
Since I can't watch you every minute of the day
If you fail to respect this rule I want you to inform me
@RT(It may be difficult sometimes, Yes,, it will be difficult sometimes, Yes,, it will be difficult, There will be times when you can not resist to touch it), but #SubName...
@RT(It's worth it, It's for your own good, It's for your own sake) #Smile @Chance50(I should punish you)
@End

(I should punish you)
I think, even if you accepted to give in your masturbation and orgasm <i>privilges</i>, that you @RT(should, must) be punished @Goto(Choose punishment)

(Sub came)
@NullResponse @MiniScript(pvMs_HadAnOrgasm)
@End

(pthevCompleteControlYES)
@RT(And you know I don't like when you act like that, You know how I get when you break the rules, You should know what happen when one of my subbies breaks the rules,, don't you?)
He gets punished...
There's a lot of things I can do to punish you...

(Choose punishment)
@Flag(av_fetish_pain) @NullResponse @Goto(Punishment, Stroking, Edging&CBT, Writing task)
@NullResponse @Goto(Punishment, Stroking, Writing task)

(Punishment)
@NullResponse @Interrupt(pvInt_Punishment)
@End

(Stroking)
Well since you like #Stroking that #Cock so much
Why don't you start right now? #StartStroking @PlayAudio[tease\StrokePattern\*.*] @ChangeVar[AV_HaveBeenMasturbating_Stroking_loop]=[AV_HaveBeenMasturbating_Stroking_loop]+[1]
#StopStroking
@RT(I'll give you few seconds to recover, Relax a bit #SubName, Now stop, #IShouldLetYouRecover) @Wait(#Random(10,15))
(Stroking loop)
#StartStroking @PlayAudio[tease\StrokePattern\*.*] @ChangeVar[AV_HaveBeenMasturbating_Stroking_loop]=[AV_HaveBeenMasturbating_Stroking_loop]+[1]
#StopStroking
@RT(I'll give you few seconds to recover, Relax a bit #SubName, Now stop, #IShouldLetYouRecover) @Wait(#Random(10,15))
@Variable[AV_HaveBeenMasturbating_Stroking_loop]<[3] @NullResponse @Goto(Stroking loop)
Do you think you learned the lesson?
[yes] @RT(#Good, #GoodBoy) @DeleteVar[AV_HaveBeenMasturbating_Stroking_loop]
[no] Ok... @ChangeVar[AV_HaveBeenMasturbating_Stroking_loop]=[AV_HaveBeenMasturbating_Stroking_loop]-[2] @Goto(Stroking loop)
@DifferentAnswer #YesorNo
@RT(Let's get back to what we were doing..., Let's continue, Shall we continue?)
@End

(Edging&CBT)
#Edge @Edge(NoHold)
#LetTheEdgeFade
Now you will start holding them...
#Edge @Edge(Hold) @MultipleEdges(2,5)
#LetTheEdgeFade
Is everything ok?
Are you able to continue?
[yes] @RT(#Good,#GoodBoy)
[no] @RT(I don't care!, I don't care what you want!, I don't care what you want! Not anymore!, You will edge again!)
@DifferentAnswer #YesorNo
@RT(I will, I'm #Gonna) increase the number of edges you're #Gonna do
Probably @RT(you will stay on the #EdgeNoun, I'll make you stay on the #EdgeNoun, I'll make you hold this #EdgeNoun) a little longer this time...
#Edge @Edge(Hold, HoldTaunts) @LongHold(50) @MultipleEdges(3,10)
#LetTheEdgeFade
You know...
Pleasure and pain are the two sides of the same coin
And now you're #Gonna experience both
After <u>every</u> edge I want you to @RT(slap those, slap my, bust those, bust my, hit those, hit my) #Balls <u>HARD</u>
And I want you @RT(to count, to count <i>out loud</i>) every slap you give to those #Balls
#Edge @Edge(LongHold, HoldTaunts)
#LetTheEdgeFade
@RT(Start slapping #PetName, And now slap and count for #Me, I want you to bust those #Balls for me #SubName, And now slap those #Balls) @PlayAudio[tease\count.mp3]
@RT(#GoodBoy,#Good)
This is the final edge
@RT(It may take a little longer than before, You will probably edge a little longer this time, Maybe I'll make you hold the longest edge of your life)
Ready...
#Edge @Edge(LongHold, HoldTaunts) @ExtremeHold(20)
#LetTheEdgeFade
@RT(Start slapping #PetName, And now slap and count for #Me, I want you to bust those #Balls for me #SubName, And now slap those #Balls) @PlayAudio[tease\count.mp3]
@RT(#GoodBoy,#Good)
@RT(Let's get back to what we were doing..., Let's continue, Shall we continue?)
@End

(Writing task)
@RT(Maybe writing it down will help you?, Why don't you write it down?, You know? <i>"Writing helps focusing"</i> researchers say...) @WritingTaskRandom(#AV_HaveBeenMasturbating_writing_task)
Wow! Your #Hands were a blur on that keybord!
@RT(Let's get back to what we were doing..., Let's continue, Shall we continue?)
@End

(Failed Writing Task)
@RT(You've failed, You failed, You've miserably failed this task)!
Now I'm #Gonna have to punish you! @Goto(Punishment)

(must have misunderstood)
Oh, I... I must have misunderstood then...
@End

(AV_Allowed)
Okay, @RT(#I allowed you to #Stroke, I tell you to #Stroke, #Good to know you #Stroke)...
To increase @RT(your level of frustration, your ache, your desperation)
@RT(After all, Since) I am the only one who can @RT(allow you to, make you) @RT(Orgasm, cum)
@End