-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathpositionhandler.asm
243 lines (197 loc) · 6.74 KB
/
positionhandler.asm
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
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
@CODE
check_pos: PUSH R0
PUSH R1
LOAD R0 [GB+POS_X] ; Load current x position in R0
LOAD R1 [GB+TARGET_X] ; Load target x position in R1
CMP R0 R1 ; if(current == target)
BEQ x_stop ; then stop the motor.
BLT x_positive ; else if(current < target) then move in positive direction.
LOAD R0 -1 ; else move in negative direction.
STOR R0 [GB+MOTORDIRECTION0]
BRA check_y ; Check the y position.
x_stop: LOAD R0 0 ; Stop the motor.
STOR R0 [GB+MOTORDIRECTION0]
BRA check_y
x_positive: LOAD R0 1 ; Move the motor in positive direction.
STOR R0 [GB+MOTORDIRECTION0]
BRA check_y
check_y: LOAD R0 [GB+POS_Y] ; Load current y position in R0
LOAD R1 [GB+TARGET_Y] ; Load target y position in R1
CMP R0 R1 ; if(current == target)
BEQ y_stop ; then stop the motor.
BLT y_positive ; else if(current < target) then move in positive direction.
LOAD R0 -1 ; else move in negative direction.
STOR R0 [GB+MOTORDIRECTION2]
BRA check_pos_r ; return
y_stop: LOAD R0 0 ; Stop the motor.
STOR R0 [GB+MOTORDIRECTION2]
BRA check_pos_r
y_positive: LOAD R0 1 ; Move the motor in positive direction.
STOR R0 [GB+MOTORDIRECTION2]
BRA check_pos_r
check_pos_r: PULL R1
PULL R0
RTS
;---------------------------------------------------------------------------------;
; INPUT: RO = x; R1 = y
move_to_pos:
PUSH R0
PUSH R1
PUSH R2
PUSH R3
CMP R0 [GB+POS_X]
BNE move_while_begin
CMP R1 [GB+POS_Y]
BEQ move_to_pos_r
move_while_begin:
BRS essential_routines
STOR R0 [GB+TARGET_X]
STOR R1 [GB+TARGET_Y]
LOAD R2 [GB+POS_X]
LOAD R3 [GB+POS_Y]
CMP R2 R0 ;if(x != tarx || y != tarY) => wait
BNE move_while_begin
CMP R3 R1
BNE move_while_begin
CMP R0 3
BNE move_to_pos_r
CMP R1 2
BNE move_to_pos_r
PUSH R0
LOAD R0 2500
BRS sleep_i
PULL R0
LOAD R0 0
STOR R0 [GB+IS_BUSY]
BRS poll_inputs
BRS handle_scanners
LOAD R2 [GB+SCANNEDCOLOR]
CMP R2 1
BEQ move_to_pos_r
LOAD R0 ' 4'
BRA error_state
move_to_pos_r: PULL R3
PULL R2
PULL R1
PULL R0
RTS
;---------------------------------------------------------------------------------;
scan_grid: PUSH R0
PUSH R1
PUSH R2
BRS store_prev_grid
LOAD R0 2
LOAD R1 2
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 1
LOAD R1 2
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 0
LOAD R1 2
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 0
LOAD R1 1
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
; BRS sleep
LOAD R0 0
LOAD R1 0
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 1
LOAD R1 0
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 2
LOAD R1 0
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 2
LOAD R1 1
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
LOAD R0 1
LOAD R1 1
BRS move_to_pos
PUSH R0
;LOAD R0 2500
;BRS sleep_i
PULL R0
;BRS sleep
BRS scan_current_position
BRS color_dsp
;BRS sleep
BRS check_cheating
LOAD R0 0 ; check whether player has won.
BRS check_win
PULL R2
PULL R1
PULL R0
RTS
color_dsp: RTS
LOAD R2 GB
ADD R2 GRID
ADD R2 R0
MULS R1 3
ADD R2 R1
LOAD R2 [R2]
STOR R2 [GB+DSP_DEC]
RTS
@END