þþQ EIF'A PROGRAM TO COPY OS ROMS INTO RAMA(X;2ÀP…HIPTR;;COPY FROM C000Q>8"P†LOWPTR;;TO 3800,%>6-'…HIPTR;;LOW BYTES OF BOTH POINTERS ARE 00@ '†LOWPTRJ2$>Ï;;IF WE COPIED CFxx, WE ARE NOW AT I/O PAGETX;^…LOOP1Q@…HIPTR7h'P@†LOWPTR7;;SAVE 256 BYTES AT A TIMEr3| H…LOOP1† (…HIPTR#H†INCPT1;;IF DONE WITH C000 PAGEšQ>פ/P…HIPTR;;CONTINUE AT D800 (SKIP I/O PAGE)®†INCPT1#†LOWPTR¸-#…HIPTR;;WHEN WE INCREMENT TO 0000, ALLÂ(H…LOOP1;;HAS BEEN SAVED, FALL THROUGHÌX;ÖQ>Àà P…HIPTR;;COPYING INTO C000êQ>8ôP†LOWPTR;;FROM 3800þX;:X; DISABLE INT AND NMI UNTIL VECTORS ETC. ARE IN PLACEX; =;;INT&Q>0P…NMIEN;;NMI:X;D'X; DISABLE THE OS ROMS (ENABLE RAM)NX;XQ>ÿ†OSROMSb!M…XLMAP;;ENABLE RAM IN OS AREAl P…XLMAPvX;€7X; COPY CODE FROM ROMS BACK UP INTO RAM NOW ENABLEDŠX;”…LOOP2Q@†LOWPTR7ž+P@…HIPTR7;;COPY 256 BYTES PER SMALL LOOP¨3² H…LOOP2¼%(…HIPTR;;IF DONE WITH C000 PAGEÆ H†INCPT2ÐQ>×Ú4P…HIPTR;;STEP OVER I/O PAGE AND RESUME AT D800ä†INCPT2#†LOWPTRî #…HIPTRø0H…LOOP2;;IF WE HAVE COPIED FFFF, FALL THROUGHX; %X; RESTORE NMI AND INT PROCESSINGX; Q>@* P…NMIEN4.>X;H,X; THEN LOAD IN NEW FLOATING POINT CODE!RX;\Q>'f P„ICMDpQ>†FPNAMEÿz$>†FPNAME„ P„IBUF;;POINT TO FILE NAMEŽ&„IBUF˜Q>;;NO EXECUTE OR INIT¢ P„IAUX¬$>;;USE IOCB $10¶*!„CIOV;;DO LOAD OF BINARY FILE AND EXITÀX;Ê4†FPNAME AD1:FASTFP.OBJA;;NEW FLOATING POINT CODEÔ