glife/locations/439_FSstat

# FSstat
<<<<<<< 439_FSstat
FSneedExpNextLvl=(FSlvl * 10)*FSlvl
FSneedExp = FSneedExpNextLvl - FSexp
if FSneedExp <= 0 and FSlvl > FSlvlr: FSlvlr = FSlvl & FSpoint += 5 & FSlvl += 1 & FSexp = 0

if FSfemin < 45:$FSfemin = 'Men'
if FSfemin >= 45 and FSfemin >= 55:$FSfemin = 'Androgynous'
if FSfemin > 55:$FSfemin = 'Female'

if FSfigur < 45:$FSfigur = 'Male figure'
if FSfigur >= 45 and FSfigur >= 55:$FSfigur = 'Androgynous figure'
if FSfigur > 55:$FSfigur = 'Female figure'

if FScolor < 0: FScolor = 0
if FScolor > 5: FScolor = 5
if FScolor = 0:$FScolor = 'Black hair' & $FSsherst = 'Black'
if FScolor = 1:$FScolor = 'Brown hair' & $FSsherst = 'Brown'
if FScolor = 2:$FScolor = 'Foxy hair' & $FSsherst = 'Redhead'
if FScolor = 3:$FScolor = 'Blonde hair' & $FSsherst = '<<$name>>'
if FScolor = 4:$FScolor = 'Pink hair' & $FSsherst = 'Pink'
if FScolor = 5:$FScolor = 'White hair' & $FSsherst = 'White'

if FSface <= 0:$FSface = '<<$FSfemin>> person. <<$FScolor>>'
if FSface = 1:$FSface = '<<$FSfemin>> a person with cat ears and nose. <<$FScolor>>'
if FSface = 2:$FSface = '<<$FSfemin>> a person with dog ears and nose. <<$FScolor>>'
if FSface = 3:$FSface = '<<$FSfemin>> A person with fox ears and nose. <<$FScolor>>'
if FSface = 4:$FSface = '<<$FSfemin>> The person with the protruding ears and nose. <<$FScolor>>'
if FSface = 5:$FSface = '<<$FSfemin>> A person with cow´s ears and nose. <<$FScolor>>'
if FSface >= 6:$FSface = '<<$FSfemin>> a person with ears and nose like a lizard. <<$FScolor>>'

if FSskin <= 0:$FSskin = 'Normal skin'
if FSskin = 1:$FSskin = '<<$FSsherst>> The fur on the body'
if FSskin >= 2:$FSskin = 'Scales on body'

if FShvost <= 0:$FShvost = ''
if FShvost = 1:$FShvost = 'Cat´s tail'
if FShvost = 2:$FShvost = 'Dog´s tail'
if FShvost = 3:$FShvost = 'Foxtail'
if FShvost = 4:$FShvost = 'Horse´s tail'
if FShvost = 5:$FShvost = 'Cow´s Tail'
if FShvost >= 6:$FShvost = 'Reptile tail'

if dicktipe <= 0:$dicktipe = 'Normal male'
if dicktipe = 1:$dicktipe = 'Conical, covered with soft spines cat'
if dicktipe = 2:$dicktipe = 'Red, a large dog at the base node'
if dicktipe = 3:$dicktipe = 'Covered with coarse, black leather bull'
if dicktipe >= 4:$dicktipe = 'Powerful horse'

if FSdick > 0:$FSdick = '<<$dicktipe>> long dick <<FSdick>>, see'
if FSdick <= 0:$FSdick = ''

if FSvagina > 0:$FSvagina = 'Between the legs of you is Snatch.'
if FSvagina <= 0:$FSvagina = ''

if FStits = 1:$FStitrazm = 'AA'
if FStits = 2:$FStitrazm = 'A resolution'
if FStits = 3:$FStitrazm = 'size B'
if FStits = 4:$FStitrazm = 'size C'
if FStits = 5:$FStitrazm = 'size D'
if FStits = 6:$FStitrazm = 'size E'
if FStits = 7:$FStitrazm = 'size F'
if FStits > 8:$FStitrazm = 'size F +'

if FStits > 0 and FStitsLine = 0:$FStits = 'Female breast <<$FStitrazm>>'
if FStits > 0 and FStitsLine = 1:$FStits = 'Two pairs of women´s breasts <<$FStitrazm>>'
if FStits > 0 and FStitsLine >= 2:$FStits = 'Three pairs of nipples <<$FStitrazm>>'

if FSpers = 0:$FSpers = 'You have no character'
if FSpers > 0:$FSpers = '<<$FSname>>. <<$FSface>> <<$FSfigur>> <<$FStits>> <<$FSskin>> <<$FShvost>> <<$FSdick>> <<$FSvagina>>'
'Level <<FSlvl>>, exp <<FSexp>>, need for next level <<FSneedExp>> exp'
'Life <<FSHP>>'
'Strength <<FSstren>>'
'Speed <<FSspeed>>'
'Agility <<FSagil>>'
'Initiative <<FSreakt>>'
'Endurance <<FSvital>>'


if FShour >= 24:
FShour -= 24
FSday += 1
	if FSsup = 0:
	FSHP -= 10
	else
	FSsup -= 1
	end
=======
FSneedExpNextLvl=(FSlvl*10)*FSlvl
FSneedExp=FSneedExpNextLvl-FSexp
if FSneedExp<=0 and FSlvl>FSlvlr:FSlvlr=FSlvl&FSpoint+=5&FSlvl+=1&FSexp=0









if FSfemin<45:$FSfemin='Men'
if FSfemin>=45 and FSfemin>=55:$FSfemin='androgynous'
if FSfemin>55:$FSfemin='women`s'

if FSfigur<45:$FSfigur='male figure'
if FSfigur>=45 and FSfigur>=55:$FSfigur='androgynous figure'
if FSfigur>55:$FSfigur='female figure'

if FScolor<0:FScolor=0
if FScolor>5:FScolor=5
if FScolor=0:$FScolor='black hair'&$FSsherst='black'
if FScolor=1:$FScolor='brown hair'&$FSsherst='brown'
if FScolor=2:$FScolor='red hair'&$FSsherst='Redhead'
if FScolor=3:$FScolor='blond hair'&$FSsherst='light'
if FScolor=4:$FScolor='pink hair'&$FSsherst='pink'
if FScolor=5:$FScolor='white hair'&$FSsherst='white'


if FSface<=0:$FSface='<<$FSfemin>> face. <<$FScolor>>'
if FSface=1:$FSface='<<$FSfemin>> face with cat ears and nose. <<$FScolor>>'
if FSface=2:$FSface='<<$FSfemin>> face with dog ears and nose. <<$FScolor>>'
if FSface=3:$FSface='<<$FSfemin>> face with fox ears and nose. <<$FScolor>>'
if FSface=4:$FSface='<<$FSfemin>> person with horse ears and nose. <<$FScolor>>'
if FSface=5:$FSface='<<$FSfemin>> face with cow ears and nose. <<$FScolor>>'
if FSface>=6:$FSface='<<$FSfemin>> face with ears and nose like a lizard. <<$FScolor>>'

if FSskin<=0:$FSskin='normal skin'
if FSskin=1:$FSskin='<<$FSsherst>> hair on the body'
if FSskin>=2:$FSskin='Scales on body'

if FShvost<=0:$FShvost=''
if FShvost=1:$FShvost='cat`s tail'
if FShvost=2:$FShvost='dog`s tail'
if FShvost=3:$FShvost='foxtail'
if FShvost=4:$FShvost='horse`s tail'
if FShvost=5:$FShvost='cow tail'
if FShvost>=6:$FShvost='tail reptiles'


if dicktipe<=0:$dicktipe='normal, men`s'
if dicktipe=1:$dicktipe='conical, covered with soft spikes cat'
if dicktipe=2:$dicktipe='red, with a large knot at the base of the dog'
if dicktipe=3:$dicktipe='covered with coarse, black leather bull'
if dicktipe>=4:$dicktipe='powerful horse'

if FSdick>0:$FSdick='<<$dicktipe>> member of the longest <<FSdick>> cm.'
if FSdick<=0:$FSdick=''

if FSvagina>0:$FSvagina='Between your legs you are Snatch.'
if FSvagina<=0:$FSvagina=''

if FStits=1:$FStitrazm='AA'
if FStits=2:$FStitrazm='A size'
if FStits=3:$FStitrazm='size B'
if FStits=4:$FStitrazm='With size'
if FStits=5:$FStitrazm='size D'
if FStits=6:$FStitrazm='size E'
if FStits=7:$FStitrazm='size F'
if FStits>8:$FStitrazm='size F+'

if FStits>0 and FStitsLine=0:$FStits='female breasts <<$FStitrazm>>'
if FStits>0 and FStitsLine=1:$FStits='Two pairs of female breasts <<$FStitrazm>>'
if FStits>0 and FStitsLine>=2:$FStits='Three pairs of female breasts <<$FStitrazm>>'


if FSpers=0:$FSpers='You do not have the character'
if FSpers>0:$FSpers='<<$FSname>>. <<$FSface>> <<$FSfigur>> <<$FStits>> <<$FSskin>> <<$FShvost>> <<$FSdick>> <<$FSvagina>>
level <<FSlvl>>, experience <<FSexp>>, necessary to the next level <<FSneedExp>> experience
life <<FSHP>>
power <<FSstren>>
speed <<FSspeed>>
dodge <<FSagil>>
Initsiantiva <<FSreakt>>
endurance <<FSvital>>
'

if FShour>=24:
FShour-=24
FSday+=1
     if FSsup=0:
     FSHP-=10
     else
     FSsup-=1
     end
>>>>>>> 439_FSstat
end

<<<<<<< 439_FSstat
if FSHP > 100: FSHP = 100

'<a href="exec:GT ''FSstart''">Get out of the game</a>'
'Day <<FSday>>, h <<FShour>>'
'<<FSgem>> of coins. Food enough for <<FSsup>> days'
''

$FSatk = {
KGOLzas = RAND(FSagilV/4, FSagilV)
KGOLataka = RAND(FSspeed/2, FSspeed * 2)
if KGOLataka >= KGOLzas:
	if KGOLataka >= KGOLzas * 2:
	KGHPnpow = RAND(FSstren/2, FSstren)+ RAND(FSweaponDam/2, FSweaponDam)
	FSHPV -= KGHPnpow
	'<font color = green>CRETE <<KGHPnpow>></font>'
	else
	KGHPnpow = RAND(FSstren/4, FSstren/2)+ RAND(FSweaponDam/4, FSweaponDam/2)
	KGHPntpow = KGHPnpow - FSbronaV
	if KGHPntpow <= 0: KGHPntpow = 1
	FSHPV -= KGHPnpow
	'<font color = blue>Contact with <<KGHPnpow>></font>'
	end
else
'<font color = red><<$FSnameV>> dodged your attack</font>'
=======
if FSHP>100:FSHP=100

'<a href="exec:GT ''FSstart''">Leave the game</a>'
'day <<FSday>>, h <<FShour>>'
'<<FSgem>> coin. Food enough for <<FSsup>> days'
''




$FSatk={
KGOLzas=RAND(FSagilV/4,FSagilV)
KGOLataka=RAND(FSspeed/2,FSspeed*2)
if KGOLataka>=KGOLzas:
     if KGOLataka>=KGOLzas*2:
     KGHPnpow=RAND(FSstren/2,FSstren)+ RAND(FSweaponDam/2,FSweaponDam)
     FSHPV-=KGHPnpow
     '<font color=green>CRETE <<KGHPnpow>></font>'
     else
     KGHPnpow=RAND(FSstren/4,FSstren/2)+ RAND(FSweaponDam/4,FSweaponDam/2)
     KGHPntpow=KGHPnpow-FSbronaV
     if KGHPntpow<=0:KGHPntpow=1
     FSHPV-=KGHPnpow
     '<font color=blue>hit <<KGHPnpow>></font>'
     end
else
'<font color=red><<$FSnameV>> dodged your attack</font>'
>>>>>>> 439_FSstat
end
}
<<<<<<< 439_FSstat
$FSatkV = {
KGOLzas = RAND(FSagil/4, FSagil)
KGOLataka = RAND(FSspeedV/2, FSspeedV * 2)
if KGOLataka >= KGOLzas:
	if KGOLataka >= KGOLzas * 2:
	KGHPnpow = RAND(FSstrenV/2, FSstrenV)+ RAND(FSweaponDamV/2, FSweaponDamV)
	FSHP -= KGHPnpow
	'<font color = red>CRETE <<KGHPnpow>></font>'
	else
	KGHPnpow = RAND(FSstrenV/4, FSstrenV/2)+ RAND(FSweaponDamV/4, FSweaponDamV/2)
	KGHPntpow = KGHPnpow - FSbrona
	if KGHPntpow <= 0: KGHPntpow = 1
	FSHP -= KGHPnpow
	'<font color = brown>Contact with <<KGHPnpow>></font>'
	end
else
'<font color = green>You dodged the attack</font>'
=======
$FSatkV={
KGOLzas=RAND(FSagil/4,FSagil)
KGOLataka=RAND(FSspeedV/2,FSspeedV*2)
if KGOLataka>=KGOLzas:
     if KGOLataka>=KGOLzas*2:
     KGHPnpow=RAND(FSstrenV/2,FSstrenV)+ RAND(FSweaponDamV/2,FSweaponDamV)
     FSHP-=KGHPnpow
     '<font color=red>CRETE <<KGHPnpow>></font>'
     else
     KGHPnpow=RAND(FSstrenV/4,FSstrenV/2)+ RAND(FSweaponDamV/4,FSweaponDamV/2)
     KGHPntpow=KGHPnpow-FSbrona
     if KGHPntpow<=0:KGHPntpow=1
     FSHP-=KGHPnpow
     '<font color=brown>hit <<KGHPnpow>></font>'
     end
else
'<font color=green>You dodged the attack</font>'
>>>>>>> 439_FSstat
end
}




















--- FSstat ---------------------------------