ybass.qsrc 935 B

12345678910111213141516171819202122232425262728293031323334
  1. # ybass
  2. $metka = $ARGS[0]
  3. $loc = $CURLOC
  4. clr
  5. gs 'stat'
  6. '<center><b><font color="maroon">Swimming Pool</font></b></center>'
  7. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/ybass.jpg"></center>'
  8. if $clothingworntype ! 'nude': act 'Go to your house':minut += 5 & gt 'youplace'
  9. act 'Go into Gym': gt 'ysport'
  10. act 'Swim (1:00)':
  11. cla
  12. *clr
  13. pcs_makeup = 1
  14. cumspclnt = 10
  15. gs 'cum_cleanup'
  16. minut += 60
  17. pcs_sweat = 10 + rand(0,4)
  18. pcs_mood += 5
  19. ! Seems appropriate. Reducing it, but leaving it in. Potentially worth revisiting
  20. pcs_willpwr += 1
  21. if pcs_stren < 40:stren_exp += 1
  22. '<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>'
  23. 'You swim in the pool, the water refreshes and invigorates.'
  24. if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the water.'
  25. act 'Out of the water':gt 'ybass'
  26. end
  27. --- ybass ---------------------------------