You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

vector 1.1KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354
  1. .PAG VECTOR
  2. ECHKSM .BYT 0 ;$E-$F CHECKSUM
  3. NMI JMP (VNMI)
  4. ;
  5. PATCH ;PATCH AREA
  6. PEA7A STA LEDPRT ;PATCH FOR POWER-ON ERRORS
  7. STA LEDOUT ;TURN DDRB TO OUTPUT
  8. JMP REA7D ;RETURN TO LED BLINK CODE
  9. ;
  10. ;---------------------------------------------------
  11. ; PATCH AREA FOR 1541 DISK WITH SLOW SERIAL RECEIVE
  12. ;
  13. SLOWD TXA ; ONLY AFFECT .A
  14. LDX #5 ; INSERT 40US OF DELAY WITH THIS ROUTINE
  15. SLOWE DEX
  16. BNE SLOWE
  17. TAX
  18. RTS
  19. ;
  20. ;---------------------------------------------------
  21. ;
  22. CLKDAT JSR CLKLOW ; NEW CLOCK LOW AND...
  23. JMP DATHI ; DATA HI FOR PATCH AREA
  24. ;
  25. ;---------------------------------------------------
  26. ;
  27. NNMI LDA CMDBUF+2 ; NEW NMI ROUTINE CHECK FOR
  28. CMP #'-'
  29. BEQ NNMI10 ; IF UI- THEN NO DELAY
  30. SEC
  31. SBC #'+'
  32. BNE NMI ; IF NOT UI+ THEN MUST BE A REAL UI COMMAND
  33. NNMI10 STA DRVTRK+1
  34. RTS
  35. ;
  36. ;DEFAULT TABLE FOR USER COMMAND
  37. ;
  38. *= $FFE6
  39. .WORD FORMAT
  40. .WORD TRNOFF
  41. UBLOCK .WORD UBLKRD
  42. .WORD UBLKWT
  43. .SKIP
  44. .WORD $0500 ;LINKS TO BUFFER #2
  45. .WORD $0503
  46. .WORD $0506
  47. .WORD $0509
  48. .WORD $050C
  49. .WORD $050F
  50. *= $FFFA
  51. .WORD NNMI
  52. .WORD DSKINT
  53. .WORD SYSIRQ
  54. .END