XProfan

Declare Zeile$
Zeile$ = "4.5,6.4"
Print Match$("[0-9]+~.?[0-9]+,[0-9]+~.?[0-9]+",Zeile$)
Waitinput

Declare Zeile$
Zeile$ = "4,6.4"
Print Match$("[0-9]+~.?[0-9]+,[0-9]+~.?[0-9]+",Zeile$)
Waitinput

!Print Match$("[0-9]+~.?[0-9]?,[0-9]+~.?[0-9]?",Zeile$)

Print Match$("[0-9]+(~.[0-9]+)?,[0-9]+(~.[0-9]+)?",Zeile$)

Print Match$("Ha.s","Haus")
WaitInput

Print Match$("Ha[^Uu]s","Haus")
WaitInput