#COMPILE EXE
#DIM ALL
FUNCTION PBMAIN() AS LONG
  DIM f AS LONG
  DIM s AS STRING
  f = FREEFILE
  OPEN "test.txt" FOR OUTPUT AS #f
  PRINT #f, "Hello from PBXA64!"
  CLOSE #f
  OPEN "test.txt" FOR INPUT AS #f
  LINE INPUT #f, s
  CLOSE #f
  PRINT "Read: "; s
  KILL "test.txt"
  FUNCTION = 0
END FUNCTION
