RosettaCodeData/Task/Hello-world-Text/XBasic/hello-world-text.basic

PROGRAM "hello"
VERSION "0.0003"

DECLARE FUNCTION Entry()

FUNCTION Entry()
  PRINT "Hello World"
END FUNCTION
END PROGRAM