Düzgün Çokgen MICE Problem, düzgün bir çokgenin kenarlarını belirli bir oranda küçülterek elde edilen iç içe çokgenlerin köşe noktalarını hesaplar ve bunları spiral olarak grafikte gösterir. Kenar adedi, çevrel çember yarıçapı, küçültme oranı ve döndürme açısı değiştirilerek spiralin biçimi izlenir. Grafik serilerinin hesabında Bezier serilerinin bir çeşit uygulaması kullanılmıştır.
Dosyanın içeriği
- S: Kontrol sayfasıdır. Düzgün çokgen kenar adedi (F4), çevrel çember yarıçapı (F6), küçültme oranı (F8), komple döndürme açısı (F10) ve adım adım ilerleme değeri (F12) bu sayfada girilir. Grafik ve animasyon düğmeleri de bu sayfadadır.
- H: Hesap sayfasıdır. Çokgen köşe numaraları ile x ve y koordinatları, köşe etiketleri, iç çokgen ve spiral serilerinin noktaları burada üretilir.
Kullanılan formüller
- IF ve NA: Kullanılmayan satırlar #N/A döndürür, böylece grafikte çizilmez. Köşe numaraları da kenar adedine göre bu fonksiyonlarla sınırlanır.
- COS: Köşelerin koordinatları yarıçap ve açıdan hesaplanır.
- OFFSET, INT, MOD ve IFERROR: Seçilen adıma göre ilgili köşe verisi alınır; son köşe ilk köşeye bağlanır.
- Yeni iç köşe, bir köşenin sonraki köşeye doğru küçültme oranı kadar kaydırılmasıyla bulunur. Aşağıdaki formül H sayfasındaki spiral x değerini hesaplar:
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme ya da dışarıya bağlantı işlemi yoktur.- nBar, aBar, kBar, fBar, pBar kaydırma çubukları: Değiştirildiğinde kenar adedi, yarıçap, küçültme oranı, döndürme açısı ve adım değerini S sayfasındaki hücrelere yazar.
- Worksheet_Change: Hücreye elle değer girildiğinde değeri kontrol eder ve çubuğu günceller. Geçerli aralıklar: kenar adedi 3-9, yarıçap 0,5-1, küçültme oranı 0,01-0,25, döndürme 0-359, adım 0-100. Aralık dışı girişte önceki değer korunur.
- basla: Animasyonu başlatır. Adım değeri sürekli artırılarak spiral adım adım çizilir, çubuklar devre dışı kalır ve sayfa korumaya alınır. Geçen süre sayaçta gösterilir.
- dur: Animasyonu durdurur, sayfa korumasını kaldırır ve çubukları yeniden etkinleştirir.
Nasıl kullanılır
- Dosyayı açıp makroları etkinleştirin.
- S sayfasında kaydırma çubuklarıyla ya da hücrelere değer girerek kenar adedini, yarıçapı, küçültme oranını ve döndürme açısını belirleyin.
- Adım - Adım İlerleme değeriyle spiralin hangi aşamaya kadar çizileceğini seçin.
- Animasyon düğmesiyle çizimi başlatın, durdurmak için durdurma düğmesini kullanın.