Einige Funktionen im Mahte Bereich

[pluto]

Hallo,
hier möchte ich gerne einige wenige Funktionen im Mahte bereich vorstellen:

Code: Alles auswählen

// Prüft ob eine Zahl Positiv oder Negativ ist
 
// Wenn die Zahl Positiv ist wird True zurückgeben
 
function GetDir(ZahL:Integer):Boolean;
 
 
 
// Prüft ob eine Zahl zwischen Zahl1 und Zahl2 ist wenn ja
 
// Gibt GetZahl1 True zurück
 
function GetZahl1(Zahl1, Zahl2,p:Integer):Boolean;
 
 
 
// Prüft ob Zwei objekte zusammenstoßen oder nicht
 
function collision(Bild1, Bild2:TBitMap; x1,y1,x2,y2:Integer):Boolean;

im Anhang gibt es die unit
(nicht geprüft ob sie auch unter Lazarus Kompliert werden kann... müsste aber schon)