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.

34 lines
387B

  1. .PAGE 'DUPLICATE'
  2. ; DUPLICATE DISK
  3. .SKIP
  4. DUPLCT
  5. LDA #BADCMD
  6. JMP CMDERR
  7. .SKIP
  8. ; TRANSFER FORMAT CODE TO BUFFER 0
  9. ; & START CONTROLLER FORMATTING
  10. FORMAT
  11. LDA #$4C
  12. STA BUFS+$300
  13. LDA #<FORMT
  14. STA BUFS+$301
  15. LDA #>FORMT
  16. STA BUFS+$302
  17. ;
  18. LDA #3
  19. JSR SETH
  20. LDA DRVNUM
  21. ORA #EXEC
  22. STA JOBS+3
  23. FMT105 LDA JOBS+3
  24. BMI FMT105
  25. CMP #2
  26. BCC FMT110
  27. LDA #3
  28. LDX #0
  29. JMP ERROR
  30. FMT110 RTS
  31. ;
  32. ;
  33. .END