;;;;;;;;;;;;;;;Урожай;;;;;;;;;;;;;;;;;;;;;;;;
if I_CompareCounter season = 1
generate_random_counter harvest 1 5
end_if
if I_EventCounter harvest = 5
and I_CompareCounter season = 1
set_event_counter very_good_harvest 1
set_event_counter good_harvest 0
set_event_counter normal_harvest 0
set_event_counter bad_harvest 0
set_event_counter very_bad_harvest 0
historic_event HARVEST_VERY_GOOD factions { venice , sicily , milan , denmark , egypt , scotland , cumans , turks , france , mongols , hre , england , portugal , poland , byzantium , moors , russia , spain , hungary , aragon , lithuania , kievan_rus , teutonic_order , norway , jerusalem , kwarezm , papal_states , timurids , }
end_if
if I_EventCounter harvest = 4
and I_CompareCounter season = 1
set_event_counter very_good_harvest 0
set_event_counter good_harvest 1
set_event_counter normal_harvest 0
set_event_counter bad_harvest 0
set_event_counter very_bad_harvest 0
historic_event HARVEST_GOOD factions { venice , sicily , milan , denmark , egypt , scotland , cumans , turks , france , mongols , hre , england , portugal , poland , byzantium , moors , russia , spain , hungary , aragon , lithuania , kievan_rus , teutonic_order , norway , jerusalem , kwarezm , papal_states , timurids , }
end_if
if I_EventCounter harvest = 3
and I_CompareCounter season = 1
set_event_counter very_good_harvest 0
set_event_counter good_harvest 0
set_event_counter normal_harvest 1
set_event_counter bad_harvest 0
set_event_counter very_bad_harvest 0
historic_event HARVEST_NORMAL factions { venice , sicily , milan , denmark , egypt , scotland , cumans , turks , france , mongols , hre , england , portugal , poland , byzantium , moors , russia , spain , hungary , aragon , lithuania , kievan_rus , teutonic_order , norway , jerusalem , kwarezm , papal_states , timurids , }
end_if
if I_EventCounter harvest = 2
and I_CompareCounter season = 1
set_event_counter very_good_harvest 0
set_event_counter good_harvest 0
set_event_counter normal_harvest 0
set_event_counter bad_harvest 1
set_event_counter very_bad_harvest 0
historic_event HARVEST_BAD factions { venice , sicily , milan , denmark , egypt , scotland , cumans , turks , france , mongols , hre , england , portugal , poland , byzantium , moors , russia , spain , hungary , aragon , lithuania , kievan_rus , teutonic_order , norway , jerusalem , kwarezm , papal_states , timurids , }
end_if
if I_EventCounter harvest = 1
and I_CompareCounter season = 1
set_event_counter very_good_harvest 0
set_event_counter good_harvest 0
set_event_counter normal_harvest 0
set_event_counter bad_harvest 0
set_event_counter very_bad_harvest 1
historic_event HARVEST_VERY_BAD factions { venice , sicily , milan , denmark , egypt , scotland , cumans , turks , france , mongols , hre , england , portugal , poland , byzantium , moors , russia , spain , hungary , aragon , lithuania , kievan_rus , teutonic_order , norway , jerusalem , kwarezm , papal_states , timurids , }
end_if
if I_CompareCounter season = 2
set_event_counter harvest 0
end_if
end_monitor