Hallo ich habe ein Problem mit der sub funktion

ich übergebe eine 19 und bekomme eine 62 der code ist grad mal 10 Zeilen
und ich kapiers nicht.
ist der Speicher in einer sub begrenzt ? wenn ja auf wieviel und
wie kann ich das problem lösen

Danke für Antwort
Gruß Daniel

Code:
$regfile = "m16def.dat"
Declare Sub Menueupdate(byval Menpunkt As Byte )

Call Menueupdate(19)
End

Sub Menueupdate(byval Menpunkt As Byte )

Local Adresse As Byte
Local Neuadresse As String * 3
Local Langstring As String * 20

Print "menuepunkt sub " ; Menpunkt

End Sub