FUNCTION PBMAIN() AS LONG
  LOCAL g AS GUID
  LOCAL s AS STRING
  g = GUID$("{12345678-1234-1234-1234-123456789012}")
  s = GUID$(g)
  IF s = "{12345678-1234-1234-1234-123456789012}" THEN
    FUNCTION = 0
  ELSE
    FUNCTION = 1
  END IF
END FUNCTION
