Prism Purebasic

; This is a comment

"This a string."

42
3.14159
-42
-3.14159
.5
10.
2E10
4.2E-14
-3E+2

Procedure.s Test(s.s)
	Protected a$, b$, Result.s

	Result = Mid(s, 1, 3)

	ProcedureReturn Result
EndProcedure

Test()
End