# start
killall
close all
!addqst 'car.qsp'
usehtml = 1
debug = 1
showstat 0
showobjs 0
showinput 0
disablescroll = 1
!nosave 0
$ongload = 'loadg'
$ongsave = 'saveg'
$onnewloc = 'LOCA'
$onobjsel = 'onobjsel'
$counter = 'counter'
$usercom = 'inputProcessing'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
$fname = 'Tahoma'
fsize = 12
$version = '0.2.5e (Minor G & M bugfix) (If you haven''t updated your image library recently, you may need to do so for hairstyles to work properly)'
*nl
*nl
'
'
'Girl Life [English Community Version]
'
*nl
'This is game is based on the russian game ЭТО by DeGross.'
*nl
'
'
*nl
'Version <<$version>>'
*nl
*nl
'Children under 18 years are strictly forbidden to play'
*nl
*nl
'This game is about the simulated life of a woman containing elements of RPG, strategy, porn and magical combat.'
'You may choose what kind of life the character will leave according to your play style, conscience or even personal beliefs.'
'We will try to avoid rights and wrongs during the game.'
!!!! Recent Version Tracking Block !!!!!
*nl
'Recent Version Tracking:'
*nl
"0.2.5e"
'- Fixed bug making G & M officewear un-buyable'
'- Fixed bang-less buns not calling images correctly'
'- Updated start-selection screen to be actually relevant'
*nl
'0.2.5d:'
'- Fixed a bug that prevented you to work as a Prostitute at the street near the park'
'- Created subfolders for the different hairstyles. It makes it easier to find missing pictures or replace them. (Image library update!)'
*nl
'0.2.5c (released by TFGS-User centerflag982, accidently named 0.2.5b aswell):'
'- Fixed a bug, that prevented your from removing your pigtails.'
*nl
'0.2.5b (released by TFGS-User Maruda):'
'- Added the Hairsalon in the Citycenter and the Barbershop in the small town.'
'- Fixed a bug with the tailor, who bought some of your clothes instead of resizing them.'
*nl
'0.2.5a:'
'- Fixed a bug, which didn''t allow you to see your breasts.'
'- Fixed a bug, which caused a DEBUG-Error to appear at the tailor and the nightclub.'
*nl
'0.2.5:'
'- Added a lot more hairstyles'
'-- For the numberphiles between you, there are 216 ways to style your hair, 175 have pictures.'
'-- Cheat Menu to tinker around with your hair, it also tells you how your current hair looks.'
'- Added the Hairsalon in the Mall'
'- Added the Barbershop in the small town, cheaper & faster than the hairsalon, but doesn''t do braided hair'
'- While I''m not a native english speaker, I tried to fix some of the broken english'
'-- Done in following locations: street, down, Nord, club, park'
'- Additional conditions to get into the club.'
'-- Jeans, Shorts, Pants and Kis-Clothes can get you in.'
'--- Jeans, Shorts and Pants require a certain level of looks/beauty (vnesh) to get you in.'
'---- When you wear a skirt or shorts, you now should make sure, you shaved your legs. The folks guarding the entrance don''t like hairy legs.'
'- Excluded the rape events at the home street for now.'
'- VIP-Card price at the night club lowered from 50.000 to 10.000 rubles, as the price of one card stood in no, for me at least, comprehensible relation to other prices.'
'- The park is now a central park, from where you can walk to the others citys districts if you so desire.'
'-- Homestreet -> Park => roughly 20 Minute Walk'
'-- City Center -> Park => roughly 48 Minute Walk'
'-- Northern District -> Park => roughly an hour of walking.'
'--- Once you are in the park, it takes the same amount of time to get to another respectable area.'
'- Excluded the direction argument ''prost'' inside the location ''park'', as nothing links to it (anymore). Prostitution itself takes place in a location called ''prostitute''. ''prost'' seems to be the remnant of an older version of ETO. It should be safe to remove, if no gamebreaking bugs appear.'
'- TFGS-user "kevlar" pointed out a bug in the fitness studio, you get a Debug-Message once you win the amateur fight. This bug occured due to a spelling mistake and has been fixed.'
!!!! Recent Version Tracking Block !!!!!
StoryLine = 0
MagikDostup = 0
$name = 'Michael'
$surname = 'Kuznetsov'
age = 35
vidage = 35
year = 2010
month = 5
week = 1
hour = 7
day = 25
!!body
rost = 186
fat = 130
dick = 0
energy = 15
water = 15
son = 16
!!stats
stren = 160
speed = 50
agil = 50
vital = 160
intel = 50
will = 100
react = 50
health = vital * 10
willpower = intel * 5 + will * 5
manna = (intel * magik) + vital * 5
BDSMfilm = 0
pornstudio = 0
pfilmSTOP = 0
money = 1500
opPRE = 1
tanga = 1
clrbelo = 1
GameUpdate = 1
update_2014_08_28 = 1
act 'Start':
cla
gt 'begin'
end
if music_on = 0:
inited = 1
music_on = 1
volume = 100
$music_theme = 'sukizaebali'
gs 'init_music'
end
! WD: Set variable to store Image needed HTML code
set $ImageNeededPlacholder = ''
--- start ---------------------------------
# gameover
'GAME OVER'
if over = 1:
gs 'stat'
'You died'
elseif over = 2:
''
'You''re mad and started to run around town naked screaming "I am a man!". You quickly alerted the police and you were taken to a metal hospital. There you got put in a straitjacket and placed in a room with soft walls. You spent the rest of your days in happy delusions about your family and about being a man again. But the delusions never became reality.'
*nl
'Hint:'
'When your mood falls, your mind weakens and finally breaks. Do not forget, it is difficult for a normal man to come to terms with the fact that he is now a woman. In order to keep your mood and psyche at an acceptable level make sure you are of healthy weight, have at least a TV and visit the psychotherapist. Strengthening your will and intellect also increases the maximum value of your mood, such that the harmful effects will not be as devastating.'
elseif over = 3:
'You have died of starvation. A stupid way to die, but apparently it''s one of the consequences of anorexia.'
elseif over = 4:
'You died from complications in childbirth.'
elseif over = 5:
'You tried to jump, but immediately found themselves in a strange place around some dilapidated walls with obscene graffiti, you could not move do not cry, when suddenly the door opened and entered what that fat guy, he undid his pants and turned his back to you situated above you your ass. Here you''ve got it, witch kept her promise and turned you into a jerk at the station.'
'So you spent the rest of your days swallowing shit until 50 years later, the train station is not started to repair and you just broke and took the pieces to the dump.'
elseif over = 6:
'You suddenly feel a sharp piercing pain in the abdomen, then another and another. "Greetings to you from the boys" says a figure with downcast eyes while it moves away. You realize you are standing in a puddle of your own blood, and have multiple stab wounds in your stomach. The last thing you saw was the fast approaching land.'
elseif over = 7:
'The last thing you saw was a police baton, flying into your face. You were beaten to death, and your early surmise was written in as an accident.'
elseif over = 8:
''
'"At some point in time you can turn off this path ?" - you are trying to understand, mouth open under another batch of golden rain or Cum. And, without finding an answer, regularly swallow all.'
end
act 'End?':gt 'gameover', 'endscreen'
if $ARGS[0] = 'endscreen':
showstat 0
showobjs 0
showinput 0
fcolor = RGB(255,255,255)
bcolor = RGB(0,0,0)
lcolor = RGB(106,90,205)
cls
cla
if over = 8:
*nl & *nl
'end
'
'Open-ended - heroin whore!
'
*nl & *nl
''
else
*nl & *nl & *nl & *nl & *nl & *nl & *nl & *nl & *nl & *nl
'end
'
end
act 'Main menu':gt 'start'
act 'Upload preservation':opengame
act 'Download the latest cars-preservation':gt 'gameover', 'load_autosave'
end
if $ARGS[0] = 'Load autosave':
if StoryLine = 0:
opengame 'autosave.sav'
else
opengame 'autosave_alt.sav'
end
end
--- gameover ---------------------------------
# begin
'CHOOSE GAME START'
*nl
'Original Start:'
'You are Michael Kuznetsov, a fairly average, 35 year old businessman whose life is about to be turned inside out. Features magic and an (incomplete) over-arching plot. Beware of unintelligible translations.'
*nl
'Alternate Start:'
'You are a 15-year-old small-town girl about to start her first year of high school. Name and starting stats are customizable, no magic and no major ''plot'' other than life. Not to say that your classmates and family don''t have their own stories, though!'
act 'Original start':
cla
music_on = 0
showstat 1
showobjs 1
addobj 'Player'
gt 'roomPRE'
end
act 'Original start (skip intro)':
music_on = 0
gs 'begin1'
gt 'street'
end
act 'Start the alternative game':
cla
gt 'alterStart'
end
--- begin ---------------------------------
# begin1
showstat 1
showobjs 1
$name = 'Svetlana'
$surname = 'Lebedev'
!!!0.2.6 addition
$nickname = 'Svetski'
!!!
$name = input("What is your first name?")
if $name = '':$name = 'Svetlana'
$surname = input("What is your last name?")
if $surname = '':$surname = 'Lebedev'
!!!0.2.6 addition
$nickname = input("What is your nick name?")
if $nickname = '':$nickname = 'Svetski'
!!!
age = 18
vidage = 16
year = 2010
month = 5
week = 3
hour = 13
!!body
rost = 170
fat = 60
salo = 60
dick = 0
energy = 15
water = 15
son = 16
!!stats
stren = 10
strenbuf = 10
speed = 10
agil = 10
agilbuf = 10
vital = 10
vitalbuf = 10
intel = 10
will = 10
react = 10
magik = 0
health = vital * 10 + stren * 5
willpower = intel * 5 + will * 5
manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
nastjaQW = 0
money = 16500
vidageday = 300
housrA = 1
sarafan[1] = 1
sarafanH[1] = 30
lobok = 3
leghair = 3
mop = 1
housr = 1
tanga = 1
!!!!!!!!!!!!!! Maruda Hair Mod
hairlength = 165
!!!!!!!!!!!!!! Maruda Hair Mod
hcol = 1
clr
gs 'stat'
jeans[1] = 1
jeansH[1] = 100
jeansB[1] = 70
gs 'clothing', 'wear', 'jeans', 1
cltarelka = 1
fairy = 10
eda = 5
clrbelo = 2
poroshok = 5
shampoo = 5
clr
gs 'stat'
opPRE = 0
daystart = 0
addobj 'Character'
addobj 'See'
addobj 'Others'
addobj 'Menu'
--- begin1 ---------------------------------
# onobjsel
$din_show_tits = {
view
view 'images/body/t<>.jpg'
}
$objdescrip = {
clr
pl 'Your name is <<$name>> <<$surname>>.'
pl 'You are <> <<$letgoda>>, but looking at you, people would guess you are <> <<$letgoda2>>.'
!!!0.2.6 extension
if StoryLine > 0:
pl 'Friends and family sometimes call you <<$nickname>>'
else
pl 'Friends sometimes call you <<$nickname>>'
end
!!!
if birthday > 0 and birthmonth > 0:pl 'Your date of birth is <>.0<>.<>, the'
pl 'You are <> cm tall, you weigh <> pounds.'
pl '<<$body>>'
pl '<> - <> - <> , the size of your breasts are <>, the difference between your hips and your waist is <> cm'
pl '<<$anus>>'
pl '<<$vnesh>>'
pl '<<$hair>>'
pl '<<$lip>>'
pl '<<$throat>>'
pl '<<$skin>>'
pl '<<$glaza>>'
pl '<<$mop>>'
pl '<<$leghair>>'
pl '<<$lobok>>'
pl '<<$vagina>>'
nl
if salo = 0 and musle > 0 and dounspell = 0:pl 'You are showing signs undernourishment. You should probably eat more and more often.'
if salo = 0 and musle = 0 and dounspell = 0:pl 'You are dangerously malnourished, which has led to a loss in muscle mass. You''re in a critical condition and likely to pass out!'
if curly > 0:pl 'Your curls are good for another <> days.'
if zub = 1:$zuba = ' tooth'
if zub >= 2:$zuba = ' teeth'
if zub > 0:pl 'You have <><<$zuba>>.'
!!pl 'vnesh <>'
!!pl 'curlykoef <> a maximum of 1'
!!pl 'tits <> A maximum of 6'
!!pl 'lip <> a maximum of 4'
!!pl 'tanKoef <> a maximum of 1'
!!pl 'skin <> a maximum of 4'
!!pl 'mop <> a maximum of 4'
!!pl 'resnic <> a maximum of 2'
!!pl 'glaraz <> a maximum of 3'
!!pl 'bodykoef <> a maximum of 8'
!!pl 'legkoef <> a maximum of 3'
!!pl 'lobkoef <> a maximum of 3'
!!pl 'odevnesh <> a maximum of 15'
!!pl 'sweat <> the maximum 0'
!!pl 'hapri <> a maximum of 1'
!!!!!!!! Maruda Hair Mod
if hairlength > 41 and hscrunch >= 1:
if hscrunchw = 0 and hpingripw = 0:pl 'As you have a scrunchy, you can arrange your hair into a ponytail. You have <> scrunchies left.'
if hscrunchw = 1:pl 'Remove the scrunchie to get rid of the ponytail.'
end
if hairlength > 41 and hpingrip >= 1:
if hscrunchw = 0 and hpingripw = 0:pl 'You have several clips, pins and grips for you hair. Hence, you can updo your hair. You have <> hair accessories at your disposal.'
if hpingripw = 1:pl 'Let your hair flow free.'
end
if hairlength > 80 and hscrunch >= 2:
if hscrunchw = 0 and hpingripw = 0:pl 'You can use two hair ties to make yourself some pigtails.'
if hscrunchw = 2:pl 'Remove your scrunchies and let your hair flow free again.'
end
if hscrunch < 1:hscrunchw = 0
if hpingrip < 1:hpingripw = 0
if hscrunch < 2:hpigtail = 0
!!!!!!!! Maruda Hair Mod
}
$objskills = {
clr
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1remake
!!if salo > musle * 4:$fat = 'You have a chubby disposition'
!!if salo <= musle * 4 and fat > musle * 2:$fat = 'You have a soft curvy body that still carries an elastic finesse.'
!!if salo <= musle * 2 and fat > musle:$fat = 'You have an average body showing signs that you take care of yourself.'
!!if salo <= musle and fat >= musle / 2:$fat = 'Your body is slim and trim. You probably workout often '
!!if salo < musle / 2:$fat = 'Your body is a prayer to the god of fitness! Your skin is taught against your lithe musculature.'
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
pl 'Attractiveness <>'
pl 'Power <>'
pl 'Speed <>'
pl 'Agility <>'
pl 'Endurance <>'
pl 'Intelligence <>'
pl 'Willpower <>'
pl 'Reaction <>'
pl '<<$fat>>'
!!pl 'Bezstydstvo <>'
if SUB > 0:pl 'Subordination <>'
if DOM > 0:pl 'Dominance <>'
!!pl 'Muscles <<$musle>>'
if magik > 0:pl 'Magic <>'
if Jab > 0:pl 'Jab - <>'
if Punch > 0:pl 'Power Strikes - <>'
if Kik > 0:pl 'Kicks - <>'
if KikDef > 0:pl 'Protection against - <>'
if beg > 0:pl 'Skill Run - <>'
if volleyboll > 0:pl 'Skill volleyball - <>'
if oficiant > 0:pl 'Skills waitresses - <>'
if vokal > 0:pl 'Vocal skills <>'
if dance > 0:pl 'Skill Dance - <>'
if dancePRO > 0:pl 'Regular dancing skilllevel - <>'
if stripdance > 0:pl 'Striptease skilllevel - <>'
if poledance > 0:pl 'Poledancing skilllevel- <>'
if shoot > 0:pl 'Shooting Accuracy - <>'
if kid = 1:pl 'You have a child, <<$polreb[1]>> name <<$kidname[1]>>. Born <>.<>.<>y. Age <>'
if workPTU > 1:pl 'Reputation teachers <>'
if SchoolAtestat = 0 and StoryLine > 0:
if Suspeh >= 90:pl 'You are an A+ student.'
if Suspeh >= 80 and Suspeh < 90:pl 'You are a bright student, just not the top of your class.'
if Suspeh >= 70 and Suspeh < 80:pl 'You are an above average student, but you have to work hard to keep up.'
if Suspeh >= 60 and Suspeh < 70:pl 'You are the typical average student. You''re good in the fields you like, but can''t be bothered with the rest.'
if Suspeh >= 50 and Suspeh < 60:pl 'You''re not very good in school, you wish you could be somewhere else and your grades show it.'
if Suspeh >= 40 and Suspeh < 50:pl 'You are not cut out for school, you skip out most of the time. You wonder how you''re going to manage to get passing grades.'
if Suspeh < 40:pl 'You are the class nitwit. You''re still not sure how you got this far in the first place.'
if schoolprogul > 1:pl 'Absenteeism in school <>'
end
}
$objstatistika = {
clr
if opPRE = 0:pl 'It has been <> the game has started.'
if BuyHous = 2 and ArendHouseSL >0:pl 'You have rented an apartment in the residential area <> days.'
if KikWinPro > 0 or KikLossPro > 0 or KikDrawPro > 0:
pl 'Professional Kickboxing Record:Win (Victory KO) - Loss (Defeat KO) - Draw'
pl '<> (<>KO) - <> (<>KO) - <>'
nl
end
if Win > 0 or Loss > 0:pl 'Wins in fights <>, losses in fights <>' & nl
if KisameDead = 1:pl 'You killed Kisame.'& nl
if razradKik > 0:pl '<<$razradKik>>'
if KikWinAm > 0 or KikLossAm > 0 or KikDrawAm > 0:
pl 'Amateur Kickboxing Record:Win (Victory KO) - Loss (Defeat KO) - Draw'
pl '<> (<>KO) - <> (<>KO) - <>'
nl
end
if razradKik > 0:
if razradKik = 1:$razradKik = 'You''re ranked III in amateur kickboxing'
if razradKik = 2:$razradKik = 'You''re ranked II in amateur kickboxing'
if razradKik = 3:$razradKik = 'You''re ranked I in amateur kickboxing'
if razradKik = 4:$razradKik = 'You are a candidate for the title of Master in Kickboxing'
if razradKik = 5:$razradKik = 'You have the title of Master Kickboxer'
nl
end
if kolsorev > 0:pl 'You have participate <> in a running race'
if bronzebeg > 0:pl '<> - bronze medals on the run'
if silverbeg > 0:pl '<> - silver medals for event'
if goldbeg > 0:pl '<> - gold medals in running'
if razradbegEB > 0:pl '<> times bronze medalist of European Championship'
if razradbegES > 0:pl '<> fold vice champion of Europe'
if razradbegEG > 0:pl '<> time European champion.'
if razradbeg > 0:
if razradbeg = 1:pl 'You have third sports category for event'
if razradbeg = 2:pl 'You 2nd sports category for event'
if razradbeg = 3:pl 'You 1st sports category for event'
if razradbeg = 4:pl 'You have the title of Candidate Master of Sports for event'
if razradbeg = 5:pl 'You have the title of Master of Sports in the run'
if razradbeg >= 6:pl 'You have the title of International Master of Sports for event'
nl
end
if nastjaQW > 0:pl 'Friendship with Nastya <>'
if tanya > 0:pl 'Friendship with Tanya <>'
if kat > 0:pl 'Friendship with Kate <>'
if vika > 0:pl 'Friendship with Vika <>'
if Irina > 0:pl 'Friendship with Irene <>'
if Tamara > 0:pl 'Friendship with Tamara <>'
if alla > 0:pl 'Friendship with Alla <>'
if masha > 0:pl 'Friendship with Masha <>'
if Givi > 0:pl 'Friendship with Givi K. <>'
if Ashot > 0:pl 'Friendship with Ashot <>'
if Dmitry > 0:pl 'Friendship with Dima <>'
if afra > 0:pl 'Friendship with blacks <>'
!!!WD: Formatting
if (Irina + Givi + Ashot + Tamara + Dmitry + afra + gosh + vika + kat + nastjaqw + tanya) > 0:nl
!!!
if exhibi > 0:pl 'Experienced exhibitionism <>'
if maxdamage > 0:pl 'The impact force on the dynamometer <> kN' & nl
if modelfoto > 0:pl 'You filmed naked <> times'
if stripdancesum > 0:pl '<> times dancing in the stripclub'
if profiDanceTime > 0:pl 'You danced <> professionally.'
if SchoolAtestat = 1:pl 'You have finished school.'
if diplom = 1:pl 'You graduated.'
if teachlevel > 0:pl 'Your credibility as a teacher is <>'
!!!WD:FORMATING
if (exhibi + maxdamage + modelfoto + stripdancesum + profiDanceTime + SchoolAtestat + diplom + teachlevel) > 0:nl
!!!
if mastr > 0:pl 'Masturbated <> time'
if throat > 0:pl '<<$throat>>'
if vagina > 0:pl '<<$vagina>>'
if vagina = 0 and sex = 0:pl 'You are a virgin.'
if anus > 0:pl '<<$anus>>'
nl
if GorSlut > 0:
if GorSlut = 1:pl 'In the town you are known as a flirt.'
if GorSlut = 2:pl 'In the town you are known to have sucked a few cocks.'
if GorSlut = 3:pl 'In the town you are known as a great cocksucker.'
if GorSlut = 4:pl 'In the town you are known to have fucked several boys.'
if GorSlut = 5:pl 'In the town you are known the slut that would do anything.'
if GorSlut = 6:pl 'In the town you are known as a prostitute who will take money for most extreme sex acts.'
nl
end
if guy > 0:pl 'You had <> guys.'
if divorced > 0:pl 'You have <> husbands.'
if suprdolg > 0:pl 'Performed conjugal duty to her husband <> time'
if gang > 0:pl 'Group sex <> times'
if sex > 0 and sexa = 0:pl 'Vaginal sex <> times.'
if sex > 0 and sexa > 0:pl 'Vaginal sex <> times from them <> times with her boyfriend.'
if bj > 0:
if gloryhole = 0 and balls = 0 and bja = 0:pl 'Blowjob done <> times.'
if gloryhole = 0 and balls = 0 and bja > 0:pl 'Blowjob done <> times, of which <> times her boyfriend'
if gloryhole > 0 and balls = 0 and bja = 0:pl 'Blowjob done <> times, of which you <> time suck strangers through a hole in the wall.'
if gloryhole > 0 and balls = 0 and bja > 0:pl 'Blowjob done <> times, of which you <> time suck strangers through a hole in the wall. Just one <> times her boyfriend'
if gloryhole = 0 and balls > 0 and bja = 0:pl 'Blowjob done <> times, sucked balls <> times.'
if gloryhole = 0 and balls > 0 and bja > 0:pl 'Blowjob done <> times, sucked balls <> times. Just one <> times her boyfriend'
if gloryhole > 0 and balls > 0 and bja = 0:pl 'Blowjob done <> times, of which you <> time suck strangers through a hole in the wall. Sucked balls <> times.'
if gloryhole > 0 and balls > 0 and bja > 0:pl 'Blowjob done <> times, of which you <> time suck strangers through a hole in the wall. Sucked balls <> times. Just one <> times her boyfriend'
end
if hj > 0:
if hja = 0:pl 'Guys jerking off <> times'
if hja > 0:pl 'Guys jerking off <> times from them <> times masturbate her boyfriend'
end
if hump > 0:pl 'About you wanker member <> times'
if rape > 0:pl 'You have been raped <> times'
if anal > 0:
if anala = 0:pl 'Anal <> times'
if anala > 0:pl 'Anal <> times from them <> times with her boyfriend'
end
if kuni > 0:pl 'You did cunnilingus <> times'
if pegging > 0:pl 'Pegging <> times'
if spank > 0:pl 'You ran your ass <> times'
!!!WD:FORMATING
if (guy + divorced + suprdolg + gang + sex + bj + hj + hump + rape + anal + kuni + pegging + spank) > 0:nl
!!!
if slutty > 0:
if bordelslutty = 0:pl 'Sold your love <> time.'
if bordelslutty > 0:pl 'Sold your love <> times, including in a brothel <> times.'
end
if pfilmSTOP = 1:
pl 'In the porn industry you were known by the name of <<$pfname>>. You have retired from the porn business.'
elseif film > 0:
pl 'In the porn industry you are known by the name of <<$pfname>>. You starred in porn <> times.'
pl '<<$pfilmhistory>>'
nl
end
if orgasm > 0:pl 'Experienced orgasm <> times.'
if analorgasm > 0 :pl 'You''ve had <> anal orgasms.'
if swallow > 0:pl 'Sperm swallowed <> times.'
if facial > 0:pl 'You have taken <> facials.'
if frot > 0:pl 'Come on you truck <> times.'
if VAF > 0:pl 'Vaflizm <>.'
if zoo > 0:pl 'Having sex with animals <> times.'
if pee > 0:pl 'You pissing <> times.'
if swallowpee > 0:pl 'You swallow urine <> time.'
!!!WD:FORMATING
if (slutty + pfilmSTOP + film + orgasm + analorgasm + swallow + facial + frot + VAF + zoo + pee) > 0:nl
!!!
if girl > 0:pl 'You have <> girls.'
if lesbian > 0:pl 'You do lecbiyskim sex <> times.'
if sexfuta > 0:pl 'You''ve had sex with tgirls <> times.'
}
$din_exhibiTakeOffBimbo = {
cloth_vid = 0
gs 'stat'
'You removed the outfit bimbo'
}
$din_exhibiHideNewCloth = {
exhibiHideNewCloth = 1
gs 'stat'
}
$din_cheat_work = {
if cheatWork = 0:
cheatWork = 1
dynamic $din_cheat_menu_permanent
exit
elseif cheatWork = 1:
cheatWork = 0
dynamic $din_cheat_menu_permanent
end
}
$din_cheat_hapri = {
if cheatHapri = 0:
cheatHapri = 1
gs 'stat'
dynamic $din_cheat_menu_permanent
exit
else
cheatHapri = 0
dynamic $din_cheat_menu_permanent
end
}
$din_cheat_klisma = {
if cheatKlisma = 0:
cheatKlisma = 1
dynamic $din_cheat_menu_permanent
exit
elseif cheatKlisma = 1:
cheatKlisma = 0
dynamic $din_cheat_menu_permanent
end
}
$din_cheat_nomakeup = {
if cheatNomakeup = 0:
cheatNomakeup = 1
dynamic $din_cheat_menu_permanent
exit
else
cheatNomakeup = 0
dynamic $din_cheat_menu_permanent
end
}
$din_cheat_Nosweat = {
if cheatNosweat = 0:
cheatNosweat = 1
dynamic $din_cheat_menu_permanent
exit
else
cheatNosweat = 0
dynamic $din_cheat_menu_permanent
end
}
$din_cheat_NoEat = {
if cheatNoEat = 0:
cheatNoEat = 1
dynamic $din_cheat_menu_permanent
exit
else
cheatNoEat = 0
dynamic $din_cheat_menu_permanent
end
}
$din_cheat_age = {
age = input("How old are you in years?")
if age <= 15:age = 15
dynamic $din_cheat_menu_look
}
$din_cheat_agel = {
vidage = input("How old do you want to look?")
if vidage <= 14:vidage = 14
dynamic $din_cheat_menu_look
}
$din_cheat_money = {
money = input("How much money do you want to have?")
if money < 0:money = 0
dynamic $objcheat_menu
}
$din_cheat_menu_permanent = {
gs 'stat'
clr
if cheatWork = 0:$cheatWork = 'TURNED_OFF'
if cheatWork = 1:$cheatWork = 'ON'
if cheatHapri = 0:$cheatHapri = 'TURNED_OFF'
if cheatHapri = 1:$cheatHapri = 'ON'
if cheatKlisma = 0:$cheatKlisma = 'TURNED_OFF'
if cheatKlisma = 1:$cheatKlisma = 'ON'
if cheatNomakeup = 0:$cheatNomakeup = 'TURNED_OFF'
if cheatNomakeup = 1:$cheatNomakeup = 'ON'
if cheatNosweat = 0:$cheatNosweat = 'TURNED_OFF'
if cheatNosweat = 1:$cheatNosweat = 'ON'
if cheatNoEat = 0:$cheatNoEat = 'TURNED_OFF'
if cheatNoEat = 1:$cheatNoEat = 'ON'
pl 'cheat menu'
pl ''
pl 'Disable the requirement of labor: <<$cheatWork>>'
pl 'always combed: <<$cheatHapri>>'
pl 'Always do an enema: <<$cheatKlisma>>'
pl 'Cosmetics never smeared: <<$cheatNomakeup>>'
pl 'Never sweat: <<$cheatNosweat>>'
pl 'Never eat or drink: <<$cheatNoEat>>'
}
$din_cheat_menu_look = {
gs 'stat'
clr
pl 'cheat menu'
pl ''
pl 'Show design parameters of the body'
pl ''
pl 'now you <> years_old'
if age >= 0:pl 'change age'
pl 'You look for <> years_old'
if vidage >= 0:pl 'Change the visibility of age'
pl ''
pl '<<$lip>>'
if lip < 4:pl 'augment the lips'
if lip > 0:pl 'reduce lips'
pl ''
pl '<<$skin>>'
if skin < 4:pl 'improve the skin'
if skin > 0:pl 'worsen the skin'
if tan >= 0:pl 'become sunburnt'
if tan > 0:pl 'remove tan'
pl ''
pl '<<$glaza>>'
if resnic < 2:pl 'Enlarge eyelashes'
if resnic > 0:pl 'reduce eyelashes'
if glaraz < 3:pl 'Increase the size of the eye'
if glaraz > 0:pl 'Reduce the size of the eye'
pl ''
if salo ! fat:pl 'balance the fat'
if salo > 0:pl 'reduce fat'
if salo > 0:pl 'reset fat'
pl 'fat (<>): +5 +10 +25 +50'
pl ''
pl 'Tattoo Removal'
}
$din_cheat_menu_param = {
gs 'stat'
clr
pl 'Cheat menu - Outward Appearance'
pl ''
pl '<> - strenbuf'
pl '<> - vitalbuf'
pl '<> - vmeat'
pl '<> - vfat'
pl '<> - Kves'
pl '<> - krost'
pl '<> - ves'
pl '<> - talia - Waist measurement in cm'
pl '<> - grudi - Chest measurement in cm'
pl '<> - bedra'
pl '<> - tits'
pl '<> - silicone'
pl '<> - <> - <>, breast size <>, the difference between the hips and waist <> cm'
pl 'Indicator muscularity <> - musle, <> - salo <> - salo * 2 <> - fat'
}
$din_cheat_menu_tatoo = {
gs 'stat'
clr
pl 'cheat menu - Outward Appearance'
pl ''
if tatlip = 0:pl 'You do not have tattoos on his lips'
if tatlip >= 1:pl 'Flatten with a tattoo of lips'
if tatplech = 0:pl 'You do not have tattoos on their shoulders'
if tatplech >= 1:pl 'Flatten with a shoulder tattoo'
if tatback = 0:pl 'You have not got a tattoo on her back'
if tatback >= 1:pl 'Flatten with the back tattoo'
if tatupb = 0:pl 'You do not have tattoos on the lower back'
if tatupb >= 1:pl 'Reduce a tattoo with lumbar'
if tatvag = 0:pl 'You do not have a tattoo in the groin'
if tatvag >= 1:pl 'Reduce a tattoo with groin'
if tatleg = 0:pl 'You do not have a tattoo on the ankle'
if tatleg >= 1:pl 'Flatten with a tattoo ankle'
}
$din_cheat_menu_stats = {
gs 'stat'
clr
pl 'Cheat menu'
pl ''
pl 'Power (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl 'Speed (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl 'Agility (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl 'Reaction (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl 'Endurance (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl 'Will (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl 'Intelligence (<>): +1 +5 +10 +25 -1 -5 -10 -25'
pl ''
pl 'Dominance (<>): +1 +5 +10 -1 -5 -10'
pl 'Submission (<>): +1 +5 +10 -1 -5 -10'
pl ''
if beg >= 0:pl 'The_Run: <>'
if volleyboll >= 0:pl 'volleyball: <>'
pl ''
if dance >= 0:pl 'dancing: <>'
if dancePRO >= 0:pl 'Prof.. dancing: <>'
if stripdance >= 0:pl 'striptease: <>'
if poledance >= 0:pl 'Dancing in the six: <>'
pl ''
if Jab >= 0:pl 'Jeb: <>'
if Punch >= 0:pl 'power Strokes: <>'
if Kik >= 0:pl 'kicks: <>'
if KikDef >= 0:pl 'protection: <>'
if vokal > 0:pl 'vocal skills: <>'
pl ''
if workPTU > 1:pl 'Reputation teachers: <>'
if suspeh >= 0:pl 'improve their academic performance: <>'
if schoolprogul >= 0:pl 'reset Absenteeism: <>'
pl ''
pl 'Test options are present in the mechanism of the game, but not involved in the game quests.'
if mutagenP = 0:pl 'Mutagen force 1st Level'
if mutagenP = 1:pl 'Mutagen force level 2'
if mutagenP = 2:pl 'Mutagen force level 3'
if mutagenP > 0:pl 'Mutagen force Zero'
if mutagenV = 0:pl 'Mutagen endurance 1st Level'
if mutagenV = 1:pl 'Mutagen endurance level 2'
if mutagenV = 2:pl 'Mutagen endurance level 3'
if mutagenV > 0:pl 'Mutagen endurance Zero'
if mutagenA = 0:pl 'Mutagen Agility 1st Level'
if mutagenA = 1:pl 'Mutagen Agility level 2'
if mutagenA = 2:pl 'Mutagen Agility level 3'
if mutagenA > 0:pl 'Mutagen Agility Zero'
}
$din_cheat_menu_reputation = {
gs 'stat'
clr
pl 'cheat menu'
pl ''
if nastjaQW >= 0:pl 'Friendship with Nastya: <>'
if kat >= 0:pl 'Friendship with Kate: <>'
if vika >= 0:pl 'Friendship with Vika: <>'
if Irina >= 0:pl 'Friendship with Irina: <>'
if Tamara >= 0:pl 'Friendship with Tamara: <>'
if alla >= 0:pl 'Friendship with Alla: <>'
if masha >= 0:pl 'Friendship with Masha: <>'
if Givi >= 0:pl 'Friendship with Givi Karapetovich: <>'
if Ashot >= 0:pl 'Friendship with Ashot: <>'
if Dmitry >= 0:pl 'Friendship with Dima: <>'
if afra >= 0:pl 'Friendship with blacks: <>'
pl ''
if GorSlut > 0:pl 'In the town you are known as <<$gnikname>> (<>)'
if GorSlut = 0:pl 'You have a good reputation in the town (0)'
if GorSlut ! 1:pl 'Back reputation "davalka" (1)'
if GorSlut ! 2:pl 'Back reputation "vaflersha" (2)'
if GorSlut ! 3:pl 'Back reputation "Total huesoska" (3)'
if GorSlut ! 4:pl 'Back reputation "Total hole" (4)'
if GorSlut ! 5:pl 'Back reputation "lowered slut" (5)'
if GorSlut ! 6:pl 'Back reputation "prostitute" (6)'
if GorSlut > 0:pl 'Clear reputation in town (0)'
if opusk > 0 or sipovka > 0 or rozetka > 0:pl 'Clear reputation with Gopnik'
}
$din_cheat_menu_documents = {
gs 'stat'
clr
pl 'cheat menu'
pl ''
if diplom = 0:pl 'Get Diploma'
if diplom = 1:pl 'You already have a diploma'
if secrdiplom = 0:pl 'Get Secretarial Diploma'
if secrdiplom = 1:pl 'You already have a diploma Secretary'
if masash < 10:pl 'Get Certificate Masseur'
if masash >= 10:pl 'You already have a certificate masseur'
if prava = 0:pl 'Get the right'
if prava = 1:pl 'Do you already have rights'
}
$din_cheat_menu_time = {
gs 'stat'
clr
pl 'cheat menu'
pl ''
pl 'Right_Now <<$week>> <> the_number, <<$month>>, <> a_year.'
pl 'Select Day of the Week'
pl '+1 The_Day'
pl '-1 The_Day'
pl 'select Month'
pl '+1 The_Year'
pl '-1 The_Year'
}
$din_cheat_menu_week = {
gs 'stat'
clr
pl 'cheat menu - period_Of'
pl ''
pl 'Right_Now <<$week>> <> the_number, <<$month>>, <> a_year.'
pl 'Monday'
pl 'Tuesday'
pl 'Wednesday'
pl 'Thursday'
pl 'Friday'
pl 'Saturday'
pl 'Sunday'
}
$din_cheat_menu_month = {
gs 'stat'
clr
pl 'cheat menu - period_Of'
pl ''
pl 'Right_Now <<$week>> <> the_number, <<$month>>, <> a_year.'
pl 'January'
pl 'February'
pl 'March'
pl 'April'
pl 'May'
pl 'June'
pl 'July'
pl 'August'
pl 'September'
pl 'October'
pl 'November'
pl 'December'
}
$din_cheat_menu_magic = {
gs 'stat'
clr
pl 'cheat menu'
pl ''
pl 'is_magical: <>'
pl ''
if spelltuman = 0:pl 'Cover the area fog'
if spellklon = 0:pl 'Substitute itself clone'
if spellstun = 0:pl 'paralyze the enemy'
if spellweap = 0:pl 'Invest in energy weapons (requires weapons)'
if spellwind = 0:pl 'blow away the fog'
if spellklon2 = 0:pl 'Substitute itself clones (3 pieces)'
if spellenergo = 0:pl 'Create weak energy shield'
if spellinit = 0:pl 'Write a slight deceleration time'
if spellhel = 0:pl 'Battle Heal'
if spellfire0 = 0 or spellfire2 = 0 or spellfire3 = 0 or spellfire4 = 0 or spellfire5 = 0:
pl ''
pl 'Elements of Fire Spells:'
end
if spellfire0 = 0:pl 'Flame'
if spellfire2 = 0:pl 'The release of fire'
if spellfire3 = 0:pl 'fire barrier'
if spellfire4 = 0:pl 'firestorm'
if spellfire5 = 0:pl 'Flame Shield'
if spellele0 = 0 or spellele2 = 0 or spellele3 = 0 or spellele4 = 0 or spellele5 = 0:
pl ''
pl 'Elements Lightning Spells:'
end
if spellele0 = 0:pl 'discharge'
if spellele2 = 0:pl 'lightning'
if spellele3 = 0:pl 'electric barrier'
if spellele4 = 0:pl 'Dance of thousands of birds'
if spellele5 = 0:pl 'dancing sphere'
if spellert0 = 0 or spellert2 = 0 or spellert3 = 0 or spellert4 = 0 or spellert5 = 0:
pl ''
pl 'Spells Earth Elements:'
end
if spellert0 = 0:pl 'quicksand'
if spellert2 = 0:pl 'active protection'
if spellert3 = 0:pl 'abyss'
if spellert4 = 0:pl 'absolute protection'
if spellert5 = 0:pl 'Sando'
if spellwind0 = 0 or spellwind2 = 0 or spellwind3 = 0 or spellwind4 = 0 or spellwind5 = 0:
pl ''
pl 'Spells with wind energy:'
end
if spellwind0 = 0:pl 'wind gust'
if spellwind2 = 0:pl 'terrifying pressure'
if spellwind3 = 0:pl 'vacuum sphere'
if spellwind4 = 0:pl 'vacuum shells'
if spellwind5 = 0:pl 'devouring vacuum'
if spellwater0 = 0 or spellwater2 = 0 or spellwater3 = 0 or spellwater4 = 0 or spellwater5 = 0:
pl ''
pl 'Water Elemental spells:'
end
if spellwater0 = 0:pl 'creek manna'
if spellwater2 = 0:pl 'flooding'
if spellwater3 = 0:pl 'blister'
if spellwater4 = 0:pl 'Water shark missile'
if spellwater5 = 0:pl 'The Great Flood'
}
$din_cheat_dynamic = {
$dynamicCommand = input("Enter command to execute.")
if $dynamicCommand = '':exit
dynamic $dynamicCommand
}
$objcheat_menu = {
gs 'stat'
clr
pl 'Get out of the cheat menu'
pl ''
pl 'permanent'
pl 'Appearance'
pl 'Characteristics of'
pl 'Relationships and Reputation'
pl 'documents'
pl 'manipulation of time'
if StoryLine = 0:pl 'Magic'
pl ''
pl 'Complete recovery, manna, reason.'
pl 'Change the amount of money'
pl 'Zero the money'
pl ''
pl 'Dynamic Input Command'
}
$objmagic = {
clr
if magik = 0:
pl 'You are unable to use magic.'
else
pl 'Available to you <> units of manna.'
!!' Rikudo forces available to you <> units'
nl
pl 'BASIC SPELL:' & nl
if spelltuman > 0:pl 'Cover the area fog, a great way to hide their actions from the attacking enemy and not a bad way to increase the chance to dodge enemy attacks, as he can not see you in your fog (mana cost of 10 units)' & nl
if spellklon > 0:pl 'Substitute itself clone powerful way to avoid enemy attacks substituting itself clone opponent gets to clone and not on you, he just wasted power (mana cost of 15 units)' & nl
if spellstun > 0:pl 'Paralyze a great way to stop the enemy, he will not be able to defend and attack. (Cost 20 mana units)' & nl
if spellweap > 0 and weapon > 0:pl 'Invest in energy weapons'
if spellwind > 0:pl 'Blow away the fog, mist spell any scattering over the battlefield.' & nl
if spellklon2 > 0:pl 'Substitute themselves clones (3 pieces), the enemy will not be able to get to you until you destroy all of your clones. (Cost 45 mana units)' & nl
if spellenergo > 0:pl 'Create weak energy shield spell protects against all attacks of the physical nature, even if the enemy attack exceeds the capabilities of the shield and the shield will be destroyed by the first blow, you can still protect yourself from the damage (cost 50 mana units)' & nl
if spellinit > 0:pl 'Create weak deceleration time powerful spell allowing you to move faster, you can snatch the initiative with this spell that would strike another spell to increase your chance to hit too, because you will move very quickly (cost 60 mana units)' & nl
if spellhel > 0:pl 'Martial treatment restores or adds 400 health units in exchange for 400 units of manna.' & nl
if stihia = 1:pl 'SPELL elements of fire' & nl
if spellfire1 = 1:pl 'Flame. Inflicts little damage. (Cost 10 mana)' & nl
if spellfire2 = 1:pl 'Release of fire. A damage. (100 mana cost)' & nl
if spellfire3 = 1:pl 'Fire barrier, creates a shield of 750 units. (150 mana cost)' & nl
if spellfire4 = 1:pl 'Firestorm. Causes great damage to an enemy difficult to dodge. (250 mana cost)' & nl
if spellfire5 = 1:pl 'Flame Shield creates a shield of 2,500 units. (500 mana cost)' & nl
if stihia = 2:pl 'SPELL element of lightning' & nl
if spellele1 = 1:pl 'Discharge. Inflicts very little damage. (Cost 10 mana)' & nl
if spellele2 = 1:pl 'Lightning. Inflicts above average. (100 mana cost)' & nl
if spellele3 = 1:pl 'Electrical barrier creates a shield of 1,500. (150 mana cost)' & nl
if spellele4 = 1:pl 'Dance of thousands of birds. Inflicts very high damage. (250 mana cost)' & nl
if spellele5 = 1:pl 'Plyaschuschaya sphere creates a shield of 5,000 units. (500 mana cost)' & nl
if stihia = 3:pl 'SPELL Element Earth' & nl
if spellert1 = 1:pl 'Quicksand trap catches the enemy in quicksand and causes little damage. (Cost 10 mana)' & nl
if spellert2 = 1:pl 'Active protection, creates a protective sphere of earth, stone and sand 2,500 mana and health protection, this protection is self-healing in 10 moves absorbing units 20 mana per turn. (100 mana cost)' & nl
if spellert3 = 1:pl 'Abyss earth asunder underfoot enemy inflicting damage above average and depriving him of the ability to move. (150 mana cost)' & nl
if spellert4 = 1:pl 'Absolute protection, creates a huge protective sphere of the earth, which regenerates itself every move and attack the enemy. (250 mana cost)' & nl
if spellert5 = 1:pl 'Sando, two huge plates come out of the ground and collapse crushing the enemy inflicting massive damage and depriving him of his ability to move. 500 mana cost.' & nl
if stihia = 4:pl 'Spells with wind energy' & nl
if spellwind1 = 1:pl 'A gust of wind, causing very little damage and destroy clones and fog, it is very difficult to dodge. (Cost 10 mana)' & nl
if spellwind2 = 1:pl 'Horrendous pressure, causing moderate damage and destroying clones and fog, it is very difficult to dodge. (100 mana cost)' & nl
if spellwind3 = 1:pl 'Vacuum sphere, creates a shield of 1,500. (150 mana cost)' & nl
if spellwind4 = 1:pl 'Vacuum shells do more damage and destroy clones and fog, it is very difficult to dodge. (250 mana cost)' & nl
if spellwind5 = 1:pl 'Devouring vacuum sucks shield enemy destroying it whatever strength he was not. (500 mana cost)' & nl
if stihia = 5:pl 'SPELL elements of water' & nl
if spellwater1 = 1:pl 'Creek manna causes very little damage and absorbs a lot of mana. Cost 10 mana.' & nl
if spellwater2 = 1:pl 'Flooding, causing moderate damage and absorbs manna above average. 100 mana cost.' & nl
if spellwater3 = 1:pl 'Water bubble creates a protective sphere of water 1,500 protection from all influences, this protection is self-healing in 10 moves absorbing units 20 mana per turn. (150 mana cost)' & nl
if spellwater4 = 1:pl 'Water shark missile, causing great damage and absorbs a lot of mana. Cost 250 mana.' & nl
if spellwater5 = 1:pl 'Great flood, the water creates a huge sphere that absorbs enemy and deflating manna from it and handing it to provide increased protection. 500 mana cost.' & nl
end
}
$objbody = {
if musle >= salo:
!!muscular type
if bedra < 60:view 'images/body/fit.jpg'
if bedra >= 60 and bedra < 70:view 'images/body/fit1.jpg'
if bedra >= 70 and bedra < 80:view 'images/body/fit2.jpg'
if bedra >= 80 and bedra < 90:view 'images/body/fit3.jpg'
if bedra >= 90 and bedra < 100:view 'images/body/fit4.jpg'
if bedra >= 100 and bedra < 110:view 'images/body/fit5.jpg'
if bedra >= 110 and bedra < 120:view 'images/body/fit6.jpg'
if bedra >= 120:view 'images/body/fit7.jpg'
else
!!bold type
! Updated to be consistent with current images
if bedra < 60:
view 'images/body/fat.jpg'
elseif bedra < 70:
view 'images/body/fat1.jpg'
elseif bedra < 80:
view 'images/body/fat2.jpg'
elseif bedra < 90:
view 'images/body/fat3.jpg'
elseif bedra < 100:
view 'images/body/fat4.jpg'
elseif bedra < 110:
view 'images/body/fat5.jpg'
elseif bedra < 120:
view 'images/body/fat6.jpg'
else
view 'images/body/fat7.jpg'
end
end
}
$objtattoos = {
$tatlipdi = {
view 'images/Body/tatlip<>.jpg'
}
$tatpledi = {
view 'images/body/tatplech<>.jpg'
}
$tatbackdi = {
view 'images/body/tatb<>.jpg'
}
$tatupbdi = {
view 'images/body/tatupb<>.jpg'
}
$tatvagdi = {
view 'images/body/tatvag<>.jpg'
}
$tatlegdi = {
view 'images/body/tatleg<>.jpg'
}
clr
if tatlip > 0:pl 'tattoo on the lip.'
if tatplech > 0:pl 'tattoo on the shoulders'
if tatback > 0:pl 'tattoo on the back'
if tatupb > 0:pl 'tattoo on the lower back'
if tatvag > 0:pl 'Tattoos in the groin'
if tatleg > 0:pl 'tattoo on the legs'
if tatvag = 0 and tatlip = 0 and tatplech = 0 and tatback = 0 and tatupb = 0 and tatleg = 0:pl 'You pristine pure body. Not in terms of corruption, but in terms of tattoos.'
}
$objpirsing = {
$dipirsA = {
view 'images/body/pirsA.jpg'
}
$dipirsB = {
view 'images/body/pirsB.jpg'
}
$dipirsC = {
view 'images/body/pirsC.jpg'
}
$dipirsD = {
view 'images/body/pirsD.jpg'
}
$dipirsE = {
view 'images/body/pirsE.jpg'
}
$dipirsF = {
view 'images/body/pirsF.jpg'
}
$dipirsG = {
view 'images/body/pirsG.jpg'
}
$dipirsN = {
view 'images/body/pirsN.jpg'
}
clr
if pirsA = 1:pl 'Your tongue pierced and there is inserted a small bar that is constantly felt in the mouth. view'
if pirsB = 1:pl 'You pierced lower lip and there vdet ring. view'
if pirsC = 1:pl 'On your ears hang earrings. view'
if pirsD = 1:pl 'You have a small ring in the nose. view'
if pirsE = 1:pl 'In your eyebrow barbell inserted. view'
if pirsF = 1:pl 'You have pierced nipples and inserted them in small metal rod. view'
if pirsG = 1:pl 'You pierced lips on the vagina and there inserted rings. view'
if pirsN = 1:pl 'You pierced navel, and there is inserted rod. view'
}
$objobnovit = {
gs 'stat'
}
$objbloknot = {
clr
pl 'Diary'
if housr > 0:pl 'I live in a two-room apartment in a residential area. Payment for the apartment is taken automatically in the amount of 3,000 rubles each 25e number. Plus a light bill.' & nl
if work > 0 or stripwork > 0 or workPTU > 2:pl '-- My Job --'
if workPTU > 2:pl 'I work as a teacher in the Lyceum. Working days Mon-Sat from 14.00 to 16.00. Salary 300 rubles / day. Dress code - office, strict. The road from the apartment to the Lyceum takes 2 hours and 10 minutes.' & nl
if (work = 1 or cheatWork = 1) and workKafe > 0:pl 'I work as a waitress in a cafe. Need to come to work with 11 to 12 working days, Tuesday, Wednesday, Thursday. At work every day you get tips from customers and automatically transferred to the 25th salary number.' & nl
if (work = 1 or cheatWork = 1) and workhosp > 0:pl 'I work as a nurse in the clinic. Need to come to work from 8 to 9 on weekdays. Salary is automatically transferred to the 25th number.' & nl
if (work = 1 or cheatWork = 1) and worksalon > 0:pl 'I work as a masseuse in the cabin. Need to come to work from 9 to 10 working days, Monday, Wednesday and Friday. Salary is automatically transferred to the 25th number.' & nl
if (work = 1 or cheatWork = 1) and workhosp > 0:pl 'I work as a secretary in the office. Need to come to work until 9 on weekdays. Salary is automatically transferred to the 25th number.' & nl
if (work = 1 or cheatWork = 1) and tanwork > 0:pl 'I work as a governess at Tani. Salary is automatically transferred to the 25th number.' & nl
if (work = 1 or cheatWork = 1) and young_shop_work = 1:pl 'I work in a store saleswoman Keys Pussy. Need to come to work in 15 workdays all except Saturday and Sunday. Salary is issued once a week on Fridays.' & nl
if workrin = 1:pl 'I work in a tent on the market Arthur clothing saleswoman. Work on Tuesdays, Thursdays and Saturdays, come at 8 o´clock. Salary depends on the sales.' & nl
if stripwork >= 1:pl 'I work as a stripper, schedule a free, on any day from 15 up to 2 nights. Salary only tip.' & nl
if bumtolik = 4:pl 'Service for the Homeless is located in the Northern Region.' & nl
if bumtolik = 5:pl 'You volunteer to help the homeless service. Office hours 9 prior_to 17, Weekend Saturday and Sunday.' & nl
if husband > 0 or kid > 0 :'-- My Family --'
if husband > 0:pl 'I ve been married for <> days. My husband <<$husName>> <<$husBody>> <<$husFat>> <<$husHair>>. Member <> Relationships <>' & nl
if kid > 0:pl 'I have a child <<$kidname[kidDiary]>>, age <> days.' & nl
if $bfsex > 0:pl '<<$bfsex>>'
if bfA > 1:pl 'My current boyfriend, <<$boyA>>, is a <<$boybodyA>> <<$boybodA>> <<$boyfaceA>>. He is usually <<$boyCloA>> Our relationship is <> and we have met <> times.' & nl
if harakBoyA = 0 and bfA > 1:pl 'He is calm and self-possessed character.' & nl
if harakBoyA = 1 and bfA > 1:pl 'He is cheerful and sociable nature.' & nl
if harakBoyA = 2 and bfA > 1:pl 'He is irascible and very rigid.' & nl
if bfB > 1:pl 'Another boyfriend, <<$boyB>>, is a <<$boybodyB>> <<$boybodB>> <<$boyfaceB>>. He is usually <<$boyCloB>>. Our relationship is <> and we have met <> times.' & nl
if bfC > 1:pl 'My third boyfriend, <<$boyC>>, is a <<$boybodyC>> <<$boybodC>> <<$boyfaceC>>. He is usually <<$boyCloC>>. Our relationship is <> and we have met <> times.' & nl
gs 'Menu.Create', 'zapisMenu'
gs 'Menu.Add', 'zapisMenu', 'Recording from today', '', 'MenuLoc', 'zapisosn'
gs 'Menu.Add', 'zapisMenu', 'To record on 1th line', '', 'MenuLoc', 'zapis'
gs 'Menu.Add', 'zapisMenu', 'With a red line 1th line', '', 'MenuLoc', 'ot'
gs 'Menu.Add', 'zapisMenu', 'To record on 2th line', '', 'MenuLoc', 'zapis2'
gs 'Menu.Add', 'zapisMenu', 'With a red line 2th line', '', 'MenuLoc', 'ot2'
gs 'Menu.Add', 'zapisMenu', 'To record on 3th line', '', 'MenuLoc', 'zapis3'
gs 'Menu.Add', 'zapisMenu', 'With a red line 3th line', '', 'MenuLoc', 'ot3'
gs 'Menu.Add', 'zapisMenu', 'To record on 4th line', '', 'MenuLoc', 'zapis4'
gs 'Menu.Add', 'zapisMenu', 'With a red line 4th line', '', 'MenuLoc', 'ot4'
gs 'Menu.Add', 'zapisMenu', 'To record on 5th line', '', 'MenuLoc', 'zapis5'
gs 'Menu.Add', 'zapisMenu', 'With a red line 5th line', '', 'MenuLoc', 'ot5'
gs 'Menu.Add', 'zapisMenu', 'To record on 6th line', '', 'MenuLoc', 'zapis6'
gs 'Menu.Add', 'zapisMenu', 'With a red line 6th line', '', 'MenuLoc', 'ot6'
gs 'Menu.Add', 'zapisMenu', 'To record on 7th line', '', 'MenuLoc', 'zapis7'
gs 'Menu.Add', 'zapisMenu', 'With a red line 7th line', '', 'MenuLoc', 'ot7'
gs 'Menu.Add', 'zapisMenu', 'To record on 8th line', '', 'MenuLoc', 'zapis8'
gs 'Menu.Add', 'zapisMenu', 'With a red line 8th line', '', 'MenuLoc', 'ot8'
gs 'Menu.Add', 'zapisMenu', 'To record on 9th line', '', 'MenuLoc', 'zapis9'
gs 'Menu.Add', 'zapisMenu', 'With a red line 9th line', '', 'MenuLoc', 'ot9'
gs 'Menu.Add', 'zapisMenu', 'To record on 10th line', '', 'MenuLoc', 'zapis10'
gs 'Menu.Add', 'zapisMenu', 'With a red line 10th line', '', 'MenuLoc', 'ot10'
gs 'Menu.Create', 'disMenu'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 1st row', '', 'MenuLoc', 'diszapis'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 2nd row', '', 'MenuLoc', 'diszapis2'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 3rd row', '', 'MenuLoc', 'diszapis3'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 4th row', '', 'MenuLoc', 'diszapis4'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 5th row', '', 'MenuLoc', 'diszapis5'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 6th row', '', 'MenuLoc', 'diszapis6'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 7th row', '', 'MenuLoc', 'diszapis7'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 8th row', '', 'MenuLoc', 'diszapis8'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 9th row', '', 'MenuLoc', 'diszapis9'
gs 'Menu.Add', 'disMenu', 'Delete an entry from the 10th row', '', 'MenuLoc', 'diszapis10'
pl 'Make an entry or delete the record'
pl '<<$zapisOsn>>'
pl '<<$zapis>>'
pl '<<$zapis2>>'
pl '<<$zapis3>>'
pl '<<$zapis4>>'
pl '<<$zapis5>>'
pl '<<$zapis6>>'
pl '<<$zapis7>>'
pl '<<$zapis8>>'
pl '<<$zapis9>>'
pl '<<$zapis10>>'
}
$objavariya = {
'YOU HAVE JUST BEEN USED EMERGENCY LEAVE BLANK SCREEN Bagan'
*nl
'not use this feature without a good reason, can cause STABLE ERROR THAT WILL RUIN YOUR CONSERVATION'
*nl
if StoryLine = 1:gt 'gorodok'
gt 'street'
}
$objnewmenu = {
killobj
oldobjmenu = 0
addobj 'Character'
addobj 'See'
addobj 'Others'
addobj 'Menu'
}
$objoldmenu = {
killobj
oldobjmenu = 1
addobj 'Character'
addobj 'Skills'
addobj 'Statistics'
if magik > 0:addobj 'The_Magic'
addobj 'Face'
addobj 'Body'
addobj 'Clothing'
addobj 'Tattoos'
addobj 'Piercing'
if mobila > 0:addobj 'Phone'
addobj 'Diary'
addobj 'Emergency exit'
addobj 'Update'
addobj 'Menu'
addobj 'New Menu'
addobj 'Cheat menu'
if disable_autosave = 1:
addobj 'Enable autosave'
else
addobj 'Disable autosave'
end
}
$objautosave = {
if oldobjmenu = 0:
if disable_autosave = 1:
disable_autosave = 0
else
disable_autosave = 1
end
elseif oldobjmenu = 1:
if disable_autosave = 1:
disable_autosave = 0
delobj 'Enable autosave'
addobj 'Disable autosave'
else
disable_autosave = 1
delobj 'Disable autosave'
addobj 'Enable autosave'
end
end
gs 'stat'
}
$menu_character[0] = 'Description:$menu_descrip'
$menu_character[1] = 'Characteristics:$menu_skills'
$menu_character[2] = 'Usage:$menu_statistika'
if magik > 0:$menu_character[3] = 'Magic:$menu_magic'
$menu_lookon[0] = 'Face:$menu_face'
$menu_lookon[1] = 'Body:$menu_body'
$menu_lookon[2] = 'Clothing:$menu_clothes'
$menu_lookon[3] = 'Tattoos:$menu_tattoos'
$menu_lookon[4] = 'Piercing:$menu_pirs'
$menu_other[0] = 'Update:$menu_obnovit'
$menu_other[1] = 'Diary:$menu_bloknot'
$menu_other[2] = 'Emergency exit:$menu_avariya'
$menu_other[3] = 'Old menu:$menu_addoldmenu'
$menu_other[4] = 'Cheat menu:$menu_cheat'
if disable_autosave = 1:
$menu_other[5] = 'Enable autosave:$menu_autosave'
else
$menu_other[5] = 'Disable autosave:$menu_autosave'
end
if mobila > 0:$menu_other[6] = 'Phone:$menu_mobila'
!!old menu: beginning
if $selobj = 'Character':dynamic $objdescrip
if $selobj = 'Skills':dynamic $objskills
if $selobj = 'Statistics':dynamic $objstatistika
if magik > 0:if $selobj = 'Magic':dynamic $objmagic
if $selobj = 'Face':view FUNC('$face_image')
if $selobj = 'Body':dynamic $objbody
!!if $selobj = 'Clothing':dynamic $objclothes
if $selobj = 'Tattoos':dynamic $objtattoos
if $selobj = 'Piercing':dynamic $objpirsing
if $selobj = 'Diary':dynamic $objbloknot
if $selobj = 'Emergency exit':dynamic $objavariya
if $selobj = 'Update':gs 'stat'
if $selobj = 'New Menu':dynamic $objnewmenu
if $selobj = 'Cheat menu':dynamic $objcheat_menu
if disable_autosave = 1:
if $selobj = 'Enable autosave':dynamic $objautosave
else
if $selobj = 'Disable autosave':dynamic $objautosave
end
!!old menu: end
!!The new menu: beginning
if $selobj = 'Character':menu '$menu_character'
if $selobj = 'See':menu '$menu_lookon'
if $selobj = 'Others':menu '$menu_other'
!!The new menu: end
if $selobj = 'Player':
clr
pl 'Your name <<$name>> <<$surname>>. You <> years. <<$vneshPRE>>'
pl 'You have short black hair and flashing starting gray, small brown eyes and willed jaw covered by blue Shaved bristle.'
pl 'Growth <> cm, weight 100 kg.'
end
! WD: broken 'Menu' fix, remove Menu.Builder
$menu_mainMenu[0] = 'Statusbar:MenuMainLoc'
$menu_mainMenu[1] = 'Text notation:MenuMainLoc'
if $selobj = 'Menu':menu '$menu_mainMenu'
!'
if $selobj = 'Menu':
clr
gs 'Menu.Create', 'mainMenu'
gs 'Menu.Add', 'mainMenu', 'status bar', '', 'MenuMainLoc', '0'
gs 'Menu.Add', 'mainMenu', 'text notation', '', 'MenuMainLoc', '1'
gs 'Menu.Call', 'mainMenu'
end
'!
unselect
--- onobjsel ---------------------------------
# scale.table
!'
"Scale rendering using the table:"
$func('scale.table', 275, 420) + ' 275 / 420'
$func('scale.table', 400, 420) + ' 400 / 420'
$func('scale.table', 420, 420) + ' 420 / 420'
$func('scale.table', 157, 420) + ' 157 / 420'
$func('scale.table', 42, 420) + ' 42 / 420'
$func('scale.table', 0, 420) + ' 0 / 420'
'!
!!-----scale.table------
args[0] = args[0] & ! the current value of the parameter
args[1] = args[1] & ! the maximum value
if args[2] = 0:args[2] = 200 & ! Span (tables) pixels. default 350 px
if $ARGS[3] = "":$ARGS[3] = "FF0000" & ! the color of the filled part of the scale in the format RRGGBB. default - red
$ARGS['table'] = ''
args['x'] = (args[0] * 100) / args[1]
args['empty'] = 100 - args['x']
if args['x'] > 0:
$ARGS['table'] += ' | '
elseif args['empty'] > 0:
$ARGS['table'] + = " | "
end
$ARGS['table'] += '
'
$result = $ARGS['table']
--- scale.table ---------------------------------
# counter
if music_on <> music_on_prev or $music_theme <> $music_theme_prev:
close $cur_theme[track[$music_theme_prev]]
music_on_prev = music_on
$music_theme_prev = $music_theme
if $music_theme <> '':
copyarr 'cur_theme', 'tracklist_<<$music_theme>>'
track[$music_theme] = track[$music_theme] - 1
if track[$music_theme] < 0:track[$music_theme] = arrsize('cur_theme')
end
end
if music_on = 1 and $music_theme <> '':
if no isplay ($cur_theme[track[$music_theme]]):
track[$music_theme] += 1
if arrsize('cur_theme') <= track[$music_theme]:track[$music_theme] = 0
end
play $cur_theme[track[$music_theme]], volume
end
if race_start = 1:
bcolor = rgb(255, 255, 255)
refint
*clr
if race_hit = 0:
race_miss += 1
race_hit = 1
elseif $race1[race_row] <> ' ' and race_row > 0:
race_hit = 0
end
'<<$car>>'
!!interior of the vehicle and the line route
*pl $showcar
*p $race1[race_row]
if $race1[race_row] = '-------FINISH--------':
race_start = 0
!!return timer
settimer 500
wait 2000
$metka = 'finish'
$loc = 'RACE_COUNT'
gt $loc, $metka
end
race_row += 1
end
--- counter ---------------------------------
# init_music
$tracklist_start[0] = 'music/start.mp3'
$tracklist_pivbar[0] = 'music/pivbar.mp3'
$tracklist_kafe[0] = 'music/kafe.mp3'
$tracklist_kafe[1] = 'music/kafe1.mp3'
$tracklist_gdis[0] = 'music/komb.mp3'
$tracklist_gnewyear[0] = 'music/newyear.mp3'
$tracklist_sukizaebali[0] = 'music/suki.mp3'
$tracklist_club[0] = 'music/club.mp3'
$tracklist_club[1] = 'music/club1.mp3'
$tracklist_club[2] = 'music/club2.mp3'
$tracklist_club[3] = 'music/club3.mp3'
$tracklist_club[4] = 'music/club4.mp3'
$tracklist_fight[0] = 'music/fight.mp3'
$tracklist_fight[1] = 'music/fight1.mp3'
$tracklist_orochimaru[0] = 'music/orochimaru.mp3'
if club = 1:
clubrand = rand(0, 5)
if clubrand = 0:
$tracklist_club[0] = 'music/club.mp3'
elseif clubrand = 1:
$tracklist_club[0] = 'music/club1.mp3'
elseif clubrand = 2:
$tracklist_club[0] = 'music/club2.mp3'
elseif clubrand = 3:
$tracklist_club[0] = 'music/club3.mp3'
elseif clubrand = 4:
$tracklist_club[0] = 'music/club4.mp3'
elseif clubrand = 5:
$tracklist_club[0] = 'music/club5.mp3'
end
end
--- init_music ---------------------------------
# loadg
! WD: Set variable to store Image needed HTML code
if $ImageNeededPlacholder = '':
set $ImageNeededPlacholder = ''
end
--- loadg ---------------------------------
# LOCA
--- LOCA ---------------------------------
# saveg
--- saveg ---------------------------------
# inputProcessing
--- inputProcessing ---------------------------------
# clothing
$clothing_list_line = {
!! a single line in a clothing list (wardrobe, etc)
!! ARGS 0 - action type (wardrobe, sell)
!! ARGS 1 - clothing type
!! ARGS 2 - clothing index
$RESULT = FUNC('$clothing_name', $ARGS[1], ARGS[2])
if $ARGS[1] ! 'vatnik' and $ARGS[1] ! 'ero' and $ARGS[1] ! 'sforma':
$RESULT += ' (strength ' + dyneval '$RESULT += <<$ARGS[1]>>H[<>]'
if $ARGS[1] ! 'yoga' and $ARGS[1] ! 'sarafan':
$RESULT += ', hip size ' + dyneval '$RESULT += <<$ARGS[1]>>B[<>]'
end
$RESULT += ')'
end
$RESULT += ' View'
}
if $ARGS[0] = 'view_clothing_list':
!! ARGS 0 - view_clothing_list
!! ARGS 1 - action type (wardrobe, sell, resize)
!! ARGS 2 - brothel flag (brothel)
act 'Leave':gt $loc, $metka
if $ARGS[1] = 'wardrobe':
if $clothingworntype ! 'nude':act 'Strip':gs 'clothing', 'strip' & gt $loc, $metka
if bikini = 1:'On the top shelf is a swimsuit'
if $clothingworntype ! 'vatnik':dyneval($clothing_list_line, $ARGS[1], 'vatnik', 0)
if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and $clothingworntype ! 'sforma':dyneval($clothing_list_line, $ARGS[1], 'sforma', 0)
end
i = 1
:loopjeans
if jeans[i] = 1 and ($clothingworntype ! 'jeans' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'jeans', i)
i += 1
if i = 6:i = 201
if i <= 297:jump 'loopjeans'
i = 1
:loopyoga
if yoga[i] = 1 and ($clothingworntype ! 'yoga' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'yoga', i)
i += 1
if i <= 18:jump 'loopyoga'
i = 1
:loopsarafan
if sarafan[i] = 1 and ($clothingworntype ! 'sarafan' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'sarafan', i)
i += 1
if i <= 3:jump 'loopsarafan'
i = 1
:loopshort
if short[i] = 1 and ($clothingworntype ! 'short' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'short', i)
i += 1
if i = 6:i = 201
if i <= 256:jump 'loopshort'
i = 1
:loopskirt
if skirt[i] = 1 and ($clothingworntype ! 'skirt' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'skirt', i)
i += 1
if i = 6:i = 201
if i <= 273:jump 'loopskirt'
i = 1
:loopdress
if dress[i] = 1 and ($clothingworntype ! 'dress' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'dress', i)
i += 1
if i = 25:i = 201
if i <= 225:jump 'loopdress'
i = 1
:loopprofi
if profi[i] = 1 and ($clothingworntype ! 'profi' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'profi', i)
i += 1
if i = 3:i = 201
if i <= 208:jump 'loopprofi'
i = 1
:looppants
if pants[i] = 1 and ($clothingworntype ! 'pants' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'pants', i)
i += 1
if i = 6:i = 201
if i <= 346:jump 'looppants'
i = 1
:looplatex
if latex[i] = 1 and ($clothingworntype ! 'latex' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'latex', i)
i += 1
if i <= 2:jump 'looplatex'
i = 1
:loophooker
if hooker[i] = 1 and ($clothingworntype ! 'hooker' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'hooker', i)
i += 1
if i <= 5:jump 'loophooker'
i = 1
:loopodekis
if odekis[i] = 1 and ($clothingworntype ! 'odekis' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'odekis', i)
i += 1
if i <= 10:jump 'loopodekis'
i = 1
:loopnewclo
if newclo[i] = 1 and ($clothingworntype ! 'newclo' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'newclo', i)
i += 1
!! NOTE: 131 is the school uniform and is handled separately
if i <= 130:jump 'loopnewclo'
if $ARGS[2] = 'brothel':
''
'Brothel clothing'
i = 1
:loopero
if $clothingworntype ! 'ero' or clothingwornnumber ! i:dyneval($clothing_list_line, $ARGS[1], 'ero', i)
i += 1
if i <= 18:jump 'loopero'
end
end
if $ARGS[0] = 'view_clothing_item':
!! ARGS 0 - view_clothing_item
!! ARGS 1 = action type (wardrobe, shop, sell, resize)
!! ARGS 2 - clothing type
!! ARGS 3 - clothing index
!! ARGS 4 - price for shop
cla
''
FUNC('$clothing_name', $ARGS[2], ARGS[3])
if $ARGS[1] ! 'shop' and $ARGS[2] ! 'vatnik' and $ARGS[2] ! 'sforma' and $ARGS[2] ! 'ero':
$RESULT = '(strength '
dynamic '$RESULT += <<$ARGS[2]>>H[<>]'
if $ARGS[2] ! 'yoga' and $ARGS[2] ! 'sarafan':
$RESULT += ', hip size '
dynamic '$RESULT += <<$ARGS[2]>>B[<>]'
end
$RESULT += ')'
'<<$RESULT>>'
end
if $ARGS[1] = 'shop':
if dyneval('RESULT = <<$ARGS[2]>>[<>]') = 1:
'You already own this item.'
else
'Price: <>'
act 'Leave': gt $loc, $metka
if money >= ARGS[4]:
act 'Buy':
money -= ARGS[5]
dynamic $ARGS[2] + '[<>] = 1'
if $ARGS[2] = 'yoga':
dynamic $ARGS[2] + 'H[<>] = 80'
elseif $ARGS[2] = 'odekis':
dynamic $ARGS[2] + 'H[<>] = 100'
elseif $ARGS[2] = 'dress':
dynamic $ARGS[2] + 'H[<>] = 160'
elseif $ARGS[2] = 'hooker':
dynamic $ARGS[2] + 'H[<>] = 200'
else
dynamic $ARGS[2] + 'H[<>] = 60'
end
dynamic $ARGS[2] + 'B[<>] = bedra'
gt $loc, $metka
end
end
end
elseif $ARGS[1] = 'wardrobe':
act 'Leave in closet':gt 'clothing', 'view_clothing_list', $ARGS[1]
if $ARGS[2] ! 'vatnik' and $ARGS[2] ! 'sforma' and $ARGS[2] ! 'ero':
!! if the clothing is worn out
if dyneval('RESULT = <<$ARGS[2]>>H[<>]') <= 0:
'This item is worn and is not suitable for further wear.'
exit
end
!! if the clothing is a type that checks for hip size
if $ARGS[2] ! 'yoga' and $ARGS[2] ! 'sarafan':
!! if the hipsize is too far from your hipsize
dynamic 'RESULT = <<$ARGS[2]>>B[<>]'
if RESULT < bedra - 8:
'This item is too small for you to wear.'
exit
elseif RESULT > bedra + 8:
'This item is too large for you to wear.'
exit
end
end
end
act 'Wear':gs 'clothing', 'wear', $ARGS[2], ARGS[3] & gt 'clothing', 'view_clothing_list', $ARGS[1]
elseif $ARGS[1] = 'sell':
act 'Keep item':gt 'clothing', 'view_clothing_list', $ARGS[1]
!! value is based on the strength remaining
dynamic 'RESULT = <<$ARGS[2]>>H[<>]'
if RESULT > 45:
'You can sell this item for 500 rubles.'
act 'Sell':
dynamic '<<$ARGS[2]>>[<>] = 0'
money += 500
gt 'clothing', 'view_clothing_list', $ARGS[1]
end
elseif RESULT > 30:
'You can sell this item for 300 rubles.'
act 'Sell':
dynamic '<<$ARGS[2]>>[<>] = 0'
money += 300
gt 'clothing', 'view_clothing_list', $ARGS[1]
end
elseif RESULT > 0:
'You can sell this item for 100 rubles.'
act 'Sell':
dynamic '<<$ARGS[2]>>[<>] = 0'
money += 100
gt 'clothing', 'view_clothing_list', $ARGS[1]
end
else
'This item is too worn to have any sale value.'
end
elseif $ARGS[1] = 'resize':
act 'Leave item alone':gt 'clothing', 'view_clothing_list', $ARGS[1]
if $ARGS[2] ! 'vatnik' and $ARGS[2] ! 'sforma' and $ARGS[2] ! 'yoga' and $ARGS[2] ! 'sarafan':
if dyneval('RESULT = <<$ARGS[2]>>B[<>]') ! bedra and money >= 500:
'You can have this resized for 500 rubles.'
act 'Resize':
money -= 500
dynamic '<<$ARGS[2]>>B[<>] = bedra'
gt 'clothing', 'view_clothing_list', $ARGS[1]
end
end
if dyneval('RESULT = <<$ARGS[2]>>B[<>]') ! bedra and sewSkill >= 100:
'Since you''re good at sewing, you can resize this yourself.'
act 'Resize clothing yourself':
minut+=30
dynamic '<<$ARGS[2]>>B[<>] = bedra'
gt 'clothing', 'view_clothing_list', $ARGS[1]
end
end
end
end
end
if $ARGS[0] = 'strip':
if cumfrot > 0:cumfrot = 0
$lastwornclothingtype = $clothingworntype
lastwornclothingnumber = clothingwornnumber
$clothingworntype = 'nude'
clothingwornnumber = 0
glamur = 0
sport = 0
ski = 0
ofclo = 0
sexual = 0
odevnesh = 0
end
if $ARGS[0] = 'wear':
!! ARGS 0 - action
!! ARGS 1 - clothing type name
!! ARGS 2 - clothing index
gs 'clothing', 'strip'
$clothingworntype = $ARGS[1]
clothingwornnumber = ARGS[2]
if $clothingworntype = 'vatnik':
odevnesh = -10
elseif $clothingworntype = 'sforma':
sexual = 1
odevnesh = 5
elseif $clothingworntype = 'jeans':
odevnesh = 1
elseif $clothingworntype = 'yoga':
sport = 1
odevnesh = 1
elseif $clothingworntype = 'sarafan':
ski = 1
odevnesh = 1
elseif $clothingworntype = 'short':
odevnesh = 2
elseif $clothingworntype = 'skirt':
ski = 1
odevnesh = 5
elseif $clothingworntype = 'dress':
glamur = 1
odevnesh = 10
elseif $clothingworntype = 'profi':
ofclo = 1
odevnesh = 5
elseif $clothingworntype = 'pants':
odevnesh = 3
elseif $clothingworntype = 'latex':
odevnesh = 1
elseif $clothingworntype = 'hooker':
odevnesh = 1
elseif $clothingworntype = 'odekis':
glamur = 1
sexual = 1
odevnesh = 5
elseif $clothingworntype = 'newclo':
sexual = 1
odevnesh = 5
if clothingwornnumber < 90:ski = 1
elseif $clothingworntype = 'ero':
odevnesh = 10
end
end
if $ARGS[0] = 'wear_last_worn':
gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
end
--- clothing ---------------------------------
# $clothing_name
!! returns the name of the clothing
!! ARGS 0 - clothing type
!! ARGS 1 - clothing index
if $ARGS[0] = 'vatnik':
$RESULT = 'Tattered, rustic jacket'
elseif $ARGS[0] = 'sforma':
$RESULT = 'School uniform'
elseif $ARGS[0] = 'jeans':
if ARGS[1] <= 5:$RESULT = 'Jeans <>'
if ARGS[1] = 201:$RESULT = 'Blue jeans with a grey tank top and a turquise hoodie'
if ARGS[1] = 202:$RESULT = 'Skin tight low-rise, dark blue jeans with a tight, purple tank top'
if ARGS[1] = 203:$RESULT = 'Skin tight dark blue jeans with a white tank top and a red hoodie'
if ARGS[1] = 204:$RESULT = 'Tight, torn light blue jeans with a bright purple T-Shirt, which has a deep, U-cut neckline'
if ARGS[1] = 205:$RESULT = 'Skin tight, low-rise and torn dark blue jeans with a white tank top and a black leather jacket'
if ARGS[1] = 206:$RESULT = 'Tight, low-rise dark blue jeans with a black tank top'
if ARGS[1] = 207:$RESULT = 'Skin tight, low-rise light blue jeans with a very short white tank top'
if ARGS[1] = 208:$RESULT = 'Skin tight blue jeans and a black tank top, which has a glittery pattern. It also has knee high boots'
if ARGS[1] = 209:$RESULT = 'Skin tight grey jeans and a neckholding brown top'
if ARGS[1] = 210:$RESULT = 'Light blue jeans with a white T-Shirt'
if ARGS[1] = 211:$RESULT = 'Skin tight, high rise dark grey jeans and a grey top, which has the American flag on it'
if ARGS[1] = 212:$RESULT = 'Tight blue jeans, with a black leather belt and a pink-white stripped hoodie'
if ARGS[1] = 213:$RESULT = 'Skin tight light grey jeans and a loose black T-Shirt'
if ARGS[1] = 214:$RESULT = 'Skin tight grey jeans, a green T-Shirt and a puple-black striped hoodie'
if ARGS[1] = 215:$RESULT = 'High rise, light blue jeans and a black halter top'
if ARGS[1] = 216:$RESULT = 'Skin tight dark blue jeans and a shiny sliver blouse, with a deep U-shaped cleavage'
if ARGS[1] = 217:$RESULT = 'Tight blue jeans and a breght red-black striped T-Shirt, with a deep cleavage'
if ARGS[1] = 218:$RESULT = 'High rise, skin tight blue jeans and a short grey see-through shirt'
if ARGS[1] = 219:$RESULT = 'Skin tight blue jeans and a white halter top'
if ARGS[1] = 220:$RESULT = 'Light blue jeans and a loose black top, with writing in white saying "Sex Instructor"'
if ARGS[1] = 221:$RESULT = 'Skin tight, light blue jeans and a white halter top under a blue-white blouse'
if ARGS[1] = 222:$RESULT = 'High rise, dark blue jeans and a golden bikini top'
if ARGS[1] = 223:$RESULT = 'High rise, dark blue jeans and a backless pink top'
if ARGS[1] = 224:$RESULT = 'High rise, light blue jeans and a backless silver top'
if ARGS[1] = 225:$RESULT = 'Skin tight, light blue jeans, with a white belt and a short and tight glittery golden halter top'
if ARGS[1] = 226:$RESULT = 'High rise, dark blue jeans and a short black halter top'
if ARGS[1] = 227:$RESULT = 'High rise, skin tight blue jeans and a loose fitting flesh colored top'
if ARGS[1] = 228:$RESULT = 'Skin tight, light blue high rise jeans and a tight white tank top'
if ARGS[1] = 229:$RESULT = 'Skin tight, light blue jeans and a pink halter top'
if ARGS[1] = 230:$RESULT = 'Skin tight, white high rise jeans and a loose fitting black-white striped top'
if ARGS[1] = 231:$RESULT = 'Skin tight, high rise light blue jeans, a tight fitting top in beige and a beige wool vest'
if ARGS[1] = 232:$RESULT = 'Skin tight, dark blue jeans, with a small brown belt and a white T-Shirt'
!! 233 - 235 do not exist
if ARGS[1] = 236:$RESULT = 'High rise, light blue jeans and a black tank top'
if ARGS[1] = 237:$RESULT = 'Low rise, dark blue jeans and a beige vest'
if ARGS[1] = 238:$RESULT = 'High rise, skin tight, dark blue jeans and a short, yellow top'
if ARGS[1] = 239:$RESULT = 'High rise, skin tight, dark blue jeans, with a brown belt and a denim blue denim shirt'
if ARGS[1] = 240:$RESULT = 'Low rise, blue jeans and a white shirt'
if ARGS[1] = 241:$RESULT = 'High rise, skin tight, blue jeans, with a white-grey belt and a white tank top'
!! 242 does not exist
if ARGS[1] = 243:$RESULT = 'Blue jeans and a grey "Smiley" T-Shirt, with a very deep cleavage'
if ARGS[1] = 244:$RESULT = 'High rise, skin tight, light blue jeans and a short white tank top'
if ARGS[1] = 245:$RESULT = 'High rise, skin tight, dark blue jeans, with a small blue belt and a white shirt, with a deep cleavage'
if ARGS[1] = 246:$RESULT = 'Light blue jeans and a black neckhalter top'
if ARGS[1] = 247:$RESULT = 'High rise, skin tight, light blue jeans and a dark blue neckhalter top'
if ARGS[1] = 248:$RESULT = 'High rise, skin tight, dark blue jeans, with a small beige belt, a tight, red camisole and a beige blouse'
if ARGS[1] = 249:$RESULT = 'High rise, skin tight, light blue jeans, a short white camisole under a short black hoodie'
if ARGS[1] = 250:$RESULT = 'Skin tight, blue jeans, a light blue denim blouse under a blue denim jacket'
if ARGS[1] = 251:$RESULT = 'Tight, blue denim jeans and a black T-Shirt'
if ARGS[1] = 252:$RESULT = 'High rise, blue jeans, with a brown belt and a short, light pink T-Shirt'
if ARGS[1] = 253:$RESULT = 'Skin tight, light blue jeans and a short, tight, neon-pink top'
if ARGS[1] = 254:$RESULT = 'High rise, skin tight, blue jeans, with a black leather belt and a green shirt, with a very revealing cleavage'
if ARGS[1] = 255:$RESULT = 'Tight, light blue jeans and a short, beige shirt'
if ARGS[1] = 256:$RESULT = 'Blue jeans and a white tank top, with a deep cleavage'
if ARGS[1] = 257:$RESULT = 'High rise, skin tight, light blue jeans, with a black leather belt and a white T-Shirt'
if ARGS[1] = 258:$RESULT = 'Tight, dark grey pants and a dark blue shirt, with a deep cleavage'
if ARGS[1] = 259:$RESULT = 'High rise, tight, light blue jeans and a white tank top'
if ARGS[1] = 260:$RESULT = 'High rise, skin tight, light blue jeans and a short white top'
if ARGS[1] = 261:$RESULT = 'High rise, skin tight, white denim jeans and a short, red tube-top'
if ARGS[1] = 262:$RESULT = 'High rise, tight, light blue jeans and a leopard patterend tube top'
if ARGS[1] = 263:$RESULT = 'High rise, skin tight, blue jeans aand a white-yellow top'
if ARGS[1] = 264:$RESULT = 'Low rise, skin tight, light blue jeans and a short, pink camisole'
if ARGS[1] = 265:$RESULT = 'Tight, white denim pants and a short, red camisole'
if ARGS[1] = 266:$RESULT = 'High rise, skin tight, dark blue jeans, with a black leather belt and a tight, thin, black halter top'
if ARGS[1] = 267:$RESULT = 'High rise, skin tight, blue jeans, with a small brown belt and a short white camisole'
if ARGS[1] = 268:$RESULT = 'High rise, tight, light blue jeans and a black tank top'
if ARGS[1] = 269:$RESULT = 'High rise, skin tight, blue jeans and a short, tight, light grey T-Shirt'
if ARGS[1] = 270:$RESULT = 'Tight, dark blue jeans and a grey T-Shirt'
if ARGS[1] = 271:$RESULT = 'Skin tight, blue jeans and a black shirt, with a revealing cleavage'
if ARGS[1] = 272:$RESULT = 'High rise, skin tight, dark blue jeans, with a grey belt and a colourful T-Shirt'
if ARGS[1] = 273:$RESULT = 'Tight, blue jeans and a grey camisole, with a very revealing cleavage'
if ARGS[1] = 274:$RESULT = 'High rise, tight, blue jeans and a white tube top'
if ARGS[1] = 275:$RESULT = 'High rise, skin tight, torn, blue jeans and a very tight, very short, black camisole, with a very revealing cleavage'
if ARGS[1] = 276:$RESULT = 'Tight, light blue jeans and a blue short, with a revealing cleavage'
!! 277 does not exist
if ARGS[1] = 278:$RESULT = 'High rise, skin tight, dark blue jeans and a white tank top, with a revealing cleavage, under a red, leather jacket'
if ARGS[1] = 279:$RESULT = 'High rise, skin tight, blue jeans and a short, blue neckhalter top'
if ARGS[1] = 280:$RESULT = 'High rise, tight, blue jeans and black top, with lacy parts'
if ARGS[1] = 281:$RESULT = 'High rise, tight, light blue jeans and a short, black camisole'
if ARGS[1] = 282:$RESULT = 'High rise, skin tight dark blue jeans and stripped, white-grey T-Shirt'
if ARGS[1] = 283:$RESULT = 'High rise, tight, light blue jeans, with a white-grey belt and a light brown top'
!! 284 does not exist
if ARGS[1] = 285:$RESULT = 'Skin tight, dark blue jeans and a brown tank top'
if ARGS[1] = 286:$RESULT = 'Blue jeans and a skin tight, black latex T-Shirt'
if ARGS[1] = 287:$RESULT = 'High rise, skin tight, light blue jeans, with a small brown belt and a short, colorful top'
!! 288 does not exist
if ARGS[1] = 289:$RESULT = 'Skin tight, dark blue jeans and a tight fitting, light brown camisole'
if ARGS[1] = 290:$RESULT = 'High rise, skin tight, black leather pants and a purple camisole'
if ARGS[1] = 291:$RESULT = 'Skin tight, grey jeans and a white tank top, under a neon-orange jacket'
if ARGS[1] = 292:$RESULT = 'High rise, skin tight, blue jeans and a short, black T-Shirt'
if ARGS[1] = 293:$RESULT = 'High rise, skin tight, blue jeans and a short, white tank top under a colorful blouse'
if ARGS[1] = 294:$RESULT = 'High rise, skin tight, blue jeans and a tight, grey top'
if ARGS[1] = 295:$RESULT = 'High rise, skin tight, blue jeans and a shirt, red top, with a very deep and revealing cleavage'
!! 296 does not exist
if ARGS[1] = 297:$RESULT = 'Tight, light blue jeans and a white camisole'
elseif $ARGS[0] = 'yoga':
if ARGS[1] <= 18:$RESULT = 'Sportswear <>'
elseif $ARGS[0] = 'sarafan':
if ARGS[1] = 1:$RESULT = 'Colorful, free sundress'
if ARGS[1] = 2:$RESULT = 'Bright, free sundress'
if ARGS[1] = 3:$RESULT = 'Simple dress of cheap fabric'
elseif $ARGS[0] = 'short':
if ARGS[1] = 1:$RESULT = 'Black shorts with a purple T-shirt'
if ARGS[1] = 2:$RESULT = 'Black shorts with striped jersey'
if ARGS[1] = 3:$RESULT = 'Black shorts with a black T-shirt'
if ARGS[1] = 4:$RESULT = 'Pink shorts with pink tops'
if ARGS[1] = 5:$RESULT = 'Sexy white shorts'
if ARGS[1] = 201:$RESULT = 'Light blue denim shorts, a black belt and a cropped, white tank top'
if ARGS[1] = 202:$RESULT = 'Blue denim shorts and a grey tank top'
if ARGS[1] = 203:$RESULT = 'Blue denim shorts and a black tank top'
if ARGS[1] = 204:$RESULT = 'Blue denim shorts and a cropped, white tank top'
if ARGS[1] = 205:$RESULT = 'Light blue denim shorts with a frilly, white tank top, which has a discreet color pattern'
if ARGS[1] = 206:$RESULT = 'Light blue denim shorts, a light brown belt and a dark grey tank top'
if ARGS[1] = 207:$RESULT = 'Loose grey shorts with a white tank top'
if ARGS[1] = 208:$RESULT = 'Tight grey shorts with a white tank top'
if ARGS[1] = 209:$RESULT = 'Dark blue denim shorts with a pink bikini top'
if ARGS[1] = 210:$RESULT = 'Light blue denim shorts and a white bikini top, which has a pinkish colored pattern'
if ARGS[1] = 211:$RESULT = 'Very short, blue denim shorts and a light pink shirt'
if ARGS[1] = 212:$RESULT = 'Light blue denim shorts with a white shirt'
if ARGS[1] = 213:$RESULT = 'Dark blue shorts and black leggings with a bright pink shirt'
if ARGS[1] = 214:$RESULT = 'Very short, dark blue denim shorts with a grey T-Shirt'
if ARGS[1] = 215:$RESULT = 'Loose, light blue denim shorts with a tight, brown shirt'
if ARGS[1] = 216:$RESULT = 'Loose, blue denim shorts with a light grey T-Shirt, which a deep U-Style neckline'
if ARGS[1] = 217:$RESULT = 'Light blue denim shorts with a white top'
if ARGS[1] = 218:$RESULT = 'Light blue denim shorts with a halterless, pink top'
if ARGS[1] = 219:$RESULT = 'Blue denim shorts with a grey tank top'
if ARGS[1] = 220:$RESULT = 'Very short, white shorts and a white top'
if ARGS[1] = 221:$RESULT = 'Tight, white denim shorts with a short, but colorful tank top'
if ARGS[1] = 222:$RESULT = 'White shorts with a tight, light brown T-Shirt'
if ARGS[1] = 223:$RESULT = 'Black shorts with a turquise belt and short, black-turquoise T-Shirt'
if ARGS[1] = 224:$RESULT = 'Blue shorts with a short, blue T-Shirt'
if ARGS[1] = 225:$RESULT = 'Dark blue denim shorts and sheer, beige blouse'
if ARGS[1] = 226:$RESULT = 'Light blue denim shorts, a dark blue tank top and a white vest'
if ARGS[1] = 227:$RESULT = 'Very short, tight, black shorts with a yellow belt and a yellow hoodie'
if ARGS[1] = 228:$RESULT = 'Very short, tight, black shorts and a orange-white vest'
if ARGS[1] = 229:$RESULT = 'Very short denim shorts and a tight, short white T-shirt, which a deep U-shaped cutting'
if ARGS[1] = 230:$RESULT = 'Tight, light blue denim shorts and a loose fitting blue top'
if ARGS[1] = 231:$RESULT = 'Very short blue denim shorts, with a brown belt and a frilly, light blue neckhalter top'
if ARGS[1] = 232:$RESULT = 'Dark blue denim shorts, with a large, light brown belt and a blue halter top, which has a deep U-shaped cutting'
if ARGS[1] = 233:$RESULT = 'Blue denim shorts and a short white halter top, which you can see slightly through and it has a deep U-shaped neckline'
if ARGS[1] = 234:$RESULT = 'Cropped dark blue denim short and a back free, light pink halter'
if ARGS[1] = 235:$RESULT = 'Light blue denim shorts and a light brown top'
if ARGS[1] = 236:$RESULT = 'Cropped blue denim shorts and a bright pink shirt, which has a very deep V-shaped cutting'
if ARGS[1] = 237:$RESULT = 'Short yellow-black hotpants and a white tank top'
if ARGS[1] = 238:$RESULT = 'Cropped white shorts and a light pink tank top'
if ARGS[1] = 239:$RESULT = 'Cropped blue denim shorts and a loose fitting red halter top'
if ARGS[1] = 240:$RESULT = 'Very short, cropped blue denim shorts and a red patterend blouse'
if ARGS[1] = 241:$RESULT = 'Cropped light blue shorts and a very revealing white top'
if ARGS[1] = 242:$RESULT = 'Light blue denim shorts, with a brown belt and a pink top'
!! 243 does not exist
if ARGS[1] = 244:$RESULT = 'Cropped black denim shorts, with a studded black belt, a black tank top and a black leather vest'
if ARGS[1] = 245:$RESULT = 'Short black hotpants and a white halter top'
if ARGS[1] = 246:$RESULT = 'Light blue denim shorts, with a brown belt and a blue top, with a V-shaped cleavage'
if ARGS[1] = 247:$RESULT = 'Light blue denim shorts and a loose fitting tank top'
if ARGS[1] = 248:$RESULT = 'Light blue denim shorts, with a yellow belt and a tight yellow halter top'
if ARGS[1] = 249:$RESULT = 'Very short blue denim shorts and a very short, but cute top'
if ARGS[1] = 250:$RESULT = 'Yellow hotpants and a short blue halter top'
if ARGS[1] = 251:$RESULT = 'White hotpants and a tight fitting white top, which has a deep U-shaped neckline'
if ARGS[1] = 252:$RESULT = 'Cropped light blue denim shorts, a very short yellow halter top and a light blue blouse'
if ARGS[1] = 253:$RESULT = 'Light blue denim shorts, a pink bikini top, which is under a red, flower-patterned see-through top'
!! 254 does not exist
if ARGS[1] = 255:$RESULT = 'Blue denim shorts and a white shirt'
if ARGS[1] = 256:$RESULT = 'Light blue denim shorts, with a brown snake-skin belt and a short dark brown T-Shirt'
elseif $ARGS[0] = 'skirt':
if ARGS[1] = 1:$RESULT = 'White skirt with a colorful blouse'
if ARGS[1] = 2:$RESULT = 'Black leather skirt with a red sweater'
if ARGS[1] = 3:$RESULT = 'White skirt with striped blouse'
if ARGS[1] = 4:$RESULT = 'White skirt with a colorful blouse'
if ARGS[1] = 5:$RESULT = 'Black leather skirt with a red blouse'
if ARGS[1] = 201:$RESULT = 'Orange-beige micro skirt and a top with a deep V-shaped cutting'
if ARGS[1] = 202:$RESULT = 'Black plaid mirco skirt and a grey T-Shirt, that has a deep V-cut neckline'
if ARGS[1] = 203:$RESULT = 'Light brown mini skirt with a tight dark brown short'
if ARGS[1] = 204:$RESULT = 'Light blue skirt with a tight fitting white top'
if ARGS[1] = 205:$RESULT = 'Dark blue denim micro skirt and a pink tank top'
if ARGS[1] = 206:$RESULT = 'Red patterned plaid micro skirt and a cute T-Shirt'
if ARGS[1] = 207:$RESULT = 'Light blue flower patterned high-waisted skirt and a short bright pink shirt'
if ARGS[1] = 208:$RESULT = 'White mini skirt with a blue tank top'
if ARGS[1] = 209:$RESULT = 'White flare mini skirt with a yellow top'
if ARGS[1] = 210:$RESULT = 'Blue denim mini skirt with a cropped light blue top'
if ARGS[1] = 211:$RESULT = 'Tight white mini skirt with buckles on the side and a red polkadot patterned blouse'
if ARGS[1] = 212:$RESULT = 'Blue denim skirt with a sliver belt and a tight grey neckhaltered top'
if ARGS[1] = 213:$RESULT = 'Light purple flare skirt with a see through yellow top. Get a nice vintage look with the right pantyhose and heels'
if ARGS[1] = 214:$RESULT = 'Dark grey flared micro skirt and a bright pink pullover'
if ARGS[1] = 215:$RESULT = 'High-waisted turquise pencil mini skirt and a very short purple top'
if ARGS[1] = 216:$RESULT = 'Dark blue pencil mini skirt, a white shirt with a white ribbon at the end of the V-shaped cutting and a small beige colored jacket'
if ARGS[1] = 217:$RESULT = 'High-waisted black leather skirt and a white T-Shirt, which has a high U-shaped cutting'
if ARGS[1] = 218:$RESULT = 'Dark blue flare skirt and a green T-Shirt'
if ARGS[1] = 219:$RESULT = 'Blue denim mini skirt and a trendy T-Shirt, with a high V-shaped cutting'
!! 220 does not exist
if ARGS[1] = 221:$RESULT = 'White mini skirt and a blue patterend halter top'
if ARGS[1] = 222:$RESULT = 'Blue denim mini skirt and a beige colored top, which is kept together by knots'
if ARGS[1] = 223:$RESULT = 'Purple mini skirt, a purple top and a black leather jacket'
if ARGS[1] = 224:$RESULT = 'Light blue flare skirt and a dark purple shirt, with a V-shaped cutting'
if ARGS[1] = 225:$RESULT = 'Purple patterned flared micro skirt and a pink tank top'
if ARGS[1] = 226:$RESULT = 'High-waisted grey pencil skirt and a black tank top'
if ARGS[1] = 227:$RESULT = 'Tight red micro skirt with a flower patterned belt and a white blouse with a very deep V-shaped cutting'
if ARGS[1] = 228:$RESULT = 'Red-Black colored pattern on a flared micro skirt and a white blouse under a black top'
if ARGS[1] = 229:$RESULT = 'Tight purple mini skirt and a white see-through blouse'
if ARGS[1] = 230:$RESULT = 'Dark blue denim mini skirt and a light blue tank top'
!! 231 does not exist
if ARGS[1] = 232:$RESULT = 'Flower patterned flared micro skirt and a black top with a very deep V-shaped cutting'
if ARGS[1] = 233:$RESULT = 'Pink micro skirt and a black top with a U-Shaped cutting'
if ARGS[1] = 234:$RESULT = 'White mini skirt with a very tight light pink shirt'
if ARGS[1] = 235:$RESULT = 'Dark blue denim micro skirt and a red shirt'
!! 236 does not exist
if ARGS[1] = 237:$RESULT = 'Light pink micro skirt and a short white top, with a very deep V-shaped cutting'
if ARGS[1] = 238:$RESULT = 'Black pencil skirt and a loose white top'
if ARGS[1] = 239:$RESULT = 'Blue denim flared skirt and a blue flower patterend halter top'
if ARGS[1] = 240:$RESULT = 'Light blue denim skirt, a black tank top and a small black leather jacket'
!! 241 does not exist
if ARGS[1] = 242:$RESULT = 'Beige pencil skirt and a black tank top under a black blouse and a black belt, which closes the blouse'
if ARGS[1] = 243:$RESULT = 'Dark green flared skirt and a short white shirt under a short black leather-like vest'
!! 244 does not exist
if ARGS[1] = 245:$RESULT = 'Tight pink micro skirt and a grey tank top, with a deep U-shaped cutting under a denim jacket'
if ARGS[1] = 246:$RESULT = 'Black flared micro skirt and a red tank top, with a small black ribbon at the end of the very deep U-shaped cutting, under a bright pink jacket'
if ARGS[1] = 247:$RESULT = 'White denim mini skirt and dark purple T-Shirt with a very deep V-shaped cutting'
if ARGS[1] = 248:$RESULT = 'Black leather mini skirt and a black T-Shirt, which has a U-shaped cutting'
if ARGS[1] = 249:$RESULT = 'Black leather mini skirt and a very tight light pink T-Shirt with a deep U-shaped cutting'
if ARGS[1] = 250:$RESULT = 'Black pencil mini skirt and a dark purple T-Shirt'
if ARGS[1] = 251:$RESULT = 'Light blue denim micro skirt and a white halter top, which has a deep U-shaped cutting'
if ARGS[1] = 252:$RESULT = 'White micro skirt and a pink-white flower patterend halterless top'
if ARGS[1] = 253:$RESULT = 'Pink mini skirt and a cute light pink T-Shirt'
if ARGS[1] = 254:$RESULT = 'Light blue denim micro skirt and a very short light yellow top, which is secured by a knot between the breasts'
if ARGS[1] = 255:$RESULT = 'Black flared micro skirt and a black blouse, with a deep V-shaped cutting by default'
if ARGS[1] = 256:$RESULT = 'Black pencil mini skirt and a grey halter top, which has a deep U-shaped cutting'
if ARGS[1] = 257:$RESULT = 'White pencil mini skirt and a light green loose top, which a very deep but not very revealing V-shaped cutting'
if ARGS[1] = 258:$RESULT = 'Grey flared micro skirt and a dark brown halter top, which has a deep U-shaped neckline'
if ARGS[1] = 259:$RESULT = 'Light blue denim mini skirt and a white-blue striped leaf patterned tank top beneath a cute dark blue jacket'
if ARGS[1] = 260:$RESULT = 'Light blue denim mini skirt and a cropped white halter top, which has a nice V-shaped cutting'
if ARGS[1] = 261:$RESULT = 'Glittery grey pencil mini skirt and a dark blue shirt'
if ARGS[1] = 262:$RESULT = 'Striped flared mini skirt, a light pink slightly see-through halter top and a brown belt as accessory'
if ARGS[1] = 263:$RESULT = 'High waisted black pencil skirt and a white T-Shirt'
if ARGS[1] = 264:$RESULT = 'Blue denim mini skirt and a white T-Shirt, which has a deep U-shaped cutting'
if ARGS[1] = 265:$RESULT = 'White flared mini skirt and a grey T-Shirt'
if ARGS[1] = 266:$RESULT = 'Light blue micro skirt and a tight white tank top'
if ARGS[1] = 267:$RESULT = 'Flared blue micro skit and a light yellow halter top, which provides a great view to anyone, due to its deep cutting'
if ARGS[1] = 268:$RESULT = 'Dark blue flared mini skirt and a cropped white T-Shirt, which has a deep V-shaped cutting'
if ARGS[1] = 269:$RESULT = 'Tight white pencil skirt, with a golden belt and tight turquoise colored neckhaltered top'
if ARGS[1] = 270:$RESULT = 'Pink flared micro skirt and a white T-shirt, which has a few black lines to decorate it'
if ARGS[1] = 271:$RESULT = 'Stripe patterend White-Black-Red flared mini skirt and a beige shirt, which has a very deep V-shaped cutting'
if ARGS[1] = 272:$RESULT = 'Light blue denim micro skirt and a green tank top, which has a deep U-shaped cutting'
if ARGS[1] = 273:$RESULT = 'Red flared mini skirt and an orange T-shirt. It has a red belt as accessory to bind around the waist. It makes you look like Velma'
elseif $ARGS[0] = 'dress':
if ARGS[1] = 1:$RESULT = 'Black dress'
if ARGS[1] = 2:$RESULT = 'Yellow dress'
if ARGS[1] = 3:$RESULT = 'Blue dress'
if ARGS[1] = 4:$RESULT = 'Black short dress'
if ARGS[1] = 5:$RESULT = 'Red long dress'
if ARGS[1] = 6:$RESULT = 'Red polka dot dress'
if ARGS[1] = 7:$RESULT = 'Brown dress'
if ARGS[1] >= 8 and ARGS[1] <= 24:$RESULT = 'Dress <>'
if ARGS[1] = 201:$RESULT = 'Tight beige halter dress and beige-golden heels'
if ARGS[1] = 202:$RESULT = 'Very short flower-style dress and pink pumps with golden heels'
if ARGS[1] = 203:$RESULT = 'Glittery pink neckhalter dress'
if ARGS[1] = 204:$RESULT = 'Tight wine red dress with a deep V cut'
if ARGS[1] = 205:$RESULT = 'Tight bright red dress with a sheer black back'
if ARGS[1] = 206:$RESULT = 'Grey green dress'
if ARGS[1] = 207:$RESULT = 'Black lounge dress, including black heels'
if ARGS[1] = 208:$RESULT = 'Glittery black dress with deep V cut'
if ARGS[1] = 209:$RESULT = 'Tight black dress with thigh high boots'
if ARGS[1] = 210:$RESULT = 'Tight bright blue dress'
if ARGS[1] = 211:$RESULT = 'Glittery, black dress, with a deep V-shaped cleavage'
if ARGS[1] = 212:$RESULT = 'Black dress, which has parts made of a see-trough material'
if ARGS[1] = 213:$RESULT = 'White-beige dress, with a deep cleavage'
if ARGS[1] = 214:$RESULT = '2-part dress, with a short, tight skirt and a form-fitting top'
if ARGS[1] = 215:$RESULT = 'Form-fittig black dress'
if ARGS[1] = 216:$RESULT = 'Short, white dress'
if ARGS[1] = 217:$RESULT = 'Dark blue dress with a revealing cleavage'
if ARGS[1] = 218:$RESULT = 'Wine red dress, which has several lace parts'
if ARGS[1] = 219:$RESULT = 'Red-blue-white dress'
if ARGS[1] = 220:$RESULT = 'Black dress, with a revealing cleavage'
if ARGS[1] = 221:$RESULT = 'Form-fitting, pink-grey dress'
if ARGS[1] = 222:$RESULT = 'Pink dress'
if ARGS[1] = 223:$RESULT = 'Long, glittery red dress, with a deep cleavage'
if ARGS[1] = 224:$RESULT = 'Long, formal dress in blue'
if ARGS[1] = 225:$RESULT = 'Long, formal dress in red'
elseif $ARGS[0] = 'profi':
if ARGS[1] <= 2:$RESULT = 'Office Clothes <>'
if ARGS[1] >= 201 and ARGS[1] <= 208:$RESULT = 'Office Clothes <>'
elseif $ARGS[0] = 'pants':
if ARGS[1] = 1:$RESULT = 'Tight black leggings with black top'
if ARGS[1] = 2:$RESULT = 'Tight black leggings with a red blouse'
if ARGS[1] = 3:$RESULT = 'Purple skinny leggings with black top'
if ARGS[1] = 4:$RESULT = 'Tight black leggings with black short top'
if ARGS[1] = 5:$RESULT = 'White skinny jeans with a black top'
if ARGS[1] = 201:$RESULT = 'Glittery silver leggings with a silver neckhalter top'
if ARGS[1] = 202:$RESULT = 'Shiny silver leggings and a short white tube top'
if ARGS[1] = 203:$RESULT = 'Shiny beige leggings and a frilly white T-Shirt, which people are able to see through'
if ARGS[1] = 204:$RESULT = 'Grey leggings with a black tank top and a short black leather jacket'
if ARGS[1] = 205:$RESULT = 'Black leggings with a light blue top, which provides a great view due to it very deep U-Shaped cutting'
if ARGS[1] = 206:$RESULT = 'Shiny black leggings with a shiny silver top'
if ARGS[1] = 207:$RESULT = 'Black leggings with a pink top'
if ARGS[1] = 208:$RESULT = 'Tight blue leggings with a black tank top'
!! 209 does not exist
if ARGS[1] = 210:$RESULT = 'Tight grey leggings with discreet leopard pattern, a white blouse and a light brown jacket'
if ARGS[1] = 211:$RESULT = 'Shiny black leggings, with a studded belt and a black T-Shirt'
if ARGS[1] = 212:$RESULT = 'Shiny black leggings and a black-white striped camisole under a dark grey jacket'
if ARGS[1] = 213:$RESULT = 'Black leggings and a white blouse'
if ARGS[1] = 214:$RESULT = 'Black leggings and a short dark blue T-Shirt'
if ARGS[1] = 215:$RESULT = 'Patterned blue leggings and a colorful tank top'
if ARGS[1] = 216:$RESULT = 'Black leggings and a white tank top'
if ARGS[1] = 217:$RESULT = 'Light pink leggings and a black tank top under a short grey hoodie'
if ARGS[1] = 218:$RESULT = 'Grey leggings and a white neckhalter top'
if ARGS[1] = 219:$RESULT = 'Black leggings and a pink T-Shirt'
if ARGS[1] = 220:$RESULT = 'White leggings and a short, white tube top'
if ARGS[1] = 221:$RESULT = 'Shiny, grey leggings and a short, blue blouse'
if ARGS[1] = 222:$RESULT = 'Leopard patterned leggings and a short, red top'
if ARGS[1] = 223:$RESULT = 'Beige pants and an oliv T-Shirt'
if ARGS[1] = 224:$RESULT = 'Pants 224'
!! 225 does not exist
if ARGS[1] = 226:$RESULT = 'Dark blue leggings and a black shirt'
if ARGS[1] = 227:$RESULT = 'Grey leggings and a loose fitting, pink T-Shirt'
if ARGS[1] = 228:$RESULT = 'Black leggings and a very short, black camisole'
!! 226 does not exist
if ARGS[1] = 230:$RESULT = 'Grey leggings, with a black leather belt and a black top'
if ARGS[1] = 231:$RESULT = 'Blue leggings and a very short, blue top'
if ARGS[1] = 232:$RESULT = 'Shiny black leggings and a short, black neckhalter top'
if ARGS[1] = 233:$RESULT = 'Thin, grey leggings and a white T-Shirt'
if ARGS[1] = 234:$RESULT = 'Shiny, black leggings and a black top'
if ARGS[1] = 235:$RESULT = 'Shiny, patterned leggings and a black tank top'
if ARGS[1] = 236:$RESULT = 'Grey leggings and a light purple T-Shirt'
if ARGS[1] = 237:$RESULT = 'Dark blue leggings and a black top'
if ARGS[1] = 238:$RESULT = 'Grey leggings and a light pink top'
if ARGS[1] = 239:$RESULT = 'Grey leggings and a grey top'
if ARGS[1] = 240:$RESULT = 'Dark grey leggings, with colorful stripes and a white T-Shirt'
if ARGS[1] = 241:$RESULT = 'Grey leggings and a blue hoodie'
if ARGS[1] = 242:$RESULT = 'White leggings and a white bikini top'
if ARGS[1] = 243:$RESULT = 'White leggings and a orange-red top'
if ARGS[1] = 244:$RESULT = 'Black leggings and a white camisole, with a deep cleavage'
if ARGS[1] = 245:$RESULT = 'White leggings and a very short black tube top'
if ARGS[1] = 246:$RESULT = 'Grey leggings and a black T-Shirt'
if ARGS[1] = 247:$RESULT = 'Black leggings and a short, black-white tank top'
if ARGS[1] = 248:$RESULT = 'Dark grey leggings and a white tube top'
if ARGS[1] = 249:$RESULT = 'Shiny black leggings and a black leather jacket'
if ARGS[1] = 250:$RESULT = 'Shiny brown leggings and a white T-Shirt'
if ARGS[1] = 251:$RESULT = 'White leggings and a short, white tube-top'
if ARGS[1] = 252:$RESULT = 'Wine red leggings and a dark blue denim jacket'
if ARGS[1] = 253:$RESULT = 'Thin, white leggings and a white top'
if ARGS[1] = 254:$RESULT = 'Light brown leggings and a blue denim jacket'
if ARGS[1] = 255:$RESULT = 'White leggings and a very short, black tube top'
if ARGS[1] = 256:$RESULT = 'Shiny red leggings and a white blouse'
if ARGS[1] = 257:$RESULT = 'Black leggings and a light brown shirt'
if ARGS[1] = 258:$RESULT = 'Shiny black leggings and a black top'
if ARGS[1] = 259:$RESULT = 'Dark blue leggings and a green tube top'
if ARGS[1] = 260:$RESULT = 'Blue leggings and a black shirt'
if ARGS[1] = 261:$RESULT = 'Light blue leggings and a red-black T-Shirt'
if ARGS[1] = 262:$RESULT = 'Black leggings and a white T-Shirt, with deep cleavage'
if ARGS[1] = 263:$RESULT = 'Grey leggings and a white top'
if ARGS[1] = 264:$RESULT = 'Black pants, with a black studded leather belt and a short, black top'
if ARGS[1] = 265:$RESULT = 'Brown leggings and a light pink top, with a deep cleavage'
if ARGS[1] = 266:$RESULT = 'Shiny, black leggings and a grey shirt'
if ARGS[1] = 267:$RESULT = 'Dark blue leggings and a short, black top'
if ARGS[1] = 268:$RESULT = 'Blue leggings and a short, white top'
if ARGS[1] = 269:$RESULT = 'Blue leggings and a beige camisole'
if ARGS[1] = 270:$RESULT = 'Black leggings and a black tube top'
if ARGS[1] = 271:$RESULT = 'Blue pants and a short, white nackhalter top'
!! 272 does not exist
if ARGS[1] = 273:$RESULT = 'Black leggings and a beige tank top, under a blue shirt'
if ARGS[1] = 274:$RESULT = 'Light blue leggings and a short, white T-Shirt'
if ARGS[1] = 275:$RESULT = 'Wine red leggings and a short black shirt'
if ARGS[1] = 276:$RESULT = 'Black leggings and a short black shirt'
if ARGS[1] = 277:$RESULT = 'Shiny, pink leggings and a white jacket'
if ARGS[1] = 278:$RESULT = 'Black leggings and a very short, black camisole'
if ARGS[1] = 279:$RESULT = 'Shiny, golden leggings and a shiny, golden top'
if ARGS[1] = 280:$RESULT = 'Grey leggings and a short, blue tube top'
if ARGS[1] = 281:$RESULT = 'Shiny, black leggings and a red top'
if ARGS[1] = 282:$RESULT = 'Dark grey leggings and a grey tank top, under a grey jacket'
if ARGS[1] = 283:$RESULT = 'White leggings and a black camisole, with a deep cleavage, under a short, black leather jacket'
if ARGS[1] = 284:$RESULT = 'Black leggings and a grey neckhalter top'
if ARGS[1] = 285:$RESULT = 'White leggings and a white top'
if ARGS[1] = 286:$RESULT = 'White leggings and a short white camisole, under a blue jacket'
if ARGS[1] = 287:$RESULT = 'Black leggings and a black top'
if ARGS[1] = 288:$RESULT = 'Black leggings and a short, light blue denim vest'
if ARGS[1] = 289:$RESULT = 'Patterned, black-white leggings and a loose fitting golden top'
if ARGS[1] = 290:$RESULT = 'Black leather pants and a wine red tank top'
if ARGS[1] = 291:$RESULT = 'Dark blue leggings adn a dark blue shirt'
if ARGS[1] = 292:$RESULT = 'Black leggings and a black shirt'
if ARGS[1] = 293:$RESULT = 'Wine red leggings and a short, blue tank top'
if ARGS[1] = 294:$RESULT = 'Light grey leggings and a very short, blue top'
if ARGS[1] = 295:$RESULT = 'Wine red leggings and a loose fitting, dark blue tank top'
if ARGS[1] = 296:$RESULT = 'Black leggings and a red-white striped shirt'
if ARGS[1] = 297:$RESULT = 'Shiny black leggings and a short, wine red top'
if ARGS[1] = 298:$RESULT = 'White leggings and a neon-green top'
if ARGS[1] = 299:$RESULT = 'Pink leggings and a purple top'
if ARGS[1] = 300:$RESULT = 'Grey leggings and a white blouse'
if ARGS[1] = 301:$RESULT = 'Shiny black leggings and a pink fishnet top'
if ARGS[1] = 302:$RESULT = 'Black leggings and a white-black top'
if ARGS[1] = 303:$RESULT = 'Red leggings and a black top'
if ARGS[1] = 304:$RESULT = 'Black leggings and a white top'
if ARGS[1] = 305:$RESULT = 'Shiny black leggings and a very short white-black top'
if ARGS[1] = 306:$RESULT = 'Thin, white pants and a short, red top'
if ARGS[1] = 307:$RESULT = 'Grey leggings and a black shirt'
!! 308 does not exist
if ARGS[1] = 309:$RESULT = 'Black leggings and a white-black striped top, with a very revealing cleavage'
!! 310 does not exist
if ARGS[1] = 311:$RESULT = 'Shiny beige leggings and a black top, with a deep cleavage'
if ARGS[1] = 312:$RESULT = 'White leggings and a very short, white tube top, under a loose fitting blue top'
if ARGS[1] = 313:$RESULT = 'Black leggings and a black camisole, with a deep cleavage'
if ARGS[1] = 314:$RESULT = 'Skin tight, white pants and a beige top'
if ARGS[1] = 315:$RESULT = 'Grey leggings and a white top, with a deep cleavage'
if ARGS[1] = 316:$RESULT = 'Dark grey leggings and a black top'
if ARGS[1] = 317:$RESULT = 'Dark grey leggings and a grey T-Shirt'
if ARGS[1] = 318:$RESULT = 'Thin, shiny, black leggings and a black top'
if ARGS[1] = 319:$RESULT = 'Black leggings and a short, black-white striped shirt'
if ARGS[1] = 320:$RESULT = 'Thin, white pants and a short white top'
if ARGS[1] = 321:$RESULT = 'Shiny black leggings and a very short, shiny black camisole under a black leather jacket'
if ARGS[1] = 322:$RESULT = 'Shiny black leggings and a black tank top, under a brown leather vest'
if ARGS[1] = 323:$RESULT = 'Pants 323'
if ARGS[1] = 324:$RESULT = 'Black leggings, with holes and a leopard patterned shirt, with some cleavage'
if ARGS[1] = 325:$RESULT = 'Shiny black leggings and a colourful top'
if ARGS[1] = 326:$RESULT = 'Shiny black leggings and a very short, black tube top'
if ARGS[1] = 327:$RESULT = 'Shiny black leggings and a black top, with a very revealing cleavage'
if ARGS[1] = 328:$RESULT = 'Black leggings and a long, black T-Shirt under a black leather jacket'
if ARGS[1] = 329:$RESULT = 'Shiny black leggings and a long, wine red top'
if ARGS[1] = 330:$RESULT = 'Shiny black leggings and a very revealing dark blue camisole'
if ARGS[1] = 331:$RESULT = 'Black leggings and a long, grey T-Shirt, under a black leather jacket'
if ARGS[1] = 332:$RESULT = 'Shiny black leggings and a black leather jacket'
if ARGS[1] = 333:$RESULT = 'Shiny black leggings and a very short, white top'
if ARGS[1] = 334:$RESULT = 'Black leggings and a white T-Shirt, under a floral patterned blouse'
if ARGS[1] = 335:$RESULT = 'Black leggings and a white T-Shirt, under a black leather jacket'
if ARGS[1] = 336:$RESULT = 'Shiny black leggings and a white-black striped shirt, under a light blue jacket'
if ARGS[1] = 337:$RESULT = 'Shiny red leggings and a white top, under a brown vest'
if ARGS[1] = 338:$RESULT = 'Shiny black leggings and a white T-Shirt, under a red jacket'
if ARGS[1] = 339:$RESULT = 'Shiny black leggings and a white-black striped T-Shirt, under a blue denim jacket'
!! 340 does not exist
if ARGS[1] = 341:$RESULT = 'Black leggings and a black T-Shirt, under a blue denim vest'
if ARGS[1] = 342:$RESULT = 'Shiny black leggings and a white T-Shirt'
if ARGS[1] = 343:$RESULT = 'Black leggings and a very short, black camisole under a black leather jacket'
if ARGS[1] = 344:$RESULT = 'Black leggings and a black camisole, under a black leather jacket'
if ARGS[1] = 345:$RESULT = 'Shiny black leggings and a black shirt, under a black leather jacket'
if ARGS[1] = 346:$RESULT = 'Blue jeggings and a tight, red camisole, with a revealing cleavage'
elseif $ARGS[0] = 'latex':
if ARGS[1] = 1:$RESULT = 'Black latex bodysuit'
if ARGS[1] = 2:$RESULT = 'Purple latex dress'
elseif $ARGS[0] = 'hooker':
if ARGS[1] <= 5:$RESULT = 'Prostitute outfit <>'
if ARGS[1] >= 201 and ARGS[1] <= 205:$RESULT = 'Prostitute outfit <>'
elseif $ARGS[0] = 'odekis':
if ARGS[1] <= 10:$RESULT = 'Youth outfit <>'
elseif $ARGS[0] = 'newclo':
if ARGS[1] <= 130:$RESULT = 'Fashionista outfit <>'
elseif $ARGS[0] = 'ero':
if ARGS[1] = 1:$RESULT = 'Mesh jacket with white denim skirt'
if ARGS[1] = 2:$RESULT = 'Net blue dress'
if ARGS[1] = 3:$RESULT = 'Transparent white dress'
if ARGS[1] = 4:$RESULT = 'Small transparent white dress'
if ARGS[1] = 5:$RESULT = 'Latex corwith skirt'
if ARGS[1] = 6:$RESULT = 'Short transparent black dress'
if ARGS[1] = 7:$RESULT = 'Net black dress'
if ARGS[1] = 8:$RESULT = 'Long transparent black dress'
if ARGS[1] = 9:$RESULT = 'Transparent leopard dress'
if ARGS[1] = 10:$RESULT = 'Black top with mesh stockings'
if ARGS[1] = 11:$RESULT = 'Net black jacket with black shorts'
if ARGS[1] = 12:$RESULT = 'Transparent red dress'
if ARGS[1] = 13:$RESULT = 'Transparent pink shorts with top'
if ARGS[1] = 14:$RESULT = 'Small mesh black dress'
if ARGS[1] = 15:$RESULT = 'The little black skirt with transparent top'
if ARGS[1] = 16:$RESULT = 'Net white dress'
if ARGS[1] = 17:$RESULT = 'Little pink skirt with transparent top'
if ARGS[1] = 18:$RESULT = 'Something net'
end
if $RESULT = '':$RESULT = 'Missing clothing name for <<$ARGS[0]>> <>'
--- $clothing_name ---------------------------------
# $clothing_image
!! get the image for clothing
!! ARGS 0 - clothing group name
!! ARGS 1 - clothing index
if $ARGS[0] = 'vatnik':$RESULT = 'images/clothes/vatnik.jpg'
if $ARGS[0] = 'sforma':$RESULT = 'images/clothes/newclo/131.jpg'
if $ARGS[0] = 'jeans':$RESULT = 'images/clothes/jeans<>.jpg'
if $ARGS[0] = 'yoga':$RESULT = 'images/clothes/yoga<>.jpg'
if $ARGS[0] = 'sarafan':$RESULT = 'images/clothes/sarafan<>.jpg'
if $ARGS[0] = 'short':$RESULT = 'images/clothes/short<>.jpg'
if $ARGS[0] = 'skirt':$RESULT = 'images/clothes/skirt<>.jpg'
if $ARGS[0] = 'dress':$RESULT = 'images/clothes/dress<>.jpg'
if $ARGS[0] = 'profi':$RESULT = 'images/clothes/profi<>.jpg'
if $ARGS[0] = 'pants':$RESULT = 'images/clothes/pants<>.jpg'
if $ARGS[0] = 'latex':$RESULT = 'images/clothes/latex<>.jpg'
if $ARGS[0] = 'hooker':$RESULT = 'images/clothes/hooker<