32000 REM *** CIO SCREEN LOAD ***›32010 OPEN #1,4,0,FILE$›32020 GET #1,MODE:GRAPHICS MODE›32030 FOR I=704 TO 712›32040 GET #1,A:POKE I,A:NEXT I›32050 Q=PEEK(559):POKE 559,0›32070 POKE 850,7›32080 POKE 852,PEEK(88)›32090 POKE 853,PEEK(89)›32100 POKE 856,255›32110 POKE 857,255›32120 X=USR(ADR("hhhͺLVδ"),16)›32130 CLOSE #1›32140 POKE 559,Q›32150 RETURN ›