1
0

yban 978 B

1234567891011121314151617181920212223242526272829303132333435363738394041
  1. # yban
  2. $metkaM = $ARGS[0]
  3. $locM = $CURLOC
  4. $metka = $ARGS[0]
  5. $loc = $CURLOC
  6. clr
  7. gs 'stat'
  8. if night_mode = 1:
  9. fcolor = rgb(255, 255, 255)
  10. bcolor = rgb(0, 0, 0)
  11. lcolor = rgb(106, 90, 205)
  12. else
  13. fcolor = rgb(0, 0, 0)
  14. bcolor = rgb(255, 255, 255)
  15. lcolor = rgb(106, 90, 205)
  16. end
  17. '<center><b><font color="maroon">Bath</font></b></center>'
  18. '<center><img src="images/locations/city/suburb/mansion/yban.jpg"></center>'
  19. if $clothingworntype ! 'nude':act 'Go to your house':minut += 5 & gt 'youplace'
  20. act 'Go into Gym': minut += 5 & gt 'ysport'
  21. if saunaday ! daystart:
  22. act 'Use Sauna':
  23. cls
  24. minut += 60
  25. fat -= 10
  26. pcs_sweat = rand(0,5)
  27. dynamic $showerdin
  28. saunaday = daystart
  29. pcs_mood = 100
  30. gs 'stat'
  31. '<center><img src="images/locations/city/shared/sauna/sau.jpg"></center>'
  32. 'You spend an hour relaxing in the heat of the sauna, having a cool shower and dressing. You feel revitalised.'
  33. act 'Leave':gt 'yban'
  34. end
  35. end
  36. --- yban ---------------------------------