FUNCTION Statement

FUNCTION name( parameters ) AS type

Declare a function or subroutine.  This can a be local (called from within program) or external called by using a MODULE handle.  The function must be ended using END FUNCTION.

A function can return any of the following types:

INTEGER

REAL

STRING

MODULE

REFERENCE

HANDLE

Examples:

FUNCTION Kalle( BYVAL nils AS STRING ) AS INTEGER

  IF nils = "guy" THEN

     Kalle = -1

  ELSE IF nils = "girl" THEN

     Kalle = 1

  ELSE

     Kalle = 0

  ENDIF

END FUNCTION

PRINT Kalle( "guy" ),

PRINT Kalle( "girl" ),

PRINT Kalle( "?" ),

END