|
1 | 1 | assume adl=1
|
2 | 2 |
|
3 |
| -mpTmr2Counter := 0F20010h |
| 3 | +mpTmr1Counter := 0F20000h |
4 | 4 | mpTmrCtrl := 0F20030h
|
5 | 5 |
|
6 |
| -bTmr2Enable := 3 |
7 |
| -bTmr2Crystal := 4 |
8 |
| -bTmr2Overflow := 5 |
9 |
| -bTmr2CountUp := 10 |
| 6 | +bTmr1Enable := 0 |
| 7 | +bTmr1Crystal := 1 |
| 8 | +bTmr1Overflow := 2 |
| 9 | +bTmr1CountUp := 9 |
10 | 10 |
|
11 | 11 | public _errno
|
12 | 12 | _errno := $D008DC
|
@@ -114,30 +114,30 @@ fini_functions:
|
114 | 114 | section .init.clock
|
115 | 115 | public ___init_clock
|
116 | 116 | ___init_clock:
|
117 |
| -; Disable the timer and configure it to use the 32768Hz crystal timer, not |
| 117 | +; Disable timer 1 and configure it to use the 32768Hz crystal timer, not |
118 | 118 | ; generate an interurrupt on overflow, and count up.
|
119 |
| -assert bTmr2CountUp / 8 = 1 |
| 119 | +assert bTmr1CountUp / 8 = 1 |
120 | 120 | ld hl, mpTmrCtrl + 1
|
121 |
| - set bTmr2CountUp - 8, (hl) |
| 121 | + set bTmr1CountUp - 8, (hl) |
122 | 122 | dec hl
|
123 |
| -assert bTmr2Enable / 8 = 0 |
124 |
| - res bTmr2Enable, (hl) |
125 |
| -assert bTmr2Crystal / 8 = 0 |
126 |
| - set bTmr2Crystal, (hl) |
127 |
| -assert bTmr2Overflow / 8 = 0 |
128 |
| - res bTmr2Overflow, (hl) |
| 123 | +assert bTmr1Enable / 8 = 0 |
| 124 | + res bTmr1Enable, (hl) |
| 125 | +assert bTmr1Crystal / 8 = 0 |
| 126 | + set bTmr1Crystal, (hl) |
| 127 | +assert bTmr1Overflow / 8 = 0 |
| 128 | + res bTmr1Overflow, (hl) |
129 | 129 | ; Set the counter to zero.
|
130 |
| -assert mpTmrCtrl shr 8 = (mpTmr2Counter + 1) shr 8 |
131 |
| - ld l, (mpTmr2Counter + 1) and $FF |
| 130 | +assert mpTmrCtrl shr 8 = (mpTmr1Counter + 1) shr 8 |
| 131 | + ld l, (mpTmr1Counter + 1) and $FF |
132 | 132 | ld de, 0
|
133 | 133 | ld (hl), de
|
134 | 134 | dec hl
|
135 | 135 | ld (hl), e
|
136 | 136 | ; Enable the timer.
|
137 |
| -assert bTmr2Enable / 8 = 0 |
138 |
| -assert mpTmr2Counter shr 8 = mpTmrCtrl shr 8 |
| 137 | +assert bTmr1Enable / 8 = 0 |
| 138 | +assert mpTmr1Counter shr 8 = mpTmrCtrl shr 8 |
139 | 139 | ld l, mpTmrCtrl and $FF
|
140 |
| - set bTmr2Enable, (hl) |
| 140 | + set bTmr1Enable, (hl) |
141 | 141 |
|
142 | 142 | section .text
|
143 | 143 | private ___rerun_handler
|
|
0 commit comments