Commodore 64 Bilgisayarı İçin: Takvim Programı

Bu program 1582 yılında Papa GREGORIAN tarafından hazırlanmış GREGORIAN TAKVİMİ esas alınarak yapılmıştır. Bu sebeple 1582 yılından önceki yıllar için sonuç alınamaz.

Şekil 1'deki program ile Şekil 2'de gösterilen çerçevesiz tablolar elde edilir.

Şekil 1'de aşağıda satır değişiklikleri yapılırsa:

Eklenecek satırlar: 31, 32, 33, 34, 506, 350

Çıkarılacak satır: 520

Değişecek satırlar: 500, 510, 600, 620

Şekil 3'teki program ve bu programla da Şekil 4'ün alt kısmında gösterilen çerçeveli takvimler elde edilir.

NOT: 100'ün katı ve 400'e tam olarak bölünen yıllar ARTIK YIL'lardır [Leap Years], 1600, 2000, ... yılları gibi. 100'ün katı ve 400'e tam olarak bölünmeyen yıllar artık olmayan yıllardır (1700, 1800, 1900, ... gibi). Artık yıllarda Şubat 29 gün ve bu yıllardaki gün sayısı 366'dır. Artık olmayan yıllarda ise Şubat 28 gün ve bu yıllardaki gün sayısı 365'tir.

GREGORİAN TAKVİMİ için ayrıntılı bilgi "Webster's New International Dictionary" verilmiştir.

Yapılacak işler: Commodore 64'te Şekil 1 ya da Şekil 3'teki programlar yazılır ya da disketten yüklenir. İstenirse disket Teleteknik'ten temin edilebilir.

Aşağıdaki sayısal örnek konuya açıklık getirecektir. Commodore 64 yüklendikten sonra RUN yapılırsa aşağıdaki sorular ekranda görülür:

Ekranda 1987 yılının Ocak ayı tablosu çıkar ve printer otomatik olarak Şekil 2'deki tabloların (1,1987) olanı çıkar ve printer işini bitirince sorular yine sorulur. Yukarıdaki açıklandığı gibi işlemler yapılırsa istenilen yıl ve ayın tabloları elde edilir.