1
0

fit 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774
  1. # fit
  2. CLOSE ALL
  3. if $ARGS[0] = 'start':
  4. cls
  5. minut += 5
  6. frost = 0
  7. gs 'stat'
  8. if night_mode = 1:
  9. fcolor = rgb(255, 255, 255)
  10. bcolor = rgb(0, 0, 0)
  11. lcolor = rgb(106, 90, 205)
  12. else
  13. fcolor = rgb(0, 0, 0)
  14. bcolor = rgb(255, 255, 255)
  15. lcolor = rgb(106, 90, 205)
  16. end
  17. '<center><b><font color="maroon">Fitness Center</font></b></center>'
  18. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/fit.jpg"></center>'
  19. 'This modern and well staffed fitness center provides all the latest equipment and trainers to help you make the most of them.'
  20. *nl
  21. 'Buy subscription for 30 classes (3,000 <b>₽</b>)'
  22. 'You must wear sportswear for all classes.'
  23. if abonement > 0:'Subscription is valid for <<abonement>> more classes.'
  24. act 'Leave':
  25. cla
  26. minut += 5
  27. gt 'down'
  28. end
  29. if money >= 3000:
  30. act 'Buy a subscription (3,000 <b>₽</b>)':
  31. cla
  32. money -= 3000
  33. abonement += 30
  34. 'You bought a subscription for 30 lessons'
  35. act 'Move away from cashier':gt 'fit', 'start'
  36. end
  37. end
  38. if abonement > 0:
  39. act 'Go to the dressing room':
  40. cla
  41. gt 'fit', 'dressing room'
  42. end
  43. end
  44. end
  45. if $ARGS[0] = 'dressing room':
  46. $locM = 'fit'
  47. $metkaM = 'dressing room'
  48. $sexloc = 'fit'
  49. $loc = 'fit'
  50. $metka = 'dressing room'
  51. $location_type = 'private'
  52. cls
  53. gs 'stat'
  54. '<center><b><font color="maroon">Dressing</font></b></center>'
  55. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/razd.jpg"></center>'
  56. 'Classifieds'
  57. 'Recruiting girls for local track team, the winners will receive cash prizes.'
  58. 'Attention, visitors to the sports section must wear suitable clothing.'
  59. ! WD: Uninitialised ~ 'razdrand'
  60. ! if razdrand = 0 and tanznak = 0 and tanday ! daystart:
  61. if tanznak = 0 and tanday ! daystart:
  62. tanday = daystart
  63. 'In the locker room you notice <a href="exec:gt ''fit'', ''fitgirl''">cute girl</a>.'
  64. elseif tanznak = 2:
  65. cls
  66. tanznak = 3
  67. gs 'underwear', 'remove'
  68. gs 'clothing', 'strip'
  69. npc_rel['A218'] += 5
  70. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/razd4.jpg"></center>'
  71. '"You can at least tell me your name, maniac, seeing as you did not even have the decency to do so before you raped me." The girl says, catching her breath.'
  72. '"I am the <<$pcs_nickname>>, and how can I rape someone so keen?" You ask trying to find your panties.'
  73. '"Looking for this?" asks the girl twirling your panties on her finger. "I''m Tanya, and you seduced me, I have never been with a girl before, and with very good reason. I live here with my parents, if you want to come for a visit."'
  74. '"Okay that would be nice, can I have my briefs?" you say holding out your hand.'
  75. '"Nope, no return, there must be something of a momento from my first girl." With these words, Tanya slips your panties in her pocket and leaves.'
  76. act 'Further':gt 'fit', 'dressing room'
  77. exit
  78. end
  79. act 'Take a shower (0:15)':
  80. cla
  81. *clr
  82. minut += 15
  83. pcs_horny += 1
  84. pcs_hairbsh = 0
  85. pcs_makeup = 1
  86. dynamic $showerdin
  87. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  88. 'You go into the bathroom and turn on the shower. You lather your body and wash in the shower.'
  89. act 'Get out of the shower':gt 'fit', 'dressing room'
  90. end
  91. act 'Use mirror':
  92. cla
  93. fitMir = 1
  94. gt 'mirror', 'start'
  95. end
  96. act 'Change clothes':
  97. cla
  98. gt 'clothing_QV', 'gym'
  99. end
  100. act 'Change shoes':
  101. cla
  102. gt 'shoes', 'gym'
  103. end
  104. if $clothingworntype ! $regularwornclothingtype or $regularwornclothingtype ! '': gs 'clothing_QV', 'gym2'
  105. if $shoeworntype ! $regularwornshoetype or $regularwornshoetype ! '': gs 'clothing_QV', 'gym2'
  106. if abonement > 0 and $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and pcs_stam >= 40:
  107. act 'Go to the gym':
  108. cla
  109. gt 'fit', 'gym'
  110. end
  111. act 'Go to the dance studio':
  112. cla
  113. gt 'danceclass'
  114. end
  115. end
  116. if begsec = 0:
  117. act 'Join track team':
  118. cla
  119. *clr
  120. minut += 5
  121. begsec = 1
  122. 'You signed up for the track team.'
  123. act 'Leave':gt 'fit', 'dressing room'
  124. end
  125. elseif $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and pcs_stam >= 40:
  126. act 'Go to team practice':gt 'beg', 'start'
  127. if week = 6 and pcs_run >= 20 and run_comp_day ! daystart:
  128. act '<b>Enter competition race</b>':run_comp_day = daystart & gt 'beg1', 'start'
  129. end
  130. end
  131. act 'Exit the locker room':
  132. if $clothingworntype ! 'nude':
  133. gt 'fit', 'start'
  134. else
  135. cla
  136. msg'<b><font color = red>You need to get dressed.</font></b>'
  137. act 'Return': gt 'fit', 'dressing room'
  138. end
  139. end
  140. end
  141. if $ARGS[0] = 'fitgirl':
  142. 'The girl notices you looking and returns the smile. She undresses and taking some toiletries goes into the shower.'
  143. act 'Turn away':gt 'fit', 'dressing room'
  144. act 'Follow her':
  145. cls
  146. pcs_hairbsh = 0
  147. pcs_makeup = 1
  148. dynamic $showerdin
  149. shovertania += 1
  150. gs 'stat'
  151. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  152. 'There''s no one in the shower, except this girl. The girl looks around and seeing you smiles again then turns away.'
  153. if pcs_dom > 10:
  154. act 'Molest her':
  155. cla
  156. *clr
  157. tanday = daystart
  158. gs 'stat'
  159. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/razd1.jpg"></center>'
  160. 'You walk up to a girl and place one hand on her buttock, she turns to face you.'
  161. gs 'arousal', 'foreplay', 5, 'dom', 'lesbian'
  162. gs 'stat'
  163. if pcs_apprnc < 80:
  164. '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.'
  165. act 'Go':gt 'fit', 'dressing room'
  166. elseif pcs_apprnc >= 80:
  167. 'The girl grabs your hand squeezing her ass, but stops for a moment considering you. She probably expected to see a guy and isn''t sure what to do.'
  168. act 'Take advantage of the confusion':
  169. cla
  170. *clr
  171. gs 'stat'
  172. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/razd2.jpg"></center>'
  173. 'While she is trying to understand what is happening you pull up her shirt and begin fondling her nipples with your tongue, and then her hand strokes your ass.'
  174. gs 'arousal', 'foreplay', 10, 'dom', 'lesbian'
  175. gs 'stat'
  176. act 'Further':tanznak = 1 & gt 'lezbsex', 'start'
  177. end
  178. act 'Wait for her reaction':
  179. cls
  180. gs 'stat'
  181. if pcs_apprnc < 120:
  182. 'The girl smiles at you, but removes your hand and leaves, blowing you a kiss.'
  183. act '...':gt 'fit', 'dressing room'
  184. elseif pcs_apprnc >= 120:
  185. cla
  186. *clr
  187. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/razd3.jpg"></center>'
  188. 'The girl presses up to you even stronger and kisses your lips.'
  189. gs 'arousal', 'kiss', 5, 'dom', 'lesbian'
  190. gs 'stat'
  191. act 'Further':
  192. tanznak = 1
  193. gt 'lezbsex', 'start'
  194. end
  195. end
  196. end
  197. end
  198. end
  199. end
  200. act 'Leave the shower':gt 'fit', 'dressing room'
  201. end
  202. end
  203. if $ARGS[0] = 'gym':
  204. cls
  205. minut += 5
  206. sportzalrand = RAND(0,20)
  207. gs 'stat'
  208. if night_mode = 1:
  209. fcolor = rgb(255, 255, 255)
  210. bcolor = rgb(0, 0, 0)
  211. lcolor = rgb(106, 90, 205)
  212. else
  213. fcolor = rgb(0, 0, 0)
  214. bcolor = rgb(255, 255, 255)
  215. lcolor = rgb(106, 90, 205)
  216. end
  217. '<center><b><font color="maroon">Fitness Center</font></b></center>'
  218. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/fit.jpg"></center>'
  219. 'In the fitness center there are a lot of different classes and clubs, designed to improve physical development.'
  220. if StoryLine = 1:
  221. 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.'
  222. 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>'
  223. end
  224. gs 'fit', 'exercise end'
  225. act 'Aerobics (Burn fat)':
  226. cla
  227. *clr
  228. abonement -= 1
  229. timemult = 2
  230. loopcount = 1
  231. :timeloop1
  232. gs 'exercise', 'tier3', 0, 'vital_exp', 'react_exp'
  233. if loopcount < timemult: loopcount += 1 & jump 'timeloop1'
  234. loopcount = 0
  235. timemult = 0
  236. '<center><img <<$set_imgh>> src="images/locations/shared/gym/fit1.jpg"></center>'
  237. 'You do very vigorous exercises to the music, and burn some fat.'
  238. if pcs_stam < 30:
  239. *nl
  240. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  241. gs 'fit', 'exercise end'
  242. else
  243. act'Continue': gt 'fit', 'gym'
  244. end
  245. end
  246. act 'Free weights (Build muscle)':
  247. cla
  248. *clr
  249. abonement -= 1
  250. timemult = 2
  251. loopcount = 1
  252. :timeloop2
  253. gs 'exercise', 'tier3', 0, 'stren_exp'
  254. if loopcount < timemult: loopcount += 1 & jump 'timeloop2'
  255. loopcount = 0
  256. timemult = 0
  257. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit2.jpg"></center>'
  258. 'You pump iron, building strength.'
  259. if pcs_stam < 30:
  260. *nl
  261. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  262. gs 'fit', 'exercise end'
  263. else
  264. act'Continue': gt 'fit', 'gym'
  265. end
  266. end
  267. act 'Cross trainer (endurance)':
  268. cla
  269. *clr
  270. abonement -= 1
  271. timemult = 2
  272. loopcount = 1
  273. :timeloop3
  274. gs 'exercise', 'tier3', 0, 'vital_exp'
  275. if loopcount < timemult: loopcount += 1 & jump 'timeloop3'
  276. loopcount = 0
  277. timemult = 0
  278. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit3.jpg"></center>'
  279. 'You spend a half hour doing reps on the cross trainer developing your endurance.'
  280. if pcs_stam < 30:
  281. *nl
  282. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  283. gs 'fit', 'exercise end'
  284. else
  285. act'Continue': gt 'fit', 'gym'
  286. end
  287. end
  288. act 'Tennis practice (agility)':
  289. cla
  290. *clr
  291. abonement -= 1
  292. timemult = 2
  293. loopcount = 1
  294. :timeloop4
  295. gs 'exercise', 'tier3', 0, 'agil_exp'
  296. if loopcount < timemult: loopcount += 1 & jump 'timeloop4'
  297. loopcount = 0
  298. timemult = 0
  299. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit4.jpg"></center>'
  300. 'You run tennis exercises, concentrating on defensive drills.'
  301. if pcs_stam < 30:
  302. *nl
  303. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  304. gs 'fit', 'exercise end'
  305. else
  306. act'Continue': gt 'fit', 'gym'
  307. end
  308. end
  309. act 'Tennis practice (reactions)':
  310. cla
  311. *clr
  312. abonement -= 1
  313. timemult = 2
  314. loopcount = 1
  315. :timeloop5
  316. gs 'exercise', 'tier3', 0, 'react_exp'
  317. if loopcount < timemult: loopcount += 1 & jump 'timeloop5'
  318. loopcount = 0
  319. timemult = 0
  320. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit4.jpg"></center>'
  321. 'You run tennis exercises, concentrating on court reactions.'
  322. if pcs_stam < 30:
  323. *nl
  324. 'You are too tired to do any more exercise and will have to rest and regain some stamina.'
  325. gs 'fit', 'exercise end'
  326. else
  327. act'Continue': gt 'fit', 'gym'
  328. end
  329. end
  330. act 'Goto the kickboxing gym':gt 'fit', 'kickboxing'
  331. end
  332. if $ARGS[0] = 'exercise end':
  333. RESULT = rand(0, 19)
  334. act 'Leave':
  335. if RESULT = 0:
  336. cla
  337. *clr
  338. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal1.jpg"></center>'
  339. 'You see a nice guy on the weight machine.'
  340. act 'Continue':gt 'fit', 'dressing room'
  341. if pcs_dom > 0:
  342. act 'Flirt':
  343. cla
  344. *clr
  345. guy += 1
  346. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  347. gs 'boyStat', $npclastgenerated
  348. samecount = 1
  349. picrand = 17
  350. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal2.jpg"></center>'
  351. '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.'
  352. gs 'arousal', 'foreplay', 10, 'dom'
  353. gs 'stat'
  354. act 'Suck':gt 'sex', 'minet'
  355. end
  356. end
  357. elseif RESULT = 1:
  358. cla
  359. *clr
  360. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal3.jpg"></center>'
  361. 'As you finish training, a guy sits behind, caresses your breasts and kisses your ear, sucking the lobe.'
  362. if pcs_dom > 0:act 'Hit him in the balls':pcs_dom += 1 & gt 'fit', 'dressing room'
  363. act 'Enjoy':
  364. cla
  365. *clr
  366. guy += 1
  367. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  368. gs 'boyStat', $npclastgenerated
  369. picrand = 18
  370. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal4.jpg"></center>'
  371. '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.'
  372. gs 'arousal', 'foreplay', 15, 'sub'
  373. gs 'stat'
  374. act 'Suck':gt 'sex', 'minet'
  375. end
  376. elseif RESULT = 2:
  377. cla
  378. 'As you finish training, a fit girl offers to play a little squash with her as she waits for her boyfriend to came.'
  379. act 'Refuse':gt 'fit', 'dressing room'
  380. act 'Agree':
  381. cla
  382. *clr
  383. picrand = 15
  384. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal5.jpg"></center>'
  385. '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.'
  386. '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.'
  387. '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.'
  388. act 'Escape from these perverts':gt 'fit', 'dressing room'
  389. act 'Enjoy':
  390. guy += 1
  391. girl += 1
  392. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  393. gs 'boyStat', $npclastgenerated
  394. gt 'podrsex', 'suck'
  395. gs 'arousal', 'foreplay', 15, 'group', 'lesbian'
  396. gs 'stat'
  397. end
  398. end
  399. elseif RESULT = 3:
  400. cla
  401. *clr
  402. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal6.jpg"></center>'
  403. 'You train near to a girl and engage in conversation, two guys obviously take you for girlfriends and try to chat you up.'
  404. act 'Continue':gt 'fit', 'dressing room'
  405. act 'Flirt back':
  406. cla
  407. *clr
  408. picrand = 12
  409. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal7.jpg"></center>'
  410. '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.'
  411. act 'Leave':gt 'fit', 'dressing room'
  412. act 'Suck':
  413. guy += 2
  414. girl += 1
  415. gang += 1
  416. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  417. gs 'boyStat', $npclastgenerated
  418. gs 'npcgeneratec', 0, 'guy from the gym', rand(19,45)
  419. gs 'boyStat', $npclastgenerated, 'a'
  420. gs 'arousal', 'bj', 15, 'group', 'lesbian'
  421. gs 'stat'
  422. gt 'sexdvanadva', 'var'
  423. end
  424. end
  425. else
  426. gt 'fit', 'dressing room'
  427. end
  428. end
  429. end
  430. if $ARGS[0] = 'kickboxing':
  431. cla
  432. clr
  433. *clr
  434. minut += 5
  435. gs 'stat'
  436. gs 'razrKik'
  437. if night_mode = 1:
  438. fcolor = rgb(255, 255, 255)
  439. bcolor = rgb(0, 0, 0)
  440. lcolor = rgb(106, 90, 205)
  441. else
  442. fcolor = rgb(0, 0, 0)
  443. bcolor = rgb(255, 255, 255)
  444. lcolor = rgb(106, 90, 205)
  445. end
  446. '<center><b><font color="maroon">Kickboxing Gym</font></b></center>'
  447. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik.jpg"></center>'
  448. act 'Work on your jabs':
  449. cla
  450. *clr
  451. abonement -= 1
  452. timemult = 2
  453. loopcount = 1
  454. :timeloop6
  455. gs 'exercise', 'tier3', 0, 'jab_exp', 'react_exp'
  456. if loopcount < timemult: loopcount += 1 & jump 'timeloop6'
  457. loopcount = 0
  458. timemult = 0
  459. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  460. '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.'
  461. act 'Leave':gt 'fit', 'dressing room'
  462. end
  463. act 'Work on your heavy punches':
  464. cla
  465. *clr
  466. abonement -= 1
  467. timemult = 2
  468. loopcount = 1
  469. :timeloop7
  470. gs 'exercise', 'tier3', 0, 'stren_exp', 'punch_exp'
  471. if loopcount < timemult: loopcount += 1 & jump 'timeloop7'
  472. loopcount = 0
  473. timemult = 0
  474. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  475. 'You practice your power punches on the heavy bag. These are high impact and powerful, but they are hard to get to their target.'
  476. act 'Leave':gt 'fit', 'dressing room'
  477. end
  478. act 'Work on your kicking':
  479. cla
  480. *clr
  481. abonement -= 1
  482. timemult = 2
  483. loopcount = 1
  484. :timeloop8
  485. gs 'exercise', 'tier3', 0, 'stren_exp', 'kick_exp'
  486. if loopcount < timemult: loopcount += 1 & jump 'timeloop8'
  487. loopcount = 0
  488. timemult = 0
  489. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  490. '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.'
  491. act 'Leave':gt 'fit', 'dressing room'
  492. end
  493. act 'Work on defence':
  494. cla
  495. *clr
  496. abonement -= 1
  497. timemult = 2
  498. loopcount = 1
  499. :timeloop9
  500. gs 'exercise', 'tier3', 0, 'def_exp', 'agil_exp'
  501. if loopcount < timemult: loopcount += 1 & jump 'timeloop9'
  502. loopcount = 0
  503. timemult = 0
  504. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/kickboxing/kik1.jpg"></center>'
  505. 'You practice your defense movements.'
  506. act 'Leave':gt 'fit', 'dressing room'
  507. end
  508. act 'Sparing (training bout in the ring)':
  509. cla
  510. *clr
  511. 'You need to choose a partner for sparring'
  512. act 'Pick a random partner':
  513. abonement -= 1
  514. pcs_mood += 2
  515. timemult = 2
  516. loopcount = 1
  517. :timeloop10
  518. gs 'exercise', 'tier3', 0, 'jab_exp', 'punch_exp', 'kick_exp', 'def_exp'
  519. if loopcount < timemult: loopcount += 1 & jump 'timeloop10'
  520. loopcount = 0
  521. timemult = 0
  522. pointKik = 0
  523. pointKikV = 0
  524. round = 1
  525. minround = 0
  526. gs 'npcgeneratec', 0, 'sparring partner', rand(19,45)
  527. gs 'boyStat', $npclastgenerated
  528. strenV = rand(10, 20)
  529. speedV = rand(10, 20)
  530. agilV = rand(10, 20)
  531. reactV = rand(10, 20)
  532. vitalV = rand(10, 20)
  533. intelV = 10
  534. willV = 10
  535. !!skills
  536. JabV = rand(5, 20)
  537. PunchV = rand(5, 20)
  538. KikV = rand(5, 20)
  539. KikDefV = rand(5, 20)
  540. !!parameters
  541. healthV = vitalV * 10 + strenV * 5
  542. formula = 3
  543. sparing = 1
  544. gt 'kikbox', 'start'
  545. end
  546. end
  547. if week >= 5 and amateur_fight_day ! daystart:
  548. 'You can take part in an amateur fight.'
  549. act 'Amateur fight':
  550. amateur_fight_day = daystart
  551. pcs_mood += 2
  552. timemult = 2
  553. loopcount = 1
  554. :timeloop11
  555. gs 'exercise', 'tier3', 0, 'jab_exp', 'punch_exp', 'kick_exp', 'def_exp'
  556. if loopcount < timemult: loopcount += 1 & jump 'timeloop11'
  557. loopcount = 0
  558. timemult = 0
  559. pointKik = 0
  560. pointKikV = 0
  561. round = 1
  562. minround = 0
  563. razrand = rand(0, 1)
  564. if razradKik + razrand = 0:
  565. gs 'npcgeneratec', 0, 'useless rival', rand(19,45)
  566. gs 'boyStat', $npclastgenerated
  567. strenV = rand(10, 20)
  568. speedV = rand(10, 20)
  569. agilV = rand(10, 20)
  570. reactV = rand(10, 20)
  571. vitalV = rand(10, 20)
  572. intelV = 10
  573. willV = 10
  574. !!skills
  575. JabV = rand(10, 30)
  576. PunchV = rand(10, 30)
  577. KikV = rand(10, 30)
  578. KikDefV = rand(10, 30)
  579. !!parameters
  580. healthV = vitalV * 10 + strenV * 5
  581. formula = 3
  582. amateur = 1
  583. elseif razradKik + razrand = 1:
  584. gs 'npcgeneratec', 0, '3rd class rival', rand(19,45)
  585. gs 'boyStat', $npclastgenerated
  586. strenV = rand(15, 25)
  587. speedV = rand(15, 25)
  588. agilV = rand(15, 25)
  589. reactV = rand(15, 25)
  590. vitalV = rand(15, 25)
  591. intelV = 10
  592. willV = 10
  593. !!skills
  594. JabV = rand(15, 35)
  595. PunchV = rand(15, 35)
  596. KikV = rand(15, 35)
  597. KikDefV = rand(15, 35)
  598. !!parameters
  599. healthV = vitalV * 10 + strenV * 5
  600. formula = 3
  601. amateur = 1
  602. elseif razradKik + razrand = 2:
  603. gs 'npcgeneratec', 0, '2rd class rival', rand(19,45)
  604. gs 'boyStat', $npclastgenerated
  605. strenV = rand(20, 30)
  606. speedV = rand(20, 30)
  607. agilV = rand(20, 30)
  608. reactV = rand(20, 30)
  609. vitalV = rand(20, 30)
  610. intelV = 10
  611. willV = 10
  612. !!skills
  613. JabV = rand(30, 50)
  614. PunchV = rand(30, 50)
  615. KikV = rand(30, 50)
  616. KikDefV = rand(30, 50)
  617. !!parameters
  618. healthV = vitalV * 10 + strenV * 5
  619. formula = 3
  620. amateur = 1
  621. elseif razradKik + razrand = 3:
  622. gs 'npcgeneratec', 0, '1st class rival', rand(19,45)
  623. gs 'boyStat', $npclastgenerated
  624. strenV = rand(30, 40)
  625. speedV = rand(30, 40)
  626. agilV = rand(30, 40)
  627. reactV = rand(30, 40)
  628. vitalV = rand(30, 40)
  629. intelV = 10
  630. willV = 10
  631. !!skills
  632. JabV = rand(40, 60)
  633. PunchV = rand(40, 60)
  634. KikV = rand(40, 60)
  635. KikDefV = rand(40, 60)
  636. !!parameters
  637. healthV = vitalV * 10 + strenV * 5
  638. formula = 3
  639. amateur = 1
  640. elseif razradKik + razrand = 4:
  641. gs 'npcgeneratec', 0, 'excellent rival', rand(19,45)
  642. gs 'boyStat', $npclastgenerated
  643. strenV = rand(40, 60)
  644. speedV = rand(40, 60)
  645. agilV = rand(40, 60)
  646. reactV = rand(40, 60)
  647. vitalV = rand(40, 60)
  648. intelV = 10
  649. willV = 10
  650. !!skills
  651. JabV = rand(60, 80)
  652. PunchV = rand(60, 80)
  653. KikV = rand(60, 80)
  654. KikDefV = rand(60, 80)
  655. !!parameters
  656. healthV = vitalV * 10 + strenV * 5
  657. formula = 3
  658. amateur = 1
  659. elseif razradKik + razrand >= 5:
  660. gs 'npcgeneratec', 0, 'best rival in the gym', rand(19,45)
  661. gs 'boyStat', $npclastgenerated
  662. strenV = rand(60, 100)
  663. speedV = rand(60, 100)
  664. agilV = rand(60, 100)
  665. reactV = rand(60, 100)
  666. vitalV = rand(60, 100)
  667. intelV = 10
  668. willV = 10
  669. !!skills
  670. JabV = rand(80, 110)
  671. PunchV = rand(80, 110)
  672. KikV = rand(80, 110)
  673. KikDefV = rand(80, 110)
  674. !!parameters
  675. healthV = vitalV * 10 + strenV * 5
  676. formula = 3
  677. amateur = 1
  678. end
  679. gt 'kikbox', 'start'
  680. end
  681. end
  682. end
  683. --- fit ---------------------------------