DISPLAY BAM-1541
FILE INFORMATION
FILENAME(S): DISPLAY BAM-1541
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 21:23:31
APPEARS ON: 1 disk(s)
FILE HASH
b92a6a6424f37455f81c84c837e1b232cec36f49583d46616e0fef622d43d137
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 43 1 | DISPLAY BAM-1541 | PRG | DuncanTwain | 14 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2B 08 64 00 8F 20 44 49 53 50 4C 41 59 20 |..+.d.. DISPLAY |
00000010: 41 20 42 4C 4F 43 4B 20 41 56 41 49 4C 49 54 59 |A BLOCK AVAILITY|
00000020: 20 4D 41 50 20 2D 20 31 35 34 31 00 37 08 6E 00 | MAP - 1541.7.n.|
00000030: 86 4E 24 28 31 36 29 00 5D 08 78 00 96 A5 53 28 |.N$(16).].x...S(|
00000040: 49 29 B2 32 AE 28 53 AB B5 28 53 AD 38 29 AC 38 |I).2.(S..(S.8).8|
00000050: 29 AF 28 42 28 B5 28 53 AD 38 29 29 29 00 7A 08 |).(B(.(S.8))).z.|
00000060: 82 00 99 22 93 44 49 53 50 4C 41 59 20 41 20 42 |...".DISPLAY A B|
00000070: 41 4D 20 2D 20 31 35 34 31 22 00 9B 08 8C 00 99 |AM - 1541"......|
00000080: 22 11 49 4E 53 45 52 54 20 44 49 53 4B 45 54 54 |".INSERT DISKETT|
00000090: 45 20 49 4E 20 44 52 49 56 45 22 00 BE 08 96 00 |E IN DRIVE".....|
000000A0: 99 22 11 50 52 45 53 53 20 12 52 45 54 55 52 4E |.".PRESS .RETURN|
000000B0: 92 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 D1 |. TO CONTINUE"..|
000000C0: 08 A0 00 A1 43 24 3A 8B 43 24 B2 22 22 A7 31 36 |....C$:.C$."".16|
000000D0: 30 00 E4 08 AA 00 8B 43 24 B3 B1 C7 28 31 33 29 |0......C$...(13)|
000000E0: 89 31 36 30 00 EE 08 B4 00 99 22 4F 4B 22 00 FB |.160......"OK"..|
000000F0: 08 BE 00 9F 31 35 2C 38 2C 31 35 00 08 09 C8 00 |....15,8,15.....|
00000100: 98 31 35 2C 22 49 30 22 00 20 09 D2 00 84 31 35 |.15,"I0". ....15|
00000110: 2C 45 4E 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 |,EN$,EM$,ET$,ES$|
00000120: 00 44 09 DC 00 8B 45 4E 24 B2 22 30 30 22 B0 45 |.D....EN$."00".E|
00000130: 4E 24 B2 22 32 32 22 B0 45 4E 24 B2 22 32 33 22 |N$."22".EN$."23"|
00000140: 89 32 36 30 00 65 09 E6 00 99 22 11 22 45 4E 24 |.260.e...."."EN$|
00000150: 22 2C 20 20 22 45 4D 24 22 2C 22 45 54 24 22 2C |", "EM$","ET$",|
00000160: 22 45 53 24 22 00 6D 09 F0 00 9C 31 35 00 73 09 |"ES$".m....15.s.|
00000170: FA 00 80 00 82 09 04 01 9F 32 2C 38 2C 32 2C 22 |.........2,8,2,"|
00000180: 23 22 00 98 09 0E 01 98 31 35 2C 22 55 31 22 3B |#"......15,"U1";|
00000190: 32 3B 30 3B 31 38 3B 30 00 B0 09 18 01 84 31 35 |2;0;18;0......15|
000001A0: 2C 45 4E 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 |,EN$,EM$,ET$,ES$|
000001B0: 00 BE 09 22 01 8F 20 47 45 54 20 44 4F 53 00 D0 |...".. GET DOS..|
000001C0: 09 2C 01 98 31 35 2C 22 42 2D 50 22 3B 32 3B 32 |.,..15,"B-P";2;2|
000001D0: 00 DB 09 36 01 A1 23 32 2C 42 24 00 EE 09 40 01 |...6..#2,B$...@.|
000001E0: 8B 42 24 B2 22 22 A7 42 24 B2 C7 28 30 29 00 FC |.B$."".B$..(0)..|
000001F0: 09 4A 01 44 4F 53 B2 C6 28 42 24 29 00 19 0A 54 |.J.DOS..(B$)...T|
00000200: 01 8B 44 4F 53 B2 36 35 A7 44 4F 53 24 B2 22 56 |..DOS.65.DOS$."V|
00000210: 32 2E 36 22 3A 89 33 38 30 00 35 0A 5E 01 8B 44 |2.6":.380.5.^..D|
00000220: 4F 53 B2 31 A7 44 4F 53 24 B2 22 56 31 2E 32 22 |OS.1.DOS$."V1.2"|
00000230: 3A 89 33 38 30 00 45 0A 68 01 44 4F 53 24 B2 22 |:.380.E.h.DOS$."|
00000240: 56 3F 2E 3F 22 00 5B 0A 72 01 8F 20 47 45 54 20 |V?.?".[.r.. GET |
00000250: 42 4C 4F 43 4B 53 20 46 52 45 45 00 64 0A 7C 01 |BLOCKS FREE.d.|.|
00000260: 42 46 B2 30 00 6C 0A 86 01 42 B2 34 00 78 0A 90 |BF.0.l...B.4.x..|
00000270: 01 81 49 B2 31 A4 33 35 00 8E 0A 9A 01 8B 49 B2 |..I.1.35......I.|
00000280: 31 38 A7 49 B2 49 AA 31 3A 42 B2 42 AA 34 00 A0 |18.I.I.1:B.B.4..|
00000290: 0A A4 01 98 31 35 2C 22 42 2D 50 22 3B 32 3B 42 |....15,"B-P";2;B|
000002A0: 00 AB 0A AE 01 A1 23 32 2C 42 24 00 BE 0A B8 01 |......#2,B$.....|
000002B0: 8B 42 24 B2 22 22 A7 42 24 B2 C7 28 30 29 00 CA |.B$."".B$..(0)..|
000002C0: 0A C2 01 41 B2 C6 28 42 24 29 00 D6 0A CC 01 42 |...A..(B$).....B|
000002D0: 46 B2 42 46 AA 41 00 E0 0A D6 01 42 B2 42 AA 34 |F.BF.A.....B.B.4|
000002E0: 00 E7 0A E0 01 82 49 00 FB 0A EA 01 8F 20 47 45 |......I...... GE|
000002F0: 54 20 44 49 53 4B 20 4E 41 4D 45 00 0F 0B F4 01 |T DISK NAME.....|
00000300: 98 31 35 2C 22 42 2D 50 22 3B 32 3B 31 34 34 00 |.15,"B-P";2;144.|
00000310: 1B 0B FE 01 81 49 B2 31 A4 31 36 00 25 0B 08 02 |.....I.1.16.%...|
00000320: 8D 31 31 34 30 00 34 0B 12 02 4E 24 28 31 29 B2 |.1140.4...N$(1).|
00000330: C7 28 41 29 00 3B 0B 1C 02 82 49 00 51 0B 26 02 |.(A).;....I.Q.&.|
00000340: 8F 20 47 45 54 20 43 4F 53 4D 45 54 49 43 20 49 |. GET COSMETIC I|
00000350: 44 00 5C 0B 30 02 49 44 24 B2 22 22 00 70 0B 3A |D.\.0.ID$."".p.:|
00000360: 02 98 31 35 2C 22 42 2D 50 22 3B 32 3B 31 36 32 |..15,"B-P";2;162|
00000370: 00 7B 0B 44 02 81 49 B2 31 A4 32 00 85 0B 4E 02 |.{.D..I.1.2...N.|
00000380: 8D 31 31 34 30 00 96 0B 58 02 49 44 24 B2 49 44 |.1140...X.ID$.ID|
00000390: 24 AA C7 28 41 29 00 9D 0B 62 02 82 49 00 CE 0B |$..(A)...b..I...|
000003A0: 6C 02 99 22 93 20 20 20 12 54 52 41 43 4B 92 20 |l..". .TRACK. |
000003B0: 20 20 20 31 31 31 31 31 31 31 31 31 31 32 32 32 | 1111111111222|
000003C0: 32 32 32 32 32 32 32 33 33 33 33 33 33 22 00 FC |2222222333333"..|
000003D0: 0B 76 02 99 22 20 20 20 31 32 33 34 35 36 37 38 |.v.." 12345678|
000003E0: 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 |9012345678901234|
000003F0: 35 36 37 38 39 30 31 32 33 34 35 22 00 33 0C 80 |56789012345".3..|
00000400: 02 99 22 12 53 92 30 20 20 20 20 20 20 20 20 20 |..".S.0 |
00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 22 4E 24 28 | "N$(|
00000430: 31 29 3B 00 6B 0C 8A 02 99 22 12 45 92 31 20 20 |1);.k....".E.1 |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000460: 20 20 20 20 22 4E 24 28 32 29 3B 00 A3 0C 94 02 | "N$(2);.....|
00000470: 99 22 12 43 92 32 20 20 20 20 20 20 20 20 20 20 |.".C.2 |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 22 4E 24 28 | "N$(|
000004A0: 33 29 3B 00 DB 0C 9E 02 99 22 12 54 92 33 20 20 |3);......".T.3 |
000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004D0: 20 20 20 20 22 4E 24 28 34 29 3B 00 13 0D A8 02 | "N$(4);.....|
000004E0: 99 22 12 4F 92 34 20 20 20 20 20 20 20 20 20 20 |.".O.4 |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000500: 20 20 20 20 20 20 20 20 20 20 20 20 22 4E 24 28 | "N$(|
00000510: 35 29 3B 00 4B 0D B2 02 99 22 12 52 92 35 20 20 |5);.K....".R.5 |
00000520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000540: 20 20 20 20 22 4E 24 28 36 29 3B 00 81 0D BC 02 | "N$(6);.....|
00000550: 99 22 20 36 20 20 20 20 20 20 20 20 20 20 20 20 |." 6 |
00000560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000570: 20 20 20 20 20 20 20 20 20 20 22 4E 24 28 37 29 | "N$(7)|
00000580: 3B 00 B7 0D C6 02 99 22 20 37 20 20 20 20 20 20 |;......" 7 |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 22 4E 24 28 38 29 3B 00 ED 0D D0 02 99 22 20 38 |"N$(8);......" 8|
000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005E0: 20 20 20 20 20 20 22 4E 24 28 39 29 3B 00 24 0E | "N$(9);.$.|
000005F0: DA 02 99 22 20 39 20 20 20 20 20 20 20 20 20 20 |..." 9 |
00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000610: 20 20 20 20 20 20 20 20 20 20 20 20 22 4E 24 28 | "N$(|
00000620: 31 30 29 3B 00 5B 0E E4 02 99 22 31 30 20 20 20 |10);.[...."10 |
00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000650: 20 20 20 22 4E 24 28 31 31 29 3B 00 92 0E EE 02 | "N$(11);.....|
00000660: 99 22 31 31 20 20 20 20 20 20 20 20 20 20 20 20 |."11 |
00000670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000680: 20 20 20 20 20 20 20 20 20 20 22 4E 24 28 31 32 | "N$(12|
00000690: 29 3B 00 C9 0E F8 02 99 22 31 32 20 20 20 20 20 |);......"12 |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006C0: 20 22 4E 24 28 31 33 29 3B 00 00 0F 02 03 99 22 | "N$(13);......"|
000006D0: 31 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |13 |
000006E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006F0: 20 20 20 20 20 20 20 20 22 4E 24 28 31 34 29 3B | "N$(14);|
00000700: 00 37 0F 0C 03 99 22 31 34 20 20 20 20 20 20 20 |.7...."14 |
00000710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000730: 4E 24 28 31 35 29 3B 00 6E 0F 16 03 99 22 31 35 |N$(15);.n...."15|
00000740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000760: 20 20 20 20 20 20 22 4E 24 28 31 36 29 3B 00 78 | "N$(16);.x|
00000770: 0F 20 03 99 22 31 36 22 00 82 0F 2A 03 99 22 31 |. .."16"...*.."1|
00000780: 37 22 00 BF 0F 34 03 99 22 31 38 20 20 20 20 20 |7"...4.."18 |
00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007A0: 20 20 20 20 20 20 20 20 20 20 20 22 3B 44 4F 53 | ";DOS|
000007B0: 24 3B 22 20 22 3B C8 28 49 44 24 2C 31 29 3B 00 |$;" ";.(ID$,1);.|
000007C0: FA 0F 3E 03 99 22 31 39 20 20 20 20 20 20 20 20 |..>.."19 |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007E0: 20 20 12 20 92 4F 52 A6 3D 45 4D 50 54 59 20 22 | . .OR.=EMPTY "|
000007F0: 3B C9 28 49 44 24 2C 31 29 3B 00 1C 10 48 03 99 |;.(ID$,1);...H..|
00000800: 22 32 30 20 20 20 20 20 20 20 20 20 20 20 20 20 |"20 |
00000810: 20 20 20 20 20 20 20 20 20 20 22 3B 00 42 10 52 | ";.B.R|
00000820: 03 42 46 24 B2 C9 28 22 20 20 22 AA C9 28 C4 28 |.BF$..(" "..(.(|
00000830: 42 46 29 2C C3 28 C4 28 42 46 29 29 AB 31 29 2C |BF),.(.(BF)).1),|
00000840: 33 29 00 68 10 5C 03 8B 42 46 B2 31 A7 99 22 20 |3).h.\..BF.1.." |
00000850: 22 3B 42 46 24 3B 22 20 42 4C 4F 43 4B 20 46 52 |";BF$;" BLOCK FR|
00000860: 45 45 22 3A 89 38 38 30 00 80 10 66 03 99 42 46 |EE":.880...f..BF|
00000870: 24 3B 22 20 42 4C 4F 43 4B 53 20 46 52 45 45 22 |$;" BLOCKS FREE"|
00000880: 00 8B 10 70 03 41 24 B2 22 2E 22 00 B9 10 7A 03 |...p.A$."."...z.|
00000890: 43 52 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |CR$."...........|
000008A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000008B0: 1D 1D 1D 1D 1D 1D 1D 1D 22 00 CB 10 84 03 98 31 |........"......1|
000008C0: 35 2C 22 42 2D 50 22 3B 32 3B 34 00 D7 10 8E 03 |5,"B-P";2;4.....|
000008D0: 81 54 B2 31 A4 33 35 00 F6 10 98 03 8B 54 AD 32 |.T.1.35......T.2|
000008E0: B3 B1 B5 28 54 AD 32 29 A7 46 24 B2 22 12 20 92 |...(T.2).F$.". .|
000008F0: 22 3A 89 39 34 30 00 01 11 A2 03 46 24 B2 22 A6 |":.940.....F$.".|
00000900: 22 00 0C 11 AC 03 A1 23 32 2C 42 24 00 17 11 B6 |"......#2,B$....|
00000910: 03 81 49 B2 30 A4 32 00 22 11 C0 03 A1 23 32 2C |..I.0.2."....#2,|
00000920: 42 24 00 35 11 CA 03 8B 42 24 B2 22 22 A7 42 24 |B$.5....B$."".B$|
00000930: B2 C7 28 30 29 00 44 11 D4 03 42 28 49 29 B2 C6 |..(0).D...B(I)..|
00000940: 28 42 24 29 00 4B 11 DE 03 82 49 00 62 11 E8 03 |(B$).K....I.b...|
00000950: 99 22 13 11 11 1D 1D 22 3B C8 28 43 52 24 2C 54 |.".....";.(CR$,T|
00000960: 29 3B 00 83 11 F2 03 4E 53 B2 32 30 AA 32 AC 28 |);.....NS.20.2.(|
00000970: 54 B1 31 37 29 AA 28 54 B1 32 34 29 AA 28 54 B1 |T.17).(T.24).(T.|
00000980: 33 30 29 00 8F 11 FC 03 81 53 B2 30 A4 4E 53 00 |30)......S.0.NS.|
00000990: A7 11 06 04 8B A5 53 28 53 29 B2 30 A7 99 41 24 |......S(S).0..A$|
000009A0: 3B 3A 89 31 30 35 30 00 B0 11 10 04 99 46 24 3B |;:.1050......F$;|
000009B0: 00 BB 11 1A 04 99 22 11 9D 22 3B 00 C2 11 24 04 |......"..";...$.|
000009C0: 82 53 00 C9 11 2E 04 82 54 00 E9 11 38 04 99 22 |.S......T...8.."|
000009D0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000009E0: 11 11 11 11 11 11 11 22 3B 00 F0 11 42 04 A0 32 |.......";...B..2|
000009F0: 00 08 12 4C 04 84 31 35 2C 45 4E 24 2C 45 4D 24 |...L..15,EN$,EM$|
00000A00: 2C 45 54 24 2C 45 53 24 00 10 12 56 04 A0 31 35 |,ET$,ES$...V..15|
00000A10: 00 16 12 60 04 80 00 27 12 6A 04 8F 20 47 45 54 |...`...'.j.. GET|
00000A20: 20 41 20 42 59 54 45 00 32 12 74 04 A1 23 32 2C | A BYTE.2.t..#2,|
00000A30: 42 24 00 45 12 7E 04 8B 42 24 B2 22 22 A7 42 24 |B$.E.~..B$."".B$|
00000A40: B2 C7 28 30 29 00 51 12 88 04 41 B2 C6 28 42 24 |..(0).Q...A..(B$|
00000A50: 29 00 64 12 92 04 8B 41 B1 31 32 37 A7 41 B2 41 |).d....A.127.A.A|
00000A60: AB 31 32 38 00 78 12 9C 04 8B 41 B3 33 32 B0 41 |.128.x....A.32.A|
00000A70: B1 39 35 A7 41 B2 36 33 00 87 12 A6 04 8B 41 B2 |.95.A.63......A.|
00000A80: 33 34 A7 41 B2 36 33 00 8D 12 B0 04 8E 00 00 00 |34.A.63.........|
00000A90: 00 |. |
..+.D.. DISPLAY A BLOCK AVAILITY MAP - 1
541.7.N..N$(16).].X...S(I).2.(S..(S.8).8
).(B(.(S.8))).Z....".DISPLAY A BAM - 154
1"......".INSERT DISKETTE IN DRIVE".....
.".PRESS .RETURN. TO CONTINUE".Q. ..C$:.
C$."".160......C$..G(13).160......"OK"..
....15,8,15...H..15,"I0". .R..15,EN$,EM$
,ET$,ES$.D....EN$."00".EN$."22".EN$."23"
.260.E...."."EN$", "EM$","ET$","ES$".M.
...15.S..........2,8,2,"#"......15,"U1";
2;0;18;0......15,EN$,EM$,ET$,ES$...".. G
ET DOS.P.,..15,"B-P";2;2...6..#2,B$...@.
.B$."".B$.G(0)...J.DOS.F(B$)...T..DOS.65
.DOS$."V2.6":.380.5.^..DOS.1.DOS$."V1.2"
:.380.E.H.DOS$."V?.?".[.R.. GET BLOCKS F
REE.D.|.BF.0.L...B.4.X....I.1.35......I.
18.I.I.1:B.B.4. ....15,"B-P";2;B......#2
,B$......B$."".B$.G(0).J.B.A.F(B$).V.L.B
F.BF.A...V.B.B.4......I...... GET DISK N
AME......15,"B-P";2;144......I.1.16.%...
.1140.4...N$(1).G(A).;....I.Q.&.. GET CO
SMETIC ID.\.0.ID$."".P.:..15,"B-P";2;162
.{.D..I.1.2...N..1140...X.ID$.ID$.G(A)..
.B..I.N.L..". .TRACK. 1111111111222
2222222333333"...V.." 1234567890123456
7890123456789012345".3....".S.0
"N$(1);.K...
.".E.1
"N$(2);......".C.2
"N$(3);......".T.3
"N$(
4);......".O.4
"N$(5);.K....".R.5
"N$(6);.....
." 6
"N$(7);...F.." 7
"N$(8);...P.." 8
"N$(9);.$.
Z.." 9
"N$(10);.[...."10
"N$(11);......"11
"N$(12
);.I...."12
"N$(13);......"13
"N$(14);.7...."1
4 "
N$(15);.N...."15
"N$(16);.X. .."16"...*.."1
7"...4.."18
";DOS$;" ";H(ID$,1);...>.."19
. .OR.=EMPTY ";I(ID$,1
);...H.."20 ";.B.R
.BF$.I(" ".I(D(BF),C(D(BF)).1),3).H.\..
BF.1.." ";BF$;" BLOCK FREE":.880...F..BF
$;" BLOCKS FREE"...P.A$."."...Z.CR$."...
................................".K....1
5,"B-P";2;4.W....T.1.35......T.2...(T.2)
.F$.". .":.940.....F$."."......#2,B$....
..I.0.2."....#2,B$.5.J..B$."".B$.G(0).D.
T.B(I).F(B$).K....I.B....".....";H(CR$,T
);.....NS.20.2.(T.17).(T.24).(T.30).....
.S.0.NS.......S(S).0..A$;:.1050......F$;
......"..";.B.$..S.I....T...8.."........
...............";...B. 2...L..15,EN$,EM$
,ET$,ES$...V. 15...`...'.J.. GET A BYTE.
2.T..#2,B$.E.~..B$."".B$.G(0).Q...A.F(B$
).D....A.127.A.A.128.X....A.32.A.95.A.63
......A.34.A.63..........
> CLICK IMAGE PREVIEW FOR FULL MODAL