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 õ