BCX Console Demonstration Program S22.bas

 DIM A!            ' global
 DIM B!            ' global
 DIM C!            ' global
 
 C! = 100.123      '<<< This value should not change!
 B! = 123          '<<< This value should not change!
 A! = Fun!(B!, C!)  '<<< "C" allows type translation automatically!
 
 PRINT "The value of A! = ", A!
 PRINT "The value of B! should still be <123> ...", B!
 
 FUNCTION Fun!(Y, Z)
   DIM A$
   DIM B!
   A$ = "Hello from inside our function!"     ' a local string variable
   PRINT A$
   'The B! variable below is the local
   'The C! variable is the global variable
   'The Z variable is the function parameter Variable
   B! = 3 * Z + C! + Y
   FUNCTION  = B!
 END FUNCTION