home *** CD-ROM | disk | FTP | other *** search
- ;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