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, ...)

más

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

KompilierenMarcaSeparación
volver gespeicherterWert or LangeRechnung("Dauert muy largo.")

trabajo en XProfan no.

Kurz y bien: In If-Elseif-Estructuras halte Yo para muy  sinnvoll, todos más Bedingungen a ignorieren, sobald una verdadero ergibt.

En boolschen Operatoren halte Yo auch para sinnvoll, aber como puede el Meinungen unterschiedlich ser.

Wichtig es sólo, dass el Documentación irgendwo erwähnt, como XProfan se verhält. Damit uno no en el Dunkeln tapst.