string reverse christmas :)

[Lionheart008]

' Empty GUI script created on 12-22-2009 09:18:23 by (ThinAIR)

Uses "console"
Dim myfun As String Value "Happy Christmas time all thinbasic users! :)"
Dim myfun2 As String Value "): !sresu cisabniht lla emit samtsirhC yppah"

Dim numero As Long
Dim t As String
Dim sMsg As String
numero = 42219002

t = StrReverse$(myfun)
t = StrReverse$(myfun2)

t = StrReverse$(numero)

MsgBox 0, "String reverse: " + StrReverse$(myfun)
PrintL "String reverse does it mean: " + StrReverse$(myfun2)
MsgBox 0, "String reverse does it mean: " + StrReverse$(myfun2)

MsgBox 0, "numero reverse: " + StrReverse$(numero)
WaitKey



:)