fit 20 KB

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