Subversion Repositories svnkaklik

Rev

Rev 324 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 324 Rev 325
Line 43... Line 43...
43 
0218  D7FE      	BRA	label268438551
 43 
0218  D7FE      	BRA	label268438551
44 
 
 44 
 
45 
	Loop
 45 
	Loop
46 
	receive = rcreg
 46 
	receive = rcreg
47 
021A  50AE      	MOVF gbl_rcreg, W
 47 
021A  50AE      	MOVF gbl_rcreg, W
48 
021C  6E09      	MOVWF CompTempVarRet489
 48 
021C  6E0D      	MOVWF CompTempVarRet489
49 
 
 49 
 
50
50
51 
End Function
 51 
End Function
52 
021E  0012      	RETURN
 52 
021E  0012      	RETURN
53 
 
 53 
 
Line 58... Line 58...
58 
0204            label268438562
 58 
0204            label268438562
59 
0204  A89E      	BTFSS gbl_pir1,4
 59 
0204  A89E      	BTFSS gbl_pir1,4
60 
0206  D7FE      	BRA	label268438562
 60 
0206  D7FE      	BRA	label268438562
61 
 
 61 
 
62 
	txreg = c
 62 
	txreg = c
63 
0208  5009      	MOVF send_00000_arg_c, W
 63 
0208  500D      	MOVF send_00000_arg_c, W
64 
020A  6EAD      	MOVWF gbl_txreg
 64 
020A  6EAD      	MOVWF gbl_txreg
65 
 
 65 
 
66 
End Sub
 66 
End Sub
67 
020C  0012      	RETURN
 67 
020C  0012      	RETURN
68 
 
 68 
 
Line 72... Line 72...
72 
	Dim motors As Byte
 72 
	Dim motors As Byte
73 
	Dim sensors As Byte
 73 
	Dim sensors As Byte
74 
	Dim buttons As Byte
 74 
	Dim buttons As Byte
75 
	Dim leds As Byte
 75 
	Dim leds As Byte
76 
	Dim count As Long
 76 
	Dim count As Long
- 
 
 77 
	Dim cas As Long
77 
	Dim i As Long
 78 
	Dim i As Long
78 
 
 79 
 
79 
	'NASTAVENI IO
 80 
	'NASTAVENI IO
80 
	lata=0xFF
 81 
	lata=0xFF
81 
0220  6889      	SETF gbl_lata
 82 
0220  6889      	SETF gbl_lata
Line 138... Line 139...
138 
	motors = 0x00
 139 
	motors = 0x00
139 
0256  6A01      	CLRF main_1_motors
 140 
0256  6A01      	CLRF main_1_motors
140 
 
 141 
 
141
142
142 
    do while (portb.0 = 1)
 143 
    do while (portb.0 = 1)
143 
0258            label268438598
 144 
0258            label268438599
144 
0258  B081      	BTFSC gbl_portb,0
 145 
0258  B081      	BTFSC gbl_portb,0
145 
025A  D7FE      	BRA	label268438598
 146 
025A  D7FE      	BRA	label268438599
146 
 
 147 
 
147 
	loop
 148 
	loop
148 
 
 149 
 
149 
	leds = 0xF0
 150 
	leds = 0xF0
150 
025C  0EF0      	MOVLW 0xF0
 151 
025C  0EF0      	MOVLW 0xF0
Line 159... Line 160...
159 
026A  6E06      	MOVWF main_1_count+D'2'
 160 
026A  6E06      	MOVWF main_1_count+D'2'
160 
026C  6A07      	CLRF main_1_count+D'3'
 161 
026C  6A07      	CLRF main_1_count+D'3'
161 
 
 162 
 
162
163
163 
	do while (count > 0)
 164 
	do while (count > 0)
164 
026E            label268438603
 165 
026E            label268438604
165 
026E  5007      	MOVF main_1_count+D'3', W
 166 
026E  5007      	MOVF main_1_count+D'3', W
166 
0270  0800      	SUBLW 0x00
 167 
0270  0800      	SUBLW 0x00
167 
0272  E108      	BNZ	label268438604
 168 
0272  E108      	BNZ	label268438605
168 
0274  5006      	MOVF main_1_count+D'2', W
 169 
0274  5006      	MOVF main_1_count+D'2', W
169 
0276  0800      	SUBLW 0x00
 170 
0276  0800      	SUBLW 0x00
170 
0278  E105      	BNZ	label268438604
 171 
0278  E105      	BNZ	label268438605
171 
027A  5005      	MOVF main_1_count+D'1', W
 172 
027A  5005      	MOVF main_1_count+D'1', W
172 
027C  0800      	SUBLW 0x00
 173 
027C  0800      	SUBLW 0x00
173 
027E  E102      	BNZ	label268438604
 174 
027E  E102      	BNZ	label268438605
174 
0280  5004      	MOVF main_1_count, W
 175 
0280  5004      	MOVF main_1_count, W
175 
0282  0800      	SUBLW 0x00
 176 
0282  0800      	SUBLW 0x00
176 
0284            label268438604
 177 
0284            label268438605
177 
0284  BE07      	BTFSC main_1_count+D'3',7
 178 
0284  BE07      	BTFSC main_1_count+D'3',7
178 
0286  80D8      	BSF STATUS,C
 179 
0286  80D8      	BSF STATUS,C
179 
0288  E24A      	BC	label268438608
 180 
0288  E24A      	BC	label268438609
180 
 
 181 
 
181 
		count = count -1
 182 
		count = count -1
182 
028A  0E01      	MOVLW 0x01
 183 
028A  0E01      	MOVLW 0x01
183 
028C  5C04      	SUBWF main_1_count, W
 184 
028C  5C04      	SUBWF main_1_count, W
184 
028E  6E09      	MOVWF CompTempVar492
 185 
028E  6E0D      	MOVWF CompTempVar492
185 
0290  0E00      	MOVLW 0x00
 186 
0290  0E00      	MOVLW 0x00
186 
0292  6E0A      	MOVWF CompTempVar496
 187 
0292  6E0E      	MOVWF CompTempVar496
187 
0294  A0D8      	BTFSS STATUS,C
 188 
0294  A0D8      	BTFSS STATUS,C
188 
0296  3C0A      	INCFSZ CompTempVar496, W
 189 
0296  3C0E      	INCFSZ CompTempVar496, W
189 
0298  5E05      	SUBWF main_1_count+D'1', F
 190 
0298  5E05      	SUBWF main_1_count+D'1', F
190 
029A  0E00      	MOVLW 0x00
 191 
029A  0E00      	MOVLW 0x00
191 
029C  6E0A      	MOVWF CompTempVar496
 192 
029C  6E0E      	MOVWF CompTempVar496
192 
029E  A0D8      	BTFSS STATUS,C
 193 
029E  A0D8      	BTFSS STATUS,C
193 
02A0  3C0A      	INCFSZ CompTempVar496, W
 194 
02A0  3C0E      	INCFSZ CompTempVar496, W
194 
02A2  5E06      	SUBWF main_1_count+D'2', F
 195 
02A2  5E06      	SUBWF main_1_count+D'2', F
195 
02A4  0E00      	MOVLW 0x00
 196 
02A4  0E00      	MOVLW 0x00
196 
02A6  6E0A      	MOVWF CompTempVar496
 197 
02A6  6E0E      	MOVWF CompTempVar496
197 
02A8  A0D8      	BTFSS STATUS,C
 198 
02A8  A0D8      	BTFSS STATUS,C
198 
02AA  3C0A      	INCFSZ CompTempVar496, W
 199 
02AA  3C0E      	INCFSZ CompTempVar496, W
199 
02AC  5E07      	SUBWF main_1_count+D'3', F
 200 
02AC  5E07      	SUBWF main_1_count+D'3', F
200 
02AE  5009      	MOVF CompTempVar492, W
 201 
02AE  500D      	MOVF CompTempVar492, W
201 
02B0  6E04      	MOVWF main_1_count
 202 
02B0  6E04      	MOVWF main_1_count
202 
 
 203 
 
203
204
204 
		if count < 300000 then
 205 
		if count < 300000 then
205 
02B2  0E00      	MOVLW 0x00
 206 
02B2  0E00      	MOVLW 0x00
206 
02B4  5C07      	SUBWF main_1_count+D'3', W
 207 
02B4  5C07      	SUBWF main_1_count+D'3', W
207 
02B6  E108      	BNZ	label268438620
 208 
02B6  E108      	BNZ	label268438621
208 
02B8  0E04      	MOVLW 0x04
 209 
02B8  0E04      	MOVLW 0x04
209 
02BA  5C06      	SUBWF main_1_count+D'2', W
 210 
02BA  5C06      	SUBWF main_1_count+D'2', W
210 
02BC  E105      	BNZ	label268438620
 211 
02BC  E105      	BNZ	label268438621
211 
02BE  0E93      	MOVLW 0x93
 212 
02BE  0E93      	MOVLW 0x93
212 
02C0  5C05      	SUBWF main_1_count+D'1', W
 213 
02C0  5C05      	SUBWF main_1_count+D'1', W
213 
02C2  E102      	BNZ	label268438620
 214 
02C2  E102      	BNZ	label268438621
214 
02C4  0EE0      	MOVLW 0xE0
 215 
02C4  0EE0      	MOVLW 0xE0
215 
02C6  5C04      	SUBWF main_1_count, W
 216 
02C6  5C04      	SUBWF main_1_count, W
216 
02C8            label268438620
 217 
02C8            label268438621
217 
02C8  E302      	BNC	label4026532500
 218 
02C8  E302      	BNC	label4026532557
218 
02CA  AE07      	BTFSS main_1_count+D'3',7
 219 
02CA  AE07      	BTFSS main_1_count+D'3',7
219 
02CC  D003      	BRA	label268438624
 220 
02CC  D003      	BRA	label268438625
220 
02CE            label4026532500
 221 
02CE            label4026532557
221 
02D4            label268438624
 222 
02D4            label268438625
222 
 
 223 
 
223 
			leds = leds | 1
 224 
			leds = leds | 1
224 
02CE  0E01      	MOVLW 0x01
 225 
02CE  0E01      	MOVLW 0x01
225 
02D0  1003      	IORWF main_1_leds, W
 226 
02D0  1003      	IORWF main_1_leds, W
226 
02D2  6E03      	MOVWF main_1_leds
 227 
02D2  6E03      	MOVWF main_1_leds
227 
 
 228 
 
228 
		end if
 229 
		end if
229 
		if count < 200000 then
 230 
		if count < 200000 then
230 
02D4  0E00      	MOVLW 0x00
 231 
02D4  0E00      	MOVLW 0x00
231 
02D6  5C07      	SUBWF main_1_count+D'3', W
 232 
02D6  5C07      	SUBWF main_1_count+D'3', W
232 
02D8  E108      	BNZ	label268438626
 233 
02D8  E108      	BNZ	label268438627
233 
02DA  0E03      	MOVLW 0x03
 234 
02DA  0E03      	MOVLW 0x03
234 
02DC  5C06      	SUBWF main_1_count+D'2', W
 235 
02DC  5C06      	SUBWF main_1_count+D'2', W
235 
02DE  E105      	BNZ	label268438626
 236 
02DE  E105      	BNZ	label268438627
236 
02E0  0E0D      	MOVLW 0x0D
 237 
02E0  0E0D      	MOVLW 0x0D
237 
02E2  5C05      	SUBWF main_1_count+D'1', W
 238 
02E2  5C05      	SUBWF main_1_count+D'1', W
238 
02E4  E102      	BNZ	label268438626
 239 
02E4  E102      	BNZ	label268438627
239 
02E6  0E40      	MOVLW 0x40
 240 
02E6  0E40      	MOVLW 0x40
240 
02E8  5C04      	SUBWF main_1_count, W
 241 
02E8  5C04      	SUBWF main_1_count, W
241 
02EA            label268438626
 242 
02EA            label268438627
242 
02EA  E302      	BNC	label4026532501
 243 
02EA  E302      	BNC	label4026532558
243 
02EC  AE07      	BTFSS main_1_count+D'3',7
 244 
02EC  AE07      	BTFSS main_1_count+D'3',7
244 
02EE  D003      	BRA	label268438630
 245 
02EE  D003      	BRA	label268438631
245 
02F0            label4026532501
 246 
02F0            label4026532558
246 
02F6            label268438630
 247 
02F6            label268438631
247 
 
 248 
 
248 
			leds = leds | 2
 249 
			leds = leds | 2
249 
02F0  0E02      	MOVLW 0x02
 250 
02F0  0E02      	MOVLW 0x02
250 
02F2  1003      	IORWF main_1_leds, W
 251 
02F2  1003      	IORWF main_1_leds, W
251 
02F4  6E03      	MOVWF main_1_leds
 252 
02F4  6E03      	MOVWF main_1_leds
252 
 
 253 
 
253 
		end if
 254 
		end if
254 
		if count < 100000 then
 255 
		if count < 100000 then
255 
02F6  0E00      	MOVLW 0x00
 256 
02F6  0E00      	MOVLW 0x00
256 
02F8  5C07      	SUBWF main_1_count+D'3', W
 257 
02F8  5C07      	SUBWF main_1_count+D'3', W
257 
02FA  E108      	BNZ	label268438632
 258 
02FA  E108      	BNZ	label268438633
258 
02FC  0E01      	MOVLW 0x01
 259 
02FC  0E01      	MOVLW 0x01
259 
02FE  5C06      	SUBWF main_1_count+D'2', W
 260 
02FE  5C06      	SUBWF main_1_count+D'2', W
260 
0300  E105      	BNZ	label268438632
 261 
0300  E105      	BNZ	label268438633
261 
0302  0E86      	MOVLW 0x86
 262 
0302  0E86      	MOVLW 0x86
262 
0304  5C05      	SUBWF main_1_count+D'1', W
 263 
0304  5C05      	SUBWF main_1_count+D'1', W
263 
0306  E102      	BNZ	label268438632
 264 
0306  E102      	BNZ	label268438633
264 
0308  0EA0      	MOVLW 0xA0
 265 
0308  0EA0      	MOVLW 0xA0
265 
030A  5C04      	SUBWF main_1_count, W
 266 
030A  5C04      	SUBWF main_1_count, W
266 
030C            label268438632
 267 
030C            label268438633
267 
030C  E302      	BNC	label4026532502
 268 
030C  E302      	BNC	label4026532559
268 
030E  AE07      	BTFSS main_1_count+D'3',7
 269 
030E  AE07      	BTFSS main_1_count+D'3',7
269 
0310  D003      	BRA	label268438636
 270 
0310  D003      	BRA	label268438637
270 
0312            label4026532502
 271 
0312            label4026532559
271 
0318            label268438636
 272 
0318            label268438637
272 
 
 273 
 
273 
			leds = leds | 4
 274 
			leds = leds | 4
274 
0312  0E04      	MOVLW 0x04
 275 
0312  0E04      	MOVLW 0x04
275 
0314  1003      	IORWF main_1_leds, W
 276 
0314  1003      	IORWF main_1_leds, W
276 
0316  6E03      	MOVWF main_1_leds
 277 
0316  6E03      	MOVWF main_1_leds
Line 279... Line 280...
279 
		lata = leds
 280 
		lata = leds
280 
0318  5003      	MOVF main_1_leds, W
 281 
0318  5003      	MOVF main_1_leds, W
281 
031A  6E89      	MOVWF gbl_lata
 282 
031A  6E89      	MOVWF gbl_lata
282 
 
 283 
 
283 
	loop
 284 
	loop
284 
031C  D7A8      	BRA	label268438603
 285 
031C  D7A8      	BRA	label268438604
285 
031E            label268438608
 286 
031E            label268438609
286 
 
 287 
 
287 
	lata = 0xFF
 288 
	lata = 0xFF
288 
031E  6889      	SETF gbl_lata
 289 
031E  6889      	SETF gbl_lata
289 
 
 290 
 
290 
 
 291 
 
291
292
292 
Do while 1
 293 
Do while 1
293 
0320            label268438640
 294 
0320            label268438641
294 
 
 295 
 
- 
 
 296 
  cas = 0
- 
 
 297 
0320  6A08      	CLRF main_1_cas
- 
 
 298 
0322  6A09      	CLRF main_1_cas+D'1'
- 
 
 299 
0324  6A0A      	CLRF main_1_cas+D'2'
- 
 
 300 
0326  6A0B      	CLRF main_1_cas+D'3'
295 
 
 301 
 
296 
  sensors =0xFF
302 
  sensors =0xFF
297 
0320  6802      	SETF main_1_sensors
 303 
0328  6802      	SETF main_1_sensors
298 
 
 304 
 
299 
  sensors = Call receive()	'prijmi stav cidel senzoru
 305 
  sensors = Call receive()	'prijmi stav cidel senzoru
300 
0322  EC07F001  	CALL receive_00000
 306 
032A  EC07F001  	CALL receive_00000
301 
0326  5009      	MOVF CompTempVarRet489, W
 307 
032E  500D      	MOVF CompTempVarRet489, W
302 
0328  6E02      	MOVWF main_1_sensors
 308 
0330  6E02      	MOVWF main_1_sensors
303 
 
 309 
 
304
310
305 
  If (!((sensors.0) and (sensors.1))) Then
 311 
  If (!((sensors.0) and (sensors.1))) Then
306 
032A  6A08      	CLRF CompTempVar491
 312 
0332  6A0C      	CLRF CompTempVar491
307 
032C  A202      	BTFSS main_1_sensors,1
 313 
0334  A202      	BTFSS main_1_sensors,1
308 
032E  D003      	BRA	label268438645
 314 
0336  D003      	BRA	label268438647
309 
0330  A002      	BTFSS main_1_sensors,0
 315 
0338  A002      	BTFSS main_1_sensors,0
310 
0332  D001      	BRA	label268438645
 316 
033A  D001      	BRA	label268438647
311 
0334  2A08      	INCF CompTempVar491, F
 317 
033C  2A0C      	INCF CompTempVar491, F
312 
0336            label268438645
 318 
033E            label268438647
313 
0336  5208      	MOVF CompTempVar491, F
 319 
033E  520C      	MOVF CompTempVar491, F
314 
0338  E102      	BNZ	label268438646
 320 
0340  E102      	BNZ	label268438648
315 
033E            label268438646
 321 
0346            label268438648
316 
 
 322 
 
317 
    motors = 0x77
 323 
    motors = 0x77
318 
033A  0E77      	MOVLW 0x77
 324 
0342  0E77      	MOVLW 0x77
319 
033C  6E01      	MOVWF main_1_motors
 325 
0344  6E01      	MOVWF main_1_motors
320 
 
 326 
 
321 
  End If
 327 
  End If
322
328
323 
  If (!(sensors.2)) Then
 329 
  If (!(sensors.2)) Then
324 
033E  B402      	BTFSC main_1_sensors,2
 330 
0346  B402      	BTFSC main_1_sensors,2
325 
0340  D002      	BRA	label268438649
 331 
0348  D01B      	BRA	label268438651
- 
 
 332 
0380            label268438651
- 
 
 333 
 
- 
 
 334 
    If cas< 400000 Then
- 
 
 335 
034A  0E00      	MOVLW 0x00
- 
 
 336 
034C  5C0B      	SUBWF main_1_cas+D'3', W
- 
 
 337 
034E  E108      	BNZ	label268438653
- 
 
 338 
0350  0E06      	MOVLW 0x06
- 
 
 339 
0352  5C0A      	SUBWF main_1_cas+D'2', W
- 
 
 340 
0354  E105      	BNZ	label268438653
- 
 
 341 
0356  0E1A      	MOVLW 0x1A
- 
 
 342 
0358  5C09      	SUBWF main_1_cas+D'1', W
- 
 
 343 
035A  E102      	BNZ	label268438653
- 
 
 344 
035C  0E80      	MOVLW 0x80
- 
 
 345 
035E  5C08      	SUBWF main_1_cas, W
326 
0346            label268438649
 346 
0360            label268438653
- 
 
 347 
0360  E302      	BNC	label4026532563
- 
 
 348 
0362  AE0B      	BTFSS main_1_cas+D'3',7
- 
 
 349 
0364  D007      	BRA	label4026532566
- 
 
 350 
0366            label4026532563
- 
 
 351 
 
- 
 
 352 
      cas = cas + 1
- 
 
 353 
0366  2A08      	INCF main_1_cas, F
- 
 
 354 
0368  B4D8      	BTFSC STATUS,Z
- 
 
 355 
036A  2A09      	INCF main_1_cas+D'1', F
- 
 
 356 
036C  B4D8      	BTFSC STATUS,Z
- 
 
 357 
036E  2A0A      	INCF main_1_cas+D'2', F
- 
 
 358 
0370  B4D8      	BTFSC STATUS,Z
- 
 
 359 
0372  2A0B      	INCF main_1_cas+D'3', F
- 
 
 360 
0374            label4026532566
- 
 
 361 
 
- 
 
 362 
    End If
- 
 
 363 
    cas = 0
- 
 
 364 
0374  6A08      	CLRF main_1_cas
- 
 
 365 
0376  6A09      	CLRF main_1_cas+D'1'
- 
 
 366 
0378  6A0A      	CLRF main_1_cas+D'2'
- 
 
 367 
037A  6A0B      	CLRF main_1_cas+D'3'
327 
 
 368 
 
328 
    motors = 0xF7
 369 
    motors = 0xF7
329 
0342  0EF7      	MOVLW 0xF7
 370 
037C  0EF7      	MOVLW 0xF7
330 
0344  6E01      	MOVWF main_1_motors
 371 
037E  6E01      	MOVWF main_1_motors
331 
 
 372 
 
332 
  End If
 373 
  End If
333
374
334 
  If (!(sensors.3)) Then
 375 
  If (!(sensors.3)) Then
335 
0346  B602      	BTFSC main_1_sensors,3
 376 
0380  B602      	BTFSC main_1_sensors,3
336 
0348  D002      	BRA	label268438652
 377 
0382  D01B      	BRA	label268438668
- 
 
 378 
03BA            label268438668
- 
 
 379 
 
- 
 
 380 
    If cas< 400000 Then
- 
 
 381 
0384  0E00      	MOVLW 0x00
- 
 
 382 
0386  5C0B      	SUBWF main_1_cas+D'3', W
- 
 
 383 
0388  E108      	BNZ	label268438670
- 
 
 384 
038A  0E06      	MOVLW 0x06
- 
 
 385 
038C  5C0A      	SUBWF main_1_cas+D'2', W
- 
 
 386 
038E  E105      	BNZ	label268438670
- 
 
 387 
0390  0E1A      	MOVLW 0x1A
- 
 
 388 
0392  5C09      	SUBWF main_1_cas+D'1', W
- 
 
 389 
0394  E102      	BNZ	label268438670
- 
 
 390 
0396  0E80      	MOVLW 0x80
- 
 
 391 
0398  5C08      	SUBWF main_1_cas, W
337 
034E            label268438652
 392 
039A            label268438670
- 
 
 393 
039A  E302      	BNC	label4026532568
- 
 
 394 
039C  AE0B      	BTFSS main_1_cas+D'3',7
- 
 
 395 
039E  D007      	BRA	label4026532571
- 
 
 396 
03A0            label4026532568
- 
 
 397 
 
- 
 
 398 
      cas = cas + 1
- 
 
 399 
03A0  2A08      	INCF main_1_cas, F
- 
 
 400 
03A2  B4D8      	BTFSC STATUS,Z
- 
 
 401 
03A4  2A09      	INCF main_1_cas+D'1', F
- 
 
 402 
03A6  B4D8      	BTFSC STATUS,Z
- 
 
 403 
03A8  2A0A      	INCF main_1_cas+D'2', F
- 
 
 404 
03AA  B4D8      	BTFSC STATUS,Z
- 
 
 405 
03AC  2A0B      	INCF main_1_cas+D'3', F
- 
 
 406 
03AE            label4026532571
- 
 
 407 
 
- 
 
 408 
    End If
- 
 
 409 
    cas = 0
- 
 
 410 
03AE  6A08      	CLRF main_1_cas
- 
 
 411 
03B0  6A09      	CLRF main_1_cas+D'1'
- 
 
 412 
03B2  6A0A      	CLRF main_1_cas+D'2'
- 
 
 413 
03B4  6A0B      	CLRF main_1_cas+D'3'
338 
 
 414 
 
339 
    motors = 0x7F
 415 
    motors = 0x7F
340 
034A  0E7F      	MOVLW 0x7F
 416 
03B6  0E7F      	MOVLW 0x7F
341 
034C  6E01      	MOVWF main_1_motors
 417 
03B8  6E01      	MOVWF main_1_motors
342 
 
 418 
 
343 
  End If
419 
  End If
344
420
- 
 
 421 
  cas = cas+1
- 
 
 422 
03BA  2A08      	INCF main_1_cas, F
- 
 
 423 
03BC  B4D8      	BTFSC STATUS,Z
- 
 
 424 
03BE  2A09      	INCF main_1_cas+D'1', F
- 
 
 425 
03C0  B4D8      	BTFSC STATUS,Z
- 
 
 426 
03C2  2A0A      	INCF main_1_cas+D'2', F
- 
 
 427 
03C4  B4D8      	BTFSC STATUS,Z
- 
 
 428 
03C6  2A0B      	INCF main_1_cas+D'3', F
- 
 
 429 
 
345 
  lata = sensors
 430 
  lata = sensors
346 
034E  5002      	MOVF main_1_sensors, W
 431 
03C8  5002      	MOVF main_1_sensors, W
347 
0350  6E89      	MOVWF gbl_lata
 432 
03CA  6E89      	MOVWF gbl_lata
348 
 
 433 
 
349 
  call send(motors)
 434 
  call send(motors)
350 
0352  5001      	MOVF main_1_motors, W
 435 
03CC  5001      	MOVF main_1_motors, W
351 
0354  6E09      	MOVWF send_00000_arg_c
 436 
03CE  6E0D      	MOVWF send_00000_arg_c
352 
0356  EC02F001  	CALL send_00000
 437 
03D0  EC02F001  	CALL send_00000
353 
 
 438 
 
354
439
355 
Loop
 440 
Loop
356 
035A  D7E2      	BRA	label268438640
 441 
03D4  D7A5      	BRA	label268438641
357 
 
 442 
 
358
443
359 
End Sub
 444 
End Sub
360 
 
 445 
 
361 
 
 446 
 
362 
////////////////////////////////////////
 447 
////////////////////////////////////////
363 
// Code with no source :-)
 448 
// Code with no source :-)
364 
////////////////////////////////////////
 449 
////////////////////////////////////////
365 
0200  EFAEF001  	GOTO	_startup
 450 
0200  EFEBF001  	GOTO	_startup
366 
 
 451 
 
367 
 
 452 
 
368 
035C            _startup
 453 
03D6            _startup
369 
035C  EF10F001  	GOTO	main
 454 
03D6  EF10F001  	GOTO	main
370 
 
 455 
 
371 
300000  FEFF      	DW 0xFEFF
 456 
300000  FEFF      	DW 0xFEFF
372 
300002  FEF6      	DW 0xFEF6
 457 
300002  FEF6      	DW 0xFEF6
373 
300004  FEFF      	DW 0xFEFF
 458 
300004  FEFF      	DW 0xFEFF
374 
300006  FFFB      	DW 0xFFFB
 459 
300006  FFFB      	DW 0xFFFB