BCX Console Demonstration Program s50.bas

! #define cube(A) (A)*(A)*(A)

PRINT "True C Macros in BASIC >> 100 cubed =",cube(100)

Result:

True C Macros in BASIC >> 100 cubed = 1000000