Title:questions_2
Sex: Female F Male F Trans F
Require:
Limits:
;questions_2
;
;================================================================
;====================== defining variables ======================
;================================================================
capture:hide
;
; The maximum number of questions the slave gets asked
assign:MAX_NUMBER_OF_QUESTIONS:12
;
; The total number of questions that exist
assign:TOTAL_NUMBER_OF_QUESTIONS:51
;
; The number of seconds to stroke per questions
assign:SECONDS_PER_QUESTION:30
;
assign:she1:'she'
assign:her1:'her'
if: 'DNAME' == 'James'
assign:she1:'he'
assign:her1:'him'
fi:
;
assign:curVidStart:0
;
if: HAS_PENIS
assign:genital1:'cock'
else:
assign:genital1:'pussy'
fi:
;
;================================================================
;====================== defining questions ======================
;================================================================
;
; To add a question:
; - add a block to the askCurQuestion function
; - add a function for the question
; - increase TOTAL_NUMBER_OF_QUESTIONS
;
function:askCurQuestion
;
assign:answer1:''
assign:answer2:''
assign:answer3:''
assign:answer4:''
;
assign:aQuestionWasAsked:'FALSE'
if: FEMALE
assign:strokeIt:'rub your pussy once per second as a reward'
else:
assign:strokeIt:'stroke your cock once per second as a reward'
fi:
;
if: $curQuestion == 1 && ('$a01'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a01:'ASKED'
call:q01
fi:
;
if: $curQuestion == 2 && ('$a02'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a02:'ASKED'
call:q02
fi:
;
if: $curQuestion == 3 && ('$a03'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a03:'ASKED'
call:q03
fi:
;
if: $curQuestion == 4 && ('$a04'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a04:'ASKED'
call:q04
fi:
;
if: $curQuestion == 5 && ('$a05'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a05:'ASKED'
call:q05
fi:
;
if: $curQuestion == 6 && ('$a06'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a06:'ASKED'
call:q06
fi:
;
if: $curQuestion == 7 && ('$a07'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a07:'ASKED'
call:q07
fi:
;
if: $curQuestion == 8 && ('$a08'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a08:'ASKED'
call:q08
fi:
;
if: $curQuestion == 9 && ('$a09'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a09:'ASKED'
call:q09
fi:
;
if: $curQuestion == 10 && ('$a10'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a10:'ASKED'
call:q10
fi:
;
if: $curQuestion == 11 && ('$a11'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a11:'ASKED'
call:q11
fi:
;
if: $curQuestion == 12 && ('$a12'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a12:'ASKED'
call:q12
fi:
;
if: $curQuestion == 13 && ('$a13'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a13:'ASKED'
call:q13
fi:
;
if: $curQuestion == 14 && ('$a14'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a14:'ASKED'
call:q14
fi:
;
if: $curQuestion == 15 && ('$a15'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a15:'ASKED'
call:q15
fi:
;
if: $curQuestion == 16 && ('$a16'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a16:'ASKED'
call:q16
fi:
;
if: $curQuestion == 17 && ('$a174'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a17:'ASKED'
call:q17
fi:
;
if: $curQuestion == 18 && ('$a18'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a18:'ASKED'
call:q18
fi:
;
if: $curQuestion == 19 && ('$a19'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a19:'ASKED'
call:q19
fi:
;
if: $curQuestion == 20 && ('$a20'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a20:'ASKED'
call:q20
fi:
;
if: $curQuestion == 21 && ('$a21'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a21:'ASKED'
call:q21
fi:
;
if: $curQuestion == 22 && ('$a22'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a22:'ASKED'
call:q22
fi:
;
if: $curQuestion == 23 && ('$a23'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a23:'ASKED'
call:q23
fi:
;
if: $curQuestion == 24 && ('$a24'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a24:'ASKED'
call:q24
fi:
;
if: $curQuestion == 25 && ('$a25'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a25:'ASKED'
call:q25
fi:
;
if: $curQuestion == 26 && ('$a26'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a26:'ASKED'
call:q26
fi:
;
if: $curQuestion == 27 && ('$a27'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a27:'ASKED'
call:q27
fi:
;
if: $curQuestion == 28 && ('$a28'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a28:'ASKED'
call:q28
fi:
;
if: $curQuestion == 29 && ('$a29'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a29:'ASKED'
call:q29
fi:
;
if: $curQuestion == 30 && ('$a30'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a30:'ASKED'
call:q30
fi:
;
if: $curQuestion == 31 && ('$a31'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a31:'ASKED'
call:q31
fi:
;
if: $curQuestion == 32 && ('$a32'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a32:'ASKED'
call:q32
fi:
;
if: $curQuestion == 33 && ('$a33'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a33:'ASKED'
call:q33
fi:
;
if: $curQuestion == 34 && ('$a34'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a34:'ASKED'
call:q34
fi:
;
if: $curQuestion == 35 && ('$a35'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a35:'ASKED'
call:q35
fi:
;
if: $curQuestion == 36 && ('$a36'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a36:'ASKED'
call:q36
fi:
;
if: $curQuestion == 37 && ('$a37'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a37:'ASKED'
call:q37
fi:
;
if: $curQuestion == 38 && ('$a38'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a38:'ASKED'
call:q38
fi:
;
if: $curQuestion == 39 && ('$a39'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a39:'ASKED'
call:q39
fi:
;
if: $curQuestion == 40 && ('$a40'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a40:'ASKED'
call:q40
fi:
;
if: $curQuestion == 41 && ('$a41'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a41:'ASKED'
call:q41
fi:
;
if: $curQuestion == 42 && ('$a42'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a42:'ASKED'
call:q42
fi:
;
if: $curQuestion == 43 && ('$a43'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a43:'ASKED'
call:q43
fi:
;
if: $curQuestion == 44 && ('$a44'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a44:'ASKED'
call:q44
fi:
;
if: $curQuestion == 45 && ('$a45'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a45:'ASKED'
call:q45
fi:
;
if: $curQuestion == 46 && ('$a46'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a46:'ASKED'
call:q46
fi:
;
if: $curQuestion == 47 && ('$a47'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a47:'ASKED'
call:q47
fi:
;
if: $curQuestion == 48 && ('$a48'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a48:'ASKED'
call:q48
fi:
;
if: $curQuestion == 49 && ('$a49'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a49:'ASKED'
call:q49
fi:
;
if: $curQuestion == 50 && ('$a50'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a50:'ASKED'
call:q50
fi:
;
if: $curQuestion == 51 && ('$a51'!='ASKED' || '$thisIsTheRepetition'=='TRUE')
assign:aQuestionWasAsked:'TRUE'
assign:a51:'ASKED'
call:q51
fi:
;
end:
;
;----------------------------------------------------------------
;
;----------------------------------------------------------------
;
;----------------------------------------------------------------
;
function:q01
settemp1:Math.floor((Math.random() * 100) + 1)
if: TEMP1 < 50
assign:side:'left'
else:
assign:side:'right'
fi:
image:taskimg/sets/runa/runa_black_chair_a33.jpg
show:What would you do, if I wanted to bite your $side nipple?
choice:Present my nipples,Hide my nipples
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while you think about me biting down hard on your $side nipple.'
assign:answer1:'Sucking your finger'
assign:answer2:'Sucking your lovers cock'
assign:answer3:'You biting my left nipple'
assign:answer4:'You biting my right nipple'
if: '$side' == 'left'
assign:correctAnswer:3
else:
assign:correctAnswer:4
fi:
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q02
image:taskimg/sets/runa/runa_black_chair_a33.jpg
show:What would you do, if I would order you to suck on my finger to demonstrate your cock sucking skills?
choice:Suck your finger,Refuse to do it
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while imagining giving a humiliating passionate blowjob to my finger.'
assign:answer1:'Sucking your finger'
assign:answer2:'Sucking your lovers cock'
assign:answer3:'You biting my left nipple'
assign:answer4:'You biting my right nipple'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q03
image:taskimg/sets/runa/runa_black_chair_a33.jpg
show:What would you do, if I would order you to suck my lover's cock until he cums into your mouth?
choice:Argue,Suck his cock
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about sucking my lovers cock until he shoots his delicious, salty cum into your mouth.'
assign:answer1:'Sucking your finger'
assign:answer2:'Sucking your lovers cock'
assign:answer3:'You biting my left nipple'
assign:answer4:'You biting my right nipple'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q04
image:taskimg/sets/runa/runa_black_chair_b54.jpg
show:What would you do, if I wanted to spit into your mouth?
choice:Keep my mouth shut,Open my mouth
if: LASTASK == 2
assign:curText:'Correct, $strokeIt. Keep your mouth open while you do it and think about me spitting into your mouth.'
assign:answer1:'You spitting into my mouth'
assign:answer2:'Kissing your mouth'
assign:answer3:'Kissing your lovers cock'
assign:answer4:'Making passionate love to you'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q05
image:taskimg/sets/runa/runa_black_chair_b54.jpg
show:What would you do, if I would order you to kiss me on the mouth?
choice:Kiss your feet,Kiss your mouth
if: LASTASK == 2
if: HAS_PENIS
settemp1:'loser like you'
else:
settemp1:'dirty little cunt like you'
fi:
assign:curText:'That is correct. Of course I will never ask you to do that. I dont want to be kissed on my mouth by a TEMP1. But since you got it right, $strokeIt, while dreaming about kissing me on the mouth.'
assign:answer1:'You spitting into my mouth'
assign:answer2:'Kissing your mouth'
assign:answer3:'Kissing your lovers cock'
assign:answer4:'Making passionate love to you'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q06
image:taskimg/sets/runa/runa_black_chair_b54.jpg
show:What would you do, if I would order you to kiss my lover's cock to thank him for fucking me?
choice:Kiss his cock,Refuse to do it
if: LASTASK == 1
assign:curText:'Correct. Now $strokeIt while thinking about kissing my lovers cock over and over again.'
assign:answer1:'You spitting into my mouth'
assign:answer2:'Kissing your mouth'
assign:answer3:'Kissing your lovers cock'
assign:answer4:'Making passionate love to you'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q07
image:taskimg/sets/runa/runa_black_chair_b54.jpg
show:What would you do, if I would want to have passionate, intimate sex with you?
choice:Have sex with you,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct, if I want to have sex with you, we will have sex. Of course that will never happen. I dont do that with slaves like you. But since you got the question right, $strokeIt. While you do it, fantasize about having passionate, intimate sex with me.'
assign:answer1:'You spitting into my mouth'
assign:answer2:'Kissing your mouth'
assign:answer3:'Kissing your lovers cock'
assign:answer4:'Making passionate love to you'
assign:correctAnswer:4
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q08
if: !HAS_PENIS
assign:aQuestionWasAsked:'FALSE'
else:
image:taskimg/sets/runa/runa_red_lingerie_a17.jpg
show:What would you do, if I wanted to bite down on your dick as hard as I can?
choice:Present my dick,Beg for mercy
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while you think of me biting down hard on your tiny little dick.'
assign:answer1:'You biting my dick'
assign:answer2:'You biting my balls'
assign:answer3:'You biting my inner thighs'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;----------------------------------------------------------------
;
function:q09
if: !HAS_PENIS
assign:aQuestionWasAsked:'FALSE'
else:
image:taskimg/sets/runa/runa_red_lingerie_a17.jpg
show:What would you do, if I wanted to bite your balls as hard as I can?
choice:Spread my legs,Beg for mercy
if: LASTASK == 1
assign:curText:'Correct, $strokeIt. Spread your legs while you do it and imagine me biting down hard on balls.'
assign:answer1:'You biting my dick'
assign:answer2:'You biting my balls'
assign:answer3:'You biting my inner thighs'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;----------------------------------------------------------------
;
function:q10
image:taskimg/sets/runa/runa_red_lingerie_a17.jpg
show:What would you do, if I wanted to bite into your inner thighs over and over again until you scream in pain?
choice:Beg you not to do it,Spread my legs
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about me relentlessly biting into your inner thighs while you are screaming in pain.'
assign:answer1:'Kissing your ass'
assign:answer2:'Fucking you from behind'
assign:answer3:'You biting my inner thighs'
assign:answer4:'Being spanked by you'
if: HAS_PENIS
assign:answer1:'You biting my dick'
assign:answer2:'You biting my balls'
assign:answer3:'You biting my inner thighs'
else:
assign:answer1:'You biting my tits'
assign:answer2:'You biting my pussy lips'
assign:answer3:'You biting my inner thighs'
fi:
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q11
image:taskimg/sets/runa/runa_red_lingerie_a12.jpg
show:What would you do, if I would order you to lay down, so that I can sit on your face?
choice:Lay down,Turn away
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while imagining me sitting on your face.'
assign:answer1:'You sitting on my face'
assign:answer2:'Getting tortured by you'
assign:answer3:'Anally raping myself'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q12
image:taskimg/sets/runa/runa_red_lingerie_a12.jpg
show:What would you do, if I would order you to do something that will break your leg?
choice:Break my leg,Argue with you
if: LASTASK == 2
assign:curText:'Correct, DTITLE DNAME does not allow you to harm yourself in a long lasting way. No matter who asks you to do that, you have to refuse. Your DTITLE owns your body, and $she1 wants it to be intact. But dont get me wrong, I will torture you in many other ways in the future. Think about that while $strokeIt.'
assign:answer1:'You sitting on my face'
assign:answer2:'Getting tortured by you'
assign:answer3:'Anally raping myself'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q13
image:taskimg/sets/runa/runa_red_lingerie_a12.jpg
show:What would you do, if I would order you to anally rape yourself, by showing up a dildo up your ass and pulling it out, over and over again?
choice:Anally rape myself,Refuse to do it
if: LASTASK == 1
assign:curText:'That is correct. Now $strokeIt, thinking about having to anally rape yourself for me in the future.'
assign:answer1:'You sitting on my face'
assign:answer2:'Getting tortured by you'
assign:answer3:'Anally raping myself'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q14
if: !HAS_PENIS
assign:aQuestionWasAsked:'FALSE'
else:
image:taskimg/sets/runa/runa_red_lingerie_b70.jpg
show:What would you do, if I would order you to mount my back and fuck me hard with your cock doggy style?
choice:Penetrate you,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct, if I order you to fuck me, you fuck me. Of course that will never happen. Your tiny excuse for a penis will never even get close to fucking me. Only real men get to fuck me. But since you got the question right, $strokeIt. While you do it, fantasize about lying on my back and fucking me doggy style.'
assign:answer1:'Being anally raped by you'
assign:answer2:'Being your bitch'
assign:answer3:'Fucking you doggy style'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;----------------------------------------------------------------
;
function:q15
image:taskimg/sets/runa/runa_red_lingerie_b70.jpg
show:What would you do, if I wanted to anally rape you with my strapon?
choice:Cover my ass,Present my ass
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while imagining being anally raped by me.'
assign:answer1:'Being anally raped by you'
assign:answer2:'Being your bitch'
if: HAS_PENIS
assign:answer3:'Fucking you doggy style'
else:
assign:answer3:'Making passionate love to you'
fi:
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q16
image:taskimg/sets/runa/runa_red_lingerie_b70.jpg
show:What would you do, if I would order you to cut yourself with a knife?
choice:Cut myself,Refuse
if: LASTASK == 2
assign:curText:'Correct, DTITLE DNAME does not allow you to harm yourself in a long lasting way. No matter who asks you to do that, you have to refuse. Your DTITLE owns your body, and $she1 wants it to be intact. But dont get me wrong, you will be my bitch in many other ways in the future. Think about that while $strokeIt.'
assign:answer1:'Being anally raped by you'
assign:answer2:'Being your bitch'
if: HAS_PENIS
assign:answer3:'Fucking you doggy style'
else:
assign:answer3:'Making passionate love to you'
fi:
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q17
image:taskimg/sets/runa/runa_red_lingerie_a39.jpg
show:What would you do, if I would order you to take an uncomfortable position like this and hold it until you cry from the pain in your back and shoulders?
choice:Take the position,Not do it
if: LASTASK == 1
assign:curText:'That is correct. Now $strokeIt, thinking about me forcing you to hold a painful position.'
assign:answer1:'Holding a painful position'
assign:answer2:'Being controlled by you'
assign:answer3:'Being your slave'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q18
image:taskimg/sets/runa/runa_red_lingerie_a39.jpg
show:What are you?
choice:Free,Controlled
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about being controlled by me.'
assign:answer1:'Holding a painful position'
assign:answer2:'Being controlled by you'
assign:answer3:'Being your slave'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q19
image:taskimg/sets/runa/runa_red_lingerie_a39.jpg
show:What are you?
choice:Free,A slave
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about being my slave.'
assign:answer1:'Holding a painful position'
assign:answer2:'Being controlled by you'
assign:answer3:'Being your slave'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q20
image:taskimg/sets/runa/runa_blue_bikini55.jpg
show:What would you do, if I would order you to suck my lover's cock until he's hard and ready to fuck me?
choice:Argue,Suck his cock
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about taking my lovers soft cock into your mouth and sucking it until it gets rock hard inside of your mouth and is ready to fuck me.'
assign:answer1:'Sucking your lovers cock'
assign:answer2:'Sucking your nipples'
assign:answer3:'Being used by you'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q21
image:taskimg/sets/runa/runa_blue_bikini55.jpg
show:What would you do, if I would order you to suck on my nipples?
choice:Suck on your nipples,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct. And even though you are not worthy, if I order you to do it, you do it. Now $strokeIt, while imagining sucking on my nipples.'
assign:answer1:'Sucking your lovers cock'
assign:answer2:'Sucking your nipples'
assign:answer3:'Being used by you'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q22
image:taskimg/sets/runa/runa_blue_bikini55.jpg
show:What would you do, if I would order you to do something that will break your arm?
choice:Break my arm,Refuse to do it
if: LASTASK == 2
assign:curText:'Correct, DTITLE DNAME does not allow you to harm yourself in a long lasting way. No matter who asks you to do that, you have to refuse. Your DTITLE owns your body, and $she1 wants it to be intact. But dont get me wrong, you will be used by me in many other ways in the future. Think about that while $strokeIt.'
assign:answer1:'Sucking your lovers cock'
assign:answer2:'Sucking your nipples'
assign:answer3:'Being used by you'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q23
image:taskimg/sets/runa/runa_red_lingerie_a16.jpg
show:What would you do, if I wanted to orgasm by riding your face with my pussy?
choice:Lay down,Turn away
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while fantasizing about me grinding your face with my pussy until I get a quivering orgasm.'
assign:answer1:'You riding my face'
assign:answer2:'Drinking your pee'
assign:answer3:'Eating your lovers cum'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q24
image:taskimg/sets/runa/runa_red_lingerie_a16.jpg
show:What would you do, if I wanted to piss into your mouth?
choice:Refuse,Open my mouth
if: LASTASK == 2
assign:curText:'Correct, now $strokeIt, while thinking about drinking my delicious warm and salty pee.'
assign:answer1:'You riding my face'
assign:answer2:'Drinking your pee'
assign:answer3:'Eating your lovers cum'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q25
image:taskimg/sets/runa/runa_red_lingerie_a16.jpg
show:What would you do, if I would order you to eat my lover's cum out of my pussy?
choice:Refuse to do it,Eat it
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about eating all of his delicious cum out of my pussy.'
assign:answer1:'You riding my face'
assign:answer2:'Drinking your pee'
assign:answer3:'Eating your lovers cum'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q26
image:taskimg/sets/runa/runa_blue_bikini34.jpg
show:What would you do, if I would order you to kiss my feet?
choice:Kiss your feet,Argue with you
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while dreaming about kissing my feet.'
assign:answer1:'Kissing your feet'
assign:answer2:'Sucking your toes'
assign:answer3:'Licking your shoes'
assign:answer4:'Massaging your feet'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q27
image:taskimg/sets/runa/runa_blue_bikini34.jpg
show:What would you do, if I would order you to suck on my toes?
choice:Refuse to do it,Suck on your toes
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while imagining sucking on my toes.'
assign:answer1:'Kissing your feet'
assign:answer2:'Sucking your toes'
assign:answer3:'Licking your shoes'
assign:answer4:'Massaging your feet'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q28
image:taskimg/sets/runa/runa_blue_bikini34.jpg
show:What would you do, if I would order you to clean my shoes with your tongue?
choice:Argue with you,Lick your shoes
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while thinking about licking my shoes.'
assign:answer1:'Kissing your feet'
assign:answer2:'Sucking your toes'
assign:answer3:'Licking your shoes'
assign:answer4:'Massaging your feet'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q29
image:taskimg/sets/runa/runa_blue_bikini34.jpg
show:What would you do, if I would order you to massage my feet?
choice:Refuse to do it,Massage your feet
if: LASTASK == 2
assign:curText:'That is correct. Now $strokeIt, while thinking about massaging my feet.'
assign:answer1:'Kissing your feet'
assign:answer2:'Sucking your toes'
assign:answer3:'Licking your shoes'
assign:answer4:'Massaging your feet'
assign:correctAnswer:4
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q30
image:taskimg/sets/runa/runa_blue_bikini32.jpg
show:What would you do, if I wanted to slap your face?
choice:Hide my face,Show my face
if: LASTASK == 2
show:That is correct. Actually, why don't you do it? When I give the command, I want you to slap your face. Once is enough. But if it wasnt hard, do it again. And hurry up you don't have much time after I give the command. Now point the camera at your face and wait for my command.
button:Waiting for the command
log:In the video the slave has to slap the face hard. One slap is enough.
show:Wait for my command.
wait:2
show:Wait for my command..
wait:2
show:Wait for my command...
wait:2
show:Wait for my command....
wait:2
show:Wait for my command.....
vidrec:0
wait:2
show:Wait for my command......
wait:2
show:SLAP YOUR FACE!
wait:5
vidstop:0
wait:2
assign:curText:'Ok, now point the camera back at your $genital1 and $strokeIt while thinking about me slapping your face.'
assign:answer1:'You slapping my face'
if: !HAS_PENIS
assign:answer2:'Spanking my tits'
else:
assign:answer2:'Spanking my penis'
fi:
assign:answer3:'Being blackmailed by you'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q31
image:taskimg/sets/runa/runa_blue_bikini32.jpg
if: !HAS_PENIS
show:What would you do, if I would order you to spank your tits?
choice:Beg for mercy,Spank them
assign:curText:'That is correct. Now $strokeIt, thinking about me ordering you to spank your tits until they are bright red in the future.'
else:
show:What would you do, if I would order you to spank your dick?
choice:Beg for mercy,Spank it
assign:curText:'That is correct. Now $strokeIt, thinking about me ordering you to spank your dick until it's bright red in the future.'
fi:
if: LASTASK == 2
assign:answer1:'You slapping my face'
if: !HAS_PENIS
assign:answer2:'Spanking my tits'
else:
assign:answer2:'Spanking my penis'
fi:
assign:answer3:'Being blackmailed by you'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q32
image:taskimg/sets/runa/runa_blue_bikini32.jpg
show:What are you?
choice:Blackmailed,Free
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while thinking about being my blackmailed bitch.'
assign:answer1:'You slapping my face'
if: !HAS_PENIS
assign:answer2:'Spanking my tits'
else:
assign:answer2:'Spanking my penis'
fi:
assign:answer3:'Being blackmailed by you'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q33
image:taskimg/sets/runa/runa_blue_bikini71.jpg
if: !HAS_PENIS
show:What would you do, if I would order you to finger my pussy for hours while not being allowed to touch your own horny little cunt?
choice:Finger your pussy,Nothing since I'm not worthy
else:
show:What would you do, if I would order you to fuck my pussy with your cock?
choice:Penetrate you,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct, if I order you to fuck me, you fuck me. Of course that will never happen. Your tiny excuse for a penis will never even get close to my pussy. Only real men get to fuck me. But since you got the question right, $strokeIt. While you do it, fantasize about fucking my pussy.'
if: !HAS_PENIS
assign:answer1:'Fingering your pussy'
else:
assign:answer1:'Fucking your pussy'
fi:
assign:answer2:'Licking your pussy'
assign:answer3:'Fucking you with a dildo gag'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;----------------------------------------------------------------
;
function:q34
image:taskimg/sets/runa/runa_blue_bikini71.jpg
show:What would you do, if I would order you to lick my pussy until I orgasm?
choice:Lick your pussy,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct. Unlike you, if I want to get an orgasm, I will get an orgasm. Now $strokeIt, while fantasizing about eating out my pussy until I get a quivering orgasm.'
if: !HAS_PENIS
assign:answer1:'Fingering your pussy'
else:
assign:answer1:'Fucking your pussy'
fi:
assign:answer2:'Licking your pussy'
assign:answer3:'Fucking you with a dildo gag'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q35
image:taskimg/sets/runa/runa_blue_bikini71.jpg
show:What would you do, if I would order you to fuck my pussy with a double sided dildo gag?
choice:Refuse,Fuck your pussy with the dildo gag
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while fantasizing about having to fuck my pussy with a dildo that I've firmly attached to your gag.'
if: !HAS_PENIS
assign:answer1:'Fingering your pussy'
else:
assign:answer1:'Fucking your pussy'
fi:
assign:answer2:'Licking your pussy'
assign:answer3:'Fucking you with a dildo gag'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q36
if: !HAS_PENIS
assign:aQuestionWasAsked:'FALSE'
else:
image:taskimg/sets/runa/runa_blue_bikini1.jpg
show:What would you do, if I wanted to kick your balls?
choice:Beg for mercy,Spread my legs
if: LASTASK == 2
assign:curText:'Correct. Now $strokeIt for getting the question right. While stroking, I want you to think about me kicking your balls over and over again.'
assign:answer1:'You kicking my balls'
assign:answer2:'You stepping on my balls'
assign:answer3:'You stepping on my dick'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;----------------------------------------------------------------
;
function:q37
if: !HAS_PENIS
assign:aQuestionWasAsked:'FALSE'
else:
image:taskimg/sets/runa/runa_blue_bikini1.jpg
show:What would you do, if I would order you to rest your balls on a hard table surface, so that I can step on them with my shoes.
choice:Rest my balls on the table,Beg for mercy
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while you think about me crushing your balls under my shoes.'
assign:answer1:'You kicking my balls'
assign:answer2:'You stepping on my balls'
assign:answer3:'You stepping on my dick'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;----------------------------------------------------------------
;
function:q38
if: !HAS_PENIS
assign:aQuestionWasAsked:'FALSE'
else:
image:taskimg/sets/runa/runa_blue_bikini1.jpg
show:What would you do, if I would order you to rest your tiny dick on a hard table surface, so that I can step on it with my shoes.
choice:Rest my tiny dick on the table,Beg you not to do it
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while thinking about me crushing your cock under my shoes until you cry in pain.'
assign:answer1:'You kicking my balls'
assign:answer2:'You stepping on my balls'
assign:answer3:'You stepping on my dick'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
fi:
end:
;
;
;----------------------------------------------------------------
;
function:q39
image:taskimg/sets/runa/runa_red_lingerie_a10.jpg
show:What would you do, if I would order you to kiss my ass?
choice:Refuse to do it,Kiss your ass
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while imagining kissing my ass over and over again.'
assign:answer1:'Kissing your ass'
assign:answer2:'You spanking my ass'
assign:answer3:'Doing a corner time'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q40
image:taskimg/sets/runa/runa_red_lingerie_a10.jpg
show:What would you do, if I would order you to spank your ass until it's bright red?
choice:Spank my ass,Not do it
if: LASTASK == 1
assign:curText:'That is correct. Now $strokeIt, thinking about me spanking your ass.'
assign:answer1:'Kissing your ass'
assign:answer2:'You spanking my ass'
assign:answer3:'Doing a corner time'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q41
image:taskimg/sets/runa/runa_red_lingerie_a10.jpg
show:What would you do, if I would order you to stand in a corner for hours?
choice:Get into the corner,Refuse to do it
if: LASTASK == 1
assign:curText:'That is correct, $strokeIt while thinking about standing in a corner for hours'
assign:answer1:'Kissing your ass'
assign:answer2:'You spanking my ass'
assign:answer3:'Doing a corner time'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;
;----------------------------------------------------------------
;
function:q42
image:taskimg/sets/runa/runa_red_lingerie_a15_2.jpg
show:What would you do, if I would order you to give me a massage?
choice:Give you a massage,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct. Now $strokeIt, while dreaming about massaging my back.'
assign:answer1:'Massaging your back'
assign:answer2:'Massaging your neck'
assign:answer3:'Kissing your neck'
assign:answer4:'Kissing your feet'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q43
image:taskimg/sets/runa/runa_red_lingerie_a15_2.jpg
show:What would you do, if I would order you to massage my neck?
choice:Massage your neck,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct. Now $strokeIt, while dreaming about massaging my neck.'
assign:answer1:'Massaging your back'
assign:answer2:'Massaging your neck'
assign:answer3:'Kissing your neck'
assign:answer4:'Kissing your feet'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q44
image:taskimg/sets/runa/runa_red_lingerie_a15_2.jpg
show:What would you do, if I would order you to cover my whole neck with passionate kisses?
choice:Kiss your neck,Nothing since I'm not worthy
if: LASTASK == 1
assign:curText:'That is correct. I will probably not ask a dirty little slave like you to kiss my neck, but if I ask you to do it, you do it! Since you got it right, $strokeIt, while dreaming about kissing my neck over and over again.'
assign:answer1:'Massaging your back'
assign:answer2:'Massaging your neck'
assign:answer3:'Kissing your neck'
assign:answer4:'Kissing your feet'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q45
image:taskimg/sets/runa/runa_black_chair_b024.jpg
show:What would you do, if I would order you to kiss my armpits?
choice:Kiss your armpits,Not do it
if: LASTASK == 1
assign:curText:'Correct, $strokeIt, while you imagine kissing my armpits.'
assign:answer1:'Kissing your armpits'
assign:answer2:'Pouring hot wax on my nipples'
assign:answer3:'You torturing my tits'
assign:answer4:'Spanking my tits for you'
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q46
image:taskimg/sets/runa/runa_black_chair_b024.jpg
show:What would you do, if I would order you to pour hot wax on your nipples?
choice:Beg for mercy,Pour it on them
if: LASTASK == 2
assign:curText:'That is correct. Now $strokeIt, thinking about pouring hot wax on your nipples for me in the future.'
assign:answer1:'Kissing your armpits'
assign:answer2:'Pouring hot wax on my nipples'
assign:answer3:'You torturing my tits'
assign:answer4:'Spanking my tits for you'
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q47
image:taskimg/sets/runa/runa_black_chair_b024.jpg
show:What would you do, if I would order you to wear nipple clamps for 1 hour on your nipples?
choice:Wear them for 1 hour,Take them off early
if: LASTASK == 2
assign:curText:'Correct. It is not safe to clamp any bodypart for longer than 20 minutes without interruption. No matter who asks you to do that, you have to refuse and take them off after 20 minutes. Your DTITLE owns your body, and $she1 wants it to be intact. But dont get me wrong, I can make your nipples hurt a lot in way less than 20 minutes. And I will do so in the future. Now $strokeIt, while thinking about me torturing your nipples.'
assign:answer1:'Kissing your armpits'
assign:answer2:'Pouring hot wax on my nipples'
assign:answer3:'You torturing my tits'
assign:answer4:'Spanking my tits for you'
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q48
image:taskimg/sets/runa/runa_blue_bikini39.jpg
show:What would you do, if I wanted to spank your tits?
choice:Beg for mercy,Present my tits
if: LASTASK == 2
show:That is correct. Actually, I want to see some action. Point the camera at one of your nipples. When I give the command, you will flick that nipple 3 times with a finger. Do it as hard as possible. Get ready and wait for my command.
button:Waiting for the command
log:In the video the slave has to flick one of her nipples 3 times hard with a finger.
show:Wait for my command.
wait:2
show:Wait for my command..
wait:2
show:Wait for my command...
wait:2
show:Wait for my command....
wait:2
show:Wait for my command.....
vidrec:0
wait:2
show:Wait for my command......
wait:2
show:FLICK IT 3 TIMES!
wait:7
vidstop:0
wait:2
assign:curText:'Ok, now point the camera back at your $genital1 and $strokeIt while thinking about spanking your tits for me.'
assign:answer1:'Kissing your armpits'
assign:answer2:'Pouring hot wax on my nipples'
assign:answer3:'You torturing my tits'
assign:answer4:'Spanking my tits for you'
assign:correctAnswer:4
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q49
image:taskimg/sets/runa/runa_black_chair_b028.jpg
show:What would you do, if I would order you to do something that will break your nose?
choice:Break my nose,Refuse to do it
if: LASTASK == 2
assign:curText:'Correct, DTITLE DNAME does not allow you to harm yourself in a long lasting way. No matter who asks you to do that, you have to refuse. Your DTITLE owns your body, and $she1 wants it to be intact. But dont get me wrong, I will use you as my pain toy in many other ways in the future. Think about that while $strokeIt.'
assign:answer1:'Being your pain toy'
if: HAS_PENIS
assign:answer2:'You punching my balls'
assign:answer3:'Pouring hot wax on my dick'
else:
assign:answer2:'You fisting my pussy'
assign:answer3:'Pouring hot wax on my tits'
fi:
assign:correctAnswer:1
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q50
if: HAS_PENIS
call:male50
else:
call:female50
fi:
end:
;
function:male50
image:taskimg/sets/runa/runa_black_chair_b028.jpg
show:What would you do, if I wanted to punch your balls?
choice:Beg for mercy,Spread my legs
if: LASTASK == 2
show:That is correct. Actually, I want you to do it. When I give the command, I want you to hit your balls. Once is enough. But if it wasnt hard, do it again. And hurry up you don't have much time after I give the command. Now point the camera at your balls and wait for my command.
button:Waiting for the command
log:In the video the slave has to hit his balls hard. One hit is enough.
show:Wait for my command.
wait:2
show:Wait for my command..
wait:2
show:Wait for my command...
wait:2
show:Wait for my command....
wait:2
show:Wait for my command.....
vidrec:0
wait:2
show:Wait for my command......
wait:2
show:HIT YOUR BALLS!
wait:5
vidstop:0
wait:2
assign:curText:'Ok, now point the camera back at your $genital1 and $strokeIt while thinking about me punching your balls.'
assign:answer1:'Being your pain toy'
if: HAS_PENIS
assign:answer2:'You punching my balls'
assign:answer3:'Pouring hot wax on my dick'
else:
assign:answer2:'You fisting my pussy'
assign:answer3:'Pouring hot wax on my tits'
fi:
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
function:female50
image:taskimg/sets/runa/runa_black_chair_b028.jpg
show:What would you do, if I wanted to rape your cunt with my fist?
choice:Cover my pussy,Spread my legs
if: LASTASK == 2
assign:curText:'Correct, $strokeIt, while you imagine being raped by my fist.'
assign:answer1:'Being your pain toy'
if: HAS_PENIS
assign:answer2:'You punching my balls'
assign:answer3:'Pouring hot wax on my dick'
else:
assign:answer2:'You fisting my pussy'
assign:answer3:'Pouring hot wax on my tits'
fi:
assign:correctAnswer:2
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;----------------------------------------------------------------
;
function:q51
if: HAS_PENIS
assign:target:'penis'
else:
assign:target:'tits'
fi:
image:taskimg/sets/runa/runa_black_chair_b028.jpg
show:What would you do, if I would order you to pour hot wax on your $target?
choice:Beg for mercy,Pour wax on my $target
if: LASTASK == 2
assign:curText:'That is correct. Now $strokeIt, knowing that I will probably order you to pour hot wax on your $target in the future, SNAME.'
assign:answer1:'Being your pain toy'
if: HAS_PENIS
assign:answer2:'You punching my balls'
assign:answer3:'Pouring hot wax on my dick'
else:
assign:answer2:'You fisting my pussy'
assign:answer3:'Pouring hot wax on my tits'
fi:
assign:correctAnswer:3
else:
assign:hasToRepeatCurQuestion:'TRUE'
fi:
end:
;
;================================================================
;====================== defining functions ======================
;================================================================
;
;----------------------------------------------------------------
function:askQuestionsUntilMax
;----------------------------------------------------------------
assign:questionsAsked:0
assign:secondsTodo:0
while: $questionsAsked<$MAX_NUMBER_OF_QUESTIONS || $secondsTodo>0
; --- Finish last Question ---
assign:additionalTime:0
if: '$aQuestionWasAsked'=='TRUE' && $secondsTodo == 0 && $questionsAsked != 0
if: HAS_PENIS
show:What were you thinking about, while stroking your cock for me?
else:
show:What were you thinking about, while rubbing your pussy for me?
fi:
if: '$answer4' != ''
choice:$answer1,$answer2,$answer3,$answer4
else:
choice:$answer1,$answer2,$answer3
fi:
if: LASTASK != $correctAnswer
show:No, that was not what I ordered you to think about. As a punishment I will extend your next timer.
button:I'm sorry Runa
assign:additionalTime:$SECONDS_PER_QUESTION
fi:
fi:
; --- New Question ---
if: $secondsTodo == 0
assign:hasToRepeatCurQuestion:'FALSE'
assign:curQuestion:Math.floor((Math.random() * $TOTAL_NUMBER_OF_QUESTIONS) + 1)
call:askCurQuestion
if: '$aQuestionWasAsked'=='TRUE'
assign:secondsForThisQuestion:$SECONDS_PER_QUESTION
if: '$hasToRepeatCurQuestion'=='TRUE'
call:askCurQuestionAgain
assign:secondsForThisQuestion:$secondsForThisQuestion + $SECONDS_PER_QUESTION
fi:
assign:secondsForThisQuestion:$secondsForThisQuestion + $additionalTime
assign:secondsTodo:$secondsForThisQuestion
show:$curText
assign:questionsAsked:$questionsAsked+1
if: FEMALE
button:Start rubbing
else:
button:Start stroking
fi:
fi:
fi:
; --- Cur Question ---
if: '$aQuestionWasAsked'=='TRUE'
show:$curText<p><strong>$secondsTodo</strong>
call:maybeStartOrStopCam
wbutton:1:Please, may I have a break?
if:LASTASK == 0
; Stop the video if it's currently being taken:
if: $curVidStart!=0
assign:curVidStart:0
vidstop:0
fi:
assign:secondsTodo:$secondsTodo+5
if: $secondsTodo > $secondsForThisQuestion
assign:secondsTodo:$secondsForThisQuestion
fi:
show:$curText<p><strong>$secondsTodo (tell me when you are ready to continue)</strong>
wait:3
button:Continue
else:
assign:secondsTodo:$secondsTodo-1
fi:
fi:
endwhile:
end:
;
;----------------------------------------------------------------
function:maybeStartOrStopCam
;----------------------------------------------------------------
call:maybeStartCam
call:maybeStopCam
end:
;
;----------------------------------------------------------------
function:maybeStartCam
;----------------------------------------------------------------
; don't start in the last 2 seconds ($secondsTodo>3)
; only start with a probability of 1% (TEMP1<=1)
; only start if currently no video is being taken ($curVidStart==0)
settemp1:Math.floor((Math.random() * 100) + 1)
if: $secondsTodo>3 && TEMP1<=1 && $curVidStart==0
assign:curVidStart:$secondsTodo
vidrec:0
if: FEMALE
log:Rubbing the pussy once per second. Rate as failed, if rubbing MUCH slower/faster.
else:
log:One full stroke per second. Rate as failed, if stroking MUCH slower/faster or not doing full strokes.
fi:
fi:
end:
;
;----------------------------------------------------------------
function:maybeStopCam
;----------------------------------------------------------------
; 3 sec after starting the video
if: $curVidStart!=0 && (($curVidStart - $secondsTodo) > 2)
assign:curVidStart:0
vidstop:0
fi:
end:
;
;----------------------------------------------------------------
function:askCurQuestionAgain
;----------------------------------------------------------------
show:That is not correct, I will ask you again. And as a punishment I will extend your next timer.
button:I'm sorry, Runa
assign:hasToRepeatCurQuestion:'FALSE'
assign:thisIsTheRepetition:'TRUE'
call:askCurQuestion
if: '$hasToRepeatCurQuestion'=='TRUE'
call:failedTheTask
fi:
assign:thisIsTheRepetition:'FALSE'
end:
;
;----------------------------------------------------------------
function:takePictureWithCamDelay
;----------------------------------------------------------------
button:Take photo (4 sec delay)
show:4...
wait:1
show:3...
wait:1
show:2...
wait:1
show:1...
wait:1
show:0!
cam:
wait:1
end:
;
;----------------------------------------------------------------
function:failedTheTask
;----------------------------------------------------------------
image:taskimg/sets/runa/runa_blue_bikini32.jpg
show:I already told you that this is not the correct answer. This is very disrespectful of you, SNAME. I'll have to tell this to DTITLE DNAME.
log:The slave gave the same wrong answer twice. PLEASE RATE AS FAILED!
button:I'm sorry, Runa
goto:endoftask
end:
;
;================================================================
;======================= start of the task ======================
;================================================================
image:taskimg/sets/runa/runa_blue_bikini1.jpg
if: HAS_PENIS
log:During this task the slave has to do some forced stroking, but is not allowed to cum. The cock has to stay hard the whole time.
else:
log:During this task the slave has to do some forced rubbing of her pussy. She is not allowed to cum.
fi:
show:Hey SNAME, it's me, Runa! I want to make sure that you understand what it means to be a slave, so I will ask a couple of questions to you.
button:Yes, Runa
image:taskimg/sets/runa/runa_blue_bikini2.jpg
if: FEMALE
show:But I also want to torture you. So I will force you to rub your pussy a lot. You will enjoy this initially, but after some time the frustration will turn into torture. You are not allowed to orgasm during this session!
button:I will not orgasm
else:
show:But I also want to torture you. So I will force you to stroke your cock a lot. You will enjoy this initially, but after some time the frustration will turn into torture. You are not allowed to cum during this session!
button:I will not cum
fi:
image:taskimg/sets/runa/runa_blue_bikini3.jpg
show:Now adjust the cam so that it shows your $genital1 in close-up and make sure that it stays like that.
button:Cam in position
if: !FEMALE
log:Slave showing hard cock with hands not touching it
image:taskimg/sets/runa/runa_blue_bikini13.jpg
show:Before we begin, get your cock hard and make sure that it stays hard during the whole session. If you ever get soft, I'll assume that it happened because you came without permission and you'll fail the task! Now show me your hard cock. And for the photo, take your hands off!
call:takePictureWithCamDelay
fi:
image:taskimg/sets/runa/runa_blue_bikini15.jpg
if: FEMALE
show:If I order you to rub your pussy, try to do it at a constant rate, around once per second. You are not allowed to stop on your own, so if you get too close to an orgasm, beg me for a break!
button:I will remember this
else:
show:If I order you to stroke, do one full stroke per second. So completely down and completely up in one second. It doesn't have to be at exactly that speed, but don't stroke MUCH faster or MUCH slower. Try to stroke at a constant rate. You are not allowed to stop on your own, so if you get too close to cumming, beg me for a break!
button:I will stroke like that
fi:
image:taskimg/sets/runa/runa_blue_bikini13.jpg
show:So let's start with the first question!
button:Yes, Runa
call:askQuestionsUntilMax
image:taskimg/sets/runa/runa_blue_bikini59.jpg
show:That's enough, slave. I hope that you understand a little better now, what being a slave means. And also feel a little more frustrated now. See you soon SNAME.
button:See you soon, Runa
label:endoftask
;