Subversion Repositories svnkaklik

Compare Revisions

Ignore whitespace Rev 323 → Rev 324

/roboti/Robiada/2007/SW/robot/_.obj
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/roboti/Robiada/2007/SW/robot/robot.asm
6,7 → 6,7
;/////////////////////////////////////////////////////////////////////////////////
 
include "P18F252.inc"
__HEAPSTART EQU 0x00000007 ; Start address of heap
__HEAPSTART EQU 0x0000000B ; Start address of heap
__HEAPEND EQU 0x000005FF ; End address of heap
gbl_status EQU 0x00000FD8 ; bytes:1
gbl_prodl EQU 0x00000FF3 ; bytes:1
103,13 → 103,15
gbl_tosl EQU 0x00000FFD ; bytes:1
gbl_tosh EQU 0x00000FFE ; bytes:1
gbl_tosu EQU 0x00000FFF ; bytes:1
CompTempVarRet489 EQU 0x00000006 ; bytes:1
send_00000_arg_c EQU 0x00000006 ; bytes:1
CompTempVarRet489 EQU 0x00000009 ; bytes:1
send_00000_arg_c EQU 0x00000009 ; bytes:1
main_1_motors EQU 0x00000001 ; bytes:1
main_1_sensors EQU 0x00000002 ; bytes:1
main_1_leds EQU 0x00000003 ; bytes:1
main_1_count EQU 0x00000004 ; bytes:1
CompTempVar491 EQU 0x00000005 ; bytes:1
main_1_count EQU 0x00000004 ; bytes:4
CompTempVar491 EQU 0x00000008 ; bytes:1
CompTempVar492 EQU 0x00000009 ; bytes:1
CompTempVar496 EQU 0x0000000A ; bytes:1
ORG 0x00000200
GOTO _startup
ORG 0x00000204
176,28 → 178,113
MOVWF main_1_leds
MOVLW 0x80
MOVWF main_1_count
MOVLW 0x1A
MOVWF main_1_count+D'1'
MOVLW 0x06
MOVWF main_1_count+D'2'
CLRF main_1_count+D'3'
label268438603
MOVF main_1_count+D'3', W
SUBLW 0x00
BNZ label268438604
MOVF main_1_count+D'2', W
SUBLW 0x00
BNZ label268438604
MOVF main_1_count+D'1', W
SUBLW 0x00
BNZ label268438604
MOVF main_1_count, W
SUBLW 0x00
BC label268438604
DECF main_1_count, W
label268438604
BTFSC main_1_count+D'3',7
BSF STATUS,C
BC label268438608
MOVLW 0x01
SUBWF main_1_count, W
MOVWF CompTempVar492
MOVLW 0x00
MOVWF CompTempVar496
BTFSS STATUS,C
INCFSZ CompTempVar496, W
SUBWF main_1_count+D'1', F
MOVLW 0x00
MOVWF CompTempVar496
BTFSS STATUS,C
INCFSZ CompTempVar496, W
SUBWF main_1_count+D'2', F
MOVLW 0x00
MOVWF CompTempVar496
BTFSS STATUS,C
INCFSZ CompTempVar496, W
SUBWF main_1_count+D'3', F
MOVF CompTempVar492, W
MOVWF main_1_count
MOVLW 0x00
SUBWF main_1_count+D'3', W
BNZ label268438620
MOVLW 0x04
SUBWF main_1_count+D'2', W
BNZ label268438620
MOVLW 0x93
SUBWF main_1_count+D'1', W
BNZ label268438620
MOVLW 0xE0
SUBWF main_1_count, W
label268438620
BNC label4026532500
BTFSS main_1_count+D'3',7
BRA label268438624
label4026532500
MOVLW 0x01
IORWF main_1_leds, W
MOVWF main_1_leds
label268438624
MOVLW 0x00
SUBWF main_1_count+D'3', W
BNZ label268438626
MOVLW 0x03
SUBWF main_1_count+D'2', W
BNZ label268438626
MOVLW 0x0D
SUBWF main_1_count+D'1', W
BNZ label268438626
MOVLW 0x40
SUBWF main_1_count, W
label268438626
BNC label4026532501
BTFSS main_1_count+D'3',7
BRA label268438630
label4026532501
MOVLW 0x02
IORWF main_1_leds, W
MOVWF main_1_leds
label268438630
MOVLW 0x00
SUBWF main_1_count+D'3', W
BNZ label268438632
MOVLW 0x01
SUBWF main_1_count+D'2', W
BNZ label268438632
MOVLW 0x86
SUBWF main_1_count+D'1', W
BNZ label268438632
MOVLW 0xA0
SUBWF main_1_count, W
label268438632
BNC label4026532502
BTFSS main_1_count+D'3',7
BRA label268438636
label4026532502
MOVLW 0x04
IORWF main_1_leds, W
MOVWF main_1_leds
label268438636
MOVF main_1_leds, W
MOVWF gbl_lata
BRA label268438603
label268438604
SETF main_1_leds
label268438608
SETF gbl_lata
label268438619
label268438640
SETF main_1_sensors
CALL receive_00000
MOVF CompTempVarRet489, W
204,35 → 291,35
MOVWF main_1_sensors
CLRF CompTempVar491
BTFSS main_1_sensors,1
BRA label268438624
BRA label268438645
BTFSS main_1_sensors,0
BRA label268438624
BRA label268438645
INCF CompTempVar491, F
label268438624
label268438645
MOVF CompTempVar491, F
BNZ label268438625
BNZ label268438646
MOVLW 0x77
MOVWF main_1_motors
label268438625
label268438646
BTFSC main_1_sensors,2
BRA label268438628
BRA label268438649
MOVLW 0xF7
MOVWF main_1_motors
label268438628
label268438649
BTFSC main_1_sensors,3
BRA label268438631
BRA label268438652
MOVLW 0x7F
MOVWF main_1_motors
label268438631
label268438652
MOVF main_1_sensors, W
MOVWF gbl_lata
MOVF main_1_motors, W
MOVWF send_00000_arg_c
CALL send_00000
BRA label268438619
BRA label268438640
; } main function end
 
ORG 0x000002C6
ORG 0x0000035C
_startup
GOTO main
ORG 0x00300000
/roboti/Robiada/2007/SW/robot/robot.bas
38,7 → 38,7
Dim sensors As Byte
Dim buttons As Byte
Dim leds As Byte
Dim count As Byte
Dim count As Long
Dim i As Long
 
'NASTAVENI IO
82,7 → 82,6
end if
lata = leds
loop
leds = 0xFF
lata = 0xFF
 
/roboti/Robiada/2007/SW/robot/robot.casm
45,7 → 45,7
Loop
receive = rcreg
021A 50AE MOVF gbl_rcreg, W
021C 6E06 MOVWF CompTempVarRet489
021C 6E09 MOVWF CompTempVarRet489
 
End Function
60,7 → 60,7
0206 D7FE BRA label268438562
 
txreg = c
0208 5006 MOVF send_00000_arg_c, W
0208 5009 MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
 
End Sub
73,7 → 73,7
Dim sensors As Byte
Dim buttons As Byte
Dim leds As Byte
Dim count As Byte
Dim count As Long
Dim i As Long
 
'NASTAVENI IO
153,121 → 153,207
count = 400000
0260 0E80 MOVLW 0x80
0262 6E04 MOVWF main_1_count
0264 0E1A MOVLW 0x1A
0266 6E05 MOVWF main_1_count+D'1'
0268 0E06 MOVLW 0x06
026A 6E06 MOVWF main_1_count+D'2'
026C 6A07 CLRF main_1_count+D'3'
 
do while (count > 0)
0264 label268438603
0264 5004 MOVF main_1_count, W
0266 0800 SUBLW 0x00
0268 E20E BC label268438604
026E label268438603
026E 5007 MOVF main_1_count+D'3', W
0270 0800 SUBLW 0x00
0272 E108 BNZ label268438604
0274 5006 MOVF main_1_count+D'2', W
0276 0800 SUBLW 0x00
0278 E105 BNZ label268438604
027A 5005 MOVF main_1_count+D'1', W
027C 0800 SUBLW 0x00
027E E102 BNZ label268438604
0280 5004 MOVF main_1_count, W
0282 0800 SUBLW 0x00
0284 label268438604
0284 BE07 BTFSC main_1_count+D'3',7
0286 80D8 BSF STATUS,C
0288 E24A BC label268438608
 
count = count -1
026A 0404 DECF main_1_count, W
026C 6E04 MOVWF main_1_count
028A 0E01 MOVLW 0x01
028C 5C04 SUBWF main_1_count, W
028E 6E09 MOVWF CompTempVar492
0290 0E00 MOVLW 0x00
0292 6E0A MOVWF CompTempVar496
0294 A0D8 BTFSS STATUS,C
0296 3C0A INCFSZ CompTempVar496, W
0298 5E05 SUBWF main_1_count+D'1', F
029A 0E00 MOVLW 0x00
029C 6E0A MOVWF CompTempVar496
029E A0D8 BTFSS STATUS,C
02A0 3C0A INCFSZ CompTempVar496, W
02A2 5E06 SUBWF main_1_count+D'2', F
02A4 0E00 MOVLW 0x00
02A6 6E0A MOVWF CompTempVar496
02A8 A0D8 BTFSS STATUS,C
02AA 3C0A INCFSZ CompTempVar496, W
02AC 5E07 SUBWF main_1_count+D'3', F
02AE 5009 MOVF CompTempVar492, W
02B0 6E04 MOVWF main_1_count
 
if count < 300000 then
02B2 0E00 MOVLW 0x00
02B4 5C07 SUBWF main_1_count+D'3', W
02B6 E108 BNZ label268438620
02B8 0E04 MOVLW 0x04
02BA 5C06 SUBWF main_1_count+D'2', W
02BC E105 BNZ label268438620
02BE 0E93 MOVLW 0x93
02C0 5C05 SUBWF main_1_count+D'1', W
02C2 E102 BNZ label268438620
02C4 0EE0 MOVLW 0xE0
02C6 5C04 SUBWF main_1_count, W
02C8 label268438620
02C8 E302 BNC label4026532500
02CA AE07 BTFSS main_1_count+D'3',7
02CC D003 BRA label268438624
02CE label4026532500
02D4 label268438624
 
leds = leds | 1
026E 0E01 MOVLW 0x01
0270 1003 IORWF main_1_leds, W
0272 6E03 MOVWF main_1_leds
02CE 0E01 MOVLW 0x01
02D0 1003 IORWF main_1_leds, W
02D2 6E03 MOVWF main_1_leds
 
end if
if count < 200000 then
02D4 0E00 MOVLW 0x00
02D6 5C07 SUBWF main_1_count+D'3', W
02D8 E108 BNZ label268438626
02DA 0E03 MOVLW 0x03
02DC 5C06 SUBWF main_1_count+D'2', W
02DE E105 BNZ label268438626
02E0 0E0D MOVLW 0x0D
02E2 5C05 SUBWF main_1_count+D'1', W
02E4 E102 BNZ label268438626
02E6 0E40 MOVLW 0x40
02E8 5C04 SUBWF main_1_count, W
02EA label268438626
02EA E302 BNC label4026532501
02EC AE07 BTFSS main_1_count+D'3',7
02EE D003 BRA label268438630
02F0 label4026532501
02F6 label268438630
 
leds = leds | 2
0274 0E02 MOVLW 0x02
0276 1003 IORWF main_1_leds, W
0278 6E03 MOVWF main_1_leds
02F0 0E02 MOVLW 0x02
02F2 1003 IORWF main_1_leds, W
02F4 6E03 MOVWF main_1_leds
 
end if
if count < 100000 then
02F6 0E00 MOVLW 0x00
02F8 5C07 SUBWF main_1_count+D'3', W
02FA E108 BNZ label268438632
02FC 0E01 MOVLW 0x01
02FE 5C06 SUBWF main_1_count+D'2', W
0300 E105 BNZ label268438632
0302 0E86 MOVLW 0x86
0304 5C05 SUBWF main_1_count+D'1', W
0306 E102 BNZ label268438632
0308 0EA0 MOVLW 0xA0
030A 5C04 SUBWF main_1_count, W
030C label268438632
030C E302 BNC label4026532502
030E AE07 BTFSS main_1_count+D'3',7
0310 D003 BRA label268438636
0312 label4026532502
0318 label268438636
 
leds = leds | 4
027A 0E04 MOVLW 0x04
027C 1003 IORWF main_1_leds, W
027E 6E03 MOVWF main_1_leds
0312 0E04 MOVLW 0x04
0314 1003 IORWF main_1_leds, W
0316 6E03 MOVWF main_1_leds
 
end if
lata = leds
0280 5003 MOVF main_1_leds, W
0282 6E89 MOVWF gbl_lata
0318 5003 MOVF main_1_leds, W
031A 6E89 MOVWF gbl_lata
 
loop
0284 D7EF BRA label268438603
0286 label268438604
031C D7A8 BRA label268438603
031E label268438608
 
leds = 0xFF
0286 6803 SETF main_1_leds
 
lata = 0xFF
0288 6889 SETF gbl_lata
031E 6889 SETF gbl_lata
 
 
Do while 1
028A label268438619
0320 label268438640
 
 
sensors =0xFF
028A 6802 SETF main_1_sensors
0320 6802 SETF main_1_sensors
 
sensors = Call receive() 'prijmi stav cidel senzoru
028C EC07F001 CALL receive_00000
0290 5006 MOVF CompTempVarRet489, W
0292 6E02 MOVWF main_1_sensors
0322 EC07F001 CALL receive_00000
0326 5009 MOVF CompTempVarRet489, W
0328 6E02 MOVWF main_1_sensors
 
If (!((sensors.0) and (sensors.1))) Then
0294 6A05 CLRF CompTempVar491
0296 A202 BTFSS main_1_sensors,1
0298 D003 BRA label268438624
029A A002 BTFSS main_1_sensors,0
029C D001 BRA label268438624
029E 2A05 INCF CompTempVar491, F
02A0 label268438624
02A0 5205 MOVF CompTempVar491, F
02A2 E102 BNZ label268438625
02A8 label268438625
032A 6A08 CLRF CompTempVar491
032C A202 BTFSS main_1_sensors,1
032E D003 BRA label268438645
0330 A002 BTFSS main_1_sensors,0
0332 D001 BRA label268438645
0334 2A08 INCF CompTempVar491, F
0336 label268438645
0336 5208 MOVF CompTempVar491, F
0338 E102 BNZ label268438646
033E label268438646
 
motors = 0x77
02A4 0E77 MOVLW 0x77
02A6 6E01 MOVWF main_1_motors
033A 0E77 MOVLW 0x77
033C 6E01 MOVWF main_1_motors
 
End If
If (!(sensors.2)) Then
02A8 B402 BTFSC main_1_sensors,2
02AA D002 BRA label268438628
02B0 label268438628
033E B402 BTFSC main_1_sensors,2
0340 D002 BRA label268438649
0346 label268438649
 
motors = 0xF7
02AC 0EF7 MOVLW 0xF7
02AE 6E01 MOVWF main_1_motors
0342 0EF7 MOVLW 0xF7
0344 6E01 MOVWF main_1_motors
 
End If
If (!(sensors.3)) Then
02B0 B602 BTFSC main_1_sensors,3
02B2 D002 BRA label268438631
02B8 label268438631
0346 B602 BTFSC main_1_sensors,3
0348 D002 BRA label268438652
034E label268438652
 
motors = 0x7F
02B4 0E7F MOVLW 0x7F
02B6 6E01 MOVWF main_1_motors
034A 0E7F MOVLW 0x7F
034C 6E01 MOVWF main_1_motors
 
End If
lata = sensors
02B8 5002 MOVF main_1_sensors, W
02BA 6E89 MOVWF gbl_lata
034E 5002 MOVF main_1_sensors, W
0350 6E89 MOVWF gbl_lata
 
call send(motors)
02BC 5001 MOVF main_1_motors, W
02BE 6E06 MOVWF send_00000_arg_c
02C0 EC02F001 CALL send_00000
0352 5001 MOVF main_1_motors, W
0354 6E09 MOVWF send_00000_arg_c
0356 EC02F001 CALL send_00000
 
Loop
02C4 D7E2 BRA label268438619
035A D7E2 BRA label268438640
 
End Sub
276,11 → 362,11
////////////////////////////////////////
// Code with no source :-)
////////////////////////////////////////
0200 EF63F001 GOTO _startup
0200 EFAEF001 GOTO _startup
 
 
02C6 _startup
02C6 EF10F001 GOTO main
035C _startup
035C EF10F001 GOTO main
 
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
/roboti/Robiada/2007/SW/robot/robot.cof
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
/roboti/Robiada/2007/SW/robot/robot.hex
1,17 → 1,26
:020000040000FA
:1002000063EF01F09EA8FED70650AD6E1200ABA2C0
:1002100002D0AB98AB889EAAFED7AE50066E1200F5
:10020000AEEF01F09EA8FED70950AD6E1200ABA272
:1002100002D0AB98AB889EAAFED7AE50096E1200F2
:1002200089688A6A8B68F00E926E3F0E936E9F0EFD
:10023000946EC60EC16EC00EC26E400EAF6EFB0E47
:10024000AC14AC6E200EAC10AC6E100EAB10AB6EDE
:10025000800EAB10AB6E016A81B0FED7F00E036E5C
:10026000800E046E045000080EE20404046E010EB9
:100270000310036E020E0310036E040E0310036ED0
:100280000350896EEFD703688968026807EC01F0B4
:100290000650026E056A02A203D002A001D0052A10
:1002A000055202E1770E016E02B402D0F70E016E24
:1002B00002B602D07F0E016E0250896E0150066EAA
:0A02C00002EC01F0E2D710EF01F0AC
:10026000800E046E1A0E056E060E066E076A0750A3
:10027000000808E10650000805E10550000802E109
:100280000450000807BED8804AE2010E045C096EE3
:10029000000E0A6ED8A00A3C055E000E0A6ED8A0B9
:1002A0000A3C065E000E0A6ED8A00A3C075E0950A2
:1002B000046E000E075C08E1040E065C05E1930E77
:1002C000055C02E1E00E045C02E307AE03D0010E20
:1002D0000310036E000E075C08E1030E065C05E1E7
:1002E0000D0E055C02E1400E045C02E307AE03D094
:1002F000020E0310036E000E075C08E1010E065C9F
:1003000005E1860E055C02E1A00E045C02E307AE87
:1003100003D0040E0310036E0350896EA8D78968BA
:10032000026807EC01F00950026E086A02A203D0CD
:1003300002A001D0082A085202E1770E016E02B431
:1003400002D0F70E016E02B602D07F0E016E02508F
:10035000896E0150096E02EC01F0E2D710EF01F056
:020000040030CA
:0E000000FFFEF6FEFFFEFBFFF03FFF9FFFBF7F
:00000001FF
/roboti/Robiada/2007/SW/robot/robot.lst
6,7 → 6,7
;/////////////////////////////////////////////////////////////////////////////////
 
ORG 0x00000200
0200 EF63F001 GOTO _startup
0200 EFAEF001 GOTO _startup
ORG 0x00000204
0204 send_00000
0204 ; { send ; function begin
13,7 → 13,7
0204 label268438562
0204 A89E BTFSS gbl_pir1,4
0206 D7FE BRA label268438562
0208 5006 MOVF send_00000_arg_c, W
0208 5009 MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
020C 0012 RETURN
020E ; } send function end
29,7 → 29,7
0216 AA9E BTFSS gbl_pir1,5
0218 D7FE BRA label268438551
021A 50AE MOVF gbl_rcreg, W
021C 6E06 MOVWF CompTempVarRet489
021C 6E09 MOVWF CompTempVarRet489
021E 0012 RETURN
0220 ; } receive function end
 
71,65 → 71,150
025E 6E03 MOVWF main_1_leds
0260 0E80 MOVLW 0x80
0262 6E04 MOVWF main_1_count
0264 label268438603
0264 5004 MOVF main_1_count, W
0266 0800 SUBLW 0x00
0268 E20E BC label268438604
026A 0404 DECF main_1_count, W
026C 6E04 MOVWF main_1_count
026E 0E01 MOVLW 0x01
0270 1003 IORWF main_1_leds, W
0272 6E03 MOVWF main_1_leds
0274 0E02 MOVLW 0x02
0276 1003 IORWF main_1_leds, W
0278 6E03 MOVWF main_1_leds
027A 0E04 MOVLW 0x04
027C 1003 IORWF main_1_leds, W
027E 6E03 MOVWF main_1_leds
0280 5003 MOVF main_1_leds, W
0282 6E89 MOVWF gbl_lata
0284 D7EF BRA label268438603
0286 label268438604
0286 6803 SETF main_1_leds
0288 6889 SETF gbl_lata
028A label268438619
028A 6802 SETF main_1_sensors
028C EC07F001 CALL receive_00000
0290 5006 MOVF CompTempVarRet489, W
0292 6E02 MOVWF main_1_sensors
0294 6A05 CLRF CompTempVar491
0296 A202 BTFSS main_1_sensors,1
0298 D003 BRA label268438624
029A A002 BTFSS main_1_sensors,0
029C D001 BRA label268438624
029E 2A05 INCF CompTempVar491, F
02A0 label268438624
02A0 5205 MOVF CompTempVar491, F
02A2 E102 BNZ label268438625
02A4 0E77 MOVLW 0x77
02A6 6E01 MOVWF main_1_motors
02A8 label268438625
02A8 B402 BTFSC main_1_sensors,2
02AA D002 BRA label268438628
02AC 0EF7 MOVLW 0xF7
02AE 6E01 MOVWF main_1_motors
02B0 label268438628
02B0 B602 BTFSC main_1_sensors,3
02B2 D002 BRA label268438631
02B4 0E7F MOVLW 0x7F
02B6 6E01 MOVWF main_1_motors
02B8 label268438631
02B8 5002 MOVF main_1_sensors, W
02BA 6E89 MOVWF gbl_lata
02BC 5001 MOVF main_1_motors, W
02BE 6E06 MOVWF send_00000_arg_c
02C0 EC02F001 CALL send_00000
02C4 D7E2 BRA label268438619
02C6 ; } main function end
0264 0E1A MOVLW 0x1A
0266 6E05 MOVWF main_1_count+D'1'
0268 0E06 MOVLW 0x06
026A 6E06 MOVWF main_1_count+D'2'
026C 6A07 CLRF main_1_count+D'3'
026E label268438603
026E 5007 MOVF main_1_count+D'3', W
0270 0800 SUBLW 0x00
0272 E108 BNZ label268438604
0274 5006 MOVF main_1_count+D'2', W
0276 0800 SUBLW 0x00
0278 E105 BNZ label268438604
027A 5005 MOVF main_1_count+D'1', W
027C 0800 SUBLW 0x00
027E E102 BNZ label268438604
0280 5004 MOVF main_1_count, W
0282 0800 SUBLW 0x00
0284 label268438604
0284 BE07 BTFSC main_1_count+D'3',7
0286 80D8 BSF STATUS,C
0288 E24A BC label268438608
028A 0E01 MOVLW 0x01
028C 5C04 SUBWF main_1_count, W
028E 6E09 MOVWF CompTempVar492
0290 0E00 MOVLW 0x00
0292 6E0A MOVWF CompTempVar496
0294 A0D8 BTFSS STATUS,C
0296 3C0A INCFSZ CompTempVar496, W
0298 5E05 SUBWF main_1_count+D'1', F
029A 0E00 MOVLW 0x00
029C 6E0A MOVWF CompTempVar496
029E A0D8 BTFSS STATUS,C
02A0 3C0A INCFSZ CompTempVar496, W
02A2 5E06 SUBWF main_1_count+D'2', F
02A4 0E00 MOVLW 0x00
02A6 6E0A MOVWF CompTempVar496
02A8 A0D8 BTFSS STATUS,C
02AA 3C0A INCFSZ CompTempVar496, W
02AC 5E07 SUBWF main_1_count+D'3', F
02AE 5009 MOVF CompTempVar492, W
02B0 6E04 MOVWF main_1_count
02B2 0E00 MOVLW 0x00
02B4 5C07 SUBWF main_1_count+D'3', W
02B6 E108 BNZ label268438620
02B8 0E04 MOVLW 0x04
02BA 5C06 SUBWF main_1_count+D'2', W
02BC E105 BNZ label268438620
02BE 0E93 MOVLW 0x93
02C0 5C05 SUBWF main_1_count+D'1', W
02C2 E102 BNZ label268438620
02C4 0EE0 MOVLW 0xE0
02C6 5C04 SUBWF main_1_count, W
02C8 label268438620
02C8 E302 BNC label4026532500
02CA AE07 BTFSS main_1_count+D'3',7
02CC D003 BRA label268438624
02CE label4026532500
02CE 0E01 MOVLW 0x01
02D0 1003 IORWF main_1_leds, W
02D2 6E03 MOVWF main_1_leds
02D4 label268438624
02D4 0E00 MOVLW 0x00
02D6 5C07 SUBWF main_1_count+D'3', W
02D8 E108 BNZ label268438626
02DA 0E03 MOVLW 0x03
02DC 5C06 SUBWF main_1_count+D'2', W
02DE E105 BNZ label268438626
02E0 0E0D MOVLW 0x0D
02E2 5C05 SUBWF main_1_count+D'1', W
02E4 E102 BNZ label268438626
02E6 0E40 MOVLW 0x40
02E8 5C04 SUBWF main_1_count, W
02EA label268438626
02EA E302 BNC label4026532501
02EC AE07 BTFSS main_1_count+D'3',7
02EE D003 BRA label268438630
02F0 label4026532501
02F0 0E02 MOVLW 0x02
02F2 1003 IORWF main_1_leds, W
02F4 6E03 MOVWF main_1_leds
02F6 label268438630
02F6 0E00 MOVLW 0x00
02F8 5C07 SUBWF main_1_count+D'3', W
02FA E108 BNZ label268438632
02FC 0E01 MOVLW 0x01
02FE 5C06 SUBWF main_1_count+D'2', W
0300 E105 BNZ label268438632
0302 0E86 MOVLW 0x86
0304 5C05 SUBWF main_1_count+D'1', W
0306 E102 BNZ label268438632
0308 0EA0 MOVLW 0xA0
030A 5C04 SUBWF main_1_count, W
030C label268438632
030C E302 BNC label4026532502
030E AE07 BTFSS main_1_count+D'3',7
0310 D003 BRA label268438636
0312 label4026532502
0312 0E04 MOVLW 0x04
0314 1003 IORWF main_1_leds, W
0316 6E03 MOVWF main_1_leds
0318 label268438636
0318 5003 MOVF main_1_leds, W
031A 6E89 MOVWF gbl_lata
031C D7A8 BRA label268438603
031E label268438608
031E 6889 SETF gbl_lata
0320 label268438640
0320 6802 SETF main_1_sensors
0322 EC07F001 CALL receive_00000
0326 5009 MOVF CompTempVarRet489, W
0328 6E02 MOVWF main_1_sensors
032A 6A08 CLRF CompTempVar491
032C A202 BTFSS main_1_sensors,1
032E D003 BRA label268438645
0330 A002 BTFSS main_1_sensors,0
0332 D001 BRA label268438645
0334 2A08 INCF CompTempVar491, F
0336 label268438645
0336 5208 MOVF CompTempVar491, F
0338 E102 BNZ label268438646
033A 0E77 MOVLW 0x77
033C 6E01 MOVWF main_1_motors
033E label268438646
033E B402 BTFSC main_1_sensors,2
0340 D002 BRA label268438649
0342 0EF7 MOVLW 0xF7
0344 6E01 MOVWF main_1_motors
0346 label268438649
0346 B602 BTFSC main_1_sensors,3
0348 D002 BRA label268438652
034A 0E7F MOVLW 0x7F
034C 6E01 MOVWF main_1_motors
034E label268438652
034E 5002 MOVF main_1_sensors, W
0350 6E89 MOVWF gbl_lata
0352 5001 MOVF main_1_motors, W
0354 6E09 MOVWF send_00000_arg_c
0356 EC02F001 CALL send_00000
035A D7E2 BRA label268438640
035C ; } main function end
 
ORG 0x000002C6
02C6 _startup
02C6 EF10F001 GOTO main
ORG 0x0000035C
035C _startup
035C EF10F001 GOTO main
ORG 0x00300000
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
/roboti/Robiada/2007/SW/robot/robot.stat
3,6 → 3,6
#GLOBAL:"global",line = 0,ram = 0.0,rom = 0;
receive(void):"robot.bas",line = 21,ram = 1.0,rom = 18;
send(unsigned char):"robot.bas",line = 32,ram = 0.0,rom = 10;
main(void):"robot.bas",line = 45,ram = 5.4,rom = 166;
main(void):"robot.bas",line = 45,ram = 10.4,rom = 316;
_startup(void):"NoSourceFile",line = 0,ram = 0.0,rom = 4;
#HEAP_BLOCK: 0, 7, 1529;
#HEAP_BLOCK: 0, 11, 1525;