Function: CircularCollision
· Apr 15, 2004, 9:41 PM
#1190
Veoma korisna funkcija, mala, brza i super za mnoge tipove igara!
[vb]Public Function CircularCollision(X1 As Long, Y1 As Long, X2 As Long, Y2 As Long, R1 As Long, Optional R2 As Long = 0) As Boolean
CircularCollision = (Sqr(((X1 - X2) ^ 2!) + ((Y1 - Y2) ^ 2!))) < R1 + R2
End Function[/vb]
X1 i Y1 je pozicija prvog objekta
X2 i Y2 je pozicija drugog objekta
R1 je velicina kruga detekcije
R2 je velicina kruga detekcija za drugi objekt [optional]
[vb]Public Function CircularCollision(X1 As Long, Y1 As Long, X2 As Long, Y2 As Long, R1 As Long, Optional R2 As Long = 0) As Boolean
CircularCollision = (Sqr(((X1 - X2) ^ 2!) + ((Y1 - Y2) ^ 2!))) < R1 + R2
End Function[/vb]
X1 i Y1 je pozicija prvog objekta
X2 i Y2 je pozicija drugog objekta
R1 je velicina kruga detekcije
R2 je velicina kruga detekcija za drugi objekt [optional]