XProfan

Français

quelquefois teste je avec einer einfachen Methode qui Performance verschiedener Operationen.

je Poste simple fois le Resultate meines letzten Tests.

qui numéro derrière dem Rem zeig le nombre qui Passes dedans de 3 Sekunden, alors desto höher desto plus rapide.

qui Tests montrer eigentlich quoi wahrscheinlich eh bekannt ist: Desto moins Zeilen, desto plus rapide. Hinzufügen pourrait je: cela einzeilige si zählt hierbei comment une eigenständige la ligne, qui Funktion ABS hingegen ist plus rapide. sûrement liegt cela aussi daran dass cela einzeilige si plus trop 1faire hat - quoi mais aussi bedeutet dass cela einzeilige si pas approprié ist à Performance trop erhöhen.
Kompilieren Marque Séparation

 {$cleq}
float ball.xs,ball.ys,ball.rs
cls
long tme=gettickcount+3000,c

while gettickcount<tme{

    c++
    perfProc()

}

print c
waitinput
end

perfProc{

    ball.xs=rnd(40)-20
    ball.ys=rnd(40)-20
    ball.rs=rnd(40)-20
    /* 34500
    case ball.xs>10		: ball.xs=10
    case ball.xs<-10 	: ball.xs=-10
    case ball.rs>10		: ball.rs=10
    case ball.rs<-10	: ball.rs=-10
    case ball.ys<-10 	: ball.ys=-10
    case ball.ys>10 	: ball.ys=10
    */
    /* 41000
    case abs(ball.xs)>10 : ball.xs=if(ball.xs<0,-10,10)
    case abs(ball.ys)>10 : ball.ys=if(ball.ys<0,-10,10)
    case abs(ball.ys)>10 : ball.ys=if(ball.ys<0,-10,10)
    */
    /* 24000
    ball.xs=if(ball.xs<-10,-10,if(ball.xs>10,10,ball.xs))
    ball.ys=if(ball.ys<-10,-10,if(ball.ys>10,10,ball.ys))
    ball.rs=if(ball.rs<-10,-10,if(ball.rs>10,10,ball.rs))
    */
    /*
    if abs(ball.xs)>10 {
    if ball.xs<0 {
    ball.xs=-10
    } else {
    ball.xs=10
    }
    }
    if abs(ball.ys)>10 {
    if ball.ys<0 {
    ball.ys=-10
    } else {
    ball.ys=10
    }
    }
    if abs(ball.rs)>10 {
    if ball.rs<0 {
    ball.rs=-10
    } else {
    ball.rs=10
    }
    }/span>
    */

}