›œ¼r&ˆ&INC¨MODE¨LINES¨SLPER¨BPER¨BAS¨B¤FNAME¤A¤BL¤ÉÁOFÆNÏMEMORÙDLAÙLOCÓSPACÅDÌLMEÍHMEÍBYTÅCÈMEÍÆLEFÔNSEÇGRÁNUÍMAØFOURËCÔÊÙLÎOSMODÅ@@@@@@€€€€  !"#MODE MIXER›BY KARL E. WIEGERS›ANTIC MAGAZINE› GG€9@,9@,‚9@,ƒ9@,„9@,…9@, 11†;@ ,‡;@,ˆ;A,‰;@9,26‰7@,. #6‰7@9,.‰26‰7@,.‰IŠ-@@"‹$6ƒ8Š,-‹( ŠI8,10,8,16,8,16,8,4,4,2,1,2,1,1›TŠ-@@"‹$6„8Š,-‹( ŠT40,40,40,40,20,20,10,10,20,20,20,40,40,40›FŠ-@@"‹$6…8Š,-‹( ŠF0,0,0,0,1,2,3,4,5,6,7,7,8,8›'$$Display List Interrupt Routine›(-Š-@"‹)Aq%Š‹- Š2++72,138,72,169,0,162,28,141,10,212,141›<&&23,208,142,24,208,104,170,104,64›F?6Œ-B6-A'6Ž-AP36-A?6‘-A%P##@@K:c Menu›dk +AR@1AYCAUA @gAA˜k n9 #A !Š-@@%%"‹5’%Š%@‹9 Šx9971,0,0,7,6,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,65›‚1’%@“’%@”1AY@4‡@‡@Œ--@-(@ mode íéøåò‘%@‡@!6•-@@% Ž–2-@2(@PICK AN OPTION:›7@‡!6•-@@% Ž7@‚@ 2-@@2(1 - ÃÒÅÁÔÅ A NEW DISPLAY¡)()(2 - ÃÈÁÎÇÅ THE CURRENT DISPLAY¢&(&(3 - ÓÅÅ THE CURRENT DISPLAY£+(+( 4 - ÓÁÖÅ CURRENT DISPLAY ON DISK¤'('(5 - ÌÏÁÄ A DISPLAY FROM DISK¥%(%(6 - ÄÏÎÅ WITH THIS PROGRAMª@‚@¯%@‡@!6•-A`% Ž´$-@$(@?¾)@–6–-–&@HÈ"-@ "(@–ÒQ– @)–!@ ((@G(@ enter only 1-6Q AÜ//–AA A`ApA0æ +ô=Š-@@92@–@@= Šþ=Š-@@92A(@@= Š(%2($&A6”-AV$”%“%•06“-”&AV$P:”'AV,A6”-P:”'AV,0@ˆ“@‰”$XC%6’-F:A`,%AV$F:Aa,46“-F:@ˆ,C6”-F:@‰,b6—-”$AV%“$qHAR@'-@@#H(PRESS ÓÐÁÃÅ ÂÁÒ TO CONTINUEv$)@‹$‹@2A0{$„’%@$A0¢9AA5'A@9BB†A’¬--(% SEG. MODE # LINES SCAN LINES LEFT¶--(% ____ ____ _______ _______________À%%( -- -- -- 192ÊA@$çCreate a New Display›èC +!Š-@@068Š,-?6‚8Š,-C ŠíKAR@!6™-A’-6š-?A6K6˜-òAw@( A ü+6–-š%@–"@! ‘+ A% A@6š-š%@% A .(.( Enter graphics mode for segment –% Ap›%›"A!!›!@*› @A€ Ap$' Œš!A) A." ( ÍÕÓÔ ÂÅ ²­±µ" A@8+(How many mode lines ' A+œ= œ"6š-š&@ $B(œ!*œ+™'ƒ8›,, Œ( AL*  ( ÍÕÓÔ ÂÅ °­P:™'ƒ8›,,* A€V" 68–,-›6‚8–,-œ"6™-™&œ$ƒ8›,`E-@@%–$(@–8-@@%–E(@›e$-@@%–$(@œj$-@(@%–$(@™t$ÏChange Current Display›ÐZ +š" /-@@L(ÎÏ ÄÉÓÐÌÁÙ ÉΠÍÅÍÏÒÙ ÎÏ×P ‘Z AÕGAwA+1AR@; A G6˜-Ú6™-A’Š-@šäH-@@%Š$(@Š8-@@%ŠH(@8Š,î'-@@%Š'(@‚8Š,ø;6™-™&‚8Š,$ƒ88Š,,*-@(@%Š7(@™; Š,(,( Enter segment number to change: % A!–%–"A –!@A €##– @)–!š%@A!6™-™%‚8–,$ƒ88–,,–š%@A!P ;™")š"@ 1(ÄÉÓÐÌÁÙ ÉÓ ÆÕÌÌ; A P*–"š%@A!4; 1(ÍÕÓÔ ÂÅ ÆÒÏÍ ±­š%@&+™",; A P>) A@6š-–&+œ",) A!pf! A@!œA!pkAš"!-@@7(@‰7@,A A PmAš"@!-@@7(@‰7@,A A PpGŠ-–%@š%@/6‚8Š&@,-‚8Š,C68Š&@,-8Š,G Šu16‚8š%@,-168š%@,-z06™-A’Š-@š06™-™&‚8Š,$ƒ88Š,,„L-@@%Š$(@Š8-@@%ŠL(@8Š, ‡,-@@%Š,(@‚8Š, ‰--@(@%Š)(@™ - ŠŽ#(@‰7@,# A P· Load Display from Disk›¸  +A@ :@‚@:( DISPLAYS STORED ON THIS DISKÌ > A0`6Š->@@D:*.DSPÖ @ˆ6Š-Š%@à -@@%Šê "(ˆ7@<@," A00ô @6Š-Š&@ Œþ PŠ" %-@@B(ÎÏ ÄÉÓÐÌÁÙÓ ÏΠÔÈÉÓ ÄÉÓËF ‘P A -@@%Š(‰ F-@@,(LOAD what display:F((0 TO RETURN TO MENU) )-@!@ˆ)ˆ40A&  ˆ4  A10  6‡.D:6‡7@,.ˆ: 6‡7B:‡,%@,..DSPD $$(>:A%,LOADING ‡....N D A1`*@@‡66š-: ŒD A1€X 5  (1(ÃÁÎÎÏÔ ÌÏÁÄ ÆÉÌÅ-ERROR F:A•,5 ‘b  Œ@ A0l $Š-@@ $@ˆv G9ˆ7@<@,4POKE)ˆ7@<@,4POKEG6š-š%@€ <ˆ7@<@ ,4END/@ˆˆˆ2'< A2 Š  Š” 9Š-@@&68Š,-56‚8Š,-9 Šž 6 -@6Ÿ-6@¨ ; 6†.@ˆ;ˆ7@<@,4POKEA2² @ˆ7 < ,4,!AB%ŸA:†,/6Ÿ-Ÿ%@66†.@ A2p¼ 6†7B:†,%@,.ˆ7 < ,Æ O6 - %@ !B:ˆ,+AB%ŸA:†,96Ÿ-Ÿ%@E6 -@O A2@Ð A2PÚ @ä 6£-F:A9,&@dî %Š-@@%£"ŠA30ø  Š B'68@,-Š*6‚8@,-@66 -@B6¡-@ "6 - %@"6£-F:A5% , £"@eA  +£!@e6£-£&@d+6 - %@* * £"8¡, 6‚8¡,-‚8¡,%@* A3@4 %Š-@@%£"ŠA4>  ŠH 6'6¡-¡%@68¡,-Š,6‚8¡,-@6 A3@oSee the Current Display›p! +!š"A zW@‚@((8(The screen will be blackW(briefly while your display„( is created.˜C(%(Press any key when you areC(done viewing the display.¢ ‘@‚@Ô!!8,8,7,7,6,5,0,0,0,1,4,0,2,3›Þ #Aaè."Š-@š!…88Š,,"$'. Aa@ò Šü/+AR@ /AY*Š-@&6€8Š,-* Š$$6ž-P:—'A@–%@,$A@–9A6A'A7A9A8A A9@d%8@,$A@“AA”)6Ÿ-.Š-@š Ab€3$$Š"@*‚8Š,"@Ab€82 -@‚8Š,2Š"@* "@AbpB6—-—%„88Š,,—žAb`L$$6ž-P:—'A@–%@,$A@–V4AB%ŸP:—'AV,*6Ÿ-Ÿ%@4 Abp`C6¡-—&AV$P:—'AV,,AB%Ÿ¡:6Ÿ-Ÿ%@C6€8Š,-¡j4AB%ŸP:—'AV,*6Ÿ-Ÿ%@4 Abpt"AB%Ÿ8Š,"6Ÿ-Ÿ%@~  ˆ  Š Œ’AB%Ÿ@e°9A`'Aa@9AY@4º108,81,64,53,53,64›ÄU #Ac0!Š-@@%"¡9 -@@U2¡@@Î-   Š-2Ø)@‹â#˜"@+# Appì6˜-@ AWSave Display on Disk›X! +!š"A b@&(Enter a ÎÁÍÅ for this display:@((0 TO RETURN TO MENU)l-@@ˆvˆ40A€ 6‡.D: 6‡7B:‡,%@,.ˆŠ6‡7B:‡,%@,..DSP”%˜"6˜-@% A`ž$($(Storing ‡ on disk....¨* Au*@@‡¼G;(@*10 GOSUB 30000:LMEM=PEEK(88):HMEM=PEEK(89)G6¢-@ ÆŠ-@šÐ44(@¢ POKE 87,…88Š,,&+8Š,"@,Ú'Š"@(@' Aqeä116•-‚8Š&@,$„88Š&@,,%€8Š&@,î(@:BYTE=•ø(@ :GOSUB 31000ý6¢-¢%@ Š(@ 29999 END <<(@+30000 POKE 106,PEEK(106)-1:DL=256*PEEK(106)*00(@30010 GRAPHICS  :POKE 559,0>6¢-B HII(@30020 FOR I=0 TO Ÿ%@:READ A:POKE DL+I,A:NEXT IRŠ-@@\(6¢-¢%@((@¢ DATA f -@@p6(6‹-F:A5%@ $+Š&@,% ,6(@‹u5‹"@e(@+6¢-¢%@5 As@z(@,„  Ž##(@F:A5%@ $Š,˜ Š¬G9(@¢& POKE DL+4,PEEK(88):POKE DL+5,PEEK(89)G6¢-¢%@¶::(@¢' POKE 560,0:POKE 561,DL/256:POKE 559,34Ê""(@¢%@ RETURNÔ..(@31000 HMEM=256*HMEM+LMEM+BYTEÞ22(@!31010 LMEM=HMEM-256*INT(HMEM/256)è))(@31020 HMEM=INT(HMEM/256)ò77(@&31030 POKE 88,LMEM:POKE 89,HMEM:RETURNü@ AL-  (-(ÃÁÎÎÏÔ ÓÔÏÒÅ­ÅÒÒÏÒ F:A•,V@` ‘ Ap€D1:MODEMIX.BAS€ Š¬G9(@