1
0

fit 17 KB

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