1
0

fit 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631
  1. # fit
  2. if $ARGS[0] = 'start':
  3. cla
  4. clr
  5. *clr
  6. minut += 5
  7. gs 'stat'
  8. fcolor = rgb(0, 0, 0)
  9. bcolor = rgb(255, 255, 255)
  10. lcolor = rgb(106, 90, 205)
  11. '<center><b><font color="maroon">Fitness Center</font></b></center>'
  12. '<center><img src="images/etogame/fit.jpg"></center>'
  13. 'Subscribe to the 30 classes worth 3,000 rubles'
  14. 'Be sure to come to class in sportswear.'
  15. if abonement > 0:'Subscription is valid for <<abonement>> Occupation'
  16. act 'Leave':
  17. cla
  18. minut += 5
  19. gt 'down'
  20. end
  21. if money >= 3000:
  22. act 'Buy a subscription (3,000 rubles)':
  23. cla
  24. money -= 3000
  25. abonement += 30
  26. 'You bought a ticket for 30 lessons'
  27. act 'Move away from cash':gt 'fit', 'start'
  28. end
  29. end
  30. if abonement > 0 and fitday ! day:
  31. act 'Walk in dressing room':
  32. cla
  33. frost = 0
  34. abonement -= 1
  35. fitday = day
  36. razdtumbler = 1
  37. gt 'fit', 'dressing room'
  38. end
  39. end
  40. end
  41. if $ARGS[0] = 'dressing room':
  42. $metkaM = $ARGS[0]
  43. $locM = $CURLOC
  44. $sexloc = $CURLOC
  45. $loc = $CURLOC
  46. $metka = $ARGS[0]
  47. clr
  48. minut += 5
  49. gs 'stat'
  50. '<center><b><font color="maroon">Dressing</font></b></center>'
  51. '<center><img src="images/etogame/razd.jpg"></center>'
  52. 'Classifieds'
  53. 'Recruited girls section races, the winners of the competition receive cash prizes.'
  54. 'Attention, visit the sports section razreshaetsya only with tracksuits.'
  55. if razdrand = 0 and tanznak = 0 and tanday ! day:
  56. tanday = day
  57. 'In the locker room you notice <a href="exec:gt ''fitgirl''">cute girl</a>.'
  58. elseif tanznak = 2:
  59. cls
  60. tanznak = 3
  61. tanga = 0
  62. gs 'clothing', 'strip'
  63. tanya += 5
  64. '<center><img src="images/img/centr/razd4.jpg"></center>'
  65. '"You at least as name, maniac, and then raped her and Chesney did not even had the" asked the girl caught her breath.'
  66. '"I am the <<$name>>, and I will not rape you herself was not against" you said trying to find the eyes of her panties.'
  67. '"Looking for this?" asked the girl twirling on his finger your panties "I''m Tanya, and yet you seduced me, I did not have before the girls, and as it turned out a very good reason, I live here with my parents, if you want to come for a visit."'
  68. '"Okay as anything the race, briefs is true" you said holding out his hand.'
  69. '"Nope, do not return, there must me something to stay on the memory of the first girl." With these words, Tanya slipped your panties in his pocket and left.'
  70. act 'Further':gt 'fit', 'dressing room'
  71. exit
  72. end
  73. if begsec = 0:
  74. act 'Join section running':
  75. cla
  76. *clr
  77. minut += 5
  78. begsec = 1
  79. 'You signed up for the run section.'
  80. act 'Leave':gt 'fit', 'dressing room'
  81. end
  82. elseif razdtumbler = 1 and sport > 0:
  83. act 'Go to section':gt 'beg', 'start'
  84. if week = 6 and beg >= 20:act '<b>Competitions on the run</b>':gt 'beg1', 'start'
  85. end
  86. act 'Take a shower (0:15)':
  87. cla
  88. *clr
  89. minut += 15
  90. sweat = -3
  91. horny += 1
  92. hapri = 0
  93. mop = 1
  94. dynamic $showerdin
  95. '<center><img src="images/pics/dush.jpg"></center>'
  96. 'You got into the bathroom and turned on the shower. Lathered body and washed off in the shower.'
  97. act 'Get out of the shower':gt 'fit', 'dressing room'
  98. end
  99. act 'Mirror':
  100. cla
  101. fitMir = 1
  102. gt 'mirror', 'start'
  103. end
  104. act 'Cabinet':
  105. cla
  106. gt 'clothing', 'view_clothing_list', 'wardrobe'
  107. end
  108. if razdtumbler = 1 and sport > 0:
  109. act 'Go to the gym':
  110. cla
  111. gt 'fit', 'gym'
  112. end
  113. act 'Go to the dance studio.':
  114. cla
  115. gt 'danceclass'
  116. end
  117. elseif razdtumbler = 0 or sport = 0:
  118. act 'Exit of the locker room':
  119. cla
  120. gt 'fit', 'start'
  121. end
  122. end
  123. end
  124. if $ARGS[0] = 'fitgirl':
  125. 'Girl notices your look and smile turns. Girl undressing and taking toiletries goes into the shower.'
  126. act 'Turn away':gt 'fit', 'dressing room'
  127. act 'Walk into the shower behind the girl':
  128. cls
  129. minut += 15
  130. sweat = -3
  131. horny += 1
  132. hapri = 0
  133. mop = 1
  134. dynamic $showerdin
  135. shovertania += 1
  136. gs 'stat'
  137. '<center><img src="images/pics/dush.jpg"></center>'
  138. 'Logged-in shower. There''s no one, except this girl. The girl looked around and see you smile again turned away.'
  139. if dom > 10:
  140. act 'Molest':
  141. cla
  142. *clr
  143. tanday = day
  144. gs 'stat'
  145. '<center><img src="images/img/centr/razd1.jpg"></center>'
  146. 'You walk up to a girl and vskhvativ one hand on the buttock deploy to face you.'
  147. if vnesh < 20:
  148. 'Girl puts you off, and shouting something about you and all your other relative, out of the locker room.'
  149. act '...':gt 'fit', 'dressing room'
  150. elseif vnesh >= 20:
  151. 'Girl vskhvatila your hand squeezing her ass, but stopped for a moment considering you, she probably expected to see a guy or girl does.'
  152. act 'Take advantage of the confusion':
  153. cla
  154. *clr
  155. gs 'stat'
  156. '<center><img src="images/img/centr/razd2.jpg"></center>'
  157. 'While she was trying to understand what is happening you pulled up her shirt and began to fondle her nipples tongue, and now her hand stroking your buttocks'
  158. act 'Further':tanznak = 1 & gt 'lezbsex', 'start'
  159. end
  160. act 'Wait for her reaction':
  161. cls
  162. gs 'stat'
  163. if vnesh < 30:
  164. 'Girl smiling at you, but removes your hand and leaves, sending you a kiss.'
  165. act '...':gt 'fit', 'dressing room'
  166. elseif vnesh >= 30:
  167. cla
  168. *clr
  169. '<center><img src="images/img/centr/razd3.jpg"></center>'
  170. 'The girl pressed to you even stronger and kisses your lips.'
  171. act 'Further':
  172. tanznak = 1
  173. gt 'lezbsex', 'start'
  174. end
  175. end
  176. end
  177. end
  178. end
  179. end
  180. act 'Out of the shower':gt 'fit', 'dressing room'
  181. end
  182. end
  183. if $ARGS[0] = 'gym':
  184. cla
  185. clr
  186. *clr
  187. minut += 5
  188. razdtumbler = 0
  189. gs 'stat'
  190. fcolor = rgb(0, 0, 0)
  191. bcolor = rgb(255, 255, 255)
  192. lcolor = rgb(106, 90, 205)
  193. '<center><b><font color="maroon">Fitness Center</font></b></center>'
  194. '<center><img src="images/etogame/fit.jpg"></center>'
  195. 'In the fitness center a lot of different programs for the physical development of the organism.'
  196. act 'Aerobics (Squeegee fat)':
  197. cla
  198. *clr
  199. minut += 120
  200. fat -= 10
  201. reakt += rand(1, 3)
  202. manna -= 5
  203. sweat += 3
  204. '<center><img src="images/etogame/fit1.jpg"></center>'
  205. 'You are very vigorously the exercises for the music ebbs fat.'
  206. gs 'fit', 'exercise end'
  207. end
  208. act 'Trenazhorka (in force)':
  209. cla
  210. *clr
  211. minut += 120
  212. stren += rand(1, 3)
  213. fat -= 1
  214. manna -= 5
  215. sweat += 3
  216. '<center><img src="images/etogame/fit2.jpg"></center>'
  217. 'Did you do with iron for strength.'
  218. gs 'fit', 'exercise end'
  219. end
  220. act 'Trenazhorka (endurance)':
  221. cla
  222. *clr
  223. minut += 120
  224. vital += rand(1, 3)
  225. manna -= 5
  226. fat -= 2
  227. sweat += 3
  228. '<center><img src="images/etogame/fit3.jpg"></center>'
  229. 'Trainers were you doing on the development of endurance.'
  230. gs 'fit', 'exercise end'
  231. end
  232. act 'Tennis testing of protection (skill)':
  233. cla
  234. *clr
  235. minut += 120
  236. agil += rand(1, 3)
  237. fat -= 5
  238. manna -= 5
  239. sweat += 3
  240. TenisDef += 1
  241. '<center><img src="images/etogame/fit4.jpg"></center>'
  242. 'You do tennis practicing defensive actions.'
  243. gs 'fit', 'exercise end'
  244. end
  245. act 'Tennis working out attacks (velocity)':
  246. cla
  247. *clr
  248. minut += 120
  249. speed += rand(1, 3)
  250. manna -= 5
  251. fat -= 5
  252. sweat += 3
  253. TenisAt += 1
  254. '<center><img src="images/etogame/fit4.jpg"></center>'
  255. 'You do practicing tennis attacking actions.'
  256. gs 'fit', 'exercise end'
  257. end
  258. act 'Section kickboxing':gt 'fit', 'kickboxing'
  259. end
  260. if $ARGS[0] = 'exercise end':
  261. RESULT = rand(0, 19)
  262. act 'Further':
  263. if RESULT = 0:
  264. cla
  265. *clr
  266. '<center><img src="images/img/centr/zal1.jpg"></center>'
  267. 'Next to you has been a nice guy.'
  268. act 'Leave':gt 'fit', 'dressing room'
  269. if dom > 0:
  270. act 'Covet':
  271. cla
  272. *clr
  273. guy += 1
  274. picrand = 17
  275. '<center><img src="images/img/centr/zal2.jpg"></center>'
  276. 'You go up to the guy lying on the simulator, squats and start stroking his cock through his pants, man rises kisses you on the lips, then lower a little pants releasing his impressive size dildo.'
  277. act 'Suck':gt 'sex', 'minet'
  278. end
  279. end
  280. elseif RESULT = 1:
  281. cla
  282. *clr
  283. '<center><img src="images/img/centr/zal3.jpg"></center>'
  284. 'Until you do, you and the guy behind suitable vskhvativ you kissing his chest in his ear, sucking the lobe.'
  285. if dom > 0:act 'Hit him in the balls':gt 'fit', 'dressing room'
  286. act 'Enjoy':
  287. cla
  288. *clr
  289. guy += 1
  290. picrand = 18
  291. '<center><img src="images/img/centr/zal4.jpg"></center>'
  292. 'Guy passes you, pulls out his cock and it lays down on your chest, moving eventually head to your mouth.'
  293. act 'Suck':gt 'sex', 'minet'
  294. end
  295. elseif RESULT = 2:
  296. cla
  297. 'Until you do, you fit girl and offers to play squash with her until her boyfriend came.'
  298. act 'Refuse':gt 'fit', 'dressing room'
  299. act 'Agree':
  300. cla
  301. *clr
  302. picrand = 15
  303. '<center><img src="images/img/centr/zal5.jpg"></center>'
  304. 'You play fun playing with a girl, you, as well, and it is obtained is bad enough, but it just amuses you. After some time, it appears as a man and looking at your clumsy attempts nachinnaet show how to play correctly. He comes to you from behind priobnimaet and one hand on to your hand with roketkoy shows how to beat, and the second hand starts stroking your hips gradually approaching the perineum. You feel like you are in the back rests his cock looking at her, you know that she understands what is going on and wants to not less than men.'
  305. act 'Send perverts':gt 'fit', 'dressing room'
  306. act 'Enjoy':
  307. guy += 1
  308. girl += 1
  309. gt 'podrsex', 'var'
  310. end
  311. end
  312. elseif RESULT = 3:
  313. cla
  314. *clr
  315. '<center><img src="images/img/centr/zal6.jpg"></center>'
  316. 'Near you engaged hedgehog one girl to suit you two guys obviously took you for girlfriends and try to start a conversation.'
  317. act 'Send':gt 'fit', 'dressing room'
  318. act 'Flirt':
  319. cla
  320. *clr
  321. picrand = 12
  322. '<center><img src="images/img/centr/zal7.jpg"></center>'
  323. 'You chat with a guy, and you notice that he was very excited and constantly glancing behind you, turning you see that the girl is already on his haunches and with gusto sucking the second guy.'
  324. act 'Leave':gt 'fit', 'dressing room'
  325. act 'Suck':
  326. guy += 2
  327. girl += 1
  328. gang += 1
  329. gt 'sexdvanadva', 'var'
  330. end
  331. end
  332. else
  333. cla
  334. 'You finish up your exercises and prepare to leave.'
  335. act 'Leave':gt 'fit', 'dressing room'
  336. end
  337. end
  338. end
  339. if $ARGS[0] = 'kickboxing':
  340. cla
  341. clr
  342. *clr
  343. minut += 5
  344. gs 'stat'
  345. gs 'razrKik'
  346. fcolor = rgb(0, 0, 0)
  347. bcolor = rgb(255, 255, 255)
  348. lcolor = rgb(106, 90, 205)
  349. '<center><b><font color="maroon">Kickboxing Section</font></b></center>'
  350. '<center><img src="images/etogame/kik.jpg"></center>'
  351. act 'Testing jabs on pear':
  352. cla
  353. *clr
  354. minut += 120
  355. speed += rand(1, 3)
  356. manna -= 5
  357. fat -= 4
  358. sweat += 3
  359. Jab += rand(1, 3)
  360. '<center><img src="images/etogame/kik1.jpg"></center>'
  361. 'You practiced on pear jab, straight punches with long step forward. These strikes are not so powerful as the police, but they are faster.'
  362. act 'Leave':gt 'fit', 'dressing room'
  363. end
  364. act 'Testing power beats on a pear':
  365. cla
  366. *clr
  367. minut += 120
  368. stren += rand(1, 3)
  369. manna -= 5
  370. fat -= 4
  371. sweat += 3
  372. Punch += rand(1, 3)
  373. '<center><img src="images/etogame/kik1.jpg"></center>'
  374. 'You practiced on pear powerful force capable of hitting an opponent shake. These impacts are powerful, but they are hard to get.'
  375. act 'Leave':gt 'fit', 'dressing room'
  376. end
  377. act 'Testing of kicks':
  378. cla
  379. *clr
  380. minut += 120
  381. stren += rand(1, 3)
  382. manna -= 5
  383. fat -= 4
  384. sweat += 3
  385. Kik += rand(1, 3)
  386. '<center><img src="images/etogame/kik1.jpg"></center>'
  387. 'You practiced on pear powerful kicks able to cut down an opponent. These impacts are powerful, but are very difficult to hit.'
  388. act 'Leave':gt 'fit', 'dressing room'
  389. end
  390. act 'Testing of protection':
  391. cla
  392. *clr
  393. minut += 120
  394. agil += rand(1, 3)
  395. manna -= 5
  396. fat -= 4
  397. sweat += 3
  398. KikDef += rand(1, 3)
  399. '<center><img src="images/etogame/kik1.jpg"></center>'
  400. 'You practiced defense movements.'
  401. act 'Leave':gt 'fit', 'dressing room'
  402. end
  403. act 'Sparing (training bout in the ring)':
  404. cla
  405. *clr
  406. round = 0
  407. 'You need to choose a rival for sparring'
  408. act 'Rival':
  409. minut += 120
  410. manna -= 5
  411. fat -= 4
  412. sweat += 3
  413. strenV = rand(10, 20)
  414. speedV = rand(10, 20)
  415. agilV = rand(10, 20)
  416. reactV = rand(10, 20)
  417. vitalV = rand(10, 20)
  418. intelV = 10
  419. willV = 10
  420. !!skills
  421. JabV = rand(5, 20)
  422. PunchV = rand(5, 20)
  423. KikV = rand(5, 20)
  424. KikDefV = rand(5, 20)
  425. !!parameters
  426. healthV = vitalV * 10 + strenV * 5
  427. $nameV = 'Sparring partner'
  428. formula = 3
  429. sparing = 1
  430. gt 'kikbox', 'start'
  431. end
  432. end
  433. if week >= 5:
  434. 'You can spend an amateur fight.'
  435. act 'Amateur fight':
  436. round = 0
  437. minut += 120
  438. manna -= 5
  439. fat -= 4
  440. sweat += 3
  441. razrand = rand(0, 1)
  442. if razradKik + razrand = 0:
  443. strenV = rand(10, 20)
  444. speedV = rand(10, 20)
  445. agilV = rand(10, 20)
  446. reactV = rand(10, 20)
  447. vitalV = rand(10, 20)
  448. intelV = 10
  449. willV = 10
  450. !!skills
  451. JabV = rand(10, 30)
  452. PunchV = rand(10, 30)
  453. KikV = rand(10, 30)
  454. KikDefV = rand(10, 30)
  455. !!parameters
  456. healthV = vitalV * 10 + strenV * 5
  457. $nameV = 'Rival without discharge'
  458. formula = 3
  459. amateur = 1
  460. elseif razradKik + razrand = 1:
  461. strenV = rand(15, 25)
  462. speedV = rand(15, 25)
  463. agilV = rand(15, 25)
  464. reactV = rand(15, 25)
  465. vitalV = rand(15, 25)
  466. intelV = 10
  467. willV = 10
  468. !!skills
  469. JabV = rand(15, 35)
  470. PunchV = rand(15, 35)
  471. KikV = rand(15, 35)
  472. KikDefV = rand(15, 35)
  473. !!parameters
  474. healthV = vitalV * 10 + strenV * 5
  475. $nameV = 'Rival c third discharge'
  476. formula = 3
  477. amateur = 1
  478. elseif razradKik + razrand = 2:
  479. strenV = rand(20, 30)
  480. speedV = rand(20, 30)
  481. agilV = rand(20, 30)
  482. reactV = rand(20, 30)
  483. vitalV = rand(20, 30)
  484. intelV = 10
  485. willV = 10
  486. !!skills
  487. JabV = rand(30, 50)
  488. PunchV = rand(30, 50)
  489. KikV = rand(30, 50)
  490. KikDefV = rand(30, 50)
  491. !!parameters
  492. healthV = vitalV * 10 + strenV * 5
  493. $nameV = 'Rival co second discharge'
  494. formula = 3
  495. amateur = 1
  496. elseif razradKik + razrand = 3:
  497. strenV = rand(30, 40)
  498. speedV = rand(30, 40)
  499. agilV = rand(30, 40)
  500. reactV = rand(30, 40)
  501. vitalV = rand(30, 40)
  502. intelV = 10
  503. willV = 10
  504. !!skills
  505. JabV = rand(40, 60)
  506. PunchV = rand(40, 60)
  507. KikV = rand(40, 60)
  508. KikDefV = rand(40, 60)
  509. !!parameters
  510. healthV = vitalV * 10 + strenV * 5
  511. $nameV = 'Rival c first discharge'
  512. formula = 3
  513. amateur = 1
  514. elseif razradKik + razrand = 4:
  515. strenV = rand(40, 60)
  516. speedV = rand(40, 60)
  517. agilV = rand(40, 60)
  518. reactV = rand(40, 60)
  519. vitalV = rand(40, 60)
  520. intelV = 10
  521. willV = 10
  522. !!skills
  523. JabV = rand(60, 80)
  524. PunchV = rand(60, 80)
  525. KikV = rand(60, 80)
  526. KikDefV = rand(60, 80)
  527. !!parameters
  528. healthV = vitalV * 10 + strenV * 5
  529. $nameV = 'Rival CCM'
  530. formula = 3
  531. amateur = 1
  532. elseif razradKik + razrand >= 5:
  533. strenV = rand(60, 100)
  534. speedV = rand(60, 100)
  535. agilV = rand(60, 100)
  536. reactV = rand(60, 100)
  537. vitalV = rand(60, 100)
  538. intelV = 10
  539. willV = 10
  540. !!skills
  541. JabV = rand(80, 110)
  542. PunchV = rand(80, 110)
  543. KikV = rand(80, 110)
  544. KikDefV = rand(80, 110)
  545. !!parameters
  546. healthV = vitalV * 10 + strenV * 5
  547. $nameV = 'Rival MS'
  548. formula = 3
  549. amateur = 1
  550. end
  551. gt 'kikbox', 'start'
  552. end
  553. end
  554. end
  555. --- fit ---------------------------------