Elips Teğetlerini Hesaplama

Dosyanın içeriği​

• S: Kontrol sayfasıdır. Birinci elips için a₁ (yarı büyük eksen), k₁ (eksen oranı) ve ϕ₁ (eğim açısı), ikinci elips için a₂ ve k₂ değerleri bu sayfadan ayarlanır. P noktasının konumu ω ile belirlenir. Animasyon hızı, "P Noktasındaki TEĞET Doğru" seçeneği ve başlatma/durdurma denetimleri de aynı sayfadadır. Elipslerin çizildiği grafik bu sayfada yer alır.
• H: Yardımcı hesap sayfasıdır. O, F₁, F₂, P ve Q noktalarının koordinatları, PF₁ ve PF₂ uzaklıkları, F₁PF₂ açısı ve ikinci elipsin merkez koordinatları burada hesaplanır.

Kullanılan formüller​

• Elips eğrileri, E1.x, E1.y, E2.x ve E2.y adlı tanımlı adlarla parametrik olarak üretilir; 181 noktalık açı dizisi t adı altında ROW ve OFFSET ile oluşturulur.
• Eksenler ve odak uzaklığı b.1, b.2, e ve co adlarıyla tanımlıdır; SQRT ile dış merkezlilik hesaplanır.
• Odak koordinatları ve P noktasının konumu SIN, COS, PI ve RADIANS fonksiyonlarıyla bulunur.

=EĞER(S!$F$16*1<>1;YOKSAY();B6+20*COS(PI()/2+ORTALAMA($C$11:$C$12)))

=IF(S!$F$16*1<>1,NA(),B6+20*COS(PI()/2+AVERAGE($C$11:$C$12)))

Makrolar​

• Kaydırma çubuğu olayları (a1Bar, k1Bar, f1Bar, a2Bar, k2Bar, wBar, hBar): çubuk değerini ilgili hücreye aktarır; a için 10'a, k için 100'e bölünür.
• Worksheet_Change: hücreye elle değer girildiğinde aralığı denetler (a için 1-4, k için 0,2-0,8, ϕ₁ için 0-179, ω için 0-359, hız için 1-3). Geçerliyse çubuğu günceller, değilse önceki değeri geri yükler.
• basla: animasyonu başlatır. Çubukları devre dışı bırakır, sayfayı korumaya alır ve P noktasını döngüyle ω değerinden hıza bağlı adımlarla ilerletir; geçen süreyi hesaplar.
• dur: animasyonu durdurur, sayfa korumasını kaldırır ve çubukları yeniden etkinleştirir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. S sayfasında kaydırma çubuklarıyla a₁, k₁, ϕ₁, a₂ ve k₂ değerlerini ayarlayın.
3. P noktasındaki teğet doğruyu görmek için ilgili seçeneği işaretleyin.
4. Animasyon hızını seçip başlatın; durdurmak için dur düğmesini kullanın.