
Title:piet_quiz_1_code
Sex: Female T Male T Trans T
Require:
Limits:
listadd:'Jessika_all_zipped_up_9'
listadd:'Jessika_all_zipped_up_7'
listadd:'Jessika_all_zipped_up_10'
listadd:'Jessika_all_zipped_up_6'
listadd:'Jessika_all_zipped_up_11'
listadd:'Jessika_all_zipped_up_7'
listadd:'Jessika_all_zipped_up_16'
listadd:'Jessika_all_zipped_up_3'
listadd:'Jessika_all_zipped_up_16_2'
listadd:'Jessika_all_zipped_up_10'
listadd:'Jessika_all_zipped_up_13'
listadd:'Jessika_all_zipped_up_5'
listadd:'Jessika_all_zipped_up_15'
listadd:'Jessika_all_zipped_up_46_3'
listadd:'Jessika_all_zipped_up_45'
listadd:'Jessika_all_zipped_up_46_4'
listadd:'Jessika_all_zipped_up_44'
listadd:'Jessika_all_zipped_up_49'
listadd:'Jessika_all_zipped_up_39'
listadd:'Jessika_all_zipped_up_46_2'
;
; quiz_1
;
;================================================================
;====================== defining variables ======================
;================================================================
assign:taskName:'quiz_1'
use:gen
capture:hide
;
assign:dom_her1:'her'
if: 'DNAME' == 'James'
  assign:dom_her1:'his'
fi:
;
if:(S_IDENTIFY > 3)
  assign:he1:'she'
fi:
;
if:(S_IDENTIFY == 3)
  assign:he1:'they'
fi:
;
if:(S_IDENTIFY < 3)
  assign:he1:'he'
fi:
;
assign:maxRounds:10
loadquiz:$maxRounds
assign:curRound:0
assign:wrongAnswers:0
assign:maxSecondsPerAnswer:30
if: HARDCORE
  assign:maxSecondsPerAnswer:20
fi:
assign:punishmentLenghtPerFail:30
;
assign:allowedStrikes:7
if: L_PAIN_N == 4
  assign:allowedStrikes:5
fi:
if: L_PAIN_N == 5 || HARDCORE
  assign:allowedStrikes:3
fi:
if: L_PAIN_N == 5 && HARDCORE
  assign:allowedStrikes:2
fi:
if: L_PAIN_N == 5 && ADD_MIS.includes('R')
  assign:allowedStrikes:$allowedStrikes-1
fi:
;
assign:chanceToExpose:0
if: L_ONLINE == 3
  assign:chanceToExpose:33
fi:
if: L_ONLINE == 4
  assign:chanceToExpose:66
fi:
if: L_ONLINE == 5
  assign:chanceToExpose:88
fi:
if: L_ONLINE >= 1 && HARDCORE && $chanceToExpose < 33
  assign:chanceToExpose:20
fi:
;
if: T_NIPPLECLAMPS && (L_PAIN_N>2 || L_PAIN_N>0 && HARDCORE)
  assign:punishWithNippleClamps:true
else:
  assign:punishWithNippleClamps:false
fi:
assign:wasPunishedWithNippleClamps:false
assign:vidDescriptionLogWasShown:false
assign:cothespinsRipOffCounterWasShownBefore:false
assign:curImage:-1
assign:hardCockImageWasTaken:false
;
;================================================================
;====================== defining functions ======================
;================================================================
;
;----------------------------------------------------------------
function:nextImage
  ;----------------------------------------------------------------
  assign:curImage:$curImage+1
  settemp1:List[$curImage]
  image:taskimg/sets/jessika/TEMP1.jpg
end:
;
;----------------------------------------------------------------
function:askOneQuestion
  ;----------------------------------------------------------------
  wait:1
  settemp5:quiz_q[$curRound]
  assign:correctAnswerIndex:quiz_c[$curRound]
  settemp1:quiz_a0[$curRound].replaceAll(',','').replaceAll(':','').trim()
  settemp2:quiz_a1[$curRound].replaceAll(',','').replaceAll(':','').trim()
  settemp3:quiz_a2[$curRound].replaceAll(',','').replaceAll(':','').trim()
  settemp4:quiz_a3[$curRound].replaceAll(',','').replaceAll(':','').trim()
  ;
  assign:startTimeQuestion:TIMENOW
  assign:displayCurRound:$curRound+1
  show:$displayCurRound.TEMP5
  choice:TEMP1,TEMP2,TEMP3,TEMP4
  if: $correctAnswerIndex + 1 == LASTASK
    assign:gotQuestionRight:true
  else:
    assign:gotQuestionRight:false
  fi:
  assign:endTimeQuestion:TIMENOW
  if: ($endTimeQuestion-$startTimeQuestion) > ($maxSecondsPerAnswer*1000)
    assign:answeredInTime:false
    assign:neededTime:Math.ceil(($endTimeQuestion-$startTimeQuestion)/1000)
  else:
    assign:answeredInTime:true
  fi:
end:
;
;----------------------------------------------------------------
function:doOneRound
  ;----------------------------------------------------------------
  if: HAS_PENIS && !INCHASTITY
    if: $curRound == 0
      show:To further distract you, I want you aroused. So before each question you will get your dick hard. Now do it and then present your hard dick with hands off. Make sure that I can see your dick on camera if I turn around! Right after the counter has finished, I will ask the first question.
    else:
      show:To see the next question present your hard dick with hands off.
    fi:
    button:Take photo (3 seconds delay)
    show:3...
    wait:1
    show:2...
    wait:1
    show:1...
    wait:1
    show:0!
    settemp1:Math.floor((Math.random() * 100) + 1)
    if: TEMP1 < 15
      cam:save:HARD_COCK_PIC_1
      assign:hardCockImageWasTaken:true
      log:Showing hard dick with hands not touching it.
    fi:
  fi:
  call:nextImage
  call:askOneQuestion
  call:nextImage
  if: $punishWithNippleClamps && ($wrongAnswers >= $allowedStrikes)
    call:maybeRipOffClothespins
  fi:
  if: !$gotQuestionRight || !$answeredInTime
    assign:wrongAnswers:$wrongAnswers+1
  fi:
  if: !$gotQuestionRight || !$answeredInTime
    call:wrongAnswerTalkAfterRound
  else:
    show:Correct!
    wait:2
  fi:
end:
;
;----------------------------------------------------------------
function:maybeShitTalk
  ;----------------------------------------------------------------
  assign:correctAnswers:($curRound+1-$wrongAnswers)
  if: $wrongAnswers - $correctAnswers > 2
    settemp1:Math.floor((Math.random() * 12) + 1)
    if: TEMP1 == 1
      show:That's already a lot of wrong answers, you really don't seem to be very smart.
      wait:5
    fi:
    if: TEMP1 == 2
      show:You got a lot questions wrong already, you really seem to be kind of stupid.
      wait:5
    fi:
    if: TEMP1 == 3
      show:Your current score is not very impressive. You don't seem to be the smartest slave around.
      wait:5
    fi:
    if: TEMP1 == 4
      show:You really suck at this. You don't seem to be the smartest slave.
      wait:5
    fi:
    if: TEMP1 == 5
      show:So you seem to be one of the dumber slaves.
      wait:5
    fi:
    if: TEMP1 == 6
      show:It looks like you are not one of the smart slaves.
      wait:5
    fi:
  fi:
end:
;
;----------------------------------------------------------------
function:doAllRounds
  ;----------------------------------------------------------------
  label:startOfRoundLabel
  call:doOneRound
  assign:curRound:$curRound+1
  if:$curRound < $maxRounds
    goto:startOfRoundLabel
  fi:
end:
;
;----------------------------------------------------------------
function:wrongAnswerTalkAfterRound
  ;----------------------------------------------------------------
  if: !$answeredInTime
    show:You took too long to answer ($neededTime instead of $maxSecondsPerAnswer seconds)
    wait:3
  else:
    show:That was not the correct answer.
    wait:3
  fi:
  if: $wrongAnswers == 1
    assign:strikeNumberText:'1st'
  fi:
  if: $wrongAnswers == 2
    assign:strikeNumberText:'2nd'
  fi:
  if: $wrongAnswers == 3
    assign:strikeNumberText:'3rd'
  fi:
  if: $wrongAnswers > 3
    assign:strikeNumberText:'$wrongAnswersth'
  fi:
  show:This was your $strikeNumberText wrong answer!
  wait:3
  call:maybeShitTalk
  if: $punishWithNippleClamps && ($wrongAnswers == $allowedStrikes) && ($curRound+1 != $maxRounds)
    show:Better show more effort, the next wrong answer will hurt your nipples!
    wait:4
  fi:
end:
;
;----------------------------------------------------------------
function:maybeRipOffClothespins
  ;----------------------------------------------------------------
  if: !$cothespinsRipOffCounterWasShownBefore
    show:From now on your nipples will be punished for wrong answers. So make sure that I can see your nipples, then attach the clothespins to them and wait for me to tell you whether this was the correct answer. If it was wrong, I will say Rip off and you'll have 2 seconds to rip the clothespins off by pulling on the thread. So better be quick! If it was correct, I will say nothing and you can just take the clothespins off.
    assign:cothespinsRipOffCounterWasShownBefore:true
  else:
    show:Make sure that I can see your nipples, then attach the clothespins to them and wait for me to tell you whether this was the correct answer. If it was wrong, I will say Rip off and you'll have 2 seconds to rip the clothespins off by pulling on the thread. If it was correct, I will say nothing and you can just take the clothespins off.
  fi:
  button:Waiting for your command
  if: !$gotQuestionRight || !$answeredInTime
    call:ripOffClothespins
  else:
    show:Wait
    wait:10
  fi:
end:
;
;----------------------------------------------------------------
function:ripOffClothespins
  ;----------------------------------------------------------------
  assign:wasPunishedWithNippleClamps:true
  settemp1:Math.floor((Math.random() * 100) + 1)
  if: TEMP1 < 33
    assign:takeVid:true
    if: !$vidDescriptionLogWasShown
      log:In all videos, the slave should be ripping off the clothespins from the nipples by only touching the thread. In the beginning the pins have to be on, at the end the pins have to be off.
      assign:vidDescriptionLogWasShown:true
    fi:
  else:
    assign:takeVid:false
  fi:
  show:Wait
  wait:10
  if: $takeVid
    vidrec:0
  fi:
  wait:1
  show:Rip off 2!
  speakjen:Rip off!
  wait:1
  show:Rip off 1!
  wait:1
  show:Rip off 0!
  if: $takeVid
    vidstop:0
    wait:1
  fi:
end:
;
;----------------------------------------------------------------
function:finalEvaluation
  ;----------------------------------------------------------------
  loadgtemp1:QUIZ_1_NUMBER_OF_WRONG_ANSWERS_LAST_PLAYER
  assign:lastPlayerWrongAnswers:TEMP1
  assign:lastPlayerCorrectAnswers:($maxRounds-TEMP1)
  loadgtemp1:QUIZ_1_NAME_OF_LAST_PLAYER
  assign:lastPlayerName:'TEMP1'
  assign:correctAnswers:($maxRounds-$wrongAnswers)
  image:taskimg/sets/jessika/Jessika_all_zipped_up_45.jpg
  if: $wasPunishedWithNippleClamps
    show:This was the last round. You got $correctAnswers/$maxRounds questions right. Let's see how you compare to the last slave who took this quiz. Let's hope that you were smarter, otherwise I will think about putting a picture of you in the temp expose gallery. And since you got so many questions wrong, attach the nipple clamps and leave them on until the end of the task. Make sure that at least your nipples are always in my view from now on.
    button:Clamps attached
    log:if there are more pictures after this, they all have to prove that the nipples are clamped.
  else:
    show:This was the last round. You got $correctAnswers/$maxRounds questions right. Let's see how you compare to the last slave who took this quiz. Let's hope that you were smarter, otherwise I will think about putting a picture of you in the temp expose gallery.
    button:Yes, Miss Jessica
  fi:
  show:So let me check..
  wait:1
  show:So let me check...
  wait:2
  show:So let me check....
  wait:3
  show:So let me check.....
  wait:4
  image:taskimg/sets/jessika/Jessika_all_zipped_up_46.jpg
  if: $correctAnswers > $lastPlayerCorrectAnswers
    show:The last slave got $lastPlayerCorrectAnswers/$maxRounds questions right. So your $correctAnswers are better, well done!
    button:Thank you, Miss Jessica
    log:The slave got $correctAnswers/$maxRounds questions right and was thus better than the last slave who took this quiz who only got $lastPlayerCorrectAnswers right. Based on this, you should give a good rating!
  fi:
  if: $correctAnswers == $lastPlayerCorrectAnswers
    show:The last slave also got $lastPlayerCorrectAnswers/$maxRounds questions right. You are not smarter than the other slave, but at least you are also not dumber. So you are lucky, I will not expose you.
    button:Thank, you Miss Jessica
    log:The slave got $correctAnswers/$maxRounds quiz questions right and was as good as the last slave who took this quiz. Based on this, you should give a neutral to good rating!
  fi:
  if: $correctAnswers < $lastPlayerCorrectAnswers
    if: '$lastPlayerName' == 'SNAME'
      show:The other slave was smarter than you and got $lastPlayerCorrectAnswers/$maxRounds questions right. You only got $correctAnswers questions right. So what are you?
      button:I am stupid
    else:
      show:The other slave ($lastPlayerName) was smarter than you and got $lastPlayerCorrectAnswers/$maxRounds questions right. You only got $correctAnswers questions right. So, who of you two is smarter?
      button:$lastPlayerName
    fi:
    image:taskimg/sets/jessika/Jessika_all_zipped_up_48.jpg
    ;
    if: HAS_PENIS
      assign:andStroke:'stroke your dick with your other hand.'
      assign:whileStroking:'while stroking the penis'
    else:
      assign:andStroke:'rub your pussy with your other hand.'
      assign:whileStroking:'while rubbing her pussy'
    fi:
    if: INCHASTITY
      assign:andStroke:'play with your cage with your other hand.'
      assign:whileStroking:'while playing with the cage'
    fi:
    ;
    assign:differenceCorrectAnswers:$lastPlayerCorrectAnswers - $correctAnswers
    assign:punishmentTime:$differenceCorrectAnswers*$punishmentLenghtPerFail
    if: $lastPlayerCorrectAnswers - $correctAnswers >= 3
      assign:veryStupid:true
      show:Exactly, get a sheet of paper and write 'I am stuped' on it. Yes, write 'stuped'! Since you are so much dumber than the other player, I can't assume that you would have known how to spell it without me telling you. Then get naked and hold the paper in front of you for a picture. Afterwards I will think about whether I'll put it in the temp expose gallery. Hold the paper perfectly horizontally. I hope you are at least able to do that, and while you do it $andStroke You will have to stand there for $punishmentLenghtPerFail sec for each correct answer that you had less than the other player. So for $punishmentTime seconds.
    else:
      assign:veryStupid:false
      show:Exactly, get a sheet of paper and write 'I am stupid' on it. Then get completely naked, hold the paper in front of you and get in full view of the camera. I will take a picture of you for the record, and afterwards I will think about whether I will put this picture in the temp expose gallery. Hold the paper perfectly horizontally. I hope you are at least able to do that, and while you do it $andStroke You will have to stand there for $punishmentLenghtPerFail sec for each correct answer that you had less than the other player. So for $punishmentTime seconds.
    fi:
    button:Get in position
    wait:7
    if: $veryStupid
      log:Naked slave holding a picture with 'I am stuped' on it $whileStroking. Verify that it's 'stuped' not 'stupid' and that it's held perfectly horizontally! Please mark as failed, if they were even too stupid to hold it horizontally.
    else:
      log:Naked slave holding a picture with 'I am stupid' on it $whileStroking. Verify that it's held perfectly horizontally! Please mark as failed, if they were even too stupid to hold it horizontally.
    fi:
    speakjen:Get in position
    settemp1:Math.floor(Math.random() * $punishmentTime)
    wait:TEMP1
    cam:
    wait:$punishmentTime-TEMP1
    cam:save:quiz_expose_picture
    wait:1
    sound:cam.mp3
    image:taskimg/sets/jessika/Jessika_all_zipped_up_46_2.jpg
    show:So let me now think about whether I will show this picture to everybody.
    button:Please don't
    show:Well, let me think..
    wait:1
    show:Well, let me think...
    wait:1
    show:Well, let me think....
    wait:1
    show:Well, let me think.....
    wait:1
    settemp1:Math.floor((Math.random() * 100) + 1)
    if: TEMP1 < $chanceToExpose
      settemp6:1+L_ONLINE
      expose:quiz_expose_picture:TEMP6
      show:Well, let me think......
      wait:1
      show:Well, let me think.......
      wait:1
      show:Well, let me think........
      wait:1
      image:taskimg/sets/jessika/Jessika_all_zipped_up_45.jpg
      show:Yes, I have exposed you. Everybody should know how stupid you are.
      button:I understand, Miss Jessica
      assign:exposureCaption:'SNAME is stupid, $he1 only got $correctAnswers/$maxRounds quiz questions right. The last player ($lastPlayerName) is smarter than SNAME and got $lastPlayerCorrectAnswers questions right'
      exptext:$exposureCaption
      log:The slave only got $correctAnswers/$maxRounds quiz questions right and was thus dumber than the previous slave who got $lastPlayerCorrectAnswers questions right. Give a rating that you think is appropriate for this score!
      assign:wasExposed:true
    else:
      image:taskimg/sets/jessika/Jessika_all_zipped_up_45.jpg
      show:You are lucky, I won't expose you this time.
      button:Thank you, Miss Jessica
      log:The slave only got $correctAnswers/$maxRounds quiz questions right and was thus dumber than the previous slave who got $lastPlayerCorrectAnswers questions right. Give a rating that you think is appropriate for this score!
      assign:wasExposed:false
    fi:
    if: '$lastPlayerName' != 'SNAME'
      call:congratulatePreviousPlayer
    fi:
    call:maybeStoreCockPicForOtherTasks
    if: $wasPunishedWithNippleClamps && (L_PAIN_N >= 4 || HARDCORE)
      show:As a final punishment, let's rip off the clothespins a last time. Make sure that I can see your clamped nipples and wait for my command to rip them off.
      button:Waiting for your command
      call:ripOffClothespins
    fi:
  fi:
end:
;
;----------------------------------------------------------------
function:maybeStoreCockPicForOtherTasks
  ;----------------------------------------------------------------
  if: $hardCockImageWasTaken && L_ONLINE >= 3 && $lastPlayerCorrectAnswers - $correctAnswers >= 2
    show:Since you were so much dumber than the other player, you will get an additional punishment. As a punishment I will humiliate you by showing a picture of your cock that I took during this task to somebody else during their next deep throating training. Now apologize for being that stupid.
    button:I'm sorry for being stupid
    settemp1:true
    savetemp1:USE_COCK_PIC_FOR_DEEPTHROAT_TASK
  fi:
end:
;
;----------------------------------------------------------------
function:congratulatePreviousPlayer
  ;----------------------------------------------------------------
  image:taskimg/sets/jessika/Jessika_all_zipped_up_46.jpg
  settemp1:'$lastPlayerName'
  settemp2:$lastPlayerCorrectAnswers
  settemp3:$correctAnswers
  if: $wasExposed
    assign:inAdditionToThis:'In addition to this'
  else:
    assign:inAdditionToThis:'But'
  fi:
  asktextp:$inAdditionToThis I want you to congratulate TEMP1 on their good score. Please type your congratulations below, I will then send them to TEMP1. Make sure that you mention their name (TEMP1), how many questions they got right (TEMP2), how many questions you got right (TEMP3), and mention in some way that they are smarter than you.
  assign:messageToOtherPlayer:'LASTASK'
  msg:TEMP1:SNAME took the quiz_1 task after you. You were better, so they were asked to congratulate you. You might want to send them a short thank you message in return. This is what they wrote...$messageToOtherPlayer.
  log:The slave was asked to congratulate the previous player. They at least have to mention the other players name (TEMP1), how many questions the other player got right (TEMP2), how many questions they themselves got right (TEMP3), and mention in some way that the other player is smarter than them.
end:
;
;================================================================
;======================= start of the task ======================
;================================================================
image:taskimg/sets/jessika/Jessika_all_zipped_up_1.jpg
show:Hey $snick, It's me, Miss Jessica! DTITLE DNAME wants to know how smart $dom_her1 slaves are. So we will do a short quiz of $maxRounds questions. And at the end I will compare your result to the result of the last slave who did this quiz. If you did worse, I will at least think about exposing you in the temp expose gallery. So better do your best!
button:Yes, Miss Jessica
if: $punishWithNippleClamps
  image:taskimg/sets/jessika/Jessika_all_zipped_up_2_clothespins.jpg
  show:For some extra motivation, we will hurt your nipples after every wrong answer. So get 2 clothespins, and connect them via a thread that allows you to pull them off your nipples. I will be nice though, the first $allowedStrikes wrong answers will not be taken out on your nipples. So don't attach them to your nipples, yet.
  button:Thank you, Miss Jessica
fi:
image:taskimg/sets/jessika/Jessika_all_zipped_up_8.jpg
show:I might try to distract you a little by taking off some clothes and flashing my tits or pussy during the time you have to answer the question. Try not to get too distracted by me though, you only have $maxSecondsPerAnswer seconds to answer a question.
button:I will do my best
if: !HAS_PENIS || INCHASTITY
  show:Ok, let's start with the first question.
  wait:3
fi:
call:doAllRounds
call:finalEvaluation
image:taskimg/sets/jessika/Jessika_all_zipped_up_49.jpg
show:See you next time, $snick!
button:See you, Miss Jessica
settemp1:$wrongAnswers
savegtemp1:QUIZ_1_NUMBER_OF_WRONG_ANSWERS_LAST_PLAYER
settemp1:'SNAME'
savegtemp1:QUIZ_1_NAME_OF_LAST_PLAYER
;
;