subroutine with hserin

[mister_e]

Is it possible to see the whole program?

Usually for each GOSUB, there's a RETURN

Start:
        Gosub Somewhere
        Gosub Elsewhere
        goto Start
        
Somewhere:
        HSERIN 2000, SomeWhereElse,[DataXYZ]
        Return
        
SomewhereElse:
        ToGGLE LED
        RETURN
        
ElseWhere:
        LCDOUT $FE,1,"Are AZERTY Keyboards still on the market???"
        RETURN

In Somewhere, if a timeout occure, it jump to SomewhereElse. This is basically a GOTO, BUT you need to use a RETURN to return to Start... or use a variant like...

Somewhere:
        HSERIN 2000, SomeWhereElse,[DataXYZ]

SomewhereEnd:        
        Return
        
SomewhereElse:
        ToGGLE LED
        Goto SomewhereEnd

HTH

[volcane]

Ok

Thanks for the explanations

Best regards

[volcane]

Start:
        Gosub Somewhere
        Gosub Elsewhere
        goto Start
        
Somewhere:
        HSERIN 2000, SomeWhereElse,[DataXYZ]
        Return
        
SomewhereElse:
        ToGGLE LED
        RETURN
        
ElseWhere:
        LCDOUT $FE,1,"Are AZERTY Keyboards still on the market???"
        RETURN

Somewhere:
HSERIN 2000, SomeWhereElse,[DataXYZ]

SomewhereEnd:
Return

SomewhereElse:
ToGGLE LED
Goto SomewhereEnd
[/code]

HTH

Then i can use two examples? The compiler detects if it is a routine principal or if it is a subroutine?

[mister_e]

Both example have to work. Once it hit a RETURN, it remove 1 from the stack level and jump one instruction bellow the last calling GOSUB.