exercise.tw 38 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910
  1. :: exercise
  2. <<set $here = 'exercise'>>
  3. <<set $ARGS = $location_var[$here]>>
  4. <!-- !{This will centralize calls for exercise. For calls where you wish to allow multiple types of exercises, such as a bedroom or yard, use gs 'exercise', 'start'
  5. For direct calls use this format: gs 'exercise', $ARGS[0], ARG[1], $ARGS[2], $ARGS[3], $ARGS[4]
  6. $ARGS[0] is the workout tier and the higher the tier, the greater the workout intensity.
  7. Values: 'tier1' 'tier2' 'tier3' 'tier4'
  8. ARG[1] is the time override. By default the tiers are in 15 minute segments if being called from an event with predetermined time set this to 1
  9. Values: 0 (default of 15 minutes) 1 (time set to 0)
  10. $ARGS[2] and on are the stats to be affected by the workout NOTE: use the gs 'exp_gain', 'name of varibale' variant, not the pcs_!!!!
  11. Values: 'stren' 'vital' 'agil' 'sprt' 'react'
  12. Other stats can be added if desired - for a dance-a-thon you might use gs 'exercise', 'tier1', 0, 'agil', 'danc'
  13. } -->
  14. <<if $location_var[$here][0] == 'start'>>
  15. <!--<<if ($pc.pcs_stam >= 15 or $pc.pcs_stam >= 10 and $bookYog + getvar("$obruch") > 0)>>
  16. There is enough space in the room to exercise.
  17. <<act "Exercise">><<gt 'exercise' 'workout'>><</act>>
  18. <<else>>
  19. There is enough space in the room for a variety of exercises, but you don't have the energy to work out now.
  20. <</if>>-->
  21. <</if>>
  22. <<if $location_var[$here][0] == 'workout'>>
  23. <<set $menu_loc = 'exercise'>>
  24. <<set $menu_arg = 'workout'>>
  25. <<set $menu_off = 0>>
  26. <<set $exer_menu = 0>>
  27. <<gs 'exercise' 'routines'>>
  28. <<set $clothesAtLocation = setup.func('lost_clothes_here',$loc)>>
  29. <<if $wardrobe.clothingworntype == 'nude' and getvar("$clothesAtLocation") == 1>>
  30. <<actCLA 'End workout and get dressed'>>
  31. <<set $time.minutes += 5>>
  32. <<gs 'underwear' 'wear'>>
  33. <<gs 'clothing' 'recover_lost_clothes' $loc 1>>
  34. <<gt $location>>
  35. <</actCLA>>
  36. <<else>>
  37. <<actCLA 'End workout'>>
  38. <<gt $location>>
  39. <</actCLA>>
  40. <</if>>
  41. <<if $pc.pcs_energy < 20 or $pc.pcs_stam < $pc.stammax / 5>>
  42. You do not have the energy/stamina to exercise currently
  43. <<elseif $wardrobe.clothingworntype == 'nude' or $wardrobe.clothingworntype == 'danilovich_outfits'>>
  44. <<act 'Manual routines'>>
  45. <<gt 'exercise' 'manual'>>
  46. <</act>>
  47. <<act 'Define routines'>>
  48. <<gt 'exercise' 'setup'>>
  49. <</act>>
  50. <<if $exer_stam[1] != 0 and $pc.pcs_stam > $exer_stam[1]>>
  51. <<actCLA ''+'+$excer_name[1]+'+' - (exer_stam[1] stamina)'>>
  52. <<set $exercisex = 1>> <<gt 'exercise' 'auto'>>
  53. <</actCLA>>
  54. <</if>>
  55. <<if $exer_stam[2] != 0 and $pc.pcs_stam > $exer_stam[2]>>
  56. <<actCLA ''+'+$excer_name[2]+'+' - (exer_stam[2] stamina)'>>
  57. <<set $exercisex = 2>> <<gt 'exercise' 'auto'>>
  58. <</actCLA>>
  59. <</if>>
  60. <<if $exer_stam[3] != 0 and $pc.pcs_stam > $exer_stam[3]>>
  61. <<actCLA ''+'+$excer_name[3]+'+' - (exer_stam[3] stamina)'>>
  62. <<set $exercisex = 3>> <<gt 'exercise' 'auto'>>
  63. <</actCLA>>
  64. <</if>>
  65. <<if $exer_stam[4] != 0 and $pc.pcs_stam > $exer_stam[4]>>
  66. <<actCLA ''+'+$excer_name[4]+'+' - (exer_stam[4] stamina)'>>
  67. <<set $exercisex = 4>> <<gt 'exercise' 'auto'>>
  68. <</actCLA>>
  69. <</if>>
  70. <<if $exer_stam[5] != 0 and $pc.pcs_stam > $exer_stam[5]>>
  71. <<actCLA ''+'+$excer_name[5]+'+' - (exer_stam[5] stamina)'>>
  72. <<set $exercisex = 5>> <<gt 'exercise' 'auto'>>
  73. <</actCLA>>
  74. <</if>>
  75. <<else>>
  76. <b>You need to equip the proper attire before you can exercise</b>
  77. <</if>>
  78. <</if>>
  79. <<if $location_var[$here][0] == 'auto'>>
  80. <<set $exer_auto = 1>>
  81. <<if getvar("$exer_rout0["+$exercisex+"]") > 0>>
  82. <<set $timemult = $exer_rout0[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'push'>>
  83. <<elseif getvar("$exer_rout1["+$exercisex+"]") > 0>>
  84. <<set $timemult = $exer_rout1[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'press'>>
  85. <<elseif getvar("$exer_rout2["+$exercisex+"]") > 0>>
  86. <<set $timemult = $exer_rout2[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  87. <<elseif getvar("$exer_rout3["+$exercisex+"]") > 0>>
  88. <<set $timemult = $exer_rout3[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  89. <<elseif getvar("$exer_rout4["+$exercisex+"]") > 0>>
  90. <<set $timemult = $exer_rout4[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  91. <<elseif getvar("$exer_rout5["+$exercisex+"]") > 0>>
  92. <<set $timemult = $exer_rout5[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  93. <</if>>
  94. <</if>>
  95. <<if $location_var[$here][0] == 'auto1'>>
  96. <<if getvar("$exer_rout1["+$exercisex+"]") > 0>>
  97. <<set $timemult = $exer_rout1[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'press'>>
  98. <<elseif getvar("$exer_rout2["+$exercisex+"]") > 0>>
  99. <<set $timemult = $exer_rout2[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  100. <<elseif getvar("$exer_rout3["+$exercisex+"]") > 0>>
  101. <<set $timemult = $exer_rout3[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  102. <<elseif getvar("$exer_rout4["+$exercisex+"]") > 0>>
  103. <<set $timemult = $exer_rout4[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  104. <<elseif getvar("$exer_rout5["+$exercisex+"]") > 0>>
  105. <<set $timemult = $exer_rout5[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  106. <<else>>
  107. <<gt 'exercise' 'auto_end'>>
  108. <</if>>
  109. <</if>>
  110. <<if $location_var[$here][0] == 'auto2'>>
  111. <<if getvar("$exer_rout2["+$exercisex+"]") > 0>>
  112. <<set $timemult = $exer_rout2[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  113. <<elseif getvar("$exer_rout3["+$exercisex+"]") > 0>>
  114. <<set $timemult = $exer_rout3[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  115. <<elseif getvar("$exer_rout4["+$exercisex+"]") > 0>>
  116. <<set $timemult = $exer_rout4[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  117. <<elseif getvar("$exer_rout5["+$exercisex+"]") > 0>>
  118. <<set $timemult = $exer_rout5[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  119. <<else>>
  120. <<gt 'exercise' 'auto_end'>>
  121. <</if>>
  122. <</if>>
  123. <<if $location_var[$here][0] == 'auto3'>>
  124. <<if getvar("$exer_rout3["+$exercisex+"]") > 0>>
  125. <<set $timemult = $exer_rout3[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  126. <<elseif getvar("$exer_rout4["+$exercisex+"]") > 0>>
  127. <<set $timemult = $exer_rout4[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  128. <<elseif getvar("$exer_rout5["+$exercisex+"]") > 0>>
  129. <<set $timemult = $exer_rout5[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  130. <<else>>
  131. <<gt 'exercise' 'auto_end'>>
  132. <</if>>
  133. <</if>>
  134. <<if $location_var[$here][0] == 'auto4'>>
  135. <<if getvar("$exer_rout4["+$exercisex+"]") > 0>>
  136. <<set $timemult = $exer_rout4[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  137. <<elseif getvar("$exer_rout5["+$exercisex+"]") > 0>>
  138. <<set $timemult = $exer_rout5[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  139. <<else>>
  140. <<gt 'exercise' 'auto_end'>>
  141. <</if>>
  142. <</if>>
  143. <<if $location_var[$here][0] == 'auto5'>>
  144. <<if getvar("$exer_rout5["+$exercisex+"]") > 0>>
  145. <<set $timemult = $exer_rout5[$exercisex]>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  146. <<else>>
  147. <<gt 'exercise' 'auto_end'>>
  148. <</if>>
  149. <</if>>
  150. <<if $location_var[$here][0] == 'auto_end'>>
  151. <<set $exer_auto = 0>>
  152. <<gt 'exercise' 'workout'>>
  153. <</if>>
  154. <<if $location_var[$here][0] == 'manual'>>
  155. <<set $menu_loc = 'exercise'>>
  156. <<set $menu_arg = 'manual'>>
  157. <<set $menu_off = 0>>
  158. <<act 'Return'>>
  159. <<gt 'exercise' 'workout'>>
  160. <</act>>
  161. <<if $pc.pcs_energy < 20 and $pc.pcs_stam < $pc.stammax / 5>>
  162. You don't have the energy/stamina to work out anymore now.
  163. <<else>>
  164. <<actCLA 'Do pushups for 15 minutes'>>
  165. <<set $timemult = 1>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'push'>>
  166. <</actCLA>>
  167. <<actCLA 'Do crunches for 15 minutes'>>
  168. <<set $timemult = 1>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'press'>>
  169. <</actCLA>>
  170. <<actCLA 'Do squats for 15 minutes'>>
  171. <<set $timemult = 1>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  172. <</actCLA>>
  173. <<if getvar("$skak") > 0 and $loc != 'meadow'>>
  174. <<actCLA 'Jump rope for 15 minutes'>>
  175. <<set $timemult = 1>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  176. <</actCLA>>
  177. <</if>>
  178. <<if getvar("$bookYog") > 0>>
  179. <<actCLA 'Do yoga for 15 minutes'>>
  180. <<set $timemult = 1>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  181. <</actCLA>>
  182. <</if>>
  183. <<if getvar("$obruch") > 0 and $loc != 'meadow'>>
  184. <<actCLA 'Use your hula hoop for 15 minutes'>>
  185. <<set $timemult = 1>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  186. <</actCLA>>
  187. <</if>>
  188. <<actCLA 'Do pushups for 30 minutes'>>
  189. <<set $timemult = 2>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'push'>>
  190. <</actCLA>>
  191. <<actCLA 'Do crunches for 30 minutes'>>
  192. <<set $timemult = 2>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'press'>>
  193. <</actCLA>>
  194. <<actCLA 'Do squats for 30 minutes'>>
  195. <<set $timemult = 2>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  196. <</actCLA>>
  197. <<if getvar("$skak") > 0 and $loc != 'meadow'>>
  198. <<actCLA 'Jump rope for 30 minutes'>>
  199. <<set $timemult = 2>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  200. <</actCLA>>
  201. <</if>>
  202. <<if getvar("$bookYog") > 0>>
  203. <<actCLA 'Do yoga for 30 minutes'>>
  204. <<set $timemult = 2>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  205. <</actCLA>>
  206. <</if>>
  207. <<if getvar("$obruch") > 0 and $loc != 'meadow'>>
  208. <<actCLA 'Use your hula hoop for 30 minutes'>>
  209. <<set $timemult = 2>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  210. <</actCLA>>
  211. <</if>>
  212. <<actCLA 'Do pushups for 45 minutes'>>
  213. <<set $timemult = 3>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'push'>>
  214. <</actCLA>>
  215. <<actCLA 'Do crunches for 45 minutes'>>
  216. <<set $timemult = 3>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'press'>>
  217. <</actCLA>>
  218. <<actCLA 'Do squats for 45 minutes'>>
  219. <<set $timemult = 3>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  220. <</actCLA>>
  221. <<if getvar("$skak") > 0 and $loc != 'meadow'>>
  222. <<actCLA 'Jump rope for 45 minutes'>>
  223. <<set $timemult = 3>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  224. <</actCLA>>
  225. <</if>>
  226. <<if getvar("$bookYog") > 0>>
  227. <<actCLA 'Do yoga for 45 minutes'>>
  228. <<set $timemult = 3>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  229. <</actCLA>>
  230. <</if>>
  231. <<if getvar("$obruch") > 0 and $loc != 'meadow'>>
  232. <<actCLA 'Use your hula hoop for 45 minutes'>>
  233. <<set $timemult = 3>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  234. <</actCLA>>
  235. <</if>>
  236. <<actCLA 'Do pushups for 60 minutes'>>
  237. <<set $timemult = 4>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'push'>>
  238. <</actCLA>>
  239. <<actCLA 'Do crunches for 60 minutes'>>
  240. <<set $timemult = 4>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'press'>>
  241. <</actCLA>>
  242. <<actCLA 'Do squats for 60 minutes'>>
  243. <<set $timemult = 4>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'butt'>>
  244. <</actCLA>>
  245. <<if getvar("$skak") > 0 and $loc != 'meadow'>>
  246. <<actCLA 'Jump rope for 60 minutes'>>
  247. <<set $timemult = 4>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'rope'>>
  248. <</actCLA>>
  249. <</if>>
  250. <<if getvar("$bookYog") > 0>>
  251. <<actCLA 'Do yoga for 60 minutes'>>
  252. <<set $timemult = 4>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'yoga'>>
  253. <</actCLA>>
  254. <</if>>
  255. <<if getvar("$obruch") > 0 and $loc != 'meadow'>>
  256. <<actCLA 'Use your hula hoop for 60 minutes'>>
  257. <<set $timemult = 4>> <<gs 'exercise' 'timestring'>> <<gt 'exercise' 'hula'>>
  258. <</actCLA>>
  259. <</if>>
  260. <</if>>
  261. <</if>>
  262. <<if $location_var[$here][0] == 'routines'>>
  263. <center><h2>Exercise Routines</h2></center>
  264. <center><table>
  265. <TD><b>Routine</b></TD><TD><b>Push ups</b></TD><TD><b>Crunches</b></TD><TD><b>Jump rope</b></TD><TD><b>Yoga</TD><TD><b>Hula hoop</b></TD><TD><b>Squats</b></TD>
  266. <TR><TD width="100" cellspacing="2" align="left">'+iif(exer_menu = 1,'<a href="exec:$excer_name[1] = input (''<center>Enter name for exercise routine 1<br>Leave blank to restore default name.</center>'') & gs ''exercise'', ''rename'' & gt ''exercise'', ''setup''"><<$excer_name[1]>>:</a> ','<<$excer_name[1]>>:</a> ')+'</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout0[1]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout1[1]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout2[1]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout3[1]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout4[1]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout5[1]*15>></b> minutes</TD>
  267. <TR><TD width="100" cellspacing="2" align="left">'+iif(exer_menu = 1,'<a href="exec:$excer_name[2] = input (''<center>Enter name for exercise routine 2<br>Leave blank to restore default name.</center>'') & gs ''exercise'', ''rename'' & gt ''exercise'', ''setup''"><<$excer_name[2]>>:</a> ','<<$excer_name[2]>>:</a> ')+'</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout0[2]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout1[2]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout2[2]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout3[2]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout4[2]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout5[2]*15>></b> minutes</TD>
  268. <TR><TD width="100" cellspacing="2" align="left">'+iif(exer_menu = 1,'<a href="exec:$excer_name[3] = input (''<center>Enter name for exercise routine 3<br>Leave blank to restore default name.</center>'') & gs ''exercise'', ''rename'' & gt ''exercise'', ''setup''"><<$excer_name[3]>>:</a> ','<<$excer_name[3]>>:</a> ')+'</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout0[3]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout1[3]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout2[3]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout3[3]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout4[3]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout5[3]*15>></b> minutes</TD>
  269. <TR><TD width="100" cellspacing="2" align="left">'+iif(exer_menu = 1,'<a href="exec:$excer_name[4] = input (''<center>Enter name for exercise routine 4<br>Leave blank to restore default name.</center>'') & gs ''exercise'', ''rename'' & gt ''exercise'', ''setup''"><<$excer_name[4]>>:</a> ','<<$excer_name[4]>>:</a> ')+'</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout0[4]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout1[4]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout2[4]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout3[4]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout4[4]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout5[4]*15>></b> minutes</TD>
  270. <TR><TD width="100" cellspacing="2" align="left">'+iif(exer_menu = 1,'<a href="exec:$excer_name[5] = input (''<center>Enter name for exercise routine 5<br>Leave blank to restore default name.</center>'') & gs ''exercise'', ''rename'' & gt ''exercise'', ''setup''"><<$excer_name[5]>>:</a> ','<<$excer_name[5]>>:</a> ')+'</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout0[5]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout1[5]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout2[5]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout3[5]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout4[5]*15>></b> minutes</TD><TD width="100" cellspacing="2" align="left"><b><<exer_rout5[5]*15>></b> minutes</TD>
  271. <TR><TD colspan="7"><br><br><center><<link "Define up to 5 automated exercise routines.">><<gt 'exercise' 'setup'>><</link>></center></TD></TR>
  272. </table></center>
  273. <</if>>
  274. <<if $location_var[$here][0] == 'setup'>>
  275. <<set $menu_loc = 'exercise'>>
  276. <<set $menu_arg = 'setup'>>
  277. <<set $menu_off = 0>>
  278. <<set $exer_menu = 1>>
  279. <<gs 'exercise' 'routines'>>
  280. <<act 'Return'>>
  281. <<gt 'exercise' 'workout'>>
  282. <</act>>
  283. <<actCLA 'Define '+$excer_name[1]+''>>
  284. <<set $i = 1>> <<gt 'exercise' 'matrix'>>
  285. <</actCLA>>
  286. <<actCLA 'Rename '+$excer_name[1]+''>>
  287. <<setinit $excer_name[1] = input ('<center>Enter name for exercise routine 1<br>Leave blank to restore default name.</center>')>>
  288. <<gs 'exercise' 'rename'>>
  289. <<gt 'exercise' 'setup'>>
  290. <</actCLA>>
  291. <<actCLA 'Define '+$excer_name[2]+''>>
  292. <<set $i = 2>> <<gt 'exercise' 'matrix'>>
  293. <</actCLA>>
  294. <<actCLA 'Rename '+$excer_name[2]+''>>
  295. <<setinit $excer_name[2] = input ('<center>Enter name for exercise routine 2<br>Leave blank to restore default name.</center>')>>
  296. <<gs 'exercise' 'rename'>>
  297. <<gt 'exercise' 'setup'>>
  298. <</actCLA>>
  299. <<actCLA 'Define '+$excer_name[3]+''>>
  300. <<set $i = 3>> <<gt 'exercise' 'matrix'>>
  301. <</actCLA>>
  302. <<actCLA 'Rename '+$excer_name[3]+''>>
  303. <<setinit $excer_name[3] = input ('<center>Enter name for exercise routine 3<br>Leave blank to restore default name.</center>')>>
  304. <<gs 'exercise' 'rename'>>
  305. <<gt 'exercise' 'setup'>>
  306. <</actCLA>>
  307. <<actCLA 'Define '+$excer_name[4]+''>>
  308. <<set $i = 4>> <<gt 'exercise' 'matrix'>>
  309. <</actCLA>>
  310. <<actCLA 'Rename '+$excer_name[4]+''>>
  311. <<setinit $excer_name[4] = input ('<center>Enter name for exercise routine 4<br>Leave blank to restore default name.</center>')>>
  312. <<gs 'exercise' 'rename'>>
  313. <<gt 'exercise' 'setup'>>
  314. <</actCLA>>
  315. <<actCLA 'Define '+$excer_name[5]+''>>
  316. <<set $i = 5>> <<gt 'exercise' 'matrix'>>
  317. <</actCLA>>
  318. <<actCLA 'Rename '+$excer_name[5]+''>>
  319. <<setinit $excer_name[5] = input ('<center>Enter name for exercise routine 5<br>Leave blank to restore default name.</center>')>>
  320. <<gs 'exercise' 'rename'>>
  321. <<gt 'exercise' 'setup'>>
  322. <</actCLA>>
  323. <!-- !!exer_rout1 = default-->
  324. <</if>>
  325. <<if $location_var[$here][0] == 'rename'>>
  326. <<if $excer_name[1] == ''>>
  327. <<setinit $excer_name[1] = 'Default 1'>>
  328. <</if>>
  329. <<if $excer_name[2] == ''>>
  330. <<setinit $excer_name[2] = 'Default 2'>>
  331. <</if>>
  332. <<if $excer_name[3] == ''>>
  333. <<setinit $excer_name[3] = 'Default 3'>>
  334. <</if>>
  335. <<if $excer_name[4] == ''>>
  336. <<setinit $excer_name[4] = 'Default 4'>>
  337. <</if>>
  338. <<if $excer_name[5] == ''>>
  339. <<setinit $excer_name[5] = 'Default 5'>>
  340. <</if>>
  341. <</if>>
  342. <<if $location_var[$here][0] == 'matrix'>>
  343. <<setinit $exer_stam[$i] = $exer_stam0[$i] + $exer_stam1[$i] + $exer_stam2[$i] + $exer_stam3[$i] + $exer_stam4[$i] + $exer_stam5[$i]>>
  344. <<act 'Confirm'>>
  345. <<gt 'exercise' 'setup'>>
  346. <</act>>
  347. Choose your exercise options from the following table:
  348. <center><table border=0 cellspacing=0 cellpadding=10 width=1000><TH>Exercise</TH><TH>None</TH><TH>15 mins</TH><TH>30 mins</TH><TH>45 mins</TH><TH>60 mins</TH>
  349. <<gs 'exercise' 'matrixdata' 0 'Push ups'>>
  350. <<gs 'exercise' 'matrixdata' 1 'Crunches'>>
  351. <<if getvar("$skak") > 0 and $loc != 'meadow'>>
  352. <<gs 'exercise' 'matrixdata' 2 'Jump rope'>>
  353. <</if>>
  354. <<if getvar("$bookYog") > 0>>
  355. <<gs 'exercise' 'matrixdata' 3 'Yoga'>>
  356. <</if>>
  357. <<if getvar("$obruch") > 0 and $loc != 'meadow'>>
  358. <<gs 'exercise' 'matrixdata' 4 'Hula hoop'>>
  359. <</if>>
  360. <<gs 'exercise' 'matrixdata' 5 'Squats'>>
  361. </center></table>
  362. <p>Total stamina required - exer_stam[$i]</p>
  363. <</if>>
  364. <<if $location_var[$here][0] == 'matrixdata'>>
  365. <TR>
  366. <!-- FAILED TO CONVERT
  367. *p '<TD><<$ARGS[2]>></TD>'
  368. -----
  369. * ERROR: FAILED TO CONVERT LITERAL: """p '<TD>$ARGS[2]<""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'"""
  370. -->
  371. <<warn "CONVERSION ERROR f8d34f802f7859bc19edb553500dd2d5">>
  372. <<if $exer_rout' + $location_var[$here][1] + '[$i] == 0>>
  373. <<set exer_stam'+ARGS[1]+'['+i+'] = 0>>
  374. <!-- FAILED TO CONVERT
  375. *p '<TD>Selected</TD>'
  376. -----
  377. * ERROR: FAILED TO CONVERT LITERAL: """p '<TD>Selected<""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'"""
  378. -->
  379. <<warn "CONVERSION ERROR 79fa03dafe9b51c1e2e24cf60ffcd4ad">>
  380. <<else>>
  381. <!-- FAILED TO CONVERT
  382. *p '<TD><a href="exec:dynamic ''exer_rout<<ARGS[1]>>[i] = 0'' & gt ''exercise'', ''matrix''">Select</a></TD>'
  383. -----
  384. <<set * ERROR: FAILED TO CONVERT LITERAL: """p '<TD><a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:dynamic ''exer_rout<<ARGS[1]>>[$i] = 0''""">> <<gt 'exercise' 'matrix'">Select</a></TD>'>>
  385. -->
  386. <<warn "CONVERSION ERROR e2a5eca3cbd0649c350df580940828b4">>
  387. <</if>>
  388. <<if $exer_rout' + $location_var[$here][1] + '[$i] == 1>>
  389. <<if $location_var[$here][1] >= 3>>
  390. <<set exer_stam'+ARGS[1]+'['+i+'] = 5 * (10 - sport_clothes_exercise_bonus)>>
  391. <<else>>
  392. <<set exer_stam'+ARGS[1]+'['+i+'] = (15 * (10 - sport_clothes_exercise_bonus)) / 2>>
  393. <</if>>
  394. <!-- FAILED TO CONVERT
  395. *p '<TD>Selected</TD>'
  396. -----
  397. * ERROR: FAILED TO CONVERT LITERAL: """p '<TD>Selected<""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'"""
  398. -->
  399. <<warn "CONVERSION ERROR 79fa03dafe9b51c1e2e24cf60ffcd4ad">>
  400. <<else>>
  401. <!-- FAILED TO CONVERT
  402. *p '<TD><a href="exec:dynamic ''exer_rout<<ARGS[1]>>[i] = 1'' & gt ''exercise'', ''matrix''">Select</a></TD>'
  403. -----
  404. <<set * ERROR: FAILED TO CONVERT LITERAL: """p '<TD><a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:dynamic ''exer_rout<<ARGS[1]>>[$i] = 1''""">> <<gt 'exercise' 'matrix'">Select</a></TD>'>>
  405. -->
  406. <<warn "CONVERSION ERROR e9b93e32821f20d83e2a747b867ad2f5">>
  407. <</if>>
  408. <<if $exer_rout' + $location_var[$here][1] + '[$i] == 2>>
  409. <<if $location_var[$here][1] >= 3>>
  410. <<set exer_stam'+ARGS[1]+'['+i+'] = 10 * (10 - sport_clothes_exercise_bonus)>>
  411. <<else>>
  412. <<set exer_stam'+ARGS[1]+'['+i+'] = (30 * (10 - sport_clothes_exercise_bonus)) / 2>>
  413. <</if>>
  414. <!-- FAILED TO CONVERT
  415. *p '<TD>Selected</TD>'
  416. -----
  417. * ERROR: FAILED TO CONVERT LITERAL: """p '<TD>Selected<""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'"""
  418. -->
  419. <<warn "CONVERSION ERROR 79fa03dafe9b51c1e2e24cf60ffcd4ad">>
  420. <<else>>
  421. <!-- FAILED TO CONVERT
  422. *p '<TD><a href="exec:dynamic ''exer_rout<<ARGS[1]>>[i] = 2'' & gt ''exercise'', ''matrix''">Select</a></TD>'
  423. -----
  424. <<set * ERROR: FAILED TO CONVERT LITERAL: """p '<TD><a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:dynamic ''exer_rout<<ARGS[1]>>[$i] = 2''""">> <<gt 'exercise' 'matrix'">Select</a></TD>'>>
  425. -->
  426. <<warn "CONVERSION ERROR bc535a52ffbf458822fbc1ec2a3d60c7">>
  427. <</if>>
  428. <<if $exer_rout' + $location_var[$here][1] + '[$i] == 3>>
  429. <<if $location_var[$here][1] >= 3>>
  430. <<set exer_stam'+ARGS[1]+'['+i+'] = 15 * (10 - sport_clothes_exercise_bonus)>>
  431. <<else>>
  432. <<set exer_stam'+ARGS[1]+'['+i+'] = (45 * (10 - sport_clothes_exercise_bonus)) / 2>>
  433. <</if>>
  434. <!-- FAILED TO CONVERT
  435. *p '<TD>Selected</TD>'
  436. -----
  437. * ERROR: FAILED TO CONVERT LITERAL: """p '<TD>Selected<""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'"""
  438. -->
  439. <<warn "CONVERSION ERROR 79fa03dafe9b51c1e2e24cf60ffcd4ad">>
  440. <<else>>
  441. <!-- FAILED TO CONVERT
  442. *p '<TD><a href="exec:dynamic ''exer_rout<<ARGS[1]>>[i] = 3'' & gt ''exercise'', ''matrix''">Select</a></TD>'
  443. -----
  444. <<set * ERROR: FAILED TO CONVERT LITERAL: """p '<TD><a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:dynamic ''exer_rout<<ARGS[1]>>[$i] = 3''""">> <<gt 'exercise' 'matrix'">Select</a></TD>'>>
  445. -->
  446. <<warn "CONVERSION ERROR ed615211b1f57a3d003c368d72287fbc">>
  447. <</if>>
  448. <<if $exer_rout' + $location_var[$here][1] + '[$i] == 4>>
  449. <<if $location_var[$here][1] >= 3>>
  450. <<set exer_stam'+ARGS[1]+'['+i+'] = 20 * (10 - sport_clothes_exercise_bonus)>>
  451. <<else>>
  452. <<set exer_stam'+ARGS[1]+'['+i+'] = (60 * (10 - sport_clothes_exercise_bonus)) / 2>>
  453. <</if>>
  454. <!-- FAILED TO CONVERT
  455. *p '<TD>Selected</TD>'
  456. -----
  457. * ERROR: FAILED TO CONVERT LITERAL: """p '<TD>Selected<""" / ERROR: FAILED TO CONVERT LITERAL: """TD>'"""
  458. -->
  459. <<warn "CONVERSION ERROR 79fa03dafe9b51c1e2e24cf60ffcd4ad">>
  460. <<else>>
  461. <!-- FAILED TO CONVERT
  462. *p '<TD><a href="exec:dynamic ''exer_rout<<ARGS[1]>>[i] = 4'' & gt ''exercise'', ''matrix''">Select</a></TD>'
  463. -----
  464. <<set * ERROR: FAILED TO CONVERT LITERAL: """p '<TD><a href""" = ERROR: FAILED TO CONVERT LITERAL: """"exec:dynamic ''exer_rout<<ARGS[1]>>[$i] = 4''""">> <<gt 'exercise' 'matrix'">Select</a></TD>'>>
  465. -->
  466. <<warn "CONVERSION ERROR 3591c34ba30b3c52e89c1d9ad5f758e6">>
  467. <</if>>
  468. <<setinit $exer_stam[$i] = $exer_stam0[$i] + $exer_stam1[$i] + $exer_stam2[$i] + $exer_stam3[$i] + $exer_stam4[$i] + $exer_stam5[$i]>>
  469. <</if>>
  470. <<if $location_var[$here][0] == 'butt'>>
  471. <<gs 'exercise' 'tier2' (15*timemult) 'stren' 'butt_tr'>>
  472. <<set $timemult = 0>>
  473. <<if $wardrobe.clothingworntype != 'nude'>>
  474. <<image "pc/activities/exercises/butt_home_dressed.jpg">>
  475. <<elseif $wardrobe.isWearingPanties>>
  476. <<image "pc/activities/exercises/butt_home_underwear.jpg">>
  477. <<else>>
  478. <<image "pc/activities/exercises/butt_home_nude.jpg">>
  479. <</if>>
  480. <p>You do squats for $timestring minutes, strengthening your thighs and scupting your butt.</p>
  481. <<if getvar("$exer_auto") == 1>>
  482. <<act 'Continue'>>
  483. <<gt 'exercise' 'auto_end'>>
  484. <</act>>
  485. <<else>>
  486. <<act 'Continue'>>
  487. <<gt 'exercise' 'manual'>>
  488. <</act>>
  489. <</if>>
  490. <</if>>
  491. <<if $location_var[$here][0] == 'hula'>>
  492. <<gs 'exercise' 'tier2' (timemult*15) 'agil' 'react'>>
  493. <<set $timemult = 0>>
  494. <<if $wardrobe.clothingworntype != 'nude'>>
  495. <<if $location_type == 'secluded'>>
  496. <<if $time.month >= 5 and $time.month <= 9>>
  497. <<image "pc/activities/exercises/hula_outdoor.jpg">>
  498. <<else>>
  499. <<video "pc/activities/exercises/hula_winter.mp4">>
  500. <</if>>
  501. <<else>>
  502. <<video "pc/activities/exercises/hula_dressed.mp4">>
  503. <</if>>
  504. <<elseif $wardrobe.isWearingPanties>>
  505. <<video "pc/activities/exercises/hula_underwear.mp4">>
  506. <<else>>
  507. <<video "pc/activities/exercises/hula_nude.mp4">>
  508. <</if>>
  509. <p>You improve your dexterity by using your hula hoop for $timestring minutes.</p>
  510. <<if getvar("$exer_auto") == 1>>
  511. <<act 'Continue'>>
  512. <<gt 'exercise' 'auto5'>>
  513. <</act>>
  514. <<else>>
  515. <<act 'Continue'>>
  516. <<gt 'exercise' 'manual'>>
  517. <</act>>
  518. <</if>>
  519. <</if>>
  520. <<if $location_var[$here][0] == 'yoga'>>
  521. <<if $willday_yoga != $time.daystart>>
  522. <<set $willday_yoga = $time.daystart>>
  523. <<set $yoga_counter = 0>>
  524. <<warn 'JUMP MARKER ENCOUNTERED: :timeloopyoga'>>
  525. <<set $pc.willpower += rand(1,2)>>
  526. <<if $yoga_counter < Math.min(timemult - 1,4)>>
  527. <<setn $yoga_counter += 1>>
  528. <</if>>
  529. <</if>>
  530. <<gs 'exercise' 'tier2' (timemult*15) 'sprt' 'agil'>>
  531. <<set $timemult = 0>>
  532. <<if $wardrobe.clothingworntype != 'nude'>>
  533. <<if $location_type == 'secluded'>>
  534. <<image "pc/activities/exercises/yoga_dressed_outdoor.jpg">>
  535. <<else>>
  536. <<video "pc/activities/exercises/yoga_dressed.mp4">>
  537. <</if>>
  538. <<elseif $wardrobe.isWearingPanties>>
  539. <<video "pc/activities/exercises/yoga_underwear.mp4">>
  540. <<else>>
  541. <<image "pc/activities/exercises/yoga_nude.jpg">>
  542. <</if>>
  543. <p>You spend $timestring minutes stretching and straining your muscles in various poses, improving your will and flexibility.</p>
  544. <<if getvar("$exer_auto") == 1>>
  545. <<act 'Continue'>>
  546. <<gt 'exercise' 'auto4'>>
  547. <</act>>
  548. <<else>>
  549. <<act 'Continue'>>
  550. <<gt 'exercise' 'manual'>>
  551. <</act>>
  552. <</if>>
  553. <</if>>
  554. <<if $location_var[$here][0] == 'rope'>>
  555. <<gs 'exercise' 'tier3' (15*timemult) 'agil' 'react'>>
  556. <<set $timemult = 0>>
  557. <<if $wardrobe.clothingworntype != 'nude'>>
  558. <<video "pc/activities/exercises/rope_dressed.mp4">>
  559. <<elseif $wardrobe.isWearingPanties>>
  560. <<image "pc/activities/exercises/rope_underwear.jpg">>
  561. <<else>>
  562. <<video "pc/activities/exercises/rope_nude.mp4">>
  563. <</if>>
  564. <p>You jump rope for $timestring minutes, improving your speed.</p>
  565. <<if getvar("$exer_auto") == 1>>
  566. <<act 'Continue'>>
  567. <<gt 'exercise' 'auto3'>>
  568. <</act>>
  569. <<else>>
  570. <<act 'Continue'>>
  571. <<gt 'exercise' 'manual'>>
  572. <</act>>
  573. <</if>>
  574. <</if>>
  575. <<if $location_var[$here][0] == 'press'>>
  576. <<gs 'exercise' 'tier3' (15*timemult) 'vital'>>
  577. <<set $timemult = 0>>
  578. <<if $wardrobe.clothingworntype != 'nude'>>
  579. <<video "pc/activities/exercises/abdominal_dressed.mp4">>
  580. <<elseif $wardrobe.isWearingPanties>>
  581. <<video "pc/activities/exercises/abdominal_underwear.mp4">>
  582. <<else>>
  583. <<video "pc/activities/exercises/abdominal_nude.mp4">>
  584. <</if>>
  585. <p>You do a series of abdominal exercises for $timestring minutes, improving your endurance.</p>
  586. <<if getvar("$exer_auto") == 1>>
  587. <<act 'Continue'>>
  588. <<gt 'exercise' 'auto2'>>
  589. <</act>>
  590. <<else>>
  591. <<act 'Continue'>>
  592. <<gt 'exercise' 'manual'>>
  593. <</act>>
  594. <</if>>
  595. <</if>>
  596. <<if $location_var[$here][0] == 'push'>>
  597. <<gs 'exercise' 'tier3' (15*timemult) 'stren'>>
  598. <<set $timemult = 0>>
  599. <<if $wardrobe.clothingworntype != 'nude'>>
  600. <<video "pc/activities/exercises/push_dressed.mp4">>
  601. <<elseif $wardrobe.isWearingPanties>>
  602. <<video "pc/activities/exercises/push_underwear.mp4">>
  603. <<else>>
  604. <<video "pc/activities/exercises/push_nude.mp4">>
  605. <</if>>
  606. <p>You do push-ups for $timestring minutes, improving your strength.</p>
  607. <<set $randpushfact = rand(-5,5)>>
  608. <<if $pc.pcs_energy < 40>>
  609. <<set $randpushfact -= RAND(1,10)>>
  610. <</if>>
  611. <<set $pushnum = ($pc.skillLevel("strength") * $pc.pcs_sleep * $pc.pcs_health) / (1 * 67 * $pc.healthmax) + $randpushfact>>
  612. <<if getvar("$pushnum") < 1>>
  613. <<set $pushnum = rand(1,5)>>
  614. <</if>>
  615. <<set $randpushfact to null>>
  616. <p><br>You managed to do pushnum push-ups. Your previous record is pushrecord.</p>
  617. <<if $pushrecord < $pushnum>>
  618. <<set $pushrecord = $pushnum>>
  619. <</if>>
  620. <<if getvar("$exer_auto") == 1>>
  621. <<act 'Continue'>>
  622. <<gt 'exercise' 'auto1'>>
  623. <</act>>
  624. <<else>>
  625. <<act 'Continue'>>
  626. <<gt 'exercise' 'manual'>>
  627. <</act>>
  628. <</if>>
  629. <</if>>
  630. <<if $location_var[$here][0] == 'tier1'>>
  631. <<if $location_var[$here][1] == 0>>
  632. <<set $time.minutes += 15>>
  633. <<set $mult = 1>>
  634. <<else>>
  635. <<set $time.minutes += $ARGS[1]>>
  636. <<set $mult = ($ARGS[1] - 1) / 15 + 1>>
  637. <</if>>
  638. <<gs 'exercise' 'get_sport_clothes_exercise_bonus'>>
  639. <<set $pc.pcs_stam -= (5 * $mult * (10 - $sport_clothes_exercise_bonus)) / 2>>
  640. <<gs 'sweat' 'add' `(3*$mult)`>>
  641. <<set $pc.fat -= (4 + $mult / 2)>>
  642. <<set $pc.pcs_energy -= 1 * $mult>>
  643. <<set $pc.pcs_hydra -= 2 * $mult>>
  644. <<set $pc.mood += (3 + $mult)>>
  645. <<set $mcnt = 0>>
  646. <<warn 'JUMP MARKER ENCOUNTERED: :timeexploop1'>>
  647. <<if $location_var[$here][3] == ''>>
  648. <<gs 'exp_gain' $location_var[$here][2] 1 $steroid_dose>>
  649. <<if $location_var[$here][2] == 'vital' or $location_var[$here][2] == 'stren'>>
  650. <<gs 'exp_gain' $location_var[$here][2] `rand(0,steroid_dose)`>>
  651. <<if getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  652. <<set $pc.clit_size += rand(0,1)>>
  653. <</if>>
  654. <</if>>
  655. <<else>>
  656. <<set $i = 2>>
  657. <<warn 'JUMP MARKER ENCOUNTERED: :exploop1'>>
  658. <<if $location_var[$here][$i] != ''>>
  659. <<gs 'exp_gain' $location_var[$here][$i] `rand(0,1)` $steroid_dose>>
  660. <<if $location_var[$here][$i] == 'vital' or $location_var[$here][$i] == 'stren'>>
  661. <<gs 'exp_gain' $location_var[$here][$i] `rand(0,steroid_dose)`>>
  662. <<set $steroidcheck = 1>>
  663. <</if>>
  664. <<set $i += 1>>
  665. <<warn 'JUMP COMMAND ENCOUNTERED: jump exploop1'>>
  666. <<else>>
  667. <<if getvar("$steroidcheck") == 1 and getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  668. <<set $pc.clit_size += rand(0,1)>>
  669. <</if>>
  670. <<set $steroidcheck to null>>
  671. <<set $i to null>>
  672. <</if>>
  673. <</if>>
  674. <<set $mcnt += 1>>
  675. <<if $mcnt < $mult>>
  676. <<warn 'JUMP COMMAND ENCOUNTERED: jump timeexploop1'>>
  677. <</if>>
  678. <<set $mcnt to null>>
  679. <<set $mult to null>>
  680. <</if>>
  681. <<if $location_var[$here][0] == 'tier2'>>
  682. <<if $location_var[$here][1] == 0>>
  683. <<set $time.minutes += 15>>
  684. <<set $mult = 1>>
  685. <<else>>
  686. <<set $time.minutes += $ARGS[1]>>
  687. <<set $mult = ($ARGS[1] - 1) / 15 + 1>>
  688. <</if>>
  689. <<gs 'exercise' 'get_sport_clothes_exercise_bonus'>>
  690. <<set $pc.pcs_stam -= 5 * $mult * (10 - $sport_clothes_exercise_bonus)>>
  691. <<gs 'sweat' 'add' `(10*$mult)`>>
  692. <<set $pc.fat -= (3 + $mult / 2)>>
  693. <<set $pc.pcs_energy -= 2 * $mult>>
  694. <<set $pc.pcs_hydra -= 4 * $mult>>
  695. <<set $pc.mood += (5 + $mult)>>
  696. <<set $mcnt = 0>>
  697. <<warn 'JUMP MARKER ENCOUNTERED: :timeexploop2'>>
  698. <<if $location_var[$here][3] == ''>>
  699. <<gs 'exp_gain' $location_var[$here][2] `rand(2,3)` $steroid_dose>>
  700. <<if $location_var[$here][2] == 'vital' or $location_var[$here][2] == 'stren'>>
  701. <<gs 'exp_gain' $location_var[$here][2] `rand(0,steroid_dose)`>>
  702. <<if getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  703. <<set $pc.clit_size += rand(0,1)>>
  704. <</if>>
  705. <</if>>
  706. <<else>>
  707. <<set $i = 2>>
  708. <<warn 'JUMP MARKER ENCOUNTERED: :exploop2'>>
  709. <<if $location_var[$here][$i] != ''>>
  710. <<gs 'exp_gain' $location_var[$here][$i] `rand(1,2)` $steroid_dose>>
  711. <<if $location_var[$here][$i] == 'vital' or $location_var[$here][$i] == 'stren'>>
  712. <<gs 'exp_gain' $location_var[$here][$i] `rand(0,steroid_dose)`>>
  713. <<set $steroidcheck = 1>>
  714. <</if>>
  715. <<set $i += 1>>
  716. <<warn 'JUMP COMMAND ENCOUNTERED: jump exploop2'>>
  717. <<else>>
  718. <<if getvar("$steroidcheck") == 1 and getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  719. <<set $pc.clit_size += rand(0,1)>>
  720. <</if>>
  721. <<set $steroidcheck to null>>
  722. <<set $i to null>>
  723. <</if>>
  724. <</if>>
  725. <<set $mcnt += 1>>
  726. <<if $mcnt < $mult>>
  727. <<warn 'JUMP COMMAND ENCOUNTERED: jump timeexploop2'>>
  728. <</if>>
  729. <<set $mcnt to null>>
  730. <<set $mult to null>>
  731. <</if>>
  732. <<if $location_var[$here][0] == 'tier3'>>
  733. <<if $location_var[$here][1] == 0>>
  734. <<set $time.minutes += 15>>
  735. <<set $mult = 1>>
  736. <<else>>
  737. <<set $time.minutes += $ARGS[1]>>
  738. <<set $mult = ($ARGS[1] - 1) / 15 + 1>>
  739. <</if>>
  740. <<gs 'exercise' 'get_sport_clothes_exercise_bonus'>>
  741. <<set $pc.pcs_stam -= (15 * $mult * (10 - $sport_clothes_exercise_bonus)) / 2>>
  742. <<gs 'sweat' 'add' `(15*$mult)`>>
  743. <<set $pc.fat -= (2 + $mult / 2)>>
  744. <<set $pc.pcs_energy -= 3 * $mult>>
  745. <<set $pc.pcs_hydra -= 6 * $mult>>
  746. <<set $pc.mood += (5 + $mult)>>
  747. <<set $mcnt = 0>>
  748. <<warn 'JUMP MARKER ENCOUNTERED: :timeexploop3'>>
  749. <<if $location_var[$here][3] == ''>>
  750. <<gs 'exp_gain' $location_var[$here][2] `rand(3,5)` $steroid_dose>>
  751. <<if $location_var[$here][2] == 'vital' or $location_var[$here][2] == 'stren'>>
  752. <<gs 'exp_gain' $location_var[$here][2] `rand(0,steroid_dose)`>>
  753. <<if getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  754. <<set $pc.clit_size += rand(0,1)>>
  755. <</if>>
  756. <</if>>
  757. <<else>>
  758. <<set $i = 2>>
  759. <<warn 'JUMP MARKER ENCOUNTERED: :exploop3'>>
  760. <<if $location_var[$here][$i] != ''>>
  761. <<gs 'exp_gain' $location_var[$here][$i] `rand(2,3)` $steroid_dose>>
  762. <<if $location_var[$here][$i] == 'vital' or $location_var[$here][$i] == 'stren'>>
  763. <<gs 'exp_gain' $location_var[$here][$i] `rand(0,steroid_dose)`>>
  764. <<set $steroidcheck = 1>>
  765. <</if>>
  766. <<set $i += 1>>
  767. <<warn 'JUMP COMMAND ENCOUNTERED: jump exploop3'>>
  768. <<else>>
  769. <<if getvar("$steroidcheck") == 1 and getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  770. <<set $pc.clit_size += rand(0,1)>>
  771. <</if>>
  772. <<set $steroidcheck to null>>
  773. <<set $i to null>>
  774. <</if>>
  775. <</if>>
  776. <<set $mcnt += 1>>
  777. <<if $mcnt < $mult>>
  778. <<warn 'JUMP COMMAND ENCOUNTERED: jump timeexploop3'>>
  779. <</if>>
  780. <<set $mcnt to null>>
  781. <<set $mult to null>>
  782. <</if>>
  783. <<if $location_var[$here][0] == 'tier4'>>
  784. <<if $location_var[$here][1] == 0>>
  785. <<set $time.minutes += 15>>
  786. <<set $mult = 1>>
  787. <<else>>
  788. <<set $time.minutes += $ARGS[1]>>
  789. <<set $mult = ($ARGS[1] - 1) / 15 + 1>>
  790. <</if>>
  791. <<gs 'exercise' 'get_sport_clothes_exercise_bonus'>>
  792. <<set $pc.pcs_stam -= (25 * $mult * (10 - $sport_clothes_exercise_bonus)) / 2>>
  793. <<gs 'sweat' 'add' `(25*$mult)`>>
  794. <<set $pc.fat -= (1 + $mult / 2)>>
  795. <<set $pc.pcs_energy -= 4 * $mult>>
  796. <<set $pc.pcs_hydra -= 12 * $mult>>
  797. <<set $pc.mood += (5 + $mult)>>
  798. <<set $mcnt = 0>>
  799. <<warn 'JUMP MARKER ENCOUNTERED: :timeexploop4'>>
  800. <<if $location_var[$here][3] == ''>>
  801. <<gs 'exp_gain' $location_var[$here][2] `rand(7,10)` $steroid_dose>>
  802. <<if $location_var[$here][2] == 'vital' or $location_var[$here][2] == 'stren'>>
  803. <<gs 'exp_gain' $location_var[$here][2] `rand(0,steroid_dose)`>>
  804. <<if getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  805. <<set $pc.clit_size += rand(0,1)>>
  806. <</if>>
  807. <</if>>
  808. <<else>>
  809. <<set $i = 2>>
  810. <<warn 'JUMP MARKER ENCOUNTERED: :exploop4'>>
  811. <<if $location_var[$here][$i] != ''>>
  812. <<gs 'exp_gain' $location_var[$here][$i] `rand(3,5)` $steroid_dose>>
  813. <<if $location_var[$here][$i] == 'vital' or $location_var[$here][$i] == 'stren'>>
  814. <<gs 'exp_gain' $location_var[$here][$i] `rand(0,steroid_dose)`>>
  815. <<set $steroidcheck = 1>>
  816. <</if>>
  817. <<set $i += 1>>
  818. <<warn 'JUMP COMMAND ENCOUNTERED: jump exploop4'>>
  819. <<else>>
  820. <<if getvar("$steroidcheck") == 1 and getvar("$steroid_dose") > 0 and rand(1,5) <= $steroid_dose>>
  821. <<set $pc.clit_size += rand(0,1)>>
  822. <</if>>
  823. <<set $steroidcheck to null>>
  824. <<set $i to null>>
  825. <</if>>
  826. <</if>>
  827. <<set $mcnt += 1>>
  828. <<if $mcnt < $mult>>
  829. <<warn 'JUMP COMMAND ENCOUNTERED: jump timeexploop4'>>
  830. <</if>>
  831. <<set $mcnt to null>>
  832. <<set $mult to null>>
  833. <</if>>
  834. <<if $location_var[$here][0] == 'timestring'>>
  835. <<if getvar("$timemult") == 1>>
  836. <<set $timestring = 'fifteen'>>
  837. <</if>>
  838. <<if getvar("$timemult") == 2>>
  839. <<set $timestring = 'thirty'>>
  840. <</if>>
  841. <<if getvar("$timemult") == 3>>
  842. <<set $timestring = 'forty-five'>>
  843. <</if>>
  844. <<if getvar("$timemult") == 4>>
  845. <<set $timestring = 'sixty'>>
  846. <</if>>
  847. <</if>>
  848. <<if $location_var[$here][0] == 'get_sport_clothes_exercise_bonus'>>
  849. <<set $sport_clothes_exercise_bonus = 0>>
  850. <<if $wardrobe.braworntype == 'sport' or $wardrobe.braworntype == 'danilovich'>>
  851. <<set $sport_clothes_exercise_bonus += 1>>
  852. <<elseif $wardrobe.PCloBra == 1 and $wardrobe.clothingworntype == 'danilovich_outfits'>>
  853. <<set $sport_clothes_exercise_bonus += 1>>
  854. <</if>>
  855. <<if $wardrobe.pantyworntype == 'sport' or $wardrobe.pantyworntype == 'danilovich'>>
  856. <<set $sport_clothes_exercise_bonus += 1>>
  857. <<elseif getvar("$PCLoPanties") == 1 and $wardrobe.clothingworntype == 'danilovich_outfits'>>
  858. <<set $sport_clothes_exercise_bonus += 1>>
  859. <</if>>
  860. <<if $wardrobe.clothingworntype == 'danilovich_outfits'>>
  861. <<set $sport_clothes_exercise_bonus += 1>>
  862. <</if>>
  863. <<if $wardrobe.shoeworntype == 'danilovich'>>
  864. <<set $sport_clothes_exercise_bonus += 1>>
  865. <</if>>
  866. <</if>>