mod_Ibiza_nightclubToilet.qsrc 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081
  1. # mod_Ibiza_nightclubToilet
  2. if $ARGS[0] = 'start':
  3. $location_type = 'public_indoors'
  4. $loc = 'mod_Ibiza_nightclubToilet'
  5. $loc_arg = 'start'
  6. $menu_loc = 'mod_Ibiza_nightclubToilet'
  7. $menu_arg = 'start'
  8. gs 'themes', 'indoors'
  9. killvar '$locclass'
  10. menu_off = 0
  11. gs 'stat'
  12. *clr & cla
  13. '<center><b><font color="maroon">Nightclub-Restroom</font></b></center>'
  14. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/toiletwalkway.jpg"></center>'
  15. gs 'willpower', 'exhib', 'self'
  16. if will_cost <= pcs_willpwr:
  17. act 'Enter the men''s restroom (<<will_cost>> Willpower)':
  18. gs 'willpower', 'exhib', 'self'
  19. gs 'willpower', 'pay', 'self'
  20. gs 'stat'
  21. gt 'mod_Ibiza_nightclubToilet', 'clubtoilet_men'
  22. end
  23. else
  24. act 'Enter the men''s restroom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  25. end
  26. act 'Enter the women''s restroom': gt 'mod_Ibiza_nightclubToilet', 'clubtoilet_women'
  27. act 'Return to the dance floor': gt 'city_nightclub', 'inside'
  28. end
  29. if $ARGS[0] = 'clubtoilet_men':
  30. $loc = 'mod_Ibiza_nightclubToilet'
  31. $loc_arg = 'clubtoilet_men'
  32. $locM = 'mod_Ibiza_nightclubToilet'
  33. $locM_arg = 'clubtoilet_men'
  34. $menu_loc = 'mod_Ibiza_nightclubToilet'
  35. $menu_arg = 'clubtoilet_men'
  36. menu_off = 0
  37. $location_type = 'bathroom'
  38. $locclass = 'restroom'
  39. *clr & cla
  40. gs 'stat'
  41. '<center><b><font color="maroon">Nightclub-Men''s Room</font></b></center>'
  42. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/mentoilet.jpg"></center>'
  43. 'You walk in to the men''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>.'
  44. act 'Leave': gt 'mod_Ibiza_nightclubToilet', 'start'
  45. dynamic $tampon
  46. dynamic $quickwash
  47. dynamic $basin
  48. end
  49. if $ARGS[0] = 'clubtoilet_women':
  50. $loc = 'mod_Ibiza_nightclubToilet'
  51. $loc_arg = 'clubtoilet_women'
  52. $locM = 'mod_Ibiza_nightclubToilet'
  53. $locM_arg = 'clubtoilet_women'
  54. $menu_loc = 'mod_Ibiza_nightclubToilet'
  55. $menu_arg = 'clubtoilet_women'
  56. menu_off = 0
  57. $location_type = 'bathroom'
  58. $locclass = 'restroom'
  59. *clr & cla
  60. gs 'stat'
  61. '<center><b><font color="maroon">Nightclub-Women''s Room</font></b></center>'
  62. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/womentoilet.jpg"></center>'
  63. 'You walk in to the women''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>. You notice the last stall has its door wide open.'
  64. act 'Leave': gt 'mod_Ibiza_nightclubToilet', 'start'
  65. act 'Go to the last stall': gt 'gloryhole', 'start'
  66. dynamic $tampon
  67. dynamic $quickwash
  68. dynamic $basin
  69. end
  70. --- mod_Ibiza_nightclubToilet ---------------------------------