User Tools

Site Tools


tasks:questions_2
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&#39;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&#39;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
;
tasks/questions_2.txt · Last modified: 2022/11/13 15:18 (external edit)