stat 50 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490
  1. # stat
  2. clr
  3. view
  4. gs 'dinSex2'
  5. if nippain = 2:
  6. if nippainday + 5 < daystart:
  7. $nippain = 'You have greatly hurt nipples.'
  8. nippain = 1
  9. nippainday = daystart
  10. elseif nippainday + 5 >= daystart:
  11. $nippain = 'You have greatly hurt nipples.'
  12. end
  13. elseif nippain = 1:
  14. if nippainday + 5 < daystart:
  15. $nippain = ''
  16. nippain = 0
  17. elseif nippainday + 5 >= daystart:
  18. $nippain = 'You have a little sore nipples.'
  19. end
  20. end
  21. if painpub = 2:
  22. if painpubday + 5 < daystart:
  23. $painpub = 'You have very sore vagina.'
  24. painpub = 1
  25. painpubday = daystart
  26. elseif painpubday + 5 >= daystart:
  27. $painpub = 'You have very sore vagina.'
  28. end
  29. elseif painpub = 1:
  30. if painpubday + 5 < daystart:
  31. $painpub = ''
  32. painpub = 0
  33. painpubday = daystart
  34. elseif painpubday + 5 >= daystart:
  35. $painpub = 'You have a little sore vagina.'
  36. end
  37. end
  38. if year = 2011 and katjaPreg = 0 and month >= 2:katjaPreg = 1
  39. if analplay >= 2 and anus <= 10:anus += 1 & analplay = 0
  40. if analplay >= 4 and anus <= 15:anus += 1 & analplay = 0
  41. if analplay >= 8 and anus <= 20:anus += 1 & analplay = 0
  42. musle[1] = musle
  43. flex[1] = agil
  44. stamina[1] = vital * 3
  45. wipo[1] = will
  46. intel[1] = intel
  47. krasota[1] = vnesh
  48. rost[1] = rost
  49. salo[1] = salo
  50. fat[1] = fat
  51. Bteh[1] = bteh
  52. Uteh[1] = uteh
  53. Zteh[1] = zteh
  54. !!flex[0] = agil
  55. !!stamina[0] = vital * 3
  56. !!krasota[0] = vnesh
  57. !!wipo[0] = will
  58. if nopornowrestling = 0:
  59. nopornowrestling = 1
  60. NPCnum = 30
  61. NPCnow = 1
  62. !!shag = 1
  63. gs 'npc'
  64. NoView = 1
  65. NPCrost = 30
  66. gs 'generation'
  67. NoView = 1
  68. NPCrost = 30
  69. gs 'generation'
  70. NoView = 1
  71. NPCrost = 30
  72. gs 'generation'
  73. NoView = 1
  74. NPCrost = 30
  75. gs 'generation'
  76. NoView = 1
  77. NPCrost = 30
  78. gs 'generation'
  79. $nikname[1] = 'schoolgirl'
  80. !!musle[0] = 100
  81. !!flex[0] = agil
  82. !!stamina[0] = vital * 3
  83. !!wipo[0] = will
  84. !!intel[0] = 10
  85. !!krasota[0] = vnesh
  86. !!rost[0] = 165
  87. !!salo[0] = 100
  88. !!fat[0] = 100
  89. !!$nikname[1] = 'steel Virgo'
  90. !!musle[1] = 100
  91. !!flex[1] = 100
  92. !!stamina[1] = 300
  93. !!wipo[1] = 50
  94. !!intel[1] = 10
  95. !!krasota[1] = 10
  96. !!rost[1] = 165
  97. !!salo[1] = 100
  98. !!fat[1] = 100
  99. end
  100. if newclo[131] = 1 and SchoolAtestat = 1 or newclo[131] = 1 and SchoolBlock = 1:newclo[131] = 0
  101. !!!CV edition
  102. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!Automatic Stuff
  103. if AutoMakeupType < 2: AutoMakeupType = 2
  104. if AutoHapri = 1 and greben > 0 and hapri = 0 and InSleep = 0:
  105. minut += 3
  106. hapri = 1
  107. 'You brush your hair.'
  108. end
  109. if AutoMakeup = 1 and kosmetitka > 0 and mop = 1 and InSleep = 0 and (AutoMakeupSleep = 1 or (AutoMakeupSleep = 0 and HasWashed = 0)):
  110. mop = AutoMakeupType
  111. if $CurLoc = 'vanr' or $CurLoc = 'vanrPar' or bag > 0:
  112. if kosmetica < 3 and mop = 4: mop = 3
  113. if kosmetica < 2 and mop = 3: mop = 2
  114. if kosmetica < 1 and mop ! 1:
  115. mop = 1
  116. 'You have no make-up left.'
  117. else
  118. if mop = 2:
  119. 'You apply just enough make-up to touch up a few spots.'
  120. minut += 3
  121. kosmetica -= 1
  122. 'You lightly summed eyes and a little lipstick.'
  123. end
  124. if mop = 3:
  125. 'You apply an amount of make-up, that should pass as an everyday-like setup.'
  126. minut += 5
  127. kosmetica -= 2
  128. 'You lipstick, summed up the eyes and eyelids.'
  129. end
  130. if mop = 4:
  131. 'You apply an amount of make-up, that others usually wear, when they go out.'
  132. minut += 10
  133. vidageday -= 1
  134. kosmetica -= 3
  135. 'You densely nakrasili eyes, imposed shadows and mascara , nakrasili lip contour pencil and lipstick.'
  136. end
  137. end
  138. else
  139. if kosmetitka < 3 and mop = 4: mop = 3
  140. if kosmetitka < 2 and mop = 3: mop = 2
  141. if kosmetitka < 1 and mop ! 1:
  142. mop = 1
  143. 'You have no make-up left.'
  144. else
  145. if mop = 2:
  146. 'You apply just enough make-up to touch up a few spots.'
  147. minut += 3
  148. kosmetitka -= 1
  149. 'You lightly summed eyes and a little lipstick.'
  150. end
  151. if mop = 3:
  152. 'You apply an amount of make-up, that should pass as an everyday-like setup.'
  153. minut += 5
  154. kosmetitka -= 2
  155. 'You lipstick, summed up the eyes and eyelids.'
  156. end
  157. if mop = 4:
  158. 'You apply an amount of make-up, that others usually wear, when they go out.'
  159. minut += 10
  160. vidageday -= 1
  161. kosmetitka -= 3
  162. 'You densely nakrasili eyes, imposed shadows and mascara , nakrasili lip contour pencil and lipstick.'
  163. end
  164. end
  165. end
  166. end
  167. if AutoVibrator = 1 and vibrator = 1 and vibratorIN=0:
  168. if $CurLoc = 'vanr' or $CurLoc = 'vanrPar':
  169. minut += 5
  170. vibratorIN = 1
  171. if vagina < 30:vagina += 2
  172. 'You bend over the sink and inserted the vibrator in your pussy.'
  173. end
  174. end
  175. if AutoEnema = 1 and klismaday ! day:
  176. if $CurLoc = 'vanr' or $CurLoc = 'vanrPar':
  177. minut += 5
  178. klismaday = day
  179. klismaday1 = 1
  180. 'You give yourself an enema and clean your intestines. Your ass is now ready for anal sex.'
  181. end
  182. end
  183. if AutoButtPlug = 1 and AutoEnema = 1 and analplug = 1 and analplugIN = 0:
  184. if $CurLoc = 'vanr' or $CurLoc = 'vanrPar':
  185. minut += 5
  186. analplugIN = 1
  187. plugday = daystart
  188. if anus < 10:anus = anus + 5
  189. if anus >= 10 and anus < 20:anus += rand(1, 2)
  190. if anus >= 20 and anus < 30:anus += rand(0, 1)
  191. if butpluguse > 0:
  192. 'You bent over and inserted the butt plug.'
  193. else
  194. butpluguse = 1
  195. '"If I don''t use it then why did I buy it!" you thought. You decided to take a closer look while thinking, "It is necessary to start developing my ass so I could have great adventures someday, you could even say a huge and thick adventures with crimson heads, uh, now I got carried away." You scratched your head. Then you directed it in your ass, it was a bit painful at first, but as soon as the widest part was plunged into the murky depths of your anus it became easier to push it all the way.'
  196. end
  197. end
  198. end
  199. if lipbalm > 0 and lipbalmstat <= 0 and AutoLipBalm = 1:
  200. minut -= 10
  201. lipbalm -= 1
  202. lipkoef += rand(5, 15)
  203. if lipkoef > 50:
  204. lipkoef = 0
  205. lip += 1
  206. end
  207. lipbalmstat += 8
  208. 'You apply a lip balm, to moisterize them.'
  209. end
  210. if AutoVitamins = 1 and vitamin > 0 and vitaminday ! day:
  211. minut += 5
  212. vitaminday = day
  213. vitamin -= 1
  214. frost = 0
  215. skinvan += 1
  216. if KandidozOnce = 1:Kandidoz -= 2
  217. if GerpesOnce = 1:Gerpes -= 2
  218. if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)
  219. if skinvan = 20:skinvan = 0 & skin += 1
  220. end
  221. !!!
  222. !!!CHEATS!!!
  223. if cheatWork = 1:work = 0
  224. if cheatWorkKiskis = 1:young_shop_miss = 0
  225. if cheatHapri = 1:hapri = 1
  226. if cheatKlisma = 1:klismaday = day & klismaday1 = 1
  227. if cheatNomakeup = 1:
  228. if mop = 0:mop = 1
  229. end
  230. if cheatNosweat = 1 and sweat ! -3:sweat = -3
  231. if cheatNoEat = 1:
  232. if energy ! 19:energy = 19
  233. if water ! 19:water = 19
  234. end
  235. !!!!!!!!!!!!
  236. if alko > 0 and frost > 0:frost = 0
  237. if lernSkill >= 8:intel += 1 & lernSkill = 0
  238. if numdress ! 131 and Sforma > 0:Sforma = 0
  239. if lern >= 10:intel += 1 & lern = 0
  240. if GorSlut = 1:$gnikname = 'flirt'
  241. if GorSlut = 2:$gnikname = 'easy A'
  242. if GorSlut = 3:$gnikname = 'cocksucker'
  243. if GorSlut = 4:$gnikname = 'sex addict'
  244. if GorSlut = 5:$gnikname = 'slut'
  245. if GorSlut = 6:$gnikname = 'talking pussy'
  246. if GorSlut >= 2:KatjaKnowBJ = 1
  247. if GorSlut >= 1 or preg > 0:KatjaKnowSex = 1
  248. if GorSlut > 6: GorSlut = 6
  249. if film > 0 and kompromatLife < 10:
  250. !pornoaktrissa
  251. if kompromatLife < 10:kompromatLife = 10
  252. $kompromatFoto = 'This photo is a screenshot from one of the porn movies you were part of.'
  253. end
  254. if fotoyousuck = 1 and kompromatLife < 9:
  255. !!sucked in a couple of guys and was sfotografirovanna
  256. if kompromatLife < 9:kompromatLife = 9
  257. $kompromatFoto = 'These pictures show you sucking two cocks at the same time.'
  258. end
  259. if fotoCFNMsex > 0 and kompromatLife < 8:
  260. kompromatLife = 8
  261. $kompromatFoto = 'In this photo you see yourself getting fucked from behind by a random guy. This must have been taken in the stripclup.'
  262. end
  263. if fotoCFNMblowjobCum > 0 and kompromatLife < 7:
  264. !!cum on face in the strip club
  265. kompromatLife = 7
  266. $kompromatFoto = 'In this photo you are sitting infront of a guy, kissing his cock. There seems to be cum in your face. This photo must have been taken in the stripclub.'
  267. end
  268. if fotoCFNMblowjob > 0 and kompromatLife < 6:
  269. !!sucked in front of everyone
  270. kompromatLife = 6
  271. $kompromatFoto = 'In this photo you are giving a guy a blowjob. You can spot a group of women in the background and it seems like this photo was taken in the stripclub.'
  272. end
  273. if stripdancesum > 0 and kompromatLife < 2:
  274. !!stripper
  275. if kompromatLife < 2:kompromatLife = 2
  276. $kompromatFoto = 'In this photo you are dancing on a pole, obviously someone photographed you, while you were on stage at the stripclub.'
  277. end
  278. if modelfoto > 0 and kompromatLife < 1:
  279. !!photo model
  280. if kompromatLife < 1:kompromatLife = 1
  281. $kompromatFoto = 'These are photos of you being naked, when you were taking pictures at the model agence.'
  282. end
  283. shameless = guy + bj + anal + hj + ((slutty + gang) * 2)
  284. moneySUM = money + karta + stolmoney
  285. cumSUM = cumbelly + cumpussy + cumass + cumlip + cumface + cumfrot + cumanus
  286. gs 'dina'
  287. gs 'din2'
  288. if husbizvradd > 5:izvratH = 1
  289. if husbharmin > 10:harakHusb = 0
  290. if clrbelo <= 0:clrbelo = 0 & tanga = 0
  291. if husband = 0:
  292. husbizvradd = 0
  293. husbharmin = 0
  294. husbandMark = 0
  295. houseslut = 0
  296. end
  297. if SNarkvnesh = 0:SNarkvnesh = 1
  298. if SNarkTimes >= SNarkvnesh * 25:
  299. SNarkvnesh += 1
  300. vidage += 1
  301. end
  302. if gopota >= 20 and gnewQW = 1:gnewQW = 2
  303. if workDisk = 4 and week > 5:workDisk = 1
  304. if workDisk = 3 and week > 5:workDiskAtkPlayer = 1
  305. VeneraN = 0
  306. if VeneraOnce > 0:VeneraOnce = 0
  307. if SifacOnce = 1:VeneraN += 1
  308. if GerpesOnce = 1:VeneraN += 1
  309. if TriperOnce = 1:VeneraN += 1
  310. Venera = VeneraN
  311. if fat < 0:fat = 0
  312. if vokal < 0:vokal = 0
  313. if vokal > 100:vokal = 100
  314. if dance > 100:dance = 100
  315. if stripdance > 100:stripdance = 100
  316. if poledance > 100:poledance = 100
  317. !'
  318. if libonce = 0:
  319. libonce = 1
  320. addqst 'lib/otg_lib_menu_eng.qsp'
  321. end
  322. if youngshoponce = 0:
  323. youngshoponce = 1
  324. addqst 'youngshop.qsp'
  325. end
  326. if qwestonce = 0:
  327. qwestonce = 1
  328. addqst 'qwest/qwest.qsp'
  329. end
  330. '!
  331. if bfa < 0:bfa = 0
  332. if painQW = 0:painweather = 6
  333. if beg < 0:beg = 0
  334. if beg > 2000:beg = 2000
  335. if oficiant > 100:oficiant = 100
  336. if vagina > 36:vagina = 36
  337. if throat > 36:throat = 36
  338. if anus > 36:anus = 36
  339. if Jab > 120:Jab = 120
  340. if Punch > 120:Punch = 120
  341. if Kik > 120:Kik = 120
  342. if KikDef > 120:KikDef = 120
  343. if nark >= 30 and narkoman = 0:
  344. narkoman = 1
  345. elseif nark = 0 and narkoman = 0:
  346. narkoman = 0
  347. end
  348. boxing = Jab + Punch + Kik + KikDef
  349. if boxing > 100:boxing = 100
  350. if stren > 100 and mutagenP = 0:stren = 100
  351. if speed > 100 and mutagenS = 0:speed = 100
  352. if agil > 100 and mutagenA = 0:agil = 100
  353. if react > 100 and mutagenR = 0:react = 100
  354. if vital > 100 and mutagenV = 0:vital = 100
  355. if will > 100 and mutagenW = 0:will = 100
  356. if intel > 100 and mutagenI = 0 and student = 0 and diplom = 0:intel = 100
  357. if stren > 150 and mutagenP = 1:stren = 150
  358. if speed > 150 and mutagenS = 1:speed = 150
  359. if agil > 150 and mutagenA = 1:agil = 150
  360. if react > 150 and mutagenR = 1:react = 150
  361. if vital > 150 and mutagenV = 1:vital = 150
  362. if will > 150 and mutagenW = 1:will = 150
  363. if intel > 150 and mutagenI = 1 and student = 0 and diplom = 0:intel = 150
  364. if stren > 200 and mutagenP = 2:stren = 200
  365. if speed > 200 and mutagenS = 2:speed = 200
  366. if agil > 200 and mutagenA = 2:agil = 200
  367. if react > 200 and mutagenR = 2:react = 200
  368. if vital > 200 and mutagenV = 2:vital = 200
  369. if will > 200 and mutagenW = 2:will = 200
  370. if intel > 200 and mutagenI = 2 and student = 0 and diplom = 0:intel = 200
  371. if stren > 250 and mutagenP = 3:stren = 250
  372. if speed > 250 and mutagenS = 3:speed = 250
  373. if agil > 250 and mutagenA = 3:agil = 250
  374. if react > 250 and mutagenR = 3:react = 250
  375. if vital > 250 and mutagenV = 3:vital = 250
  376. if will > 250 and mutagenW = 3:will = 250
  377. if intel > 250 and mutagenI = 3 and student = 0 and diplom = 0:intel = 250
  378. if intel > 250:intel = 250
  379. if MagikDostup = 0:
  380. !!!CV edition: Moved the statement after each orgasm stage to it''s own string
  381. $levelUpString = '<b>Do you feel like that might be revealed within you and you gushed magic, lifting you to a new energy level.</b>'
  382. if orgasm >= 1 and magik < 1:magik = 1 & glaraz += 1 & rikudo += 500 & pl $levelUpString
  383. if orgasm >= 2 and magik < 2:magik = 2 & resnic += 1 & rikudo += 500 & pl $levelUpString
  384. if orgasm >= 4 and magik < 3:magik = 3 & glaraz += 1 & rikudo += 500 & pl $levelUpString
  385. if orgasm >= 8 and magik < 4:magik = 4 & resnic += 1 & rikudo += 500 & pl $levelUpString
  386. if orgasm >= 16 and magik < 5:magik = 5 & glaraz += 1 & rikudo += 500 & pl $levelUpString
  387. if orgasm >= 32 and magik < 6:magik = 6 & resnic += 1 & rikudo += 1000 & pl $levelUpString
  388. if orgasm >= 64 and magik < 7:magik = 7 & glaraz += 1 & rikudo += 1000 & pl $levelUpString
  389. if orgasm >= 100 and magik < 8:magik = 8 & rikudo += 1000 & pl $levelUpString
  390. if orgasm >= 200 and magik < 9:magik = 9 & rikudo += 1000 & pl $levelUpString
  391. if orgasm >= 300 and magik < 10:magik = 10 & rikudo += 2000 & pl $levelUpString
  392. if orgasm >= 400 and magik < 11:magik = 11 & rikudo += 4000 & pl $levelUpString
  393. if orgasm >= 500 and magik < 12:magik = 12 & rikudo += 4000 & pl $levelUpString
  394. if orgasm >= 600 and magik < 13:magik = 13 & rikudo += 4000 & pl $levelUpString
  395. if orgasm >= 700 and magik < 14:magik = 14 & rikudo += 4000 & pl $levelUpString
  396. if orgasm >= 800 and magik < 15:magik = 15 & rikudo += 8000 & pl $levelUpString
  397. if orgasm >= 900 and magik < 16:magik = 16 & rikudo += 8000 & pl $levelUpString
  398. if orgasm >= 1000 and magik < 17:magik = 17 & rikudo += 8000 & pl $levelUpString
  399. if orgasm >= 1100 and magik < 18:magik = 18 & rikudo += 8000 & pl $levelUpString
  400. if orgasm >= 1200 and magik < 19:magik = 19 & rikudo += 8000 & pl $levelUpString
  401. if orgasm >= 1300 and magik < 20:magik = 20 & rikudo += 16000 & pl $levelUpString
  402. if orgasm >= 1400 and magik < 20:magik = 21 & rikudo += 21000 & pl $levelUpString
  403. !!!
  404. end
  405. if SUB >= DOM and DOM > 0:SUB = SUB - DOM & DOM = 0
  406. if DOM >= SUB and SUB > 0:DOM = DOM - SUB & SUB = 0
  407. if horny < 0:horny = 0
  408. if health > vital * 10 + stren * 5:health = vital * 10 + stren * 5
  409. if willpower > intel * 5 + will * 5:willpower = intel * 5 + will * 5
  410. if manna > (intel * magik) + magik * 100 + vital * 10 + rikudo:manna = intel * magik + magik * 100 + vital * 10 + rikudo
  411. mannamax = (intel * magik) + magik * 100 + vital * 10 + rikudo
  412. !!musle = strenbuf + vitalbuf
  413. if vidageday <= 0:
  414. vidageday = 360
  415. vidage += 1
  416. end
  417. !!!!!!!!!!!
  418. !!!TIME!!!
  419. !!!!!!!!!!!
  420. if nminut ! minut:
  421. !!totminut playing time in minutes
  422. totminut += minut
  423. nminut = minut
  424. end
  425. if vgape > 0:
  426. if vgape = 3:
  427. if manna > mannamax / 4:manna = mannamax / 4
  428. elseif vgape = 2:
  429. if manna > mannamax / 2:manna = mannamax / 2
  430. end
  431. if vgapetime + 2500 <= totminut:
  432. if vgape = 1:vgape = 0
  433. if vgape = 2:vgape = 1 & vgapetime = totminut
  434. if vgape = 3:vgape = 2 & vgapetime = totminut
  435. end
  436. end
  437. if agape > 0:
  438. if agape = 3:
  439. if manna > mannamax / 6:manna = mannamax / 6
  440. elseif agape = 2:
  441. if manna > mannamax / 3:manna = mannamax / 3
  442. end
  443. if agapetime + 5760 <= totminut:
  444. if agape = 1:agape = 0
  445. if agape = 2:agape = 1 & agapetime = totminut
  446. if agape = 3:agape = 2 & agapetime = totminut
  447. if anus > 1:anus -= 1
  448. end
  449. end
  450. if sec >= 60:
  451. :loopsec
  452. minut += 1
  453. sec -= 60
  454. if sec >= 60:jump 'loopsec'
  455. end
  456. if minut >= 60:
  457. :loopmin
  458. if SbrosNerdism = 1:nerdism = will / 10 + orgasm
  459. if nerdism < 0:nerdism = 0
  460. if obkvsdam > 0:obkvsdam = rand(2, 5)
  461. hour += 1
  462. energy -= 1
  463. water -= 1
  464. son -= 1
  465. minut -= 60
  466. if alko > 0 and alkoblock = 0:
  467. if alko >= 4:
  468. if beg > 0:beg -= 1
  469. if volleyboll > 0:volleyboll -= 1
  470. if alko >= 6:
  471. if stren > 10:stren -= 1 & salo += 3
  472. if vital > 10:vital -= 1 & salo += 3
  473. if intel > 10:intel -= 1
  474. alko -= alko / 2
  475. end
  476. end
  477. alko -= 1
  478. end
  479. !!!!!!!!!!!!!
  480. !!!Avtoboy!!!
  481. !!!!!!!!!!!!!
  482. if hour >= 8 and hour <= 23 and NPCnum > 10:
  483. :markturnirotbort
  484. xf = 0
  485. :markturnirotbortt
  486. xf += 1
  487. turnirFighter[xf] = rand(2, NPCnum)
  488. if xf < 2:jump'markturnirotbortt'
  489. if turnirFighter[1] = turnirFighter[2]:jump'markturnirotbort'
  490. a = turnirFighter[1]
  491. i = turnirFighter[2]
  492. NoView = 1
  493. gs 'Autofight'
  494. end
  495. !!!!!!!!!!!!!
  496. if shame > 0:shame -= 1 & manna -= 5
  497. if smoker >= 20:smokerNeed += 1
  498. if smokerNeed > 10 and InSleep = 0:manna -= manna * 10/100
  499. if smokerNeed > 300:smokerNeed = 0 & smoker = 0
  500. if StrongNarkota > 0:StrongNarkota -= 1
  501. if SLomka > 0:SLomka += 1 & manna -= 500
  502. if SLomka > 100 and StrongNarkota <= 0:SLomka = 0 & SNarkTimes = 0
  503. if narkoman = 1 and narkday ! day:
  504. health -= 5
  505. willpower -= 5
  506. manna -= 10
  507. end
  508. if tanga = 0 and ski =0 or glamur = 0 and tanga = 0:mosolpred += 1
  509. if mosolpred >= 10:
  510. mosol += 1
  511. mosolpred -= 10
  512. end
  513. if mosol >= 50:
  514. manna -= 5
  515. end
  516. if energy >= 25:energy -= 5 & fat += 1
  517. if tanga = 1 and mosol > 0:mosol -= 1
  518. if lipbalmstat > 0:lipbalmstat -= 1
  519. if sickstage = 1:sick += 1 & sicktimer += 1
  520. if sickstage = 1 and sicktimer >= 80:sicktimer = 0 & sickstage = 2
  521. if sickstage = 2 and sick > 0:sick -= 1
  522. if sickstage = 2 and sick <= 0:sick = 0 & sickstage = 0
  523. if perkice > 0:perkice -= 1
  524. if frost > 0:frost -= 1
  525. if KGOLpers > 0:
  526. if KGHP < KGHPMAX:KGHP += 10
  527. if KGManna < KGMannaMax:KGManna += 10
  528. end
  529. if minut >= 60:jump 'loopmin'
  530. end
  531. if hour >= 24:
  532. if pirs_pain_ton > 0:pirs_pain_ton -= 1
  533. if artempower <= 0:artempower = 3
  534. if brow > 0 and browper = 0:brow -= 1
  535. if shorthair = 1:
  536. shorthairday += 1
  537. if shorthairday >= 45:shorthairday = 0 & shorthair = 0
  538. end
  539. if KatjaOTN > 0:
  540. if KatjaHorny > 0 and KatjaLust < 40:KatjaHorny -= rand(1, 3)
  541. if KatjaLust >= 40:KatjaHorny += rand(1, 3)
  542. if KatjaHorny < 0:KatjaHorny = 0
  543. if KatjaHorny >= 100:KatjaHorny = 0 & KatjaMastr += 1 & KatjaLust += 1
  544. end
  545. if volleysostav > 0:trenerepa -= 1
  546. if birthday = day and birthmonth = month:
  547. !!birthday
  548. age += 1
  549. vidage += 1
  550. end
  551. if horny > hornyStat:
  552. hornyStat = horny
  553. if pirsA > 0:horny += 1
  554. if pirsB > 0:horny += 1
  555. if pirsC > 0:horny += 1
  556. if pirsD > 0:horny += 1
  557. if pirsE > 0:horny += 1
  558. if pirsF > 0:horny += 5
  559. if pirsG > 0:horny += 5
  560. if pirsN > 0:horny += 1
  561. end
  562. if horny < hornyStat:hornyStat = horny
  563. !!!!!!!!!!!!!!!
  564. !!!generation!!!
  565. !!!!!!!!!!!!!!!
  566. if NPCnum < 290:
  567. NPCnow = NPCnum
  568. NPCnum += rand(1, 3)
  569. gs 'npc'
  570. end
  571. if NPCnum >= 290 and NPCnum < 300:
  572. NPCnow = NPCnum
  573. NPCnum += 1
  574. gs 'npc'
  575. end
  576. !!!!!!!!!!!!!!!
  577. if kanikuli = 0:Suspeh -= 1
  578. dmishaevent = 0
  579. if BuyHous = 2 and ArendHouseSL <= 0:ArendHouseSL = 0 & BuyHous = 0 & housr = 0
  580. if BuyHous = 2 and ArendHouseSL > 0:ArendHouseSL -= 1
  581. if Gspravka <= 0 and GspravkaT > 0:GspravkaT = 0 & Gspravka = 0
  582. if GspravkaT > 0:Gspravka -= 1
  583. if IvanPodstavaQW = 2 and PodpiskaNeviezd = 30:IvanPodstavaQW = 3
  584. if IvanPodstavaQW = 2 and PodpiskaNeviezd > 0 and PodpiskaNeviezd < 30:PodpiskaNeviezd += 1
  585. if salo > fat:
  586. salo -= 1
  587. fat += 1
  588. elseif salo < fat:
  589. salo += 1
  590. fat -= 1
  591. end
  592. if strenbuf > stren:strenbuf -= 1
  593. if strenbuf < stren:strenbuf += 1
  594. if vitalbuf > vital:vitalbuf -= 1
  595. if vitalbuf < vital:vitalbuf += 1
  596. if agilbuf > agil:agilbuf -= 1
  597. if agilbuf < agil:agilbuf += 1
  598. if husband > 0 and husbandrink ! 11:husbandrink = rand(0, 10)
  599. inWorkYoungShop = 0
  600. husbandsexday = 0
  601. borsexkol = 0
  602. givisexday = 0
  603. if shantsr > 0:
  604. pay = shantsr * 5000
  605. karta += pay
  606. shantsr = 0
  607. end
  608. if shantbog > 0:
  609. :shantftb
  610. shantftbgrand = rand(0, 10)
  611. if shantftbgrand > 2:
  612. shantpopala += 1
  613. shantbog -= 1
  614. if shantbog > 0:jump 'shantftb'
  615. elseif shantftbgrand <= 2:
  616. karta += 30000
  617. shantbog -= 1
  618. if shantbog > 0:jump 'shantftb'
  619. end
  620. end
  621. petersexday = 0
  622. klismaday1= 0
  623. :loop
  624. day += 1
  625. daystart += 1
  626. week += 1
  627. hour -= 24
  628. !!RFP
  629. if SifacOnce = 1:Sifilis += 1
  630. if GerpesOnce = 1:Gerpes += 1
  631. if TriperOnce = 1:Triper += 1
  632. if KandidozOnce = 1:Kandidoz += 1
  633. if beg >= 100 and beg < 1000:beg -= 1
  634. if beg >= 1000 and beg < 1500:beg -= 2
  635. if beg >= 1500 and beg < 2000:beg -= 3
  636. if beg >= 2000:beg -= 4
  637. vidageday -= 1
  638. if workDolgDay > 0:workDolgDay -= 1
  639. if QWdogreiqTimer > 0:QWdogreiqTimer -= 1
  640. if husband > 0:husbanday += 1
  641. if kid > 0:kid += 1
  642. if husband > 10 and husbanday > 0:husband -= 15
  643. if fingal > 0:fingal -= 1
  644. if husbandMark = 1 and husband <= 10:
  645. husbizvradd = 0
  646. husbharmin = 0
  647. husbandMark = 0
  648. husband = 0
  649. divorced += 1
  650. if KFOnLineReaga > 0:KFOnLineReaga -= 1
  651. '<b><font color="red">Your husband has filed for a divorce.</font></b>'
  652. end
  653. gs 'cikl'
  654. if nark > 0:nark -= 1
  655. if pregtime > 10:fat += 1
  656. if hour >= 24:jump 'loop'
  657. end
  658. !!payments
  659. if day = 25:
  660. if PersSecWork = 1 and PersSecWorkTimes > 0 and paydaybistrosec = 0:
  661. Pay = PersSecWorkTimes * 2500
  662. PersSecWorkTimes = 0
  663. money += Pay
  664. paydaybistrosec = 1
  665. '<b><font color="green">You have received <<pay>> rubles salary for your job as a secretary on your bank account.</font></b>'
  666. end
  667. if workKafe = 1 and paydayKafe = 0:
  668. paydayKafe = 1
  669. pay = smenaKafe * 600
  670. money += pay
  671. smenaKafe = 0
  672. '<b><font color="green">You have received <<pay>> rubles salary for your job as a waitress in a cafe on your bank account.</font></b>'
  673. end
  674. if workhosp = 1 and nopaypoly = 0:
  675. pay = smena * 1000
  676. money += pay
  677. smena = 0
  678. nopaypoly = 1
  679. '<b><font color="green">You have received <<pay>> rubles salary for your work in the clinic on your bank account.</font></b>'
  680. end
  681. if worksalon = 1 and nopaysalon = 0:
  682. pay = smena * 800
  683. money += pay
  684. smena = 0
  685. nopaysalon = 1
  686. '<b><font color="green">You have received <<pay>> rubles salary for your work in a beauty salon on your bank account.</font></b>'
  687. end
  688. if tanwork = 1 and nopaytanwork = 0:
  689. nopaytanwork = 1
  690. money += 25000
  691. '<b><font color="green">You have received a salary of 25,000 rubles for your work as a house maid on your bank account.</font></b>'
  692. end
  693. if workSec = 1 and paydaySec = 0:
  694. paydaySec = 1
  695. pay = sekDay * 800
  696. if officebestslut >= 3:pay += 20000
  697. karta += pay
  698. sekDay = 0
  699. '<b><font color="green">You have received <<pay>> rubles salary for your job as a secretary on your bank account.</font></b>'
  700. end
  701. if husband > 0 and paydayHusb = 0:
  702. paydayHusb = 1
  703. if husbFin = 0:huspay = 15000
  704. if husbFin = 1:huspay = 25000
  705. if husbFin = 2:huspay = 40000
  706. money += huspay
  707. '<b><font color="green">Your husband has sent you <<huspay>> rubles to your bank account.</font></b>'
  708. end
  709. if stipuha = 1 and stipuhaday = 0:stipuhaday = 1 & money += 1200 & '<b><font color="green">You have received 1,200 rubles scholarship.</font></b>'
  710. if housr = 1 and haday = 0:haday = 1 & money -= 3000 & '<b><font color="red">You paid 3,000 rubles for your apartment.</font></b>'
  711. if housr = 1 and electroday = 0:
  712. electroday = 1
  713. if elektro >= 800:elektro = 800 + rand(0, 100)
  714. money -= elektro
  715. '<b><font color="red">You paid <<elektro>> for electricity.</font></b>'
  716. end
  717. if housr = 1 and kabel > 0 and kabelday = 0:kabelday = 1 & money -= 300 & '<b><font color="red">You have paid 300 rubles for cable TV.</font></b>'
  718. end
  719. if day ! 25:
  720. if paydayHusb = 1:paydayHusb = 0
  721. if workKafe = 1 and paydayKafe = 1:paydayKafe = 0
  722. if workSec = 1 and paydaySec = 1:paydaySec = 0
  723. if housr = 1 and haday = 1:haday = 0
  724. if housr = 1 and electroday = 1:electroday = 0
  725. if housr = 1 and kabel > 0 and kabelday = 1:kabelday = 0
  726. if stipuhaday = 1:stipuhaday = 0
  727. if nopaytanwork = 1:nopaytanwork = 0
  728. if nopaypoly = 1:nopaypoly = 0
  729. if nopaysalon = 1:nopaysalon = 0
  730. if paydaybistrosec = 1:paydaybistrosec = 0
  731. end
  732. if sdaday = day and sdamonth = month and housr = 0:
  733. housr = 1
  734. '<b><font color="red">The term of your residental apartment lease expired.</font></b>'
  735. end
  736. if month = 1 or month = 3 or month = 5 or month = 7 or month = 8 or month = 10 or month = 12:
  737. !!31
  738. if day > 31:day -= 31 & month += 1
  739. elseif month = 2:
  740. !!28
  741. if day > 28:day -= 28 & month += 1
  742. elseif month = 0:
  743. month = 1
  744. if day > 31:day -= 31 & month += 1
  745. elseif month = 13:
  746. month = 1
  747. if day > 31:day -= 31 & month += 1
  748. else
  749. !!30
  750. if day > 30:day -= 30 & month += 1
  751. end
  752. !'
  753. if day > 30:
  754. day -= 30
  755. month += 1
  756. end
  757. '!
  758. if day = 0:day = 1
  759. if week > 7:
  760. :loopweek
  761. week -= 7
  762. husbandrink = 0
  763. if military = 1:military = 0
  764. if week > 7:jump 'loopweek'
  765. end
  766. if week = 1:$week = 'Monday'
  767. if week = 2:$week = 'Tuesday'
  768. if week = 3:$week = 'Wednesday'
  769. if week = 4:$week = 'Thursday'
  770. if week = 5:$week = 'Friday'
  771. if week = 6:$week = 'Saturday'
  772. if week = 7:$week = 'Sunday'
  773. if month = 0:month = 1
  774. if month = 13:month = 1 & year += 1
  775. If month = 1:$month = 'January' & $mons = 'January'
  776. If month = 2:$month = 'February' & $mons = 'February'
  777. If month = 3:$month = 'March' & $mons = 'Martha'
  778. If month = 4:$month = 'April' & $mons = 'April'
  779. If month = 5:$month = 'May' & $mons = 'May'
  780. If month = 6:$month = 'June' & $mons = 'June'
  781. If month = 7:$month = 'July' & $mons = 'July'
  782. If month = 8:$month = 'August' & $mons = 'August'
  783. If month = 9:$month = 'September' & $mons = 'September'
  784. If month = 10:$month = 'October' & $mons = 'October'
  785. If month = 11:$month = 'November' & $mons = 'November'
  786. If month = 12:$month = 'December' & $mons = 'December'
  787. if minut < 10:$nilmin = '0'
  788. if minut >= 10:$nilmin = ''
  789. if kid > 0:
  790. if year > yearkid[1] and markyear[1] ! year:
  791. if monthkid[1] = month and daykid[1] = day:
  792. markyear[1] = year
  793. kidage[1] += 1
  794. end
  795. end
  796. end
  797. !!moodlet
  798. !!mannamax
  799. !!totminut
  800. if Mud >= totminut:
  801. manna = mannamax
  802. $mud = 'You feel buoyed.'
  803. else
  804. $mud = ''
  805. end
  806. if nerdism > 0:
  807. if lastreadday = daystart:
  808. !!<font color="green">You are completely healthy shine and a healthy glow.</font>
  809. manna = mannamax
  810. SbrosNerdism = 0
  811. $mudnerd = '<font color="green">You are lost in a fantasy after reading the book.</font>'
  812. end
  813. if lastreadday + 1 = daystart:
  814. !!manna = mannamax
  815. SbrosNerdism = 0
  816. $mudnerd = '<font color="black">You a little bored and want to again plunge into a book.</font>'
  817. end
  818. if lastreadday + 2 = daystart:
  819. SbrosNerdism = 0
  820. if manna > mannamax / 2:manna -= 10
  821. $mudnerd = '<font color="red">Do you really want something to read.</font>'
  822. end
  823. if lastreadday + 3 <= daystart:
  824. if manna > mannamax / 10:manna -= 10
  825. SbrosNerdism = 1
  826. $mudnerd = '<font color="red"><b>You terribly want at least something to read!!!</b></font>'
  827. end
  828. !!$mudnerd += 'lastread<<lastread>> totminut<<totminut>> <<totminut - lastread>>'
  829. else
  830. SbrosNerdism = 0
  831. $mudnerd = ''
  832. end
  833. !!!!!!!!!!!!!!!!!!!
  834. !!!end OF TIME!!!
  835. !!!!!!!!!!!!!!!!!!!
  836. subage = 0
  837. :metakasubage
  838. subage += 10
  839. if subage + 10 < age:
  840. jump 'metakasubage'
  841. else
  842. subage = age - subage
  843. end
  844. if subage = 0 or subage >= 5:
  845. $letgoda = 'years'
  846. elseif subage = 1:
  847. $letgoda = 'year'
  848. else
  849. $letgoda = 'year'
  850. end
  851. subagevne = 0
  852. :metakasubagevne
  853. subagevne += 10
  854. if subagevne + 10 < vidage:
  855. jump 'metakasubagevne'
  856. else
  857. subagevne = vidage - subagevne
  858. end
  859. if subagevne ! 1:
  860. $letgoda2 = 'years'
  861. else
  862. $letgoda2 = 'year'
  863. end
  864. !!!!!!!!!!!!!
  865. !!!ENERGY!!!
  866. !!!!!!!!!!!!!
  867. if son < 0:
  868. son = 0
  869. manna -= 5
  870. end
  871. if energy < 0:
  872. energy = 0
  873. health -= 1
  874. if fat = 0 and stren + vital > 0:
  875. stren -= 1
  876. vital -= 1
  877. energy += 2
  878. elseif fat = 0 and stren + vital <= 0:
  879. over = 3
  880. gt 'gameover'
  881. exit
  882. elseif fat > 0:
  883. fat -= 1
  884. energy += 2
  885. end
  886. end
  887. if water < 0:
  888. water = 1
  889. health -= 5
  890. willpower -= 1
  891. end
  892. if manna <= 0:
  893. manna = 1
  894. health -= 5
  895. willpower -= 5
  896. !!fat += 1
  897. end
  898. if health < 0:
  899. over = 1
  900. gt 'gameover'
  901. exit
  902. end
  903. if willpower < 0 and StoryLine = 0:
  904. over = 2
  905. gt 'gameover'
  906. exit
  907. end
  908. if saloonce = 0 and opPRE = 0:
  909. saloonce = 1
  910. salo = fat
  911. strenbuf = stren
  912. vitalbuf = vital
  913. agilbuf = agil
  914. end
  915. gs 'body'
  916. !!!!!!!!!!!!!
  917. if health = vital * 10 + stren * 5:$health = '<font color="green">You are very healthy.</font>'
  918. if willpower = intel * 5 + will * 5:$willpower = '<font color="green">Your mind is clear.</font>'
  919. if manna = intel * magik + magik * 100 + vital * 10 + rikudo:$manna = '<font color="green">You are in a good mood.</font>'
  920. if health < vital * 10 + stren * 5 and health >= (vital * 10 + stren * 5) * 75 / 100:$health = '<font color="blue">You are healthy.</font>'
  921. if health < (vital * 10 + stren * 5) * 75 / 100 and health >= (vital * 10 + stren * 5) * 50 / 100:$health = '<font color="brown">you are not healthy.</font>'
  922. if health < (vital * 10 + stren * 5) * 50 / 100 and health >= (vital * 10 + stren * 5) * 25 / 100:$health = '<font color="red">You are sick.</font>'
  923. if health < (vital * 10 + stren * 5) * 25 / 100:$health = '<font color="red">You are on the verge of death.'
  924. if willpower < intel * 5 + will * 5 and willpower >= (intel * 5 + will * 5) * 75 / 100:$willpower = '<font color="blue">You are mostly in thought.</font>'
  925. if willpower < (intel * 5 + will * 5) * 75 / 100 and willpower >= (intel * 5 + will * 5) * 50 / 100:$willpower = '<font color="brown">You are depressed.</font>'
  926. if willpower < (intel * 5 + will * 5) * 50 / 100 and willpower >= (intel * 5 + will * 5) * 25 / 100:$willpower = '<font color="red">You are in depression.</font>'
  927. if willpower < (intel * 5 + will * 5) * 25 / 100:$willpower = '<font color="red">You are on the verge of madness.</font>'
  928. if manna < intel * magik + magik * 100 + vital * 10 + rikudo and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 75 / 100:$manna = '<font color="blue">You have a normal mood.</font>'
  929. if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 75 / 100 and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 50 / 100:$manna = '<font color="brown">You are in a bad mood.</font>'
  930. if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 50 / 100 and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 25 / 100:$manna = '<font color="red">You are in a terrible mood.</font>'
  931. if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 25 / 100:$manna = '<font color="red">Your mood is below any skirting and urban sanitation.</font>'
  932. if energy >= 20:$energy = '<font color="green">You couldn''t eat one more bite.</font>'
  933. if energy < 20 and energy >= 10:$energy = '<font color="blue">You''re not really hungry, but a small snack would be very welcome.</font>'
  934. if energy < 10 and energy >= 2:$energy = '<font color="brown">You are hungry.</font>'
  935. if energy < 2:$energy = '<font color="red">You are very hungry.</font>'
  936. if water >= 20:$water = '<font color="green">You are not thirtsy at all.</font>'
  937. if water < 20 and water >= 10:$water = '<font color="blue">You are slightly thirsty.</font>'
  938. if water < 10 and water >= 2:$water = '<font color="brown">You are thirsty.</font>'
  939. if water < 2:$water = '<font color="red">You are very thirsty.</font>'
  940. if son >= 20:$son = '<font color="green">You are well rested.</font>'
  941. if son < 20 and son >= 10:$son = '<font color="blue">You are slightly tired.</font>'
  942. if son < 10 and son >= 2:$son = '<font color="brown">You are tired.</font>'
  943. if son < 2:$son = '<font color="red">You are very tired.</font>'
  944. $din_shame = {
  945. !!dynamic din_shame
  946. !!shame += 1
  947. !!if shame >= 5:shame = 4 & shameless += 1
  948. !!if shame >= 4:$shame = '<font color="red"><b>of your cheeks blaze zalivshego them blush with shame.</b></font>'
  949. !!if shame = 3:$shame = '<font color="red">Your cheeks are red from the blush of shame.</font>'
  950. !!if shame = 2:$shame = '<font color="brown">You nemnog opokrasneli shame.</font>'
  951. !!if shame = 1:$shame = '<font color="green">You''re a little confused.</font>'
  952. !!if shame <= 0:$shame = '<font color="green">You''re a little confused.</font>'
  953. !!gs 'stat'
  954. }
  955. !!if shame >= 5:shame = 4 & shameless += 1
  956. !!if shame >= 4:$shame = '<font color="red"><b>of your cheeks blaze zalivshego them blush with shame.</b></font>'
  957. !!if shame = 3:$shame = '<font color="red">Your cheeks are red from the blush of shame.</font>'
  958. !!if shame = 2:$shame = '<font color="brown">You nemnog opokrasneli shame.</font>'
  959. !!if shame = 1:$shame = '<font color="green">You''re a little confused.</font>'
  960. !!if shame <= 0:$shame = '<font color="green">You''re a little confused.</font>'
  961. $holyday = ''
  962. kanikuli = 0
  963. if (month = 10 and day >= 27) or (month = 11 and day <= 4):$holyday = '<b>Autumn holidays.</b>' & kanikuli = 1
  964. if (month = 12 and day >= 29) or (month = 1 and day <= 13):$holyday = '<b>Winter Break.</b>' & kanikuli = 2
  965. if (month = 3 and day >= 25):$holyday = '<b>Spring Break.</b>' & kanikuli = 3
  966. if (month = 5 and day >= 25) or month = 6 or month = 7 or month = 8:$holyday = '<b>Summer holidays.</b>' & kanikuli = 4
  967. if month = 1 and day = 1:$holyday = '<b>New Year!</b>' & kanikuli = 5
  968. if hour >= 8 and hour < 16 and week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and schoolProgulDay ! day:
  969. !!absence from school
  970. schoolprogul += 1
  971. schoolProgulDay = day
  972. end
  973. !!!!!!!!!!!!!!!!!!!!!
  974. !!!Beginning Description!!!
  975. !!!!!!!!!!!!!!!!!!!!!
  976. !!pl'time <b><<hour>></b> hours <b><<$nilmin>><<minut>></b> minutes'
  977. !!pl 'At_The_Moment <<day>> <<$month>> <<year>>year, <<$week>>.'
  978. if hour < 10:
  979. if minut > 9 :
  980. pl '<b> 0<<hour>>:<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
  981. else
  982. pl '<b> 0<<hour>>:0<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
  983. end
  984. else
  985. if minut > 9 :
  986. pl '<b> <<hour>>:<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
  987. else
  988. pl '<b> <<hour>>:0<<minut>></b> <<$week>> <<day>> <<$mons>> <<year>>'
  989. end
  990. end
  991. pl '<b><<money>></b> rubles in your wallet.'
  992. if karta > 0:pl '<b><<karta>></b> rubles in your bank account.'
  993. if stolmoney > 0:pl '<b><<stolmoney>></b> rubles in your table drawer.'
  994. if StoryLine > 0 and SchoolAtestat = 0:pl '<<$holyday>>'
  995. if birthday = day and birthmonth = month:pl '<b>Today is your birthday.</b>'
  996. !!if shame > 0:pl '<<$shame>>'
  997. pl '<b><<$manna>></b>'
  998. if horny >= 90:pl '<font color="#FF1493">It takes an incredible amount of willpower not to touch yourself all the time.</font>'
  999. if horny >= 50 and horny < 90:pl '<font color="#DB7093">You have trouble focusing at times, as your mind drifts to sex.</font>'
  1000. if ETOmenu = 1:
  1001. pl '<b><<$health>></b>'
  1002. pl '<b><<$willpower>></b>'
  1003. pl '<b><<$energy>></b>'
  1004. pl '<b><<$water>></b>'
  1005. pl '<b><<$son>></b>'
  1006. else
  1007. a = horny
  1008. !!a1 = horny
  1009. gs 'indik', '2'
  1010. pl '<<$ind>> Arousal'
  1011. healthmax = (vital * 10 + stren * 5)
  1012. a = health * 100 / healthmax
  1013. a1 = health
  1014. gs 'indik', '1'
  1015. pl '<<$ind>> Health'
  1016. willpowermax = intel * 5 + will * 5
  1017. a = willpower * 100 / willpowermax
  1018. a1 = willpower
  1019. gs 'indik', '1'
  1020. pl '<<$ind>> Willpower'
  1021. a = manna * 100 / mannamax
  1022. a1 = manna
  1023. gs 'indik', '1'
  1024. pl '<<$ind>> Mood'
  1025. a = energy * 4
  1026. a1 = energy
  1027. gs 'indik', '1'
  1028. pl '<<$ind>> Hunger'
  1029. a = water * 5
  1030. a1 = water
  1031. gs 'indik', '1'
  1032. pl '<<$ind>> Thirst'
  1033. a = son * 4
  1034. a1 = son
  1035. gs 'indik', '1'
  1036. pl '<<$ind>> Sleep'
  1037. end
  1038. $smoker = {
  1039. siga -= 1
  1040. smoker += 1
  1041. smokeHour = hour
  1042. smokeDay = day
  1043. smokeminut = minut + 5
  1044. smokeNeed = 0
  1045. manna += 100
  1046. wipo += 100
  1047. if energy < 20:energy += 3
  1048. gs 'stat'
  1049. }
  1050. if $mud ! '':pl '<font color="green"><b><<$mud>></b></font>'
  1051. if siga <= 0 and smoker >= 20:pl '<font color="red"><b>You have run out of cigarettes.</b></font>'
  1052. if smokeNeed > 0 and siga > 0 and smoker >= 20:
  1053. pl '<a href="exec:dynamic $smoker"><font color="red"><b>You want to smoke. You have <<siga>> cigarettes left</b></font></a>'
  1054. elseif siga > 0 and smoker >= 20:
  1055. pl '<a href="exec:dynamic $smoker"><font color="blue"><b>You have <<siga>> cigarettes left</b></font></a>'
  1056. end
  1057. if siga > 0 and smoker < 20:
  1058. if smokeHour = hour and smokeday = day and smokeminut >= minut:
  1059. else
  1060. pl '<a href="exec:dynamic $smoker"><font color="blue"><b>You have <<siga>> cigarettes left</b></font></a>'
  1061. end
  1062. end
  1063. if smokeHour = hour and smokeday = day and smokeminut >= minut:pl '<font color="green">You are smoking a cigarette</font>'
  1064. if pirs_pain_ton > 0:
  1065. if pirs_pain_ton = 1:pl'<font color="red">You have aches language and it is a little swollen.</font>'
  1066. if pirs_pain_ton = 2:pl'<font color="red">You often aches language and it is noticeably swollen.</font>'
  1067. if pirs_pain_ton > 2:pl'<font color="red"><b>Do you have a sore tongue, he was very swollen and almost tossed in the mouth.</b></font>'
  1068. end
  1069. if nippain > 0:pl'<font color="red"><b><<$nippain>></b></font>'
  1070. if painpub > 0:pl'<font color="red"><b><<$painpub>></b></font>'
  1071. if opPRE = 0:pl '<<$mop>> and your hair is <<$hapri>>.'
  1072. if sweat = 1:pl '<font color="brown">You''re sweating.</font>'
  1073. if sweat = 2:pl '<font color="red">You are a little smelly.</font>'
  1074. if sweat = 3:pl '<font color="red">You stink.</font>'
  1075. if sweat > 3:pl '<b><font color="red">You stink.</font></b>'
  1076. if isprok = 0 and mesec > 0 and preg = 0:pl '<b><font color="red">You are bleeding between your legs, urgently need a tampon.</font></b>'
  1077. if isprok = 1 and mesec > 0 and preg = 0:pl 'You are having your period.'
  1078. if preg = 1 and pregtime = 280:pl '<b><font color="red">You urgently need to go to the hospital</font></b>'
  1079. if preg = 1:rodtime = 280 - pregtime
  1080. if preg = 1 and pregtime < 280 and pregtime > 6:pl '<b><font color="blue">You have been pregnant for <<pregtime>> days. Days until delivery <<rodtime>></font></b>'
  1081. if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:pl '<b><font color="red">You have a work shift as a waitress in a cafe</font></b>'
  1082. if hour >= 8 and hour < 9 and week < 5 and workSec >= 1:pl '<b><font color="red">You have a work shift as a secretary</font></b>'
  1083. if PersSecWork = 1 and week < 6 and hour < 10 and hour >= 5:pl '<b><font color="red">You have a work shift as a secretary</font></b>'
  1084. $cumeater = {
  1085. cumlip += 1
  1086. vaf += 1
  1087. cumbelly = 0
  1088. gs 'stat'
  1089. 'You have collected sperm from fingers and licked their stomach felt tart taste of semen.'
  1090. }
  1091. $cumeater2 = {
  1092. cumlip += 1
  1093. vaf += 1
  1094. cumpussy = 0
  1095. gs 'stat'
  1096. 'You have collected sperm from fingers pussy and licked them feeling tart taste of semen.'
  1097. }
  1098. $cumeater3 = {
  1099. cumlip += 1
  1100. vaf += 1
  1101. cumass = 0
  1102. gs 'stat'
  1103. 'You have collected sperm from fingers and licked their buttocks felt tart taste of semen.'
  1104. }
  1105. $cumeater4 = {
  1106. cumlip += 1
  1107. vaf += 1
  1108. cumface = 0
  1109. gs 'stat'
  1110. 'You have collected fingers semen from her face and licked them feeling tart taste of semen.'
  1111. }
  1112. $cumeater5 = {
  1113. cumlip += 1
  1114. vaf += 1
  1115. cumfrot = 0
  1116. gs 'stat'
  1117. 'You have collected sperm from fingers and licked their clothes felt tart taste of semen.'
  1118. }
  1119. $cumeater6 = {
  1120. cumlip += 1
  1121. vaf += 1
  1122. cumanus = 0
  1123. gs 'stat'
  1124. 'You have collected fingers semen out of the anus and lick their feeling tart taste of semen.'
  1125. }
  1126. !!'<a href="exec:view''images/body/cumface.jpg''">лицо</a>'
  1127. !!'<a href="exec:view''images/body/cumface.jpg''"><b><font color="red">Your face</font></b></a>'
  1128. !!'<a href="exec:view''images/body/cumass.jpg''"><b><font color="red">Your ass</font></b></a>'
  1129. if cumbelly > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumbelly.jpg''">stomach</a> is smeared with sperm.</font></b>'
  1130. if cumbelly > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumbelly.jpg''"><b><font color="red">Your stomach</font></b></a> <a href="exec:dynamic $cumeater"><b><font color="red">is smeared with sperm.</font></b></a>'
  1131. if cumpussy > 0 and swallow < 10:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumpussy.jpg''">pussy</a>.</font></b>'
  1132. if cumpussy > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumpussy.jpg''"><b><font color="red"><a href="exec:dynamic $cumeater2">Sperm slowly flows</a> from your pussy</font></b></a>.'
  1133. if cumass > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumass.jpg''">ass</a> is smeared with semen.</font></b>'
  1134. if cumass > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumass.jpg''"><b><font color="red">Your ass</font></b></a> <a href="exec:dynamic $cumeater3"><b><font color="red">is smeared with semen.</font></b></a>'
  1135. if cumlip > 0:pl '<b><font color="red">Your mouth smells like sperm.</font></b>'
  1136. if cumface > 0 and swallow < 10:pl '<b><font color="red">Your <a href="exec:view''images/body/cumface.jpg''">face</a> and hair are smeared with sperm.</font></b>'
  1137. if cumface > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumface.jpg''"><b><font color="red">Your face</font></b></a> <a href="exec:dynamic $cumeater4"><b><font color="red">and hair are smeared with sperm.</font></b></a>'
  1138. if cumfrot > 0 and swallow < 10:pl '<b><font color="red">You have semen stains on your <a href="exec:view''images/body/cumfrot.jpg''">clothes</a>.</font></b>'
  1139. if cumfrot > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumfrot.jpg''"><b><font color="red">You have <a href="exec:dynamic $cumeater5"><b><font color="red">semen stains</font></b></a> on your clothes</font></b></a>.'
  1140. if cumanus > 0 and swallow < 10:pl '<b><font color="red">Sperm slowly flows from your <a href="exec:view''images/body/cumanal.jpg''">ass</a>.</font></b>'
  1141. if cumanus > 0 and swallow >= 10:pl '<a href="exec:view''images/body/cumanal.jpg''"><b><font color="red"><a href="exec:dynamic $cumeater6">Sperm slowly flows</a> from your ass</font></b></a>.'
  1142. if vgape = 3:pl '<b><font color="red">You have very sore vagina, you can hardly even walk, while trying to keep your feet apart.</font></b>'
  1143. if vgape = 2:pl '<b><font color="red">You have a sore vagina and you can hardly keep your feet together.</font></b>'
  1144. if vgape = 1:pl '<b><font color="red">You have a slightly sore vagina.</font></b>'
  1145. if agape = 3:pl '<b><font color="red">You have very sore anus and it emits blood.</font></b>'
  1146. if agape = 2:pl '<b><font color="red">You have a sore anus.</font></b>'
  1147. if agape = 1:pl '<b><font color="red">You have a slightly sore and itchy anus.</font></b>'
  1148. if Gerpes >= 3:pl '<b><font color="red">On your lips sores. All signs of genital herpes.</font></b>'
  1149. if Gerpes < 10 and Gerpes >= 5:pl '<b><font color="red">Your pussy flushed and highly itchy. This genital herpes.</font></b>'
  1150. if Gerpes >= 10:pl '<b><font color="red">On your pussy sores appeared. This genital herpes.</font></b>'
  1151. if Gerpes >= 20:pl '<b><font color="red">cover your ass sores of genital herpes.</font></b>'
  1152. if Sifilis >= 21 and Sifilis < 50:pl '<b><font color="red">You have jumped big, hard sore on the lip.</font></b>'
  1153. if Sifilis >= 50:pl '<b><font color="red">syphilitic rash covers your whole body.</font></b>'
  1154. if Triper > 2:pl '<b><font color="red">From the vaginal white discharge come out strong and stinging when urinating. Just out of the vagina hard and nasty smells.</font></b>'
  1155. if Kandidoz > 30:pl '<b><font color="red">Do you thrush.</font></b>'
  1156. if SLomka > 0:pl '<b><font color="red">You are very bad and hurt all the bones. Do you break-up</font></b>'
  1157. if narkday ! day and narkoman = 1:pl '<b><font color="red">You are very bad and hurt all the bones. Urgently need pale lady</font></b>'
  1158. if fingal > 0:pl '<b><font color="red">You have a black eye on the face.</font></b>'
  1159. if cloth_vid = 1:
  1160. pl '<b><a href="exec:dynamic $din_exhibiTakeOffBimbo">You are dressed in the image bimbo</a></b>'
  1161. end
  1162. if exhibi >= 4 and exhibiHideNewCloth ! 1:
  1163. pl '<b><a href="exec:dynamic $din_exhibiHideNewCloth">You have opened a new outfit ready</a></b>'
  1164. end
  1165. if tanga = 0 and ski = 1 or tanga = 0 and glamur = 1:
  1166. pl '<b><font color="red">blush of shame fills your face, you do not put her panties and now from under your short skirt sparkles sometimes naked ass.</font></b>'
  1167. elseif tanga = 0 and ski = 0 and glamur = 0 and opPRE = 0 and nude = 0:
  1168. pl '<b><font color="red">you do not put panties.</font></b>'
  1169. end
  1170. if mosol >= 30 and mosol < 50:pl '<b><font color="red">Pisya flushed and itchy, it seems you are rubbed by clothing.</font></b>'
  1171. if mosol >= 50:pl '<b><font color="red">Pisya hurts and each step is given through the pain, she Crimson and visible scuffs from walking without underwear.</font></b>'
  1172. if analplugIN = 1:pl '<b><font color="red">You have inserted your butt plug into your ass.</font></b>'
  1173. if vibratorin = 1:pl '<b><font color="red">You have inserted your vibrator into your vagina.</font></b>'
  1174. if young_shop_work = 1 and hour = 14 and week < 6:pl '<b><font color="red">At 15 o''clock you have to be at work in the shop Keys Pussy.</font></b>'
  1175. if young_shop_work = 1 and hour = 16 and week < 6 and inWorkYoungShop = 0:young_shop_miss += 1 & pl '<b><font color="red">You squandered work.</font></b>'
  1176. if workrin = 1:
  1177. if week = 2 or week = 4 or week = 6:
  1178. if hour = 7:pl '<b><font color="red">At 8 o''clock you work on the market.</font></b>'
  1179. if hour = 8:pl '<b><font color="red">You need to work on the market.</font></b>'
  1180. end
  1181. end
  1182. if frost > 0 and frost <= 5:pl '<b><font>You have a little chilly.</font></b>'
  1183. if frost > 5 and frost < 11:pl '<b><font color="red">Are you cold.</font></b>'
  1184. if frost >= 11:pl '<b><font color="red">You are very cold.</font></b>'
  1185. if sick = 1:pl '<b><font color="red">you that is not good, tickle in the throat and a little runny nose.</font></b>'
  1186. if sick > 1 and sick < 24:pl '<b><font color="red">you chills. You flowing from the nose and throat was raw, you cough and sneeze - it looks like you got cold.</font></b>'
  1187. if sick >= 24 and sick < 48:pl '<b><font color="red">You have a fever. You clogged nose, it hurts to swallow - throat aches. You continually cough and sneeze - it looks like you prosudilis.</font></b>'
  1188. if sick >= 48 and sick < 72:pl '<b><font color="red">You have a high fever. You have a stuffy nose, sore head and throat, coughing badly you - it sounds like you got a strong cold. Maybe it''s the flu.</font></b>'
  1189. if sick >= 72:pl '<b><font color="red">you toss in the heat. You have a stuffy nose, headache and aching all the bones. Your throat is inflamed and very sore. You heavily with anguish cough - it sounds like you are seriously ill. Maybe it''s a sore throat.</font></b>'
  1190. if $mudnerd ! '':pl '<<$mudnerd>>'
  1191. if hour < meethour and svidanieA = 1:pl '<<$boyA>> will be waiting for you near your home at <<meethour>> hours'
  1192. if hour = meethour and svidanieA = 1:pl '<b><font color="red"><<$boyA>> is waiting for you around the house.</font></b>'
  1193. if meetday < daystart and svidanieA = 1:bfA -= 10 & svidanieA = 0
  1194. if StrongNarkota > 20:pl '<b><font color="red">You are stoned.</font></b>'
  1195. if alko > 0:
  1196. if alko < 3:pl '<b><font color="red">You''re a little dizzy.</font></b>'
  1197. if alko >= 3 and alko < 6:pl '<b><font color="red">You''re drunk.</font></b>'
  1198. if alko >= 6:pl '<b><font color="red">You''re wasted.</font></b>'
  1199. end
  1200. if day = 29 and month = 12 and year = 2010 and StoryLine = 1:
  1201. if hour >= 5 and hour <= 14:pl 'At 14 o''clock a New Year''s party will be held.'
  1202. end
  1203. gs 'din_bad'
  1204. if bag > 0:pl '<a href="exec:dynamic $d_bag"><b>Handbag</b></a>'
  1205. !!zero checks marriage
  1206. proverka1 = 0
  1207. proverka2 = 0
  1208. proverka3 = 0
  1209. proverka4 = 0
  1210. proverka5 = 0
  1211. !!clothing repair, for old saved.
  1212. if remdrop = 0:
  1213. remdrop = 1
  1214. if jeans = 1:jeans[1] = 1 & jeansH[1] = 50 & jeansB[1] = bedra
  1215. if jeans2 = 1:jeans[2] = 1 & jeansH[2] = 50 & jeansB[2] = bedra
  1216. if jeans3 = 1:jeans[3] = 1 & jeansH[3] = 50 & jeansB[3] = bedra
  1217. if jeans4 = 1:jeans[4] = 1 & jeansH[4] = 50 & jeansB[4] = bedra
  1218. if jeans5 = 1:jeans[5] = 1 & jeansH[5] = 50 & jeansB[5] = bedra
  1219. if yoga = 1:yoga[1] = 1 & yogaH[1] = 50
  1220. if yoga2 = 1:yoga[2] = 1 & yogaH[2] = 50
  1221. if yoga3 = 1:yoga[3] = 1 & yogaH[3] = 50
  1222. if yoga4 = 1:yoga[4] = 1 & yogaH[4] = 50
  1223. if yoga5 = 1:yoga[5] = 1 & yogaH[5] = 50
  1224. if yoga6 = 1:yoga[6] = 1 & yogaH[6] = 50
  1225. if yoga7 = 1:yoga[7] = 1 & yogaH[7] = 50
  1226. if yoga8 = 1:yoga[8] = 1 & yogaH[8] = 50
  1227. if yoga9 = 1:yoga[9] = 1 & yogaH[9] = 50
  1228. if yoga10 = 1:yoga[10] = 1 & yogaH[10] = 50
  1229. if yoga11 = 1:yoga[11] = 1 & yogaH[11] = 50
  1230. if yoga12 = 1:yoga[12] = 1 & yogaH[12] = 50
  1231. if yoga13 = 1:yoga[13] = 1 & yogaH[13] = 50
  1232. if yoga14 = 1:yoga[14] = 1 & yogaH[14] = 50
  1233. if yoga15 = 1:yoga[15] = 1 & yogaH[15] = 50
  1234. if yoga16 = 1:yoga[16] = 1 & yogaH[16] = 50
  1235. if yoga17 = 1:yoga[17] = 1 & yogaH[17] = 50
  1236. if yoga18 = 1:yoga[18] = 1 & yogaH[18] = 50
  1237. if sarafan = 1:sarafan[1] = 1 & sarafanH[1] = 50
  1238. if sarafan2 = 1:sarafan[2] = 1 & sarafanH[2] = 50
  1239. if short = 1:short[1] = 1 & shortH[1] = 50 & shortB[1] = bedra
  1240. if short2 = 1:short[2] = 1 & shortH[2] = 50 & shortB[2] = bedra
  1241. if short3 = 1:short[3] = 1 & shortH[3] = 50 & shortB[3] = bedra
  1242. if short4 = 1:short[4] = 1 & shortH[4] = 50 & shortB[4] = bedra
  1243. if short5 = 1:short[5] = 1 & shortH[5] = 50 & shortB[5] = bedra
  1244. if skirt = 1:skirt[1] = 1 & skirtH[1] = 50 & skirtB[1] = bedra
  1245. if skirt2 = 1:skirt[2] = 1 & skirtH[2] = 50 & skirtB[2] = bedra
  1246. if skirt3 = 1:skirt[3] = 1 & skirtH[3] = 50 & skirtB[3] = bedra
  1247. if skirt4 = 1:skirt[4] = 1 & skirtH[4] = 50 & skirtB[4] = bedra
  1248. if skirt5 = 1:skirt[5] = 1 & skirtH[5] = 50 & skirtB[5] = bedra
  1249. if dress = 1:dress[1] = 1 & dressH[1] = 100 & dressB[1] = bedra
  1250. if dress2 = 1:dress[2] = 1 & dressH[2] = 100 & dressB[2] = bedra
  1251. if dress3 = 1:dress[3] = 1 & dressH[3] = 100 & dressB[3] = bedra
  1252. if dress4 = 1:dress[4] = 1 & dressH[4] = 100 & dressB[4] = bedra
  1253. if dress5 = 1:dress[5] = 1 & dressH[5] = 100 & dressB[5] = bedra
  1254. if dress6 = 1:dress[6] = 1 & dressH[6] = 100 & dressB[6] = bedra
  1255. if dress7 = 1:dress[7] = 1 & dressH[7] = 100 & dressB[7] = bedra
  1256. if dress8 = 1:dress[8] = 1 & dressH[8] = 100 & dressB[8] = bedra
  1257. if dress9 = 1:dress[9] = 1 & dressH[9] = 100 & dressB[9] = bedra
  1258. if dress10 = 1:dress[10] = 1 & dressH[10] = 100 & dressB[10] = bedra
  1259. if dress11 = 1:dress[11] = 1 & dressH[11] = 100 & dressB[11] = bedra
  1260. if dress12 = 1:dress[12] = 1 & dressH[12] = 100 & dressB[12] = bedra
  1261. if dress13 = 1:dress[13] = 1 & dressH[13] = 100 & dressB[13] = bedra
  1262. if dress14 = 1:dress[14] = 1 & dressH[14] = 100 & dressB[14] = bedra
  1263. if dress15 = 1:dress[15] = 1 & dressH[15] = 100 & dressB[15] = bedra
  1264. if dress16 = 1:dress[16] = 1 & dressH[16] = 100 & dressB[16] = bedra
  1265. if dress17 = 1:dress[17] = 1 & dressH[17] = 100 & dressB[17] = bedra
  1266. if dress18 = 1:dress[18] = 1 & dressH[18] = 100 & dressB[18] = bedra
  1267. if dress19 = 1:dress[19] = 1 & dressH[19] = 100 & dressB[19] = bedra
  1268. if dress20 = 1:dress[20] = 1 & dressH[20] = 100 & dressB[20] = bedra
  1269. if dress21 = 1:dress[21] = 1 & dressH[21] = 100 & dressB[21] = bedra
  1270. if dress22 = 1:dress[22] = 1 & dressH[22] = 100 & dressB[22] = bedra
  1271. if dress23 = 1:dress[23] = 1 & dressH[23] = 100 & dressB[23] = bedra
  1272. if dress24 = 1:dress[24] = 1 & dressH[24] = 100 & dressB[24] = bedra
  1273. if profi = 1:profi[1] = 1 & profiH[1] = 50 & profiB[1] = bedra
  1274. if profi2 = 1:profi[2] = 1 & profiH[2] = 50 & profiB[2] = bedra
  1275. if pants = 1:pants[1] = 1 & pantsH[1] = 50 & pantsB[1] = bedra
  1276. if pants2 = 1:pants[2] = 1 & pantsH[2] = 50 & pantsB[2] = bedra
  1277. if pants3 = 1:pants[3] = 1 & pantsH[3] = 50 & pantsB[3] = bedra
  1278. if pants4 = 1:pants[4] = 1 & pantsH[4] = 50 & pantsB[4] = bedra
  1279. if pants5 = 1:pants[5] = 1 & pantsH[5] = 50 & pantsB[5] = bedra
  1280. if latex = 1:latex[1] = 1 & latexH[1] = 50 & latexB[1] = bedra
  1281. if latex2 = 1:latex[2] = 1 & latexH[2] = 50 & latexB[2] = bedra
  1282. if hooker = 1:hooker[1] = 1 & hookerH[1] = 50 & hookerB[1] = bedra
  1283. if hooker2 = 1:hooker[2] = 1 & hookerH[2] = 50 & hookerB[2] = bedra
  1284. if hooker3 = 1:hooker[3] = 1 & hookerH[3] = 50 & hookerB[3] = bedra
  1285. if hooker4 = 1:hooker[4] = 1 & hookerH[4] = 50 & hookerB[4] = bedra
  1286. if hooker5 = 1:hooker[5] = 1 & hookerH[5] = 50 & hookerB[5] = bedra
  1287. if dressel1 = 1:odekis[1] = 1 & odekisH[1] = 50 & odekisB[1] = bedra
  1288. if odekis1 = 1:odekis[2] = 1 & odekisH[2] = 50 & odekisB[2] = bedra
  1289. if odekis2 = 1:odekis[3] = 1 & odekisH[3] = 50 & odekisB[3] = bedra
  1290. if odekis3 = 1:odekis[4] = 1 & odekisH[4] = 50 & odekisB[4] = bedra
  1291. if odekis4 = 1:odekis[5] = 1 & odekisH[5] = 50 & odekisB[5] = bedra
  1292. if odekis5 = 1:odekis[6] = 1 & odekisH[6] = 50 & odekisB[6] = bedra
  1293. if odekis6 = 1:odekis[7] = 1 & odekisH[7] = 50 & odekisB[7] = bedra
  1294. if odekis7 = 1:odekis[8] = 1 & odekisH[8] = 50 & odekisB[8] = bedra
  1295. if odekis8 = 1:odekis[9] = 1 & odekisH[9] = 50 & odekisB[9] = bedra
  1296. if odekis9 = 1:odekis[10] = 1 & odekisH[10] = 50 & odekisB[10] = bedra
  1297. end
  1298. --- stat ---------------------------------