Bu sayfadaki yazılar
Sayfanın metni
Sayfa 21
N><3LEF T > <3SPACE > <3LEF © YEK CTRL-7>* İİ ><DOLİN TİG G<CTRL-7) ” FT> © G<CTRL-7)>” 2360 REM INİT RESTÖRELFOR Izi TO DATA 2,6,0,0,0,-5,0,-3,8,0,8,5 PRİNT İCİN F-İ<4ASPA | GET THEN 228 POKE 59468,12 PRİNT SEN PRİNT "<HOME>BENİM TAS<2SPACE)G - ENİN TAS<3SPACE GÖSÜUB 164811F Psü0 THEN 268 GOSUB 2060:6GOSUB 2089 GÖSÜB IF P)G TKEN 848 60TO 340 REM HUMAN MOVE GOSUB 2048 PRİNT “ZAR ATMAK İCİN F7'YE BAS” GET THEN 338 GÖSÜB Psü THEN Mad 818 GET AS:IF A$z"" THEN 378 j IF OR NCİ THEN 350 PRİNT Nz25 THEN 630 IF Ns26 THEN 678 0 THEN 450 "İLK ÖNCE KİIRIĞINİ
KÖY GOSUB 2860: GOTO 350 REM 5 İF THEN 498 KOYAMADIN! 1 GOTO 448 IF THEN 530 IF HİSNH THEN Fs8:60T0 718 GOSUB "OLMAZ KI Ili GOTO 448 İF THEN sea GOSUB 2040:PRINT "ORADAN GoTO 440 1820: IF THEN AZCND
PRİNT "KAHRETSİN | BENİM-TASIMI KIR 1820 M>O THEN 2358 GOTO 848 IF BH THEN 658 47a İF THEN 560
IF THEN 7öğ GOÖSUB 2048:PRINT GosuB 2260: GOTO. 350 IF THEN 768. NHENH-İTİF NH THEN 758 GÖSÜB "KAZANDIN
GOŞUÜR. 2068: GOTO Basa
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 20
Sevgili Commodore'cular
Çoğumuz TAVLA oynamayı severiz -tabii programlardan fırsat buldukça- fakat genellikle tavla oynayacak arkadaş bulamayız. Öyleyse biz de bu sayıda bilgisayarla karşılıklı tavla oynayabileceğimiz bir tavla programı yazalım. Bu programı yazmaktaki amacımız hem güzel bir oyun programına sahip olmak, hem de bilgisayarda bir muamma olan RECORSION hakkında biraz bilgi vermektir. Bu yüzden oyuncunun oynaması, bilgisayarların oynaması gibi bölümler REM komutlarıyla belirginleştirilmiştir.
RECORSIF programların ana teması kendi kendini tekrar tekrar çağırarak sonuca gitmeleridir. Bir recursion programı karşısına tek seçenek çıkarsa oradan gider, eğer seçenekler birden fazlaysa birini dener, sonuca ulaşırsa programı bitirir, fakat sonuca gidemezse recorsif bir yapıya sahip olduğu için kendini çağırır ve diğer seçenekleri denemeye başlar. Bu program sonuca ulaşana kadar sürer. Eğer program sonuca ulaşmazsa gerekli mesajı yazar ve durur.
Bilgisayarın oyuncuya karşı olduğu oyunlarda -satranç tavla- mutlaka recorsif bir yapı olması şarttır. Bu tavla oyununda da görülmüştür. Programın 1300-1820 arası satırlarda bilgisayar recorsion sayesinde hangi hamleyi oynayabileceğini, hangisini oynamayacağını, oyuncunun yanlış oynayıp oynamadığını bulur.
Gelelim oyuna...
a-x taşınızın nereden gideceğini belirlemek için y kırık taşı koymak için z 'i diğer zarı oynamak için kullanabilirsiniz
Başlangıç ekranında return'e basınız.
Oyunun satır satır açıklaması aşağıdadır: 10- Başlangıç ekranı için 2550'e atlama 20-150 Zar ve diğer şeyler için değişkenlerin yerleşmesi 160-290 Başlangıç için zar atılması 300-440 Oyuncunun hareketlerinin kontrolü ve oyuncuya mesajlar 450-830 Oyun içindeki diğer mesajlar 840-1290 Bilgisayarın gerekli hamleleri oynaması 1300-1820 Programın en önemli bölümü RECORSION 1820-2030 Taşların ekrana basılması 2040-2050 Sayfanın silinmesi 2060-2070 Bekleme 2080-2240 Oyun tahtasının çizilmesi 2250-2310 Oyunu oyuncunun kazanması 2320-2350 C-64'ün oyunu kazanması 2350-2540 Açıklamalar 2550-2690 Açılış ekranı