@Stroking #StopStroking @StopStroking
@NullResponse @CheckFlag(HowLongCanYouEdge)
I want to see how long you can really hold the edge
So, here's what we're going to do
In a moment I'll tell you to stroke to the edge
And when you're there, you'll hold it for me for as long as you can
When you can't take it anymore, I want you to say <i>STOP</i>
Just that one word, #SubName
When you say it, I'll stop the clock
Really try to hold on for as long as you possibly can, okay? @Timeout(10,Here We Go)
[yes] Good boy @ChangeVar[WORSHIP]=[WORSHIP]+[1]
[no] Just fucking try pushing yourself for once @ChangeVar[DEFY]=[DEFY]+[1] @ChatImage[MissBlue\Emotes\rolleyes.gif]
@DifferentAnswer #YesOrNo
@NullResponse @SetVar[HowLongCanYouEdge]=[0] @InterruptsOff

(Here We Go)
#Edge @Edge #ResponseA06_OnTheEdge @EdgeMode(Goto,First Try)

(Loop FT)
@NullResponse 
@NullResponse 
#GetClose @Goto(Loop FT)

(First Try)
#HoldTheEdge #ResponseA06_OnTheEdge @CountVar[HowLongCanYouEdge] @CustomMode(stop,Goto,Stop The Count)

(FT Hold Loop)
@NullResponse #ResponseA06_OnTheEdge @Goto(FT Hold Loop)

(Stop The Count)
@NullResponse @CountVar[HowLongCanYouEdge,stop]
You can stop #SoundStopStroking
#Var[HowLongCanYouEdge] seconds, #Name @SetVar[HowLongCanYouEdge_Max]=[#Var[HowLongCanYouEdge]] @SetFlag(HowLongCanYouEdge)
Do you want to try it again right away?
[yes] Masochist much? @ChatImage[MissBlue\Emotes\laugh.gif] @Goto(How Long Can You Hold It)
[no] No problem, maybe next time
@DifferentAnswer #YesOrNo
I'm sure your competitive side will want to beat the record
@NullResponse @Goto(End Module)

(HowLongCanYouEdge)
@Flag(HLCYE_Today) @NullResponse @Goto(Pictures And Videos)
@Variable[HowLongCanYouEdge_Max]>[300] @NullResponse @Chance50(Pictures And Videos)
@NullResponse @Chance50(Pictures And Videos)
@RT(I want to clock your holding the edge time again,Let's see how long you can hold an edge,Let's see if you can improve your record for holding an edge)
@RT(The current record is,You personal best so far is,You have a personal best of,The time to beat is) #Var[HowLongCanYouEdge_Max] seconds

(How Long Can You Hold It)
@RT(Just say the word,Just say,You need to say,You can use the word,Remember,, just say,Say the word) <i>STOP</i> if @RT(you really need to stop,you have to stop,can't take it anymore,you want to stop)
@NullResponse @SetVar[HowLongCanYouEdge]=[0] @InterruptsOff
#Edge #ResponseA06_OnTheEdge @EdgeMode(Goto,Hold It)

(Loop For Hold)
@NullResponse 
@NullResponse 
#GetClose @Goto(Loop For Hold)

(Hold It)
@NullResponse @RapidCodeOn @CountVar[HowLongCanYouEdge] @CustomMode(stop,Goto,Stop The Count 2)
#HoldTheEdge #ResponseA06_OnTheEdge

(Hold Loop)
@NullResponse #ResponseA06_OnTheEdge @Goto(Hold Loop)

(Stop The Count 2)
@NullResponse @CountVar[HowLongCanYouEdge,stop]
@RT(You can stop,Okay stop,Stop,Alright) #SoundStopStroking
#Var[HowLongCanYouEdge] seconds, #Name
@Variable[HowLongCanYouEdge]<[HowLongCanYouEdge_Max] @RT(Not your best effort,You've done better,You can do better,That's not great,Pretty weak,That's a little underwhelming,I'm sure you're as disappointed as I am), #Name
@Variable[HowLongCanYouEdge]=[HowLongCanYouEdge_Max] @RT(You've matched your standing record,Same as your old personal best,Not quite a new record but almost,Not bad,Well done) #Smile
@Variable[HowLongCanYouEdge]>[HowLongCanYouEdge_Max] @RT(It's a new record,That's a new personal best,That's your best effort yet!) #EmoteHappy @SetVar[HowLongCanYouEdge_Max]=[#Var[HowLongCanYouEdge]] @TempFlag(HLCYE_Today) @Goto(HLCYE_Today)
@NullResponse @CheckFlag(HLCYE_Today)
@RT(Do you want to try it again right away,Wanna try again,Wanna give it another go)?
[yes] @RT(Are you sure? #Grin,You can probably do better,Good,Alright then,Okay) @TempFlag(HLCYE_Today) @Goto(How Long Can You Hold It)
[no] @RT(Never mind then,No problem,Okay,Fine,Oh okay) @TempFlag(HLCYE_Today)
@DifferentAnswer #YesOrNo

(HLCYE_Today)
@RT(We'll do this again some other time,You can try again another day,Some other time then,Maybe next time)
@NullResponse @Goto(End Module)

(Pictures And Videos)
@NullResponse @Goto(Choose Category)

(Again)
@NullResponse @Wait(#Random(10,20))

(Choose Category)
@NullResponse @Goto(SOFTCORE,LESBIAN,HARDCORE,BLOWJOB)

(BLOWJOB)
@NotStroking #StartStroking
@NullResponse @Slideshow(Blowjob, medium)
@NullResponse  @SlideshowOn 
@NullResponse  @Wait( #Random(15, 20))
#Edge #ResponseA06_OnTheEdge @EdgeMode(Goto,Choose Clip)

(Loop1)
@NullResponse 
@NullResponse 
#GetClose @Goto(Loop1)

(HARDCORE)
@NotStroking #StartStroking
@NullResponse @Slideshow(Hardcore, medium)
@NullResponse  @SlideshowOn 
@NullResponse  @Wait( #Random(15, 20))
#Edge #ResponseA06_OnTheEdge @EdgeMode(Goto,Choose Clip)

(Loop2)
@NullResponse 
@NullResponse 
#GetClose @Goto(Loop2)

(LESBIAN)
@NotStroking #StartStroking
@NullResponse @Slideshow(Lesbian, medium)
@NullResponse  @SlideshowOn 
@NullResponse  @Wait( #Random(15, 20))
#Edge #ResponseA06_OnTheEdge @EdgeMode(Goto,Choose Clip)

(Loop3)
@NullResponse 
@NullResponse 
#GetClose @Goto(Loop3)

(SOFTCORE)
@NotStroking #StartStroking
@NullResponse @Slideshow(Softcore, medium)
@NullResponse  @SlideshowOn 
@NullResponse  @Wait( #Random(15, 20))
#Edge #ResponseA06_OnTheEdge @EdgeMode(Goto,Choose Clip)

(Loop4)
@NullResponse
@NullResponse
#GetClose @Goto(Loop4)

(Choose Clip)
#HoldTheEdge @SlideshowOff @RapidCodeOn
@Variable[HowLongCanYouEdge_Max]>[500] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(450,550)) @JumpVideo(#Random(5,40))
@Variable[HowLongCanYouEdge_Max]>[500] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[450] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(400,500)) @JumpVideo(#Random(5,40))
@Variable[HowLongCanYouEdge_Max]>[450] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[400] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(350,450)) @JumpVideo(#Random(5,40))
@Variable[HowLongCanYouEdge_Max]>[400] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[350] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(300,400)) @JumpVideo(#Random(5,40))
@Variable[HowLongCanYouEdge_Max]>[350] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[300] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(250,350)) @JumpVideo(#Random(10,40))
@Variable[HowLongCanYouEdge_Max]>[300] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[250] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(200,300)) @JumpVideo(#Random(10,40))
@Variable[HowLongCanYouEdge_Max]>[250] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[200] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(150,250)) @JumpVideo(#Random(10,40))
@Variable[HowLongCanYouEdge_Max]>[200] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[150] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(100,200)) @JumpVideo(#Random(10,50))
@Variable[HowLongCanYouEdge_Max]>[150] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[100] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(50,150)) @JumpVideo(#Random(10,60))
@Variable[HowLongCanYouEdge_Max]>[100] @NullResponse @Goto(Video Loop)
@Variable[HowLongCanYouEdge_Max]>[50] @NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(20,100)) @JumpVideo(#Random(10,60))
@Variable[HowLongCanYouEdge_Max]>[50] @NullResponse @Goto(Video Loop)
@NullResponse #ResponseA06_OnTheEdge @PlayVideoNoWait(#Random(10,50)) @JumpVideo(#Random(10,70))
@NullResponse @Goto(Video Loop)

(Video Loop)
@NullResponse #ResponseA06_OnTheEdge @RapidCodeOff @CheckPlayVideo @Goto(Video Loop)

(Video Ended)
#StopStroking @StopStroking
@Variable[EdgingLevel]=[0] @NullResponse @Chance15(Again)
@Variable[EdgingLevel]=[1] @NullResponse @Chance25(Again)
@Variable[EdgingLevel]=[2] @NullResponse @Chance35(Again)
@Variable[EdgingLevel]=[3] @NullResponse @Chance45(Again)
@Variable[EdgingLevel]=[4] @NullResponse @Chance55(Again)
@Variable[EdgingLevel]=[5] @NullResponse @Chance65(Again)
#LetTheEdgeFade
@NullResponse @Wait(#Random(10,20))

(End Module)
@NullResponse @InterruptsOn
@End
@Info This is a modified version of a script from House of Tease by avatarbr