["o"MAINFILEMODENAMETEMPFILESDPICDLSFILPICPICOROKLPIMEMLMEMHDLISLOHIGWAIRRRRRSSSSSZZZZZFFFFFIIIISKCTCONSOCONSOLNOPICDISKLIDJJ j= Bh @ !"#$%&'()*+,-./012AU3@456789:;dàΛOOThis program displays Micro Illustrator files in a continuous slide show.MMIt loads one file in one part of memory, while it displays another fileQQin a second area of memory. Then it fades the screen to black, switches theNNdisplay list to the newly loaded picture, and fades back up. The programRRruns continuously, showing the selected .PIC" files on a disk. Requires 48K.ee;A0,;A,;@a,;@,;@,;@$@d,;@,;@,m +'0@@A0@@[0@@mAYq%6-F:A`,%AV$F:Aa,9%@ @2M%@'@_AY@4qAR@U-#(>:A%,5-@@U( M A G I C L A N T E R N 3-@@!3(PRESS ANY KEY TO CONTINUEX-@@4(RICHARD Q. FOX [72356,242]X( LEE C. ZION [70155,656]X-@@4(BOB GEAYER [71425,463]X( DOUG LANGE [74365,610]U-@@5(TOM McCOMB [72456,1042]G-@@U( +CREDITS+<-@@<("For Touch Tablet & Koala Pad Files=-@@=(#Please send comments via CompuServe A`##. PUT DISK I/O SUBROUTINES IN"". PAGE FOUR CASSETTE BUFFER.ee162,16,169,0,157,72,3,169,0,157,73,3,32,86,228,192,0,48,9,238,31,4,208,3,238,32,4,96,104,104,96-A$AT "  $$. ROUTINE TO CHANGE GRAPHICS 8. TO GRAPHICS MODE E"GG6.=h01eeAO ݩ֩N`6##. MAIN$ IS A MACHINE LANGUAGE@"". ROUTINE TO DECOMPRESS .PICJ!!. FILES MADE BY THE PROGRAMT"". 'MICRO ILLUSTRATOR' AND TO^##. DISPLAY THEM ON THE SCREEN.rww67@,.dhBDE   D     |ww67A,.d!  XY X!  FD))   ww67A,.d ]GPee`/ee(e--67A,.eee`##67A<A,.>:@4,##67AW<AW,.>:@4,HHTHE FOLLOWING PATCHES DIVERT THE COLOR INFORMATION TO MEMORY $5FC4HHTO $5FC8, AND MAKE THE LOAD ADDRESS FOR THE SCREEN IMAGE VARIABLE.##67A"<A",.>:Ai,##67A#<A#,.>:@,##67A(<A(,.>:Ai,##67A)<A),.>:A),##67@d<@d,.>:@,##67@r<@r,.>:@,##67@<@,.>:@,##67@<@,.>:@,##67@<@,.>:@,--READ DISK DIRECTORY AND FIND .PIC FILES@ +'0@@A0@@[0@@mAY6-F:A`,%AV$F:Aa,-@1 "% !MM5,66,64,156,4,2,2,2,2,0,2,2,2,2,0,2,2,2,2,0,2,2,2,2,5,2,2,2,2,65,32,156"#+AE,#1+AY,@410@@@$U-#(>:A%,5-@U( M A G I C L A N T E R N %7!-@@ 7(NO PICTURES FOUND&KAR@'-@@ C(WHICH DISK DRIVE (1-4)?K6. '! A`"@1!6.1("@06.2)"@&6.3*"@$6.4+4 A@,36-6-'6-36-A -F6.D1:*.PIC)67@<@,.F@@.'6-6-'6-/@0$$7@<@,0 A:6-%@D//67$@&@<$@,.7@,N AYX%"6-@% A@g6-@6-jB-@B((r-@s< AP-%@<(7$@&@<$@,t u6-@6-v AP- (>:A,wB-@B((x7-@@7(PRESS ESCAPE FOR PICTURESy2-@@ 2(PRESS SPACE BAR FOR SHOWz<-@@!<("PRESS CONSOLE SWITCH TO START OVER{W-@@"E(*USE  AND RETURN TO SELECT PICTURESWAR@. A`@$@. A@ AP-( #"@ #6-%@"@(6- A`)"@!@)6-&@)"@!@)6-&@+"@ &@+6-%@@AU"AU!@AUu6-%@Q67$@&@<$@,.7$@&@<$@,[ APi-&@o(*u6-@3A0"A@6- (}0-@ @ 0(=THE SHOW IS STARTING=3-@@!3(PRESS START FOR MAIN MENU7-@@"7(SELECT/PAUSES OPTION/RESUMES@((START LOADING IN THE FIRST PICTURE##67A)<A),.>:@, A @..NOW THAT ITS LOADED, SET UP GRAPHICS 7.5+@%@6-?:C:,,!6-F:@,!6-F:@,%%6-F:A`,%AV$F:Aa,6-%@6-%@,6-@6-@,SPEED OF FADES "". NOW DISPLAY ALL .PIC FILES. FOUND ON THE DISK. DISPLAY LOW, LOAD HI* A FADE DOWN4+%@@+%AA> ApFADE UPH##67A)<A),.>:A),R A @\DISPLAY HI, LOAD LOWf A FADE DOWNp+%@A)+%AADz ApFADE UP##67A)<A),.>:@, A @ A++SUBROUTINE TO PICK AND LOAD A PICTURE6-%@@w"@A `-@AP) Ap"@'') A@"@ A X  A `# Ap@# A X!A06.D1: C"@(C67@<@,.7$@&@<$@,C@(C67@<@,.7$@&@<$@,67@<@,.-@@+7<,4 67,..PIC!'+ A   @@6-?:C:,,@$KKTHAT'S THE LAST PICTURE, PUT THE TITLE UP WHILE WE LOAD THE FIRST ONEX6-!+@%@3-@@N @ MAGIC LANTERNX A**SUBROUTINE TO SET UP THE FADE VALUES$N6-F:A,!6-F:A ,06-F:A,?6-F:A,N6-F:A,.I6-'@6-'@-6-'@;6-'@I6-'@80 6-P:,6-P:,6-P:,'6-P:,06-P:,BI6-$@6-$@-6-$@;6-$@I6-$@L$VFADEOUT SUBROUTINE`% A`6-6-6-%6-j""__Begin fadeout_____________t 6-& AP:,~ A 6-& A P:, A  6-& AP:, A 6-& AP:, A99F:A,)F:A ,)F:A,)F:A,A@""__End fadeout_____________$FADEIN SUBROUTINE##__Begin fadein after new pic_N6-F:BE,!6-F:BE,06-F:BE,?6-F:BE,N6-F:BE , Ap  -AP:,  -A P:,  -AP:, ( -AP:, 2##__End fadein_______________<$d&6-@$P:+&@,'@,66-&%@a6-@$P:+&@,'@,%@d$oKEYBOARD INPUT ROUTINEp!6-F:B7u,!6-F:B7i,q Ap@$r!AQA`s"AGA`t'!@c6-&@d' A`u$X6-F:B2y,Z'!@6-&@' Ap\$ D:MAGICL.ESC