10 ; CIO SUBROUTINE FOR MICROLOADER›20 ; RELOCATABLE CODE›30  PLA›40 ; OPEN IOCB #3›50  LDX #$30›60 ; SET COMMAND BYTE FOR LOAD›70  LDA #$07›80  STA $0342,X›90 ; SETUP BUFFER›0100  LDA $58›0110  STA $0344,X›0120  LDA $59›0130  STA $0345,X›0140  LDA #$00›0150  STA $0348,X›0160  LDA #$1E›0170  STA $0349,X›0180 ; JUMP TO CIO VECTOR›0190  JSR $E456›0200 ; RETURN FROM USR›0210  RTS›