bicycle.qsrc 7.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238
  1. # bicycle
  2. ! BikeLoc - tells us where bicycle is currently located
  3. !----------------------------------------------
  4. ! BikeLoc = 1 'gadsarai' ''
  5. ! BikeLoc = 2 'gadforest' 'forest_edge'
  6. ! BikeLoc = 3 'swamp_yard' 'start'
  7. !----------------------------------------------
  8. ! this gs handles biking for Sveta in the various locations of gadukino
  9. ! will only display bicycle actions if the BikeLoc is correct for the location passed in
  10. ! $ARGS[0] - location where this is called from
  11. ! Example: gs 'bicycle', 'gadsarai'
  12. if ($ARGS[0] = 'gadsarai' and BikeLoc = 1) or ($ARGS[0] = 'gadforest' and BikeLoc = 2) or ($ARGS[0] = 'swamp_yard' and BikeLoc = 3):
  13. act 'Ride your bicycle':
  14. *clr & cla
  15. menu_off = 1
  16. if $clothingworntype = 'nude':
  17. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/findvel_nude.jpg"></center>'
  18. else
  19. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/findvel.jpg"></center>'
  20. end
  21. *nl
  22. 'You see your old bike. It looks like it''s still in a good condition, you can probably ride it without any trouble.'
  23. if BikeLoc = 1:
  24. act 'Leave your bike alone':gt 'gadsarai'
  25. elseif BikeLoc = 2:
  26. act 'Leave your bike alone':gt 'gadforest','forest_edge'
  27. elseif BikeLoc = 3:
  28. act 'Leave your bike alone':gt 'swamp_yard','start'
  29. end
  30. if BikeLoc = 1 and hour >= 6 and hour < 20 and sunWeather = 1 and month >= 4 and month <= 10 and gadbikeday ! daystart:
  31. act 'Bike around the village (1:00)':
  32. *clr & cla
  33. menu_off = 1
  34. minut += 60
  35. run_exp += rand(0,2)
  36. stren_exp += rand(0,2)
  37. fat -= 2
  38. pcs_mood += 10
  39. pcs_sweat += 2
  40. gadbikeday = daystart
  41. if $clothingworntype = 'nude':
  42. pcs_horny += 15
  43. pcs_mood += 15
  44. if pcs_inhib < 50: inhib_exp += rand(0,2)
  45. gs 'exhibitionism', 3
  46. gs 'stat'
  47. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike_nude.jpg"></center>'
  48. *nl
  49. 'You ride nude, avoiding crowded places, exulting from this newfound courage. It''s hard to say what excites you more, fear or desire to be noticed.'
  50. elseif PCloSkirt > 0:
  51. bikerand = rand(0,10)
  52. if bikerand >= 8:
  53. if $pantyworntype ! 'none':
  54. pcs_horny += 5
  55. pcs_mood += 5
  56. if pcs_inhib < 20: inhib_exp += rand(0,2)
  57. gs 'exhibitionism', 1
  58. gs'stat'
  59. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike_tanga_1.jpg"></center>'
  60. *nl
  61. 'During your ride you lift your skirt several times, showing a glimpse of your panties to a few lucky villagers passing-by.'
  62. else
  63. pcs_horny += 10
  64. pcs_mood += 10
  65. if pcs_inhib < 30: inhib_exp += rand(0,2)
  66. gs 'exhibitionism', 2
  67. gs'stat'
  68. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike_tanga_2.jpg"></center>'
  69. *nl
  70. 'During your ride you lift your skirt several times, showing your bare ass to a few lucky villagers passing-by.'
  71. end
  72. else
  73. pcs_mood += 5
  74. gs 'stat'
  75. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike_2.jpg"></center>'
  76. *nl
  77. 'You enjoy the breath of fresh air from riding your bike by the seemingly endless fields of the village.'
  78. end
  79. elseif PCloSkirt = 0:
  80. pcs_mood += 5
  81. gs 'stat'
  82. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike.jpg"></center>'
  83. *nl
  84. 'You ride your bike, enjoying the surrounding country-side.'
  85. end
  86. act 'Finish your ride':gt 'gadsarai'
  87. end
  88. end
  89. if BikeLoc ! 1:
  90. if BikeLoc = 2:
  91. $bikeaction = 'Bike to your grandparents barn (0:12)'
  92. elseif BikeLoc = 3:
  93. $bikeaction = 'Bike to your grandparents barn (0:44)'
  94. end
  95. act '<<$bikeaction>>':
  96. *clr & cla
  97. menu_off = 1
  98. if BikeLoc = 2:
  99. minut += 12
  100. run_exp += rand(0,1)
  101. stren_exp += rand(0,1)
  102. fat -= 1
  103. pcs_mood += 5
  104. pcs_sweat += 1
  105. if swamp_clothes = 1:
  106. 'You remove the terrible excuse for clothing the hunters gave you. You''re sure you can find something better to wear at your grandparents house.'
  107. gs 'clothing', 'strip', 'gadforest'
  108. gs 'clothing', 'swamp_clothes', 0
  109. end
  110. elseif BikeLoc = 3:
  111. minut += 44
  112. run_exp += rand(0,3)
  113. stren_exp += rand(0,3)
  114. fat -= 3
  115. pcs_mood += 15
  116. pcs_sweat += 3
  117. if swamp_clothes = 1:
  118. 'You remove the terrible excuse for clothing the hunters gave you. You''re sure you can find something better to wear at your grandparents house.'
  119. gs 'clothing', 'strip', 'gadforest'
  120. gs 'clothing', 'swamp_clothes', 0
  121. end
  122. end
  123. BikeLoc = 1
  124. gs'stat'
  125. gs 'bicycle', 'clothes'
  126. *nl
  127. 'You jump onto your bike and ride to your grandparent barn.'
  128. act 'Finish your ride':gt 'gadsarai'
  129. end
  130. end
  131. if BikeLoc ! 2 and pcs_bushcraft > 0:
  132. if BikeLoc = 1:
  133. $bikeaction = 'Bike to the forest edge (0:12)'
  134. elseif BikeLoc = 3:
  135. $bikeaction = 'Bike to the forest edge (0:32)'
  136. end
  137. act '<<$bikeaction>>':
  138. *clr & cla
  139. menu_off = 1
  140. if BikeLoc = 1:
  141. minut += 12
  142. run_exp += rand(0,1)
  143. stren_exp += rand(0,1)
  144. fat -= 1
  145. pcs_mood += 5
  146. pcs_sweat += 1
  147. elseif BikeLoc = 3:
  148. minut += 32
  149. run_exp += rand(0,2)
  150. stren_exp += rand(0,2)
  151. fat -= 2
  152. pcs_mood += 0
  153. pcs_sweat += 2
  154. end
  155. BikeLoc = 2
  156. gs'stat'
  157. gs 'bicycle', 'clothes'
  158. *nl
  159. 'You jump onto your bike and ride to the edge of the forest.'
  160. act 'Finish your ride':gt 'gadforest','forest_edge'
  161. end
  162. end
  163. if BikeLoc ! 3 and hunterscabin = 1 and hunters_were_met = 1:
  164. if BikeLoc = 1:
  165. $bikeaction = 'Bike to the hunters cabin (0:44)'
  166. elseif BikeLoc = 2:
  167. $bikeaction = 'Bike to the hunters cabin (0:32)'
  168. end
  169. act '<<$bikeaction>>':
  170. *clr & cla
  171. menu_off = 1
  172. if BikeLoc = 1:
  173. minut += 44
  174. run_exp += rand(0,3)
  175. stren_exp += rand(0,3)
  176. fat -= 3
  177. pcs_mood += 15
  178. pcs_sweat += 3
  179. elseif BikeLoc = 2:
  180. minut += 32
  181. run_exp += rand(0,2)
  182. stren_exp += rand(0,2)
  183. fat -= 2
  184. pcs_mood += 10
  185. pcs_sweat += 2
  186. end
  187. BikeLoc = 3
  188. gs'stat'
  189. gs 'bicycle', 'clothes'
  190. *nl
  191. 'You jump onto your bike and ride to the hunters cabin.'
  192. act 'Finish your ride':gt 'swamp_yard','start'
  193. end
  194. end
  195. end
  196. end
  197. ! this gs handles images for biking for Sveta in the various locations of gadukino
  198. ! Example: gs 'bicycle', 'clothes'
  199. if $ARGS[0] = 'clothes':
  200. !need images for biking during snow/rain/winter/nighttime: currently only have summer daytime images
  201. !if sunWeather = 0 and (month < 4 or month > 10): snowing
  202. !else sunWeather = 0 and month >= 4 and month <= 10: raining
  203. !elseif month < 4 or month > 10 and hour < 6 or hour >= 22: winter nighttime
  204. !elseif month < 4 or month > 10: winter daytme
  205. !elseif hour < 6 or hour >= 22: summer nighttime
  206. !else summer daytime
  207. if $clothingworntype = 'nude':
  208. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike_nude.jpg"></center>'
  209. elseif PCloSkirt > 0:
  210. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike_2.jpg"></center>'
  211. else
  212. '<center><img <<$set_imgh>> src="images/locations/gadukino/village/bike.jpg"></center>'
  213. end
  214. !end
  215. end
  216. --- bicycle ---------------------------------