1 Aralık 1986 Tarihli Commodore Gazetesi Sayfa 26

PROGRAMIN SATIR SATIR AÇIKLAMASI SATIR 190- I17G0: Programla ilgili açıklamaları içeren REM satırları SÂATIR 208 t X ve Y öyönündeki genişlikleri alma SATIR 210- 300:!: Dolu bir labirent hazırlama (KW ve YW genişliklerinde). Sol üst köşeye S (Başlangıç, Start) sağ alt köşeye E (Bitiş, End) yazmak. Fakat gene de bunların yerleri değiştirilebilir. SATIR 3810- 330t İki satır alta "RUN 1000" yazma (prosgramın Ççözüm kısmı böyle çağırılıyor) ve programın ilk bölümünü bitirme. SATIR gaa t KUŞ ve YU değerlerinin belirlenmesi. sat değiştirilerek labirentın ebatları değiştirilebilir. (örneğini! XlJs111Yı-35) SATIR 1808 ! İkinci ve asıl kısmın başlangıcı. Ki ve YU değerlerinin alınmas ı. SATIR 1018 ! Boyutlu hafızaların belirlenmesi. SATIR I1€2ü- 1030 DK ve DY değerlerini okuyan ve bu uşrilarih bulunduğu kısım. —— SATIR 104dü ! Ekrandan okumadan önce A ve C hafızalarını sanki bütün labirent doluymuş gibi belirlemek. SATIR 1050- 1100!: A ve C'yi ekrandan okumak! #*'lar labirent sınırı, — *'lar dolü alan, & başlangıç, E bitiş ve boşluk boöş alanı simgeliyor. SATIR illüf ! SP ve MS hafızalarını başlandgıç değerlerine ( -1) oturtmak . SATIR (Ii8Zü ! Başlangıç veya bitiş yoksa "HATAİ" mesajını verip programı bitirmek. SATIR 1138 ! Komputer'in sistem saatini sıfırlamak Ve asıl koordinatlar olarak başlangıç noktasının koordinatlarını belirlemak. SATIR İiid8 ! Rekursif altprogramı çağırıp labirenti çözdürmek. SATIR 1158 ! Ü$t'e çözüm için gerekli olan zamanı almak. SÂATIR 1168 ! Labirentin çözümü yoksa "HATAZ" mesajını verip Pprogramı bitirmek. SATIR (1170- 1190: Bulunan çözümü C hafızasına "C" karakterleriyle işlemek. SATIR İIl1800- 1220: Problemin çözüldüğünü bildirip geçen zamanı yazmak. SATIR (i18230- 1270! Hatırlatma amacıyla başlangıç şeklini ekrana vermek. SATIR (İd18öğ8d- 1310t Labirentin çözülmüs şeklini ekrana vermek. SATIR İi320 ! Programı bitirme., SATIR 2000- 2016!: C Hhafızasını ekrana Cikartmak için altprogram. (Iz-i1;,;başlangıc?/Is2,Çözüm) SATIR 188088 1 Rekursif altprogramın başlangıcı. "Çeyvrayae bakma" altprogramını çağırma. SATIR 18818 ! Çözüm bulunmuşsa "bir" durumuyla geri dönme. SATIR 18028 ! Yol tıkanmışsa "sıfır" durumuyla geri dönme.