SHOW MAKER

00000000: 01 1C 1D 1C 64 00 86 20  4E 41 24 28 35 30 29 2C  |....d.. NA$(50),|
00000010: 54 59 28 35 30 29 2C 43  4F 28 35 30 29 00 41 1C  |TY(50),CO(50).A.|
00000020: 6E 00 86 20 53 4E 28 35  30 29 2C 53 43 28 35 30  |n.. SN(50),SC(50|
00000030: 29 2C 4B 50 24 28 35 30  29 2C 54 52 24 28 35 30  |),KP$(50),TR$(50|
00000040: 29 00 5E 1C 78 00 97 35  33 32 38 30 2C 36 3A 97  |).^.x..53280,6:.|
00000050: 35 33 32 38 31 2C 31 3A  97 36 34 36 2C 30 00 8E  |53281,1:.646,0..|
00000060: 1C 82 00 99 22 93 11 11  20 20 54 48 49 53 20 50  |...."...  THIS P|
00000070: 52 4F 47 52 41 4D 20 57  49 4C 4C 20 48 45 4C 50  |ROGRAM WILL HELP|
00000080: 20 59 4F 55 20 53 45 54  20 55 50 20 41 22 00 BB  | YOU SET UP A"..|
00000090: 1C 8C 00 99 22 20 20 53  4C 49 44 45 53 48 4F 57  |...."  SLIDESHOW|
000000A0: 2E 20 20 41 20 53 45 51  55 45 4E 54 49 41 4C 20  |.  A SEQUENTIAL |
000000B0: 46 49 4C 45 20 4E 41 4D  45 44 22 00 E0 1C 96 00  |FILE NAMED".....|
000000C0: 99 22 20 20 27 53 45 54  2D 55 50 27 20 57 49 4C  |."  'SET-UP' WIL|
000000D0: 4C 20 42 45 20 43 52 45  41 54 45 44 2E 22 3A 99  |L BE CREATED.":.|
000000E0: 00 0F 1D A0 00 99 22 20  20 54 48 45 20 27 53 45  |......"  THE 'SE|
000000F0: 54 2D 55 50 27 20 46 49  4C 45 20 57 49 4C 4C 20  |T-UP' FILE WILL |
00000100: 42 45 20 55 53 45 44 20  42 59 20 54 48 45 22 00  |BE USED BY THE".|
00000110: 31 1D AA 00 99 22 20 20  50 52 4F 47 52 41 4D 20  |1...."  PROGRAM |
00000120: 27 53 48 4F 57 20 53 4C  49 44 45 53 27 2E 22 3A  |'SHOW SLIDES'.":|
00000130: 99 00 60 1D B4 00 99 22  20 20 4E 4F 57 2C 20 50  |..`...."  NOW, P|
00000140: 55 54 20 49 4E 20 41 20  44 49 53 4B 20 54 48 41  |UT IN A DISK THA|
00000150: 54 20 59 4F 55 20 57 49  4C 4C 20 57 41 4E 54 22  |T YOU WILL WANT"|
00000160: 00 8C 1D BE 00 99 22 20  20 54 48 49 53 20 53 4C  |......"  THIS SL|
00000170: 49 44 53 48 4F 57 20 4F  4E 2C 20 4F 52 20 50 55  |IDSHOW ON, OR PU|
00000180: 54 20 49 4E 20 41 20 44  49 53 4B 22 00 B9 1D C8  |T IN A DISK"....|
00000190: 00 99 22 20 20 57 49 54  48 20 41 20 46 49 4C 45  |.."  WITH A FILE|
000001A0: 20 59 4F 55 20 57 41 4E  54 20 54 4F 20 43 48 41  | YOU WANT TO CHA|
000001B0: 4E 47 45 2C 20 41 4E 44  22 00 DA 1D D2 00 99 22  |NGE, AND"......"|
000001C0: 20 20 50 52 45 53 53 20  54 48 45 20 52 45 54 55  |  PRESS THE RETU|
000001D0: 52 4E 20 4B 45 59 2E 22  3A 99 00 E8 1D DC 00 86  |RN KEY.":.......|
000001E0: 20 43 4F 24 28 31 35 29  00 00 1E E6 00 81 49 B2  | CO$(15)......I.|
000001F0: 30 A4 31 35 3A 20 87 43  4F 24 28 49 29 3A 82 49  |0.15: .CO$(I):.I|
00000200: 00 34 1E F0 00 83 20 22  42 4C 41 43 4B 22 2C 22  |.4.... "BLACK","|
00000210: 57 48 49 54 45 22 2C 22  52 45 44 22 2C 22 43 59  |WHITE","RED","CY|
00000220: 41 4E 22 2C 22 50 55 52  50 4C 45 22 2C 22 47 52  |AN","PURPLE","GR|
00000230: 45 45 4E 22 00 70 1E F5  00 83 20 22 42 4C 55 45  |EEN".p.... "BLUE|
00000240: 22 2C 22 59 45 4C 4C 4F  57 22 2C 22 4F 52 41 4E  |","YELLOW","ORAN|
00000250: 47 45 22 2C 22 42 52 4F  57 4E 22 2C 22 4C 54 20  |GE","BROWN","LT |
00000260: 52 45 44 22 2C 22 44 41  52 4B 20 47 52 41 59 22  |RED","DARK GRAY"|
00000270: 00 A0 1E FA 00 83 20 22  4D 45 44 20 47 52 41 59  |...... "MED GRAY|
00000280: 22 2C 22 4C 54 20 47 52  45 45 4E 22 2C 22 4C 54  |","LT GREEN","LT|
00000290: 20 42 4C 55 45 22 2C 22  4C 54 20 47 52 41 59 22  | BLUE","LT GRAY"|
000002A0: 00 AD 1E 04 01 86 20 54  4E 24 28 39 29 00 C5 1E  |...... TN$(9)...|
000002B0: 0E 01 81 20 49 B2 30 A4  39 3A 20 87 54 4E 24 28  |... I.0.9: .TN$(|
000002C0: 49 29 3A 82 49 00 09 1F  18 01 83 20 22 45 4E 44  |I):.I...... "END|
000002D0: 22 2C 22 4B 4F 41 4C 41  50 41 49 4E 54 45 52 22  |","KOALAPAINTER"|
000002E0: 2C 22 44 4F 4F 44 4C 45  22 2C 22 46 4C 59 49 4E  |,"DOODLE","FLYIN|
000002F0: 47 20 43 4F 4C 4F 52 53  22 2C 22 55 4C 54 52 41  |G COLORS","ULTRA|
00000300: 42 41 53 49 43 2D 36 34  22 00 50 1F 22 01 83 20  |BASIC-64".P.".. |
00000310: 22 48 45 53 20 47 52 41  50 48 49 43 53 22 2C 22  |"HES GRAPHICS","|
00000320: 43 41 44 50 41 4B 2D 36  34 22 2C 22 32 20 43 4F  |CADPAK-64","2 CO|
00000330: 4C 4F 52 20 28 33 32 20  42 4C 4B 53 29 22 2C 22  |LOR (32 BLKS)","|
00000340: 54 49 54 4C 45 22 2C 22  42 2F 47 52 41 50 48 22  |TITLE","B/GRAPH"|
00000350: 00 6A 1F 2C 01 8D 31 30  36 30 3A 8D 31 31 33 30  |.j.,..1060:.1130|
00000360: 3A 8B 45 31 B1 30 A7 33  30 30 00 A4 1F 36 01 49  |:.E1.0.300...6.I|
00000370: 50 B2 30 3A 49 53 B2 30  3A 99 22 93 11 11 20 20  |P.0:IS.0:."...  |
00000380: 46 49 52 53 54 2C 20 57  45 27 4C 4C 20 48 41 56  |FIRST, WE'LL HAV|
00000390: 45 20 54 4F 20 4D 41 4B  45 20 41 20 4C 49 53 54  |E TO MAKE A LIST|
000003A0: 20 4F 46 22 00 D2 1F 40  01 99 22 20 20 41 4C 4C  | OF"...@.."  ALL|
000003B0: 20 54 48 45 20 47 52 41  50 48 49 43 20 46 49 4C  | THE GRAPHIC FIL|
000003C0: 45 53 20 54 4F 20 42 45  20 49 4E 43 4C 55 44 45  |ES TO BE INCLUDE|
000003D0: 44 22 00 FD 1F 4A 01 99  22 20 20 49 4E 20 54 48  |D"...J.."  IN TH|
000003E0: 45 20 53 4C 49 44 45 53  48 4F 57 2E 20 20 49 27  |E SLIDESHOW.  I'|
000003F0: 4C 4C 20 54 41 4B 45 20  54 48 45 4D 22 00 17 20  |LL TAKE THEM".. |
00000400: 54 01 99 22 20 20 4F 4E  45 20 41 54 20 41 20 54  |T.."  ONE AT A T|
00000410: 49 4D 45 2E 22 3A 99 00  3C 20 5E 01 99 22 20 20  |IME.":..< ^.."  |
00000420: 48 45 52 45 20 41 52 45  20 54 48 45 20 53 4C 49  |HERE ARE THE SLI|
00000430: 44 45 20 54 59 50 45 53  3A 22 3A 99 00 69 20 68  |DE TYPES:":..i h|
00000440: 01 49 50 B2 49 50 AA 31  3A 99 22 20 20 50 49 43  |.IP.IP.1:."  PIC|
00000450: 54 55 52 45 20 46 49 4C  45 20 23 22 3B 22 12 22  |TURE FILE #";"."|
00000460: 3B 49 50 3B 22 92 22 3A  99 00 8B 20 72 01 81 49  |;IP;".":... r..I|
00000470: B2 31 A4 39 3A 99 22 20  20 20 22 54 4E 24 28 49  |.1.9:."   "TN$(I|
00000480: 29 3B A3 32 32 29 3B 49  3A 82 49 00 A3 20 7C 01  |);.22);I:.I.. |.|
00000490: 99 22 20 20 20 22 54 4E  24 28 30 29 3B A3 32 32  |."   "TN$(0);.22|
000004A0: 29 3B 30 00 D4 20 86 01  99 3A 99 22 20 20 20 20  |);0.. ...:."    |
000004B0: 20 20 20 20 20 57 48 49  43 48 20 4E 55 4D 42 45  |     WHICH NUMBE|
000004C0: 52 20 22 3B 54 59 28 49  50 29 3A 99 22 91 22 A3  |R ";TY(IP):.".".|
000004D0: 32 31 29 3B 00 E1 20 90  01 8D 31 33 38 30 3A 85  |21);.. ...1380:.|
000004E0: 41 00 F2 20 9A 01 8B 41  B3 30 B0 41 B1 39 A7 33  |A.. ...A.0.A.9.3|
000004F0: 39 30 00 09 21 A4 01 8B  41 B2 30 A7 4E 24 B2 22  |90..!...A.0.N$."|
00000500: 45 4E 44 22 3A 89 35 36  30 00 39 21 AE 01 99 3A  |END":.560.9!...:|
00000510: 99 22 20 20 20 4E 4F 57  20 45 4E 54 45 52 20 54  |."   NOW ENTER T|
00000520: 48 45 20 4E 41 4D 45 20  20 22 3B 4E 41 24 28 49  |HE NAME  ";NA$(I|
00000530: 50 29 3A 97 36 34 36 2C  30 00 60 21 B8 01 8D 31  |P):.646,0.`!...1|
00000540: 33 38 30 3A 85 22 91 1D  1D 1D 1D 1D 1D 1D 1D 1D  |380:."..........|
00000550: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 22 3B 4E 24  |............";N$|
00000560: 00 71 21 C2 01 8B C3 28  4E 24 29 B3 31 A7 34 33  |.q!....(N$).1.43|
00000570: 30 00 7E 21 CC 01 8B 41  B1 32 A7 35 36 30 00 8B  |0.~!...A.2.560..|
00000580: 21 D6 01 8B 41 B1 31 A7  35 34 30 00 A3 21 E0 01  |!...A.1.540..!..|
00000590: 8B C8 28 4E 24 2C 31 29  B2 C7 28 31 32 39 29 A7  |..(N$,1)..(129).|
000005A0: 35 32 30 00 C0 21 EA 01  8B C3 28 4E 24 29 B3 31  |520..!....(N$).1|
000005B0: 34 A7 4E 24 B2 4E 24 AA  22 20 22 3A 89 34 39 30  |4.N$.N$." ":.490|
000005C0: 00 DA 21 F4 01 8B C3 28  4E 24 29 B1 31 34 A7 4E  |..!....(N$).14.N|
000005D0: 24 B2 C8 28 4E 24 2C 31  34 29 00 F0 21 FE 01 4E  |$..(N$,14)..!..N|
000005E0: 24 B2 C7 28 31 32 39 29  AA 4E 24 3A 89 35 36 30  |$..(129).N$:.560|
000005F0: 00 0D 22 08 02 8B C3 28  4E 24 29 B3 31 35 A7 4E  |.."....(N$).15.N|
00000600: 24 B2 4E 24 AA 22 20 22  3A 89 35 32 30 00 27 22  |$.N$." ":.520.'"|
00000610: 12 02 8B C3 28 4E 24 29  B1 31 35 A7 4E 24 B2 C8  |....(N$).15.N$..|
00000620: 28 4E 24 2C 31 35 29 00  45 22 1C 02 8B C8 28 4E  |(N$,15).E"....(N|
00000630: 24 2C 32 29 B3 B1 22 44  44 22 A7 4E 24 B2 22 44  |$,2).."DD".N$."D|
00000640: 44 22 AA 4E 24 00 72 22  26 02 8B C9 28 4E 24 2C  |D".N$.r"&...(N$,|
00000650: 31 29 B2 22 20 22 A7 4C  4E B2 C3 28 4E 24 29 3A  |1)." ".LN..(N$):|
00000660: 4E 24 B2 C8 28 4E 24 2C  4C 4E AB 31 29 3A 89 35  |N$..(N$,LN.1):.5|
00000670: 35 30 00 8A 22 30 02 8B  41 B3 B1 37 A7 43 4F 28  |50.."0..A..7.CO(|
00000680: 49 50 29 B2 30 3A 89 36  37 30 00 B5 22 3A 02 99  |IP).0:.670..":..|
00000690: 22 93 11 11 20 20 57 49  54 48 20 41 20 42 4C 41  |"...  WITH A BLA|
000006A0: 43 4B 2F 57 48 49 54 45  20 50 49 43 54 55 52 45  |CK/WHITE PICTURE|
000006B0: 2C 20 57 45 22 00 DF 22  44 02 99 22 20 20 43 41  |, WE".."D.."  CA|
000006C0: 4E 20 41 43 54 55 41 4C  4C 59 20 55 53 45 20 41  |N ACTUALLY USE A|
000006D0: 4E 59 20 54 57 4F 20 43  4F 4C 4F 52 53 2E 22 00  |NY TWO COLORS.".|
000006E0: 05 23 4E 02 99 22 20 20  54 48 45 53 45 20 41 52  |.#N.."  THESE AR|
000006F0: 45 20 54 48 45 20 43 4F  4C 4F 52 20 43 4F 44 45  |E THE COLOR CODE|
00000700: 53 3A 22 3A 99 00 3B 23  58 02 81 49 B2 30 A4 37  |S:":..;#X..I.0.7|
00000710: 3A 99 22 20 20 20 20 22  49 3B A3 37 29 3B 43 4F  |:."    "I;.7);CO|
00000720: 24 28 49 29 3B A3 32 32  29 3B 49 AA 38 3B A3 32  |$(I);.22);I.8;.2|
00000730: 36 29 3B 43 4F 24 28 49  AA 38 29 00 44 23 5D 02  |6);CO$(I.8).D#].|
00000740: 82 49 3A 99 00 68 23 62  02 43 31 B2 B5 28 43 4F  |.I:..h#b.C1..(CO|
00000750: 28 49 50 29 AD 31 36 29  3A 43 32 B2 43 4F 28 49  |(IP).16):C2.CO(I|
00000760: 50 29 AB 31 36 AC 43 31  00 9C 23 6C 02 99 22 20  |P).16.C1..#l.." |
00000770: 20 20 46 4F 52 45 47 52  4F 55 4E 44 20 43 4F 4C  |  FOREGROUND COL|
00000780: 4F 52 20 20 20 22 43 31  3A 99 22 91 22 A3 32 31  |OR   "C1:.".".21|
00000790: 29 3B 3A 8D 31 33 38 30  3A 85 43 31 00 B0 23 76  |);:.1380:.C1..#v|
000007A0: 02 8B 43 31 B3 30 B0 43  31 B1 31 35 A7 36 32 30  |..C1.0.C1.15.620|
000007B0: 00 E4 23 80 02 99 22 20  20 20 42 41 43 4B 47 52  |..#..."   BACKGR|
000007C0: 4F 55 4E 44 20 43 4F 4C  4F 52 20 20 20 22 43 32  |OUND COLOR   "C2|
000007D0: 3A 99 22 91 22 A3 32 31  29 3B 3A 8D 31 33 38 30  |:.".".21);:.1380|
000007E0: 3A 85 43 32 00 FE 23 8A  02 8B 43 32 B3 30 B0 43  |:.C2..#...C2.0.C|
000007F0: 32 B1 31 35 B0 43 31 B2  43 32 A7 36 34 30 00 12  |2.15.C1.C2.640..|
00000800: 24 94 02 43 4F 28 49 50  29 B2 43 31 AC 31 36 AA  |$..CO(IP).C1.16.|
00000810: 43 32 00 3B 24 9E 02 4E  41 24 28 49 50 29 B2 4E  |C2.;$..NA$(IP).N|
00000820: 24 3A 54 59 28 49 50 29  B2 41 3A 8B 41 B1 30 A7  |$:TY(IP).A:.A.0.|
00000830: 99 22 93 11 11 22 3A 89  33 36 30 00 6B 24 A8 02  |."...":.360.k$..|
00000840: 99 22 93 11 11 20 20 4E  45 58 54 2C 20 57 45 20  |."...  NEXT, WE |
00000850: 48 41 56 45 20 54 4F 20  41 52 52 41 4E 47 45 20  |HAVE TO ARRANGE |
00000860: 54 48 45 20 53 4C 49 44  45 53 22 00 97 24 B2 02  |THE SLIDES"..$..|
00000870: 99 22 20 20 49 4E 20 4F  52 44 45 52 20 41 4E 44  |."  IN ORDER AND|
00000880: 20 53 45 54 20 55 50 20  50 41 52 41 4D 45 54 45  | SET UP PARAMETE|
00000890: 52 53 20 46 4F 52 22 00  BF 24 BC 02 99 22 20 20  |RS FOR"..$..."  |
000008A0: 45 41 43 48 2E 20 20 59  4F 55 20 48 41 56 45 20  |EACH.  YOU HAVE |
000008B0: 41 20 54 4F 54 41 4C 20  4F 46 22 49 50 AB 31 00  |A TOTAL OF"IP.1.|
000008C0: EC 24 C6 02 99 22 20 20  46 49 4C 45 53 2C 20 57  |.$..."  FILES, W|
000008D0: 48 49 43 48 20 43 41 4E  20 42 45 20 41 52 52 41  |HICH CAN BE ARRA|
000008E0: 4E 47 45 44 20 49 4E 20  41 4E 59 22 00 FE 24 D0  |NGED IN ANY"..$.|
000008F0: 02 99 22 20 20 4F 52 44  45 52 2E 22 3A 99 00 25  |.."  ORDER.":..%|
00000900: 25 DA 02 4E 50 B2 49 50  3A 49 53 B2 30 3A 8B 44  |%..NP.IP:IS.0:.D|
00000910: 4C B2 30 A7 3A 81 49 B2  31 A4 34 30 30 30 3A 82  |L.0.:.I.1.4000:.|
00000920: 3A 44 4C B2 31 00 4C 25  E4 02 49 53 B2 49 53 AA  |:DL.1.L%..IS.IS.|
00000930: 31 3A 99 22 20 20 48 45  52 45 20 41 52 45 20 54  |1:."  HERE ARE T|
00000940: 48 45 20 46 49 4C 45 53  3A 22 3A 99 00 83 25 EE  |HE FILES:":...%.|
00000950: 02 81 49 B2 31 A4 4E 50  AB 31 3A 99 22 20 20 22  |..I.1.NP.1:."  "|
00000960: 49 3B A3 35 29 3B 4E 41  24 28 49 29 3B 22 90 22  |I;.5);NA$(I);"."|
00000970: 3B A3 32 32 29 3B 54 4E  24 28 54 59 28 49 29 29  |;.22);TN$(TY(I))|
00000980: 3A 82 49 00 98 25 F8 02  99 22 20 20 22 30 3B A3  |:.I..%..."  "0;.|
00000990: 35 29 3B 22 45 4E 44 22  00 C7 25 02 03 99 3A 99  |5);"END"..%...:.|
000009A0: 22 20 20 57 48 49 43 48  20 4F 4E 45 20 22 53 4E  |"  WHICH ONE "SN|
000009B0: 28 49 53 29 3A 99 22 91  22 A3 31 31 29 3B 3A 8D  |(IS):.".".11);:.|
000009C0: 31 33 38 30 3A 85 53 00  D4 25 0C 03 8B 53 B2 30  |1380:.S..%...S.0|
000009D0: A7 39 33 30 00 F0 25 16  03 8B 53 B3 31 B0 53 B1  |.930..%...S.1.S.|
000009E0: 4E 50 AB 31 A7 99 22 91  91 22 3B 3A 89 37 37 30  |NP.1.."..";:.770|
000009F0: 00 0A 26 20 03 54 54 B2  53 43 28 49 53 29 3A 8B  |..& .TT.SC(IS):.|
00000A00: 54 54 B3 31 A7 54 54 B2  36 30 00 3E 26 2A 03 99  |TT.1.TT.60.>&*..|
00000A10: 3A 99 22 20 20 44 49 53  50 4C 41 59 20 49 54 20  |:."  DISPLAY IT |
00000A20: 48 4F 57 20 4D 41 4E 59  20 53 45 43 4F 4E 44 53  |HOW MANY SECONDS|
00000A30: 20 22 54 54 3A 99 22 91  22 A3 32 39 29 3B 00 4B  | "TT:.".".29);.K|
00000A40: 26 34 03 8D 31 33 38 30  3A 85 54 00 67 26 3E 03  |&4..1380:.T.g&>.|
00000A50: 8B 54 B3 30 B0 54 B1 33  36 30 30 A7 99 22 91 91  |.T.0.T.3600.."..|
00000A60: 22 3B 3A 89 38 31 30 00  95 26 48 03 99 3A 99 22  |";:.810..&H..:."|
00000A70: 20 20 4E 45 58 54 20 53  4C 49 44 45 20 4B 45 59  |  NEXT SLIDE KEY|
00000A80: 45 44 3A 20 12 41 55 54  4F 92 20 4F 52 20 12 57  |ED: .AUTO. OR .W|
00000A90: 41 49 54 92 22 00 C5 26  52 03 57 24 B2 4B 50 24  |AIT."..&R.W$.KP$|
00000AA0: 28 49 53 29 3A 8B 57 24  B3 B1 22 41 55 54 4F 22  |(IS):.W$.."AUTO"|
00000AB0: AF 57 24 B3 B1 22 57 41  49 54 22 A7 57 24 B2 22  |.W$.."WAIT".W$."|
00000AC0: 41 55 54 4F 22 00 E0 26  5C 03 99 22 20 20 20 20  |AUTO"..&\.."    |
00000AD0: 22 57 24 22 9D 9D 9D 9D  9D 9D 22 3B 3A 85 4B 24  |"W$"......";:.K$|
00000AE0: 00 08 27 66 03 8B 4B 24  B3 B1 22 41 55 54 4F 22  |..'f..K$.."AUTO"|
00000AF0: AF 4B 24 B3 B1 22 57 41  49 54 22 A7 99 22 91 91  |.K$.."WAIT".."..|
00000B00: 91 22 3B 3A 89 38 34 30  00 30 27 70 03 99 3A 99  |.";:.840.0'p..:.|
00000B10: 22 20 20 54 52 41 4E 53  49 54 49 4F 4E 3A 20 12  |"  TRANSITION: .|
00000B20: 46 41 44 45 92 20 4F 52  20 12 46 41 53 54 92 22  |FADE. OR .FAST."|
00000B30: 00 60 27 7A 03 46 24 B2  54 52 24 28 49 53 29 3A  |.`'z.F$.TR$(IS):|
00000B40: 8B 46 24 B3 B1 22 46 41  44 45 22 AF 46 24 B3 B1  |.F$.."FADE".F$..|
00000B50: 22 46 41 53 54 22 A7 46  24 B2 22 46 41 53 54 22  |"FAST".F$."FAST"|
00000B60: 00 82 27 84 03 99 22 20  20 20 20 22 46 24 22 9D  |..'..."    "F$".|
00000B70: 9D 9D 9D 9D 9D 22 3B 3A  8D 31 33 38 30 3A 85 4E  |.....";:.1380:.N|
00000B80: 46 24 00 AC 27 8E 03 8B  4E 46 24 B3 B1 22 46 41  |F$..'...NF$.."FA|
00000B90: 44 45 22 AF 4E 46 24 B3  B1 22 46 41 53 54 22 A7  |DE".NF$.."FAST".|
00000BA0: 99 22 91 91 91 22 3B 3A  89 38 38 30 00 DE 27 98  |."...";:.880..'.|
00000BB0: 03 53 4E 28 49 53 29 B2  53 3A 53 43 28 49 53 29  |.SN(IS).S:SC(IS)|
00000BC0: B2 54 3A 4B 50 24 28 49  53 29 B2 4B 24 3A 54 52  |.T:KP$(IS).K$:TR|
00000BD0: 24 28 49 53 29 B2 4E 46  24 3A 89 37 34 30 00 18  |$(IS).NF$:.740..|
00000BE0: 28 A2 03 4E 53 B2 49 53  3A 53 4E 28 4E 53 29 B2  |(..NS.IS:SN(NS).|
00000BF0: 30 3A 53 43 28 4E 53 29  B2 30 3A 4B 50 24 28 4E  |0:SC(NS).0:KP$(N|
00000C00: 53 29 B2 22 45 4E 44 20  22 3A 54 52 24 28 4E 53  |S)."END ":TR$(NS|
00000C10: 29 B2 22 45 4E 44 20 22  00 4A 28 AC 03 99 22 11  |)."END ".J(...".|
00000C20: 11 20 20 44 4F 20 59 4F  55 20 57 41 4E 54 20 54  |.  DO YOU WANT T|
00000C30: 4F 20 52 45 56 49 45 57  20 54 48 49 53 3F 20 12  |O REVIEW THIS? .|
00000C40: 59 92 20 4F 52 20 12 4E  92 22 00 60 28 B6 03 8D  |Y. OR .N.".`(...|
00000C50: 31 30 36 30 3A 8B 4B 24  B2 22 4E 22 A7 39 38 30  |1060:.K$."N".980|
00000C60: 00 89 28 C0 03 99 22 11  11 20 20 50 52 45 53 53  |..(..."..  PRESS|
00000C70: 20 12 52 45 54 55 52 4E  92 20 49 46 20 44 41 54  | .RETURN. IF DAT|
00000C80: 41 20 49 53 20 4F 4B 2E  22 00 92 28 CA 03 89 33  |A IS OK."..(...3|
00000C90: 31 30 00 C3 28 D4 03 99  22 11 11 20 20 4E 4F 57  |10..(..."..  NOW|
00000CA0: 20 50 4C 41 43 45 20 49  4E 54 4F 20 59 4F 55 52  | PLACE INTO YOUR|
00000CB0: 20 44 49 53 4B 20 44 52  49 56 45 20 41 20 44 49  | DISK DRIVE A DI|
00000CC0: 53 4B 22 00 F1 28 DE 03  99 22 20 20 54 4F 20 48  |SK"..(..."  TO H|
00000CD0: 4F 4C 44 20 54 48 45 20  4E 45 57 20 53 4C 49 44  |OLD THE NEW SLID|
00000CE0: 45 53 48 4F 57 20 53 45  54 2D 55 50 20 41 4E 44  |ESHOW SET-UP AND|
00000CF0: 22 00 09 29 E8 03 99 22  20 20 50 52 45 53 53 20  |"..)..."  PRESS |
00000D00: 41 4E 59 20 4B 45 59 2E  22 00 13 29 F2 03 8D 31  |ANY KEY."..)...1|
00000D10: 30 36 30 00 1D 29 FC 03  8D 31 32 35 30 00 4A 29  |060..)...1250.J)|
00000D20: 06 04 99 22 11 11 20 20  59 4F 55 52 20 46 49 4C  |..."..  YOUR FIL|
00000D30: 45 20 27 53 45 54 2D 55  50 27 20 49 53 20 41 4C  |E 'SET-UP' IS AL|
00000D40: 4C 20 53 45 54 20 55 50  2E 22 00 50 29 10 04 90  |L SET UP.".P)...|
00000D50: 00 73 29 1A 04 8F 20 2A  2A 2A 2A 20 57 41 49 54  |.s)... **** WAIT|
00000D60: 20 46 4F 52 20 4B 45 59  20 50 52 45 53 53 20 2A  | FOR KEY PRESS *|
00000D70: 2A 2A 2A 00 8C 29 24 04  47 B2 30 3A A1 4B 24 3A  |***..)$.G.0:.K$:|
00000D80: 8B 4B 24 B3 B1 22 22 A7  31 30 36 30 00 A6 29 2E  |.K$.."".1060..).|
00000D90: 04 A1 4B 24 3A 47 B2 47  AA 31 3A 8B 47 B1 31 30  |..K$:G.G.1:.G.10|
00000DA0: 30 A7 31 31 30 30 00 B6  29 38 04 8B 4B 24 B2 22  |0.1100..)8..K$."|
00000DB0: 22 A7 31 30 37 30 00 BC  29 42 04 8E 00 C6 29 4C  |".1070..)B....)L|
00000DC0: 04 8D 31 33 38 30 00 D4  29 56 04 47 B2 30 3A 89  |..1380..)V.G.0:.|
00000DD0: 31 30 37 30 00 F8 29 60  04 8F 20 2A 2A 2A 2A 20  |1070..)`.. **** |
00000DE0: 47 45 54 20 53 45 51 55  45 4E 54 49 41 4C 20 46  |GET SEQUENTIAL F|
00000DF0: 49 4C 45 20 2A 2A 2A 2A  00 09 2A 6A 04 A0 31 35  |ILE ****..*j..15|
00000E00: 3A 9F 31 35 2C 38 2C 31  35 00 23 2A 74 04 9F 32  |:.15,8,15.#*t..2|
00000E10: 2C 38 2C 32 2C 22 30 3A  53 45 54 2D 55 50 2C 53  |,8,2,"0:SET-UP,S|
00000E20: 2C 52 22 00 38 2A 7E 04  84 31 35 2C 45 31 2C 45  |,R".8*~..15,E1,E|
00000E30: 32 24 2C 45 33 2C 45 34  00 5C 2A 88 04 8B 45 31  |2$,E3,E4.\*...E1|
00000E40: B1 30 A7 99 22 20 20 12  22 45 32 24 22 92 22 3A  |.0.."  ."E2$".":|
00000E50: 8B 45 31 B3 B1 36 32 A7  31 32 33 30 00 72 2A 92  |.E1..62.1230.r*.|
00000E60: 04 8B 45 31 B2 36 32 A7  45 31 B2 30 3A 89 31 32  |..E1.62.E1.0:.12|
00000E70: 33 30 00 86 2A 9C 04 84  32 2C 5A 24 3A 4E 50 B2  |30..*...2,Z$:NP.|
00000E80: 30 3A 4E 53 B2 30 00 B7  2A A6 04 41 31 24 B2 22  |0:NS.0..*..A1$."|
00000E90: 22 3A 84 32 2C 41 31 24  2C 41 32 24 2C 41 33 24  |":.2,A1$,A2$,A3$|
00000EA0: 3A 8B 41 31 24 B2 22 45  4E 44 22 B0 41 31 24 B2  |:.A1$."END".A1$.|
00000EB0: 22 22 A7 31 32 31 30 00  F1 2A B0 04 4E 50 B2 4E  |"".1210..*..NP.N|
00000EC0: 50 AA 31 3A 4E 41 24 28  4E 50 29 B2 41 31 24 3A  |P.1:NA$(NP).A1$:|
00000ED0: 54 59 28 4E 50 29 B2 C5  28 41 32 24 29 3A 43 4F  |TY(NP)..(A2$):CO|
00000EE0: 28 4E 50 29 B2 C5 28 41  33 24 29 3A 89 31 31 39  |(NP)..(A3$):.119|
00000EF0: 30 00 26 2B BA 04 41 31  24 B2 22 22 3A 84 32 2C  |0.&+..A1$."":.2,|
00000F00: 41 31 24 2C 41 32 24 2C  41 33 24 2C 41 34 24 3A  |A1$,A2$,A3$,A4$:|
00000F10: 8B 41 31 24 B2 22 45 4E  44 22 B0 41 31 24 B2 22  |.A1$."END".A1$."|
00000F20: 22 A7 31 32 33 30 00 4E  2B C4 04 4E 53 B2 4E 53  |".1230.N+..NS.NS|
00000F30: AA 31 3A 53 4E 28 4E 53  29 B2 C5 28 41 31 24 29  |.1:SN(NS)..(A1$)|
00000F40: 3A 53 43 28 4E 53 29 B2  C5 28 41 32 24 29 00 70  |:SC(NS)..(A2$).p|
00000F50: 2B C9 04 4B 50 24 28 4E  53 29 B2 41 33 24 3A 54  |+..KP$(NS).A3$:T|
00000F60: 52 24 28 4E 53 29 B2 41  34 24 3A 89 31 32 31 30  |R$(NS).A4$:.1210|
00000F70: 00 79 2B CE 04 A0 32 3A  8E 00 9D 2B D8 04 8F 20  |.y+...2:...+... |
00000F80: 2A 2A 2A 20 57 52 49 54  45 20 53 45 51 55 45 4E  |*** WRITE SEQUEN|
00000F90: 54 49 41 4C 20 46 49 4C  45 2A 2A 2A 2A 00 AE 2B  |TIAL FILE****..+|
00000FA0: E2 04 A0 31 35 3A 9F 31  35 2C 38 2C 31 35 00 C4  |...15:.15,8,15..|
00000FB0: 2B EC 04 98 31 35 2C 22  53 30 3A 53 45 54 2D 55  |+...15,"S0:SET-U|
00000FC0: 50 2C 53 22 00 D9 2B F6  04 84 31 35 2C 45 31 2C  |P,S"..+...15,E1,|
00000FD0: 45 32 24 2C 45 33 2C 45  34 00 F6 2B 00 05 8B 45  |E2$,E3,E4..+...E|
00000FE0: 31 B1 31 A7 99 22 20 20  12 22 45 32 24 22 92 22  |1.1.."  ."E2$"."|
00000FF0: 3A 89 31 33 36 30 00 06  2C 0A 05 8B 45 31 B2 36  |:.1360..,...E1.6|
00001000: 32 A7 45 31 B2 30 00 20  2C 14 05 9F 32 2C 38 2C  |2.E1.0. ,...2,8,|
00001010: 32 2C 22 30 3A 53 45 54  2D 55 50 2C 53 2C 57 22  |2,"0:SET-UP,S,W"|
00001020: 00 35 2C 1E 05 84 31 35  2C 45 31 2C 45 32 24 2C  |.5,...15,E1,E2$,|
00001030: 45 33 2C 45 34 00 59 2C  28 05 8B 45 31 B1 30 A7  |E3,E4.Y,(..E1.0.|
00001040: 99 22 20 20 12 22 45 32  24 22 92 22 3A 8B 45 31  |."  ."E2$".":.E1|
00001050: B3 B1 36 32 A7 31 33 36  30 00 73 2C 32 05 98 32  |..62.1360.s,2..2|
00001060: 2C 22 53 4C 49 44 45 53  48 4F 57 20 53 45 54 2D  |,"SLIDESHOW SET-|
00001070: 55 50 22 00 9C 2C 3C 05  81 49 B2 31 A4 4E 50 3A  |UP"..,<..I.1.NP:|
00001080: 98 32 2C 4E 41 24 28 49  29 22 2C 22 54 59 28 49  |.2,NA$(I)","TY(I|
00001090: 29 22 2C 22 43 4F 28 49  29 3A 82 49 00 CE 2C 46  |)","CO(I):.I..,F|
000010A0: 05 81 49 B2 31 A4 4E 53  3A 98 32 2C 53 4E 28 49  |..I.1.NS:.2,SN(I|
000010B0: 29 22 2C 22 53 43 28 49  29 22 2C 22 4B 50 24 28  |)","SC(I)","KP$(|
000010C0: 49 29 22 2C 22 54 52 24  28 49 29 3A 82 49 00 D7  |I)","TR$(I):.I..|
000010D0: 2C 50 05 A0 32 3A 8E 00  F9 2C 5A 05 8F 20 2A 2A  |,P..2:...,Z.. **|
000010E0: 2A 2A 20 52 49 4E 47 20  41 20 42 45 4C 4C 20 54  |** RING A BELL T|
000010F0: 4F 4E 45 20 2A 2A 2A 2A  2A 00 17 2D 64 05 47 B2  |ONE *****..-d.G.|
00001100: 35 34 32 37 32 3A 97 47  AA 32 34 2C 31 35 3A 97  |54272:.G.24,15:.|
00001110: 47 AA 31 2C 31 31 30 00  39 2D 69 05 97 47 AA 35  |G.1,110.9-i..G.5|
00001120: 2C 39 3A 97 47 AA 36 2C  39 3A 97 47 AA 34 2C 31  |,9:.G.6,9:.G.4,1|
00001130: 37 3A 97 47 AA 34 2C 31  36 00 3F 2D 6E 05 8E 00  |7:.G.4,16.?-n...|
00001140: 00 00                                             |..              |

....D.. NA$(50),TY(50),CO(50).A.N.. SN(5
0),SC(50),KP$(50),TR$(50).^.X..53280,6:.
53281,1:.646,0......"...  THIS PROGRAM W
ILL HELP YOU SET UP A"......"  SLIDESHOW
.  A SEQUENTIAL FILE NAMED"......"  'SET
-UP' WILL BE CREATED.":.... .."  THE 'SE
T-UP' FILE WILL BE USED BY THE".1...."  
PROGRAM 'SHOW SLIDES'.":..`...."  NOW, P
UT IN A DISK THAT YOU WILL WANT"......" 
 THIS SLIDSHOW ON, OR PUT IN A DISK"...H
.."  WITH A FILE YOU WANT TO CHANGE, AND
".Z.R.."  PRESS THE RETURN KEY.":.......
 CO$(15)......I.0.15: .CO$(I):.I.4.... "
BLACK","WHITE","RED","CYAN","PURPLE","GR
EEN".P.... "BLUE","YELLOW","ORANGE","BRO
WN","LT RED","DARK GRAY". .... "MED GRAY
","LT GREEN","LT BLUE","LT GRAY"...... T
N$(9).E.... I.0.9: .TN$(I):.I...... "END
","KOALAPAINTER","DOODLE","FLYING COLORS
","ULTRABASIC-64".P.".. "HES GRAPHICS","
CADPAK-64","2 COLOR (32 BLKS)","TITLE","
B/GRAPH".J.,..1060:.1130:.E1.0.300...6.I
P.0:IS.0:."...  FIRST, WE'LL HAVE TO MAK
E A LIST OF".R.@.."  ALL THE GRAPHIC FIL
ES TO BE INCLUDED"...J.."  IN THE SLIDES
HOW.  I'LL TAKE THEM".. T.."  ONE AT A T
IME.":..< ^.."  HERE ARE THE SLIDE TYPES
:":..I H.IP.IP.1:."  PICTURE FILE #";"."
;IP;".":... R..I.1.9:."   "TN$(I);.22);I
:.I.. |.."   "TN$(0);.22);0.T ...:."    
     WHICH NUMBER ";TY(IP):.".".21);.. .
..1380:.A.. ...A.0.A.9.390..!...A.0.N$."
END":.560.9!...:."   NOW ENTER THE NAME 
 ";NA$(IP):.646,0.`!...1380:."..........
............";N$.Q!B..C(N$).1.430.~!L..A
.2.560..!V..A.1.540..!...H(N$,1).G(129).
520..!...C(N$).14.N$.N$." ":.490.Z!...C(
N$).14.N$.H(N$,14)..!..N$.G(129).N$:.560
.."...C(N$).15.N$.N$." ":.520.'"...C(N$)
.15.N$.H(N$,15).E"...H(N$,2).."DD".N$."D
D".N$.R"&..I(N$,1)." ".LN.C(N$):N$.H(N$,
LN.1):.550.."0..A..7.CO(IP).0:.670..":..
"...  WITH A BLACK/WHITE PICTURE, WE".."
D.."  CAN ACTUALLY USE ANY TWO COLORS.".
.#N.."  THESE ARE THE COLOR CODES:":..;#
X..I.0.7:."    "I;.7);CO$(I);.22);I.8;.2
6);CO$(I.8).D#]..I:..H#B.C1..(CO(IP).16)
:C2.CO(IP).16.C1..#L.."   FOREGROUND COL
OR   "C1:.".".21);:.1380:.C1..#V..C1.0.C
1.15.620..#..."   BACKGROUND COLOR   "C2
:.".".21);:.1380:.C2..#...C2.0.C2.15.C1.
C2.640..$..CO(IP).C1.16.C2.;$..NA$(IP).N
$:TY(IP).A:.A.0.."...":.360.K$..."...  N
EXT, WE HAVE TO ARRANGE THE SLIDES"..$..
."  IN ORDER AND SET UP PARAMETERS FOR".
.$..."  EACH.  YOU HAVE A TOTAL OF"IP.1.
.$F.."  FILES, WHICH CAN BE ARRANGED IN 
ANY"..$P.."  ORDER.":..%%Z.NP.IP:IS.0:.D
L.0.:.I.1.4000:.:DL.1.L%..IS.IS.1:."  HE
RE ARE THE FILES:":...%...I.1.NP.1:."  "
I;.5);NA$(I);".";.22);TN$(TY(I)):.I..%..
."  "0;.5);"END".G%...:."  WHICH ONE "SN
(IS):.".".11);:.1380:.S.T%...S.0.930..%.
..S.1.S.NP.1.."..";:.770..& .TT.SC(IS):.
TT.1.TT.60.>&*..:."  DISPLAY IT HOW MANY
 SECONDS "TT:.".".29);.K&4..1380:.T.G&>.
.T.0.T.3600.."..";:.810..&H..:."  NEXT S
LIDE KEYED: .AUTO. OR .WAIT.".E&R.W$.KP$
(IS):.W$.."AUTO".W$.."WAIT".W$."AUTO"..&
\.."    "W$"......";:.K$..'F..K$.."AUTO"
.K$.."WAIT".."...";:.840.0'P..:."  TRANS
ITION: .FADE. OR .FAST.".`'Z.F$.TR$(IS):
.F$.."FADE".F$.."FAST".F$."FAST"..'..." 
   "F$"......";:.1380:.NF$..'...NF$.."FA
DE".NF$.."FAST".."...";:.880..'..SN(IS).
S:SC(IS).T:KP$(IS).K$:TR$(IS).NF$:.740..
(..NS.IS:SN(NS).0:SC(NS).0:KP$(NS)."END 
":TR$(NS)."END ".J(..."..  DO YOU WANT T
O REVIEW THIS? .Y. OR .N.".`(...1060:.K$
."N".980..(..."..  PRESS .RETURN. IF DAT
A IS OK."..(J..310.C(T.."..  NOW PLACE I
NTO YOUR DISK DRIVE A DISK"..(..."  TO H
OLD THE NEW SLIDESHOW SET-UP AND"..)..."
  PRESS ANY KEY."..)...1060..)...1250.J)
..."..  YOUR FILE 'SET-UP' IS ALL SET UP
.".P)....S)... **** WAIT FOR KEY PRESS *
***..)$.G.0:.K$:.K$.."".1060..)...K$:G.G
.1:.G.100.1100..)8..K$."".1070..)B...F)L
..1380.T)V.G.0:.1070..)`.. **** GET SEQU
ENTIAL FILE ****..*J. 15:.15,8,15.#*T..2
,8,2,"0:SET-UP,S,R".8*~..15,E1,E2$,E3,E4
.\*...E1.0.."  ."E2$".":.E1..62.1230.R*.
..E1.62.E1.0:.1230..*...2,Z$:NP.0:NS.0..
*..A1$."":.2,A1$,A2$,A3$:.A1$."END".A1$.
"".1210..*..NP.NP.1:NA$(NP).A1$:TY(NP).E
(A2$):CO(NP).E(A3$):.1190.&+..A1$."":.2,
A1$,A2$,A3$,A4$:.A1$."END".A1$."".1230.N
+D.NS.NS.1:SN(NS).E(A1$):SC(NS).E(A2$).P
+I.KP$(NS).A3$:TR$(NS).A4$:.1210.Y+N. 2:
...+X.. *** WRITE SEQUENTIAL FILE****..+
.. 15:.15,8,15.D+...15,"S0:SET-UP,S".Y+.
..15,E1,E2$,E3,E4..+...E1.1.."  ."E2$"."
:.1360..,...E1.62.E1.0. ,...2,8,2,"0:SET
-UP,S,W".5,...15,E1,E2$,E3,E4.Y,(..E1.0.
."  ."E2$".":.E1..62.1360.S,2..2,"SLIDES
HOW SET-UP"..,<..I.1.NP:.2,NA$(I)","TY(I
)","CO(I):.I.N,F..I.1.NS:.2,SN(I)","SC(I
)","KP$(I)","TR$(I):.I.W,P. 2:...,Z.. **
** RING A BELL TONE *****..-D.G.54272:.G
.24,15:.G.1,110.9-I..G.5,9:.G.6,9:.G.4,1
7:.G.4,16.?-N.....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL