qwloc 4.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165
  1. # qwloc
  2. $location_type = 'event_outdoors'
  3. if $ARGS[0] = '':
  4. minut += 5
  5. gs 'stat'
  6. '<center><b><font color="maroon">Man</font></b></center>'
  7. '<center><img <<$set_imgh>> src="images/characters/city/vladimir/001.jpg"></center>'
  8. if pcs_makeup > 1 and pcs_hairbsh = 1:
  9. 'A man standing near the fence noticed your gaze and smiled.'
  10. act 'Approach the man':
  11. cla
  12. 'You approached the man and he left the fence to walk towards you.'
  13. xgt 'qwloc', 'qwvladdy'
  14. end
  15. act 'Smile':
  16. cla
  17. 'You smiled at the man and he left the fence to talk towards you.'
  18. xgt 'qwloc', 'qwvladdy'
  19. end
  20. act 'Ignore':
  21. cla
  22. 'You turned away from the man but hearing his footsteps approach you, you turn back towards him.'
  23. xgt 'qwloc', 'qwvladdy'
  24. end
  25. else
  26. 'The man returned your gaze for a moment before turning away.'
  27. act 'Leave':gt 'park', 'luna'
  28. end
  29. end &! --- ---
  30. if $ARGS[0] = 'qwvladdy':
  31. 'The man bowed to you. "Hello. My name is Vladimir and I think I love you, I would like the honour of your name.'
  32. gs 'qwloc', 'qwnamedy'
  33. act 'Sorry, I''m busy':
  34. cla
  35. vladimirQW = 1
  36. '"Sorry, I''m busy," you excuse yourself.'
  37. 'Vladimir shakes his head to that. "Well, what are you busy with? I will not bite. I just want to know the name of a charming stranger.'
  38. gs 'qwloc', 'qwnamedy'
  39. act 'Leave anyway':
  40. cla
  41. vladimirQW = 2
  42. 'You simply turned on the man and walked away from him.'
  43. act 'Leave':gt 'park', 'luna'
  44. end
  45. end
  46. end &! --- qwladdy ---
  47. if $ARGS[0] = 'qwnamedy':
  48. act '<<$pcs_nickname>>':
  49. cla
  50. vladimirQW = 10
  51. '"<<$pcs_nickname>>," you introduce yourself.'
  52. 'Vladimir smiled. "A beautiful name to match a beautiful woman. I unfortunately have to go, but I would like to meet with you again. We could go to the restaurant to talk. Leave me your phone number, I''ll call you tomorrow.'
  53. act 'No (Go)':
  54. cla
  55. vladimirQW = 2
  56. 'You simply turned on the man and walked away from him.'
  57. act 'Leave':gt 'park', 'luna'
  58. end
  59. act 'Give him your number':
  60. cla
  61. vladimirQW = 20
  62. vladimirday = daystart
  63. 'You dictated your phone number to Vladimir and he wrote it down in a small notebook with a leather cover.'
  64. act 'Leave':gt 'park', 'luna'
  65. end
  66. end
  67. end &! --- qwnamedy ---
  68. if $ARGS[0] = '2':
  69. gs 'stat'
  70. 'You answer the phone to hear a male voice speaking, "Hello <<$pcs_nickname>>, is Vladimir, remember we met recently in the park?"'
  71. act 'Hello, of course I remember':
  72. cla
  73. vladimirQW = 21
  74. '"Hey, of course I remember," you respond'
  75. '"The offer to visit the restaurant is still on the table. Would you like to go?" Vladimir asks.'
  76. act 'Oh, I have a lot to do today, I''m sorry.':
  77. cla
  78. vladimirQW = 20
  79. vladimirday = daystart
  80. 'You explain that you simply can''t today, as busy as you are'
  81. '"Okay. Then I''ll call you tomorrow at 4 pm," Vladimir promises.'
  82. act 'Hang up':gt $loc, $metka
  83. end
  84. act 'I wouldn''t mind':
  85. cla
  86. vladimirQW = 21
  87. vladimirday = daystart
  88. '"I don''t mind," you tell him.'
  89. '"Wonderful," says Vladimir. "Then I''ll meet you in the restaurant in 20 hours."'
  90. '"!!Twenty hours? Is that accurate? Seems... odd."'
  91. act 'Hang up':gt $loc, $metka
  92. end
  93. end
  94. end
  95. if $ARGS[0] = '3':
  96. gs 'stat'
  97. 'You answer the phone to hear a male voice on the other end, "Hello <<$pcs_nickname>>, this is Vladimir, Would you like a ride on a boat?"'
  98. act 'Oh, I have a lot to do today, I''m sorry':
  99. cla
  100. vladimirday = daystart
  101. 'You explain that you simply can''t today, as busy as you are'
  102. '"Okay. Then I''ll call you tomorrow at 4 pm," Vladimir promises.'
  103. act 'Hang up':gt $loc, $metka
  104. end
  105. act 'I''d like that':
  106. cla
  107. vladimirQW = 30
  108. vladimirday = daystart
  109. '"I''d like that," you tell him.'
  110. 'You can hear Vladimir''s pleasure even over the phone. "Wonderful, my driver will come to pick you up."'
  111. act 'Hang up':gt $loc, $metka
  112. end
  113. end
  114. if $ARGS[0] = '4':
  115. gs 'stat'
  116. 'You pick up the phone to hear a male voice speaking, "Hello <<$pcs_nickname>>, it''s Vladimir, would you like to meet up to do something?"'
  117. act 'Oh, I have a lot to do today, I''m sorry':
  118. cla
  119. vladimirday = daystart
  120. 'You explain that you simply can''t today, as busy as you are'
  121. '"Okay. Then I''ll call you tomorrow at 4 pm," Vladimir promises.'
  122. act 'Hang up':gt $loc, $metka
  123. end
  124. act 'I''d like that':
  125. cla
  126. vladimirQW = 40
  127. vladimirday = daystart
  128. '"I''d like that," you tell him.'
  129. 'You can hear Vladimir''s pleasure even over the phone. "Wonderful, my driver will come to pick you up."'
  130. act 'Hang up':gt $loc, $metka
  131. end
  132. end
  133. --- qwloc ---------------------------------