00000000: 01 08 31 08 64 00 8F 20 20 4E 4F 54 45 21 20 50 |..1.d.. NOTE! P|
00000010: 52 45 53 53 20 22 43 54 52 4C 22 20 2B 20 22 2A |RESS "CTRL" + "*|
00000020: 22 20 54 4F 20 45 58 49 54 20 50 52 4F 47 52 41 |" TO EXIT PROGRA|
00000030: 4D 00 52 08 6E 00 8F 20 4D 41 52 51 55 45 45 20 |M.R.n.. MARQUEE |
00000040: 4D 4C 20 42 59 20 42 52 49 41 4E 20 53 43 48 4F |ML BY BRIAN SCHO|
00000050: 54 54 00 7F 08 78 00 8F 20 53 54 52 49 4E 47 54 |TT...x.. STRINGT|
00000060: 48 49 4E 47 20 49 4E 50 55 54 20 4D 4C 20 42 59 |HING INPUT ML BY|
00000070: 20 4A 2E 20 42 55 54 54 45 52 46 49 45 4C 44 00 | J. BUTTERFIELD.|
00000080: A7 08 82 00 8F 20 43 4F 4D 42 49 4E 41 54 49 4F |..... COMBINATIO|
00000090: 4E 20 42 59 20 44 41 56 49 44 20 50 41 55 4C 20 |N BY DAVID PAUL |
000000A0: 35 2F 32 33 2F 38 34 00 EB 08 8C 00 8D 34 32 30 |5/23/84......420|
000000B0: 3A 20 8F 20 53 45 54 20 4D 41 58 20 53 54 52 49 |: . SET MAX STRI|
000000C0: 4E 47 20 4C 45 4E 47 54 48 3B 20 4D 55 53 54 20 |NG LENGTH; MUST |
000000D0: 42 45 20 46 49 52 53 54 20 56 41 52 49 41 42 4C |BE FIRST VARIABL|
000000E0: 45 20 49 4E 20 4D 45 4D 4F 52 59 00 23 09 96 00 |E IN MEMORY.#...|
000000F0: 42 43 B2 32 3A 43 43 B2 31 3A 42 4B B2 30 3A 8F |BC.2:CC.1:BK.0:.|
00000100: 20 42 4F 52 44 45 52 2C 43 48 41 52 41 43 54 45 | BORDER,CHARACTE|
00000110: 52 2C 42 41 43 4B 47 52 4F 55 4E 44 20 43 4F 4C |R,BACKGROUND COL|
00000120: 4F 52 53 00 37 09 A0 00 42 B2 34 39 31 35 32 3A |ORS.7...B.49152:|
00000130: 43 48 B2 42 AA 39 38 00 4D 09 AA 00 97 35 33 32 |CH.B.98.M....532|
00000140: 37 32 2C 32 31 3A 97 37 38 38 2C 35 32 00 6B 09 |72,21:.788,52.k.|
00000150: B4 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 |...53280,0:.5328|
00000160: 31 2C 30 3A 99 22 0E 08 93 22 3B 00 96 09 BE 00 |1,0:."...";.....|
00000170: 99 A3 31 34 29 22 1E C4 49 53 4B 20 CD 41 52 51 |..14)"..ISK .ARQ|
00000180: 55 45 45 22 3A 81 49 B2 31 A4 34 30 3A 99 22 A3 |UEE":.I.1.40:.".|
00000190: 22 3B 3A 82 3A 99 00 B8 09 C8 00 99 A3 31 30 29 |";:.:........10)|
000001A0: 22 9E C1 44 41 50 54 45 44 20 42 59 20 C4 41 56 |"..DAPTED BY .AV|
000001B0: 49 44 20 D0 41 55 4C 22 00 D5 09 D2 00 99 A3 31 |ID .AUL".......1|
000001C0: 32 29 22 11 46 52 4F 4D 20 50 52 4F 47 52 41 4D |2)".FROM PROGRAM|
000001D0: 53 20 42 59 22 00 F9 09 DC 00 99 A3 38 29 22 11 |S BY".......8)".|
000001E0: C2 2E D3 43 48 4F 54 54 20 26 20 CA 2E C2 55 54 |...CHOTT & ...UT|
000001F0: 54 45 52 46 49 45 4C 44 22 00 15 0A E6 00 99 22 |TERFIELD"......"|
00000200: 1E 11 D3 45 54 54 49 4E 47 20 55 50 2E 2E 2E 22 |...ETTING UP..."|
00000210: 3A 8D 34 33 30 00 37 0A F0 00 85 22 11 C6 49 4C |:.430.7...."..IL|
00000220: 45 4E 41 4D 45 9E 22 3B 4E 41 24 3A 8B 4E 41 24 |ENAME.";NA$:.NA$|
00000230: B2 22 22 A7 34 38 30 00 68 0A FA 00 85 22 11 1E |."".480.h...."..|
00000240: D3 50 45 45 44 20 28 31 2D 32 30 29 20 20 9E 35 |.PEED (1-20) .5|
00000250: 9D 9D 9D 22 3B 53 50 3A 8B 53 50 B3 31 B0 53 50 |...";SP:.SP.1.SP|
00000260: B1 32 30 A7 53 50 B2 35 00 97 0A 04 01 97 35 33 |.20.SP.5......53|
00000270: 32 38 30 2C 42 43 3A 97 35 33 32 38 31 2C 43 43 |280,BC:.53281,CC|
00000280: 3A 99 22 93 22 3A 97 35 33 32 38 31 2C 42 4B 3A |:.".":.53281,BK:|
00000290: 99 C7 28 31 34 32 29 00 B4 0A 0E 01 9F 31 35 2C |..(142)......15,|
000002A0: 38 2C 31 35 2C 22 49 30 22 3A 9F 31 2C 38 2C 32 |8,15,"I0":.1,8,2|
000002B0: 2C 4E 41 24 00 C1 0A 18 01 84 31 35 2C 58 2C 58 |,NA$......15,X,X|
000002C0: 24 00 CE 0A 22 01 8B 58 B2 30 A7 33 33 30 00 FF |$..."..X.0.330..|
000002D0: 0A 2C 01 99 22 11 1C 45 52 52 4F 52 3A 20 1E 22 |.,.."..ERROR: ."|
000002E0: 58 24 3A 99 22 11 50 52 45 53 53 20 4B 45 59 20 |X$:.".PRESS KEY |
000002F0: 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E 22 00 |TO CONTINUE...".|
00000300: 12 0B 36 01 A1 51 24 3A 8B 51 24 B2 22 22 A7 33 |..6..Q$:.Q$."".3|
00000310: 31 30 00 18 0B 40 01 8A 00 25 0B 4A 01 97 42 AA |10...@...%.J..B.|
00000320: 39 33 2C 53 50 00 41 0B 54 01 9E 38 39 36 3A 8B |93,SP.A.T..896:.|
00000330: 53 54 B3 B1 30 A7 A0 31 3A A0 31 35 3A 89 32 37 |ST..0..1:.15:.27|
00000340: 30 00 6E 0B 5E 01 4C B2 C2 28 31 34 32 29 3A 8B |0.n.^.L..(142):.|
00000350: 4C B2 30 A7 33 34 30 3A 8F 20 4C 3D 53 49 5A 45 |L.0.340:. L=SIZE|
00000360: 20 4F 46 20 49 4E 50 55 54 28 3E 3D 30 29 00 7D | OF INPUT(>=0).}|
00000370: 0B 68 01 53 24 B2 C8 28 41 24 2C 4C 29 00 88 0B |.h.S$..(A$,L)...|
00000380: 72 01 81 4B B2 31 A4 4C 00 B5 0B 7C 01 51 B2 C2 |r..K.1.L...|.Q..|
00000390: 28 31 39 37 29 3A 8B 51 B2 34 39 A7 34 37 30 3A |(197):.Q.49.470:|
000003A0: 8F 20 44 45 54 45 43 54 20 45 58 49 54 20 52 45 |. DETECT EXIT RE|
000003B0: 51 55 45 53 54 00 D5 0B 86 01 54 B2 C6 28 CA 28 |QUEST.....T..(.(|
000003C0: 53 24 2C 4B 2C 31 29 29 3A 8B 54 B1 36 34 A7 54 |S$,K,1)):.T.64.T|
000003D0: B2 54 AB 36 34 00 EF 0B 90 01 97 43 48 2C 54 3A |.T.64......CH,T:|
000003E0: 9E 42 AA 31 30 38 3A 99 C7 28 31 35 37 29 3B 00 |.B.108:..(157);.|
000003F0: 27 0C 9A 01 82 3A 97 43 48 2C 33 32 3A 9E 42 AA |'....:.CH,32:.B.|
00000400: 31 30 38 3A 97 43 48 2C 33 32 3A 9E 42 AA 31 30 |108:.CH,32:.B.10|
00000410: 38 3A 89 33 34 30 3A 8F 20 52 45 41 44 20 53 4F |8:.340:. READ SO|
00000420: 4D 45 20 4D 4F 52 45 00 62 0C A4 01 41 24 B2 22 |ME MORE.b...A$."|
00000430: 41 42 43 44 45 46 47 48 49 4A 4B 4C 4D 4E 4F 50 |ABCDEFGHIJKLMNOP|
00000440: 51 22 3A 41 24 B2 41 24 AA 41 24 AA 41 24 AA 41 |Q":A$.A$.A$.A$.A|
00000450: 24 AA 41 24 3A 41 24 B2 41 24 AA 41 24 AA 41 24 |$.A$:A$.A$.A$.A$|
00000460: 3A 8E 00 7F 0C AE 01 81 4A B2 38 39 36 A4 39 33 |:.......J.896.93|
00000470: 37 3A 87 58 3A 97 4A 2C 58 3A 54 B2 54 AA 58 00 |7:.X:.J,X:T.T.X.|
00000480: 90 0C B8 01 82 3A 8B 54 B3 B1 36 31 32 30 A7 90 |.....:.T..6120..|
00000490: 00 AD 0C C2 01 81 41 B2 34 39 31 35 32 A4 34 39 |......A.49152.49|
000004A0: 34 39 35 3A 87 44 3A 97 41 2C 44 3A 82 00 B3 0C |495:.D:.A,D:....|
000004B0: CC 01 8E 00 C6 0C D6 01 A0 31 3A 98 31 35 2C 22 |.........1:.15,"|
000004C0: 49 22 3A A0 31 35 00 E4 0C E0 01 97 31 39 38 2C |I":.15......198,|
000004D0: 30 3A 99 22 93 22 3A 97 37 38 38 2C 34 39 3A 9E |0:.".":.788,49:.|
000004E0: 32 30 34 38 00 01 0D EA 01 8F 20 42 45 47 49 4E |2048...... BEGIN|
000004F0: 20 53 54 52 49 4E 47 54 48 49 4E 47 20 44 41 54 | STRINGTHING DAT|
00000500: 41 00 26 0D F4 01 83 31 36 30 2C 30 30 32 2C 31 |A.&....160,002,1|
00000510: 37 37 2C 30 34 35 2C 31 35 33 2C 31 33 37 2C 30 |77,045,153,137,0|
00000520: 30 30 2C 32 30 30 00 4B 0D FE 01 83 31 39 32 2C |00,200.K....192,|
00000530: 30 30 36 2C 32 30 38 2C 32 34 36 2C 31 36 32 2C |006,208,246,162,|
00000540: 30 30 31 2C 30 33 32 2C 31 39 38 00 70 0D 08 02 |001,032,198.p...|
00000550: 83 32 35 35 2C 30 33 32 2C 32 32 38 2C 32 35 35 |.255,032,228,255|
00000560: 2C 32 30 31 2C 30 31 33 2C 32 34 30 2C 30 31 35 |,201,013,240,015|
00000570: 00 95 0D 12 02 83 31 36 34 2C 31 34 32 2C 31 34 |......164,142,14|
00000580: 35 2C 31 34 30 2C 32 30 30 2C 31 33 32 2C 31 34 |5,140,200,132,14|
00000590: 32 2C 31 39 36 00 BA 0D 1C 02 83 31 33 39 2C 32 |2,196......139,2|
000005A0: 34 30 2C 30 30 34 2C 31 36 35 2C 31 34 34 2C 32 |40,004,165,144,2|
000005B0: 34 30 2C 32 33 34 2C 30 37 36 00 C7 0D 26 02 83 |40,234,076...&..|
000005C0: 32 30 34 2C 32 35 35 00 E0 0D 30 02 8F 20 42 45 |204,255...0.. BE|
000005D0: 47 49 4E 20 4D 41 52 51 55 45 45 20 44 41 54 41 |GIN MARQUEE DATA|
000005E0: 00 FD 0D 3A 02 83 31 32 37 2C 31 32 37 2C 31 32 |...:..127,127,12|
000005F0: 37 2C 31 32 37 2C 31 32 37 2C 31 32 37 00 16 0E |7,127,127,127...|
00000600: 44 02 83 31 32 37 2C 31 32 37 2C 31 36 30 2C 30 |D..127,127,160,0|
00000610: 2C 31 36 39 2C 30 00 31 0E 4E 02 83 31 33 33 2C |,169,0.1.N..133,|
00000620: 32 35 31 2C 31 36 39 2C 34 2C 31 33 33 2C 32 35 |251,169,4,133,25|
00000630: 32 00 4C 0E 58 02 83 31 36 32 2C 32 34 2C 32 34 |2.L.X..162,24,24|
00000640: 2C 31 36 35 2C 32 35 31 2C 31 30 35 00 68 0E 62 |,165,251,105.h.b|
00000650: 02 83 34 30 2C 31 33 33 2C 32 35 31 2C 31 36 35 |..40,133,251,165|
00000660: 2C 32 35 32 2C 31 30 35 00 82 0E 6C 02 83 30 2C |,252,105...l..0,|
00000670: 31 33 33 2C 32 35 32 2C 31 36 39 2C 33 32 2C 31 |133,252,169,32,1|
00000680: 34 35 00 9C 0E 76 02 83 32 35 31 2C 32 30 32 2C |45...v..251,202,|
00000690: 31 36 2C 32 33 36 2C 31 36 30 2C 31 00 B5 0E 80 |16,236,160,1....|
000006A0: 02 83 31 36 32 2C 33 2C 31 36 39 2C 30 2C 31 33 |..162,3,169,0,13|
000006B0: 33 2C 32 35 31 00 D0 0E 8A 02 83 31 33 33 2C 32 |3,251......133,2|
000006C0: 35 33 2C 31 36 39 2C 34 2C 31 33 33 2C 32 35 32 |53,169,4,133,252|
000006D0: 00 EB 0E 94 02 83 31 33 33 2C 32 35 34 2C 31 36 |......133,254,16|
000006E0: 35 2C 32 35 33 2C 32 30 38 2C 32 00 08 0F 9E 02 |5,253,208,2.....|
000006F0: 83 31 39 38 2C 32 35 34 2C 31 39 38 2C 32 35 33 |.198,254,198,253|
00000700: 2C 31 37 37 2C 32 35 31 00 25 0F A8 02 83 31 34 |,177,251.%....14|
00000710: 35 2C 32 35 33 2C 32 30 30 2C 32 30 38 2C 32 34 |5,253,200,208,24|
00000720: 39 2C 32 33 30 00 42 0F B2 02 83 32 35 32 2C 32 |9,230.B....252,2|
00000730: 33 30 2C 32 35 34 2C 31 37 37 2C 32 35 31 2C 31 |30,254,177,251,1|
00000740: 34 35 00 5F 0F BC 02 83 32 35 33 2C 32 30 30 2C |45._....253,200,|
00000750: 32 30 32 2C 32 30 38 2C 32 33 37 2C 31 37 37 00 |202,208,237,177.|
00000760: 7C 0F C6 02 83 32 35 31 2C 31 34 35 2C 32 35 33 ||....251,145,253|
00000770: 2C 32 30 30 2C 31 39 32 2C 32 33 32 00 93 0F D0 |,200,192,232....|
00000780: 02 83 32 30 38 2C 32 34 37 2C 39 36 2C 30 2C 33 |..208,247,96,0,3|
00000790: 31 2C 33 00 AC 0F DA 02 83 32 34 37 2C 39 36 2C |1,3......247,96,|
000007A0: 31 32 30 2C 30 2C 36 30 2C 31 30 32 00 C6 0F E4 |120,0,60,102....|
000007B0: 02 83 31 30 32 2C 31 30 32 2C 31 30 32 2C 31 30 |..102,102,102,10|
000007C0: 32 2C 36 30 2C 30 00 DF 0F EE 02 83 31 36 39 2C |2,60,0......169,|
000007D0: 30 2C 31 34 31 2C 39 39 2C 31 39 32 2C 31 34 00 |0,141,99,192,14.|
000007E0: F8 0F F8 02 83 39 38 2C 31 39 32 2C 34 36 2C 39 |.....98,192,46,9|
000007F0: 39 2C 31 39 32 2C 31 34 00 11 10 02 03 83 39 38 |9,192,14......98|
00000800: 2C 31 39 32 2C 34 36 2C 39 39 2C 31 39 32 2C 31 |,192,46,99,192,1|
00000810: 34 00 2B 10 0C 03 83 39 38 2C 31 39 32 2C 34 36 |4.+....98,192,46|
00000820: 2C 39 39 2C 31 39 32 2C 31 36 39 00 44 10 16 03 |,99,192,169.D...|
00000830: 83 32 30 38 2C 37 32 2C 31 36 39 2C 30 2C 37 32 |.208,72,169,0,72|
00000840: 2C 31 37 33 00 5E 10 20 03 83 39 39 2C 31 39 32 |,173.^. ..99,192|
00000850: 2C 37 32 2C 31 37 33 2C 39 38 2C 31 39 32 00 78 |,72,173,98,192.x|
00000860: 10 2A 03 83 37 32 2C 33 32 2C 35 30 2C 31 39 33 |.*..72,32,50,193|
00000870: 2C 31 33 33 2C 32 35 32 00 95 10 34 03 83 31 33 |,133,252...4..13|
00000880: 32 2C 32 35 31 2C 31 36 39 2C 31 30 30 2C 31 33 |2,251,169,100,13|
00000890: 33 2C 32 35 33 00 B2 10 3E 03 83 31 36 39 2C 31 |3,253...>..169,1|
000008A0: 39 32 2C 31 33 33 2C 32 35 34 2C 31 32 30 2C 31 |92,133,254,120,1|
000008B0: 36 39 00 CA 10 48 03 83 35 31 2C 31 33 33 2C 31 |69...H..51,133,1|
000008C0: 2C 31 36 30 2C 37 2C 31 37 37 00 E6 10 52 03 83 |,160,7,177...R..|
000008D0: 32 35 31 2C 31 34 35 2C 32 35 33 2C 31 33 36 2C |251,145,253,136,|
000008E0: 31 36 2C 32 34 39 00 FE 10 5C 03 83 31 36 39 2C |16,249...\..169,|
000008F0: 35 35 2C 31 33 33 2C 31 2C 38 38 2C 32 34 00 19 |55,133,1,88,24..|
00000900: 11 66 03 83 31 37 33 2C 32 32 2C 32 30 38 2C 34 |.f..173,22,208,4|
00000910: 31 2C 32 34 38 2C 31 30 35 00 31 11 70 03 83 37 |1,248,105.1.p..7|
00000920: 2C 31 34 31 2C 32 32 2C 32 30 38 2C 31 36 30 2C |,141,22,208,160,|
00000930: 37 00 4B 11 7A 03 83 20 31 36 32 2C 37 2C 31 37 |7.K.z.. 162,7,17|
00000940: 37 2C 32 35 33 2C 31 30 2C 36 32 00 65 11 84 03 |7,253,10,62.e...|
00000950: 83 30 2C 31 39 32 2C 32 30 32 2C 31 36 2C 32 34 |.0,192,202,16,24|
00000960: 39 2C 31 33 36 00 7E 11 8E 03 83 31 36 2C 32 34 |9,136.~....16,24|
00000970: 32 2C 31 36 32 2C 37 2C 32 34 2C 31 37 33 00 98 |2,162,7,24,173..|
00000980: 11 98 03 83 39 34 2C 31 39 32 2C 31 30 35 2C 30 |....94,192,105,0|
00000990: 2C 31 33 33 2C 32 35 31 00 B2 11 A2 03 83 31 37 |,133,251......17|
000009A0: 33 2C 39 35 2C 31 39 32 2C 31 30 35 2C 34 2C 31 |3,95,192,105,4,1|
000009B0: 33 33 00 CC 11 AC 03 83 32 35 32 2C 31 36 30 2C |33......252,160,|
000009C0: 37 2C 31 35 32 2C 37 32 2C 31 36 30 00 E3 11 B6 |7,152,72,160....|
000009D0: 03 83 30 2C 31 36 39 2C 33 32 2C 36 32 2C 30 2C |..0,169,32,62,0,|
000009E0: 31 39 32 00 FD 11 C0 03 83 31 34 34 2C 32 2C 31 |192......144,2,1|
000009F0: 36 39 2C 38 31 2C 31 34 35 2C 32 35 31 00 18 12 |69,81,145,251...|
00000A00: CA 03 83 35 36 2C 31 36 35 2C 32 35 31 2C 32 33 |...56,165,251,23|
00000A10: 33 2C 34 30 2C 31 33 33 00 33 12 D4 03 83 32 35 |3,40,133.3....25|
00000A20: 31 2C 31 36 35 2C 32 35 32 2C 32 33 33 2C 30 2C |1,165,252,233,0,|
00000A30: 31 33 33 00 4F 12 DE 03 83 32 35 32 2C 31 30 34 |133.O....252,104|
00000A40: 2C 31 36 38 2C 31 33 36 2C 31 36 2C 32 32 33 00 |,168,136,16,223.|
00000A50: 68 12 E8 03 83 31 33 38 2C 37 32 2C 31 36 32 2C |h....138,72,162,|
00000A60: 36 2C 32 34 2C 31 37 33 00 83 12 F2 03 83 32 32 |6,24,173......22|
00000A70: 2C 32 30 38 2C 34 31 2C 32 34 38 2C 31 33 34 2C |,208,41,248,134,|
00000A80: 32 35 33 00 9F 12 FC 03 83 31 30 31 2C 32 35 33 |253......101,253|
00000A90: 2C 31 34 31 2C 32 32 2C 32 30 38 2C 32 30 32 00 |,141,22,208,202.|
00000AA0: BA 12 06 04 83 37 32 2C 31 33 38 2C 31 37 34 2C |.....72,138,174,|
00000AB0: 39 33 2C 31 39 32 2C 31 36 30 00 D5 12 10 04 83 |93,192,160......|
00000AC0: 30 2C 31 33 36 2C 32 30 38 2C 32 35 33 2C 32 30 |0,136,208,253,20|
00000AD0: 32 2C 32 30 38 00 F0 12 1A 04 83 32 34 38 2C 31 |2,208......248,1|
00000AE0: 37 30 2C 31 30 34 2C 31 36 2C 32 33 31 2C 33 32 |70,104,16,231,32|
00000AF0: 00 0A 13 24 04 83 38 2C 31 39 32 2C 31 30 34 2C |...$..8,192,104,|
00000B00: 31 37 30 2C 32 30 32 2C 31 36 00 24 13 2E 04 83 |170,202,16.$....|
00000B10: 31 36 33 2C 39 36 2C 31 34 37 2C 31 39 32 2C 31 |163,96,147,192,1|
00000B20: 32 30 2C 30 00 40 13 38 04 83 31 30 34 2C 31 34 |20,0.@.8..104,14|
00000B30: 31 2C 34 36 2C 31 39 33 2C 31 30 34 2C 31 34 31 |1,46,193,104,141|
00000B40: 00 5B 13 42 04 83 34 37 2C 31 39 33 2C 31 30 34 |.[.B..47,193,104|
00000B50: 2C 31 34 31 2C 34 38 2C 31 39 33 00 76 13 4C 04 |,141,48,193.v.L.|
00000B60: 83 31 30 34 2C 31 34 31 2C 34 39 2C 31 39 33 2C |.104,141,49,193,|
00000B70: 31 30 34 2C 32 34 00 92 13 56 04 83 31 30 39 2C |104,24...V..109,|
00000B80: 34 38 2C 31 39 33 2C 31 36 38 2C 31 30 34 2C 31 |48,193,168,104,1|
00000B90: 30 39 00 AD 13 60 04 83 34 39 2C 31 39 33 2C 31 |09...`..49,193,1|
00000BA0: 37 30 2C 31 37 33 2C 34 37 2C 31 39 33 00 C7 13 |70,173,47,193...|
00000BB0: 6A 04 83 37 32 2C 31 37 33 2C 34 36 2C 31 39 33 |j..72,173,46,193|
00000BC0: 2C 37 32 2C 31 33 38 00 D2 13 74 04 83 39 36 2C |,72,138...t..96,|
00000BD0: 39 36 00 00 00 |96... |
..1.D.. NOTE! PRESS "CTRL" + "*" TO EXI
T PROGRAM.R.N.. MARQUEE ML BY BRIAN SCHO
TT..X.. STRINGTHING INPUT ML BY J. BUTT
ERFIELD...... COMBINATION BY DAVID PAUL
5/23/84......420: . SET MAX STRING LENGT
H; MUST BE FIRST VARIABLE IN MEMORY.#...
BC.2:CC.1:BK.0:. BORDER,CHARACTER,BACKGR
OUND COLORS.7. .B.49152:CH.B.98.M....532
72,21:.788,52.K....53280,0:.53281,0:."..
.";.......14)".DISK MARQUEE":.I.1.40:.".
";:.:....H...10)".ADAPTED BY DAVID PAUL"
.U.R...12)".FROM PROGRAMS BY".......8)".
B.SCHOTT & J.BUTTERFIELD"......"..SETTIN
G UP...":.430.7....".FILENAME.";NA$:.NA$
."".480.H...."..SPEED (1-20) .5...";SP:
.SP.1.SP.20.SP.5......53280,BC:.53281,CC
:.".":.53281,BK:.G(142)......15,8,15,"I0
":.1,8,2,NA$.A....15,X,X$.N."..X.0.330..
.,.."..ERROR: ."X$:.".PRESS KEY TO CONTI
NUE..."...6..Q$:.Q$."".310...@...%.J..B.
93,SP.A.T..896:.ST..0. 1: 15:.270.N.^.L.
B(142):.L.0.340:. L=SIZE OF INPUT(>=0).}
.H.S$.H(A$,L)...R..K.1.L...|.Q.B(197):.Q
.49.470:. DETECT EXIT REQUEST.U...T.F(J(
S$,K,1)):.T.64.T.T.64......CH,T:.B.108:.
G(157);.'....:.CH,32:.B.108:.CH,32:.B.10
8:.340:. READ SOME MORE.B...A$."ABCDEFGH
IJKLMNOPQ":A$.A$.A$.A$.A$.A$:A$.A$.A$.A$
:......J.896.937:.X:.J,X:T.T.X......:.T
..6120.....B..A.49152.49495:.D:.A,D:....
L...F.V. 1:.15,"I": 15......198,0:.".":.
788,49:.2048...... BEGIN STRINGTHING DAT
A.&....160,002,177,045,153,137,000,200.K
....192,006,208,246,162,001,032,198.P...
.255,032,228,255,201,013,240,015......16
4,142,145,140,200,132,142,196......139,2
40,004,165,144,240,234,076.G.&..204,255.
..0.. BEGIN MARQUEE DATA...:..127,127,12
7,127,127,127...D..127,127,160,0,169,0.1
.N..133,251,169,4,133,252.L.X..162,24,24
,165,251,105.H.B..40,133,251,165,252,105
...L..0,133,252,169,32,145...V..251,202,
16,236,160,1......162,3,169,0,133,251.P.
...133,253,169,4,133,252......133,254,16
5,253,208,2......198,254,198,253,177,251
.%....145,253,200,208,249,230.B....252,2
30,254,177,251,145._....253,200,202,208,
237,177.|.F..251,145,253,200,192,232...P
..208,247,96,0,31,3...Z..247,96,120,0,60
,102.F....102,102,102,102,60,0......169,
0,141,99,192,14......98,192,46,99,192,14
......98,192,46,99,192,14.+....98,192,46
,99,192,169.D....208,72,169,0,72,173.^.
..99,192,72,173,98,192.X.*..72,32,50,193
,133,252...4..132,251,169,100,133,253...
>..169,192,133,254,120,169.J.H..51,133,1
,160,7,177...R..251,145,253,136,16,249..
.\..169,55,133,1,88,24...F..173,22,208,4
1,248,105.1.P..7,141,22,208,160,7.K.Z..
162,7,177,253,10,62.E....0,192,202,16,24
9,136.~....16,242,162,7,24,173......94,1
92,105,0,133,251......173,95,192,105,4,1
33.L....252,160,7,152,72,160......0,169,
32,62,0,192......144,2,169,81,145,251...
J..56,165,251,233,40,133.3.T..251,165,25
2,233,0,133.O....252,104,168,136,16,223.
H....138,72,162,6,24,173......22,208,41,
248,134,253......101,253,141,22,208,202.
.....72,138,174,93,192,160.U....0,136,20
8,253,202,208......248,170,104,16,231,32
...$..8,192,104,170,202,16.$....163,96,1
47,192,120,0.@.8..104,141,46,193,104,141
.[.B..47,193,104,141,48,193.V.L..104,141
,49,193,104,24...V..109,48,193,168,104,1
09...`..49,193,170,173,47,193.G.J..72,17
3,46,193,72,138.R.T..96,96...