FK.SHOWBAM.S
FILE INFORMATION
FILENAME(S): FK.SHOWBAM.S
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-10-20 14:32:02
APPEARS ON: 3 disk(s)
FILE HASH
7ef19fecab2b988f66816ab2efa472baf3242cfb6e19f7c5b5039fe290b782c3
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MAGIC DISK 01 93 | FK.SHOWBAM.S | PRG | DuncanTwain, swasti, dinkel, Treasure Chest - Klaus Der Suhler | 29 | 1 | DOWNLOAD FILE |
| MAGIC DISK 01 93 | FK.SHOWBAM.S | PRG | Treasure Chest - ralf | 29 | 1 | DOWNLOAD FILE |
| MAGIC DISK 01 93 | FK.SHOWBAM.S | PRG | DuncanTwain | 29 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F FD 1F 06 00 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |......;*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 00 0B 20 0A 00 2E 42 41 20 24 |******.. ...BA $|
00000030: 39 30 30 30 00 1E 20 0B 00 2E 45 51 20 53 54 41 |9000.. ...EQ STA|
00000040: 54 55 53 3D 24 39 30 00 33 20 0C 00 2E 45 51 20 |TUS=$90.3 ...EQ |
00000050: 53 45 54 50 41 52 3D 24 46 46 42 41 00 48 20 0D |SETPAR=$FFBA.H .|
00000060: 00 2E 45 51 20 53 45 54 4E 41 4D 3D 24 46 46 42 |..EQ SETNAM=$FFB|
00000070: 44 00 5B 20 0E 00 2E 45 51 20 4F 50 45 4E 3D 24 |D.[ ...EQ OPEN=$|
00000080: 46 46 43 30 00 6F 20 0F 00 2E 45 51 20 43 4C 4F |FFC0.o ...EQ CLO|
00000090: 53 45 3D 24 46 46 43 33 00 83 20 10 00 2E 45 51 |SE=$FFC3.. ...EQ|
000000A0: 20 43 48 4B 49 4E 3D 24 46 46 43 36 00 97 20 11 | CHKIN=$FFC6.. .|
000000B0: 00 2E 45 51 20 43 4C 52 43 48 3D 24 46 46 43 43 |..EQ CLRCH=$FFCC|
000000C0: 00 AB 20 12 00 2E 45 51 20 42 41 53 49 4E 3D 24 |.. ...EQ BASIN=$|
000000D0: 46 46 43 46 00 BF 20 13 00 2E 45 51 20 42 53 4F |FFCF.. ...EQ BSO|
000000E0: 55 54 3D 24 46 46 44 32 00 D2 20 14 00 2E 45 51 |UT=$FFD2.. ...EQ|
000000F0: 20 4C 4F 41 44 3D 24 46 46 44 35 00 E5 20 15 00 | LOAD=$FFD5.. ..|
00000100: 2E 45 51 20 53 41 56 45 3D 24 46 46 44 38 00 F9 |.EQ SAVE=$FFD8..|
00000110: 20 16 00 2E 45 51 20 43 4B 4F 55 54 3D 24 46 46 | ...EQ CKOUT=$FF|
00000120: 43 39 00 0E 21 18 00 2E 45 51 20 49 4E 54 4F 55 |C9..!...EQ INTOU|
00000130: 54 3D 24 42 44 43 44 00 22 21 19 00 2E 45 51 20 |T=$BDCD."!...EQ |
00000140: 49 4E 4B 45 59 3D 24 46 46 45 34 00 37 21 1A 00 |INKEY=$FFE4.7!..|
00000150: 2E 45 51 20 4C 49 53 54 45 4E 3D 24 46 46 42 31 |.EQ LISTEN=$FFB1|
00000160: 00 4C 21 1B 00 2E 45 51 20 55 4E 4C 49 53 54 3D |.L!...EQ UNLIST=|
00000170: 24 46 46 41 45 00 5F 21 1C 00 2E 45 51 20 54 41 |$FFAE._!...EQ TA|
00000180: 4C 4B 3D 24 46 46 42 34 00 74 21 1D 00 2E 45 51 |LK=$FFB4.t!...EQ|
00000190: 20 55 4E 54 41 4C 4B 3D 24 46 46 41 42 00 88 21 | UNTALK=$FFAB..!|
000001A0: 1E 00 2E 45 51 20 49 45 43 49 4E 3D 24 46 46 41 |...EQ IECIN=$FFA|
000001B0: 35 00 9D 21 1F 00 2E 45 51 20 49 45 43 4F 55 54 |5..!...EQ IECOUT|
000001C0: 3D 24 46 46 41 38 00 B2 21 20 00 2E 45 51 20 53 |=$FFA8..! ..EQ S|
000001D0: 45 43 54 4C 4B 3D 24 46 46 39 36 00 C7 21 21 00 |ECTLK=$FF96..!!.|
000001E0: 2E 45 51 20 53 45 43 4C 53 54 3D 24 46 46 39 33 |.EQ SECLST=$FF93|
000001F0: 00 CD 21 28 00 3B 00 E3 21 29 00 2E 45 51 20 46 |..!(.;..!)..EQ F|
00000200: 49 4C 45 4D 45 4D 3D 24 35 30 30 30 00 F6 21 2A |ILEMEM=$5000..!*|
00000210: 00 2E 45 51 20 4E 41 4D 45 3D 24 30 33 33 34 00 |..EQ NAME=$0334.|
00000220: 1B 22 50 00 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |."P.;***********|
00000230: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000240: 2A 2A 2A 2A 00 37 22 5A 00 2E 42 59 20 24 30 42 |****.7"Z..BY $0B|
00000250: 2C 24 30 38 2C 24 30 41 2C 24 30 30 2C 24 39 45 |,$08,$0A,$00,$9E|
00000260: 00 46 22 5B 00 2E 54 58 20 22 32 30 36 31 22 00 |.F"[..TX "2061".|
00000270: 54 22 5C 00 2E 42 59 20 30 2C 30 2C 30 00 79 22 |T"\..BY 0,0,0.y"|
00000280: 5F 00 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |_.;*************|
00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002A0: 2A 2A 00 89 22 64 00 4D 41 49 4E 20 4C 44 41 23 |**.."d.MAIN LDA#|
000002B0: 30 30 00 97 22 6E 00 20 53 54 41 35 33 32 38 30 |00.."n. STA53280|
000002C0: 00 A3 22 78 00 20 4C 44 41 23 31 31 00 B1 22 82 |.."x. LDA#11..".|
000002D0: 00 20 53 54 41 35 33 32 38 31 00 C3 22 8C 00 20 |. STA53281..".. |
000002E0: 4C 44 41 23 3C 28 54 45 58 54 31 29 00 D5 22 96 |LDA#<(TEXT1)..".|
000002F0: 00 20 4C 44 59 23 3E 28 54 45 58 54 31 29 00 E4 |. LDY#>(TEXT1)..|
00000300: 22 A0 00 20 4A 53 52 53 54 52 4F 55 54 00 EA 22 |".. JSRSTROUT.."|
00000310: AA 00 3B 00 FC 22 B4 00 4D 4C 4F 4F 50 35 20 4C |..;.."..MLOOP5 L|
00000320: 44 41 23 30 30 00 0B 23 BE 00 20 4A 53 52 53 45 |DA#00..#.. JSRSE|
00000330: 54 4E 41 4D 00 17 23 C8 00 20 4C 44 41 23 30 31 |TNAM..#.. LDA#01|
00000340: 00 23 23 D2 00 20 4C 44 58 23 30 38 00 30 23 DC |.##.. LDX#08.0#.|
00000350: 00 20 4C 44 59 23 24 36 46 00 3F 23 E6 00 20 4A |. LDY#$6F.?#.. J|
00000360: 53 52 53 45 54 50 41 52 00 4C 23 F0 00 20 4A 53 |SRSETPAR.L#.. JS|
00000370: 52 4F 50 45 4E 00 52 23 FA 00 3B 00 5E 23 04 01 |ROPEN.R#..;.^#..|
00000380: 20 4C 44 41 23 30 31 00 71 23 0E 01 20 4C 44 58 | LDA#01.q#.. LDX|
00000390: 23 3C 28 42 55 46 4E 41 4D 29 00 84 23 18 01 20 |#<(BUFNAM)..#.. |
000003A0: 4C 44 59 23 3E 28 42 55 46 4E 41 4D 29 00 93 23 |LDY#>(BUFNAM)..#|
000003B0: 22 01 20 4A 53 52 53 45 54 4E 41 4D 00 9F 23 2C |". JSRSETNAM..#,|
000003C0: 01 20 4C 44 41 23 30 32 00 AB 23 36 01 20 4C 44 |. LDA#02..#6. LD|
000003D0: 58 23 30 38 00 B8 23 40 01 20 4C 44 59 23 24 36 |X#08..#@. LDY#$6|
000003E0: 32 00 C7 23 4A 01 20 4A 53 52 53 45 54 50 41 52 |2..#J. JSRSETPAR|
000003F0: 00 D4 23 54 01 20 4A 53 52 4F 50 45 4E 00 DD 23 |..#T. JSROPEN..#|
00000400: 5E 01 3B 2A 2A 2A 00 EE 23 68 01 20 4C 44 41 23 |^.;***..#h. LDA#|
00000410: 3C 28 43 4F 4D 31 29 00 FF 23 72 01 20 4C 44 59 |<(COM1)..#r. LDY|
00000420: 23 3E 28 43 4F 4D 31 29 00 0F 24 7C 01 20 4A 53 |#>(COM1)..$|. JS|
00000430: 52 53 45 4E 44 43 4F 4D 00 20 24 86 01 20 4C 44 |RSENDCOM. $.. LD|
00000440: 41 23 3C 28 43 4F 4D 32 29 00 31 24 90 01 20 4C |A#<(COM2).1$.. L|
00000450: 44 59 23 3E 28 43 4F 4D 32 29 00 41 24 9A 01 20 |DY#>(COM2).A$.. |
00000460: 4A 53 52 53 45 4E 44 43 4F 4D 00 47 24 A4 01 3B |JSRSENDCOM.G$..;|
00000470: 00 53 24 AE 01 20 4C 44 41 23 30 38 00 60 24 B8 |.S$.. LDA#08.`$.|
00000480: 01 20 4A 53 52 54 41 4C 4B 00 6D 24 C2 01 20 4C |. JSRTALK.m$.. L|
00000490: 44 41 23 24 36 32 00 7C 24 CC 01 20 4A 53 52 53 |DA#$62.|$.. JSRS|
000004A0: 45 43 54 4C 4B 00 82 24 D6 01 3B 00 8E 24 E0 01 |ECTLK..$..;..$..|
000004B0: 20 4C 44 41 23 33 34 00 9A 24 EA 01 20 53 54 41 | LDA#34..$.. STA|
000004C0: 24 30 33 00 A7 24 F4 01 20 4C 44 41 23 31 36 33 |$03..$.. LDA#163|
000004D0: 00 B8 24 FE 01 20 53 54 41 4D 4C 4F 4F 50 33 2B |..$.. STAMLOOP3+|
000004E0: 31 00 BE 24 08 02 3B 00 D1 24 12 02 4D 4C 4F 4F |1..$..;..$..MLOO|
000004F0: 50 33 20 4C 44 58 23 31 36 33 00 DD 24 1C 02 20 |P3 LDX#163..$.. |
00000500: 4C 44 59 23 30 34 00 E9 24 26 02 20 53 54 58 24 |LDY#04..$&. STX$|
00000510: 46 42 00 F5 24 30 02 20 53 54 59 24 46 43 00 06 |FB..$0. STY$FC..|
00000520: 25 3A 02 20 49 4E 43 4D 4C 4F 4F 50 33 2B 31 00 |%:. INCMLOOP3+1.|
00000530: 0C 25 44 02 3B 00 1A 25 4E 02 20 4A 53 52 49 45 |.%D.;..%N. JSRIE|
00000540: 43 49 4E 00 28 25 58 02 20 4A 53 52 49 45 43 49 |CIN.(%X. JSRIECI|
00000550: 4E 00 39 25 62 02 20 4A 53 52 42 59 54 45 4F 55 |N.9%b. JSRBYTEOU|
00000560: 54 31 00 47 25 6C 02 20 4A 53 52 49 45 43 49 4E |T1.G%l. JSRIECIN|
00000570: 00 58 25 76 02 20 4A 53 52 42 59 54 45 4F 55 54 |.X%v. JSRBYTEOUT|
00000580: 31 00 66 25 80 02 20 4A 53 52 49 45 43 49 4E 00 |1.f%.. JSRIECIN.|
00000590: 72 25 8A 02 20 4C 44 59 24 30 33 00 83 25 94 02 |r%.. LDY$03..%..|
000005A0: 20 4C 44 58 53 45 43 54 41 42 2C 59 00 94 25 9E | LDXSECTAB,Y..%.|
000005B0: 02 20 4A 53 52 42 59 54 45 4F 55 54 32 00 9A 25 |. JSRBYTEOUT2..%|
000005C0: A8 02 3B 00 A6 25 B2 02 20 44 45 43 24 30 33 00 |..;..%.. DEC$03.|
000005D0: B5 25 BC 02 20 42 50 4C 4D 4C 4F 4F 50 33 00 BB |.%.. BPLMLOOP3..|
000005E0: 25 C6 02 3B 00 C7 25 D0 02 20 4C 44 41 23 30 38 |%..;..%.. LDA#08|
000005F0: 00 D6 25 DA 02 20 4A 53 52 55 4E 54 41 4C 4B 00 |..%.. JSRUNTALK.|
00000600: E2 25 E4 02 20 4C 44 41 23 30 32 00 F0 25 EE 02 |.%.. LDA#02..%..|
00000610: 20 4A 53 52 43 4C 4F 53 45 00 FC 25 F8 02 20 4C | JSRCLOSE..%.. L|
00000620: 44 41 23 30 31 00 0A 26 02 03 20 4A 53 52 43 4C |DA#01..&.. JSRCL|
00000630: 4F 53 45 00 10 26 0C 03 3B 00 24 26 16 03 4D 4C |OSE..&..;.$&..ML|
00000640: 4F 4F 50 34 20 4A 53 52 49 4E 4B 45 59 00 33 26 |OOP4 JSRINKEY.3&|
00000650: 20 03 20 42 45 51 4D 4C 4F 4F 50 34 00 39 26 2A | . BEQMLOOP4.9&*|
00000660: 03 3B 00 46 26 34 03 20 43 4D 50 23 22 5F 22 00 |.;.F&4. CMP#"_".|
00000670: 52 26 3E 03 20 42 45 51 45 4E 44 00 61 26 48 03 |R&>. BEQEND.a&H.|
00000680: 20 4A 4D 50 4D 4C 4F 4F 50 35 00 72 26 52 03 45 | JMPMLOOP5.r&R.E|
00000690: 4E 44 20 4A 4D 50 24 45 35 34 34 00 97 26 5C 03 |ND JMP$E544..&\.|
000006A0: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
000006B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000006C0: 00 A9 26 66 03 53 54 52 4F 55 54 20 53 54 41 24 |..&f.STROUT STA$|
000006D0: 46 42 00 B5 26 70 03 20 53 54 59 24 46 43 00 C1 |FB..&p. STY$FC..|
000006E0: 26 7A 03 20 4C 44 59 23 30 30 00 D8 26 84 03 53 |&z. LDY#00..&..S|
000006F0: 4F 4C 4F 4F 50 31 20 4C 44 41 28 24 46 42 29 2C |OLOOP1 LDA($FB),|
00000700: 59 00 E6 26 8E 03 20 42 45 51 53 4F 45 4E 44 00 |Y..&.. BEQSOEND.|
00000710: F4 26 98 03 20 4A 53 52 42 53 4F 55 54 00 FD 26 |.&.. JSRBSOUT..&|
00000720: A2 03 20 49 4E 59 00 0D 27 AC 03 20 42 4E 45 53 |.. INY..'.. BNES|
00000730: 4F 4C 4F 4F 50 31 00 19 27 B6 03 20 49 4E 43 24 |OLOOP1..'.. INC$|
00000740: 46 43 00 29 27 C0 03 20 4A 4D 50 53 4F 4C 4F 4F |FC.)'.. JMPSOLOO|
00000750: 50 31 00 37 27 CA 03 53 4F 45 4E 44 20 52 54 53 |P1.7'..SOEND RTS|
00000760: 00 5C 27 D4 03 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.\'..;**********|
00000770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000780: 2A 2A 2A 2A 2A 00 6F 27 DE 03 53 45 4E 44 43 4F |*****.o'..SENDCO|
00000790: 4D 20 53 54 41 24 46 42 00 7B 27 E8 03 20 53 54 |M STA$FB.{'.. ST|
000007A0: 59 24 46 43 00 81 27 F2 03 3B 00 8D 27 FC 03 20 |Y$FC..'..;..'.. |
000007B0: 4C 44 41 23 30 38 00 9C 27 06 04 20 4A 53 52 4C |LDA#08..'.. JSRL|
000007C0: 49 53 54 45 4E 00 A9 27 10 04 20 4C 44 41 23 24 |ISTEN..'.. LDA#$|
000007D0: 36 46 00 B8 27 1A 04 20 4A 53 52 53 45 43 4C 53 |6F..'.. JSRSECLS|
000007E0: 54 00 BE 27 24 04 3B 00 CA 27 2E 04 20 4C 44 59 |T..'$.;..'.. LDY|
000007F0: 23 30 30 00 E1 27 38 04 53 43 4C 4F 4F 50 31 20 |#00..'8.SCLOOP1 |
00000800: 4C 44 41 28 24 46 42 29 2C 59 00 ED 27 42 04 20 |LDA($FB),Y..'B. |
00000810: 42 45 51 53 43 31 00 FC 27 4C 04 20 4A 53 52 49 |BEQSC1..'L. JSRI|
00000820: 45 43 4F 55 54 00 05 28 56 04 20 49 4E 59 00 15 |ECOUT..(V. INY..|
00000830: 28 60 04 20 42 4E 45 53 43 4C 4F 4F 50 31 00 21 |(`. BNESCLOOP1.!|
00000840: 28 6A 04 20 49 4E 43 24 46 43 00 31 28 74 04 20 |(j. INC$FC.1(t. |
00000850: 4A 4D 50 53 43 4C 4F 4F 50 31 00 37 28 7E 04 3B |JMPSCLOOP1.7(~.;|
00000860: 00 46 28 88 04 53 43 31 20 4C 44 41 23 30 38 00 |.F(..SC1 LDA#08.|
00000870: 55 28 92 04 20 4A 4D 50 55 4E 4C 49 53 54 00 7A |U(.. JMPUNLIST.z|
00000880: 28 9C 04 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |(..;************|
00000890: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008A0: 2A 2A 2A 00 8E 28 A6 04 42 59 54 45 4F 55 54 31 |***..(..BYTEOUT1|
000008B0: 20 4C 44 58 23 30 37 00 94 28 B0 04 3B 00 A8 28 | LDX#07..(..;..(|
000008C0: BA 04 42 59 54 45 4F 55 54 32 20 53 54 41 24 30 |..BYTEOUT2 STA$0|
000008D0: 32 00 B4 28 C4 04 20 4C 44 59 23 30 30 00 BA 28 |2..(.. LDY#00..(|
000008E0: CE 04 3B 00 CD 28 D8 04 42 4F 4C 4F 4F 50 31 20 |..;..(..BOLOOP1 |
000008F0: 4C 44 41 23 34 36 00 D9 28 E2 04 20 52 4F 52 24 |LDA#46..(.. ROR$|
00000900: 30 32 00 E5 28 EC 04 20 42 43 53 42 4F 31 00 F1 |02..(.. BCSBO1..|
00000910: 28 F6 04 20 4C 44 41 23 31 35 00 04 29 00 05 42 |(.. LDA#15..)..B|
00000920: 4F 31 20 53 54 41 28 24 46 42 29 2C 59 00 0A 29 |O1 STA($FB),Y..)|
00000930: 0A 05 3B 00 16 29 14 05 20 4C 44 41 23 34 30 00 |..;..).. LDA#40.|
00000940: 1F 29 1E 05 20 43 4C 43 00 2B 29 28 05 20 41 44 |.).. CLC.+)(. AD|
00000950: 43 24 46 42 00 37 29 32 05 20 42 43 43 42 4F 32 |C$FB.7)2. BCCBO2|
00000960: 00 43 29 3C 05 20 49 4E 43 24 46 43 00 52 29 46 |.C)<. INC$FC.R)F|
00000970: 05 42 4F 32 20 53 54 41 24 46 42 00 58 29 50 05 |.BO2 STA$FB.X)P.|
00000980: 3B 00 61 29 5A 05 20 44 45 58 00 71 29 64 05 20 |;.a)Z. DEX.q)d. |
00000990: 42 50 4C 42 4F 4C 4F 4F 50 31 00 7A 29 6E 05 20 |BPLBOLOOP1.z)n. |
000009A0: 52 54 53 00 9F 29 78 05 3B 2A 2A 2A 2A 2A 2A 2A |RTS..)x.;*******|
000009B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009C0: 2A 2A 2A 2A 2A 2A 2A 2A 00 B5 29 82 05 54 45 58 |********..)..TEX|
000009D0: 54 31 20 2E 54 58 22 9A 93 08 0E 12 99 22 00 E8 |T1 .TX"......"..|
000009E0: 29 8C 05 2E 54 58 20 22 D3 48 4F 57 C2 C1 CD 20 |)...TX ".HOW... |
000009F0: D6 31 2E 30 20 2D 20 57 52 49 54 54 45 4E 20 31 |.1.0 - WRITTEN 1|
00000A00: 39 39 32 20 42 59 20 D5 2E C2 41 53 54 45 52 53 |992 BY ...ASTERS|
00000A10: 22 00 1C 2A 96 05 2E 54 58 22 D0 52 4F 47 52 41 |"..*...TX".ROGRA|
00000A20: 4D 4D 2D C2 45 49 53 50 49 45 4C 20 5A 55 4D 20 |MM-.EISPIEL ZUM |
00000A30: C6 4C 4F 50 50 59 2D CB 55 52 53 20 D4 45 49 4C |.LOPPY-.URS .EIL|
00000A40: 20 38 92 9B 22 00 4D 2A A0 05 2E 54 58 20 22 20 | 8..".M*...TX " |
00000A50: 20 20 30 30 30 30 30 30 30 30 30 30 31 31 31 31 | 00000000001111|
00000A60: 31 31 31 31 31 31 32 32 32 32 32 32 32 32 32 32 |1111112222222222|
00000A70: 33 33 33 33 33 22 00 58 2A AA 05 2E 42 59 20 31 |33333".X*...BY 1|
00000A80: 33 00 89 2A B4 05 2E 54 58 20 22 20 20 20 31 32 |3..*...TX " 12|
00000A90: 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 |3456789012345678|
00000AA0: 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 |9012345678901234|
00000AB0: 35 22 00 94 2A BE 05 2E 42 59 20 31 33 00 AB 2A |5"..*...BY 13..*|
00000AC0: C8 05 2E 42 59 20 22 20 22 2C 22 30 22 2C 22 31 |...BY " ","0","1|
00000AD0: 22 2C 31 33 00 C2 2A D2 05 2E 42 59 20 22 20 22 |",13..*...BY " "|
00000AE0: 2C 22 30 22 2C 22 32 22 2C 31 33 00 D9 2A DC 05 |,"0","2",13..*..|
00000AF0: 2E 42 59 20 22 20 22 2C 22 30 22 2C 22 33 22 2C |.BY " ","0","3",|
00000B00: 31 33 00 F0 2A E6 05 2E 42 59 20 22 20 22 2C 22 |13..*...BY " ","|
00000B10: 30 22 2C 22 34 22 2C 31 33 00 07 2B F0 05 2E 42 |0","4",13..+...B|
00000B20: 59 20 22 20 22 2C 22 30 22 2C 22 35 22 2C 31 33 |Y " ","0","5",13|
00000B30: 00 1E 2B FA 05 2E 42 59 20 22 20 22 2C 22 30 22 |..+...BY " ","0"|
00000B40: 2C 22 36 22 2C 31 33 00 35 2B 04 06 2E 42 59 20 |,"6",13.5+...BY |
00000B50: 22 20 22 2C 22 30 22 2C 22 37 22 2C 31 33 00 4C |" ","0","7",13.L|
00000B60: 2B 0E 06 2E 42 59 20 22 20 22 2C 22 30 22 2C 22 |+...BY " ","0","|
00000B70: 38 22 2C 31 33 00 63 2B 18 06 2E 42 59 20 22 20 |8",13.c+...BY " |
00000B80: 22 2C 22 30 22 2C 22 39 22 2C 31 33 00 7A 2B 22 |","0","9",13.z+"|
00000B90: 06 2E 42 59 20 22 20 22 2C 22 31 22 2C 22 30 22 |..BY " ","1","0"|
00000BA0: 2C 31 33 00 91 2B 2C 06 2E 42 59 20 22 20 22 2C |,13..+,..BY " ",|
00000BB0: 22 31 22 2C 22 31 22 2C 31 33 00 A8 2B 36 06 2E |"1","1",13..+6..|
00000BC0: 42 59 20 22 20 22 2C 22 31 22 2C 22 32 22 2C 31 |BY " ","1","2",1|
00000BD0: 33 00 BF 2B 40 06 2E 42 59 20 22 20 22 2C 22 31 |3..+@..BY " ","1|
00000BE0: 22 2C 22 33 22 2C 31 33 00 D6 2B 4A 06 2E 42 59 |","3",13..+J..BY|
00000BF0: 20 22 20 22 2C 22 31 22 2C 22 34 22 2C 31 33 00 | " ","1","4",13.|
00000C00: ED 2B 54 06 2E 42 59 20 22 20 22 2C 22 31 22 2C |.+T..BY " ","1",|
00000C10: 22 35 22 2C 31 33 00 04 2C 5E 06 2E 42 59 20 22 |"5",13..,^..BY "|
00000C20: 20 22 2C 22 31 22 2C 22 36 22 2C 31 33 00 1B 2C | ","1","6",13..,|
00000C30: 68 06 2E 42 59 20 22 20 22 2C 22 31 22 2C 22 37 |h..BY " ","1","7|
00000C40: 22 2C 31 33 00 32 2C 72 06 2E 42 59 20 22 20 22 |",13.2,r..BY " "|
00000C50: 2C 22 31 22 2C 22 38 22 2C 31 33 00 49 2C 7C 06 |,"1","8",13.I,|.|
00000C60: 2E 42 59 20 22 20 22 2C 22 31 22 2C 22 39 22 2C |.BY " ","1","9",|
00000C70: 31 33 00 7F 2C 86 06 2E 54 58 20 22 20 32 30 9A |13..,...TX " 20.|
00000C80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C90: 20 20 20 20 20 20 9E 27 CB 45 59 27 20 4E 45 58 | .'.EY' NEX|
00000CA0: 54 20 44 49 53 4B 9B 22 00 AE 2C 90 06 2E 54 58 |T DISK."..,...TX|
00000CB0: 20 22 20 32 31 9A 20 20 20 20 20 20 20 20 20 20 | " 21. |
00000CC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 9E 27 | .'|
00000CD0: 5F 27 20 C5 4E 44 22 00 B8 2C 9A 06 2E 42 59 20 |_' .ND"..,...BY |
00000CE0: 30 00 CA 2C A4 06 42 55 46 4E 41 4D 20 2E 54 58 |0..,..BUFNAM .TX|
00000CF0: 22 23 22 00 E4 2C AE 06 43 4F 4D 31 20 2E 54 58 |"#"..,..COM1 .TX|
00000D00: 22 55 31 20 32 20 30 20 31 38 20 30 22 00 F1 2C |"U1 2 0 18 0"..,|
00000D10: B8 06 20 2E 42 59 31 33 2C 30 00 07 2D C2 06 43 |.. .BY13,0..-..C|
00000D20: 4F 4D 32 20 2E 54 58 22 42 2D 50 20 32 20 34 22 |OM2 .TX"B-P 2 4"|
00000D30: 00 14 2D CC 06 20 2E 42 59 31 33 2C 30 00 36 2D |..-.. .BY13,0.6-|
00000D40: D6 06 53 45 43 54 41 42 20 2E 42 59 30 2C 30 2C |..SECTAB .BY0,0,|
00000D50: 30 2C 30 2C 30 2C 31 2C 31 2C 31 2C 31 2C 31 00 |0,0,0,1,1,1,1,1.|
00000D60: 52 2D E0 06 20 2E 42 59 31 2C 32 2C 32 2C 32 2C |R-.. .BY1,2,2,2,|
00000D70: 32 2C 32 2C 32 2C 32 2C 34 2C 34 00 6E 2D EA 06 |2,2,2,2,4,4.n-..|
00000D80: 20 2E 42 59 34 2C 34 2C 34 2C 34 2C 34 2C 34 2C | .BY4,4,4,4,4,4,|
00000D90: 34 2C 34 2C 34 2C 34 00 80 2D F4 06 20 2E 42 59 |4,4,4,4..-.. .BY|
00000DA0: 34 2C 34 2C 34 2C 34 2C 34 00 00 00 |4,4,4,4,4... |
X.....;*******************************..
...BA $9000.. ...EQ STATUS=$90.3 ...EQ
SETPAR=$FFBA.H ...EQ SETNAM=$FFBD.[ ...E
Q OPEN=$FFC0.O ...EQ CLOSE=$FFC3.. ...EQ
CHKIN=$FFC6.. ...EQ CLRCH=$FFCC.. ...EQ
BASIN=$FFCF.. ...EQ BSOUT=$FFD2.R ...EQ
LOAD=$FFD5.. ...EQ SAVE=$FFD8.. ...EQ C
KOUT=$FFC9..!...EQ INTOUT=$BDCD."!...EQ
INKEY=$FFE4.7!...EQ LISTEN=$FFB1.L!...EQ
UNLIST=$FFAE._!...EQ TALK=$FFB4.T!...EQ
UNTALK=$FFAB..!...EQ IECIN=$FFA5..!...E
Q IECOUT=$FFA8..! ..EQ SECTLK=$FF96.G!!.
.EQ SECLST=$FF93.M!(.;..!)..EQ FILEMEM=$
5000..!*..EQ NAME=$0334.."P.;***********
********************.7"Z..BY $0B,$08,$0A
,$00,$9E.F"[..TX "2061".T"\..BY 0,0,0.Y"
_.;*******************************.."D.M
AIN LDA#00.."N. STA53280.."X. LDA#11..".
. STA53281.C".. LDA#<(TEXT1).U".. LDY#>(
TEXT1).." . JSRSTROUT.."..;.."..MLOOP5 L
DA#00..#.. JSRSETNAM..#H. LDA#01.##R. LD
X#08.0#.. LDY#$6F.?#.. JSRSETPAR.L#.. JS
ROPEN.R#..;.^#.. LDA#01.Q#.. LDX#<(BUFNA
M)..#.. LDY#>(BUFNAM)..#". JSRSETNAM..#,
. LDA#02..#6. LDX#08..#@. LDY#$62.G#J. J
SRSETPAR.T#T. JSROPEN..#^.;***..#H. LDA#
<(COM1)..#R. LDY#>(COM1)..$|. JSRSENDCOM
. $.. LDA#<(COM2).1$.. LDY#>(COM2).A$..
JSRSENDCOM.G$..;.S$.. LDA#08.`$.. JSRTAL
K.M$B. LDA#$62.|$L. JSRSECTLK..$V.;..$..
LDA#34..$.. STA$03..$.. LDA#163..$.. ST
AMLOOP3+1..$..;.Q$..MLOOP3 LDX#163..$..
LDY#04..$&. STX$FB..$0. STY$FC..%:. INCM
LOOP3+1..%D.;..%N. JSRIECIN.(%X. JSRIECI
N.9%B. JSRBYTEOUT1.G%L. JSRIECIN.X%V. JS
RBYTEOUT1.F%.. JSRIECIN.R%.. LDY$03..%..
LDXSECTAB,Y..%.. JSRBYTEOUT2..%..;..%..
DEC$03..%.. BPLMLOOP3..%F.;.G%P. LDA#08
.V%Z. JSRUNTALK..%.. LDA#02..%.. JSRCLOS
E..%.. LDA#01..&.. JSRCLOSE..&..;.$&..ML
OOP4 JSRINKEY.3& . BEQMLOOP4.9&*.;.F&4.
CMP#"_".R&>. BEQEND.A&H. JMPMLOOP5.R&R.E
ND JMP$E544..&\.;***********************
********..&F.STROUT STA$FB..&P. STY$FC.A
&Z. LDY#00.X&..SOLOOP1 LDA($FB),Y..&.. B
EQSOEND..&.. JSRBSOUT..&.. INY..'.. BNES
OLOOP1..'.. INC$FC.)'.. JMPSOLOOP1.7'J.S
OEND RTS.\'T.;**************************
*****.O'..SENDCOM STA$FB.{'.. STY$FC..'.
.;..'.. LDA#08..'.. JSRLISTEN..'.. LDA#$
6F..'.. JSRSECLST..'$.;.J'.. LDY#00..'8.
SCLOOP1 LDA($FB),Y..'B. BEQSC1..'L. JSRI
ECOUT..(V. INY..(`. BNESCLOOP1.!(J. INC$
FC.1(T. JMPSCLOOP1.7(~.;.F(..SC1 LDA#08.
U(.. JMPUNLIST.Z(..;********************
***********..(..BYTEOUT1 LDX#07..(..;..(
..BYTEOUT2 STA$02..(D. LDY#00..(N.;.M(X.
BOLOOP1 LDA#46.Y(.. ROR$02..(.. BCSBO1..
(.. LDA#15..)..BO1 STA($FB),Y..)..;..)..
LDA#40..).. CLC.+)(. ADC$FB.7)2. BCCBO2
.C)<. INC$FC.R)F.BO2 STA$FB.X)P.;.A)Z. D
EX.Q)D. BPLBOLOOP1.Z)N. RTS..)X.;*******
************************..)..TEXT1 .TX".
....."..)...TX "SHOWBAM V1.0 - WRITTEN 1
992 BY U.BASTERS"..*...TX"PROGRAMM-BEISP
IEL ZUM FLOPPY-KURS TEIL 8..".M* ..TX "
00000000001111111111222222222233333".X
*...BY 13..*...TX " 123456789012345678
90123456789012345"..*...BY 13..*H..BY "
","0","1",13.B*R..BY " ","0","2",13.Y*..
.BY " ","0","3",13..*...BY " ","0","4",1
3..+...BY " ","0","5",13..+...BY " ","0"
,"6",13.5+...BY " ","0","7",13.L+...BY "
","0","8",13.C+...BY " ","0","9",13.Z+"
..BY " ","1","0",13..+,..BY " ","1","1",
13..+6..BY " ","1","2",13..+@..BY " ","1
","3",13.V+J..BY " ","1","4",13..+T..BY
" ","1","5",13..,^..BY " ","1","6",13..,
H..BY " ","1","7",13.2,R..BY " ","1","8"
,13.I,|..BY " ","1","9",13.,...TX " 20.
.'KEY' NEXT DISK."
..,...TX " 21. .'
_' END"..,...BY 0.J,..BUFNAM .TX"#"..,..
COM1 .TX"U1 2 0 18 0"..,.. .BY13,0..-B.C
OM2 .TX"B-P 2 4"..-L. .BY13,0.6-V.SECTAB
.BY0,0,0,0,0,1,1,1,1,1.R-.. .BY1,2,2,2,
2,2,2,2,4,4.N-.. .BY4,4,4,4,4,4,4,4,4,4.
.-.. .BY4,4,4,4,4...
> CLICK IMAGE PREVIEW FOR FULL MODAL