road_prostitution.tw 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158
  1. :: road_prostitution
  2. <<set $here = 'road_prostitution'>>
  3. <<set $ARGS = $location_var[$here]>>
  4. <<set $location_type = 'public_outdoors'>>
  5. <<if $location_var[$here][0] == 'work'>>
  6. <<if getvar("$sound") == 0>>
  7. <</if>>
  8. <<set $loc = 'road_prostitution'>>
  9. <<set $used_name = 'road'>>
  10. <<set $loc_arg = 'work'>>
  11. <<set $menu_arg = 'work'>>
  12. <<set $menu_off = 1>>
  13. <<gs 'prostitution_functions' 'parameters'>>
  14. <!-- !! TODO: Make it a bit smarter, if Sveta has fake names set up for other locations, give her a reminder of those.-->
  15. <<if $prostitute_names['road'] == ''>>
  16. If you want, you can tell your clients a different name.
  17. <<setinit $prostitute_names['road'] = input("What name do you want to tell your clients? (Leave blank for <<$pc.name_nick>>)")>>
  18. <</if>>
  19. <!-- !! TODO: Should find some video that is more roadside - evening, morning, different weather, etc.-->
  20. <<video "shared/prostitution/car/normal/negotiation/search.mp4">>
  21. <!-- !! TODO: Need to rewrite this to reflect the Pavlovsk - St Petersburg road locations-->
  22. <!-- !!'You are walking near the gas station waiting for a client. On a scale from 1 to 10 you look like a <<hotcat>>. A good looking girl will always earn more money.'+iif(pcs_makeup < 2, ' You should '+iif(pcs_makeup = 0, 'fix your make-up', 'wear make-up')+' to increase your earnings.', ' Wearing make-up is a good way to increase your earnings.')+iif(pirsA > 0 and pirsA < 10000, ' Your tongue piercing will make a blowjob more enjoyable for most men, that could bring in a small bonus.', '')+iif($wardrobe.pantyworntype = 'eroto' and CloSkirtShortness > 4, ' Wearing such a short skirt reveals your slutty panties to your potential customers.', '')+iif(pcs_apprnc = -10, ' You don't look healthy and should seek treatment for your STD. There is a high chance that a guy won''t touch you without a condom.', '')-->
  23. <<gs 'road_prostitution' 'road_segment'>>
  24. <!-- !! TODO: The enema thing should be aligned with the rest of the game.-->
  25. <!-- !! NOTE The enema is called klisma (?) that needs to be cleaned up too.-->
  26. <<if $klismaday != $time.daystart>>
  27. <br>Almost no men will like dirty anal sex, even with a condom, and it's probably a safe bet that they won''t pay a lot for it. You should start giving yourself an enema before going to work.
  28. <</if>>
  29. <<if getvar("$mesec") > 0>>
  30. <br>You are having your period, most men will pay less for vaginal sex during that time of the month.
  31. <</if>>
  32. <<if getvar("$prostitute['cum_dressed']") == 1>>
  33. <br>You have visible cum stains on you. Most clients won''t like that and will offer less money.
  34. <</if>>
  35. <!-- FAILED TO CONVERT
  36. if prostitute['earnings_day'] > 0: 'You have earned <<prostitute[''earnings_day'']>> <b>₽</b> today.'+iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute[''earnings_day''] * prostitute[''share_player''] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute[''earnings_day''] * prostitute[''debt_payment_percent''] / 100>> <b>₽</b> to pay down your debt.', '.'), '')
  37. -----
  38. <<if getvar("$prostitute['earnings_day']") > 0>>
  39. <!-- FAILED TO CONVERT
  40. 'You have earned <<prostitute[''earnings_day'']>> <b>₽</b> today.'+iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute[''earnings_day''] * prostitute[''share_player''] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute[''earnings_day''] * prostitute[''debt_payment_percent''] / 100>> <b>₽</b> to pay down your debt.', '.'), '')
  41. -----
  42. <<set ERROR: FAILED TO CONVERT LITERAL: """'You have earned <<prostitute['earnings_day']>> <b>₽<""" / ERROR: FAILED TO CONVERT LITERAL: """b> today.'""" + iif(prostitute['payment_method'] = 0, ' Your share is <<prostitute['earnings_day'] * prostitute['share_player'] / 100>> <b>₽</b>'+iif(prostitute['debt_amount'] > 0, ', but your pimp will keep <<prostitute['earnings_day'] * prostitute['debt_payment_percent'] / 100>> <b>₽</b> to pay down your debt.', '.'), '')>>
  43. -->
  44. <<warn "CONVERSION ERROR 27f4cac3de71587afc23534de790bf54">>
  45. <</if>>
  46. -->
  47. <<warn "CONVERSION ERROR 0ed1e430a5890cd3404e8f4b1a34e0e4">>
  48. <<if getvar("$prostitute['payment_method']") == 0>>
  49. <<gs 'road_prostitution' 'event_check'>>
  50. <</if>>
  51. <<act 'Stop working'>>
  52. <<gt 'road'>>
  53. <</act>>
  54. <<gs 'willpower' 'prostitution' 'self' 'medium'>>
  55. <<if $will_cost <= $pc.willpower>>
  56. <<actCLA 'Look for a client (0:30 and will_cost Willpower)'>>
  57. <<gs 'willpower' 'pay' 'self'>>
  58. <<gt 'prostitution_car_negotiation' 'look_client'>>
  59. <</actCLA>>
  60. <<elseif $will_cost > $pc.willpower>>
  61. <!-- FAILED TO CONVERT
  62. act 'Look for a client (0:30 and <font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  63. -----
  64. <<actCLA 'Look for a client (0:30 and <font color="red">will_cost Willpower</font>)'>>
  65. <<set ERROR: FAILED TO CONVERT LITERAL: """'<br><font color""" = ERROR: FAILED TO CONVERT LITERAL: """"red">You don't have enough willpower to use this action.<""" / ERROR: FAILED TO CONVERT LITERAL: """font>'""">>
  66. <</actCLA>>
  67. -->
  68. <<warn "CONVERSION ERROR 364c426409861045c1e894a2be85aa34">>
  69. <</if>>
  70. <<if $inventory.get("wipe") > 0 and (getvar("$prostitute['cum_dressed']") == 1 or getvar("$prostitute['cum_undressed']") == 1 or getvar("$prostitute['cum_vaginal_mod']") == 1 or getvar("$prostitute['cum_anal_mod']") == 1)>>
  71. <<actCLA 'Remove the cum from your body (0:02)'>>
  72. <<set $time.minutes += 2>>
  73. <<run $inventory.dec('wipe',1)>>
  74. <<set $cumspclnt = 20>>
  75. <<gs 'cum_cleanup'>>
  76. <<gt 'road_prostitution' 'work'>>
  77. <</actCLA>>
  78. <<elseif $inventory.get("wipe") == 0>>
  79. <br>You don't have any tissues with you to remove cum from your body.
  80. <</if>>
  81. <!-- !! NOTE: This is where the working/negotiationg part begins in the original file. Moved to a separate file.-->
  82. <!-- !! This call just displays the explanation and the "config" of the negotiations on the page.-->
  83. <<gs 'prostitution_car_negotiation' 'general_description'>>
  84. <</if>>
  85. <!-- !!------ Random events and scenes, from police raids to robbery, etc. ------------------------------------------------------>
  86. <!-- !!-- TODO: Any random event should go here.-->
  87. <<if $location_var[$here][0] == 'event_check'>>
  88. <</if>>
  89. <!-- !!-- TODO: Add the different location descriptions and image/videos to reflect the segment of the road Sveta is working on.-->
  90. <<if $location_var[$here][0] == 'road_segment'>>
  91. <<if getvar("$nroad") == 0>>
  92. <!-- !! 'You're on the outskirts of St. Petersburg. You see a number of crudely made huts near the trees. A bunch of homeless people must have sought shelter here.'-->
  93. <!-- !! 'A <<link "lorry">><<set $time.minutes + = 5>> <<gt 'furi'>><</link>> is parked next to the road. The driver is currently taking a break and is having a cigarette. He could probably bring you to Gadukino or Pavlovsk, for a price...'-->
  94. <<elseif getvar("$nroad") == 1>>
  95. <!-- !! 'You're not very far from St. Petersburg. You see a bunch of <<link "luxury houses">><<set $time.minutes + = 15>> <<gt 'city_suburbs' 'start'>><</link>> not far from the road. That settlement looks like it's very expensive to live in.'-->
  96. <<elseif getvar("$nroad") == 2>>
  97. <p></p>
  98. <<elseif getvar("$nroad") == 3>>
  99. <!-- !! 'You see a sign pointing towards a <<link "cemetery">><<set $time.minutes + = 15>> <<gt 'graveyard'>><</link>>, hidden between lots of trees. You think it''d be a 15 minute walk from here.'-->
  100. <<elseif getvar("$nroad") == 4>>
  101. <p></p>
  102. <<elseif getvar("$nroad") == 5>>
  103. <!-- !! 'You see a <<link "railway platform">><<gt 'train' 'communal'>><</link>> not far from the road. A bit further away, someone built <<link "a bunch of cottages">><<set $time.minutes + = 15>> <<gt 'dachi'>><</link>>. Some of them are for sale. This must be a nice place to stay at in the summer!'-->
  104. <<elseif getvar("$nroad") == 6>>
  105. <p></p>
  106. <<elseif getvar("$nroad") == 7>>
  107. <p></p>
  108. <<elseif getvar("$nroad") == 8>>
  109. <p></p>
  110. <<elseif getvar("$nroad") == 9>>
  111. <p></p>
  112. <<elseif getvar("$nroad") == 10>>
  113. <!-- !! display_bb = 1-->
  114. <!-- !! -->
  115. <!-- !! 'You see a <<link "railway platform">><<gt 'train' 'village'>><</link>> not far from the road. In the same direction, a dirt road leads to the village of <<link "Gadukino">><<set $time.minutes + = 15>> <<gt 'road'>><</link>>.'-->
  116. <!-- !! 'A <<link "lorry">><<set $time.minutes + = 5>> <<gt 'furi'>><</link>> is parked next to the road. The driver is currently taking a break and is having a cigarette. He could probably bring you to Pavlovsk or St. Petersburg, for a price...'-->
  117. <!-- !! if npc_QW['A60'] > 15: 'Mira <<link "prostitutes">><<gt 'road_prostitution' 'start'>><</link>> herself around here.'-->
  118. <<elseif getvar("$nroad") == 11>>
  119. <p></p>
  120. <<elseif getvar("$nroad") == 12>>
  121. <!-- !! 'You see a <<link "trucker motel">><<set $time.minutes + = 15>> <<gt 'motel'>><</link>> near the road. You have no business there. You're no trucker!'-->
  122. <<elseif getvar("$nroad") == 13>>
  123. <p></p>
  124. <<elseif getvar("$nroad") == 14>>
  125. <p></p>
  126. <<elseif getvar("$nroad") == 15>>
  127. <p></p>
  128. <<elseif getvar("$nroad") == 16>>
  129. <!-- !! 'All you see is an abandoned building, not too far from the road. From the look of it, the heavy fences around the building will make it difficult for you to get anywhere near it.'-->
  130. <<elseif getvar("$nroad") == 17>>
  131. <p></p>
  132. <<elseif getvar("$nroad") == 18>>
  133. <p></p>
  134. <<elseif getvar("$nroad") == 19>>
  135. <!-- !! 'You are on the outskirts of the <<link "old town">><<set $time.minutes + = 15>> <<gt 'pushkin'>><</link>> district of Pavlovsk. About five minutes down a cobblestone road is the old town center. It's a fairly popular place for tourists to explore with much of its old architecture still intact.'-->
  136. <<elseif getvar("$nroad") == 20>>
  137. <!-- !! NOTE: This is right next to the Boris diner, so it should be tied with that - maybe starting to work here will move to the parking lot? Same work location as if it was started from the diner-->
  138. <!-- !! 'The main road ends at the provincial town of Pavlovsk. You can see the castle in the distance.'-->
  139. <!-- !! 'A <<link "lorry">><<set $time.minutes + = 5>> <<gt 'furi'>><</link>> is parked next to the road. The driver is currently taking a break and is having a cigarette. He could probably bring you to Gadukino or St. Petersburg, for a price...'-->
  140. <!-- !! 'A small road leads to an almost hidden old <<link "hotel">><<gt 'brothel' 'lobby'>><</link>>. Usually tourists use it when passing by or when visiting the old town of Pavlovsk.'-->
  141. <!-- !! if hour >= 7 and hour <= 17:-->
  142. <!-- !! 'You can see a bunch of trucks around the <<link "Boris diner">><<gt 'NikoSlut' 'Diner Exterior'>><</link>>, which is a diner that is frequently visited by both truckers and bikers.'-->
  143. <!-- !! else-->
  144. <!-- !! 'You can see a bunch of motorcycles around the <<link "Boris diner">><<gt 'NikoSlut' 'Diner Exterior'>><</link>>, which is a diner that is frequently visited by both truckers and bikers.'-->
  145. <!-- !! end-->
  146. <!-- !! if hour = 22 and NikoEv < 21:-->
  147. <!-- !! 'You can see <<link "' + iif(YurikEv['Name'] = 'Yurik', 'Yurik', 'a big burly man') + '">><<gt 'NikoSlut' 'Yurik Out'>><</link>>, clearly drunk, stumbling along the highway with a beer bottle in his hand.'-->
  148. <!-- !! end-->
  149. <</if>>
  150. <</if>>