Zahlenkonvertierung (Was passiert bei dieser Schleife?)

[KermitFrosch]

also, der quellcode da über mir ist der ganze... und ejz würde ich gerne wissen, was hier  dezimalzahl := Dezimalzahl*sys + pos(UpperCase(dual[i]),zeichen) - 1; passiert

thx

der frosch