Alright, so i cleaned it up a bit..
The blue are the changes, i am guessing it is for TATW??
Try it now, should work 
Code:
declare_counter player
set_counter player 1
declare_counter scroll
set_counter scroll 0 > when you declare it is set to 0 anyway.
monitor_event FactionTurnStart FactionIsLocal
set_counter player 1
end_monitor
monitor_event FactionTurnEnd FactionIsLocal
set_counter player 0
set_counter scroll 0
end_monitor
monitor_event ScrollOpened ScrollOpened sack_settlement_scroll
and I_CompareCounter player = 1
if I_LocalFaction england
set_counter scroll 1
end_if
if I_LocalFaction france
set_counter scroll 1
end_if
if I_LocalFaction hre
set_counter scroll 1
end_if
end_monitor
monitor_conditions I_CompareCounter scroll = 1
select_ui_element sack_settlement_occupy_button
simulate_mouse_click lclick_down
simulate_mouse_click lclick_up
set_counter scroll 0
end_monitor