tanvanr 1.8 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. # tanvanr
  2. CLOSE ALL
  3. $metka = $ARGS[0]
  4. $loc = 'tanvanr'
  5. $metkaM = $ARGS[0]
  6. $locM = 'tanvanr'
  7. $location_type = 'bathroom'
  8. act 'Go to the corridor':gt 'tanhouse'
  9. clr
  10. minut += 1
  11. gs 'stat'
  12. if night_mode = 1:
  13. fcolor = rgb(255, 255, 255)
  14. bcolor = rgb(0, 0, 0)
  15. lcolor = rgb(106, 90, 205)
  16. else
  17. fcolor = rgb(0, 0, 0)
  18. bcolor = rgb(255, 255, 255)
  19. lcolor = rgb(106, 90, 205)
  20. end
  21. '<center><b><font color="maroon">Nicholas'' Bathroom</font></b></center>'
  22. '<center><img <<$set_imgh>> src="images/locations/shared/bathroom/vanr2.jpg"></center>'
  23. 'The bathroom is modern and well fitted, more than matching the display of wealth in the other rooms, from the elaborate decorations and spacious shower and tub to the underfloor heating.'
  24. 'The washing machine means you wont have to worry much about dirty clothes and you don''t even have to supply the powder. Also, you could easily take some of Tanya''s shampoo if you run out - you''re sure she wouldn''t mind.'
  25. gs 'din_van', 'private'
  26. if $clothingworntype ! 'uniform' and TanBathClean = 0:
  27. ''
  28. 'You have not cleaned this room yet today but your contract requires that you wear a <b>maid uniform</b> while you work in the house.'
  29. end
  30. if $clothingworntype = 'uniform' and PCloStyle2 = 1 and TanBathClean = 0:
  31. act 'Clean the Bathroom':
  32. cla
  33. minut += 30
  34. TanBathClean = 1
  35. MaidWork += 1
  36. clrbelo += dirtbelo
  37. dirtbelo = 0
  38. gs 'stat'
  39. nl
  40. 'Cleaning bucket in hand, you get to work, wiping every surface in the luxurious bathroom with utmost care to make them not only clean but sparkling clean. While the work is a little exhausting and the smell of some of the cleaning agents makes your eyes and nose itch, you work quickly and are done after about 30 minutes.'
  41. act 'Finish cleaning':
  42. gt 'tanvanr'
  43. end
  44. end
  45. end
  46. --- tanvanr ---------------------------------