@Stroking #StopStroking @StopStroking
@NullResponse @CheckFlag(ModATSDone)
Sometimes I think about counting your strokes...
I'd love to know how many strokes you've done for me so far
It's impossible of course... and kind of a weird fascination too #Laugh @If[#SessionEdges]>[3]Then(tab of edges)
@NullResponse @Goto(no tab)

(tab of edges)
I do usually keep a tab of your edges 
You've done #SessionEdges edges #GeneralTime so far

(no tab)
So let's count some strokes, shall we #Smile
I want you to do exactly 100 full strokes right now, without edging
I don't care how fast or slow, as long as it's 100 strokes and no edge...
So get going...
Let me know when you're done
[done,did,finished] Good #EmoteHappy
@DifferentAnswer Just let me know when you've done 100 strokes
Do another 100 strokes #Grin
Go!
And again, just tell me when you're done
[done,did,finished] Good, that's 200 #EmoteHappy
@DifferentAnswer Just let me know when you've done 100 strokes
I think we should go for 250, that's a nice round number
So that means 50 more, get stroking, #Name
[done,did,finished] So that's 250!
@DifferentAnswer Just let me know when you've done 50 strokes
That didn't even take you that long, imagine how many you get up to in an average stroke session 
Must be, like, thousands, right...?
Actually... 1000 sounds like a nice round number too @SetFlag(ModATSDone)
You're on 250 now, do you think you could make it to 1000?
[yes] What... really?? @ChangeVar[WORSHIP]=[WORSHIP]+[1] @Goto(to one thousand)
[no] I guess that would be too much for you #EmoteSad @ChangeVar[DEFY]=[DEFY]+[1]
@DifferentAnswer #YesOrNo
We might still get to a thousand, but spread out over time
@End

(ModATSDone)
I @RT(think you should,want to make you) do 1000 strokes without edging right now
@RT(Will you do it,Are you up for it,Okay,You can do it right,Think you can make it)?
[yes] Good #PetName #Smile @ChangeVar[WORSHIP]=[WORSHIP]+[1]
[no] @RT(Oh,Ah,Oh okay,Fine,Whatever) #EmoteSad @ChangeVar[DEFY]=[DEFY]+[1] @Goto(Said No)
@DifferentAnswer #YesOrNo
Let's start with 250 strokes
@RT(Just tell me,Let me know) when you're @RT(done,done with that)
[done,did,finished] @RT(Well done,Okay good,Alright then,Off to a good start I guess,Nice work)
@DifferentAnswer Let me know when you're done
Still @RT(think you can get to 1000,want to continue with this,up for it)?
[yes] @RT(On to the next 250 then,Good then go ahead and give me 250 more strokes,Okay so give me the next 250 strokes then) @Goto(To Five Hundred)
[no] @RT(Oh,Ah,Oh okay,Fine,Whatever) #EmoteSad @ChangeVar[DEFY]=[DEFY]+[1]
@DifferentAnswer #YesOrNo

(Said No)
@RT(Maybe next time,Some other time then,I guess you don't even like jerking it that much,I thought you liked jerking that #CockAdjective #Cock) @Wait(#Random(10,20))
@End
 
(to one thousand)
You said it yourself, so I guess it's no big deal then, huh?
Let's get to the 500 mark first, give me another 250 strokes...
So #JerkOff for me and don't lose count
You'll have to start over if you lose count, #Name #Grin
Maybe I'll try to throw you off balance, make it hard to keep counting
@NullResponse @ShowFemdomImage
@NullResponse @ShowBlowjobImage
Keep counting, #Name @PlayVideo(45) @JumpVideo
I'll let you do your strokes in peace now #Smile

(To Five Hundred)
Let me know when you're done
[done,did,finished] @RT(Okay,Wow,So), 500 @RT(strokes,done,and counting)
[cant,cannot,wont,will not,not going,not gonna,dont want,do not want,too much,cant take,cannot take,had enough] @RT(Alright then,I understand,Oh,I see,Okay) @Goto(not complete)
@DifferentAnswer Just let me know when you've done another 250 strokes
@RT(Boring maybe,A bit tedious,Somewhat boring to watch), but @RT(still pretty good,amazing nonetheless,but good work) #EmoteHappy
@RT(Do you,Are you sure you,Still) want to continue and @RT(go all the way to 1000,complete the 1000 stroke challenge,get to 1000)?
[yes] @RT(Of course you do,I admire your tenacity,I hope you know what you're doing), #SubName
[no] @RT(Alright then,I understand,Oh,I see,Okay) @Goto(not complete)
@DifferentAnswer #YesOrNo
I hope you don't @RT(expect,think there's) some kind of special prize @RT(for doing this,for completing this challenge,at the end of this particular rainbow)
There isn't, just @RT(my eternal admiration for you capacity for suffering,me laughing at you for going through with it,more aching blue balls,a leaky achy cock for you to deal with) #Lol
But let's @RT(continue,get going), give me @RT(250 more,another 250 strokes)
@NullResponse @Wait(#Random(10,20))
@RT(I am definitely getting bored here to be honest,This is going to take some time I guess,Good thing that you've been practicing so much)
Let me know when you're done
[done,did,finished] That's 750 then... wow, and also: @RT(BORING,boring as hell,Oh so fucking boring) #Lol
[cant,cannot,wont,will not,not going,not gonna,dont want,do not want,too much,cant take,cannot take,had enough] @RT(Alright then,I understand,Oh,I see,Okay) @Goto(not complete)
@DifferentAnswer Just let me know when you've done another 250 strokes
@RT(Final stretch,Last leg,Almost there), just keep stroking and counting
Let me know when you're done with the last 250
[done,did,finished] One Thousand Strokes... @MoodUp @ChangeVar[WORSHIP]=[WORSHIP]+[1]
[cant,cannot,wont,will not,not going,not gonna,dont want,do not want,too much,cant take,cannot take,had enough] @RT(Alright then,I understand,Oh,I see,Okay) @Goto(not complete)
@DifferentAnswer Just let me know when you've done another 250 strokes
Like I said, there's no special award @MoodUp @ChangeVar[WORSHIP]=[WORSHIP]+[1]
But you said you'd do 1000 strokes, and you did it, and I respect that
@RT(Well done,Good job,Excellent work), #PetName
@End

(not complete)
But still, you said you would and now you're backing down @MoodDown @ChangeVar[DEFY]=[DEFY]+[1]
So I'm going to have to punish you, #PetName @SetVar[BadMoodReason]=[0] @Interrupt(Punishment)
@End
