Subversion Repositories svnkaklik

Compare Revisions

Problem with comparison.

Ignore whitespace Rev HEAD → Rev 324

/roboti/Robiada/2007/SW/robot/_.obj
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:executable
+*
\ No newline at end of property
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.asm
0,0 → 1,335
;/////////////////////////////////////////////////////////////////////////////////
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
;// Version : 6.70
;// License Type : Pro License
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
;/////////////////////////////////////////////////////////////////////////////////
 
include "P18F252.inc"
__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
gbl_prodh EQU 0x00000FF4 ; bytes:1
gbl_porta EQU 0x00000F80 ; bytes:1
gbl_portb EQU 0x00000F81 ; bytes:1
gbl_portc EQU 0x00000F82 ; bytes:1
gbl_lata EQU 0x00000F89 ; bytes:1
gbl_latb EQU 0x00000F8A ; bytes:1
gbl_latc EQU 0x00000F8B ; bytes:1
gbl_trisa EQU 0x00000F92 ; bytes:1
gbl_trisb EQU 0x00000F93 ; bytes:1
gbl_trisc EQU 0x00000F94 ; bytes:1
gbl_pie1 EQU 0x00000F9D ; bytes:1
gbl_pir1 EQU 0x00000F9E ; bytes:1
gbl_ipr1 EQU 0x00000F9F ; bytes:1
gbl_pie2 EQU 0x00000FA0 ; bytes:1
gbl_pir2 EQU 0x00000FA1 ; bytes:1
gbl_ipr2 EQU 0x00000FA2 ; bytes:1
gbl_eecon1 EQU 0x00000FA6 ; bytes:1
gbl_eecon2 EQU 0x00000FA7 ; bytes:1
gbl_eedata EQU 0x00000FA8 ; bytes:1
gbl_eeadr EQU 0x00000FA9 ; bytes:1
gbl_rcsta EQU 0x00000FAB ; bytes:1
gbl_txsta EQU 0x00000FAC ; bytes:1
gbl_txreg EQU 0x00000FAD ; bytes:1
gbl_rcreg EQU 0x00000FAE ; bytes:1
gbl_spbrg EQU 0x00000FAF ; bytes:1
gbl_t3con EQU 0x00000FB1 ; bytes:1
gbl_tmr3l EQU 0x00000FB2 ; bytes:1
gbl_tmr3h EQU 0x00000FB3 ; bytes:1
gbl_ccp2con EQU 0x00000FBA ; bytes:1
gbl_ccpr2l EQU 0x00000FBB ; bytes:1
gbl_ccpr2h EQU 0x00000FBC ; bytes:1
gbl_ccp1con EQU 0x00000FBD ; bytes:1
gbl_ccpr1l EQU 0x00000FBE ; bytes:1
gbl_ccpr1h EQU 0x00000FBF ; bytes:1
gbl_adcon1 EQU 0x00000FC1 ; bytes:1
gbl_adcon0 EQU 0x00000FC2 ; bytes:1
gbl_adresl EQU 0x00000FC3 ; bytes:1
gbl_adresh EQU 0x00000FC4 ; bytes:1
gbl_sspcon2 EQU 0x00000FC5 ; bytes:1
gbl_sspcon1 EQU 0x00000FC6 ; bytes:1
gbl_sspstat EQU 0x00000FC7 ; bytes:1
gbl_sspadd EQU 0x00000FC8 ; bytes:1
gbl_sspbuf EQU 0x00000FC9 ; bytes:1
gbl_t2con EQU 0x00000FCA ; bytes:1
gbl_pr2 EQU 0x00000FCB ; bytes:1
gbl_tmr2 EQU 0x00000FCC ; bytes:1
gbl_t1con EQU 0x00000FCD ; bytes:1
gbl_tmr1l EQU 0x00000FCE ; bytes:1
gbl_tmr1h EQU 0x00000FCF ; bytes:1
gbl_rcon EQU 0x00000FD0 ; bytes:1
gbl_wdtcon EQU 0x00000FD1 ; bytes:1
gbl_lvdcon EQU 0x00000FD2 ; bytes:1
gbl_osccon EQU 0x00000FD3 ; bytes:1
gbl_t0con EQU 0x00000FD5 ; bytes:1
gbl_tmr0l EQU 0x00000FD6 ; bytes:1
gbl_tmr0h EQU 0x00000FD7 ; bytes:1
gbl_fsr2l EQU 0x00000FD9 ; bytes:1
gbl_fsr2h EQU 0x00000FDA ; bytes:1
gbl_plusw2 EQU 0x00000FDB ; bytes:1
gbl_preinc2 EQU 0x00000FDC ; bytes:1
gbl_postdec2 EQU 0x00000FDD ; bytes:1
gbl_postinc2 EQU 0x00000FDE ; bytes:1
gbl_indf2 EQU 0x00000FDF ; bytes:1
gbl_bsr EQU 0x00000FE0 ; bytes:1
gbl_fsr1l EQU 0x00000FE1 ; bytes:1
gbl_fsr1h EQU 0x00000FE2 ; bytes:1
gbl_plusw1 EQU 0x00000FE3 ; bytes:1
gbl_preinc1 EQU 0x00000FE4 ; bytes:1
gbl_postdec1 EQU 0x00000FE5 ; bytes:1
gbl_postinc1 EQU 0x00000FE6 ; bytes:1
gbl_indf1 EQU 0x00000FE7 ; bytes:1
gbl_wreg EQU 0x00000FE8 ; bytes:1
gbl_fsr0l EQU 0x00000FE9 ; bytes:1
gbl_fsr0h EQU 0x00000FEA ; bytes:1
gbl_plusw0 EQU 0x00000FEB ; bytes:1
gbl_preinc0 EQU 0x00000FEC ; bytes:1
gbl_postdec0 EQU 0x00000FED ; bytes:1
gbl_postinc0 EQU 0x00000FEE ; bytes:1
gbl_indf0 EQU 0x00000FEF ; bytes:1
gbl_intcon3 EQU 0x00000FF0 ; bytes:1
gbl_intcon2 EQU 0x00000FF1 ; bytes:1
gbl_intcon EQU 0x00000FF2 ; bytes:1
gbl_tablat EQU 0x00000FF5 ; bytes:1
gbl_tblptrl EQU 0x00000FF6 ; bytes:1
gbl_tblptrh EQU 0x00000FF7 ; bytes:1
gbl_tblptru EQU 0x00000FF8 ; bytes:1
gbl_pcl EQU 0x00000FF9 ; bytes:1
gbl_pclath EQU 0x00000FFA ; bytes:1
gbl_pclatu EQU 0x00000FFB ; bytes:1
gbl_stkptr EQU 0x00000FFC ; bytes:1
gbl_tosl EQU 0x00000FFD ; bytes:1
gbl_tosh EQU 0x00000FFE ; bytes:1
gbl_tosu EQU 0x00000FFF ; 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:4
CompTempVar491 EQU 0x00000008 ; bytes:1
CompTempVar492 EQU 0x00000009 ; bytes:1
CompTempVar496 EQU 0x0000000A ; bytes:1
ORG 0x00000200
GOTO _startup
ORG 0x00000204
send_00000
; { send ; function begin
label268438562
BTFSS gbl_pir1,4
BRA label268438562
MOVF send_00000_arg_c, W
MOVWF gbl_txreg
RETURN
; } send function end
 
ORG 0x0000020E
receive_00000
; { receive ; function begin
BTFSS gbl_rcsta,1
BRA label268438551
BCF gbl_rcsta,4
BSF gbl_rcsta,4
label268438551
BTFSS gbl_pir1,5
BRA label268438551
MOVF gbl_rcreg, W
MOVWF CompTempVarRet489
RETURN
; } receive function end
 
ORG 0x00000220
main
; { main ; function begin
SETF gbl_lata
CLRF gbl_latb
SETF gbl_latc
MOVLW 0xF0
MOVWF gbl_trisa
MOVLW 0x3F
MOVWF gbl_trisb
MOVLW 0x9F
MOVWF gbl_trisc
MOVLW 0xC6
MOVWF gbl_adcon1
MOVLW 0xC0
MOVWF gbl_adcon0
MOVLW 0x40
MOVWF gbl_spbrg
MOVLW 0xFB
ANDWF gbl_txsta, W
MOVWF gbl_txsta
MOVLW 0x20
IORWF gbl_txsta, W
MOVWF gbl_txsta
MOVLW 0x10
IORWF gbl_rcsta, W
MOVWF gbl_rcsta
MOVLW 0x80
IORWF gbl_rcsta, W
MOVWF gbl_rcsta
CLRF main_1_motors
label268438598
BTFSC gbl_portb,0
BRA label268438598
MOVLW 0xF0
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
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
label268438608
SETF gbl_lata
label268438640
SETF main_1_sensors
CALL receive_00000
MOVF CompTempVarRet489, W
MOVWF main_1_sensors
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 0xF7
MOVWF main_1_motors
label268438649
BTFSC main_1_sensors,3
BRA label268438652
MOVLW 0x7F
MOVWF main_1_motors
label268438652
MOVF main_1_sensors, W
MOVWF gbl_lata
MOVF main_1_motors, W
MOVWF send_00000_arg_c
CALL send_00000
BRA label268438640
; } main function end
 
ORG 0x0000035C
_startup
GOTO main
ORG 0x00300000
DW 0xFEFF
DW 0xFEF6
ORG 0x00300004
DW 0xFEFF
DW 0xFFFB
ORG 0x00300008
DW 0x3FF0
DW 0x9FFF
DW 0xBFFF
END
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.bas
0,0 → 1,110
'robot
 
'#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
 
 
#pragma DATA _CONFIG1H, _OSCS_OFF_1H & _HSPLL_OSC_1H
#pragma DATA _CONFIG2L, _BOR_ON_2L & _BORV_42_2L & _PWRT_ON_2L
#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
#pragma DATA _CONFIG3H, _CCP2MX_OFF_3H
#pragma DATA _CONFIG4L, _STVR_ON_4L & _LVP_OFF_4L & _DEBUG_OFF_4L
#pragma DATA _CONFIG5L, _CP0_ON_5L & _CP1_ON_5L & _CP2_ON_5L & _CP3_ON_5L
#pragma DATA _CONFIG5H, _CPB_ON_5H & _CPD_ON_5H
#pragma DATA _CONFIG6L, _WRT0_OFF_6L & _WRT1_OFF_6L & _WRT2_OFF_6L & _WRT3_OFF_6L
#pragma DATA _CONFIG6H, _WRTC_ON_6H & _WRTB_ON_6H & _WRTD_OFF_6H
#pragma DATA _CONFIG7L, _EBTR0_OFF_7L & _EBTR1_OFF_7L & _EBTR2_OFF_7L & _EBTR3_OFF_7L
#pragma DATA _CONFIG7H, _EBTRB_ON_7H
 
#pragma CLOCK_FREQ 40000000
 
Function receive() As Byte
If ( (rcsta.OERR = 1) ) Then
rcsta.CREN = 0
rcsta.CREN = 1
End If
Do While (pir1.RCIF = 0)
Loop
receive = rcreg
End Function
 
Sub send(c As Byte)
Do while (pir1 & (1 << TXIF)) = 0 Loop
txreg = c
End Sub
 
Sub main()
Dim motors As Byte
Dim sensors As Byte
Dim buttons As Byte
Dim leds As Byte
Dim count As Long
Dim i As Long
 
'NASTAVENI IO
lata=0xFF
latb=0
latc=0xFF
trisa=0xF0
trisb=0x3F
trisc=0x9F
 
'VYPNOUT ADC
adcon1=0xC6
adcon0=0xC0
 
'UART 9600bps
spbrg=64
txsta = txsta & ~(1 << BRGH)
txsta = txsta | (1 << TXEN)
rcsta = rcsta | (1 << CREN)
rcsta = rcsta | (1 << SPEN)
motors = 0x00
do while (portb.0 = 1)
loop
 
leds = 0xF0
count = 400000
do while (count > 0)
count = count -1
if count < 300000 then
leds = leds | 1
end if
if count < 200000 then
leds = leds | 2
end if
if count < 100000 then
leds = leds | 4
end if
lata = leds
loop
lata = 0xFF
 
Do while 1
 
sensors =0xFF
sensors = Call receive() 'prijmi stav cidel senzoru
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)
Loop
End Sub
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.casm
0,0 → 1,377
;/////////////////////////////////////////////////////////////////////////////////
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
;// Version : 6.70
;// License Type : Pro License
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
;/////////////////////////////////////////////////////////////////////////////////
 
'robot
 
'#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
 
 
#pragma DATA _CONFIG1H, _OSCS_OFF_1H & _HSPLL_OSC_1H
#pragma DATA _CONFIG2L, _BOR_ON_2L & _BORV_42_2L & _PWRT_ON_2L
#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
#pragma DATA _CONFIG3H, _CCP2MX_OFF_3H
#pragma DATA _CONFIG4L, _STVR_ON_4L & _LVP_OFF_4L & _DEBUG_OFF_4L
#pragma DATA _CONFIG5L, _CP0_ON_5L & _CP1_ON_5L & _CP2_ON_5L & _CP3_ON_5L
#pragma DATA _CONFIG5H, _CPB_ON_5H & _CPD_ON_5H
#pragma DATA _CONFIG6L, _WRT0_OFF_6L & _WRT1_OFF_6L & _WRT2_OFF_6L & _WRT3_OFF_6L
#pragma DATA _CONFIG6H, _WRTC_ON_6H & _WRTB_ON_6H & _WRTD_OFF_6H
#pragma DATA _CONFIG7L, _EBTR0_OFF_7L & _EBTR1_OFF_7L & _EBTR2_OFF_7L & _EBTR3_OFF_7L
#pragma DATA _CONFIG7H, _EBTRB_ON_7H
 
#pragma CLOCK_FREQ 40000000
 
Function receive() As Byte
 
If ( (rcsta.OERR = 1) ) Then
020E A2AB BTFSS gbl_rcsta,1
0210 D002 BRA label268438551
0216 label268438551
 
rcsta.CREN = 0
0212 98AB BCF gbl_rcsta,4
 
rcsta.CREN = 1
0214 88AB BSF gbl_rcsta,4
 
End If
Do While (pir1.RCIF = 0)
0216 AA9E BTFSS gbl_pir1,5
0218 D7FE BRA label268438551
 
Loop
receive = rcreg
021A 50AE MOVF gbl_rcreg, W
021C 6E09 MOVWF CompTempVarRet489
 
End Function
021E 0012 RETURN
 
 
Sub send(c As Byte)
 
Do while (pir1 & (1 << TXIF)) = 0 Loop
0204 label268438562
0204 A89E BTFSS gbl_pir1,4
0206 D7FE BRA label268438562
 
txreg = c
0208 5009 MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
 
End Sub
020C 0012 RETURN
 
 
Sub main()
 
Dim motors As Byte
Dim sensors As Byte
Dim buttons As Byte
Dim leds As Byte
Dim count As Long
Dim i As Long
 
'NASTAVENI IO
lata=0xFF
0220 6889 SETF gbl_lata
 
latb=0
0222 6A8A CLRF gbl_latb
 
latc=0xFF
0224 688B SETF gbl_latc
 
trisa=0xF0
0226 0EF0 MOVLW 0xF0
0228 6E92 MOVWF gbl_trisa
 
trisb=0x3F
022A 0E3F MOVLW 0x3F
022C 6E93 MOVWF gbl_trisb
 
trisc=0x9F
022E 0E9F MOVLW 0x9F
0230 6E94 MOVWF gbl_trisc
 
 
'VYPNOUT ADC
adcon1=0xC6
0232 0EC6 MOVLW 0xC6
0234 6EC1 MOVWF gbl_adcon1
 
adcon0=0xC0
0236 0EC0 MOVLW 0xC0
0238 6EC2 MOVWF gbl_adcon0
 
 
'UART 9600bps
spbrg=64
023A 0E40 MOVLW 0x40
023C 6EAF MOVWF gbl_spbrg
 
txsta = txsta & ~(1 << BRGH)
023E 0EFB MOVLW 0xFB
0240 14AC ANDWF gbl_txsta, W
0242 6EAC MOVWF gbl_txsta
 
txsta = txsta | (1 << TXEN)
0244 0E20 MOVLW 0x20
0246 10AC IORWF gbl_txsta, W
0248 6EAC MOVWF gbl_txsta
 
rcsta = rcsta | (1 << CREN)
024A 0E10 MOVLW 0x10
024C 10AB IORWF gbl_rcsta, W
024E 6EAB MOVWF gbl_rcsta
 
rcsta = rcsta | (1 << SPEN)
0250 0E80 MOVLW 0x80
0252 10AB IORWF gbl_rcsta, W
0254 6EAB MOVWF gbl_rcsta
 
motors = 0x00
0256 6A01 CLRF main_1_motors
 
do while (portb.0 = 1)
0258 label268438598
0258 B081 BTFSC gbl_portb,0
025A D7FE BRA label268438598
 
loop
 
leds = 0xF0
025C 0EF0 MOVLW 0xF0
025E 6E03 MOVWF main_1_leds
 
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)
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
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
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
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
0312 0E04 MOVLW 0x04
0314 1003 IORWF main_1_leds, W
0316 6E03 MOVWF main_1_leds
 
end if
lata = leds
0318 5003 MOVF main_1_leds, W
031A 6E89 MOVWF gbl_lata
 
loop
031C D7A8 BRA label268438603
031E label268438608
 
lata = 0xFF
031E 6889 SETF gbl_lata
 
 
Do while 1
0320 label268438640
 
 
sensors =0xFF
0320 6802 SETF main_1_sensors
 
sensors = Call receive() 'prijmi stav cidel senzoru
0322 EC07F001 CALL receive_00000
0326 5009 MOVF CompTempVarRet489, W
0328 6E02 MOVWF main_1_sensors
 
If (!((sensors.0) and (sensors.1))) Then
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
033A 0E77 MOVLW 0x77
033C 6E01 MOVWF main_1_motors
 
End If
If (!(sensors.2)) Then
033E B402 BTFSC main_1_sensors,2
0340 D002 BRA label268438649
0346 label268438649
 
motors = 0xF7
0342 0EF7 MOVLW 0xF7
0344 6E01 MOVWF main_1_motors
 
End If
If (!(sensors.3)) Then
0346 B602 BTFSC main_1_sensors,3
0348 D002 BRA label268438652
034E label268438652
 
motors = 0x7F
034A 0E7F MOVLW 0x7F
034C 6E01 MOVWF main_1_motors
 
End If
lata = sensors
034E 5002 MOVF main_1_sensors, W
0350 6E89 MOVWF gbl_lata
 
call send(motors)
0352 5001 MOVF main_1_motors, W
0354 6E09 MOVWF send_00000_arg_c
0356 EC02F001 CALL send_00000
 
Loop
035A D7E2 BRA label268438640
 
End Sub
 
 
////////////////////////////////////////
// Code with no source :-)
////////////////////////////////////////
0200 EFAEF001 GOTO _startup
 
 
035C _startup
035C EF10F001 GOTO main
 
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
300004 FEFF DW 0xFEFF
300006 FFFB DW 0xFFFB
300008 3FF0 DW 0x3FF0
30000A 9FFF DW 0x9FFF
30000C BFFF DW 0xBFFF
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.cof
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:executable
+*
\ No newline at end of property
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.hex
0,0 → 1,26
:020000040000FA
:10020000AEEF01F09EA8FED70950AD6E1200ABA272
:1002100002D0AB98AB889EAAFED7AE50096E1200F2
:1002200089688A6A8B68F00E926E3F0E936E9F0EFD
:10023000946EC60EC16EC00EC26E400EAF6EFB0E47
:10024000AC14AC6E200EAC10AC6E100EAB10AB6EDE
:10025000800EAB10AB6E016A81B0FED7F00E036E5C
:10026000800E046E1A0E056E060E066E076A0750A3
:10027000000808E10650000805E10550000802E109
:100280000450000807BED8804AE2010E045C096EE3
:10029000000E0A6ED8A00A3C055E000E0A6ED8A0B9
:1002A0000A3C065E000E0A6ED8A00A3C075E0950A2
:1002B000046E000E075C08E1040E065C05E1930E77
:1002C000055C02E1E00E045C02E307AE03D0010E20
:1002D0000310036E000E075C08E1030E065C05E1E7
:1002E0000D0E055C02E1400E045C02E307AE03D094
:1002F000020E0310036E000E075C08E1010E065C9F
:1003000005E1860E055C02E1A00E045C02E307AE87
:1003100003D0040E0310036E0350896EA8D78968BA
:10032000026807EC01F00950026E086A02A203D0CD
:1003300002A001D0082A085202E1770E016E02B431
:1003400002D0F70E016E02B602D07F0E016E02508F
:10035000896E0150096E02EC01F0E2D710EF01F056
:020000040030CA
:0E000000FFFEF6FEFFFEFBFFF03FFF9FFFBF7F
:00000001FF
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.lst
0,0 → 1,227
;/////////////////////////////////////////////////////////////////////////////////
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
;// Version : 6.70
;// License Type : Pro License
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
;/////////////////////////////////////////////////////////////////////////////////
 
ORG 0x00000200
0200 EFAEF001 GOTO _startup
ORG 0x00000204
0204 send_00000
0204 ; { send ; function begin
0204 label268438562
0204 A89E BTFSS gbl_pir1,4
0206 D7FE BRA label268438562
0208 5009 MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
020C 0012 RETURN
020E ; } send function end
 
ORG 0x0000020E
020E receive_00000
020E ; { receive ; function begin
020E A2AB BTFSS gbl_rcsta,1
0210 D002 BRA label268438551
0212 98AB BCF gbl_rcsta,4
0214 88AB BSF gbl_rcsta,4
0216 label268438551
0216 AA9E BTFSS gbl_pir1,5
0218 D7FE BRA label268438551
021A 50AE MOVF gbl_rcreg, W
021C 6E09 MOVWF CompTempVarRet489
021E 0012 RETURN
0220 ; } receive 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 6A01 CLRF main_1_motors
0258 label268438598
0258 B081 BTFSC gbl_portb,0
025A D7FE BRA label268438598
025C 0EF0 MOVLW 0xF0
025E 6E03 MOVWF main_1_leds
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'
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 0x0000035C
035C _startup
035C EF10F001 GOTO main
ORG 0x00300000
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
ORG 0x00300004
300004 FEFF DW 0xFEFF
300006 FFFB DW 0xFFFB
ORG 0x00300008
300008 3FF0 DW 0x3FF0
30000A 9FFF DW 0x9FFF
30000C BFFF DW 0xBFFF
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.stat
0,0 → 1,8
// SourceBoost Linker Function Resource Usage Dump
 
#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 = 10.4,rom = 316;
_startup(void):"NoSourceFile",line = 0,ram = 0.0,rom = 4;
#HEAP_BLOCK: 0, 11, 1525;
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/makefile.gen
0,0 → 1,10
# Generated by SourceBoost IDE 6.70
 
_.obj: _.bas robot.bas robot.__c
@"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\robot" /p robot -rb 0x200
 
all: robot.hex
 
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.brws
0,0 → 1,110
!_TAG_FILE_FORMAT 2 /extended format; --format=1 will not append ;" to lines/
!_TAG_FILE_SORTED 1 /0=unsorted, 1=sorted, 2=foldcase/
!_TAG_PROGRAM_AUTHOR Darren Hiebert /dhiebert@users.sourceforge.net/
!_TAG_PROGRAM_NAME Exuberant Ctags //
!_TAG_PROGRAM_URL http://ctags.sourceforge.net /official site/
!_TAG_PROGRAM_VERSION 5.4 //
adcon0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 731;" d
adcon1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 730;" d
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 39;" 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
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
count C:\Documents and Settings\Robiada\Desktop\SW\robot\robot.bas 41;" d
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
eedata C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 714;" d
fsr0h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 770;" d
fsr0l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 769;" d
fsr1h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 762;" d
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
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
intcon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 778;" d
intcon2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 777;" d
intcon3 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 776;" d
ipr1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 708;" d
ipr2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 711;" d
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 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
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
pclatu C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 787;" d
pie1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 706;" d
pie2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 709;" d
pir1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 707;" d
pir2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 710;" d
plusw0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 771;" d
plusw1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 763;" d
plusw2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 755;" d
porta C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 697;" d
portb C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 698;" d
portc C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 699;" d
postdec0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 773;" d
postdec1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 765;" d
postdec2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 757;" d
postinc0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 774;" d
postinc1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 766;" d
postinc2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 758;" d
pr2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 740;" d
preinc0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 772;" d
preinc1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 764;" d
preinc2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 756;" d
prodh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 780;" d
prodl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 779;" d
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
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
sspcon1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 735;" d
sspcon2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 734;" d
sspstat C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 736;" d
status C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 752;" d
stkptr C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 788;" d
t0con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 749;" d
t1con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 742;" d
t2con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 739;" d
t3con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 721;" d
tablat C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 781;" d
tblptrh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 783;" d
tblptrl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 782;" d
tblptru C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 784;" d
tmr0h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 751;" d
tmr0l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 750;" d
tmr1h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 744;" d
tmr1l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 743;" d
tmr2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 741;" d
tmr3h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 723;" d
tmr3l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 722;" d
tosh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 790;" d
tosl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 789;" d
tosu C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 791;" d
trisa C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 703;" d
trisb C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 704;" d
trisc C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 705;" d
txreg C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 718;" d
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
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.tree
0,0 → 1,7
// SourceBoost Linker Call Tree Dump
 
_startup:"NoSourceFile",line = 0
{ main:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } send:"robot.bas",line = 31
{ } }}
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/_.bas
0,0 → 1,2
#include <basic\system.bas>
#include "robot.bas"
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/robot/robot.__c
0,0 → 1,41
[Settings]
Target=PIC18F252
Active Compiler=BoostBasic
ClockRate=40000000
Type=0
Warnings=1
Profiling=0
Snapshot=0
[Files]
File0=robot.bas
Count=1
[Plugins]
Speed Tester=6B094201040000004E6F6E65
Led Block=706F727462000000000000000000
Led=706F72746200000000000000000000000000
Button Block=706F72746200000000000000000000000000
Button=00706F727462000000000000000000
Bcd=706F727462000000000000000000
[Bookmarks]
Count=0
[Breakpoints]
Count=0
[Debugger]
DebugFromMain=1
[Compiler]
Extra=
[Linker]
Extra=-rb 0x200
[Tools]
BoostDir=C:\Program Files\SourceBoost\
Programmer=
[Watch]
Count=0
[Watchpoint]
Count=0
[Register]
Core=1
Ports=1
Interrupt=1
Eeprom=1
Misc=1
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/_.obj
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:executable
+*
\ No newline at end of property
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/makefile.gen
0,0 → 1,10
# Generated by SourceBoost IDE 6.70
 
_.obj: _.bas robot.bas robot.__c
@"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
 
all: robot.hex
 
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.brws
0,0 → 1,110
!_TAG_FILE_FORMAT 2 /extended format; --format=1 will not append ;" to lines/
!_TAG_FILE_SORTED 1 /0=unsorted, 1=sorted, 2=foldcase/
!_TAG_PROGRAM_AUTHOR Darren Hiebert /dhiebert@users.sourceforge.net/
!_TAG_PROGRAM_NAME Exuberant Ctags //
!_TAG_PROGRAM_URL http://ctags.sourceforge.net /official site/
!_TAG_PROGRAM_VERSION 5.4 //
adcon0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 731;" d
adcon1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 730;" d
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\vzor\robot.bas 41;" 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
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
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
eedata C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 714;" d
fsr0h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 770;" d
fsr0l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 769;" d
fsr1h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 762;" d
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\vzor\robot.bas 42;" 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
intcon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 778;" d
intcon2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 777;" d
intcon3 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 776;" d
ipr1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 708;" d
ipr2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 711;" d
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\vzor\robot.bas 39;" d
leds1 C:\Documents and Settings\Robiada\Desktop\SW\vzor\robot.bas 40;" d
lvdcon C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 747;" d
main C:\Documents and Settings\Robiada\Desktop\SW\vzor\robot.bas 36;" s
motors C:\Documents and Settings\Robiada\Desktop\SW\vzor\robot.bas 37;" 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
pclatu C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 787;" d
pie1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 706;" d
pie2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 709;" d
pir1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 707;" d
pir2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 710;" d
plusw0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 771;" d
plusw1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 763;" d
plusw2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 755;" d
porta C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 697;" d
portb C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 698;" d
portc C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 699;" d
postdec0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 773;" d
postdec1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 765;" d
postdec2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 757;" d
postinc0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 774;" d
postinc1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 766;" d
postinc2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 758;" d
pr2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 740;" d
preinc0 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 772;" d
preinc1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 764;" d
preinc2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 756;" d
prodh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 780;" d
prodl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 779;" d
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\vzor\robot.bas 20;" f
send C:\Documents and Settings\Robiada\Desktop\SW\vzor\robot.bas 31;" s
sensors C:\Documents and Settings\Robiada\Desktop\SW\vzor\robot.bas 38;" 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
sspcon1 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 735;" d
sspcon2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 734;" d
sspstat C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 736;" d
status C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 752;" d
stkptr C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 788;" d
t0con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 749;" d
t1con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 742;" d
t2con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 739;" d
t3con C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 721;" d
tablat C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 781;" d
tblptrh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 783;" d
tblptrl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 782;" d
tblptru C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 784;" d
tmr0h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 751;" d
tmr0l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 750;" d
tmr1h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 744;" d
tmr1l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 743;" d
tmr2 C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 741;" d
tmr3h C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 723;" d
tmr3l C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 722;" d
tosh C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 790;" d
tosl C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 789;" d
tosu C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 791;" d
trisa C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 703;" d
trisb C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 704;" d
trisc C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 705;" d
txreg C:\Program Files\SourceBoost\Include\basic\pic18F252.bas 718;" d
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
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.cof
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream
Property changes:
Added: svn:executable
+*
\ No newline at end of property
Added: svn:mime-type
+application/octet-stream
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/_.bas
0,0 → 1,2
#include <basic\system.bas>
#include "robot.bas"
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.__c
0,0 → 1,41
[Settings]
Target=PIC18F252
Active Compiler=BoostBasic
ClockRate=40000000
Type=0
Warnings=1
Profiling=0
Snapshot=0
[Files]
File0=robot.bas
Count=1
[Plugins]
Speed Tester=6B094201040000004E6F6E65
Led Block=706F727462000000000000000000
Led=706F72746200000000000000000000000000
Button Block=706F72746200000000000000000000000000
Button=00706F727462000000000000000000
Bcd=706F727462000000000000000000
[Bookmarks]
Count=0
[Breakpoints]
Count=0
[Debugger]
DebugFromMain=1
[Compiler]
Extra=
[Linker]
Extra=-rb 0x200
[Tools]
BoostDir=C:\Program Files\SourceBoost\
Programmer=
[Watch]
Count=0
[Watchpoint]
Count=0
[Register]
Core=1
Ports=1
Interrupt=1
Eeprom=1
Misc=1
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.asm
0,0 → 1,310
;/////////////////////////////////////////////////////////////////////////////////
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
;// Version : 6.70
;// License Type : Pro License
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
;/////////////////////////////////////////////////////////////////////////////////
 
include "P18F252.inc"
__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
gbl_prodh EQU 0x00000FF4 ; bytes:1
gbl_porta EQU 0x00000F80 ; bytes:1
gbl_portb EQU 0x00000F81 ; bytes:1
gbl_portc EQU 0x00000F82 ; bytes:1
gbl_lata EQU 0x00000F89 ; bytes:1
gbl_latb EQU 0x00000F8A ; bytes:1
gbl_latc EQU 0x00000F8B ; bytes:1
gbl_trisa EQU 0x00000F92 ; bytes:1
gbl_trisb EQU 0x00000F93 ; bytes:1
gbl_trisc EQU 0x00000F94 ; bytes:1
gbl_pie1 EQU 0x00000F9D ; bytes:1
gbl_pir1 EQU 0x00000F9E ; bytes:1
gbl_ipr1 EQU 0x00000F9F ; bytes:1
gbl_pie2 EQU 0x00000FA0 ; bytes:1
gbl_pir2 EQU 0x00000FA1 ; bytes:1
gbl_ipr2 EQU 0x00000FA2 ; bytes:1
gbl_eecon1 EQU 0x00000FA6 ; bytes:1
gbl_eecon2 EQU 0x00000FA7 ; bytes:1
gbl_eedata EQU 0x00000FA8 ; bytes:1
gbl_eeadr EQU 0x00000FA9 ; bytes:1
gbl_rcsta EQU 0x00000FAB ; bytes:1
gbl_txsta EQU 0x00000FAC ; bytes:1
gbl_txreg EQU 0x00000FAD ; bytes:1
gbl_rcreg EQU 0x00000FAE ; bytes:1
gbl_spbrg EQU 0x00000FAF ; bytes:1
gbl_t3con EQU 0x00000FB1 ; bytes:1
gbl_tmr3l EQU 0x00000FB2 ; bytes:1
gbl_tmr3h EQU 0x00000FB3 ; bytes:1
gbl_ccp2con EQU 0x00000FBA ; bytes:1
gbl_ccpr2l EQU 0x00000FBB ; bytes:1
gbl_ccpr2h EQU 0x00000FBC ; bytes:1
gbl_ccp1con EQU 0x00000FBD ; bytes:1
gbl_ccpr1l EQU 0x00000FBE ; bytes:1
gbl_ccpr1h EQU 0x00000FBF ; bytes:1
gbl_adcon1 EQU 0x00000FC1 ; bytes:1
gbl_adcon0 EQU 0x00000FC2 ; bytes:1
gbl_adresl EQU 0x00000FC3 ; bytes:1
gbl_adresh EQU 0x00000FC4 ; bytes:1
gbl_sspcon2 EQU 0x00000FC5 ; bytes:1
gbl_sspcon1 EQU 0x00000FC6 ; bytes:1
gbl_sspstat EQU 0x00000FC7 ; bytes:1
gbl_sspadd EQU 0x00000FC8 ; bytes:1
gbl_sspbuf EQU 0x00000FC9 ; bytes:1
gbl_t2con EQU 0x00000FCA ; bytes:1
gbl_pr2 EQU 0x00000FCB ; bytes:1
gbl_tmr2 EQU 0x00000FCC ; bytes:1
gbl_t1con EQU 0x00000FCD ; bytes:1
gbl_tmr1l EQU 0x00000FCE ; bytes:1
gbl_tmr1h EQU 0x00000FCF ; bytes:1
gbl_rcon EQU 0x00000FD0 ; bytes:1
gbl_wdtcon EQU 0x00000FD1 ; bytes:1
gbl_lvdcon EQU 0x00000FD2 ; bytes:1
gbl_osccon EQU 0x00000FD3 ; bytes:1
gbl_t0con EQU 0x00000FD5 ; bytes:1
gbl_tmr0l EQU 0x00000FD6 ; bytes:1
gbl_tmr0h EQU 0x00000FD7 ; bytes:1
gbl_fsr2l EQU 0x00000FD9 ; bytes:1
gbl_fsr2h EQU 0x00000FDA ; bytes:1
gbl_plusw2 EQU 0x00000FDB ; bytes:1
gbl_preinc2 EQU 0x00000FDC ; bytes:1
gbl_postdec2 EQU 0x00000FDD ; bytes:1
gbl_postinc2 EQU 0x00000FDE ; bytes:1
gbl_indf2 EQU 0x00000FDF ; bytes:1
gbl_bsr EQU 0x00000FE0 ; bytes:1
gbl_fsr1l EQU 0x00000FE1 ; bytes:1
gbl_fsr1h EQU 0x00000FE2 ; bytes:1
gbl_plusw1 EQU 0x00000FE3 ; bytes:1
gbl_preinc1 EQU 0x00000FE4 ; bytes:1
gbl_postdec1 EQU 0x00000FE5 ; bytes:1
gbl_postinc1 EQU 0x00000FE6 ; bytes:1
gbl_indf1 EQU 0x00000FE7 ; bytes:1
gbl_wreg EQU 0x00000FE8 ; bytes:1
gbl_fsr0l EQU 0x00000FE9 ; bytes:1
gbl_fsr0h EQU 0x00000FEA ; bytes:1
gbl_plusw0 EQU 0x00000FEB ; bytes:1
gbl_preinc0 EQU 0x00000FEC ; bytes:1
gbl_postdec0 EQU 0x00000FED ; bytes:1
gbl_postinc0 EQU 0x00000FEE ; bytes:1
gbl_indf0 EQU 0x00000FEF ; bytes:1
gbl_intcon3 EQU 0x00000FF0 ; bytes:1
gbl_intcon2 EQU 0x00000FF1 ; bytes:1
gbl_intcon EQU 0x00000FF2 ; bytes:1
gbl_tablat EQU 0x00000FF5 ; bytes:1
gbl_tblptrl EQU 0x00000FF6 ; bytes:1
gbl_tblptrh EQU 0x00000FF7 ; bytes:1
gbl_tblptru EQU 0x00000FF8 ; bytes:1
gbl_pcl EQU 0x00000FF9 ; bytes:1
gbl_pclath EQU 0x00000FFA ; bytes:1
gbl_pclatu EQU 0x00000FFB ; bytes:1
gbl_stkptr EQU 0x00000FFC ; bytes:1
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
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
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
BRA label268438550
BCF gbl_rcsta,4
BSF gbl_rcsta,4
label268438550
BTFSS gbl_pir1,5
BRA label268438550
MOVF gbl_rcreg, W
MOVWF CompTempVarRet489
RETURN
; } receive function end
 
ORG 0x00000220
main
; { main ; function begin
SETF gbl_lata
CLRF gbl_latb
SETF gbl_latc
MOVLW 0xF0
MOVWF gbl_trisa
MOVLW 0x3F
MOVWF gbl_trisb
MOVLW 0x9F
MOVWF gbl_trisc
MOVLW 0xC6
MOVWF gbl_adcon1
MOVLW 0xC0
MOVWF gbl_adcon0
MOVLW 0x40
MOVWF gbl_spbrg
MOVLW 0xFB
ANDWF gbl_txsta, W
MOVWF gbl_txsta
MOVLW 0x20
IORWF gbl_txsta, W
MOVWF gbl_txsta
MOVLW 0x10
IORWF gbl_rcsta, W
MOVWF gbl_rcsta
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
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
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
MOVWF main_1_motors
label268438619
SETF main_1_leds
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
label268438646
BTFSC main_1_sensors,2
BRA label268438649
MOVLW 0xFE
ANDWF main_1_leds, W
MOVWF main_1_leds
label268438649
BTFSC main_1_sensors,3
BRA label268438652
MOVLW 0xF7
ANDWF main_1_leds, W
MOVWF main_1_leds
label268438652
MOVF main_1_leds, W
MOVWF gbl_lata
MOVF main_1_motors, W
MOVWF send_00000_arg_c
CALL send_00000
BRA label268438595
; } main function end
 
ORG 0x00000332
_startup
GOTO main
ORG 0x00300000
DW 0xFEFF
DW 0xFEF6
ORG 0x00300004
DW 0xFEFF
DW 0xFFFB
ORG 0x00300008
DW 0x3FF0
DW 0x9FFF
DW 0xBFFF
END
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.bas
0,0 → 1,130
'robot
 
'#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
 
 
#pragma DATA _CONFIG1H, _OSCS_OFF_1H & _HSPLL_OSC_1H
#pragma DATA _CONFIG2L, _BOR_ON_2L & _BORV_42_2L & _PWRT_ON_2L
#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
#pragma DATA _CONFIG3H, _CCP2MX_OFF_3H
#pragma DATA _CONFIG4L, _STVR_ON_4L & _LVP_OFF_4L & _DEBUG_OFF_4L
#pragma DATA _CONFIG5L, _CP0_ON_5L & _CP1_ON_5L & _CP2_ON_5L & _CP3_ON_5L
#pragma DATA _CONFIG5H, _CPB_ON_5H & _CPD_ON_5H
#pragma DATA _CONFIG6L, _WRT0_OFF_6L & _WRT1_OFF_6L & _WRT2_OFF_6L & _WRT3_OFF_6L
#pragma DATA _CONFIG6H, _WRTC_ON_6H & _WRTB_ON_6H & _WRTD_OFF_6H
#pragma DATA _CONFIG7L, _EBTR0_OFF_7L & _EBTR1_OFF_7L & _EBTR2_OFF_7L & _EBTR3_OFF_7L
#pragma DATA _CONFIG7H, _EBTRB_ON_7H
 
#pragma CLOCK_FREQ 40000000
 
Function receive() As Byte
If ( (rcsta.OERR = 1) ) Then
rcsta.CREN = 0
rcsta.CREN = 1
End If
Do While (pir1.RCIF = 0)
Loop
receive = rcreg
End Function
 
Sub send(c As Byte)
Do while (pir1 & (1 << TXIF)) = 0 Loop
txreg = c
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
 
'NASTAVENI IO
lata=0xFF
latb=0
latc=0xFF
trisa=0xF0
trisb=0x3F
trisc=0x9F
 
'VYPNOUT ADC
adcon1=0xC6
adcon0=0xC0
 
'UART 9600bps
spbrg=64
txsta = txsta & ~(1 << BRGH)
txsta = txsta | (1 << TXEN)
rcsta = rcsta | (1 << CREN)
rcsta = rcsta | (1 << SPEN)
leds = 0xFF
leds1 = 0x0F
 
motors = 0x00
Do while 1
buttons = portb
If (buttons.1)=0 Then
i=0
leds1 = leds1 - 1
lata = leds1
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
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
lata = leds
call send(motors)
 
Loop
 
End Sub
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.casm
0,0 → 1,381
;/////////////////////////////////////////////////////////////////////////////////
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
;// Version : 6.70
;// License Type : Pro License
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
;/////////////////////////////////////////////////////////////////////////////////
 
'robot
 
'#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
 
 
#pragma DATA _CONFIG1H, _OSCS_OFF_1H & _HSPLL_OSC_1H
#pragma DATA _CONFIG2L, _BOR_ON_2L & _BORV_42_2L & _PWRT_ON_2L
#pragma DATA _CONFIG2H, _WDT_OFF_2H & _WDTPS_128_2H
#pragma DATA _CONFIG3H, _CCP2MX_OFF_3H
#pragma DATA _CONFIG4L, _STVR_ON_4L & _LVP_OFF_4L & _DEBUG_OFF_4L
#pragma DATA _CONFIG5L, _CP0_ON_5L & _CP1_ON_5L & _CP2_ON_5L & _CP3_ON_5L
#pragma DATA _CONFIG5H, _CPB_ON_5H & _CPD_ON_5H
#pragma DATA _CONFIG6L, _WRT0_OFF_6L & _WRT1_OFF_6L & _WRT2_OFF_6L & _WRT3_OFF_6L
#pragma DATA _CONFIG6H, _WRTC_ON_6H & _WRTB_ON_6H & _WRTD_OFF_6H
#pragma DATA _CONFIG7L, _EBTR0_OFF_7L & _EBTR1_OFF_7L & _EBTR2_OFF_7L & _EBTR3_OFF_7L
#pragma DATA _CONFIG7H, _EBTRB_ON_7H
 
#pragma CLOCK_FREQ 40000000
 
Function receive() As Byte
 
If ( (rcsta.OERR = 1) ) Then
020E A2AB BTFSS gbl_rcsta,1
0210 D002 BRA label268438550
0216 label268438550
 
rcsta.CREN = 0
0212 98AB BCF gbl_rcsta,4
 
rcsta.CREN = 1
0214 88AB BSF gbl_rcsta,4
 
End If
Do While (pir1.RCIF = 0)
0216 AA9E BTFSS gbl_pir1,5
0218 D7FE BRA label268438550
 
Loop
receive = rcreg
021A 50AE MOVF gbl_rcreg, W
021C 6E0A MOVWF CompTempVarRet489
 
End Function
021E 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
 
txreg = c
0208 500A MOVF send_00000_arg_c, W
020A 6EAD MOVWF gbl_txreg
 
End Sub
020C 0012 RETURN
 
 
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
 
latb=0
0222 6A8A CLRF gbl_latb
 
latc=0xFF
0224 688B SETF gbl_latc
 
trisa=0xF0
0226 0EF0 MOVLW 0xF0
0228 6E92 MOVWF gbl_trisa
 
trisb=0x3F
022A 0E3F MOVLW 0x3F
022C 6E93 MOVWF gbl_trisb
 
trisc=0x9F
022E 0E9F MOVLW 0x9F
0230 6E94 MOVWF gbl_trisc
 
 
'VYPNOUT ADC
adcon1=0xC6
0232 0EC6 MOVLW 0xC6
0234 6EC1 MOVWF gbl_adcon1
 
adcon0=0xC0
0236 0EC0 MOVLW 0xC0
0238 6EC2 MOVWF gbl_adcon0
 
 
'UART 9600bps
spbrg=64
023A 0E40 MOVLW 0x40
023C 6EAF MOVWF gbl_spbrg
 
txsta = txsta & ~(1 << BRGH)
023E 0EFB MOVLW 0xFB
0240 14AC ANDWF gbl_txsta, W
0242 6EAC MOVWF gbl_txsta
 
txsta = txsta | (1 << TXEN)
0244 0E20 MOVLW 0x20
0246 10AC IORWF gbl_txsta, W
0248 6EAC MOVWF gbl_txsta
 
rcsta = rcsta | (1 << CREN)
024A 0E10 MOVLW 0x10
024C 10AB IORWF gbl_rcsta, W
024E 6EAB MOVWF gbl_rcsta
 
rcsta = rcsta | (1 << SPEN)
0250 0E80 MOVLW 0x80
0252 10AB IORWF gbl_rcsta, W
0254 6EAB MOVWF gbl_rcsta
 
leds = 0xFF
0256 6803 SETF main_1_leds
 
leds1 = 0x0F
0258 0E0F MOVLW 0x0F
025A 6E04 MOVWF main_1_leds1
 
 
motors = 0x00
025C 6A01 CLRF main_1_motors
 
Do while 1
025E label268438595
 
buttons = portb
025E 5081 MOVF gbl_portb, W
0260 6E05 MOVWF main_1_buttons
 
If (buttons.1)=0 Then
0262 B205 BTFSC main_1_buttons,1
0264 D022 BRA label268438598
02AA label268438598
 
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'
 
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
 
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
 
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
 
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
 
lata = leds1
02BA 5004 MOVF main_1_leds1, W
02BC 6E89 MOVWF gbl_lata
 
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
 
sensors =0xFF
02F2 6802 SETF main_1_sensors
 
sensors = Call receive() 'prijmi stav cidel senzoru
02F4 EC07F001 CALL receive_00000
02F8 500A MOVF CompTempVarRet489, W
02FA 6E02 MOVWF main_1_sensors
 
'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
 
'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
If (sensors.1)=0 Then
0306 B202 BTFSC main_1_sensors,1
0308 D003 BRA label268438646
0310 label268438646
 
'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
 
End If
 
If (sensors.2)=0 Then
0310 B402 BTFSC main_1_sensors,2
0312 D003 BRA label268438649
031A label268438649
 
'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
 
'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 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
 
 
Loop
0330 D796 BRA label268438595
 
 
End Sub
 
 
////////////////////////////////////////
// Code with no source :-)
////////////////////////////////////////
0200 EF99F001 GOTO _startup
 
 
0332 _startup
0332 EF10F001 GOTO main
 
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
300004 FEFF DW 0xFEFF
300006 FFFB DW 0xFFFB
300008 3FF0 DW 0x3FF0
30000A 9FFF DW 0x9FFF
30000C BFFF DW 0xBFFF
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.hex
0,0 → 1,24
:020000040000FA
:1002000099EF01F09EA8FED70A50AD6E1200ABA286
:1002100002D0AB98AB889EAAFED7AE500A6E1200F1
:1002200089688A6A8B68F00E926E3F0E936E9F0EFD
:10023000946EC60EC16EC00EC26E400EAF6EFB0E47
:10024000AC14AC6E200EAC10AC6E100EAB10AB6EDE
:10025000800EAB10AB6E03680F0E046E016A815006
:10026000056E05B222D0066A076A086A096A0404A4
:10027000046E0450896E0950000808E10850070810
:1002800005E10750A10802E10650200802E209AE8C
:1002900008D0062AD8B4072AD8B4082AD8B4092A1C
:1002A000EAD7110E0124016E23D005B821D0066AC9
:1002B000076A086A096A0428046E0450896E0950A6
:1002C000000808E10850070805E10750A10802E10D
:1002D0000650200802E209AE08D0062AD8B4072A40
:1002E000D8B4082AD8B4092AEAD7110E015C016EE5
:1002F0000368026807EC01F00A50026E02B003D0F6
:10030000FD0E0314036E02B203D0FB0E0314036E42
:1003100002B403D0FE0E0314036E02B603D0F70E30
:100320000314036E0350896E01500A6E02EC01F053
:0603300096D710EF01F06A
:020000040030CA
:0E000000FFFEF6FEFFFEFBFFF03FFF9FFFBF7F
:00000001FF
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.lst
0,0 → 1,203
;/////////////////////////////////////////////////////////////////////////////////
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
;// Version : 6.70
;// License Type : Pro License
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
;/////////////////////////////////////////////////////////////////////////////////
 
ORG 0x00000200
0200 EF99F001 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
 
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
021E 0012 RETURN
0220 ; } receive 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
 
ORG 0x00000332
0332 _startup
0332 EF10F001 GOTO main
ORG 0x00300000
300000 FEFF DW 0xFEFF
300002 FEF6 DW 0xFEF6
ORG 0x00300004
300004 FEFF DW 0xFEFF
300006 FFFB DW 0xFFFB
ORG 0x00300008
300008 3FF0 DW 0x3FF0
30000A 9FFF DW 0x9FFF
30000C BFFF DW 0xBFFF
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.stat
0,0 → 1,8
// SourceBoost Linker Function Resource Usage Dump
 
#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;
_startup(void):"NoSourceFile",line = 0,ram = 0.0,rom = 4;
#HEAP_BLOCK: 0, 11, 1525;
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/roboti/Robiada/2007/SW/vzor/robot.tree
0,0 → 1,7
// SourceBoost Linker Call Tree Dump
 
_startup:"NoSourceFile",line = 0
{ main:"robot.bas",line = 36
{ receive:"robot.bas",line = 20
{ } send:"robot.bas",line = 31
{ } }}
Property changes:
Added: svn:executable
+*
\ No newline at end of property