Lying is a serious accusation.
We mixed up the vitamins with the medicine, but did not lie.
Vitamins will now also help from caries.
Pay attention to the variable "zub_k".
$tabV = {
minut += 5
lekarstvoVrachH = hour
lekarstvoH = hour
if lekarstvoVrach > 0:
lekarstvoVrach -= 1
if sinak > 0:sinak -= 1
if sinak_g > 0:sinak_g -= 1
if sinak_p > 0:sinak_p -= 1
if vgape > 0:vgape -= 1
if agape > 0:agape -= 1
if spanked > 0:spanked -= 1
if prostuda > 0
rostuda -= rand(3,7)
a = rand(2,5)
if KandidozOnce >= 15:KandidozOnce -= a
if Kandidoz >= 15:Kandidoz -= a
if GerpesOnce >= 10:GerpesOnce -= a
if Gerpes >= 10:Gerpes -= a
if SifacOnce >= 10:SifacOnce -= a
if Sifilis >= 10:Sifilis -= a
if TriperOnce > 0:TriperOnce -= a
if Triper > 0:Triper -= a
if KandidozOnce > 0 and KandidozOnce < 15:KandidozOnce = 15
if Kandidoz > 0 and Kandidoz < 15:Kandidoz = 15
if GerpesOnce > 0 and GerpesOnce <= 10:GerpesOnce = 10
if Gerpes > 0 and Gerpes < 10:Gerpes = 10
if SifacOnce > 0 and SifacOnce < 10:SifacOnce = 10
if Sifilis > 0 and Sifilis < 10:Sifilis = 10
if TriperOnce < 0:TriperOnce = 0
if Triper < 0:Triper = 0
if zub_k > 0:zub_k -= rand(1,3)
if vosh > 0 and rand(1,5) = 5:vosh = 0
if voshP > 0 and rand(1,3) = 1:voshP = 0
vital += 2
else
lekarstvo -= 1
lekarstvoB += 1
if lekarstvoB >= 3:
lekarstvoB = 0
if sinak > 0:sinak -= rand(0,1)
if sinak_g > 0:sinak_g -= rand(0,1)
if sinak_p > 0:sinak_p -= rand(0,1)
if vgape > 0:vgape -= rand(0,1)
if agape > 0:agape -= rand(0,1)
if spanked > 0:spanked -= rand(0,1)
if prostuda > 0
rostuda -= rand(1,3)
a = rand(1,2)
if KandidozOnce >= 15:KandidozOnce -= a
if Kandidoz >= 15:Kandidoz -= a
if GerpesOnce >= 10:GerpesOnce -= a
if Gerpes >= 10:Gerpes -= a
if SifacOnce >= 10:SifacOnce -= a
if Sifilis >= 10:Sifilis -= a
if TriperOnce > 3:TriperOnce -= a
if Triper > 3:Triper -= a
if KandidozOnce > 0 and KandidozOnce < 15:KandidozOnce = 15
if Kandidoz > 0 and Kandidoz < 15:Kandidoz = 15
if GerpesOnce > 0 and GerpesOnce <= 10:GerpesOnce = 10
if Gerpes > 0 and Gerpes < 10:Gerpes = 10
if SifacOnce > 0 and SifacOnce < 10:SifacOnce = 10
if Sifilis > 0 and Sifilis < 10:Sifilis = 10
if zub_k > 0:zub_k -= 1
if vosh > 0 and rand(1,10) = 8:vosh = 0
if voshP > 0 and rand(1,7) = 4:voshP = 0
end
end
if EngLang = 1:
msg'You have taken the medicine...'
else
msg'Вы приняли лекарство...'
end
gs'sumka'
}
