#COMPILE EXE
#DIM ALL
TYPE Point2D
  x AS LONG
  y AS LONG
END TYPE
FUNCTION PBMAIN() AS LONG
  DIM p AS Point2D
  p.x = 10
  p.y = 20
  PRINT "Point: ("; p.x; ", "; p.y; ")"
  FUNCTION = 0
END FUNCTION
