Subversion Repositories svnkaklik

Compare Revisions

No changes between revisions

Ignore whitespace Rev 318 → Rev 319

/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/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/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\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/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/_.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/robot/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/robot/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/robot/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/robot/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/robot/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/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 = 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/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