IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 11 Mart 2015, 11:03   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
İki nokta arasındaki açı kaç derece




İki nokta arasındaki açı kaç derece


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
function RelativeAngle(X1,Y1, X2,Y2 : Integer) : Integer; var Theta : Extended; XDist, YDist : Integer; begin Result := 0; //arctan((y2-y1)/(x2-x1)) XDist := X2 - X1; YDist := Y1 - Y2; if (XDist = 0) and (YDist=0) then exit; if YDist=0 then Theta := arctan((X2-X1)) else Theta := arctan((X2-X1)/(Y1-Y2)); Result := Round(RadToDeg(Theta)); if (X2 >= X1) and (Y2 >= Y1) then //Quadrant = 2 Result := 90+(90-Abs(Result)) else if (X2 <= X1) and (Y2 >= Y1) then //Quadrant = 3 Result := 180 + Result else if (X2 <= X1) and (Y2 <= Y1) then //Quadrant = 4 Result := 270+90-Abs(Result); end;


__________________
SusKun ve Sessiz Mürekkep...


Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Cevapla

Etiketler
acı, arasındaki, derece, iki nokta arasındaki açı kaç derece, kac, nokta, İki


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Nazan Öncel - Nokta Nokta Amelia M, N, O, Ö, P 0 06 Mayıs 2014 18:05
Analitik Geometri İki Nokta Arasındaki Uzaklık Formülü - Nasıl Bulunur Violent Geometri 0 17 Aralık 2013 21:48