#COMPILE EXE
#COMPILER PBCC 6

FUNCTION PBMAIN () AS LONG
  CON.PRINT "H !"
  CON.WAITKEY$
END FUNCTION