c.bas
#Compile Exe
#Include "b.inc"
%ONE=1
' Test routine
Sub Test()
  ? "Hello" + Str$(%ONE)
End Sub