SO3A CMP # $FE8 Text ekranının sonu olup ol- madığına bakılır. â03C BCS5 $604F Eğer text ekranının sonu işe $O04F'ye atlanır. Bundan sonraki program bölümü bir somraki şerit için kullanılır. SÜ3E CLÜ Toplama işlemi için hazırlık S03F ADCÇ $02 Şeritin genişliği $02 adresinden alınır. 041 STA $DO12 Yeni değer Raster registerine yazılır. Böylelikle bir öncekinden bir bant kalınlığı kadar aşa- ğıda yeralan Raster satırı İnterrupt başlangıcı olarak be- lirtilmiş elur. Bundan sonra ise deneme yoluyla ayarlarımış bir ge- ciktirme döngüsü yeralmaktadır. 24 İMP 1ALIR l İ İ & € OğrMAl Batinlerine â0d4 LDY # 503 Döngü haşlangıç değeri atlar. 3 İ VIC-ILIRÇ için programımız: ggjğ ]ğğğ S ge“t BU aat 6037 LDA $DO12 Hangi satırda IRO'nun baş- SA0 A9 olana CA latıldığını belirlemek için Bir sonraki Raster Ilnterrupt'ına kadar çerçeve tengi- Raster Register'ine bakılır. nin değiştirilmesi Hazırlık aşaması n IRO rutininin IRO ViCAnterrupt'ına IRO kesilir bakılır. kesilir e CIA1-IRO- vek_lör erinin Registeri Raster-İnterrupt'i belirlerimesi silinir kesilir. Yazı ekranının alt [ tarafındaki Raster IRÖ l IRO satırı belirlenir Karşılaştırma: başlatılır Nîğağ a eFıfî Raster satırı — warilir. I Yazı ekranının altı Normal İRÖ'ya gdönüş Çerçeve rengi siyah Raster-İRü açılır. (Çerçeve rengi: Açık mavi Yazı ekranının 'Çerçî:î Ğ IR0 başlatılır. -Şeri kalınlığı 4 olarak Belimilir, Şerit genişliği Yazı ekranının Raster Registeri'ne üstündeki eklenir Raster safırı IRO başlatılır Geciktirme Normal İRC'ya döngüsü dönüş Çerçeve rengi *l Normal İRÜ'ya Resim 2; YIC-IRÖG programının akış diyagramı dönüş 22