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