[Code[
' francolinox/halProment-Basic
'-- new features: pys, p?, msgbox
'-- calc example 4
'
pim a,b,c,d,e as pro
pim z as pys
z=3
a=20
b=30
c=40
d=a*b
e=d*b
string s,st
pstring strx
strx = "powerbasic is a good basic program"
p? strx
s="Hello Batman " + str(d)
st="Hello Superman " + str(e)
print s
printy st
p? z
msgbox "hello"
' simple calc with printy and p?
' and two different functions with a friendly pbmain()
'
pim a,b,c,d,e as pro
pim s,st as pstring
a=30
b=40
c=50
d=a*b
e=d*c
s= "Hello Superman "+str(d)
st= "Hello Ironman "+str(e)
printy s
p? st
function pbmain() as long
pro a=2345
pstring s="I am thor "+a
'print s
return a
end function
print pbmain() '2345
function pbmain() as long
pro a=2345
pstring s="I am thor "+a
print s
'return a
end function
pbmain() ' I am Thor 2345
Page created in 0.221 seconds with 11 queries.