9300/ FARBQUADRAT VON JEFF BRUETTEN COPYRIGHT 1984 COMMODOREh ALL RIGHTS RESERVED‹ FARBQUADRAT VON JEFF BRUETTE’ Û8¸ ™"“";:ç0,2,7:ç4,2,7:S$²" §¯º‘"ë ™""S$"ž"S$""S$""S$0 ™"’FARBQUADRATVONJEFF BRUETTE"Y ™"COPYRIGHT 1984 COMMODORE"•™:™:™:™"‚BELIEBIGE TASTE FUER BEGINN DRUECKEN„"Ÿ¡ù A$ÛA²7¤0©«1:ç0,2,A:ç4,2,A:T²1¤30:‚T,A:ç0,1,0:ç4,1,0:™"“"A$²""ªS$:B$²"ž"ªS$:C$²""ªS$:M$(1)²A$ªA$ªA$ªA$ªB$ªB$ªB$ªB$CM$(2)²M$(1):M$(3)²M$(1):M$(4)²M$(1)ƒA$²""ªS$:B$²""ªS$:C$²""ªS$:M$(5)²A$ªA$ªA$ªA$ªB$ªB$ªB$ªB$ŸM$(6)²M$(5):M$(7)²M$(5)åM$(8)²M$(5):C$(1)²È(M$(1),36):C$(2)²É(M$(1),36):C$(3)²È(M$(5),36)C$(4)²É(M$(5),36):‰5005KD²600¤1000©75:Ú3,KD,2:‚:™"";^V²1¤8:™M$(V)"";:‚d Žˆ(M$(Z)²É(M$(Z),7¬9)ªÈ(M$(Z),9):ެ*M$(Z)²É(M$(Z),9)ªÈ(M$(Z),7¬9):Žç.M$(9)²M$(1):Y²1¤8:M$(Y)²È(M$(Yª1),9)ªÉ(M$(Y),7¬9):‚:Ž%0M$(0)²M$(8):Y²8¤1©«1:M$(Y)²È(M$(Y«1),9)ªÉ(M$(Y),7¬9):‚:Ž`2M$(9)²M$(1):Y²1¤8:M$(Y)²È(M$(Y),7¬9)ªÉ(M$(Yª1),9):‚:Žž4M$(0)²M$(8):Y²8¤1©«1:M$(Y)²È(M$(Y),7¬9)ªÉ(M$(Y«1),9):‚:޵6M$(9)²M$(1):Y²1¤8ï8M$(Y)²È(M$(Y),Z«1)ªÊ(M$(Yª1),Z,9)ªÉ(M$(Y),73«Z«9):‚:Ž :M$(0)²M$(8):Y²8¤1©«1C<M$(Y)²È(M$(Y),Z«1)ªÊ(M$(Y«1),Z,9)ªÉ(M$(Y),73«Z«9):‚:Žwd‹AA²1§ TY²TYª1:™"Ÿ’:ZUG:";TY:OT$²TI$ƒeOT$²TI$žf I²R¤1©«1:‹AA²1§ ‰130Óg‹ AA²0§™"’ "I;ånZ²µ(»(0)¬8)ª1øxZZ²µ(»(0)¬4)ª1 ‚‹ ZZ²1§40:‰ 180"Œ‹ ZZ²2§ 42:‰1802 Z²(Z«1)¬9ª1I¢‘ ZZ ‰ 1,1,163,175\£‹ Z²1§46:‰180r¤‹ Z²64 § 50:‰180¥54:‰180‘¯‹Z²1§48:‰180¥°‹Z²64§ 52:‰180²±58:‰180Ä´30:‚:TI$²OT$ʵŽô™"’12345678";,õ™"’1 2 3 4 5 6 7 8";>þ™"";:30:™:™ˆ…" WIE OFT SOLL ICH DAS GITTER VERAENDERN 20";R:‹R³2°R±100§500Ì™"";:100:30:™:™:™" ";™" ";:TI$²"000000"7™" ";f™" ";­™"’ RICHTUNG (CURSOR-TASTEN) ? ";:™"   ";Ì™"";:31Ù&675:Z²00™"’        ";;1™"’ ";o5‹ A$²"‘"§ZZ²3:™"©ß’ §¥ §¥ ";:‰600¡:‹ A$²""§ZZ²4:™" §¥ §¥ ß©";:‰600ÕD‹ A$²""§ZZ²2:™"¤¤ß’££© ";:‰600 N‹ A$²""§ZZ²1:™" ©’¤¤ߣ£";:‰600S‰ 550,X‘ZZ‰ 605,605,610,610r]™"’12345678";:‘ ZZ‰ 620,620¯b™"’1 2 3 4 5 6 7 8";:‘ ZZ ‰ 1,1,660,660Úl™"’ ZEILE (1-8) ? (ODER RICHTUNG)";n 675:‹A$²"‘"°A$²""°A$²""°A$²""§‰560o‹A$³"1"§‰622*p‹A$±"8"§ ‰ 622JrZ²Å(A$):AA²1:R²1: 100:AA²0ƒs™"’        ";‘t700:‰540¼”™"’ SPALTE (1-8) ? (ODER RICHTUNG)";ç–675:‹A$²"‘"°A$²""°A$²""°A$²""§‰560ø—‹A$³"1"§‰662 ˜‹A$±"8"§ ‰ 662+šZ²Å(A$):AA²1:R²1: 100:AA²0U›™"’ ";dœ700:‰ 540œ£™"’ž"È(TI$,2)":"Ê(TI$,3,2)":"É(TI$,2);±¤¡ A$:‹A$²""§‰675·¥ŽÆ¼X²1¤4:G²0äÁ‹ È(M$(1),36)²C$(X)§G²Gª1Æ‹ È(M$(2),36)²C$(X)§G²Gª1 Ë‹ È(M$(3),36)²C$(X)§G²Gª1>Ћ È(M$(4),36)²C$(X)§G²Gª1NÕ‹G²4§ ‰ 750VÚ‚:ŽeîX²1¤4:G²0ƒó‹ È(M$(5),36)²C$(X)§G²Gª1¡ø‹ È(M$(6),36)²C$(X)§G²Gª1¿ý‹ È(M$(7),36)²C$(X)§G²Gª1Ý‹ È(M$(8),36)²C$(X)§G²Gª1í‹G²4§ ‰ 800õ ‚:Ž X²1¤4:G²0"%‹ É(M$(1),36)²C$(X)§G²Gª1@*‹ É(M$(2),36)²C$(X)§G²Gª1^/‹ É(M$(3),36)²C$(X)§G²Gª1|4‹ É(M$(4),36)²C$(X)§G²Gª1Œ9‹G²4§ ‰ 850”>‚:Ž£RX²1¤4:G²0ÁW‹ É(M$(5),36)²C$(X)§G²Gª1ß\‹ É(M$(6),36)²C$(X)§G²Gª1ýa‹ É(M$(7),36)²C$(X)§G²Gª1f‹ É(M$(8),36)²C$(X)§G²Gª1+k‹G²4§ ‰ 9003p‚:Ž9„F‰™"“";€Š™" © ’  ’  ’  ß’ © ’ © ß’  ’"½‹™"  ’  ’  ’  ’  ’  ’  ’  ’  ’÷Œ™" ß ß’  ’  ’  ’©  ’  ’©  ’"1 ™"  ’  ’  ’  ’  ’  ’ ßß’ "k Ž™"  ’© ß ’©  ’ ß ’  ’ ßß’  ’"q ™| “X$²TI$© ˜H²Å(È(X$,2)):M²Å(Ê(X$,3,2)):S²Å(É(X$,2))à TS²Sª(M¬60)ª(H¬60¬60)É ¢™Ï §™ê ¬™"GESAMTE ZEIT : ";!±‹ H±0§™£13);H"STUNDE";:‹H±1§™"N";!²‹H±0§™A!¶‹ M±0§™£18);M"MINUTE";:‹M±1§™"N";L!·‹M±0§™q!»™£18);S"SEKUNDE";:‹S±1°S²0§™"N";y!À™:™–!Å™"ANZAHL DER ZUEGE: ";TYœ!Ê™Ö!Ï™"MITTLERE ZEIT PRO ZUG:"µ(100¬(TS­TY))­100"SEKUNDEN"ü!ÐA²0¤7:ç0,2,A:ç4,2,A:T²1¤30:‚T,A"ÑCV²500¤800©10:Ú1,CV,2:‚7"ÒCV²600¤400©«15:Ú1,CV,2:‚P"Ô™ " NEUES SPIEL ?"i"Þ¡ùA$:‹A$²"J"§9500:Šz"ß‹A$³±"N"‰990‡"ã 9500:€’"T$ 9600"^$× 9330¨"h$‰ 9340³"r$Ö 9400Ë"|$™ "“"Ç(8);Ç(142);:Žô"¸$™"“"Ç(142)" NEUES SPIEL ?":— 239,0 #Â$¡ùX$:‹X$²"J"§9500:Š#Ì$‹X$³±"N"§94104#Ö$9500:™"“"Ç(9):€e#%I²0¤7:—1375ªI,FK(I):‚:Ž: RESTORE FUNC KEYS¢#€%I²0¤7:FK(I)²Â(1375ªI):—1375ªI,0:‚:Ž: DISABLE FUNC KEYS