# preg if mesec = 0 and preg = 0 and tabletki = 0: !нет месячных Set pregrand = RAND(0,100) if pregrand + fertBonus >= 93: $father = $boy set preg = 1 end end --- preg ---------------------------------