Ogólnie praktyka w szeroko rozumianym programowaniu jest taka, żeby jak tylko można to unikać GOTO.

Jak GOTO jest połączone z jakimiś IFami, to żeby sprawdzić działanie programu zaczyna się śledzenie kodu palcem po ekranie i tzw. 'spaghetti code'.

A kod czasem nie jest wykonywany od góry do dołu?

Wynik tego kodu Że co by nie było w Manual, to jeśli kod jest wykonywany od góry do dołu, to R139 kończy z wartością 1. To jest ostatnie przypisanie, bo w jednym z możliwych rozwiązań dla S_UPAL najpierw jest przypisanie zera, a potem schodzi do jedynki.
W kodzie powyżej dostawiłem GOTOF MANUAL, żeby po wykonaniu przypisania zera do R139 robiło skok omijający przypisanie jedynki.

Lubię pomiędzy blokami zostawiać linię pustą - lepiej widać bloki.

Trochę mały ten wycinek, bo nie wiadomo, co się dzieje przed, a co po tym.

Jakie masz objawy?
Przechodzi dalej i przypisuje wszystko czy jak?