Jennifer In Control
Jennifer In Control
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 ;