Title:template_for_chastity_functions
Sex: Female F Male F Trans F
Require: chastity nochaste
Limits:
use:chastity
use:gen
; Example of how to use chastity related functions
;
show:Hello slave
button:Hello
call:maybeUnlock
; INSERT THE ACTUAL TASK
call:maybeRelock
show:This was fun, bye
button:bye
label:end_of_task
assign:logTaskName:'++ TODO ENTER TASK NAME HERE ++'
call:validateToDoTasks
call:saveToDoTasks
;
;----------------------------------------------------------------
function:maybeUnlock
  ;----------------------------------------------------------------
  call:checkIfInChastity
  if: $unlockChastityForThisTask
    ; ony CC members will ever get here
    show:It looks like you are in chastity, so you will be temporarily unlocked during this task. You will be required to stay in front of the camera <b>ALL THE TIME</b> while you unlock and re-lock. That means that everything you require to unlock, and relock needs to be in reach. Go now and get the key, or a cutter and a new tag if you use one, before you continue. Once unlocked, if I catch you not being in front of the camera, you will be severely punished
    button:I have everything I need
    call:initializeChastityClub
    settemp1:STIME
    savetemp1:chastityLastValidation
    if:('CHASTITY_DESC' != '')
      log:The slave has to unlock for this task. The slave has provided the following information to validate their chastity device. CHASTITY_DESC
    fi:
    call:chastityAssignControlNumber
    call:chastityLoadLockInfo
    call:chastityClubRequestVideo
    call:chastityValidateClubMember
  fi:
end:
;
;----------------------------------------------------------------
function:checkIfInChastity
  ;----------------------------------------------------------------
  loadtemp1:chastityStartTimeP
  loadtemp2:unlock_pending
  if: $lChastityClub && INCHASTITY && ('TEMP1' != '') && ('TEMP1' != 'undefined') && ('TEMP2' != 'true')
    assign:unlockChastityForThisTask:true
  else:
    assign:unlockChastityForThisTask:false
  fi:
  if: INCHASTITY && !$unlockChastityForThisTask
    log:The slave was in chastity, thus the task could not be done. Please give a neutral rating of 5.
    peerreview:false
    show:Oh no, you are currently in chastity. So we will have to play another time. See you $snick
    button:See you , Runa
    goto:end_of_task
  fi:
end:
;
;----------------------------------------------------------------
function:maybeRelock
  ;----------------------------------------------------------------
  if: $unlockChastityForThisTask
    show:You now have to lock yourself up again.<br><br>Only click on CONTINUE once you are securely locked up again
    button:continue
    call:chastityAskLockInfo
    call:chastityClubSaveVideo
    wait:1
    log:If you think the slave was no longer properly locked, or did not properly lock up again, then please assume the slave is trying to cheat. In particular if the slave and its genitals are not visible on ALL pictures. In that case please answer both questions with NO so that a moderator can look at it. Please also provide a short comment. Please do not show mercy, chastity enforcement should be strict, and a moderator will still consider what to do next.
    call:chastityScheduleValidation
  fi:
end:
;
;
;