Simple Okuma Tool Life Counter

I find the tool life counter that comes with Okuma machines a little hard to understand and work with, especially with no spare tooling. So instead I built my own control logic to use the counter table and a subprogram to deliver simple life management.
Machine : Okuma L3000-e (MYW)

[@user-ek5jm9db8i]

Can you provide the subprogram?