
Title:writing and cum
Sex: Female T Male T Trans T
Require: nochaste cancum
Limits:
;Ready to test : Make you horny and make you write something on your face|chest and cum on it
;writing is random based on your kinks levels and chance of cumming based on level of orgasm control to make it a bit different each time
;TEMP2 = number fo edges to start
;TEMP3 = place of the writing face | chest
;TEMP4 = text to write
;
show:L_FACE
if:(L_FACE > 0)
  log:should write on face
  settemp3:'face'
  if:(L_FACE < 2)
    log:disable peer review
    peerreview:false
  fi:
else:
  log:should write on chest
  settemp3:'chest'
fi:
;
call:start_horny
call:task
;
function:start_horny
  show:I'm wondering how desperate to cum you are right now...
  choice:I'm scared of what you might ask in exchange, Cumming would be very nice, I'm quite desperate, Oh please DTITLE I really really need to cum!!
  if:(LASTASK == 1)
    call:bad_end
  else:
    settemp2:LASTASK
    show:that's a good start, now let's edge you a few time to make it even worse
    button:Thank You DTITLE
    while:(TEMP2 < 5)
      show:Edge!
      wait:10
      button:Edging...
      show:Good keep riding it for a while
      wait:Math.floor((Math.random() * 30) + 10)
      show:And hands off
      wait:10
      settemp2:(TEMP2+1)
    endwhile:
    show:Ok that should be enough for now...
    button:Thank You DTITLE
    show: On second thought, let's do another one for good measure!
    wait:10
    show:Edge!
    wait:10
    button:Edging...
    show:Good keep riding it for a while
    wait:Math.floor((Math.random() * 30) + 30)
    show:And hands off
    wait:10
    show:Now that I got you all horny and ready, let's play a bit...
    button:What kind of game, DTITLE?
    show: a very fun one SNAME
    wait:10
  fi:
end:
;
function:task
  show:it's very sexy and pretty kinky
  wait:10
  call:generate_writing
  log:Writing for pictures should be 'TEMP4'
  show:I want you to write 'TEMP4' on your TEMP3 with a permanent marker
  button:It's done DTITLE
  show:You look so much better like that
  wait:10
  show:Let's take a nice picture of it for your album
  wait:10
  if:('TEMP3' == 'face')
    show:Don't forget to smile for the camera
    wait:10
  fi:
  button:Ready (5s delay)
  show:5
  wait:1
  show:4
  wait:1
  show:3
  wait:1
  show:2
  wait:1
  show:1
  wait:1
  show:Cheese
  log:Picture should show writings
  cam:blackmail
  sound:bell.wav
  wait:5
  show:Now is that enough to let you cum...
  wait:10
  show:That's a good question...
  wait:10
  show:Start masturbating while I think about it...
  wait:20
  show:Don't go too fast, take your time...
  wait:10
  show:I'm going to take mine to decide your fate...
  wait:15
  show:It's so fun to see you squirm like that...
  wait:15
  show:Waiting for your fate...
  wait:15
  show:With that delightful glimmer of hope in your eyes...
  wait:15
  show:That makes me want to betray it soooo much...
  wait:15
  show:But maybe you deserve to cum...
  wait:10
  show:Do you?
  choice:Yes DTITLE, I'm not sure, No DTITLE
  ;random chance of cumming based on L_DENIAL and answer
  ; formula is (106 - (((LASTASK / 3) + L_DENIAL) * 18)))
  ;that gives -6% if answer is maybe and -12% if answer is no
  ;L_DENIAL = -1 => 100%
  ;L_DENIAL = 0 => 100%
  ;L_DENIAL = 1 => 82%
  ;L_DENIAL = 2 => 64%
  ;L_DENIAL = 3 => 46%
  ;L_DENIAL = 4 => 28%
  ;L_DENIAL = 5 => 10%
  settemp1:(LASTASK / 3)
  settemp1:(TEMP1 + L_DENIAL)
  settemp1:(TEMP1 * 18)
  settemp1:(106 - TEMP1)
  ;lower it even more for hardcore, let's be nice and give a DENIAL=5 answering 'yes' a chance in hardcode...
  if:(HARDCORE)
    settemp1:(TEMP1 - 9)
  fi:
  log:Chance to cum is TEMP1%
  ;now let's see if they come. The random number needs to be smaller than what was calculated before
  settemp1:(TEMP1 - Math.floor((Math.random() * 100) + 1))
  show:Well, it doesn't really matter what you think, I'll be the one deciding in the end
  wait:20
  if:(TEMP1 < 0)
    ;no cumming, let's torture the user a bit
    show:Ok, I made my mind! Edge one last time
    wait:10
    button:Edging...
    show:Hold it and get ready to cum when I reach 1
    wait:5
    show:5
    wait:1
    show:4
    wait:1
    show:3
    wait:1
    show:2.5
    wait:3
    show:yes I know...
    wait:5
    show:ok, 2
    wait:3
    show: And...
    wait:5
    show:Hands off!!!
    wait:10
    show:No cumming for you!
    wait:10
    show:I love to be devious like that
    wait:10
    show:After all I already got that nice picture of you for my files
    wait:10
    show:So why give you any relief when I can keep you horny and get even more material next time
    wait:10
    show:Now thank me and leave
    wait:5
    button:Thank you DTITLE
    goto:end
  else
    ; user gets to cum. let's start the same way in case the user knows the scenario
    show:Ok, I made my mind! Edge one last time
    wait:10
    button:Edging...
    show:Hands off
    wait:10
    show:The good news for you is that I'm going to let you cum...
    wait:10
    show:The even better news for me is that in order to do it, you'll have to follow my instructions
    wait:10
    show:And I want you to cum all over that writing on your TEMP3
    wait:10
    if:('TEMP3' == 'face')
      if:(L_CUM == 2)
        show:You can even smear it on your lips if you like...
        log:+1 mood point if you can see cum on lips/mouth on final picture, +2 if mouth is open and user is cummin on cumming picture
        wait:10
      fi:
      if:(L_CUM > 2)
        show:Don't forget to keep your mouth open, you might catch some delicious reward on the way, yum yum!
        log:+1 mood point if mouth is open and user is cummin on cumming picture
        wait:10
      fi:
    fi:
    show:What do you think?
    wait:10
    choice:I'll do it, No way
    if:(LASTASK == 1)
      show:I knew you'd do it SNAME
      wait:10
      show:Now get in position on your back on the floor, webcam aiming at your TEMP3. Once ready click the button, you'll have 30s to cum (you'll hear a ringing sound). If you cum faster stay in position. If can't cum in 30s too bad for you.
      wait:10
      wbutton:20:I'm ready to cum DTITLE DNAME
      wait:5
      show:30s, should you really be reading this?
      wait:10
      show:20s, yeah I'm really trying to distract you...
      wait:5
      log:should be masturbating on their back aiming to the writings
      cam:
      wait:5
      show:10
      wait:1
      show:9
      wait:1
      show:8
      wait:1
      show:7
      wait:1
      show:6
      wait:1
      show:5
      wait:1
      show:4
      wait:1
      show:3
      wait:1
      show:2
      wait:1
      show:1
      wait:1
      show:Cum now!
      cam:
      sound:bell.wav
      wait:10
      show:Did you manage to cum?
      choice:Yes DTITLE, No DTITLE
      if:(LASTASK == 1)
        show:Good job SNAME!
        wait:10
        show:That means it's time for a commemorative picture
        wait:10
        show:Who knows when you'll cum next, after all...
        wait:10
        show:Get ready to show those writings on your TEMP3 covered in cum
        wait:5
        button:Ready (5s delay)
        show:5
        wait:1
        show:4
        wait:1
        show:3
        wait:1
        show:2
        wait:1
        show:1
        wait:1
        show:0
        log:Picture should show writings covered in cum
        ;cam:blackmail
        sound:bell.wav
        wait:5
        show:That will be a great addition on my collection
        wait:10
        show:You can go clean up now
        button:Thank you DTITLE
        goto:end
      else:
        show:Too bad, it seems you missed your chance
        button:I'm sorry DTITLE
        show:That's ok. Having only yourself to blame for being denied is even more fun for me
        wait:10
        show:You can go clean up now
        button:Thank you DTITLE
        goto:end
      fi:
    else:
      call:bad_end
    fi:
  fi:
end:
;
function:generate_writing
  settemp1:Math.floor((Math.random() * 14) + 1)
  settemp4:'PIG'
  if:(L_ANAL > 1)
    if:(TEMP1 == 1)
      settemp4:ANAL SLUT
    fi:
  fi:
  if:(L_BONDAGE > 1)
    if:(TEMP1 == 2)
      settemp4:'BONDAGE SLUT'
    fi:
  fi:
  if:(L_CHASTITY > 1)
    if:(TEMP1 == 3)
      settemp4:'CHASTITY SLAVE'
    fi:
  fi:
  if:(L_FINDOM > 1)
    if:(TEMP1 == 4)
      settemp4:'PAYPIG'
    fi:
  fi:
  if:(L_ONLINE > 1)
    if:(TEMP1 == 5)
      settemp4:'CAM SLUT'
    fi:
  fi:
  if:(L_OUTDOOR > 1)
    if:(TEMP1 == 6)
      settemp4:'PERVERT'
    fi:
  fi:
  if:(L_EXHIB > 1)
    if:(TEMP1 == 7)
      settemp4:'Exhibitionist'
    fi:
  fi:
  if:(L_DENIAL > 1)
    if:(TEMP1 == 8)
      settemp4:'DENIAL SLUT'
    fi:
  fi:
  if:(L_PAIN_G > 1)
    if:(TEMP1 == 9)
      settemp4:'PAIN SLUT'
    fi:
  fi:
  if:(L_PAIN_N > 1)
    if:(TEMP1 == 10)
      settemp4:'PAIN SLUT'
    fi:
  fi:
  if:(L_INFO > 1)
    if:(TEMP1 == 11)
      settemp4:'BLACKMAIL SLAVE'
    fi:
  fi:
  if:(L_SISSY > 1)
    if:(TEMP1 == 12)
      if:(S_IDENTIFY == 3)
        settemp4:'SLUT'
      else:
        if:(S_IDENTIFY < 2)
          settemp4:'SISSY SLUT'
        else:
          if:(S_IDENTIFY > 2)
            settemp4:'SLUT'
          fi:
        fi:
      fi:
    fi:
  fi:
  if:(L_WATERSPORT > 1)
    if:(TEMP1 == 13)
      settemp4:'PEE DRINKER'
    fi:
  fi:
  if:(L_CUM > 1)
    if:(TEMP1 == 14)
      settemp4:'CUMSLUT'
    fi:
  fi:
end:
;
;
function:bad_end
  log:Current Mood = MOOD
  ;setmood:MOOD-2 to not give any mood points
  if:(L_DENIAL < 2)
    show:Oooh, wrong answer SNAME! No cumming for you!!
  fi:
  if:(L_DENIAL == 2)
    show:Oooh, wrong answer SNAME! No cumming for you for a while!!
    ;setdenial:4 hours
  fi:
  if:(L_DENIAL == 3)
    show:Oooh, wrong answer SNAME! No cumming for you for a while!!
    ;setdenial:8 hours
  fi:
  if:(L_DENIAL == 4)
    show:Oooh, wrong answer SNAME! No cumming for you for a while!!
    ;setdenial:16 hours
  fi:
  if:(L_DENIAL == 5)
    show:Oooh, wrong answer SNAME! No cumming for you for a while!!
    ;setdenial:24 hours
  fi:
  button:Thank You DTITLE
  goto:end
end:
label:end
;
;