sleep_prepare.tw 3.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116
  1. :: sleep_prepare[event]
  2. <<if $wardrobe.clothingworntype != 'nude'>>
  3. <<image "shared/home/bed.jpg">>
  4. <<else>>
  5. <<image "shared/home/bedroom/son.jpg">>
  6. <</if>>
  7. <p>
  8. You run through your regular nightly routine,
  9. <<if $alarmClock.on>>
  10. <<set _nextAlarmClockAlarm = setup.alarmClockNextAlarm()>>
  11. setting your alarm for
  12. <<time_print _nextAlarmClockAlarm>>
  13. <<else>>
  14. not bothering to setting your alarm,
  15. <</if>>
  16. you undress, and prepare for sleep.
  17. </p>
  18. <<run $wardrobe.lastWornSet('bed')>>
  19. <<run $wardrobe.strip('clothes')>>
  20. <<run $wardrobe.strip('shoes')>>
  21. <<set $pc.pcs_hairbsh = 0>>
  22. <!--<<if setup.startingCharacterTagsIncludes('sg') and $loc != 'bedrPar' and $pc.isSchoolStudent>>
  23. <<set $notathomesleep += 1>>
  24. <<else>>
  25. <<set $notathomesleep = 0>>
  26. <</if>>-->
  27. <!--<<if getvar("$succubusflag") == 1 and $sucwalkday <= $time.daystart and $succhungry < (0 - 1 - succublvl or $pc.willpower < ((succublvl * willpowermax) / 13) or getvar("$sucpowzeroed") >= 3)>>
  28. <<gs 'succubus' 'sucwalkinginit'>>
  29. <</if>>-->
  30. <!--
  31. <<if getvar("$pc.analplugin") == 1 and $pc.vibratorin == 1>>
  32. <<if getvar("$bedAnal") == 1 and getvar("$bedVibrator") == 1>>
  33. <<set $pc.analplugin = 0>>
  34. <<set $pc.vibratorin = 0>>
  35. You remove your butt plug and your vibrator.
  36. <<elseif getvar("$bedAnal") == 0 and getvar("$bedVibrator") == 0>>
  37. You decide to leave your butt plug and vibrator in.
  38. <<elseif getvar("$bedAnal") == 1 and getvar("$bedVibrator") == 0>>
  39. <<set $pc.vibratorin = 0>>
  40. You decide to leave your butt plug in, but remove your vibrator.
  41. <<elseif getvar("$bedAnal") == 0 and getvar("$bedVibrator") == 1>>
  42. <<set $pc.analplugin = 0>>
  43. You decide to remove your butt plug, but leave your vibrator in.
  44. <</if>>
  45. <<elseif getvar("$pc.analplugin") == 1 and $pc.vibratorin == 0>>
  46. <<if getvar("$bedAnal") == 1>>
  47. <<set $pc.analplugin = 0>>
  48. You remove your butt plug.
  49. <<elseif getvar("$bedAnal") == 0>>
  50. You decide to leave your butt plug in.
  51. <</if>>
  52. <<elseif getvar("$pc.analplugin") == 0 and $pc.vibratorin == 1>>
  53. <<if getvar("$bedVibrator") == 1>>
  54. <<set $pc.vibratorin = 0>>
  55. You remove your vibrator.
  56. <<elseif getvar("$bedVibrator") == 0>>
  57. You decide to leave your vibrator in.
  58. <</if>>
  59. <</if>>
  60. <<if $wardrobe.shoeworntype == 'none'>>
  61. <<setinit $bed['shoetype'] = 'none'>>
  62. <<else>>
  63. <<setinit $bed['shoetype'] = $wardrobe.shoeworntype>>
  64. <<setinit $bed['shoenumber'] = $wardrobe.shoewornnumber>>
  65. <!-- !! gs 'shoes', 'strip'-->
  66. <!-- <</if>> -->
  67. <!--
  68. <<if getvar("$bedPanty") == 1>>
  69. <<if !$wardrobe.isWearingPanties and !$wardrobe.isWearingBra>>
  70. You put on your bra and panties.
  71. <<elseif $wardrobe.isWearingPanties and !$wardrobe.isWearingBra>>
  72. You put on your bra.
  73. <<elseif $wardrobe.isWearingPanties and $wardrobe.isWearingBra>>
  74. You put on your panties.
  75. <<else>>
  76. You change your bra and panties.
  77. <</if>>
  78. <<elseif getvar("$bedPanty") == 2>>
  79. <<if $wardrobe.isWearingPanties or $wardrobe.isWearingBra>>
  80. You remove your bra and panties.
  81. <<elseif $wardrobe.isWearingPanties and !$wardrobe.isWearingBra>>
  82. You remove your panties.
  83. <<elseif $wardrobe.isWearingBra>>
  84. You remove your bra.
  85. <</if>>
  86. <<else>>
  87. You were too tired to worry about your underwear, so for tonight you left it as is.
  88. <</if>>
  89. <<if $hairstyle != ''>>
  90. $hairstyle
  91. <<else>>
  92. Your hair is loose and free.
  93. <</if>> -->
  94. <<if $pc.pcs_makeup > 1 and $pc.cosmetic_tattoo == 0>>
  95. <<set $pc.pcs_makeup = 0>>
  96. <<set $pc.vidageday -= 1>>
  97. <<gs 'body' 'SkinLoss' 'MakeUpSleep'>>
  98. <p>You went to bed wearing your makeup, which will smear your face as you sleep; your skin will age faster from this!</p>
  99. <</if>>
  100. <!--<<if $pc.fat > 5 and getvar("$stringimplant") == 1>>
  101. <<setn $silicone += 1>> <<setn $pc.fat -= 5>>
  102. <</if>>-->
  103. <<actCLA 'Sleep...'>>
  104. <!-- !!flag to stop autosave breaking my awesome clothing thingy-->
  105. <!--<<setinit $clo_flag['bed'] = 0>>-->
  106. <<gt 'sleep'>>
  107. <</actCLA>>