PATTN-EDITOR
FILE INFORMATION
FILENAME(S): PATTN-EDITOR
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-10-20 00:40:16
APPEARS ON: 2 disk(s)
FILE HASH
02a52eef21c60537a14bcc681c3dbf9eed967e110bbcc80944d98f027e7c0971
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MT90570 S B | PATTN-EDITOR | PRG | Treasure Chest - Joker79 | 25 | 10 | DOWNLOAD FILE |
| A 3 | PATTN-EDITOR | PRG | Treasure Chest - Joker79 | 1 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 0A 00 8F 22 20 20 20 20 D4 48 45 20 |..#...." .HE | 00000010: C7 45 4F 53 20 D0 41 54 54 45 52 4E 20 C5 44 49 |.EOS .ATTERN .DI| 00000020: 54 4F 52 00 42 08 14 00 8F 22 20 20 20 20 20 20 |TOR.B...." | 00000030: 42 59 20 D5 57 45 20 CB 48 41 54 43 48 49 4B 49 |BY .WE .HATCHIKI| 00000040: 41 4E 00 69 08 1E 00 8F 22 C0 C0 C0 C0 C0 C0 C0 |AN.i....".......| 00000050: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000060: C0 C0 C0 C0 C0 C0 C0 C0 C0 00 8E 08 28 00 8F 22 |............(.."| 00000070: 20 20 D0 C1 D4 D4 CE 2D C5 C4 C9 D4 CF D2 20 2D | .....-...... -| 00000080: 2D 2D 20 D6 45 52 53 49 4F 4E 20 31 2E 32 00 95 |-- .ERSION 1.2..| 00000090: 08 32 00 8F 22 00 BB 08 3C 00 8F 22 20 C4 41 54 |.2.."...<.." .AT| 000000A0: 45 3A 20 31 32 2F 32 39 2F 38 36 20 20 20 D4 49 |E: 12/29/86 .I| 000000B0: 4D 45 3A 20 39 3A 30 30 20 D0 CD 00 C2 08 46 00 |ME: 9:00 .....F.| 000000C0: 8F 22 00 C8 08 50 00 3A 00 CE 08 5A 00 3A 00 DC |."...P.:...Z.:..| 000000D0: 08 64 00 97 35 33 32 37 32 2C 32 31 00 F7 08 66 |.d..53272,21...f| 000000E0: 00 99 20 22 0E 13 1F 11 9D 9D 9D 9D 9D 9D 12 20 |.. "........... | 000000F0: D7 C1 C9 D4 20 92 22 00 0E 09 68 00 97 35 33 32 |.... ."...h..532| 00000100: 38 30 2C 36 3A 97 35 33 32 38 31 2C 31 34 00 22 |80,6:.53281,14."| 00000110: 09 6A 00 97 35 32 2C 34 38 3A 97 35 36 2C 34 38 |.j..52,48:.56,48| 00000120: 3A 9C 00 3A 09 6C 00 97 35 36 33 33 34 2C C2 28 |:..:.l..56334,.(| 00000130: 35 36 33 33 34 29 AF 32 35 34 00 52 09 6E 00 97 |56334).254.R.n..| 00000140: 31 2C C2 28 31 29 AF 32 35 31 3A 56 B2 31 3A 57 |1,.(1).251:V.1:W| 00000150: B2 31 00 6E 09 70 00 81 49 B2 30 A4 33 30 3A 87 |.1.n.p..I.0.30:.| 00000160: 42 3A 97 34 39 31 35 32 AA 49 2C 42 3A 82 00 91 |B:.49152.I,B:...| 00000170: 09 72 00 83 31 36 30 2C 37 2C 31 35 32 2C 39 2C |.r..160,7,152,9,| 00000180: 34 38 2C 31 34 31 2C 32 33 2C 31 39 32 2C 31 35 |48,141,23,192,15| 00000190: 32 00 B3 09 74 00 83 31 30 35 2C 38 2C 39 2C 32 |2...t..105,8,9,2| 000001A0: 30 38 2C 31 34 31 2C 32 30 2C 31 39 32 2C 31 36 |08,141,20,192,16| 000001B0: 32 2C 30 00 D7 09 76 00 83 31 38 39 2C 30 2C 32 |2,0...v..189,0,2| 000001C0: 31 36 2C 31 35 37 2C 30 2C 34 38 2C 32 33 32 2C |16,157,0,48,232,| 000001D0: 32 30 38 2C 32 34 37 00 EA 09 78 00 83 31 33 36 |208,247...x..136| 000001E0: 2C 31 36 2C 32 32 38 2C 39 36 00 1A 0A 7A 00 9E |,16,228,96...z..| 000001F0: 34 39 31 35 32 3A 97 31 2C C2 28 31 29 B0 34 3A |49152:.1,.(1).4:| 00000200: 81 49 B2 30 A4 37 3A 48 28 49 29 B2 32 AE 49 3A |.I.0.7:H(I).2.I:| 00000210: 82 3A 97 36 35 30 2C 31 32 38 00 30 0A 7C 00 97 |.:.650,128.0.|..| 00000220: 35 36 33 33 34 2C C2 28 35 36 33 33 34 29 B0 31 |56334,.(56334).1| 00000230: 00 4D 0A 7E 00 97 35 33 32 37 32 2C 28 C2 28 35 |.M.~..53272,(.(5| 00000240: 33 32 37 32 29 AF 32 34 30 29 AA 31 32 00 81 0A |3272).240).12...| 00000250: 80 00 99 22 93 11 12 20 C7 45 4F 53 20 D0 41 54 |..."... .EOS .AT| 00000260: 54 45 52 4E 20 C5 44 49 54 4F 52 20 42 59 20 D5 |TERN .DITOR BY .| 00000270: 57 45 20 CB 48 41 54 43 48 49 4B 49 41 4E 20 92 |WE .HATCHIKIAN .| 00000280: 22 00 CC 0A 82 00 99 22 11 20 D0 4C 45 41 53 45 |"......". .LEASE| 00000290: 20 49 4E 53 45 52 54 20 41 20 C7 C5 CF D3 2D C4 | INSERT A ....-.| 000002A0: 49 53 4B 20 43 4F 4E 54 41 49 4E 49 4E 47 20 20 |ISK CONTAINING | 000002B0: 20 20 54 48 45 20 C6 49 4C 45 20 C3 C8 C7 20 D0 | THE .ILE ... .| 000002C0: C1 D4 D4 CE D3 20 41 4E 44 20 22 3B 00 EF 0A 84 |..... AND ";....| 000002D0: 00 99 22 50 52 45 53 53 20 54 48 45 22 3A 99 22 |.."PRESS THE":."| 000002E0: 20 3C D2 C5 D4 D5 D2 CE 3E 20 4B 45 59 2E 22 00 | <......> KEY.".| 000002F0: 06 0B 86 00 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 |.....A$:.A$...(1| 00000300: 33 29 A7 31 33 34 00 3A 0B 88 00 99 22 93 11 12 |3).134.:...."...| 00000310: 20 20 20 D3 45 41 52 43 48 49 4E 47 20 C3 C8 C7 | .EARCHING ...| 00000320: 20 D0 C1 D4 D4 CE D3 2E 20 D0 4C 45 41 53 45 20 | ....... .LEASE | 00000330: 57 41 49 54 2E 20 20 20 92 22 00 40 0B 89 00 3A |WAIT. .".@...:| 00000340: 00 66 0B 8A 00 8F 22 C0 C0 C0 C0 C0 C0 20 D3 45 |.f...."...... .E| 00000350: 41 52 43 48 20 C3 C8 C7 20 D0 C1 D4 D4 CE D3 20 |ARCH ... ...... | 00000360: C0 C0 C0 C0 C0 C0 00 6C 0B 8B 00 3A 00 8C 0B 90 |.......l...:....| 00000370: 00 44 53 B2 31 3A 50 B2 31 3A 9F 31 2C 38 2C 31 |.DS.1:P.1:.1,8,1| 00000380: 35 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 A2 0B 92 |5:.2,8,2,"#"....| 00000390: 00 98 31 2C 22 55 31 20 32 20 30 20 31 38 22 3B |..1,"U1 2 0 18";| 000003A0: 44 53 00 C3 0B 94 00 A1 23 32 2C 4E 54 24 3A A1 |DS......#2,NT$:.| 000003B0: 23 32 2C 4E 53 24 3A 4E 54 24 B2 4E 54 24 AA C7 |#2,NS$:NT$.NT$..| 000003C0: 28 30 29 00 D5 0B 96 00 81 49 B2 30 A4 37 3A 99 |(0)......I.0.7:.| 000003D0: 22 13 22 3B 50 00 EB 0B 98 00 98 31 2C 22 42 2D |".";P......1,"B-| 000003E0: 50 20 32 22 3B 49 AC 33 32 AA 32 00 1D 0C 9A 00 |P 2";I.32.2.....| 000003F0: A1 23 32 2C 54 59 24 3A 54 59 24 B2 54 59 24 AA |.#2,TY$:TY$.TY$.| 00000400: C7 28 30 29 3A 8B 54 59 24 B2 C7 28 30 29 B0 54 |.(0):.TY$..(0).T| 00000410: 59 24 B2 C7 28 31 32 38 29 A7 31 36 32 00 39 0C |Y$..(128).162.9.| 00000420: 9C 00 98 31 2C 22 42 2D 50 20 32 22 3B 49 AC 33 |...1,"B-P 2";I.3| 00000430: 32 AA 35 3A 44 24 B2 22 22 00 57 0C 9E 00 81 4A |2.5:D$."".W....J| 00000440: B2 31 A4 31 36 3A A1 23 32 2C 41 24 3A 44 24 B2 |.1.16:.#2,A$:D$.| 00000450: 44 24 AA 41 24 3A 82 00 76 0C A0 00 8B 44 24 B2 |D$.A$:..v....D$.| 00000460: 22 43 48 47 20 50 41 54 54 4E 53 A0 A0 A0 A0 A0 |"CHG PATTNS.....| 00000470: A0 22 A7 31 37 30 00 82 0C A2 00 50 B2 50 AA 31 |.".170.....P.P.1| 00000480: 3A 82 00 A0 0C A4 00 8B 4E 54 24 B3 B1 C7 28 30 |:.......NT$...(0| 00000490: 29 A7 44 53 B2 C6 28 4E 53 24 29 3A 89 31 34 36 |).DS..(NS$):.146| 000004A0: 00 DA 0C A6 00 A0 32 3A A0 31 3A 99 22 93 11 11 |......2:.1:."...| 000004B0: 20 C3 C8 C7 20 D0 C1 D4 D4 CE D3 20 4E 4F 54 20 | ... ...... NOT | 000004C0: 46 4F 55 4E 44 2E 22 3A 99 22 20 D0 52 45 53 53 |FOUND.":." .RESS| 000004D0: 20 41 4E 59 20 4B 45 59 2E 22 00 ED 0C A7 00 A1 | ANY KEY."......| 000004E0: 41 24 3A 8B 41 24 B2 22 22 A7 31 36 37 00 F6 0C |A$:.A$."".167...| 000004F0: A8 00 89 31 32 38 00 0C 0D AA 00 98 31 2C 22 42 |...128......1,"B| 00000500: 2D 50 20 32 22 3B 49 AC 33 32 AA 33 00 2D 0D B4 |-P 2";I.32.3.-..| 00000510: 00 A1 23 32 2C 54 24 3A A1 23 32 2C 53 24 3A 53 |..#2,T$:.#2,S$:S| 00000520: 24 B2 53 24 AA C7 28 30 29 3A 49 B2 37 00 39 0D |$.S$..(0):I.7.9.| 00000530: B5 00 82 3A A0 32 3A A0 31 00 3F 0D B6 00 3A 00 |...:.2:.1.?...:.| 00000540: 65 0D B7 00 8F 22 C0 C0 C0 20 D2 45 41 44 20 D0 |e...."... .EAD .| 00000550: 41 54 54 45 52 4E 53 20 46 52 4F 4D 20 C4 49 53 |ATTERNS FROM .IS| 00000560: 4B 20 C0 C0 C0 00 6B 0D B8 00 3A 00 9F 0D B9 00 |K ....k...:.....| 00000570: 99 22 93 11 12 20 20 20 20 20 D2 45 41 44 49 4E |."... .EADIN| 00000580: 47 20 D0 41 54 54 45 52 4E 53 2E 20 D0 4C 45 41 |G .ATTERNS. .LEA| 00000590: 53 45 20 57 41 49 54 2E 20 20 20 20 20 92 22 00 |SE WAIT. .".| 000005A0: B6 0D BA 00 9F 31 2C 38 2C 31 35 3A 9F 32 2C 38 |.....1,8,15:.2,8| 000005B0: 2C 32 2C 22 23 22 00 D3 0D BC 00 98 31 2C 22 55 |,2,"#"......1,"U| 000005C0: 31 20 32 20 30 20 22 3B C6 28 54 24 29 3B C6 28 |1 2 0 ";.(T$);.(| 000005D0: 53 24 29 00 F4 0D BE 00 A1 23 32 2C 4E 54 24 3A |S$)......#2,NT$:| 000005E0: A1 23 32 2C 4E 53 24 3A 4E 53 24 B2 4E 53 24 AA |.#2,NS$:NS$.NS$.| 000005F0: C7 28 30 29 00 0F 0E C0 00 98 31 2C 22 42 2D 50 |.(0)......1,"B-P| 00000600: 20 32 20 36 30 22 3A 41 44 B2 31 33 30 35 36 00 | 2 60":AD.13056.| 00000610: 2E 0E C2 00 81 49 B2 30 A4 31 39 35 3A A1 23 32 |.....I.0.195:.#2| 00000620: 2C 42 24 3A 42 24 B2 42 24 AA C7 28 30 29 00 46 |,B$:B$.B$..(0).F| 00000630: 0E C4 00 97 41 44 2C C6 28 42 24 29 3A 41 44 B2 |....AD,.(B$):AD.| 00000640: 41 44 AA 31 3A 82 00 65 0E C6 00 98 31 2C 22 55 |AD.1:..e....1,"U| 00000650: 31 20 32 20 30 20 22 3B C6 28 4E 54 24 29 3B C6 |1 2 0 ";.(NT$);.| 00000660: 28 4E 53 24 29 00 77 0E C8 00 A1 23 32 2C 42 24 |(NS$).w....#2,B$| 00000670: 3A A1 23 32 2C 42 24 00 95 0E CA 00 81 49 B2 30 |:.#2,B$......I.0| 00000680: A4 35 39 3A A1 23 32 2C 42 24 3A 42 24 B2 42 24 |.59:.#2,B$:B$.B$| 00000690: AA C7 28 30 29 00 AD 0E CC 00 97 41 44 2C C6 28 |..(0)......AD,.(| 000006A0: 42 24 29 3A 41 44 B2 41 44 AA 31 3A 82 00 B7 0E |B$):AD.AD.1:....| 000006B0: CE 00 A0 32 3A A0 31 00 BD 0E CF 00 3A 00 E3 0E |...2:.1.....:...| 000006C0: D0 00 8F 22 C0 C0 C0 C0 C0 C0 C0 C0 20 CD 41 49 |..."........ .AI| 000006D0: 4E 20 D0 52 4F 47 52 41 4D 20 C0 C0 C0 C0 C0 C0 |N .ROGRAM ......| 000006E0: C0 C0 C0 00 E9 0E D1 00 3A 00 16 0F D2 00 99 22 |........:......"| 000006F0: 93 11 20 2E 2E 2E 2E 2E 2E 2E 2E 20 C9 2C CA 2C |.. ........ .,.,| 00000700: CB 2C CD 3A CD 4F 56 45 20 20 DD 46 38 20 20 20 |.,.:.OVE .F8 | 00000710: 3A D3 41 56 45 22 00 41 0F D4 00 99 22 20 2E 2E |:.AVE".A...." ..| 00000720: 2E 2E 2E 2E 2E 2E 20 D3 D0 C1 C3 C5 3A D3 45 54 |...... .....:.ET| 00000730: 20 20 20 20 20 DD D1 20 20 20 20 3A D1 55 49 54 | .. :.UIT| 00000740: 22 00 8D 0F D6 00 99 22 20 2E 2E 2E 2E 2E 2E 2E |"......" .......| 00000750: 2E 20 5F 20 20 20 20 3A D2 45 53 45 54 20 20 20 |. _ :.ESET | 00000760: DD 22 3A 99 22 20 2E 2E 2E 2E 2E 2E 2E 2E 20 D3 |.":." ........ .| 00000770: C8 2B D3 D0 3A C3 4F 4E 54 20 D3 45 54 DD D0 41 |.+..:.ONT .ET..A| 00000780: 54 54 45 52 4E 20 C5 44 49 54 4F 52 22 00 D3 0F |TTERN .DITOR"...| 00000790: D8 00 99 22 20 2E 2E 2E 2E 2E 2E 2E 2E 20 5E 20 |..." ........ ^ | 000007A0: 20 20 20 3A C3 4F 4E 54 20 D2 D3 54 DD 22 3A 99 | :.ONT ..T.":.| 000007B0: 22 20 2E 2E 2E 2E 2E 2E 2E 2E 20 C3 CC D2 20 20 |" ........ ... | 000007C0: 3A C3 4C 45 41 52 20 20 20 DD 20 20 20 20 20 20 |:.LEAR . | 000007D0: 42 59 22 00 1F 10 DA 00 99 22 20 2E 2E 2E 2E 2E |BY"......" .....| 000007E0: 2E 2E 2E 20 46 31 20 20 20 3A D2 45 53 54 4F 52 |... F1 :.ESTOR| 000007F0: 45 20 DD 22 3A 99 22 20 2E 2E 2E 2E 2E 2E 2E 2E |E .":." ........| 00000800: 20 46 33 20 20 20 3A D3 45 4C 45 43 54 20 20 DD | F3 :.ELECT .| 00000810: 20 D5 2E CB 48 41 54 43 48 49 4B 49 41 4E 22 00 | ...HATCHIKIAN".| 00000820: 66 10 DC 00 99 22 11 20 20 20 20 31 20 20 32 20 |f....". 1 2 | 00000830: 20 33 20 20 34 20 20 35 20 20 36 20 20 37 20 20 | 3 4 5 6 7 | 00000840: 38 22 3A 4C 24 B2 22 20 20 20 C0 C0 20 C0 C0 20 |8":L$." .. .. | 00000850: C0 C0 20 C0 C0 20 C0 C0 20 C0 C0 20 C0 C0 20 C0 |.. .. .. .. .. .| 00000860: C0 22 3A 99 4C 24 00 9D 10 DE 00 50 24 B2 22 DD |.":.L$.....P$.".| 00000870: A0 A0 DD A1 A1 DD A2 A2 DD A3 A3 DD A4 A4 DD A5 |................| 00000880: A5 DD A6 A6 DD A7 A7 DD 22 3A 99 22 20 C1 22 50 |........":." ."P| 00000890: 24 3A 99 22 20 20 22 50 24 3A 99 4C 24 00 D4 10 |$:." "P$:.L$...| 000008A0: E0 00 50 24 B2 22 DD A8 A8 DD A9 A9 DD AA AA DD |..P$."..........| 000008B0: AB AB DD AC AC DD AD AD DD AE AE DD AF AF DD 22 |..............."| 000008C0: 3A 99 22 20 C2 22 50 24 3A 99 22 20 20 22 50 24 |:." ."P$:." "P$| 000008D0: 3A 99 4C 24 00 0B 11 E2 00 50 24 B2 22 DD B0 B0 |:.L$.....P$."...| 000008E0: DD B1 B1 DD B2 B2 DD B3 B3 DD B4 B4 DD B5 B5 DD |................| 000008F0: B6 B6 DD B7 B7 DD 22 3A 99 22 20 C3 22 50 24 3A |......":." ."P$:| 00000900: 99 22 20 20 22 50 24 3A 99 4C 24 00 48 11 E4 00 |." "P$:.L$.H...| 00000910: 50 24 B2 22 DD B8 B8 DD B9 B9 DD BA BA DD BB BB |P$."............| 00000920: DD BC BC DD BD BD DD BE BE DD BF BF DD 22 3A 99 |.............":.| 00000930: 22 20 C4 22 50 24 3A 99 22 20 20 22 50 24 3A 99 |" ."P$:." "P$:.| 00000940: 4C 24 3B 3A 89 32 36 30 00 59 11 F0 00 43 24 B2 |L$;:.260.Y...C$.| 00000950: 22 05 22 3A 8D 32 30 30 30 00 6C 11 F2 00 A1 41 |".":.2000.l....A| 00000960: 24 3A 8B 41 24 B2 22 22 A7 32 34 32 00 77 11 F3 |$:.A$."".242.w..| 00000970: 00 43 24 B2 22 1F 22 00 95 11 F4 00 8B 41 24 B2 |.C$."."......A$.| 00000980: 22 4B 22 A7 8D 32 30 30 38 3A 56 B2 56 AA 28 31 |"K"..2008:V.V.(1| 00000990: AF 56 B3 38 29 00 B3 11 F6 00 8B 41 24 B2 22 4A |.V.8)......A$."J| 000009A0: 22 A7 8D 32 30 30 38 3A 56 B2 56 AB 28 31 AF 56 |"..2008:V.V.(1.V| 000009B0: B1 31 29 00 D1 11 F8 00 8B 41 24 B2 22 4D 22 A7 |.1)......A$."M".| 000009C0: 8D 32 30 30 34 3A 57 B2 57 AA 28 31 AF 57 B3 34 |.2004:W.W.(1.W.4| 000009D0: 29 00 EF 11 FA 00 8B 41 24 B2 22 49 22 A7 8D 32 |)......A$."I"..2| 000009E0: 30 30 34 3A 57 B2 57 AB 28 31 AF 57 B1 31 29 00 |004:W.W.(1.W.1).| 000009F0: 01 12 FC 00 8B 41 24 B2 C7 28 31 33 29 A7 32 36 |.....A$..(13).26| 00000A00: 30 00 0A 12 FE 00 89 32 34 30 00 28 12 04 01 43 |0......240.(...C| 00000A10: 24 B2 22 1F 22 3A 8D 32 30 30 30 3A 43 24 B2 22 |$.".":.2000:C$."| 00000A20: 05 22 3A 8D 32 30 30 32 00 4A 12 0E 01 50 43 B2 |.":.2002.J...PC.| 00000A30: 28 57 AB 31 29 AC 38 AA 56 AA 39 35 3A 41 44 B2 |(W.1).8.V.95:AD.| 00000A40: 31 32 32 38 38 AA 50 43 AC 38 00 6D 12 18 01 99 |12288.PC.8.m....| 00000A50: 22 13 11 1F 22 3B 3A 81 49 B2 30 A4 37 3A 42 B2 |"...";:.I.0.7:B.| 00000A60: C2 28 41 44 AA 49 29 3A 99 22 20 22 3B 00 9B 12 |.(AD.I):." ";...| 00000A70: 1A 01 81 4A B2 37 A4 30 A9 AB 31 3A 99 22 2E 22 |...J.7.0..1:."."| 00000A80: 3B 3A 8B 42 B1 48 28 4A 29 AB 31 A7 99 22 9D 2A |;:.B.H(J).1..".*| 00000A90: 22 3B 3A 42 B2 42 AB 48 28 4A 29 00 D9 12 1C 01 |";:B.B.H(J).....| 00000AA0: 82 3A 99 3A 82 3A 97 32 31 31 2C 32 38 3A 97 32 |.:.:.:.211,28:.2| 00000AB0: 31 34 2C 31 35 3A 9E 35 38 37 33 32 3A 99 22 D0 |14,15:.58732:.".| 00000AC0: 41 54 54 45 52 4E 3A 22 3B C7 28 31 39 32 AA 57 |ATTERN:";.(192.W| 00000AD0: 29 3B C7 28 34 38 AA 56 29 00 16 13 1E 01 50 24 |);.(48.V).....P$| 00000AE0: B2 22 DD 22 3A 81 49 B2 30 A4 34 3A 50 24 B2 50 |.".":.I.0.4:P$.P| 00000AF0: 24 AA C7 28 36 34 AA 50 43 29 3A 82 3A 50 24 B2 |$..(64.PC):.:P$.| 00000B00: 50 24 AA 22 DD 22 3A 97 32 31 31 2C 33 31 3A 97 |P$.".":.211,31:.| 00000B10: 32 31 34 2C 31 37 00 54 13 20 01 9E 35 38 37 33 |214,17.T. ..5873| 00000B20: 32 3A 99 22 C0 C0 C0 C0 C0 20 22 3B 3A 81 49 B2 |2:."..... ";:.I.| 00000B30: 30 A4 34 3A 99 22 11 9D 9D 9D 9D 9D 9D 9D 22 50 |0.4:."........"P| 00000B40: 24 3B 3A 82 3A 99 22 11 9D 9D 9D 9D 9D 9D C0 C0 |$;:.:.".........| 00000B50: C0 C0 C0 22 00 69 13 22 01 58 B2 35 3A 59 B2 35 |...".i.".X.5:Y.5| 00000B60: 3A 52 B2 32 3A 44 46 B2 30 00 82 13 24 01 97 32 |:R.2:DF.0...$..2| 00000B70: 31 34 2C 59 3A 97 32 31 31 2C 58 3A 9E 35 38 37 |14,Y:.211,X:.587| 00000B80: 33 32 00 9A 13 26 01 52 54 B2 C2 28 28 31 30 32 |32...&.RT..((102| 00000B90: 34 AA 59 AC 34 30 29 AA 58 29 00 A6 13 28 01 99 |4.Y.40).X)...(..| 00000BA0: 22 12 20 92 22 3B 00 B9 13 2A 01 A1 41 24 3A 8B |". .";...*..A$:.| 00000BB0: 41 24 B2 22 22 A7 32 39 38 00 CF 13 2C 01 97 28 |A$."".298...,..(| 00000BC0: 31 30 32 34 AA 59 AC 34 30 29 AA 58 2C 52 54 00 |1024.Y.40).X,RT.| 00000BD0: E7 13 2E 01 8B 41 24 B2 22 4B 22 A7 58 B2 58 AA |.....A$."K".X.X.| 00000BE0: 28 31 AF 58 B3 38 29 00 FF 13 30 01 8B 41 24 B2 |(1.X.8)...0..A$.| 00000BF0: 22 4A 22 A7 58 B2 58 AB 28 31 AF 58 B1 31 29 00 |"J".X.X.(1.X.1).| 00000C00: 17 14 32 01 8B 41 24 B2 22 49 22 A7 59 B2 59 AB |..2..A$."I".Y.Y.| 00000C10: 28 31 AF 59 B1 31 29 00 2F 14 34 01 8B 41 24 B2 |(1.Y.1)./.4..A$.| 00000C20: 22 4D 22 A7 59 B2 59 AA 28 31 AF 59 B3 38 29 00 |"M".Y.Y.(1.Y.8).| 00000C30: 4C 14 36 01 8B 41 24 B2 22 20 22 A7 52 B2 31 3A |L.6..A$." ".R.1:| 00000C40: 44 46 B2 30 3A 8F 20 53 50 41 43 45 00 6E 14 38 |DF.0:. SPACE.n.8| 00000C50: 01 8B 41 24 B2 22 A0 22 A7 44 46 B2 31 3A 52 B2 |..A$.".".DF.1:R.| 00000C60: 31 3A 8F 20 53 48 49 46 54 53 50 41 43 45 00 83 |1:. SHIFTSPACE..| 00000C70: 14 3A 01 8B 41 24 B2 22 5F 22 A7 52 B2 30 3A 44 |.:..A$."_".R.0:D| 00000C80: 46 B2 30 00 98 14 3C 01 8B 41 24 B2 22 5E 22 A7 |F.0...<..A$."^".| 00000C90: 44 46 B2 31 3A 52 B2 30 00 A8 14 3E 01 8B 41 24 |DF.1:R.0...>..A$| 00000CA0: B2 22 85 22 A7 31 38 34 00 CA 14 40 01 8B 41 24 |.".".184...@..A$| 00000CB0: B2 22 93 22 A7 81 49 B2 30 A4 37 3A 97 41 44 AA |."."..I.0.7:.AD.| 00000CC0: 49 2C 30 3A 82 3A 89 32 38 30 00 DA 14 42 01 8B |I,0:.:.280...B..| 00000CD0: 41 24 B2 22 86 22 A7 32 34 30 00 EA 14 44 01 8B |A$.".".240...D..| 00000CE0: 41 24 B2 22 8C 22 A7 34 30 30 00 FA 14 46 01 8B |A$.".".400...F..| 00000CF0: 41 24 B2 22 51 22 A7 33 35 30 00 0C 15 48 01 42 |A$."Q".350...H.B| 00000D00: 59 B2 59 AB 31 3A 42 49 B2 58 AB 31 00 36 15 4C |Y.Y.1:BI.X.1.6.L| 00000D10: 01 8B 52 B2 30 A7 97 28 41 44 AA 42 59 29 2C C2 |..R.0..(AD.BY),.| 00000D20: 28 41 44 AA 42 59 29 AF 32 35 35 AB 28 32 AE 28 |(AD.BY).255.(2.(| 00000D30: 37 AB 42 49 29 29 00 5A 15 4E 01 8B 52 B2 31 A7 |7.BI)).Z.N..R.1.| 00000D40: 97 28 41 44 AA 42 59 29 2C C2 28 41 44 AA 42 59 |.(AD.BY),.(AD.BY| 00000D50: 29 B0 32 AE 28 37 AB 42 49 29 00 6A 15 50 01 8B |).2.(7.BI).j.P..| 00000D60: 52 B2 30 A7 99 22 9D 2E 22 3B 00 7A 15 52 01 8B |R.0.."..";.z.R..| 00000D70: 52 B2 31 A7 99 22 9D 2A 22 3B 00 88 15 54 01 8B |R.1..".*";...T..| 00000D80: 44 46 B2 30 A7 52 B2 32 00 91 15 56 01 89 32 39 |DF.0.R.2...V..29| 00000D90: 32 00 97 15 58 01 3A 00 BD 15 59 01 8F 22 C0 C0 |2...X.:...Y.."..| 00000DA0: C0 20 C5 58 49 54 20 D0 52 4F 47 52 41 4D 20 28 |. .XIT .ROGRAM (| 00000DB0: 54 4F 20 C7 C5 CF D3 29 20 C0 C0 C0 C0 00 C3 15 |TO ....) .......| 00000DC0: 5A 01 3A 00 F7 15 5E 01 99 22 93 11 12 20 D3 45 |Z.:...^.."... .E| 00000DD0: 4C 45 43 54 20 CF 50 54 49 4F 4E 3A 20 20 20 20 |LECT .PTION: | 00000DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000DF0: 20 20 20 20 20 92 22 00 19 16 60 01 99 22 11 20 | ."...`..". | 00000E00: 3C 31 3E 20 D2 45 41 44 20 46 52 4F 4D 20 4F 54 |<1> .EAD FROM OT| 00000E10: 48 45 52 20 C4 49 53 4B 22 00 3A 16 62 01 99 22 |HER .ISK".:.b.."| 00000E20: 11 20 3C 32 3E 20 D2 45 53 54 4F 52 45 20 C5 44 |. <2> .ESTORE .D| 00000E30: 49 54 20 D3 43 52 45 45 4E 22 00 54 16 64 01 99 |IT .CREEN".T.d..| 00000E40: 22 11 20 3C 33 3E 20 C5 58 49 54 20 D0 52 4F 47 |". <3> .XIT .ROG| 00000E50: 52 41 4D 22 00 68 16 66 01 A1 41 24 3A 8B 41 24 |RAM".h.f..A$:.A$| 00000E60: B2 22 33 22 A7 33 37 30 00 76 16 68 01 8B 41 24 |."3".370.v.h..A$| 00000E70: B2 22 31 22 A7 8A 00 86 16 6A 01 8B 41 24 B2 22 |."1".....j..A$."| 00000E80: 32 22 A7 32 31 30 00 8F 16 6C 01 89 33 35 38 00 |2".210...l..358.| 00000E90: C3 16 72 01 99 22 93 11 12 D0 4C 45 41 53 45 20 |..r.."....LEASE | 00000EA0: 49 4E 53 45 52 54 20 41 20 C7 C5 CF D3 2D C2 4F |INSERT A ....-.O| 00000EB0: 4F 54 2D C4 49 53 4B 2E 20 C1 4E 59 20 4B 45 59 |OT-.ISK. .NY KEY| 00000EC0: 2E 92 22 00 D6 16 74 01 A1 41 24 3A 8B 41 24 B2 |.."...t..A$:.A$.| 00000ED0: 22 22 A7 33 37 32 00 E6 16 76 01 93 22 47 45 4F |"".372...v.."GEO| 00000EE0: 53 22 2C 38 2C 31 00 EC 16 7C 01 3A 00 12 17 7E |S",8,1...|.:...~| 00000EF0: 01 8F 22 C0 C0 C0 C0 20 D3 41 56 45 20 D0 41 54 |..".... .AVE .AT| 00000F00: 54 45 52 4E 53 20 54 4F 20 C4 49 53 4B 20 C0 C0 |TERNS TO .ISK ..| 00000F10: C0 C0 00 18 17 80 01 3A 00 65 17 90 01 99 22 93 |.......:.e....".| 00000F20: 11 20 D3 41 56 45 20 D0 41 54 54 45 52 4E 53 20 |. .AVE .ATTERNS | 00000F30: 54 4F 20 C4 49 53 4B 2E 20 C1 52 45 20 59 4F 55 |TO .ISK. .RE YOU| 00000F40: 20 53 55 52 45 3F 20 20 20 20 28 D0 4C 45 41 53 | SURE? (.LEAS| 00000F50: 45 20 45 4E 54 45 52 20 3C D9 3E 20 4F 52 20 3C |E ENTER <.> OR <| 00000F60: CE 3E 2E 29 22 00 78 17 92 01 A1 41 24 3A 8B 41 |.>.)".x....A$:.A| 00000F70: 24 B2 22 22 A7 34 30 32 00 89 17 94 01 8B 41 24 |$."".402......A$| 00000F80: B3 B1 22 59 22 A7 32 31 30 00 BD 17 96 01 99 22 |.."Y".210......"| 00000F90: 93 11 12 20 20 20 20 20 20 D3 41 56 49 4E 47 20 |... .AVING | 00000FA0: D0 41 54 54 45 52 4E 53 2E 20 D0 4C 45 41 53 45 |.ATTERNS. .LEASE| 00000FB0: 20 57 41 49 54 2E 20 20 20 20 20 92 22 00 D4 17 | WAIT. ."...| 00000FC0: 98 01 9F 31 2C 38 2C 31 35 3A 9F 32 2C 38 2C 32 |...1,8,15:.2,8,2| 00000FD0: 2C 22 23 22 00 F1 17 9A 01 98 31 2C 22 55 31 20 |,"#"......1,"U1 | 00000FE0: 32 20 30 20 22 3B C6 28 54 24 29 3B C6 28 53 24 |2 0 ";.(T$);.(S$| 00000FF0: 29 00 12 18 9C 01 A1 23 32 2C 4E 54 24 3A A1 23 |)......#2,NT$:.#| 00001000: 32 2C 4E 53 24 3A 4E 53 24 B2 4E 53 24 AA C7 28 |2,NS$:NS$.NS$..(| 00001010: 30 29 00 2D 18 9E 01 98 31 2C 22 42 2D 50 20 32 |0).-....1,"B-P 2| 00001020: 20 36 30 22 3A 41 44 B2 31 33 30 35 36 00 51 18 | 60":AD.13056.Q.| 00001030: A0 01 81 49 B2 30 A4 31 39 35 3A 98 32 2C C7 28 |...I.0.195:.2,.(| 00001040: C2 28 41 44 29 29 3B 3A 41 44 B2 41 44 AA 31 3A |.(AD));:AD.AD.1:| 00001050: 82 00 6E 18 A2 01 98 31 2C 22 55 32 20 32 20 30 |..n....1,"U2 2 0| 00001060: 20 22 3B C6 28 54 24 29 3B C6 28 53 24 29 00 8D | ";.(T$);.(S$)..| 00001070: 18 A4 01 98 31 2C 22 55 31 20 32 20 30 20 22 3B |....1,"U1 2 0 ";| 00001080: C6 28 4E 54 24 29 3B C6 28 4E 53 24 29 00 9F 18 |.(NT$);.(NS$)...| 00001090: A6 01 A1 23 32 2C 42 24 3A A1 23 32 2C 42 24 00 |...#2,B$:.#2,B$.| 000010A0: C2 18 A8 01 81 49 B2 30 A4 35 39 3A 98 32 2C C7 |.....I.0.59:.2,.| 000010B0: 28 C2 28 41 44 29 29 3B 3A 41 44 B2 41 44 AA 31 |(.(AD));:AD.AD.1| 000010C0: 3A 82 00 E1 18 A9 01 98 31 2C 22 55 32 20 32 20 |:.......1,"U2 2 | 000010D0: 30 20 22 3B C6 28 4E 54 24 29 3B C6 28 4E 53 24 |0 ";.(NT$);.(NS$| 000010E0: 29 00 F0 18 AA 01 A0 32 3A A0 31 3A 89 32 31 30 |)......2:.1:.210| 000010F0: 00 F6 18 6C 07 3A 00 1B 19 6E 07 8F 22 C0 C0 20 |...l.:...n..".. | 00001100: C8 49 47 48 4C 49 47 48 54 20 D0 41 54 54 45 52 |.IGHLIGHT .ATTER| 00001110: 4E 2D C2 4F 52 44 45 52 20 C0 C0 00 21 19 70 07 |N-.ORDER ...!.p.| 00001120: 3A 00 47 19 D0 07 97 32 31 34 2C 38 3A 97 32 31 |:.G....214,8:.21| 00001130: 31 2C 31 36 3A 9E 35 38 37 33 32 3A 99 43 24 22 |1,16:.58732:.C$"| 00001140: D3 45 4C 45 43 54 22 00 57 19 D2 07 8D 32 30 30 |.ELECT".W....200| 00001150: 34 3A 89 32 30 30 38 00 81 19 D4 07 97 32 31 31 |4:.2008......211| 00001160: 2C 31 3A 97 32 31 34 2C 39 AA 57 AC 33 3A 9E 35 |,1:.214,9.W.3:.5| 00001170: 38 37 33 32 3A 99 43 24 3B C7 28 31 39 32 AA 57 |8732:.C$;.(192.W| 00001180: 29 00 BF 19 D6 07 97 32 31 34 2C 38 AA 57 AC 33 |)......214,8.W.3| 00001190: 3A 97 32 31 31 2C 56 AC 33 3A 9E 35 38 37 33 32 |:.211,V.3:.58732| 000011A0: 3A 99 22 C0 C0 11 9D 9D 9D DD 1D 1D DD 11 9D 9D |:.".............| 000011B0: 9D 9D DD 1D 1D DD 11 9D 9D 9D C0 C0 22 3A 8E 00 |............":..| 000011C0: E7 19 D8 07 97 32 31 34 2C 31 30 3A 97 32 31 31 |.....214,10:.211| 000011D0: 2C 56 AC 33 3A 9E 35 38 37 33 32 3A 99 43 24 3B |,V.3:.58732:.C$;| 000011E0: 56 3A 89 32 30 30 36 00 00 00 |V:.2006... |
..#...." THE GEOS PATTERN EDITOR.B...
." BY UWE KHATCHIKIAN.I....".......
............................(.." PATTN-
EDITOR --- VERSION 1.2...2.."...<.." DAT
E: 12/29/86 TIME: 9:00 PM.B.F..".H.P.:
.N.Z.:...D..53272,21...F.. "...........
WAIT ."...H..53280,6:.53281,14.".J..52,4
8:.56,48:..:.L..56334,B(56334).254.R.N..
1,B(1).251:V.1:W.1.N.P..I.0.30:.B:.49152
.I,B:....R..160,7,152,9,48,141,23,192,15
2...T..105,8,9,208,141,20,192,162,0.W.V.
.189,0,216,157,0,48,232,208,247...X..136
,16,228,96...Z..49152:.1,B(1).4:.I.0.7:H
(I).2.I:.:.650,128.0.|..56334,B(56334).1
.M.~..53272,(B(53272).240).12......"...
GEOS PATTERN EDITOR BY UWE KHATCHIKIAN .
".L....". PLEASE INSERT A GEOS-DISK CONT
AINING THE FILE CHG PATTNS AND ";....
.."PRESS THE":." <RETURN> KEY."......A$:
.A$..G(13).134.:...."... SEARCHING CHG
PATTNS. PLEASE WAIT. .".@...:.F....".
..... SEARCH CHG PATTNS .......L...:....
.DS.1:P.1:.1,8,15:.2,8,2,"#"......1,"U1
2 0 18";DS.C....#2,NT$:.#2,NS$:NT$.NT$.G
(0).U....I.0.7:.".";P......1,"B-P 2";I.3
2.2......#2,TY$:TY$.TY$.G(0):.TY$.G(0).T
Y$.G(128).162.9....1,"B-P 2";I.32.5:D$."
".W....J.1.16:.#2,A$:D$.D$.A$:..V. ..D$.
"CHG PATTNS ".170.....P.P.1:.. ....
NT$..G(0).DS.F(NS$):.146.Z... 2: 1:."...
CHG PATTNS NOT FOUND.":." PRESS ANY KEY
."......A$:.A$."".167......128......1,"B
-P 2";I.32.3.-....#2,T$:.#2,S$:S$.S$.G(0
):I.7.9....: 2: 1.?...:.E...."... READ P
ATTERNS FROM DISK ....K...:......"...
READING PATTERNS. PLEASE WAIT. .".
.....1,8,15:.2,8,2,"#".S....1,"U1 2 0 ";
F(T$);F(S$)......#2,NT$:.#2,NS$:NS$.NS$.
G(0)......1,"B-P 2 60":AD.13056...B..I.0
.195:.#2,B$:B$.B$.G(0).F.D..AD,F(B$):AD.
AD.1:..E.F..1,"U1 2 0 ";F(NT$);F(NS$).W.
H..#2,B$:.#2,B$...J..I.0.59:.#2,B$:B$.B$
.G(0)...L..AD,F(B$):AD.AD.1:....N. 2: 1.
..O.:...P.."........ MAIN PROGRAM ......
......Q.:...R..".. ........ I,J,K,M:MOVE
.F8 :SAVE".A.T.." ........ SPACE:SET
.Q :QUIT"...V.." ........ _ :
RESET .":." ........ SH+SP:CONT SET.PA
TTERN EDITOR".S.X.." ........ ^ :CONT
RST.":." ........ CLR :CLEAR .
BY"...Z.." ........ F1 :RESTORE .":."
........ F3 :SELECT . U.KHATCHIKIAN".
F....". 1 2 3 4 5 6 7 8":L$."
.. .. .. .. .. .. .. ..":.L$.....P$.".
......................":." A"P$:." "P
$:.L$.T...P$."........................."
:." B"P$:." "P$:.L$.....P$."...........
..............":." C"P$:." "P$:.L$.H...
P$.".........................":." D"P$:.
" "P$:.L$;:.260.Y...C$.".":.2000.L....A
$:.A$."".242.W...C$."."......A$."K"..200
8:V.V.(1.V.8)......A$."J"..2008:V.V.(1.V
.1).Q....A$."M"..2004:W.W.(1.W.4)......A
$."I"..2004:W.W.(1.W.1)......A$.G(13).26
0......240.(...C$.".":.2000:C$.".":.2002
.J...PC.(W.1).8.V.95:AD.12288.PC.8.M....
"...";:.I.0.7:B.B(AD.I):." ";......J.7.0
..1:.".";:.B.H(J).1..".*";:B.B.H(J).Y...
.:.:.:.211,28:.214,15:.58732:."PATTERN:"
;G(192.W);G(48.V).....P$.".":.I.0.4:P$.P
$.G(64.PC):.:P$.P$.".":.211,31:.214,17.T
. ..58732:."..... ";:.I.0.4:."........"P
$;:.:."............".I.".X.5:Y.5:R.2:DF.
0...$..214,Y:.211,X:.58732...&.RT.B((102
4.Y.40).X)...(..". .";...*..A$:.A$."".29
8.O.,..(1024.Y.40).X,RT......A$."K".X.X.
(1.X.8)...0..A$."J".X.X.(1.X.1)...2..A$.
"I".Y.Y.(1.Y.1)./.4..A$."M".Y.Y.(1.Y.8).
L.6..A$." ".R.1:DF.0:. SPACE.N.8..A$." "
.DF.1:R.1:. SHIFTSPACE...:..A$."_".R.0:D
F.0...<..A$."^".DF.1:R.0...>..A$.".".184
.J.@..A$."."..I.0.7:.AD.I,0:.:.280.Z.B..
A$.".".240...D..A$.".".400...F..A$."Q".3
50...H.BY.Y.1:BI.X.1.6.L..R.0..(AD.BY),B
(AD.BY).255.(2.(7.BI)).Z.N..R.1..(AD.BY)
,B(AD.BY).2.(7.BI).J.P..R.0.."..";.Z.R..
R.1..".*";...T..DF.0.R.2...V..292...X.:.
..Y.."... EXIT PROGRAM (TO GEOS) .....C.
Z.:...^.."... SELECT OPTION:
."...`..". <1> READ FROM OT
HER DISK".:.B..". <2> RESTORE EDIT SCREE
N".T.D..". <3> EXIT PROGRAM".H.F..A$:.A$
."3".370.V.H..A$."1".....J..A$."2".210..
.L..358.C.R.."...PLEASE INSERT A GEOS-BO
OT-DISK. ANY KEY..".V.T..A$:.A$."".372..
.V.."GEOS",8,1...|.:...~..".... SAVE PAT
TERNS TO DISK .........:.E....".. SAVE P
ATTERNS TO DISK. ARE YOU SURE? (PLEAS
E ENTER <Y> OR <N>.)".X....A$:.A$."".402
......A$.."Y".210......"... SAVING
PATTERNS. PLEASE WAIT. .".T....1,8,1
5:.2,8,2,"#"......1,"U1 2 0 ";F(T$);F(S$
)......#2,NT$:.#2,NS$:NS$.NS$.G(0).-....
1,"B-P 2 60":AD.13056.Q. ..I.0.195:.2,G(
B(AD));:AD.AD.1:..N....1,"U2 2 0 ";F(T$)
;F(S$)......1,"U1 2 0 ";F(NT$);F(NS$)...
...#2,B$:.#2,B$.B....I.0.59:.2,G(B(AD));
:AD.AD.1:.......1,"U2 2 0 ";F(NT$);F(NS$
)..... 2: 1:.210...L.:...N..".. HIGHLIGH
T PATTERN-BORDER ...!.P.:.G.P..214,8:.21
1,16:.58732:.C$"SELECT".W.R..2004:.2008.
..T..211,1:.214,9.W.3:.58732:.C$;G(192.W
)...V..214,8.W.3:.211,V.3:.58732:.".....
....................":....X..214,10:.211
,V.3:.58732:.C$;V:.2006...
> CLICK IMAGE PREVIEW FOR FULL MODAL