kardeş kodların tamamını incelemedim ama şu hatayı gördüm altprogramlara goto komutu ile değil gosub komutu ile gideriz
örnek
loop:
if porta.0=1 then gosub kanal_1
if porta.1=1 then gosub kanal_2
goto loop
'ana göngüden sonra alt programlar gelir
kanal_1:
falan filan
return 'bu komut...