testfn.bas

由一个古老的BASIC解释器改进而成, 保留了ANSI C固有的艺术美感.

rem Test def fn multisentence

print "Buenas" : def fn a (x) : print "Que tal"
	local b
	b= 10
	print "Hola"
	a= x * 2
fn end:print "Empezamos"

a= pi
b= 1234
v= fn a (3) + fn a (6)
print v
print a
print b

end