Verfasst: 29.02.2008 14:53
yo.. code posten, der Libs oder Includes braucht, ohne diese zu nennen, ist echt ne schwache Leistung...
Ich denke das kannst du vernachlässigen und einfach den If Block löschen.Xaby hat geschrieben:Und was macht CreateDraw()![]()
Wir sind der Lösung auf der Spur, mühsam ernährt sich das Eichhörnchen![]()
Passt jetzt vllt nicht zum Thema, aber deine Procedure ist nur bei kleinen Zahle schnell genug, werde die Zahlen jedoch sehr großDarkDragon hat geschrieben:Es sucht den nächsten 2^n Wert, sodass 2^n >= ValCode: Alles auswählen
Procedure FindNextExp(Val) While a < Val a = 1 << b b + 1 Wend ProcedureReturn a EndProcedure
Code: Alles auswählen
Procedure FindNextExp(Val)
a = Round(Log(Val)/Log(2),1)
ProcedureReturn 1 << a
EndProcedure
Die Zahlen gehen nur bis 4096 momentanSTARGÅTE hat geschrieben:Passt jetzt vllt nicht zum Thema, aber deine Procedure ist nur bei kleinen Zahle schnell genug, werde die Zahlen jedoch sehr großDarkDragon hat geschrieben:Es sucht den nächsten 2^n Wert, sodass 2^n >= ValCode: Alles auswählen
Procedure FindNextExp(Val) While a < Val a = 1 << b b + 1 Wend ProcedureReturn a EndProcedure
dann ist diese Procedure hier schneller:EDIT: habs meine noch schneller gemachtCode: Alles auswählen
Procedure FindNextExp(Val) a = Round(Log(Val)/Log(2),1) ProcedureReturn 1 << a EndProcedure