090_sauna2 744 B

123456789101112131415161718192021222324252627282930313233
  1. # sauna2
  2. set minut += 5
  3. '<center><b><font color="maroon">Sauna</font></b></center>'
  4. '<center><img src="images/etogame/sauna1.jpg"></center>'
  5. 'Stay for an hour costs 2,000 rubles.'
  6. gs 'stat'
  7. fcolor = rgb(0, 0, 0)
  8. bcolor = rgb(255, 255, 255)
  9. lcolor = rgb(106, 90, 205)
  10. act 'Leave':gt 'sauna'
  11. if money >= 2000 and saunaday ! day:
  12. act 'Stay':
  13. cls
  14. money = money - 2000
  15. minut += 60
  16. fat -= 10
  17. sweat = -10
  18. dynamic $showerdin
  19. saunaday = day
  20. manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
  21. gs 'stat'
  22. '<center><img src="images/etogame/sau.jpg"></center>'
  23. 'You are in for an hour in the sauna steamed, washed under a shower and relax.'
  24. act 'Leave':gt 'sauna'
  25. end
  26. end
  27. --- sauna2 ---------------------------------