Possible bug? Unable to enter a comma in response to INPUT

[euklides]

If commas are needed, use something like this:

Locate 10, 1: b$ = "": Print "Your texte here, (with comma also) : ";
Text: GoSub saiscar: If z$ <> Chr$(13) Then Print z$;: b$ = b$ + z$: GoTo Text
Print: Print: Color 0, 7: Print b$: Color 7, 0
Sleep: End
saiscar: z$ = InKey$: If z$ <> "" Then GoTo saiscar
Sais1: z$ = InKey$: If z$ = "" Then GoTo Sais1
Return