# stat clr view gs 'dinSex2' !1095 if nippain = 2: if nippainday + 5 < daystart: $nippain = 'You have greatly hurt nipples.' nippain = 1 nippainday = daystart end if nippainday + 5 >= daystart:$nippain = 'You have greatly hurt nipples.' end if nippain = 1: if nippainday + 5 < daystart: $nippain = '' nippain = 0 end if nippainday + 5 >= daystart:$nippain = 'You have a little sore nipples.' end if painpub = 2: if painpubday + 5 < daystart: $painpub = 'You have very sore vagina.' painpub = 1 painpubday = daystart end if painpubday + 5 >= daystart:$painpub = 'You have very sore vagina.' end if painpub = 1: if painpubday + 5 < daystart: $painpub = '' painpub = 0 painpubday = daystart end if painpubday + 5 >= daystart:$painpub = 'You have a little sore vagina.' end if year = 2011 and katjaPreg = 0:katjaPreg = 1 if analplay >= 2 and anus <= 10:anus += 1 & analplay = 0 if analplay >= 4 and anus <= 15:anus += 1 & analplay = 0 if analplay >= 8 and anus <= 20:anus += 1 & analplay = 0 musle[1] = musle flex[1] = agil stamina[1] = vital * 3 wipo[1] = will intel[1] = intel krasota[1] = vnesh rost[1] = rost salo[1] = salo fat[1] = fat Bteh[1] = bteh Uteh[1] = uteh Zteh[1] = zteh !flex[0] = agil !stamina[0] = vital * 3 !krasota[0] = vnesh !wipo[0] = will if nopornowrestling = 0: nopornowrestling = 1 NPCnum = 30 NPCnow = 1 !shag = 1 gs 'npc' NoView = 1 NPCrost = 30 gs 'generation' NoView = 1 NPCrost = 30 gs 'generation' NoView = 1 NPCrost = 30 gs 'generation' NoView = 1 NPCrost = 30 gs 'generation' NoView = 1 NPCrost = 30 gs 'generation' $nikname[1] = 'schoolgirl' !musle[0] = 100 !flex[0] = agil !stamina[0] = vital * 3 !wipo[0] = will !intel[0] = 10 !krasota[0] = vnesh !rost[0] = 165 !salo[0] = 100 !fat[0] = 100 !$nikname[1] = 'steel Virgo' !musle[1] = 100 !flex[1] = 100 !stamina[1] = 300 !wipo[1] = 50 !intel[1] = 10 !krasota[1] = 10 !rost[1] = 165 !salo[1] = 100 !fat[1] = 100 end if newclo[131] = 1 and SchoolAtestat = 1 or newclo[131] = 1 and SchoolBlock = 1:newclo[131] = 0 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!Cheats if cheatHapri = 1:hapri = 1 if cheatNomakeup = 1: if mop = 0:mop = 1 end if cheatNosweat = 1 and sweat ! -3:set sweat = -3 if cheatNoEat = 1: if energy ! 19:energy = 19 if water ! 19:water = 19 end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if alko > 0 and frost > 0:frost = 0 if lernSkill >= 8:intel += 1 & lernSkill = 0 if numdress ! 131 and Sforma > 0:set Sforma = 0 if lern >= 10:intel += 1 & lern = 0 if GorSlut = 1:$gnikname = 'flirt' if GorSlut = 2:$gnikname = 'easy A' if GorSlut = 3:$gnikname = 'cocksucker' if GorSlut = 4:$gnikname = 'sex addict' if GorSlut = 5:$gnikname = 'slut' if GorSlut = 6:$gnikname = 'talking pussy' if GorSlut >= 2:KatjaKnowBJ = 1 if GorSlut >= 1 or preg > 0:KatjaKnowSex = 1 if film > 0 and kompromatLife < 10: !pornoaktrissa if kompromatLife < 10:kompromatLife = 10 $kompromatFoto = 'This photo is a screenshot from one of the porn movies you were part of.' end if fotoyousuck = 1 and kompromatLife < 9: !sucked in a couple of guys and was sfotografirovanna if kompromatLife < 9:kompromatLife = 9 $kompromatFoto = 'These pictures show you sucking two cocks at the same time.' end if fotoCFNMsex > 0 and kompromatLife < 8: kompromatLife = 8 $kompromatFoto = 'In this photo you see yourself getting fucked from behind by a random guy. This must have been taken in the stripclup.' end if fotoCFNMblowjobCum > 0 and kompromatLife < 7: !cum on face in the strip club kompromatLife = 7 $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.' end if fotoCFNMblowjob > 0 and kompromatLife < 6: !sucked in front of everyone kompromatLife = 6 $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.' end if stripdancesum > 0 and kompromatLife < 2: !stripper if kompromatLife < 2:kompromatLife = 2 $kompromatFoto = 'In this photo you are dancing on a pole, obviously someone photographed you, while you were on stage at the stripclub.' end if modelfoto > 0 and kompromatLife < 1: !photo model if kompromatLife < 1:kompromatLife = 1 $kompromatFoto = 'These are photos of you being naked, when you were taking pictures at the model agence.' end shameless = guy + bj + anal + hj + slutty * 2 + gang * 2 moneySUM = money + karta + stolmoney cumSUM = cumbelly + cumpussy + cumass + cumlip + cumface + cumfrot + cumanus gs 'dina' gs 'din2' if husbizvradd > 5:izvratH = 1 if husbharmin > 10:harakHusb = 0 if clrbelo <= 0:clrbelo = 0 & tanga = 0 if husband = 0: set husbizvradd = 0 set husbharmin = 0 set husbandMark = 0 set houseslut = 0 end if SNarkvnesh = 0:SNarkvnesh = 1 if SNarkTimes >= SNarkvnesh * 25: SNarkvnesh += 1 vidage += 1 end if gopota >= 20 and gnewQW = 1:set gnewQW = 2 if workDisk = 4 and week > 5:workDisk = 1 if workDisk = 3 and week > 5:workDiskAtkPlayer = 1 VeneraN = 0 if VeneraOnce > 0:VeneraOnce = 0 if SifacOnce = 1:VeneraN += 1 if GerpesOnce = 1:VeneraN += 1 if TriperOnce = 1:VeneraN += 1 Venera = VeneraN if fat < 0:fat = 0 if vokal < 0:vokal = 0 if vokal > 100:vokal = 100 if dance > 100:dance = 100 if stripdance > 100:stripdance = 100 if poledance > 100:poledance = 100 !'if libonce=0: libonce = 1 addqst 'lib/otg_lib_menu_eng.qsp' end' !'if youngshoponce=0: youngshoponce=1 ADDQST 'youngshop.qsp' end if qwestonce=0: qwestonce=1 ADDQST 'qwest/qwest.qsp' end' if bfa < 0:bfa = 0 if painQW = 0:set painweather = 6 if beg < 0:set beg = 0 if beg > 2000:set beg = 2000 if oficiant > 100:set oficiant = 100 if vagina > 30:set vagina = 30 if throat > 30:set throat = 30 if anus > 30:set anus = 30 if Jab > 120:set Jab = 120 if Punch > 120:set Punch = 120 if Kik > 120:set Kik = 120 if KikDef > 120:set KikDef = 120 if nark >= 30 and narkoman = 0:set narkoman = 1 if nark = 0 and narkoman = 0:set narkoman = 0 set boxing = Jab + Punch + Kik + KikDef if boxing > 100:set boxing = 100 if stren > 100 and mutagenP = 0:set stren = 100 if speed > 100 and mutagenS = 0:set speed = 100 if agil > 100 and mutagenA = 0:set agil = 100 if react > 100 and mutagenR = 0:set react = 100 if vital > 100 and mutagenV = 0:set vital = 100 if will > 100 and mutagenW = 0:set will = 100 if intel > 100 and mutagenI = 0 and student = 0 and diplom = 0:set intel = 100 if stren > 150 and mutagenP = 1:set stren = 150 if speed > 150 and mutagenS = 1:set speed = 150 if agil > 150 and mutagenA = 1:set agil = 150 if react > 150 and mutagenR = 1:set react = 150 if vital > 150 and mutagenV = 1:set vital = 150 if will > 150 and mutagenW = 1:set will = 150 if intel > 150 and mutagenI = 1 and student = 0 and diplom = 0:set intel = 150 if stren > 200 and mutagenP = 2:set stren = 200 if speed > 200 and mutagenS = 2:set speed = 200 if agil > 200 and mutagenA = 2:set agil = 200 if react > 200 and mutagenR = 2:set react = 200 if vital > 200 and mutagenV = 2:set vital = 200 if will > 200 and mutagenW = 2:set will = 200 if intel > 200 and mutagenI = 2 and student = 0 and diplom = 0:set intel = 200 if stren > 250 and mutagenP = 3:set stren = 250 if speed > 250 and mutagenS = 3:set speed = 250 if agil > 250 and mutagenA = 3:set agil = 250 if react > 250 and mutagenR = 3:set react = 250 if vital > 250 and mutagenV = 3:set vital = 250 if will > 250 and mutagenW = 3:set will = 250 if intel > 250 and mutagenI = 3 and student = 0 and diplom = 0:set intel = 250 if intel > 250:set intel = 250 if MagikDostup = 0: $levelUpString = 'Do you feel like that might be revealed within you and you gushed magic, lifting you to a new energy level.' if orgasm >= 1 and magik < 1:set magik = 1 & set glaraz += 1 & set rikudo += 500 & pl $levelUpString if orgasm >= 2 and magik < 2:set magik = 2 & set resnic += 1 & set rikudo += 500 & pl $levelUpString if orgasm >= 4 and magik < 3:set magik = 3 & set glaraz += 1 & set rikudo += 500 & pl $levelUpString if orgasm >= 8 and magik < 4:set magik = 4 & set resnic += 1 & set rikudo += 500 & pl $levelUpString if orgasm >= 16 and magik < 5:set magik = 5 & set glaraz += 1 & set rikudo += 500 & pl $levelUpString if orgasm >= 32 and magik < 6:set magik = 6 & set resnic += 1 & set rikudo += 1000 & pl $levelUpString if orgasm >= 64 and magik < 7:set magik = 7 & set glaraz += 1 & set rikudo += 1000 & pl $levelUpString if orgasm >= 100 and magik < 8:set magik = 8 & set rikudo += 1000 & pl $levelUpString if orgasm >= 200 and magik < 9:set magik = 9 & set rikudo += 1000 & pl $levelUpString if orgasm >= 300 and magik < 10:set magik = 10 & set rikudo += 2000 & pl $levelUpString if orgasm >= 400 and magik < 11:set magik = 11 & set rikudo += 4000 & pl $levelUpString if orgasm >= 500 and magik < 12:set magik = 12 & set rikudo += 4000 & pl $levelUpString if orgasm >= 600 and magik < 13:set magik = 13 & set rikudo += 4000 & pl $levelUpString if orgasm >= 700 and magik < 14:set magik = 14 & set rikudo += 4000 & pl $levelUpString if orgasm >= 800 and magik < 15:set magik = 15 & set rikudo += 8000 & pl $levelUpString if orgasm >= 900 and magik < 16:set magik = 16 & set rikudo += 8000 & pl $levelUpString if orgasm >= 1000 and magik < 17:set magik = 17 & set rikudo += 8000 & pl $levelUpString if orgasm >= 1100 and magik < 18:set magik = 18 & set rikudo += 8000 & pl $levelUpString if orgasm >= 1200 and magik < 19:set magik = 19 & set rikudo += 8000 & pl $levelUpString if orgasm >= 1300 and magik < 20:set magik = 20 & set rikudo += 16000 & pl $levelUpString if orgasm >= 1400 and magik < 20:set magik = 21 & set rikudo += 21000 & pl $levelUpString end !!!WD: Kept because of community kiosk extension if exhibi >= 4:pl 'You opened a new outfit ready' !!! if SUB >= DOM and DOM > 0:set SUB = SUB - DOM & set DOM = 0 if DOM >= SUB and SUB > 0:set DOM = DOM - SUB & set SUB = 0 if horny < 0:set horny = 0 if health > vital * 10 + stren * 5:set health = vital * 10 + stren * 5 if willpower > intel * 5 + will * 5:set willpower = intel * 5 + will * 5 if manna > intel * magik + magik * 100 + vital * 10 + rikudo:set manna = intel * magik + magik * 100 + vital * 10 + rikudo set mannamax = (intel * magik) + magik * 100 + vital * 10 + rikudo !set musle = strenbuf + vitalbuf if vidageday <= 0: set vidageday = 360 set vidage += 1 end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!TIME !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if nminut ! minut: !totminut playing time in minutes totminut += minut nminut = minut end if vgape > 0: if vgape = 3: if manna > mannamax / 4:manna = mannamax / 4 end if vgape = 2: if manna > mannamax / 2:manna = mannamax / 2 end end if agape > 0: if agape = 3: if manna > mannamax / 6:manna = mannamax / 6 end if agape = 2: if manna > mannamax / 3:manna = mannamax / 3 end end if vgape > 0: if vgapetime + 2500 <= totminut: if vgape = 1:vgape = 0 if vgape = 2:vgape = 1 & vgapetime = totminut if vgape = 3:vgape = 2 & vgapetime = totminut end end if agape > 0: if agapetime + 5760 <= totminut: if agape = 1:agape = 0 if agape = 2:agape = 1 & agapetime = totminut if agape = 3:agape = 2 & agapetime = totminut if anus > 1:anus -= 1 end end if sec >= 60: :loopsec minut += 1 sec -= 60 jump 'loopsec' end if minut >= 60: :loopmin if SbrosNerdism = 1:nerdism = will / 10 + orgasm if nerdism < 0:nerdism = 0 set hour += 1 set energy -= 1 set water -= 1 set son -= 1 set minut -= 60 if alko > 0: if alko >= 4: if beg > 0:beg -= 1 if volleyboll > 0:volleyboll -= 1 if alko >= 6: if stren > 10:stren -= 1 & salo += 3 if vital > 10:vital -= 1 & salo += 3 if intel > 10:intel -= 1 end end alko -= 1 end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!Avtoboy !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if hour >= 8 and hour <= 23 and NPCnum > 10: :markturnirotbort xf = 0 :markturnirotbortt xf += 1 turnirFighter[xf] = rand(2, NPCnum) if xf < 2:jump'markturnirotbortt' if turnirFighter[1] = turnirFighter[2]:jump'markturnirotbort' a = turnirFighter[1] i = turnirFighter[2] NoView = 1 gs 'Autofight' end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if shame > 0:shame -= 1 & manna -= 5 if smoker >= 20:smokerNeed += 1 if smokerNeed > 10 and InSleep = 0:manna -= manna * 10/100 if smokerNeed > 300:smokerNeed = 0 & smoker = 0 if StrongNarkota > 0:StrongNarkota -= 1 if SLomka > 0:SLomka += 1 & manna -= 500 if SLomka > 100 and StrongNarkota <= 0:SLomka = 0 & SNarkTimes = 0 set LCWorkRand = rand(1, 6) if narkoman = 1 and narkday ! day: set health -= 5 set willpower -= 5 set manna -= 10 end if tanga = 0 and ski =0 or glamur = 0 and tanga = 0:mosolpred += 1 if mosolpred >= 10: set mosol += 1 set mosolpred -= 10 end if mosol >= 50: manna -= 5 end if energy >= 25:energy -= 5 & fat += 1 if tanga = 1 and mosol > 0:mosol -= 1 if lipbalmstat > 0:lipbalmstat -= 1 if sickstage = 1:sick += 1 & sicktimer += 1 if sickstage = 1 and sicktimer >= 80:sicktimer = 0 & sickstage = 2 if sickstage = 2 and sick > 0:sick -= 1 if sickstage = 2 and sick <= 0:sick = 0 & sickstage = 0 if perkice > 0:perkice -= 1 if frost > 0:frost -= 1 if KGOLpers > 0: if KGHP < KGHPMAX:KGHP += 10 if KGManna < KGMannaMax:KGManna += 10 end if minut >= 60:jump 'loopmin' end if hour >= 24: if pirs_pain_ton > 0:pirs_pain_ton -= 1 if artompower <= 0:artompower = 3 if brow > 0 and browper = 0:brow -= 1 if shorthair=1: shorthairday +=1 if shorthairday >= 45:shorthairday = 0 & shorthair = 0 end if KatjaOTN > 0: if KatjaHorny > 0 and KatjaLust < 40:KatjaHorny -= rand(1, 3) if KatjaLust >= 40:KatjaHorny += rand(1, 3) if KatjaHorny < 0:KatjaHorny = 0 if KatjaHorny >= 100:KatjaHorny = 0 & KatjaMastr += 1 & KatjaLust += 1 end if volleysostav > 0:trenerepa -= 1 if birthday = day and birthmonth = month: !birthday set age += 1 set vidage += 1 end if horny > hornyStat: hornyStat = horny if pirsA > 0:horny += 1 if pirsB > 0:horny += 1 if pirsC > 0:horny += 1 if pirsD > 0:horny += 1 if pirsE > 0:horny += 1 if pirsF > 0:horny += 5 if pirsG > 0:horny += 5 if pirsN > 0:horny += 1 end if horny < hornyStat:hornyStat = horny !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!generation if NPCnum < 290: NPCnow = NPCnum NPCnum += rand(1, 3) gs 'npc' end if NPCnum >= 290 and NPCnum < 300: NPCnow = NPCnum NPCnum += 1 gs 'npc' end !End generation !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if kanikuli = 0:Suspeh -= 1 set dmishaevent = 0 if BuyHous = 2 and ArendHouseSL <= 0:ArendHouseSL = 0 & BuyHous = 0 & housr = 0 if BuyHous = 2 and ArendHouseSL > 0:ArendHouseSL -= 1 if Gspravka <= 0 and GspravkaT > 0:GspravkaT = 0 & Gspravka = 0 if GspravkaT > 0:Gspravka -= 1 if IvanPodstavaQW = 2 and PodpiskaNeviezd = 30:IvanPodstavaQW = 3 if IvanPodstavaQW = 2 and PodpiskaNeviezd > 0 and PodpiskaNeviezd < 30:PodpiskaNeviezd += 1 if salo > fat: salo -= 1 fat += 1 end if salo < fat: salo += 1 fat -= 1 end if strenbuf > stren:set strenbuf -= 1 if strenbuf < stren:set strenbuf += 1 if vitalbuf > vital:set vitalbuf -= 1 if vitalbuf < vital:set vitalbuf += 1 if agilbuf > agil:set agilbuf -= 1 if agilbuf < agil:set agilbuf += 1 if husband > 0 and husbandrink ! 11:set husbandrink = rand(0, 10) set inWorkYoungShop = 0 set husbandsexday = 0 set borsexkol = 0 set givisexday = 0 if shantsr > 0: set pay = shantsr * 5000 set karta += pay set shantsr = 0 end if shantbog > 0: :shantftb set shantftbgrand = rand(0, 10) if shantftbgrand > 2: set shantpopala += 1 set shantbog -= 1 if shantbog > 0:jump 'shantftb' end if shantftbgrand <= 2: set karta += 30000 set shantbog -= 1 if shantbog > 0:jump 'shantftb' end end set petersexday = 0 set klismaday1= 0 :loop set day += 1 set daystart += 1 set week += 1 set hour -= 24 !RFP if SifacOnce = 1:Sifilis += 1 if GerpesOnce = 1:Gerpes += 1 if TriperOnce = 1:Triper += 1 if KandidozOnce = 1:Kandidoz += 1 if beg >= 100 and beg < 1000:beg -= 1 if beg >= 1000 and beg < 1500:beg -= 2 if beg >= 1500 and beg < 2000:beg -= 3 if beg >= 2000:beg -= 4 set vidageday -= 1 if workDolgDay > 0:workDolgDay -= 1 if QWdogreiqTimer > 0:QWdogreiqTimer -= 1 if husband > 0:husbanday += 1 if kid > 0:kid += 1 if husband > 10 and husbanday > 0:husband -= 15 if fingal > 0:fingal -= 1 if husbandMark = 1 and husband <= 10: set husbizvradd = 0 set husbharmin = 0 set husbandMark = 0 set husband = 0 set divorced += 1 if KFOnLineReaga > 0:KFOnLineReaga -= 1 'Your husband has filed for a divorce.' end gs 'cikl' if nark > 0:set nark -= 1 if pregtime > 10:fat += 1 if hour >= 24:jump 'loop' end !payments if day = 25: if PersSecWork = 1 and PersSecWorkTimes > 0 and paydaybistrosec = 0: Pay = PersSecWorkTimes * 2500 PersSecWorkTimes = 0 money += Pay paydaybistrosec = 1 'You have received <> rubles salary for your job as a secretary on your bank account.' end if workKafe = 1 and paydayKafe = 0: set paydayKafe = 1 set pay = smenaKafe * 600 set money += pay set smenaKafe = 0 'You have received <> rubles salary for your job as a waitress in a cafe on your bank account.' end if workhosp = 1 and nopaypoly = 0: set pay = smena * 1000 set money += pay set smena = 0 nopaypoly = 1 'You have received <> rubles salary for your work in the clinic on your bank account.' end if worksalon = 1 and nopaysalon = 0: set pay = smena * 800 set money += pay set smena = 0 nopaysalon = 1 'You have received <> rubles salary for your work in a beauty salon on your bank account.' end if tanwork = 1 and nopaytanwork = 0: nopaytanwork = 1 set money += 25000 'You have received a salary of 25,000 rubles for your work as a house maid on your bank account.' end if workSec = 1 and paydaySec = 0: set paydaySec = 1 set pay = sekDay * 800 if officebestslut >= 3:set pay += 20000 set karta += pay set sekDay = 0 'You have received <> rubles salary for your job as a secretary on your bank account.' end if husband > 0 and paydayHusb = 0: paydayHusb = 1 if husbFin = 0:huspay = 15000 if husbFin = 1:huspay = 25000 if husbFin = 2:huspay = 40000 money += huspay 'Your husband has sent you <> rubles to your bank account.' end if stipuha = 1 and stipuhaday = 0:set stipuhaday = 1 & set money += 1200 & 'You have received 1,200 rubles scholarship on your bank account.' if housr = 1 and haday = 0:set haday = 1 & set money -= 3000 & 'You paid 3,000 rubles for your apartment.' if housr = 1 and electroday = 0: set electroday = 1 if elektro >= 800:set elektro = 800 + rand(0, 100) set money -= elektro 'You paid <> for electricity.' end if housr = 1 and kabel > 0 and kabelday = 0: set kabelday = 1 set money -= 300 'You have paid 300 rubles for cable TV.' end end if day ! 25: if paydayHusb = 1:paydayHusb = 0 if workKafe = 1 and paydayKafe = 1:set paydayKafe = 0 if workSec = 1 and paydaySec = 1:set paydaySec = 0 if housr = 1 and haday = 1:set haday = 0 if housr = 1 and electroday = 1:set electroday = 0 if housr = 1 and kabel > 0 and kabelday = 1:set kabelday = 0 if stipuhaday = 1:set stipuhaday = 0 if nopaytanwork = 1:nopaytanwork = 0 if nopaypoly = 1:nopaypoly = 0 if nopaysalon = 1:nopaysalon = 0 if paydaybistrosec = 1:paydaybistrosec = 0 end if sdaday = day and sdamonth = month and housr = 0: set housr = 1 'The term of your residental apartment lease expired.' end if month = 1 or month = 3 or month = 5 or month = 7 or month = 8 or month = 10 or month = 12: !31 if day > 31:day -= 31 & month += 1 elseif month = 2: !28 if day > 28:day -= 28 & month += 1 elseif month = 0: month = 1 if day > 31:day -= 31 & month += 1 elseif month = 13: month = 1 if day > 31:day -=31 & month += 1 else !30 if day > 30:day -= 30 & month += 1 end !'if day > 30: set day -= 30 set month += 1 end' if day = 0:set day = 1 if week > 7: :loopweek set week -= 7 set husbandrink = 0 if military = 1:set military = 0 if week > 7:jump 'loopweek' end if week = 1:set $week = 'Monday' if week = 2:set $week = 'Tuesday' if week = 3:set $week = 'Wednesday' if week = 4:set $week = 'Thursday' if week = 5:set $week = 'Friday' if week = 6:set $week = 'Saturday' if week = 7:set $week = 'Sunday' if month = 0:set month = 1 if month = 13:set month = 1 & set year += 1 If month = 1:set $month = 'January' & $mons = 'January' If month = 2:set $month = 'February' & $mons = 'February' If month = 3:set $month = 'March' & $mons = 'Martha' If month = 4:set $month = 'April' & $mons = 'April' If month = 5:set $month = 'May' & $mons = 'May' If month = 6:set $month = 'June' & $mons = 'June' If month = 7:set $month = 'July' & $mons = 'July' If month = 8:set $month = 'August' & $mons = 'August' If month = 9:set $month = 'September' & $mons = 'September' If month = 10:set $month = 'October' & $mons = 'October' If month = 11:set $month = 'November' & $mons = 'November' If month = 12:set $month = 'December' & $mons = 'December' if minut < 10:set $nilmin = '0' if minut >= 10:set $nilmin = '' if kid > 0: if year > yearkid[1] and markyear[1] ! year: if monthkid[1] = month and daykid[1] = day: markyear[1] = year kidage[1] += 1 end end end !moodlet !mannamax !totminut if Mud >= totminut: manna = mannamax $mud = 'You feel buoyed.' else $mud = '' end if nerdism > 0: if lastreadday = daystart: !You are completely healthy shine and a healthy glow. manna = mannamax SbrosNerdism = 0 $mudnerd='You are lost in a fantasy after reading the book.' end if lastreadday + 1 = daystart: !manna = mannamax SbrosNerdism = 0 $mudnerd='You a little bored and want to again plunge into a book.' end if lastreadday + 2 = daystart: SbrosNerdism = 0 if manna > mannamax / 2:manna -= 10 $mudnerd='Do you really want something to read.' end if lastreadday + 3 <= daystart: if manna > mannamax / 10:manna -= 10 SbrosNerdism = 1 $mudnerd='You terribly want at least something to read!!!' end !$mudnerd += 'lastread<> totminut<> <>' else SbrosNerdism = 0 $mudnerd = '' end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!END OF TIME !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! subage = 0 :metakasubage subage += 10 if subage + 10 < age: jump 'metakasubage' else subage = age - subage end if subage = 0 or subage >= 5: $letgoda = 'years' elseif subage = 1: $letgoda = 'year' else $letgoda = 'year' end subagevne = 0 :metakasubagevne subagevne += 10 if subagevne + 10 < vidage: jump 'metakasubagevne' else subagevne = vidage - subagevne end if subagevne ! 1: $letgoda2 = 'years' else $letgoda2 = 'year' end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!ENERGY !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if son < 0: set son = 0 set manna -= 5 end if energy < 0: set energy = 0 set health -= 1 if fat = 0 and stren + vital > 0: set stren -= 1 set vital -= 1 set energy += 2 end if fat = 0 and stren + vital <= 0: set over = 3 gt 'gameover' exit end if fat > 0: set fat -= 1 set energy += 2 end end if water < 0: set water = 1 set health -= 5 set willpower -= 1 end if manna <= 0: set manna = 1 set health -= 5 set willpower -= 5 !set fat += 1 end if health < 0: set over = 1 gt 'gameover' exit end if willpower < 0 and StoryLine = 0: set over = 2 gt 'gameover' exit end if saloonce = 0 and opPRE = 0: set saloonce = 1 set salo = fat set strenbuf = stren set vitalbuf = vital set agilbuf = agil end gs 'body' !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! if health = vital * 10 + stren * 5:set $health = 'You are very healthy.' if willpower = intel * 5 + will * 5:set $willpower = 'Your mind is clear.' if manna = intel * magik + magik * 100 + vital * 10 + rikudo:set $manna = 'You are in a good mood.' if health < vital * 10 + stren * 5 and health >= (vital * 10 + stren * 5) * 75 / 100:set $health = 'You are healthy.' if health < (vital * 10 + stren * 5) * 75 / 100 and health >= (vital * 10 + stren * 5) * 50 / 100:set $health = 'you are not healthy.' if health < (vital * 10 + stren * 5) * 50 / 100 and health >= (vital * 10 + stren * 5) * 25 / 100:set $health = 'You are sick.' if health < (vital * 10 + stren * 5) * 25 / 100:set $health = 'You are on the verge of death.' if willpower < intel * 5 + will * 5 and willpower >= (intel * 5 + will * 5) * 75 / 100:set $willpower = 'You are mostly in thought.' if willpower < (intel * 5 + will * 5) * 75 / 100 and willpower >= (intel * 5 + will * 5) * 50 / 100:set $willpower = 'You are depressed.' if willpower < (intel * 5 + will * 5) * 50 / 100 and willpower >= (intel * 5 + will * 5) * 25 / 100:set $willpower = 'You are in depression.' if willpower < (intel * 5 + will * 5) * 25 / 100:set $willpower = 'You are on the verge of madness.' if manna < intel * magik + magik * 100 + vital * 10 + rikudo and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 75 / 100:set $manna = 'You have a normal mood.' if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 75 / 100 and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 50 / 100:set $manna = 'You are in a bad mood.' if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 50 / 100 and manna >= (intel * magik + magik * 100 + vital * 10 + rikudo) * 25 / 100:set $manna = 'You are in a terrible mood.' if manna < (intel * magik + magik * 100 + vital * 10 + rikudo) * 25 / 100:set $manna = 'Your mood is below any skirting and urban sanitation.' if energy >= 20:set $energy = 'You couldn''t eat one more bite.' if energy < 20 and energy >= 10:set $energy = 'You''re not really hungry, but a small snack would be very welcome.' if energy < 10 and energy >= 2:set $energy = 'You are hungry.' if energy < 2:set $energy = 'You are very hungry.' if water >= 20:set $water = 'You are not thirtsy at all.' if water < 20 and water >= 10:set $water = 'You are slightly thirsty.' if water < 10 and water >= 2:set $water = 'You are thirsty.' if water < 2:set $water = 'You are very thirsty.' if son >= 20:set $son = 'You are well rested.' if son < 20 and son >= 10:set $son = 'You are slightly tired.' if son < 10 and son >= 2:set $son = 'You are tired.' if son < 2:set $son = 'You are very tired.' $din_shame = { !dynamic din_shame !shame += 1 !if shame >= 5:shame = 4 & shameless += 1 !if shame >= 4:set $shame = 'of your cheeks blaze zalivshego them blush with shame.' !if shame = 3:set $shame = 'Your cheeks are red from the blush of shame.' !if shame = 2:set $shame = 'You nemnog opokrasneli shame.' !if shame = 1:set $shame = 'You´re a little confused.' !if shame <= 0:set $shame = 'You´re a little confused.' !gs 'stat' } !if shame >= 5:shame = 4 & shameless += 1 !if shame >= 4:set $shame = 'of your cheeks blaze zalivshego them blush with shame.' !if shame = 3:set $shame = 'Your cheeks are red from the blush of shame.' !if shame = 2:set $shame = 'You nemnog opokrasneli shame.' !if shame = 1:set $shame = 'You´re a little confused.' !if shame <= 0:set $shame = 'You´re a little confused.' set $holyday = '' kanikuli = 0 if (month = 10 and day >= 27) or (month = 11 and day <= 4):set $holyday = 'Autumn holidays.' & kanikuli = 1 if (month = 12 and day >= 29) or (month = 1 and day <= 13):set $holyday = 'Winter Break.' & kanikuli = 2 if (month = 3 and day >= 25):set $holyday = 'Spring Break.' & kanikuli = 3 if (month = 5 and day >= 25) or month = 6 or month = 7 or month = 8:set $holyday = 'Summer holidays.' & kanikuli = 4 if month = 1 and day = 1:set $holyday = 'New Year' & kanikuli = 5 if hour >= 8 and hour < 16 and week < 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and schoolProgulDay ! day: !absence from school schoolprogul += 1 schoolProgulDay = day end !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!Beginning Description !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !pl'time <> hours <<$nilmin>><> minutes' !pl 'At_The_Moment <> <<$month>> <>year, <<$week>>.' if hour < 10 : if minut > 9 : pl '<>:<> <<$week>> <> <<$month>> <>' else pl '<>:0<> <<$week>> <> <<$month>> <>' end else if minut > 9 : pl '0<>:<> <<$week>> <> <<$month>> <>' else pl '0<>:0<> <<$week>> <> <<$month>> <>' end end pl '<> rubles in your wallet.' if StoryLine > 0 and SchoolAtestat = 0:pl '<<$holyday>>' if birthday = day and birthmonth = month:pl 'Today is your birthday.' !if shame > 0:pl '<<$shame>>' pl '<<$manna>>' if horny >= 90:pl 'It takes an incredible amount of willpower not to touch yourself all the time.' if horny >= 50 and horny < 90:pl 'You have trouble focusing at times, as your mind drifts to sex.' if ETOmenu=1: pl '<<$health>>' pl '<<$willpower>>' pl '<<$energy>>' pl '<<$water>>' pl '<<$son>>' end if ETOmenu = 0: set a = horny !set a1 = horny gs 'indik', '2' pl '<<$ind>> Arousal' healthmax=(vital * 10 + stren * 5) set a = health * 100 / healthmax set a1 = health gs 'indik', '1' pl '<<$ind>> Health' willpowermax = intel * 5 + will * 5 set a = willpower * 100 / willpowermax set a1 = willpower gs 'indik', '1' pl '<<$ind>> Willpower' set a = manna * 100 / mannamax set a1 = manna gs 'indik', '1' pl '<<$ind>> Mood' set a = energy * 4 set a1 = energy gs 'indik', '1' pl '<<$ind>> Hunger' set a = water * 5 set a1 = water gs 'indik', '1' pl '<<$ind>> Thirst' set a = son * 4 set a1 = son gs 'indik', '1' pl '<<$ind>> Sleep' end $smoker = { siga -= 1 smoker += 1 smokeHour = hour smokeDay = day smokeminut = minut + 5 smokeNeed = 0 manna += 100 wipo += 100 if energy < 20:energy += 3 gs 'stat' } if $mud ! '':pl '<<$mud>>' if siga <= 0 and smoker >= 20:pl 'You have run out of cigarettes.' if smokeNeed > 0 and siga > 0 and smoker >= 20: pl 'You want to smoke. You have <> cigarettes left' elseif siga > 0 and smoker >= 20: pl 'You have <> cigarettes left' end if siga > 0 and smoker < 20: if smokeHour = hour and smokeday = day and smokeminut >= minut: else pl 'You have <> cigarettes left' end end if smokeHour = hour and smokeday = day and smokeminut >= minut:pl 'You are smoking a cigarette' if pirs_pain_ton > 0: if pirs_pain_ton = 1:pl'You have aches language and it is a little swollen.' if pirs_pain_ton = 2:pl'You often aches language and it is noticeably swollen.' if pirs_pain_ton > 2:pl'Do you have a sore tongue, he was very swollen and almost tossed in the mouth.' end if nippain > 0:pl'<<$nippain>>' if painpub > 0:pl'<<$painpub>>' if opPRE = 0:pl '<<$mop>> and your hair is <<$hapri>>.' !!!!!!!!!!!!!!!!!!! if sweat = 1:pl 'You´re sweating.' if sweat = 2:pl 'You are a little smelly.' if sweat = 3:pl 'You stink.' if sweat > 3:pl 'You stink.' if isprok = 0 and mesec > 0 and preg = 0:pl 'You are bleeding between your legs, urgently need a tampon.' if isprok = 1 and mesec > 0 and preg = 0:pl 'You are having your period.' if preg = 1 and pregtime = 280:pl 'You urgently need to go to the hospital' if preg = 1:set rodtime = 280 - pregtime if preg = 1 and pregtime < 280 and pregtime > 6:pl 'You have been pregnant for <> days. Days until delivery <>' if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:pl 'You have a work shift as a waitress in a cafe' if hour >= 8 and hour < 9 and week < 5 and workSec >= 1:pl 'You have a work shift as a secretary' if PersSecWork = 1 and week < 6 and hour < 10 and hour >= 5:pl 'You have a work shift as a secretary' $cumeater = { cumlip += 1 vaf += 1 cumbelly = 0 gs 'stat' 'You have collected sperm from fingers and licked their stomach felt tart taste of semen.' } $cumeater2 = { cumlip += 1 vaf += 1 cumpussy = 0 gs 'stat' 'You have collected sperm from fingers pussy and licked them feeling tart taste of semen.' } $cumeater3 = { cumlip += 1 vaf += 1 cumass = 0 gs 'stat' 'You have collected sperm from fingers and licked their buttocks felt tart taste of semen.' } $cumeater4 = { cumlip += 1 vaf += 1 cumface = 0 gs 'stat' 'You have collected fingers semen from her face and licked them feeling tart taste of semen.' } $cumeater5 = { cumlip += 1 vaf += 1 cumfrot = 0 gs 'stat' 'You have collected sperm from fingers and licked their clothes felt tart taste of semen.' } $cumeater6 = { cumlip += 1 vaf += 1 cumanus = 0 gs 'stat' 'You have collected fingers semen out of the anus and lick their feeling tart taste of semen.' } !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !'лицо' !'Your face' !'Your ass' if cumbelly > 0 and swallow < 10:pl 'Your stomach is smeared with sperm.' if cumbelly > 0 and swallow >= 10:pl 'Your stomach is smeared with sperm.' if cumpussy > 0 and swallow < 10:pl 'Sperm slowly flows from your pussy.' if cumpussy > 0 and swallow >= 10:pl 'Sperm slowly flows from your pussy.' if cumass > 0 and swallow < 10:pl 'Your ass is smeared with semen.' if cumass > 0 and swallow >= 10:pl 'Your ass is smeared with semen.' if cumlip > 0:pl 'Your mouth smells like sperm.' if cumface > 0 and swallow < 10:pl 'Your face and hair are smeared with sperm.' if cumface > 0 and swallow >= 10:pl 'Your face and hair are smeared with sperm.' if cumfrot > 0 and swallow < 10:pl 'You have semen stains on your clothes.' if cumfrot > 0 and swallow >= 10:pl 'You have semen stains on your clothes.' if cumanus > 0 and swallow < 10:pl 'Sperm slowly flows from your ass.' if cumanus > 0 and swallow >= 10:pl 'Sperm slowly flows from your ass.' if vgape = 3:pl 'You have very sore vagina, you can hardly even walk, while trying to keep your feet apart.' if vgape = 2:pl 'You have a sore vagina and you can hardly keep your feet together.' if vgape = 1:pl 'You have a slightly sore vagina.' if agape = 3:pl 'You have very sore anus and it emits blood.' if agape = 2:pl 'You have a sore anus.' if agape = 1:pl 'You have a slightly sore and itchy anus.' if Gerpes >= 3:pl 'On your lips sores. All signs of genital herpes.' if Gerpes < 10 and Gerpes >= 5:pl 'Your pussy flushed and highly itchy. This genital herpes.' if Gerpes >= 10:pl 'On your pussy sores appeared. This genital herpes.' if Gerpes >= 20:pl 'cover your ass sores of genital herpes.' if Sifilis >= 21 and Sifilis < 50:pl 'You have jumped big, hard sore on the lip.' if Sifilis >= 50:pl 'syphilitic rash covers your whole body.' if Triper > 2:pl 'From the vaginal white discharge come out strong and stinging when urinating. Just out of the vagina hard and nasty smells.' if Kandidoz > 30:pl 'Do you thrush.' if SLomka > 0:pl 'You are very bad and hurt all the bones. Do you break-up' if narkday ! day and narkoman = 1:pl 'You are very bad and hurt all the bones. Urgently need pale lady' if fingal > 0:pl 'You have a black eye on the face.' if tanga = 0 and ski = 1 or tanga = 0 and glamur = 1:pl 'blush of shame fills your face, you do not put her panties and now from under your short skirt sparkles sometimes naked ass.' if tanga = 0 and ski = 0 and glamur = 0 and opPRE = 0 and nude = 0:pl 'you do not put panties.' if mosol >= 30 and mosol < 50:pl 'Pisya flushed and itchy, it seems you are rubbed by clothing.' if mosol >= 50:pl 'Pisya hurts and each step is given through the pain, she Crimson and visible scuffs from walking without underwear.' if analplugIN = 1:pl 'Do you in the ass anal plug is inserted.' if vibratorin = 1:pl 'Do you work in the vagina vibrator.' if young_shop_work = 1 and hour = 14 and week < 6:pl 'Within 15 hours you have to be at work in the shop Keys Puss.' if young_shop_work = 1 and hour = 16 and week < 6 and inWorkYoungShop = 0:young_shop_miss += 1 & pl 'You squandered work.' if workrin = 1: if week = 2 or week = 4 or week = 6: if hour = 7:pl ' 8m hours you work on the market.' if hour = 8:pl 'You need to work on the market.' end end if frost > 0 and frost <= 5:pl 'You have a little chilly.' if frost > 5 and frost < 11:pl 'Are you cold.' if frost >= 11:pl 'You are very cold.' if sick = 1:pl 'you that is not good, tickle in the throat and a little runny nose.' if sick > 1 and sick < 24:pl 'you chills. You flowing from the nose and throat was raw, you cough and sneeze - it looks like you got cold.' if sick >= 24 and sick < 48:pl 'You have a fever. You clogged nose, it hurts to swallow - throat aches. You continually cough and sneeze - it looks like you prosudilis.' if sick >= 48 and sick < 72:pl '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.' if sick >= 72:pl '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.' if $mudnerd ! '':pl '<<$mudnerd>>' if hour < meethour and svidanieA = 1:pl '<<$boyA>> will be waiting for you near your home in <<$meetlocation>> at <> hours' if hour = meethour and svidanieA = 1:pl '<<$boyA>> is waiting for you around the house in <<$meetlocation>>.' if meetday < daystart and svidanieA = 1:bfA -= 10 & svidanieA = 0 if StrongNarkota > 20:pl 'You are stoned.' if alko > 0: if alko < 3:pl 'You´re a little dizzy.' if alko >= 3 and alko < 6:pl 'You´re drunk.' if alko >= 6:pl 'You´re wasted.' end if day = 29 and month = 12 and year = 2010 and StoryLine = 1: if hour >= 5 and hour <= 14:pl 'At 14 o''clock a New Year`s party will be held.' end gs 'din_bad' if bag > 0:pl 'Handbag' !zero checks marriage set proverka1 = 0 set proverka2 = 0 set proverka3 = 0 set proverka4 = 0 set proverka5 = 0 !clothing repair, for old saved. if remdrop = 0: set remdrop = 1 if jeans = 1:set jeans[1] = 1 & set jeansH[1] = 50 & set jeansB[1] = bedra if jeans2 = 1:set jeans[2] = 1 & set jeansH[2] = 50 & set jeansB[2] = bedra if jeans3 = 1:set jeans[3] = 1 & set jeansH[3] = 50 & set jeansB[3] = bedra if jeans4 = 1:set jeans[4] = 1 & set jeansH[4] = 50 & set jeansB[4] = bedra if jeans5 = 1:set jeans[5] = 1 & set jeansH[5] = 50 & set jeansB[5] = bedra if yoga = 1:set yoga[1] = 1 & set yogaH[1] = 50 if yoga2 = 1:set yoga[2] = 1 & set yogaH[2] = 50 if yoga3 = 1:set yoga[3] = 1 & set yogaH[3] = 50 if yoga4 = 1:set yoga[4] = 1 & set yogaH[4] = 50 if yoga5 = 1:set yoga[5] = 1 & set yogaH[5] = 50 if yoga6 = 1:set yoga[6] = 1 & set yogaH[6] = 50 if yoga7 = 1:set yoga[7] = 1 & set yogaH[7] = 50 if yoga8 = 1:set yoga[8] = 1 & set yogaH[8] = 50 if yoga9 = 1:set yoga[9] = 1 & set yogaH[9] = 50 if yoga10 = 1:set yoga[10] = 1 & set yogaH[10] = 50 if yoga11 = 1:set yoga[11] = 1 & set yogaH[11] = 50 if yoga12 = 1:set yoga[12] = 1 & set yogaH[12] = 50 if yoga13 = 1:set yoga[13] = 1 & set yogaH[13] = 50 if yoga14 = 1:set yoga[14] = 1 & set yogaH[14] = 50 if yoga15 = 1:set yoga[15] = 1 & set yogaH[15] = 50 if yoga16 = 1:set yoga[16] = 1 & set yogaH[16] = 50 if yoga17 = 1:set yoga[17] = 1 & set yogaH[17] = 50 if yoga18 = 1:set yoga[18] = 1 & set yogaH[18] = 50 if sarafan = 1:set sarafan[1] = 1 & set sarafanH[1] = 50 if sarafan2 = 1:set sarafan[2] = 1 & set sarafanH[2] = 50 if short = 1:set short[1] = 1 & set shortH[1] = 50 & set shortB[1] = bedra if short2 = 1:set short[2] = 1 & set shortH[2] = 50 & set shortB[2] = bedra if short3 = 1:set short[3] = 1 & set shortH[3] = 50 & set shortB[3] = bedra if short4 = 1:set short[4] = 1 & set shortH[4] = 50 & set shortB[4] = bedra if short5 = 1:set short[5] = 1 & set shortH[5] = 50 & set shortB[5] = bedra if skirt = 1:set skirt[1] = 1 & set skirtH[1] = 50 & set skirtB[1] = bedra if skirt2 = 1:set skirt[2] = 1 & set skirtH[2] = 50 & set skirtB[2] = bedra if skirt3 = 1:set skirt[3] = 1 & set skirtH[3] = 50 & set skirtB[3] = bedra if skirt4 = 1:set skirt[4] = 1 & set skirtH[4] = 50 & set skirtB[4] = bedra if skirt5 = 1:set skirt[5] = 1 & set skirtH[5] = 50 & set skirtB[5] = bedra if dress = 1:set dress[1] = 1 & set dressH[1] = 100 & set dressB[1] = bedra if dress2 = 1:set dress[2] = 1 & set dressH[2] = 100 & set dressB[2] = bedra if dress3 = 1:set dress[3] = 1 & set dressH[3] = 100 & set dressB[3] = bedra if dress4 = 1:set dress[4] = 1 & set dressH[4] = 100 & set dressB[4] = bedra if dress5 = 1:set dress[5] = 1 & set dressH[5] = 100 & set dressB[5] = bedra if dress6 = 1:set dress[6] = 1 & set dressH[6] = 100 & set dressB[6] = bedra if dress7 = 1:set dress[7] = 1 & set dressH[7] = 100 & set dressB[7] = bedra if dress8 = 1:set dress[8] = 1 & set dressH[8] = 100 & set dressB[8] = bedra if dress9 = 1:set dress[9] = 1 & set dressH[9] = 100 & set dressB[9] = bedra if dress10 = 1:set dress[10] = 1 & set dressH[10] = 100 & set dressB[10] = bedra if dress11 = 1:set dress[11] = 1 & set dressH[11] = 100 & set dressB[11] = bedra if dress12 = 1:set dress[12] = 1 & set dressH[12] = 100 & set dressB[12] = bedra if dress13 = 1:set dress[13] = 1 & set dressH[13] = 100 & set dressB[13] = bedra if dress14 = 1:set dress[14] = 1 & set dressH[14] = 100 & set dressB[14] = bedra if dress15 = 1:set dress[15] = 1 & set dressH[15] = 100 & set dressB[15] = bedra if dress16 = 1:set dress[16] = 1 & set dressH[16] = 100 & set dressB[16] = bedra if dress17 = 1:set dress[17] = 1 & set dressH[17] = 100 & set dressB[17] = bedra if dress18 = 1:set dress[18] = 1 & set dressH[18] = 100 & set dressB[18] = bedra if dress19 = 1:set dress[19] = 1 & set dressH[19] = 100 & set dressB[19] = bedra if dress20 = 1:set dress[20] = 1 & set dressH[20] = 100 & set dressB[20] = bedra if dress21 = 1:set dress[21] = 1 & set dressH[21] = 100 & set dressB[21] = bedra if dress22 = 1:set dress[22] = 1 & set dressH[22] = 100 & set dressB[22] = bedra if dress23 = 1:set dress[23] = 1 & set dressH[23] = 100 & set dressB[23] = bedra if dress24 = 1:set dress[24] = 1 & set dressH[24] = 100 & set dressB[24] = bedra if profi = 1:set profi[1] = 1 & set profiH[1] = 50 & set profiB[1] = bedra if profi2 = 1:set profi[2] = 1 & set profiH[2] = 50 & set profiB[2] = bedra if pants = 1:set pants[1] = 1 & set pantsH[1] = 50 & set pantsB[1] = bedra if pants2 = 1:set pants[2] = 1 & set pantsH[2] = 50 & set pantsB[2] = bedra if pants3 = 1:set pants[3] = 1 & set pantsH[3] = 50 & set pantsB[3] = bedra if pants4 = 1:set pants[4] = 1 & set pantsH[4] = 50 & set pantsB[4] = bedra if pants5 = 1:set pants[5] = 1 & set pantsH[5] = 50 & set pantsB[5] = bedra if latex = 1:set latex[1] = 1 & set latexH[1] = 50 & set latexB[1] = bedra if latex2 = 1:set latex[2] = 1 & set latexH[2] = 50 & set latexB[2] = bedra if hooker = 1:set hooker[1] = 1 & set hookerH[1] = 50 & set hookerB[1] = bedra if hooker2 = 1:set hooker[2] = 1 & set hookerH[2] = 50 & set hookerB[2] = bedra if hooker3 = 1:set hooker[3] = 1 & set hookerH[3] = 50 & set hookerB[3] = bedra if hooker4 = 1:set hooker[4] = 1 & set hookerH[4] = 50 & set hookerB[4] = bedra if hooker5 = 1:set hooker[5] = 1 & set hookerH[5] = 50 & set hookerB[5] = bedra if dressel1 = 1:set odekis[1] = 1 & set odekisH[1] = 50 & set odekisB[1] = bedra if odekis1 = 1:set odekis[2] = 1 & set odekisH[2] = 50 & set odekisB[2] = bedra if odekis2 = 1:set odekis[3] = 1 & set odekisH[3] = 50 & set odekisB[3] = bedra if odekis3 = 1:set odekis[4] = 1 & set odekisH[4] = 50 & set odekisB[4] = bedra if odekis4 = 1:set odekis[5] = 1 & set odekisH[5] = 50 & set odekisB[5] = bedra if odekis5 = 1:set odekis[6] = 1 & set odekisH[6] = 50 & set odekisB[6] = bedra if odekis6 = 1:set odekis[7] = 1 & set odekisH[7] = 50 & set odekisB[7] = bedra if odekis7 = 1:set odekis[8] = 1 & set odekisH[8] = 50 & set odekisB[8] = bedra if odekis8 = 1:set odekis[9] = 1 & set odekisH[9] = 50 & set odekisB[9] = bedra if odekis9 = 1:set odekis[10] = 1 & set odekisH[10] = 50 & set odekisB[10] = bedra end --- stat ---------------------------------