0100 ;AUTORUN PICKER›0110 ;BY J.STRAUTMAN/C.JACKSON›0120 ;(c)1989, ANTIC PUBLISHING INC.›0130 CONSOL = $D01F  ;Console keys›0140 DOSVEC = $0A    ;Load DUP.SYS›0150     *=  $8000›0160 START›0170     LDA DOSVEC  ;Grab current›0180     STA VECTOR  ;DOS vector›0190     LDA DOSVEC+1›0200     STA VECTOR+1›0210     LDA CONSOL  ;CONSOL key›0220     AND #$02    ;Is it SELECT?›0230     BNE CONT›0240     JMP (VECTOR) ;Load DUP.SYS›0250 CONT RTS        ;Load AUTORUN›0260 VECTOR›0270     .WORD 0,0›0280     *=  $02E2›0290     .WORD START›0300     .END ›