fit 21 KB

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