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
Result:
Hello from inside our function!
The value of A! = 523.123
The value of B! should still be <123> ... 123