<(49155)18749142:51190: FADE.DATA & TEXT.DATAuA052,92:56,92::A1:Z0:A$(17): AUTO FLAG OFF(203)49Z1FLFL1:45: AUTO-MODE ON/NOT(*=49)AT $CB(203)(203)49Z0: AUTO-MODE OFF RESET Z@ A250: FILE HAS LOADED/DISSOLVE & WAIT 53280,0:53281,0:51200: TEXT.O "PUT YOUR DISK IN THE DRIVE. PRESS A KEY" 198,0:198,1:A$:"":FL0:100: INITIALZE ARRAY/READ DIR.< 198,0:198,1:A$: WAIT FOR KEY BEFORE MENU DISPLAY IFPEEK(203)=63THENPOKE648,4:REM 600:REM STOP KEY RESTORE SCREEN A$"^"Z1:FLFL((FL0)):45: AUTO FLAG ON/NEXT FILE A$"*"10 A$""FLFL1:45: F7 NEXT FILEK A$"D"FL0:6: GET ANOTHER DIRECTORY[ A$"X"600f "" 3)"" 3)" GRAPHICS BY WAYNE SCHMIDT " 3)""  I08:3)""A$(I)""A$(I9)"":E 3)""r "F1 MENU TOGGLE^ AUTO MODE " "F7 NEXT SCREEN* AUTO OFF(HOLD)" " X EXIT PRG D DISK CHANGE " X0:Y0:P$""3 "":(P$,X1);Y165);""A$(X(Y9)): POSITION MASKE A$:A$""31t "":""(P$,X1);Y165);A$(X(Y9)) !A$"X"49155,0:64738 "A$""FLFL1:45: F7 NEXT FILE#A$"^"Z1:FLFL((FL0)):45: AUTO FLAG ON/NEXT FILEE$A$""XX1:X0X8: CURSOR UP MENU SELECT{%A$""XX1:X8X0: CURSOR DOWN&A$""YY1:Y0Y1: CURSOR LEFT COLUMN/RIGHT'A$""YY1:Y1Y0: CURSOR RIGHT COLUMN/LEFT(A$(13)44: C/R ACCEPT`)A$"D"FL0:6: GET ANOTHER DIRECTORY*A$""50: F1 TOGGLE DISSOLVE & WAIT/MENU+30: LOOP FOR INPUT :::::::::::::::::::::::::::::::::::,FL(X(Y9)): WHERE WAS MASK:-FL16FL0: MAX 17 DD FILES~.F$A$(FL):F$"--------------"Z0:FL0:50: LAST FILE--WAIT/A1""0A1491521A(0)02:"DD"F$,8,1249152:10: DISSOLVE & WAITZ -::::::::::::::::::::::::::::::-;dI017:A$(I)"--------------":: INITIALIZE ARRAYae -:::::::::::::::::::::::::::::-n2,8,0,"$0:DD*":#2,A$,A$,A$,A$: READ IN SELECTIVE 'DD' DIR.x200:IN0: CAST OFF DISKNAMEy -:::::::::::::::::::::::::::::-$200:N302:20: BUILD NAMES W/O 'DD'lA$(IN)A$:ININ1:IN17130: ADD TO ARRAY:MAX 17 PICFILESw2:20 -:::::::::::::::::::::::::::::-#2,A$,A$,A$,B$:L(A$(0))256(B$(0)):L$(L) BLOCKSIZE"#2,A$:A$""L$L$A$:210: BUILD NAME UNTIL NULLdN(L$):IN:N30: CHAR.IN NAME:<30= BLOCKS FREE(L$,I,1)(34)II1:230: LOOK FOR END QUOTEA$((L$,9,I9)"",14): SELECT STRIPPED NAME & PAD ===============================X64738:cY53265,27:53272,21: RESTORE NORMAL BASIC SCREENyZ56576,(56576)1[648,4:53281,0:53280,11:" MENU SELECT/DISSOLVE SLIDESHOW"," BY TONY MANSO":" WITH EXTENSIONS BY WAYNE SCHMIDT,NYC"I," ONE MOMENT...":," POKING M/L DATA..."u FADE 49152 49346 :ML:FADE,ML:: 169, 0, 141, 187, 192, 169, 7, 205, 187, 192 176, 3, 76, 152, 192, 172, 187, 192, 169, 0 133, 251, 169, 96, 133, 252, 169, 0, 133, 253E 169, 224, 133, 254, 169, 232, 141, 189, 192, 169y( 3, 141, 190, 192, 173, 189, 192, 13, 190, 1922 201, 0, 208, 3, 76, 112, 192, 177, 251, 145< 253, 165, 251, 24, 105, 8, 133, 251, 165, 252F 105, 0, 133, 252, 165, 253, 24, 105, 8, 133FP 253, 165, 254, 105, 0, 133, 254, 173, 189, 192zZ 56, 233, 1, 141, 189, 192, 173, 189, 192, 201d 255, 240, 3, 76, 109, 192, 206, 190, 192, 76n 44, 192, 169, 1, 141, 188, 192, 169, 2, 205x 188, 192, 176, 3, 76, 146, 192, 173, 18, 208C 201, 0, 208, 3, 76, 140, 192, 76, 127, 192x 238, 188, 192, 76, 117, 192, 238, 187, 192, 76 5, 192, 169, 0, 133, 251, 169, 92, 133, 252 169, 0, 133, 253, 169, 196, 133, 254, 162, 4 160, 0, 177, 251, 145, 253, 200, 208, 249, 230H 254, 230, 252, 202, 208, 242, 96, 255, 255, 255_ 255, 0, 0, 0, 28 TXT 51200 51759 :ML:TXT,ML::ȃ 169, 109, 141, 38, 3, 169, 200, 141, 39, 3 ȃ 76, 87, 200, 169, 255, 133, 254, 169, 0, 133"ȃ 253, 168, 145, 253, 160, 63, 162, 32, 145, 253Xȃ 136, 208, 251, 198, 254, 202, 208, 246, 96, 173(ȃ 134, 2, 10, 10, 10, 10, 141, 46, 202, 1732ȃ 33, 208, 41, 15, 13, 46, 202, 141, 46, 202<ȃ 96, 32, 39, 200, 162, 0, 157, 0, 196, 157Fȃ 0, 197, 157, 0, 198, 232, 208, 244, 162, 232RPȃ 157, 255, 198, 202, 208, 250, 96, 169, 148, 141Zȃ 0, 221, 169, 24, 141, 24, 208, 169, 59, 141dȃ 17, 208, 32, 61, 200, 32, 13, 200, 96, 72nȃ 165, 154, 201, 3, 240, 4, 104, 76, 202, 241xȃ 142, 38, 202, 140, 39, 202, 104, 72, 41, 127Kȃ 201, 13, 208, 13, 169, 0, 141, 44, 202, 141~ȃ 45, 202, 104, 72, 76, 153, 200, 104, 72, 201ȃ 17, 208, 37, 24, 169, 64, 109, 40, 202, 141ȃ 40, 202, 169, 1, 109, 41, 202, 141, 41, 202ȃ 24, 169, 40, 109, 42, 202, 141, 42, 202, 169Fȃ 0, 109, 43, 202, 141, 43, 202, 76, 29, 202yȃ 201, 145, 208, 37, 56, 173, 40, 202, 233, 64ȃ 141, 40, 202, 173, 41, 202, 233, 1, 141, 41ȃ 202, 56, 173, 42, 202, 233, 40, 141, 42, 202ȃ 173, 43, 202, 233, 0, 141, 43, 202, 76, 29Cȃ 202, 201, 157, 208, 43, 173, 44, 202, 208, 18vȃ 173, 45, 202, 208, 13, 169, 56, 141, 44, 202ȃ 169, 1, 141, 45, 202, 76, 194, 200, 56, 173Ƀ 44, 202, 233, 8, 141, 44, 202, 173, 45, 202 Ƀ 233, 0, 141, 45, 202, 76, 29, 202, 201, 29>Ƀ 208, 45, 173, 44, 202, 201, 56, 208, 18, 173n"Ƀ 45, 202, 201, 1, 208, 11, 169, 0, 141, 44,Ƀ 202, 141, 45, 202, 76, 153, 200, 24, 169, 86Ƀ 109, 44, 202, 141, 44, 202, 169, 0, 109, 45 @Ƀ 202, 141, 45, 202, 76, 29, 202, 201, 19, 2087 JɃ 27, 169, 0, 141, 44, 202, 141, 45, 202, 141k TɃ 40, 202, 141, 42, 202, 169, 224, 141, 41, 202 ^Ƀ 169, 196, 141, 43, 202, 76, 29, 202, 201, 147 hɃ 208, 9, 32, 61, 200, 32, 13, 200, 76, 75!rɃ 201, 41, 127, 170, 104, 72, 224, 32, 176, 105!|Ƀ 104, 174, 38, 202, 172, 39, 202, 76, 202, 241f!Ƀ 201, 64, 144, 50, 201, 96, 176, 6, 56, 233!Ƀ 64, 76, 188, 201, 201, 128, 176, 6, 56, 233!Ƀ 32, 76, 188, 201, 201, 160, 176, 5, 105, 64!Ƀ 76, 188, 201, 201, 192, 176, 6, 56, 233, 64."Ƀ 76, 188, 201, 201, 255, 240, 5, 41, 127, 76`"Ƀ 188, 201, 169, 94, 166, 199, 240, 2, 9, 128"Ƀ 160, 0, 132, 252, 10, 38, 252, 10, 38, 252"Ƀ 10, 38, 252, 133, 251, 24, 169, 208, 101, 252"Ƀ 133, 252, 24, 173, 40, 202, 109, 44, 202, 133.#Ƀ 253, 173, 41, 202, 109, 45, 202, 133, 254, 120^#Ƀ 165, 1, 41, 251, 133, 1, 160, 7, 177, 251#Ƀ 145, 253, 136, 16, 249, 165, 1, 9, 4, 133#Ƀ 1, 88, 173, 42, 202, 133, 251, 173, 43, 202#ʃ 133, 252, 173, 45, 202, 74, 173, 44, 202, 106%$ʃ 74, 74, 168, 32, 39, 200, 145, 251, 76, 26X$ʃ 201, 174, 38, 202, 172, 39, 202, 104, 24, 96$&ʃ 0, 0, 0, 224, 0, 196, 0, 0, 0, 227$1,8,15,"S0:SLIDESHOW":1:"SLIDESHOW",8