Subversion Repositories svnkaklik

Compare Revisions

Ignore whitespace Rev 320 → Rev 321

/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/makefile.gen
4,7 → 4,7
@"C:\Program Files\SourceBoost\boostbasic.pic18.exe" -t PIC18F252 _.bas
 
robot.hex: _.obj
@"C:\Program Files\SourceBoost\boostlink.pic.exe" /ld "C:\Program Files\SourceBoost\lib" libc.pic18.lib _.obj /t PIC18F252 /d "C:\Documents and Settings\Robiada\Desktop\SW\vzor" /p robot -rb 0x200
@"C:\Program Files\SourceBoost\boostlink.pic.exe" /ld "C:\Program Files\SourceBoost\lib" libc.pic18.lib _.obj /t PIC18F252 /d "C:\Documents and Settings\katka\Plocha\SW\robot" /p robot -rb 0x200
 
all: robot.hex
 
/roboti/Robiada/2007/SW/robot/robot.asm
6,7 → 6,7
;/////////////////////////////////////////////////////////////////////////////////
 
include "P18F252.inc"
__HEAPSTART EQU 0x0000000B ; Start address of heap
__HEAPSTART EQU 0x00000008 ; Start address of heap
__HEAPEND EQU 0x000005FF ; End address of heap
gbl_status EQU 0x00000FD8 ; bytes:1
gbl_prodl EQU 0x00000FF3 ; bytes:1
103,28 → 103,17
gbl_tosl EQU 0x00000FFD ; bytes:1
gbl_tosh EQU 0x00000FFE ; bytes:1
gbl_tosu EQU 0x00000FFF ; bytes:1
CompTempVarRet489 EQU 0x0000000A ; bytes:1
send_00000_arg_c EQU 0x0000000A ; bytes:1
CompTempVarRet489 EQU 0x00000007 ; bytes:1
send_00000_arg_c EQU 0x00000004 ; bytes:1
delay_00000_arg_cas EQU 0x00000004 ; bytes:1
delay_00000_1_i EQU 0x00000005 ; bytes:1
delay_00000_1_x EQU 0x00000006 ; 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_leds1 EQU 0x00000004 ; bytes:1
main_1_buttons EQU 0x00000005 ; bytes:1
main_1_i EQU 0x00000006 ; bytes:4
CompTempVar491 EQU 0x00000003 ; bytes:1
ORG 0x00000200
GOTO _startup
ORG 0x00000204
send_00000
; { send ; function begin
label268438561
BTFSS gbl_pir1,4
BRA label268438561
MOVF send_00000_arg_c, W
MOVWF gbl_txreg
RETURN
; } send function end
 
ORG 0x0000020E
receive_00000
; { receive ; function begin
BTFSS gbl_rcsta,1
139,7 → 128,40
RETURN
; } receive function end
 
ORG 0x00000216
send_00000
; { send ; function begin
label268438561
BTFSS gbl_pir1,4
BRA label268438561
MOVF send_00000_arg_c, W
MOVWF gbl_txreg
RETURN
; } send function end
 
ORG 0x00000220
delay_00000
; { delay ; function begin
label268438570
MOVF delay_00000_1_i, W
SUBWF delay_00000_arg_cas, W
BTFSS STATUS,C
RETURN
label4026532417
MOVF delay_00000_1_x, W
SUBLW 0x64
BNC label268438574
CALL receive_00000
INCF delay_00000_1_x, W
MOVWF delay_00000_1_x
BRA label4026532417
label268438574
INCF delay_00000_1_i, W
MOVWF delay_00000_1_i
BRA label268438570
; } delay function end
 
ORG 0x0000023E
main
; { main ; function begin
SETF gbl_lata
169,132 → 191,68
MOVLW 0x80
IORWF gbl_rcsta, W
MOVWF gbl_rcsta
SETF main_1_leds
MOVLW 0x0F
MOVWF main_1_leds1
CLRF main_1_motors
label268438595
MOVF gbl_portb, W
MOVWF main_1_buttons
BTFSC main_1_buttons,1
BRA label268438598
CLRF main_1_i
CLRF main_1_i+D'1'
CLRF main_1_i+D'2'
CLRF main_1_i+D'3'
DECF main_1_leds1, W
MOVWF main_1_leds1
MOVF main_1_leds1, W
MOVLW 0x0E
MOVWF gbl_lata
label268438603
MOVF main_1_i+D'3', W
SUBLW 0x00
BNZ label268438604
MOVF main_1_i+D'2', W
SUBLW 0x07
BNZ label268438604
MOVF main_1_i+D'1', W
SUBLW 0xA1
BNZ label268438604
MOVF main_1_i, W
SUBLW 0x20
label268438604
BC label4026532463
BTFSS main_1_i+D'3',7
BRA label268438608
label4026532463
INCF main_1_i, F
BTFSC STATUS,Z
INCF main_1_i+D'1', F
BTFSC STATUS,Z
INCF main_1_i+D'2', F
BTFSC STATUS,Z
INCF main_1_i+D'3', F
BRA label268438603
label268438608
MOVLW 0x11
ADDWF main_1_motors, W
MOVWF main_1_motors
BRA label268438619
label268438598
BTFSC main_1_buttons,4
BRA label268438619
CLRF main_1_i
CLRF main_1_i+D'1'
CLRF main_1_i+D'2'
CLRF main_1_i+D'3'
INCF main_1_leds1, W
MOVWF main_1_leds1
MOVF main_1_leds1, W
MOVLW 0xC8
MOVWF delay_00000_arg_cas
CALL delay_00000
MOVLW 0x0D
MOVWF gbl_lata
label268438624
MOVF main_1_i+D'3', W
SUBLW 0x00
BNZ label268438625
MOVF main_1_i+D'2', W
SUBLW 0x07
BNZ label268438625
MOVF main_1_i+D'1', W
SUBLW 0xA1
BNZ label268438625
MOVF main_1_i, W
SUBLW 0x20
label268438625
BC label4026532468
BTFSS main_1_i+D'3',7
BRA label268438629
label4026532468
INCF main_1_i, F
BTFSC STATUS,Z
INCF main_1_i+D'1', F
BTFSC STATUS,Z
INCF main_1_i+D'2', F
BTFSC STATUS,Z
INCF main_1_i+D'3', F
BRA label268438624
label268438629
MOVLW 0x11
SUBWF main_1_motors, W
MOVLW 0xC8
MOVWF delay_00000_arg_cas
CALL delay_00000
MOVLW 0x0B
MOVWF gbl_lata
MOVLW 0xC8
MOVWF delay_00000_arg_cas
CALL delay_00000
MOVLW 0x07
MOVWF gbl_lata
MOVLW 0xC8
MOVWF delay_00000_arg_cas
CALL delay_00000
MOVLW 0x77
MOVWF main_1_motors
label268438619
SETF main_1_leds
MOVLW 0x64
MOVWF delay_00000_arg_cas
CALL delay_00000
label268438640
SETF main_1_sensors
CALL receive_00000
MOVF CompTempVarRet489, W
MOVWF main_1_sensors
BTFSC main_1_sensors,0
BRA label268438643
MOVLW 0xFD
ANDWF main_1_leds, W
MOVWF main_1_leds
label268438643
BTFSC main_1_sensors,1
BRA label268438646
MOVLW 0xFB
ANDWF main_1_leds, W
MOVWF main_1_leds
CLRF CompTempVar491
BTFSS main_1_sensors,1
BRA label268438645
BTFSS main_1_sensors,0
BRA label268438645
INCF CompTempVar491, F
label268438645
MOVF CompTempVar491, F
BNZ label268438646
MOVLW 0x77
MOVWF main_1_motors
label268438646
BTFSC main_1_sensors,2
BRA label268438649
MOVLW 0xFE
ANDWF main_1_leds, W
MOVWF main_1_leds
MOVLW 0xF7
MOVWF main_1_motors
label268438649
BTFSC main_1_sensors,3
BRA label268438652
MOVLW 0xF7
ANDWF main_1_leds, W
MOVWF main_1_leds
MOVLW 0x7F
MOVWF main_1_motors
label268438652
MOVF main_1_leds, W
MOVF main_1_sensors, W
MOVWF gbl_lata
MOVF main_1_motors, W
MOVWF send_00000_arg_c
CALL send_00000
BRA label268438595
BRA label268438640
; } main function end
 
ORG 0x00000332
ORG 0x000002EE
_startup
GOTO main
ORG 0x00300000
/roboti/Robiada/2007/SW/robot/robot.bas
33,11 → 33,21
txreg = c
End Sub
 
Sub delay(cas As Byte)
Dim i As Byte
Dim x As Byte
Do while i <= cas
Do While x <= 100
Call receive()
x=x+1
loop
i=i+1
loop
End Sub
 
Sub main()
Dim motors As Byte
Dim sensors As Byte
Dim leds As Byte
Dim leds1 As Byte
Dim buttons As Byte
Dim i As Long
 
60,65 → 70,42
rcsta = rcsta | (1 << CREN)
rcsta = rcsta | (1 << SPEN)
motors = 0x00
leds = 0xFF
leds1 = 0x0F
lata = 0x0E
Call delay(200)
lata = 0x0D
Call delay(200)
lata = 0x0B
Call delay(200)
lata = 0x07
Call delay(200)
 
motors = 0x00
motors = 0x77
 
Call delay(100)
 
Do while 1
Do while i <= 500000
i=i+1
loop
motors = motors + 0x11
elseif (buttons.4)=0 Then
i=0
leds1 = leds1 + 1
lata = leds1
Do while i <= 500000
i=i+1
loop
motors = motors - 0x11
End If
leds = 0xFF
sensors =0xFF
sensors = Call receive() 'prijmi stav cidel senzoru
'Bity v bajtu sensors
'BIT3=LEVE SPODNI, BIT2=PRAVE SPODNI, BIT1=LEVE PREDNI, BIT0=PRAVE PREDNI
'prislusny bit v nule znamena aktivni senzor
If (sensors.0)=0 Then
'pravy predni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 1) 'led sviti, kdyz se ji bit znuluje
End If
If (sensors.1)=0 Then
'levy predni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 2) 'led sviti, kdyz se ji bit znuluje
End If
 
If (sensors.2)=0 Then
'pravy spodni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 0) 'led sviti, kdyz se ji bit znuluje
End If
sensors =0xFF
sensors = Call receive() 'prijmi stav cidel senzoru
If (sensors.3)=0 Then
'levy spodni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 3) 'led sviti, kdyz se ji bit znuluje
End If
If (!((sensors.0) and (sensors.1))) Then
motors = 0x77
End If
If (!(sensors.2)) Then
motors = 0xF7
End If
If (!(sensors.3)) Then
motors = 0x7F
End If
lata = sensors
call send(motors)
lata = leds
call send(motors)
 
Loop
 
Loop
End Sub
/roboti/Robiada/2007/SW/robot/robot.brws
9,7 → 9,7
adresh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 733;" d
adresl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 732;" d
bsr C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 760;" d
buttons C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 41;" d
buttons E:\SW\robot\robot.bas 51;" d
ccp1con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 727;" d
ccp2con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 724;" d
ccpr1h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 729;" d
16,6 → 16,7
ccpr1l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 728;" d
ccpr2h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 726;" d
ccpr2l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 725;" d
delay E:\SW\robot\robot.bas 36;" s
eeadr C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 715;" d
eecon1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 712;" d
eecon2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 713;" d
26,7 → 27,8
fsr1l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 761;" d
fsr2h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 754;" d
fsr2l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 753;" d
i C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 42;" d
i E:\SW\robot\robot.bas 37;" d
i E:\SW\robot\robot.bas 52;" d
indf0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 775;" d
indf1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 767;" d
indf2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 759;" d
38,11 → 40,9
lata C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 700;" d
latb C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 701;" d
latc C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 702;" d
leds C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 39;" d
leds1 C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 40;" d
lvdcon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 747;" d
main C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 36;" s
motors C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 37;" d
main E:\SW\robot\robot.bas 48;" s
motors E:\SW\robot\robot.bas 49;" d
osccon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 748;" d
pcl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 785;" d
pclath C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 786;" d
72,9 → 72,9
rcon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 745;" d
rcreg C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 719;" d
rcsta C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 716;" d
receive C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 20;" f
send C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 31;" s
sensors C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 38;" d
receive E:\SW\robot\robot.bas 20;" f
send E:\SW\robot\robot.bas 31;" s
sensors E:\SW\robot\robot.bas 50;" d
spbrg C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 720;" d
sspadd C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 737;" d
sspbuf C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 738;" d
108,3 → 108,4
txsta C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 717;" d
wdtcon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 746;" d
wreg C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 768;" d
x E:\SW\robot\robot.bas 38;" d
/roboti/Robiada/2007/SW/robot/robot.casm
27,351 → 27,288
Function receive() As Byte
 
If ( (rcsta.OERR = 1) ) Then
020E A2AB BTFSS gbl_rcsta,1
0210 D002 BRA label268438550
0216 label268438550
0204 A2AB BTFSS gbl_rcsta,1
0206 D002 BRA label268438550
020C label268438550
 
rcsta.CREN = 0
0212 98AB BCF gbl_rcsta,4
0208 98AB BCF gbl_rcsta,4
 
rcsta.CREN = 1
0214 88AB BSF gbl_rcsta,4
020A 88AB BSF gbl_rcsta,4
 
End If
Do While (pir1.RCIF = 0)
0216 AA9E BTFSS gbl_pir1,5
0218 D7FE BRA label268438550
020C AA9E BTFSS gbl_pir1,5
020E D7FE BRA label268438550
 
Loop
receive = rcreg
021A 50AE MOVF gbl_rcreg, W
021C 6E0A MOVWF CompTempVarRet489
0210 50AE MOVF gbl_rcreg, W
0212 6E07 MOVWF CompTempVarRet489
 
End Function
021E 0012 RETURN
0214 0012 RETURN
 
 
Sub send(c As Byte)
 
Do while (pir1 & (1 << TXIF)) = 0 Loop
0204 label268438561
0204 A89E BTFSS gbl_pir1,4
0206 D7FE BRA label268438561
0216 label268438561
0216 A89E BTFSS gbl_pir1,4
0218 D7FE BRA label268438561
 
txreg = c
0208 500A MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
021A 5004 MOVF send_00000_arg_c, W
021C 6EAD MOVWF gbl_txreg
 
End Sub
020C 0012 RETURN
021E 0012 RETURN
 
 
Sub delay(cas As Byte)
 
Dim i As Byte
Dim x As Byte
Do while i <= cas
0220 label268438570
0220 5005 MOVF delay_00000_1_i, W
0222 5C04 SUBWF delay_00000_arg_cas, W
0224 A0D8 BTFSS STATUS,C
 
Do While x <= 100
0228 5006 MOVF delay_00000_1_x, W
022A 0864 SUBLW 0x64
022C E305 BNC label268438574
 
Call receive()
022E EC02F001 CALL receive_00000
 
x=x+1
0232 2806 INCF delay_00000_1_x, W
0234 6E06 MOVWF delay_00000_1_x
 
loop
0236 D7F8 BRA label4026532417
0238 label268438574
 
i=i+1
0238 2805 INCF delay_00000_1_i, W
023A 6E05 MOVWF delay_00000_1_i
 
loop
023C D7F1 BRA label268438570
 
End Sub
0226 0012 RETURN
0228 label4026532417
 
 
Sub main()
 
Dim motors As Byte
Dim sensors As Byte
Dim leds As Byte
Dim leds1 As Byte
Dim buttons As Byte
Dim i As Long
 
'NASTAVENI IO
lata=0xFF
0220 6889 SETF gbl_lata
023E 6889 SETF gbl_lata
 
latb=0
0222 6A8A CLRF gbl_latb
0240 6A8A CLRF gbl_latb
 
latc=0xFF
0224 688B SETF gbl_latc
0242 688B SETF gbl_latc
 
trisa=0xF0
0226 0EF0 MOVLW 0xF0
0228 6E92 MOVWF gbl_trisa
0244 0EF0 MOVLW 0xF0
0246 6E92 MOVWF gbl_trisa
 
trisb=0x3F
022A 0E3F MOVLW 0x3F
022C 6E93 MOVWF gbl_trisb
0248 0E3F MOVLW 0x3F
024A 6E93 MOVWF gbl_trisb
 
trisc=0x9F
022E 0E9F MOVLW 0x9F
0230 6E94 MOVWF gbl_trisc
024C 0E9F MOVLW 0x9F
024E 6E94 MOVWF gbl_trisc
 
 
'VYPNOUT ADC
adcon1=0xC6
0232 0EC6 MOVLW 0xC6
0234 6EC1 MOVWF gbl_adcon1
0250 0EC6 MOVLW 0xC6
0252 6EC1 MOVWF gbl_adcon1
 
adcon0=0xC0
0236 0EC0 MOVLW 0xC0
0238 6EC2 MOVWF gbl_adcon0
0254 0EC0 MOVLW 0xC0
0256 6EC2 MOVWF gbl_adcon0
 
 
'UART 9600bps
spbrg=64
023A 0E40 MOVLW 0x40
023C 6EAF MOVWF gbl_spbrg
0258 0E40 MOVLW 0x40
025A 6EAF MOVWF gbl_spbrg
 
txsta = txsta & ~(1 << BRGH)
023E 0EFB MOVLW 0xFB
0240 14AC ANDWF gbl_txsta, W
0242 6EAC MOVWF gbl_txsta
025C 0EFB MOVLW 0xFB
025E 14AC ANDWF gbl_txsta, W
0260 6EAC MOVWF gbl_txsta
 
txsta = txsta | (1 << TXEN)
0244 0E20 MOVLW 0x20
0246 10AC IORWF gbl_txsta, W
0248 6EAC MOVWF gbl_txsta
0262 0E20 MOVLW 0x20
0264 10AC IORWF gbl_txsta, W
0266 6EAC MOVWF gbl_txsta
 
rcsta = rcsta | (1 << CREN)
024A 0E10 MOVLW 0x10
024C 10AB IORWF gbl_rcsta, W
024E 6EAB MOVWF gbl_rcsta
0268 0E10 MOVLW 0x10
026A 10AB IORWF gbl_rcsta, W
026C 6EAB MOVWF gbl_rcsta
 
rcsta = rcsta | (1 << SPEN)
0250 0E80 MOVLW 0x80
0252 10AB IORWF gbl_rcsta, W
0254 6EAB MOVWF gbl_rcsta
026E 0E80 MOVLW 0x80
0270 10AB IORWF gbl_rcsta, W
0272 6EAB MOVWF gbl_rcsta
 
motors = 0x00
0274 6A01 CLRF main_1_motors
 
leds = 0xFF
0256 6803 SETF main_1_leds
lata = 0x0E
0276 0E0E MOVLW 0x0E
0278 6E89 MOVWF gbl_lata
 
leds1 = 0x0F
0258 0E0F MOVLW 0x0F
025A 6E04 MOVWF main_1_leds1
Call delay(200)
027A 0EC8 MOVLW 0xC8
027C 6E04 MOVWF delay_00000_arg_cas
027E EC10F001 CALL delay_00000
 
lata = 0x0D
0282 0E0D MOVLW 0x0D
0284 6E89 MOVWF gbl_lata
 
motors = 0x00
025C 6A01 CLRF main_1_motors
Call delay(200)
0286 0EC8 MOVLW 0xC8
0288 6E04 MOVWF delay_00000_arg_cas
028A EC10F001 CALL delay_00000
 
Do while 1
025E label268438595
lata = 0x0B
028E 0E0B MOVLW 0x0B
0290 6E89 MOVWF gbl_lata
 
buttons = portb
025E 5081 MOVF gbl_portb, W
0260 6E05 MOVWF main_1_buttons
Call delay(200)
0292 0EC8 MOVLW 0xC8
0294 6E04 MOVWF delay_00000_arg_cas
0296 EC10F001 CALL delay_00000
 
If (buttons.1)=0 Then
0262 B205 BTFSC main_1_buttons,1
0264 D022 BRA label268438598
02AA label268438598
lata = 0x07
029A 0E07 MOVLW 0x07
029C 6E89 MOVWF gbl_lata
 
i=0
0266 6A06 CLRF main_1_i
0268 6A07 CLRF main_1_i+D'1'
026A 6A08 CLRF main_1_i+D'2'
026C 6A09 CLRF main_1_i+D'3'
Call delay(200)
029E 0EC8 MOVLW 0xC8
02A0 6E04 MOVWF delay_00000_arg_cas
02A2 EC10F001 CALL delay_00000
 
leds1 = leds1 - 1
026E 0404 DECF main_1_leds1, W
0270 6E04 MOVWF main_1_leds1
 
lata = leds1
0272 5004 MOVF main_1_leds1, W
0274 6E89 MOVWF gbl_lata
motors = 0x77
02A6 0E77 MOVLW 0x77
02A8 6E01 MOVWF main_1_motors
 
Do while i <= 500000
0276 label268438603
0276 5009 MOVF main_1_i+D'3', W
0278 0800 SUBLW 0x00
027A E108 BNZ label268438604
027C 5008 MOVF main_1_i+D'2', W
027E 0807 SUBLW 0x07
0280 E105 BNZ label268438604
0282 5007 MOVF main_1_i+D'1', W
0284 08A1 SUBLW 0xA1
0286 E102 BNZ label268438604
0288 5006 MOVF main_1_i, W
028A 0820 SUBLW 0x20
028C label268438604
028C E202 BC label4026532463
028E AE09 BTFSS main_1_i+D'3',7
0290 D008 BRA label268438608
0292 label4026532463
 
i=i+1
0292 2A06 INCF main_1_i, F
0294 B4D8 BTFSC STATUS,Z
0296 2A07 INCF main_1_i+D'1', F
0298 B4D8 BTFSC STATUS,Z
029A 2A08 INCF main_1_i+D'2', F
029C B4D8 BTFSC STATUS,Z
029E 2A09 INCF main_1_i+D'3', F
Call delay(100)
02AA 0E64 MOVLW 0x64
02AC 6E04 MOVWF delay_00000_arg_cas
02AE EC10F001 CALL delay_00000
 
loop
02A0 D7EA BRA label268438603
02A2 label268438608
 
motors = motors + 0x11
02A2 0E11 MOVLW 0x11
02A4 2401 ADDWF main_1_motors, W
02A6 6E01 MOVWF main_1_motors
 
elseif (buttons.4)=0 Then
02A8 D023 BRA label268438619
02AA B805 BTFSC main_1_buttons,4
02AC D021 BRA label268438619
02F0 label268438619
Do while 1
02B2 label268438640
 
i=0
02AE 6A06 CLRF main_1_i
02B0 6A07 CLRF main_1_i+D'1'
02B2 6A08 CLRF main_1_i+D'2'
02B4 6A09 CLRF main_1_i+D'3'
 
leds1 = leds1 + 1
02B6 2804 INCF main_1_leds1, W
02B8 6E04 MOVWF main_1_leds1
sensors =0xFF
02B2 6802 SETF main_1_sensors
 
lata = leds1
02BA 5004 MOVF main_1_leds1, W
02BC 6E89 MOVWF gbl_lata
sensors = Call receive() 'prijmi stav cidel senzoru
02B4 EC02F001 CALL receive_00000
02B8 5007 MOVF CompTempVarRet489, W
02BA 6E02 MOVWF main_1_sensors
 
Do while i <= 500000
02BE label268438624
02BE 5009 MOVF main_1_i+D'3', W
02C0 0800 SUBLW 0x00
02C2 E108 BNZ label268438625
02C4 5008 MOVF main_1_i+D'2', W
02C6 0807 SUBLW 0x07
02C8 E105 BNZ label268438625
02CA 5007 MOVF main_1_i+D'1', W
02CC 08A1 SUBLW 0xA1
02CE E102 BNZ label268438625
02D0 5006 MOVF main_1_i, W
02D2 0820 SUBLW 0x20
02D4 label268438625
02D4 E202 BC label4026532468
02D6 AE09 BTFSS main_1_i+D'3',7
02D8 D008 BRA label268438629
02DA label4026532468
 
i=i+1
02DA 2A06 INCF main_1_i, F
02DC B4D8 BTFSC STATUS,Z
02DE 2A07 INCF main_1_i+D'1', F
02E0 B4D8 BTFSC STATUS,Z
02E2 2A08 INCF main_1_i+D'2', F
02E4 B4D8 BTFSC STATUS,Z
02E6 2A09 INCF main_1_i+D'3', F
 
loop
02E8 D7EA BRA label268438624
02EA label268438629
 
motors = motors - 0x11
02EA 0E11 MOVLW 0x11
02EC 5C01 SUBWF main_1_motors, W
02EE 6E01 MOVWF main_1_motors
 
End If
leds = 0xFF
02F0 6803 SETF main_1_leds
If (!((sensors.0) and (sensors.1))) Then
02BC 6A03 CLRF CompTempVar491
02BE A202 BTFSS main_1_sensors,1
02C0 D003 BRA label268438645
02C2 A002 BTFSS main_1_sensors,0
02C4 D001 BRA label268438645
02C6 2A03 INCF CompTempVar491, F
02C8 label268438645
02C8 5203 MOVF CompTempVar491, F
02CA E102 BNZ label268438646
02D0 label268438646
 
sensors =0xFF
02F2 6802 SETF main_1_sensors
motors = 0x77
02CC 0E77 MOVLW 0x77
02CE 6E01 MOVWF main_1_motors
 
sensors = Call receive() 'prijmi stav cidel senzoru
02F4 EC07F001 CALL receive_00000
02F8 500A MOVF CompTempVarRet489, W
02FA 6E02 MOVWF main_1_sensors
End If
If (!(sensors.2)) Then
02D0 B402 BTFSC main_1_sensors,2
02D2 D002 BRA label268438649
02D8 label268438649
 
'Bity v bajtu sensors
'BIT3=LEVE SPODNI, BIT2=PRAVE SPODNI, BIT1=LEVE PREDNI, BIT0=PRAVE PREDNI
'prislusny bit v nule znamena aktivni senzor
If (sensors.0)=0 Then
02FC B002 BTFSC main_1_sensors,0
02FE D003 BRA label268438643
0306 label268438643
motors = 0xF7
02D4 0EF7 MOVLW 0xF7
02D6 6E01 MOVWF main_1_motors
 
'pravy predni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 1) 'led sviti, kdyz se ji bit znuluje
0300 0EFD MOVLW 0xFD
0302 1403 ANDWF main_1_leds, W
0304 6E03 MOVWF main_1_leds
 
End If
End If
If (sensors.1)=0 Then
0306 B202 BTFSC main_1_sensors,1
0308 D003 BRA label268438646
0310 label268438646
If (!(sensors.3)) Then
02D8 B602 BTFSC main_1_sensors,3
02DA D002 BRA label268438652
02E0 label268438652
 
'levy predni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 2) 'led sviti, kdyz se ji bit znuluje
030A 0EFB MOVLW 0xFB
030C 1403 ANDWF main_1_leds, W
030E 6E03 MOVWF main_1_leds
motors = 0x7F
02DC 0E7F MOVLW 0x7F
02DE 6E01 MOVWF main_1_motors
 
End If
End If
lata = sensors
02E0 5002 MOVF main_1_sensors, W
02E2 6E89 MOVWF gbl_lata
 
If (sensors.2)=0 Then
0310 B402 BTFSC main_1_sensors,2
0312 D003 BRA label268438649
031A label268438649
call send(motors)
02E4 5001 MOVF main_1_motors, W
02E6 6E04 MOVWF send_00000_arg_c
02E8 EC0BF001 CALL send_00000
 
'pravy spodni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 0) 'led sviti, kdyz se ji bit znuluje
0314 0EFE MOVLW 0xFE
0316 1403 ANDWF main_1_leds, W
0318 6E03 MOVWF main_1_leds
 
End If
If (sensors.3)=0 Then
031A B602 BTFSC main_1_sensors,3
031C D003 BRA label268438652
0324 label268438652
Loop
02EC D7E2 BRA label268438640
 
'levy spodni senzor aktivni
'rozsvit prislusnou LED k senzoru, zatim jen v promenne
leds = leds & ~(1 << 3) 'led sviti, kdyz se ji bit znuluje
031E 0EF7 MOVLW 0xF7
0320 1403 ANDWF main_1_leds, W
0322 6E03 MOVWF main_1_leds
End Sub
 
End If
lata = leds
0324 5003 MOVF main_1_leds, W
0326 6E89 MOVWF gbl_lata
 
call send(motors)
0328 5001 MOVF main_1_motors, W
032A 6E0A MOVWF send_00000_arg_c
032C EC02F001 CALL send_00000
////////////////////////////////////////
// Code with no source :-)
////////////////////////////////////////
0200 EF77F001 GOTO _startup
 
 
Loop
0330 D796 BRA label268438595
 
 
End Sub
 
 
////////////////////////////////////////
// Code with no source :-)
////////////////////////////////////////
0200 EF99F001 GOTO _startup
 
02EE _startup
02EE EF1FF001 GOTO main
 
0332 _startup
0332 EF10F001 GOTO main
 
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
300004 FEFF DW 0xFEFF
/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,24 → 1,20
:020000040000FA
:1002000099EF01F09EA8FED70A50AD6E1200ABA286
:1002100002D0AB98AB889EAAFED7AE500A6E1200F1
:1002200089688A6A8B68F00E926E3F0E936E9F0EFD
:10023000946EC60EC16EC00EC26E400EAF6EFB0E47
:10024000AC14AC6E200EAC10AC6E100EAB10AB6EDE
:10025000800EAB10AB6E03680F0E046E016A815006
:10026000056E05B222D0066A076A086A096A0404A4
:10027000046E0450896E0950000808E10850070810
:1002800005E10750A10802E10650200802E209AE8C
:1002900008D0062AD8B4072AD8B4082AD8B4092A1C
:1002A000EAD7110E0124016E23D005B821D0066AC9
:1002B000076A086A096A0428046E0450896E0950A6
:1002C000000808E10850070805E10750A10802E10D
:1002D0000650200802E209AE08D0062AD8B4072A40
:1002E000D8B4082AD8B4092AEAD7110E015C016EE5
:1002F0000368026807EC01F00A50026E02B003D0F6
:10030000FD0E0314036E02B203D0FB0E0314036E42
:1003100002B403D0FE0E0314036E02B603D0F70E30
:100320000314036E0350896E01500A6E02EC01F053
:0603300096D710EF01F06A
:1002000077EF01F0ABA202D0AB98AB889EAAFED7E5
:10021000AE50076E12009EA8FED70450AD6E1200BD
:100220000550045CD8A012000650640805E302ECF7
:1002300001F00628066EF8D70528056EF1D7896803
:100240008A6A8B68F00E926E3F0E936E9F0E946ECC
:10025000C60EC16EC00EC26E400EAF6EFB0EAC1469
:10026000AC6E200EAC10AC6E100EAB10AB6E800EF0
:10027000AB10AB6E016A0E0E896EC80E046E10ECE8
:1002800001F00D0E896EC80E046E10EC01F00B0E1D
:10029000896EC80E046E10EC01F0070E896EC80E50
:1002A000046E10EC01F0770E016E640E046E10EC1B
:1002B00001F0026802EC01F00750026E036A02A22C
:1002C00003D002A001D0032A035202E1770E016E8F
:1002D00002B402D0F70E016E02B602D07F0E016E9C
:1002E0000250896E0150046E0BEC01F0E2D71FEF53
:0202F00001F01B
:020000040030CA
:0E000000FFFEF6FEFFFEFBFFF03FFF9FFFBF7F
:00000001FF
/roboti/Robiada/2007/SW/robot/robot.lst
6,191 → 6,149
;/////////////////////////////////////////////////////////////////////////////////
 
ORG 0x00000200
0200 EF99F001 GOTO _startup
0200 EF77F001 GOTO _startup
ORG 0x00000204
0204 send_00000
0204 ; { send ; function begin
0204 label268438561
0204 A89E BTFSS gbl_pir1,4
0206 D7FE BRA label268438561
0208 500A MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
020C 0012 RETURN
020E ; } send function end
0204 receive_00000
0204 ; { receive ; function begin
0204 A2AB BTFSS gbl_rcsta,1
0206 D002 BRA label268438550
0208 98AB BCF gbl_rcsta,4
020A 88AB BSF gbl_rcsta,4
020C label268438550
020C AA9E BTFSS gbl_pir1,5
020E D7FE BRA label268438550
0210 50AE MOVF gbl_rcreg, W
0212 6E07 MOVWF CompTempVarRet489
0214 0012 RETURN
0216 ; } receive function end
 
ORG 0x0000020E
020E receive_00000
020E ; { receive ; function begin
020E A2AB BTFSS gbl_rcsta,1
0210 D002 BRA label268438550
0212 98AB BCF gbl_rcsta,4
0214 88AB BSF gbl_rcsta,4
0216 label268438550
0216 AA9E BTFSS gbl_pir1,5
0218 D7FE BRA label268438550
021A 50AE MOVF gbl_rcreg, W
021C 6E0A MOVWF CompTempVarRet489
ORG 0x00000216
0216 send_00000
0216 ; { send ; function begin
0216 label268438561
0216 A89E BTFSS gbl_pir1,4
0218 D7FE BRA label268438561
021A 5004 MOVF send_00000_arg_c, W
021C 6EAD MOVWF gbl_txreg
021E 0012 RETURN
0220 ; } receive function end
0220 ; } send function end
 
ORG 0x00000220
0220 main
0220 ; { main ; function begin
0220 6889 SETF gbl_lata
0222 6A8A CLRF gbl_latb
0224 688B SETF gbl_latc
0226 0EF0 MOVLW 0xF0
0228 6E92 MOVWF gbl_trisa
022A 0E3F MOVLW 0x3F
022C 6E93 MOVWF gbl_trisb
022E 0E9F MOVLW 0x9F
0230 6E94 MOVWF gbl_trisc
0232 0EC6 MOVLW 0xC6
0234 6EC1 MOVWF gbl_adcon1
0236 0EC0 MOVLW 0xC0
0238 6EC2 MOVWF gbl_adcon0
023A 0E40 MOVLW 0x40
023C 6EAF MOVWF gbl_spbrg
023E 0EFB MOVLW 0xFB
0240 14AC ANDWF gbl_txsta, W
0242 6EAC MOVWF gbl_txsta
0244 0E20 MOVLW 0x20
0246 10AC IORWF gbl_txsta, W
0248 6EAC MOVWF gbl_txsta
024A 0E10 MOVLW 0x10
024C 10AB IORWF gbl_rcsta, W
024E 6EAB MOVWF gbl_rcsta
0250 0E80 MOVLW 0x80
0252 10AB IORWF gbl_rcsta, W
0254 6EAB MOVWF gbl_rcsta
0256 6803 SETF main_1_leds
0258 0E0F MOVLW 0x0F
025A 6E04 MOVWF main_1_leds1
025C 6A01 CLRF main_1_motors
025E label268438595
025E 5081 MOVF gbl_portb, W
0260 6E05 MOVWF main_1_buttons
0262 B205 BTFSC main_1_buttons,1
0264 D022 BRA label268438598
0266 6A06 CLRF main_1_i
0268 6A07 CLRF main_1_i+D'1'
026A 6A08 CLRF main_1_i+D'2'
026C 6A09 CLRF main_1_i+D'3'
026E 0404 DECF main_1_leds1, W
0270 6E04 MOVWF main_1_leds1
0272 5004 MOVF main_1_leds1, W
0274 6E89 MOVWF gbl_lata
0276 label268438603
0276 5009 MOVF main_1_i+D'3', W
0278 0800 SUBLW 0x00
027A E108 BNZ label268438604
027C 5008 MOVF main_1_i+D'2', W
027E 0807 SUBLW 0x07
0280 E105 BNZ label268438604
0282 5007 MOVF main_1_i+D'1', W
0284 08A1 SUBLW 0xA1
0286 E102 BNZ label268438604
0288 5006 MOVF main_1_i, W
028A 0820 SUBLW 0x20
028C label268438604
028C E202 BC label4026532463
028E AE09 BTFSS main_1_i+D'3',7
0290 D008 BRA label268438608
0292 label4026532463
0292 2A06 INCF main_1_i, F
0294 B4D8 BTFSC STATUS,Z
0296 2A07 INCF main_1_i+D'1', F
0298 B4D8 BTFSC STATUS,Z
029A 2A08 INCF main_1_i+D'2', F
029C B4D8 BTFSC STATUS,Z
029E 2A09 INCF main_1_i+D'3', F
02A0 D7EA BRA label268438603
02A2 label268438608
02A2 0E11 MOVLW 0x11
02A4 2401 ADDWF main_1_motors, W
02A6 6E01 MOVWF main_1_motors
02A8 D023 BRA label268438619
02AA label268438598
02AA B805 BTFSC main_1_buttons,4
02AC D021 BRA label268438619
02AE 6A06 CLRF main_1_i
02B0 6A07 CLRF main_1_i+D'1'
02B2 6A08 CLRF main_1_i+D'2'
02B4 6A09 CLRF main_1_i+D'3'
02B6 2804 INCF main_1_leds1, W
02B8 6E04 MOVWF main_1_leds1
02BA 5004 MOVF main_1_leds1, W
02BC 6E89 MOVWF gbl_lata
02BE label268438624
02BE 5009 MOVF main_1_i+D'3', W
02C0 0800 SUBLW 0x00
02C2 E108 BNZ label268438625
02C4 5008 MOVF main_1_i+D'2', W
02C6 0807 SUBLW 0x07
02C8 E105 BNZ label268438625
02CA 5007 MOVF main_1_i+D'1', W
02CC 08A1 SUBLW 0xA1
02CE E102 BNZ label268438625
02D0 5006 MOVF main_1_i, W
02D2 0820 SUBLW 0x20
02D4 label268438625
02D4 E202 BC label4026532468
02D6 AE09 BTFSS main_1_i+D'3',7
02D8 D008 BRA label268438629
02DA label4026532468
02DA 2A06 INCF main_1_i, F
02DC B4D8 BTFSC STATUS,Z
02DE 2A07 INCF main_1_i+D'1', F
02E0 B4D8 BTFSC STATUS,Z
02E2 2A08 INCF main_1_i+D'2', F
02E4 B4D8 BTFSC STATUS,Z
02E6 2A09 INCF main_1_i+D'3', F
02E8 D7EA BRA label268438624
02EA label268438629
02EA 0E11 MOVLW 0x11
02EC 5C01 SUBWF main_1_motors, W
02EE 6E01 MOVWF main_1_motors
02F0 label268438619
02F0 6803 SETF main_1_leds
02F2 6802 SETF main_1_sensors
02F4 EC07F001 CALL receive_00000
02F8 500A MOVF CompTempVarRet489, W
02FA 6E02 MOVWF main_1_sensors
02FC B002 BTFSC main_1_sensors,0
02FE D003 BRA label268438643
0300 0EFD MOVLW 0xFD
0302 1403 ANDWF main_1_leds, W
0304 6E03 MOVWF main_1_leds
0306 label268438643
0306 B202 BTFSC main_1_sensors,1
0308 D003 BRA label268438646
030A 0EFB MOVLW 0xFB
030C 1403 ANDWF main_1_leds, W
030E 6E03 MOVWF main_1_leds
0310 label268438646
0310 B402 BTFSC main_1_sensors,2
0312 D003 BRA label268438649
0314 0EFE MOVLW 0xFE
0316 1403 ANDWF main_1_leds, W
0318 6E03 MOVWF main_1_leds
031A label268438649
031A B602 BTFSC main_1_sensors,3
031C D003 BRA label268438652
031E 0EF7 MOVLW 0xF7
0320 1403 ANDWF main_1_leds, W
0322 6E03 MOVWF main_1_leds
0324 label268438652
0324 5003 MOVF main_1_leds, W
0326 6E89 MOVWF gbl_lata
0328 5001 MOVF main_1_motors, W
032A 6E0A MOVWF send_00000_arg_c
032C EC02F001 CALL send_00000
0330 D796 BRA label268438595
0332 ; } main function end
0220 delay_00000
0220 ; { delay ; function begin
0220 label268438570
0220 5005 MOVF delay_00000_1_i, W
0222 5C04 SUBWF delay_00000_arg_cas, W
0224 A0D8 BTFSS STATUS,C
0226 0012 RETURN
0228 label4026532417
0228 5006 MOVF delay_00000_1_x, W
022A 0864 SUBLW 0x64
022C E305 BNC label268438574
022E EC02F001 CALL receive_00000
0232 2806 INCF delay_00000_1_x, W
0234 6E06 MOVWF delay_00000_1_x
0236 D7F8 BRA label4026532417
0238 label268438574
0238 2805 INCF delay_00000_1_i, W
023A 6E05 MOVWF delay_00000_1_i
023C D7F1 BRA label268438570
023E ; } delay function end
 
ORG 0x00000332
0332 _startup
0332 EF10F001 GOTO main
ORG 0x0000023E
023E main
023E ; { main ; function begin
023E 6889 SETF gbl_lata
0240 6A8A CLRF gbl_latb
0242 688B SETF gbl_latc
0244 0EF0 MOVLW 0xF0
0246 6E92 MOVWF gbl_trisa
0248 0E3F MOVLW 0x3F
024A 6E93 MOVWF gbl_trisb
024C 0E9F MOVLW 0x9F
024E 6E94 MOVWF gbl_trisc
0250 0EC6 MOVLW 0xC6
0252 6EC1 MOVWF gbl_adcon1
0254 0EC0 MOVLW 0xC0
0256 6EC2 MOVWF gbl_adcon0
0258 0E40 MOVLW 0x40
025A 6EAF MOVWF gbl_spbrg
025C 0EFB MOVLW 0xFB
025E 14AC ANDWF gbl_txsta, W
0260 6EAC MOVWF gbl_txsta
0262 0E20 MOVLW 0x20
0264 10AC IORWF gbl_txsta, W
0266 6EAC MOVWF gbl_txsta
0268 0E10 MOVLW 0x10
026A 10AB IORWF gbl_rcsta, W
026C 6EAB MOVWF gbl_rcsta
026E 0E80 MOVLW 0x80
0270 10AB IORWF gbl_rcsta, W
0272 6EAB MOVWF gbl_rcsta
0274 6A01 CLRF main_1_motors
0276 0E0E MOVLW 0x0E
0278 6E89 MOVWF gbl_lata
027A 0EC8 MOVLW 0xC8
027C 6E04 MOVWF delay_00000_arg_cas
027E EC10F001 CALL delay_00000
0282 0E0D MOVLW 0x0D
0284 6E89 MOVWF gbl_lata
0286 0EC8 MOVLW 0xC8
0288 6E04 MOVWF delay_00000_arg_cas
028A EC10F001 CALL delay_00000
028E 0E0B MOVLW 0x0B
0290 6E89 MOVWF gbl_lata
0292 0EC8 MOVLW 0xC8
0294 6E04 MOVWF delay_00000_arg_cas
0296 EC10F001 CALL delay_00000
029A 0E07 MOVLW 0x07
029C 6E89 MOVWF gbl_lata
029E 0EC8 MOVLW 0xC8
02A0 6E04 MOVWF delay_00000_arg_cas
02A2 EC10F001 CALL delay_00000
02A6 0E77 MOVLW 0x77
02A8 6E01 MOVWF main_1_motors
02AA 0E64 MOVLW 0x64
02AC 6E04 MOVWF delay_00000_arg_cas
02AE EC10F001 CALL delay_00000
02B2 label268438640
02B2 6802 SETF main_1_sensors
02B4 EC02F001 CALL receive_00000
02B8 5007 MOVF CompTempVarRet489, W
02BA 6E02 MOVWF main_1_sensors
02BC 6A03 CLRF CompTempVar491
02BE A202 BTFSS main_1_sensors,1
02C0 D003 BRA label268438645
02C2 A002 BTFSS main_1_sensors,0
02C4 D001 BRA label268438645
02C6 2A03 INCF CompTempVar491, F
02C8 label268438645
02C8 5203 MOVF CompTempVar491, F
02CA E102 BNZ label268438646
02CC 0E77 MOVLW 0x77
02CE 6E01 MOVWF main_1_motors
02D0 label268438646
02D0 B402 BTFSC main_1_sensors,2
02D2 D002 BRA label268438649
02D4 0EF7 MOVLW 0xF7
02D6 6E01 MOVWF main_1_motors
02D8 label268438649
02D8 B602 BTFSC main_1_sensors,3
02DA D002 BRA label268438652
02DC 0E7F MOVLW 0x7F
02DE 6E01 MOVWF main_1_motors
02E0 label268438652
02E0 5002 MOVF main_1_sensors, W
02E2 6E89 MOVWF gbl_lata
02E4 5001 MOVF main_1_motors, W
02E6 6E04 MOVWF send_00000_arg_c
02E8 EC0BF001 CALL send_00000
02EC D7E2 BRA label268438640
02EE ; } main function end
 
ORG 0x000002EE
02EE _startup
02EE EF1FF001 GOTO main
ORG 0x00300000
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
/roboti/Robiada/2007/SW/robot/robot.stat
3,6 → 3,7
#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 = 9.6,rom = 274;
delay(unsigned char):"robot.bas",line = 39,ram = 3.0,rom = 30;
main(void):"robot.bas",line = 56,ram = 3.4,rom = 176;
_startup(void):"NoSourceFile",line = 0,ram = 0.0,rom = 4;
#HEAP_BLOCK: 0, 11, 1525;
#HEAP_BLOCK: 0, 8, 1528;
/roboti/Robiada/2007/SW/robot/robot.tree
1,7 → 1,17
// SourceBoost Linker Call Tree Dump
 
_startup:"NoSourceFile",line = 0
{ main:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ main:"robot.bas",line = 49
{ delay:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } } delay:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } } delay:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } } delay:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } } delay:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } } receive:"robot.bas",line = 20
{ } send:"robot.bas",line = 31
{ } }}