Subversion Repositories svnkaklik

Compare Revisions

No changes between revisions

Ignore whitespace Rev 317 → Rev 318

/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