fit.qsrc 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787
  1. # fit
  2. CLOSE ALL
  3. if $ARGS[0] = 'start':
  4. *clr & cla
  5. $menu_loc = 'fit'
  6. $menu_arg = 'start'
  7. menu_off = 0
  8. minut += 5
  9. frost = 0
  10. gs 'stat'
  11. gs 'themes', 'indoors'
  12. '<center><b><font color="maroon">Fitness Center</font></b></center>'
  13. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/fit.jpg"></center>'
  14. 'This modern and well staffed fitness center provides all the latest equipment and trainers to help you make the most of them.'
  15. *nl
  16. 'Buy subscription for 30 classes (3,000 <b>₽</b>), pool use is free to members.'
  17. 'You must wear sportswear for all classes.'
  18. if abonement > 0:'Subscription is valid for <<abonement>> more classes.'
  19. act 'Leave':
  20. cla
  21. minut += 5
  22. gt 'down'
  23. end
  24. if money >= 3000:
  25. act 'Buy a subscription (3,000 <b>₽</b>)':
  26. cla
  27. menu_off = 1
  28. money -= 3000
  29. abonement += 30
  30. 'You bought a subscription for 30 lessons, including free use of the pool.'
  31. act 'Move away from cashier':gt 'fit', 'start'
  32. end
  33. end
  34. if abonement > 0:
  35. act 'Go to the dressing room':
  36. cla
  37. gt 'fit', 'dressing room'
  38. end
  39. else
  40. act 'Use the pool (100 <b>₽</b>)': gt 'fit', 'dressing room'
  41. end
  42. end
  43. if $ARGS[0] = 'dressing room':
  44. $locM = 'fit'
  45. $metkaM = 'dressing room'
  46. $sexloc = 'fit'
  47. $loc = 'fit'
  48. $metka = 'dressing room'
  49. $menu_loc = 'fit'
  50. $menu_arg = 'dressing room'
  51. menu_off = 0
  52. $location_type = 'private'
  53. *clr & cla
  54. gs 'stat'
  55. '<center><b><font color="maroon">Dressing</font></b></center>'
  56. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/razd.jpg"></center>'
  57. 'Recruiting girls for local track team, the winners will receive cash prizes.'
  58. 'Attention, visitors to the sports section must wear sports outfits and shoes when using the facilities.'
  59. if nichTanyaOpinion = 0 and (rand(1,100) <= 20 or nichDebug = 1):
  60. 'In the locker room you notice <a href="exec:gt ''fit'', ''fitgirl''">a cute girl</a>.'
  61. end
  62. act 'Take a shower (0:15)':
  63. cla
  64. *clr
  65. menu_off = 1
  66. minut += 15
  67. pcs_horny += 1
  68. pcs_hairbsh = 0
  69. pcs_makeup = 1
  70. if pcs_inhib < 15:inhib_exp += rand(1,2)
  71. dynamic $showerdin
  72. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  73. 'You go into the bathroom and turn on the shower. You lather your body and wash in the shower.'
  74. act 'Get out of the shower':gt 'fit', 'dressing room'
  75. end
  76. act 'Use mirror':
  77. cla
  78. gt 'mirror', 'start'
  79. end
  80. act 'Change outfit':
  81. cla
  82. gt 'wardrobe', 'start'
  83. end
  84. if $clothingworntype = 'swimwear':
  85. act 'Use the pool': gt 'bass', 'start'
  86. else
  87. act 'Change into swimwear': gt 'changingroom', 'view_swim_list'
  88. end
  89. gs 'wardrobe', 'sports_outfit'
  90. if abonement > 0:
  91. if $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and pcs_stam >= 40:
  92. act 'Go to the gym':
  93. cla
  94. gt 'fit', 'gym'
  95. end
  96. act 'Go to the dance studio':
  97. cla
  98. gt 'danceclass'
  99. end
  100. act 'Go do a crossfit workout':
  101. cla
  102. gt 'crossfit_north_box', 'box'
  103. end
  104. end
  105. if begsec = 0:
  106. act 'Join track team':
  107. cla
  108. *clr
  109. minut += 5
  110. begsec = 1
  111. 'You signed up for the track team.'
  112. act 'Leave':gt 'fit', 'dressing room'
  113. end
  114. elseif $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and pcs_stam >= 40:
  115. act 'Go to team practice':gt 'beg', 'start'
  116. if week = 6 and pcs_run >= 20 and run_comp_day ! daystart:
  117. act '<b>Enter competition race</b>':run_comp_day = daystart & gt 'beg1', 'start'
  118. end
  119. end
  120. end
  121. act 'Exit the locker room':
  122. if $clothingworntype ! 'nude' and $clothingworntype ! 'swimwear':
  123. gt 'fit', 'start'
  124. else
  125. cla
  126. msg'<b><font color = red>You need to get dressed.</font></b>'
  127. act 'Return': gt 'fit', 'dressing room'
  128. end
  129. end
  130. end
  131. if $ARGS[0] = 'fitgirl':
  132. menu_off = 1
  133. '<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/idle0.jpg"></center>'
  134. 'The girl notices you looking and returns the smile. She undresses and taking some toiletries goes into the shower.'
  135. act 'Turn away':gt 'fit', 'dressing room'
  136. act 'Follow her':
  137. *clr & cla
  138. !! pcs_hairbsh = 0
  139. !! pcs_makeup = 1
  140. !! dynamic $showerdin
  141. !! dont ruin the pcs makeup and hair because otherwise its pretty hard to get to 80 appearance
  142. shovertania += 1
  143. gs 'stat'
  144. '<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/shower0.jpg"></center>'
  145. 'There''s no one in the shower, except this girl. The girl looks around and seeing you smiles again then turns away.'
  146. if pcs_dom > 10:
  147. act 'Molest her':
  148. cla
  149. *clr
  150. tanday = daystart
  151. gs 'stat'
  152. '<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/shower_mol0.jpg"></center>'
  153. 'You walk up to the girl and gently place one hand on her right breast. She turns to face you.'
  154. gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
  155. gs 'stat'
  156. if pcs_apprnc < 80:
  157. 'The girl pushes you off, and shouts something very rude about you and each and everyone of your relatives, you run out to the locker room.'
  158. act 'Go':gt 'fit', 'dressing room'
  159. elseif pcs_apprnc >= 80:
  160. 'The girl quickly turns around. She looks a little bit puzzled as she realizes that it was you who grabed her. She probably expected to see a guy and isn''t sure what to do.'
  161. act 'Take advantage of the confusion':
  162. cla
  163. *clr
  164. gs 'underwear', 'remove'
  165. gs 'clothing', 'strip'
  166. gs 'stat'
  167. '<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/shower_mol1.jpg"></center>'
  168. 'While she is trying to understand what is happening you begin fondling her sex with your fingers, and then her hand strokes your ass.'
  169. gs 'arousal', 'foreplay', 10, 'dom', 'lesbian'
  170. gs 'stat'
  171. act 'Further':tanznak = 1 & gt 'fit', 'tanyaIntroduction'
  172. end
  173. act 'Wait for her reaction':
  174. *clr & cla
  175. gs 'stat'
  176. if pcs_apprnc < 120:
  177. 'The girl smiles at you, but removes your hand and leaves, blowing you a kiss.'
  178. act '...':gt 'fit', 'dressing room'
  179. elseif pcs_apprnc >= 120:
  180. cla
  181. *clr
  182. gs 'underwear', 'remove'
  183. gs 'clothing', 'strip'
  184. '<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/shower_mol2.jpg"></center>'
  185. 'The girl presses up to you even stronger and kisses your lips.'
  186. gs 'arousal', 'kiss', 5, 'dom', 'lesbian'
  187. gs 'stat'
  188. act 'Further':
  189. tanznak = 1
  190. gt 'fit', 'tanyaIntroduction'
  191. end
  192. end
  193. end
  194. end
  195. end
  196. end
  197. act 'Leave the shower':gt 'fit', 'dressing room'
  198. end
  199. end
  200. if $ARGS[0] = 'tanyaIntroduction':
  201. '<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/shower1.jpg"></center>'
  202. 'Just as the both of you are about to get more intimate a group of middleaged women enters the showers. They haven''t noticed you yet. The girl next to you is clearly afraid of being spotted in the shower with you and takes her first opportunity to quietely escape to the dressing room.'
  203. 'You follow her only a few seconds later. She has already begun to dress herself.'
  204. if $pantyworntype = 'none': gs 'underwear', 'wear'
  205. gs 'panties', 'dispose'
  206. gs 'clothing', 'wear_last_worn'
  207. nichTanyaOpinion = 1
  208. npc_rel['A218'] += 5
  209. nichTanyaFuckLast = daystart
  210. '"You can at least tell me your name, seeing as you did not even have the decency to do so before you assaulted me." The girl says, catching her breath. Despite her words she doesn''t seem to be angry with you.'
  211. '"I am <<$pcs_nickname>>, and how can I assault someone so keen?" You ask trying to find your panties.'
  212. '"Looking for this?" asks the girl twirling your panties on her finger.'
  213. '"Yes, can I have them back, please?" you ask, while holding out your hand.'
  214. '"Nope. You seduced me. I have never been with a girl before and I think I earned this as a memento." With these words, Tanya slips your panties in her pocket.'
  215. '"My name is Tanya by the way. I live only a short distance from here with my parents. You might come over if you like. Usually I''m home in the late afternoon. We could continue were we left off." she winks at you and leaves.'
  216. '<i>You can now visit Tanya at her parents home in the Downtown area once a day after 16:00.</i>'
  217. act 'Back':gt 'fit', 'dressing room'
  218. end
  219. if $ARGS[0] = 'gym':
  220. *clr & cla
  221. menu_off = 1
  222. minut += 5
  223. sportzalrand = RAND(0,20)
  224. gs 'stat'
  225. gs 'themes', 'indoors'
  226. '<center><b><font color="maroon">Fitness Center</font></b></center>'
  227. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/fit.jpg"></center>'
  228. 'In the fitness center there are a lot of different classes and clubs, designed to improve physical development.'
  229. if StoryLine = 1:
  230. if hour >= 10 and hour < 12 and week = 7 and centr = 1: 'In the hall you see <a href="exec:gt ''VolleyTrenCentr''">Mikhail Nikolaevich</a> talking with a strange man.'
  231. if hour >= 10 and hour < 12 and week = 7 and centr = 2 and ricewine < 2: 'In the hall you see <a href="exec:gt ''VolleyTrenCentr''">Guang</a>'
  232. end
  233. gs 'fit', 'exercise end'
  234. act 'Aerobics (Burn fat)':
  235. cla
  236. *clr
  237. abonement -= 1
  238. timemult = 2
  239. loopcount = 1
  240. :timeloop1
  241. gs 'exercise', 'tier3', 0, 'vital_exp', 'react_exp'
  242. if loopcount < timemult: loopcount += 1 & jump 'timeloop1'
  243. loopcount = 0
  244. timemult = 0
  245. if pcs_inhib < 30:inhib_exp += rand(1,2)
  246. '<center><img <<$set_imgh>> src="images/locations/shared/gym/fit1.jpg"></center>'
  247. 'You do very vigorous exercises to the music, and burn some fat.'
  248. if pcs_stam < 30:
  249. *nl
  250. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  251. gs 'fit', 'exercise end'
  252. else
  253. act'Continue': gt 'fit', 'gym'
  254. end
  255. end
  256. act 'Free weights (Build muscle)':
  257. cla
  258. *clr
  259. abonement -= 1
  260. timemult = 2
  261. loopcount = 1
  262. :timeloop2
  263. gs 'exercise', 'tier3', 0, 'stren_exp'
  264. if loopcount < timemult: loopcount += 1 & jump 'timeloop2'
  265. loopcount = 0
  266. timemult = 0
  267. if pcs_inhib < 30:inhib_exp += rand(1,2)
  268. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit2.jpg"></center>'
  269. 'You pump iron, building strength.'
  270. if pcs_stam < 30:
  271. *nl
  272. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  273. gs 'fit', 'exercise end'
  274. else
  275. act'Continue': gt 'fit', 'gym'
  276. end
  277. end
  278. act 'Cross trainer (endurance)':
  279. cla
  280. *clr
  281. abonement -= 1
  282. timemult = 2
  283. loopcount = 1
  284. :timeloop3
  285. gs 'exercise', 'tier3', 0, 'vital_exp'
  286. if loopcount < timemult: loopcount += 1 & jump 'timeloop3'
  287. loopcount = 0
  288. timemult = 0
  289. if pcs_inhib < 30:inhib_exp += rand(1,2)
  290. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit3.jpg"></center>'
  291. 'You spend a half hour doing reps on the cross trainer developing your endurance.'
  292. if pcs_stam < 30:
  293. *nl
  294. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  295. gs 'fit', 'exercise end'
  296. else
  297. act'Continue': gt 'fit', 'gym'
  298. end
  299. end
  300. act 'Tennis practice (agility)':
  301. cla
  302. *clr
  303. abonement -= 1
  304. timemult = 2
  305. loopcount = 1
  306. :timeloop4
  307. gs 'exercise', 'tier3', 0, 'agil_exp'
  308. if loopcount < timemult: loopcount += 1 & jump 'timeloop4'
  309. loopcount = 0
  310. timemult = 0
  311. if pcs_inhib < 30:inhib_exp += rand(1,2)
  312. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit4.jpg"></center>'
  313. 'You run tennis exercises, concentrating on defensive drills.'
  314. if pcs_stam < 30:
  315. *nl
  316. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  317. gs 'fit', 'exercise end'
  318. else
  319. act'Continue': gt 'fit', 'gym'
  320. end
  321. end
  322. act 'Tennis practice (reactions)':
  323. cla
  324. *clr
  325. abonement -= 1
  326. timemult = 2
  327. loopcount = 1
  328. :timeloop5
  329. gs 'exercise', 'tier3', 0, 'react_exp'
  330. if loopcount < timemult: loopcount += 1 & jump 'timeloop5'
  331. loopcount = 0
  332. timemult = 0
  333. if pcs_inhib < 30:inhib_exp += rand(1,2)
  334. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit4.jpg"></center>'
  335. 'You run tennis exercises, concentrating on court reactions.'
  336. if pcs_stam < 30:
  337. *nl
  338. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  339. gs 'fit', 'exercise end'
  340. else
  341. act'Continue': gt 'fit', 'gym'
  342. end
  343. end
  344. act 'Go to the kickboxing gym':gt 'fit', 'kickboxing'
  345. end
  346. if $ARGS[0] = 'exercise end':
  347. menu_off = 1
  348. RESULT = rand(0, 19)
  349. act 'Leave':
  350. if RESULT = 0:
  351. cla
  352. *clr
  353. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal1.jpg"></center>'
  354. 'You see a nice guy on the weight machine.'
  355. act 'Continue':gt 'fit', 'dressing room'
  356. if pcs_dom > 0:
  357. act 'Flirt':
  358. cla
  359. *clr
  360. guy += 1
  361. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  362. gs 'boyStat', $npclastgenerated
  363. samecount = 1
  364. picrand = 17
  365. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal2.jpg"></center>'
  366. 'You go up to the guy lying on the machine, squat and start stroking his cock through his pants. The man rises and kisses you on the lips, then lowers his pants releasing his impressive size dick.'
  367. gs 'arousal', 'foreplay', 10, 'dom'
  368. gs 'stat'
  369. act 'Suck':gt 'sex', 'minet'
  370. end
  371. end
  372. elseif RESULT = 1:
  373. cla
  374. *clr
  375. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal3.jpg"></center>'
  376. 'As you finish training, a guy sits behind, caresses your breasts and kisses your ear, sucking the lobe.'
  377. if pcs_dom > 0:act 'Hit him in the balls':pcs_dom += 1 & gt 'fit', 'dressing room'
  378. act 'Enjoy':
  379. cla
  380. *clr
  381. guy += 1
  382. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  383. gs 'boyStat', $npclastgenerated
  384. picrand = 18
  385. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal4.jpg"></center>'
  386. 'Guy gets up and moves around to face you, he pulls out his cock and lays it on your chest, eventually moving the head to your mouth.'
  387. gs 'arousal', 'foreplay', 15, 'sub'
  388. gs 'stat'
  389. act 'Suck':gt 'sex', 'minet'
  390. end
  391. elseif RESULT = 2:
  392. cla
  393. 'As you finish training, a fit girl offers to play a little squash with her as she waits for her boyfriend to came.'
  394. act 'Refuse':gt 'fit', 'dressing room'
  395. act 'Agree':
  396. cla
  397. *clr
  398. picrand = 15
  399. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal5.jpg"></center>'
  400. 'You have fun playing with the girl, neither of you are any good, but it just amuses you. After some time, it appears as a man and looking at your clumsy attempts and offers to show you how to play correctly.'
  401. 'He stands just behind you and puts one hand on your hand, guiding your racket and showing you how to strike the ball. The other hand starts stroking your hips gradually approaching your crotch.'
  402. 'You feel his cock resting against your back and looking at the girl, you know that she understands what is going on and that the man is her boyfriend.'
  403. act 'Escape from these perverts':gt 'fit', 'dressing room'
  404. act 'Enjoy':
  405. guy += 1
  406. girl += 1
  407. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  408. gs 'boyStat', $npclastgenerated
  409. gt 'podrsex', 'suck'
  410. gs 'arousal', 'foreplay', 15, 'group', 'lesbian'
  411. gs 'stat'
  412. end
  413. end
  414. elseif RESULT = 3:
  415. cla
  416. *clr
  417. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal6.jpg"></center>'
  418. 'You train near to a girl and engage in conversation, two guys obviously take you for girlfriends and try to chat you up.'
  419. act 'Continue':gt 'fit', 'dressing room'
  420. act 'Flirt back':
  421. cla
  422. *clr
  423. picrand = 12
  424. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal7.jpg"></center>'
  425. 'You flirt with a guy, and notice that he is getting very excited and constantly glancing behind you. Turning, you see that the girl is already on her haunches and sucking the second guy with gusto.'
  426. act 'Leave':gt 'fit', 'dressing room'
  427. act 'Suck':
  428. guy += 2
  429. girl += 1
  430. gang += 1
  431. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  432. gs 'boyStat', $npclastgenerated
  433. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  434. gs 'boyStat', $npclastgenerated, 'a'
  435. gs 'arousal', 'bj', 15, 'group', 'lesbian'
  436. gs 'stat'
  437. gt 'sexdvanadva', 'var'
  438. end
  439. end
  440. else
  441. gt 'fit', 'dressing room'
  442. end
  443. end
  444. end
  445. if $ARGS[0] = 'kickboxing':
  446. cla
  447. *clr
  448. menu_off = 1
  449. minut += 5
  450. gs 'stat'
  451. gs 'razrKik'
  452. gs 'themes', 'indoors'
  453. '<center><b><font color="maroon">Kickboxing Gym</font></b></center>'
  454. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik.jpg"></center>'
  455. 'This section is dominated by the ring itself, square like a boxing ring and the only equipment that can''t be easily moved.'
  456. 'Around it there are various punching bags of different sizes and weights and a couple of coaches with practice pads.'
  457. 'You can try your luck in a fight here on Saturdays but safety concerns limit everyone to a maximum of 1 bout per week.'
  458. act 'Work on your jabs':
  459. cla
  460. *clr
  461. abonement -= 1
  462. timemult = 2
  463. loopcount = 1
  464. :timeloop6
  465. gs 'exercise', 'tier3', 0, 'jab_exp', 'react_exp'
  466. if loopcount < timemult: loopcount += 1 & jump 'timeloop6'
  467. loopcount = 0
  468. timemult = 0
  469. if pcs_inhib < 30:inhib_exp += rand(1,2)
  470. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  471. 'You practice your jabs on the speed bag and double-end bag, straight punches with a step forward. These strikes are not so powerful, but they are fast.'
  472. act 'Leave':gt 'fit', 'dressing room'
  473. end
  474. act 'Work on your heavy punches':
  475. cla
  476. *clr
  477. abonement -= 1
  478. timemult = 2
  479. loopcount = 1
  480. :timeloop7
  481. gs 'exercise', 'tier3', 0, 'stren_exp', 'punch_exp'
  482. if loopcount < timemult: loopcount += 1 & jump 'timeloop7'
  483. loopcount = 0
  484. timemult = 0
  485. if pcs_inhib < 30:inhib_exp += rand(1,2)
  486. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  487. 'You practice your power punches on the heavy bag. These are high impact and powerful, but they are hard to get to their target.'
  488. act 'Leave':gt 'fit', 'dressing room'
  489. end
  490. act 'Work on your kicking':
  491. cla
  492. *clr
  493. abonement -= 1
  494. timemult = 2
  495. loopcount = 1
  496. :timeloop8
  497. gs 'exercise', 'tier3', 0, 'stren_exp', 'kick_exp'
  498. if loopcount < timemult: loopcount += 1 & jump 'timeloop8'
  499. loopcount = 0
  500. timemult = 0
  501. if pcs_inhib < 30:inhib_exp += rand(1,2)
  502. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  503. 'You practice your powerful kicks on a kickboxing bag. These impacts are very powerful and able to cut down an opponant, but are very difficult to hit with.'
  504. act 'Leave':gt 'fit', 'dressing room'
  505. end
  506. act 'Work on defence':
  507. cla
  508. *clr
  509. abonement -= 1
  510. timemult = 2
  511. loopcount = 1
  512. :timeloop9
  513. gs 'exercise', 'tier3', 0, 'def_exp', 'agil_exp'
  514. if loopcount < timemult: loopcount += 1 & jump 'timeloop9'
  515. loopcount = 0
  516. timemult = 0
  517. if pcs_inhib < 30:inhib_exp += rand(1,2)
  518. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  519. 'You practice your defense movements.'
  520. act 'Leave':gt 'fit', 'dressing room'
  521. end
  522. act 'Sparing (training bout in the ring)':
  523. cla
  524. *clr
  525. 'You need to choose a partner for sparring'
  526. if pcs_inhib < 30:inhib_exp += rand(1,2)
  527. act 'Pick a random partner':
  528. abonement -= 1
  529. pcs_mood += 2
  530. timemult = 2
  531. loopcount = 1
  532. :timeloop10
  533. gs 'exercise', 'tier3', 0, 'jab_exp', 'punch_exp', 'kick_exp', 'def_exp'
  534. if loopcount < timemult: loopcount += 1 & jump 'timeloop10'
  535. loopcount = 0
  536. timemult = 0
  537. pointKik = 0
  538. pointKikV = 0
  539. round = 1
  540. minround = 0
  541. gs 'npcgeneratec', 0, 'sparring partner', rand(19,45)
  542. gs 'boyStat', $npclastgenerated
  543. strenV = rand(10, 20)
  544. speedV = rand(10, 20)
  545. agilV = rand(10, 20)
  546. reactV = rand(10, 20)
  547. vitalV = rand(10, 20)
  548. intelV = 10
  549. willV = 10
  550. !!skills
  551. JabV = rand(5, 20)
  552. PunchV = rand(5, 20)
  553. KikV = rand(5, 20)
  554. KikDefV = rand(5, 20)
  555. !!parameters
  556. healthV = vitalV * 10 + strenV * 5
  557. formula = 3
  558. sparing = 1
  559. gt 'kikbox', 'start'
  560. end
  561. end
  562. if week >= 5 and amateur_fight_day ! daystart:
  563. 'You can take part in an amateur fight.'
  564. act 'Amateur fight':
  565. amateur_fight_day = daystart
  566. pcs_mood += 2
  567. timemult = 2
  568. loopcount = 1
  569. :timeloop11
  570. gs 'exercise', 'tier3', 0, 'jab_exp', 'punch_exp', 'kick_exp', 'def_exp'
  571. if loopcount < timemult: loopcount += 1 & jump 'timeloop11'
  572. loopcount = 0
  573. timemult = 0
  574. pointKik = 0
  575. pointKikV = 0
  576. round = 1
  577. minround = 0
  578. razrand = rand(0, 1)
  579. if razradKik + razrand = 0:
  580. gs 'npcgeneratec', 0, 'Useless rival', rand(19,45)
  581. gs 'boyStat', $npclastgenerated
  582. strenV = rand(10, 20)
  583. speedV = rand(10, 20)
  584. agilV = rand(10, 20)
  585. reactV = rand(10, 20)
  586. vitalV = rand(10, 20)
  587. intelV = 10
  588. willV = 10
  589. !!skills
  590. JabV = rand(10, 30)
  591. PunchV = rand(10, 30)
  592. KikV = rand(10, 30)
  593. KikDefV = rand(10, 30)
  594. !!parameters
  595. healthV = vitalV * 10 + strenV * 5
  596. formula = 3
  597. amateur = 1
  598. elseif razradKik + razrand = 1:
  599. gs 'npcgeneratec', 0, '3rd class rival', rand(19,45)
  600. gs 'boyStat', $npclastgenerated
  601. strenV = rand(15, 25)
  602. speedV = rand(15, 25)
  603. agilV = rand(15, 25)
  604. reactV = rand(15, 25)
  605. vitalV = rand(15, 25)
  606. intelV = 10
  607. willV = 10
  608. !!skills
  609. JabV = rand(15, 35)
  610. PunchV = rand(15, 35)
  611. KikV = rand(15, 35)
  612. KikDefV = rand(15, 35)
  613. !!parameters
  614. healthV = vitalV * 10 + strenV * 5
  615. formula = 3
  616. amateur = 1
  617. elseif razradKik + razrand = 2:
  618. gs 'npcgeneratec', 0, '2rd class rival', rand(19,45)
  619. gs 'boyStat', $npclastgenerated
  620. strenV = rand(20, 30)
  621. speedV = rand(20, 30)
  622. agilV = rand(20, 30)
  623. reactV = rand(20, 30)
  624. vitalV = rand(20, 30)
  625. intelV = 10
  626. willV = 10
  627. !!skills
  628. JabV = rand(30, 50)
  629. PunchV = rand(30, 50)
  630. KikV = rand(30, 50)
  631. KikDefV = rand(30, 50)
  632. !!parameters
  633. healthV = vitalV * 10 + strenV * 5
  634. formula = 3
  635. amateur = 1
  636. elseif razradKik + razrand = 3:
  637. gs 'npcgeneratec', 0, '1st class rival', rand(19,45)
  638. gs 'boyStat', $npclastgenerated
  639. strenV = rand(30, 40)
  640. speedV = rand(30, 40)
  641. agilV = rand(30, 40)
  642. reactV = rand(30, 40)
  643. vitalV = rand(30, 40)
  644. intelV = 10
  645. willV = 10
  646. !!skills
  647. JabV = rand(40, 60)
  648. PunchV = rand(40, 60)
  649. KikV = rand(40, 60)
  650. KikDefV = rand(40, 60)
  651. !!parameters
  652. healthV = vitalV * 10 + strenV * 5
  653. formula = 3
  654. amateur = 1
  655. elseif razradKik + razrand = 4:
  656. gs 'npcgeneratec', 0, 'Excellent rival', rand(19,45)
  657. gs 'boyStat', $npclastgenerated
  658. strenV = rand(40, 60)
  659. speedV = rand(40, 60)
  660. agilV = rand(40, 60)
  661. reactV = rand(40, 60)
  662. vitalV = rand(40, 60)
  663. intelV = 10
  664. willV = 10
  665. !!skills
  666. JabV = rand(60, 80)
  667. PunchV = rand(60, 80)
  668. KikV = rand(60, 80)
  669. KikDefV = rand(60, 80)
  670. !!parameters
  671. healthV = vitalV * 10 + strenV * 5
  672. formula = 3
  673. amateur = 1
  674. elseif razradKik + razrand >= 5:
  675. gs 'npcgeneratec', 0, 'Best rival in the gym', rand(19,45)
  676. gs 'boyStat', $npclastgenerated
  677. strenV = rand(60, 100)
  678. speedV = rand(60, 100)
  679. agilV = rand(60, 100)
  680. reactV = rand(60, 100)
  681. vitalV = rand(60, 100)
  682. intelV = 10
  683. willV = 10
  684. !!skills
  685. JabV = rand(80, 110)
  686. PunchV = rand(80, 110)
  687. KikV = rand(80, 110)
  688. KikDefV = rand(80, 110)
  689. !!parameters
  690. healthV = vitalV * 10 + strenV * 5
  691. formula = 3
  692. amateur = 1
  693. end
  694. gt 'kikbox', 'start'
  695. end
  696. end
  697. end
  698. --- fit ---------------------------------