;PEEPS********************************************************************
:Peeps100
if
	turn > allowpeeps 
then
	set grey_max ((segmentdecks + 8) - (penance_suit_count / 2))
	set targ_max ((segmentdecks + 8) - (penance_suit_count / 2))
	set siren_max (((segmentdecks + 6) / 2) - (penance_suit_count / 2))
	set male_siren_max (((segmentdecks + 6) / 2) - (penance_suit_count / 2))
	set salt_hog_max ((segmentdecks + 10) - (penance_suit_count / 2))
	set gor_max ((segmentdecks + 6) - (penance_suit_count / 2))
	set gem_slug_max (segmentdecks - (penance_suit_count / 2))
	set karmarama_max ((segmentdecks + 4) - (penance_suit_count / 2))
	set turakken_max ((segmentdecks + 6) - (penance_suit_count / 2))
	set zedem_monk_max (segmentdecks + 6)
	set memau_max (peep_count / 50) 
	set grey_every (peepola * 6)
	set targ_every (peepola * 6)
	set siren_every (peepola * 22)
	set male_siren_every (peepola * 22)
	set salt_hog_every (peepola * 3)
	set gor_every (peepola * 11)
	set gem_slug_every (peepola * 20)
	set karmarama_every (peepola * 8)
	set turakken_every (peepola * 11)
	set zedem_monk_every (peepola * 13)
	set memau_every (peepola * 100)
	set allowpeeps (turn + 1000)
end

:peeps300
if
	turn > peeprate
then
	set peepola (popfactor / decksegmentcount)
	set peeprate (turn + 555)
end