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.

68 lines
1020B

  1. .PAGE 'LCC.I/O'
  2. ;
  3. CNTST= *
  4. ;
  5. ;
  6. ;
  7. ; DEFS FOR LOW COST CONTROLLER
  8. ;
  9. ;
  10. ; WRITTEN BY GLENN STARK
  11. ; 4/1/80
  12. ;
  13. ;
  14. ; (C) COMMODORE BUSINESS MACHINES
  15. ;
  16. TIMER1 =$1805 ; TIMER 1 COUNTER
  17. ;
  18. ;
  19. ;
  20. ; MOS 6522
  21. ; ADDRESS $1C00
  22. ;
  23. * =$1C00
  24. ;
  25. DSKCNT *=*+1 ; PORT B
  26. ; DISK I/O CONTROL LINES
  27. ; BIT 0: STEP IN
  28. ; BIT 1: STEP OUT
  29. ; BIT 2: -MOTOR ON
  30. ; BIT 3: ACT LED
  31. ; BIT 4: WRITE PROTECT SENSE
  32. ; BIT 5: DENSITY SELECT 0
  33. ; BIT 6: DENSITY SELECT 1
  34. ; BIT 7: SYNC DETECT
  35. ;
  36. ;
  37. DATA2 *=*+1 ; PORT A
  38. ; GCR DATA INPUT AND OUTPUT PORT
  39. ;
  40. DDRB2 *=*+1 ; DATA DIRECTION CONTROL
  41. DDRA2 *=*+1 ; DATA DIRECTION CONTROL
  42. ;
  43. T1LC2 *=*+1 ; TIMER 1 LOW COUNTER
  44. T1HC2 *=*+1 ; TIMER 1 HI COUNTR
  45. ;
  46. T1LL2 *=*+1 ; TIMER 1 LOW LATCH
  47. T1HL2 *=*+1 ; TIMER 1 HI LATCH
  48. ;
  49. T2LL2 *=*+1 ; TIMER TWO LOW LATCH
  50. T2LH2 *=*+1 ; TIMER TWO HI LATCH
  51. ;
  52. SR2 *=*+1 ; SHIFT REGISTER
  53. ;
  54. ACR2 *=*+1
  55. ;
  56. PCR2 *=*+1
  57. ;
  58. IFR2 *=*+1
  59. ;
  60. IER2 *=*+1
  61. ;
  62. ;
  63. * =CNTST
  64. ;
  65. ;
  66. ;
  67. .END