Infinity-Profan

//Beispiele für zeilenweises- und zeilenübergreifendes Schreiben:
print "Dies ist
ein Text mit einer
Stringkonstante mit
Zeilenumbrüchen"
print "Dies ist\nein Text mit einer \nStringkonstante mit\nZeilenumbrüchen."
print 10+20;print 30+40
print 10+20
print 30+40
print (10
+20
+30)
print (10+20+30)

a=10
a=10,b=10
a=10 b=10

a[0]=10
a.0=10
//
a["test"]["test"]=10
a.test.test=10
//
b=[10,20,30]
//
c=["Hallo"=10,"Welt"=["pt2"=20,"pt3"=30]]

// InfinityProfan Program v0.7.12
var str_text = "mm"
var str_leer = ""
var str_zero = "0"
var str_zahl = "900"
var null_var = null
var a = 3
var b = 4
print "??? rumwurzeln ???"
print "Die einfache Variante /auch mit Space-Operator."
print "  c = " + str(sqrt(a*a+b*b))// gibt 5 = Wurzel 25 aus
print "  c = " + str sqrt a*a+b*b// gibt 5
print "  c = " + sqrt a*a+b*b// gibt 5
print "Jetzt geht es schief: "
print "          c = " + sqrt a*a+b*b + "mm"// gibt NaN Not a Number wegen "mm"
print "Da geht was! "
print "  c = " + sqrt a*a+b*b + ""// gibt 5 aus
print "  c = " + sqrt a*a+b*b + "0"// gibt 15.8.. = Wurzel 250 aus
print "  c = " + sqrt a*a+b*b + "900"// gibt 16.9.. = Wurzel 25900 aus
print "  c = " + sqrt a*a+b*b + null// gibt 5 aus
print "... ohne Wurzel ..."
print a*a+b*b + str_text// gibt 25mm aus
print a*a+b*b + str_leer// gibt 25 aus
print a*a+b*b + str_zero// gibt 250 aus
print a*a+b*b + str_zahl// gibt 25900 aus
print a*a+b*b + null_var// gibt 25 aus
print " ... mit Wurzel ..."
print "  c = " + sqrt a*a+b*b + str_text// gibt NaN aus
print "  c = " + sqrt a*a+b*b + str_leer// gibt 5 aus
print "  c = " + sqrt a*a+b*b + str_zero// gibt 15.8.. = Wurzel 250 aus
print "  c = " + sqrt a*a+b*b + str_zahl// gibt 16.9.. = Wurzel 25900 aus
print "  c = " + sqrt a*a+b*b + null_var// gibt 5 aus
print "---------------------------------
"
print "So sollte es sein: "
print  "     c = " + sqrt(a*a+b*b) + "mm"// gibt 5mm aus...hier Klammer nötig!
//
// ... solange sie noch in der xprofan.api fehlt BETA !

proc sqrt(p1)

    return math(math.sqrt,p1)

endproc