XProfan

proc Test

    inc counter
    return 1

endproc

var int counter = 0
var int branch = 0

if Test()

    branch = 1

elseif Test()

    branch = 2

elseif Test()

    branch = 3

else

    branch = 4

endif

print "Abgearbeiteter Zweig:", branch
print "Aufrufe Test:", counter
waitinput
end

ifnot callbackCheck

elseif Call(callBackCheck, ...)

else

endif

ifnot callbackCheck

else

    if Call(callBackCheck, ...)

    else

    endif

' kurzschluss
var int A = 0
var int B = 10

if (A <> 0) and ((B / A) >= 5)

    messagebox("An dieser Stelle im Algorithmus konnte B durch A geteilt werden.","Erfolg",0)

else

    messagebox("An dieser Stelle ist der Quotient (B / A) echt kleiner als 5 oder eine Division durch 0 wurde verhindert","F E H L E R",0)

endif

if 5 = 5

    print "5=5"

elseif 6 = 6

    print "sechs"

else

    print "nix"

endif

if SomeAPICall()' gibt 0 aus, falls was schief gegangen ist.

    print "Juchuu, alles in Ordnung!"

elseif MessageBox("Hat nicht geklappt. Beenden?", "", ~MB_YESNO) = ~IDNO

    print "Trotz Fehler weitermachen."

else

    print "Programm wird beendet."
    end

KompilierenMarkierenSeparieren
return gespeicherterWert or LangeRechnung("Dauert sehr lange.")

funktionieren in XProfan nicht.

Kurz und gut: In If-Elseif-Strukturen halte ich es per sehr  sinnvoll, alle weiteren Bedingungen zu ignorieren, sobald eine wahr ergibt.

Bei boolschen Operatoren halte ich es auch per sinnvoll, aber da können die Meinungen unterschiedlich sein.

Wichtig ist nur, dass die Documentazione irgendwo erwähnt, wie XProfan sich verhält. Damit man nicht im Dunkeln tapst.