Dim sek_flag as bit

ISR:
Set sek_flag
Return

Main:
If sek_flag = 1 then
<Rechnerei>
else
Sleep
end if