Rev 324 | Go to most recent revision | Blame | Last modification | View Log | Download
;/////////////////////////////////////////////////////////////////////////////////;// 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 0x0000000F ; Start address of heap__HEAPEND EQU 0x000005FF ; End address of heapgbl_status EQU 0x00000FD8 ; bytes:1gbl_prodl EQU 0x00000FF3 ; bytes:1gbl_prodh EQU 0x00000FF4 ; bytes:1gbl_porta EQU 0x00000F80 ; bytes:1gbl_portb EQU 0x00000F81 ; bytes:1gbl_portc EQU 0x00000F82 ; bytes:1gbl_lata EQU 0x00000F89 ; bytes:1gbl_latb EQU 0x00000F8A ; bytes:1gbl_latc EQU 0x00000F8B ; bytes:1gbl_trisa EQU 0x00000F92 ; bytes:1gbl_trisb EQU 0x00000F93 ; bytes:1gbl_trisc EQU 0x00000F94 ; bytes:1gbl_pie1 EQU 0x00000F9D ; bytes:1gbl_pir1 EQU 0x00000F9E ; bytes:1gbl_ipr1 EQU 0x00000F9F ; bytes:1gbl_pie2 EQU 0x00000FA0 ; bytes:1gbl_pir2 EQU 0x00000FA1 ; bytes:1gbl_ipr2 EQU 0x00000FA2 ; bytes:1gbl_eecon1 EQU 0x00000FA6 ; bytes:1gbl_eecon2 EQU 0x00000FA7 ; bytes:1gbl_eedata EQU 0x00000FA8 ; bytes:1gbl_eeadr EQU 0x00000FA9 ; bytes:1gbl_rcsta EQU 0x00000FAB ; bytes:1gbl_txsta EQU 0x00000FAC ; bytes:1gbl_txreg EQU 0x00000FAD ; bytes:1gbl_rcreg EQU 0x00000FAE ; bytes:1gbl_spbrg EQU 0x00000FAF ; bytes:1gbl_t3con EQU 0x00000FB1 ; bytes:1gbl_tmr3l EQU 0x00000FB2 ; bytes:1gbl_tmr3h EQU 0x00000FB3 ; bytes:1gbl_ccp2con EQU 0x00000FBA ; bytes:1gbl_ccpr2l EQU 0x00000FBB ; bytes:1gbl_ccpr2h EQU 0x00000FBC ; bytes:1gbl_ccp1con EQU 0x00000FBD ; bytes:1gbl_ccpr1l EQU 0x00000FBE ; bytes:1gbl_ccpr1h EQU 0x00000FBF ; bytes:1gbl_adcon1 EQU 0x00000FC1 ; bytes:1gbl_adcon0 EQU 0x00000FC2 ; bytes:1gbl_adresl EQU 0x00000FC3 ; bytes:1gbl_adresh EQU 0x00000FC4 ; bytes:1gbl_sspcon2 EQU 0x00000FC5 ; bytes:1gbl_sspcon1 EQU 0x00000FC6 ; bytes:1gbl_sspstat EQU 0x00000FC7 ; bytes:1gbl_sspadd EQU 0x00000FC8 ; bytes:1gbl_sspbuf EQU 0x00000FC9 ; bytes:1gbl_t2con EQU 0x00000FCA ; bytes:1gbl_pr2 EQU 0x00000FCB ; bytes:1gbl_tmr2 EQU 0x00000FCC ; bytes:1gbl_t1con EQU 0x00000FCD ; bytes:1gbl_tmr1l EQU 0x00000FCE ; bytes:1gbl_tmr1h EQU 0x00000FCF ; bytes:1gbl_rcon EQU 0x00000FD0 ; bytes:1gbl_wdtcon EQU 0x00000FD1 ; bytes:1gbl_lvdcon EQU 0x00000FD2 ; bytes:1gbl_osccon EQU 0x00000FD3 ; bytes:1gbl_t0con EQU 0x00000FD5 ; bytes:1gbl_tmr0l EQU 0x00000FD6 ; bytes:1gbl_tmr0h EQU 0x00000FD7 ; bytes:1gbl_fsr2l EQU 0x00000FD9 ; bytes:1gbl_fsr2h EQU 0x00000FDA ; bytes:1gbl_plusw2 EQU 0x00000FDB ; bytes:1gbl_preinc2 EQU 0x00000FDC ; bytes:1gbl_postdec2 EQU 0x00000FDD ; bytes:1gbl_postinc2 EQU 0x00000FDE ; bytes:1gbl_indf2 EQU 0x00000FDF ; bytes:1gbl_bsr EQU 0x00000FE0 ; bytes:1gbl_fsr1l EQU 0x00000FE1 ; bytes:1gbl_fsr1h EQU 0x00000FE2 ; bytes:1gbl_plusw1 EQU 0x00000FE3 ; bytes:1gbl_preinc1 EQU 0x00000FE4 ; bytes:1gbl_postdec1 EQU 0x00000FE5 ; bytes:1gbl_postinc1 EQU 0x00000FE6 ; bytes:1gbl_indf1 EQU 0x00000FE7 ; bytes:1gbl_wreg EQU 0x00000FE8 ; bytes:1gbl_fsr0l EQU 0x00000FE9 ; bytes:1gbl_fsr0h EQU 0x00000FEA ; bytes:1gbl_plusw0 EQU 0x00000FEB ; bytes:1gbl_preinc0 EQU 0x00000FEC ; bytes:1gbl_postdec0 EQU 0x00000FED ; bytes:1gbl_postinc0 EQU 0x00000FEE ; bytes:1gbl_indf0 EQU 0x00000FEF ; bytes:1gbl_intcon3 EQU 0x00000FF0 ; bytes:1gbl_intcon2 EQU 0x00000FF1 ; bytes:1gbl_intcon EQU 0x00000FF2 ; bytes:1gbl_tablat EQU 0x00000FF5 ; bytes:1gbl_tblptrl EQU 0x00000FF6 ; bytes:1gbl_tblptrh EQU 0x00000FF7 ; bytes:1gbl_tblptru EQU 0x00000FF8 ; bytes:1gbl_pcl EQU 0x00000FF9 ; bytes:1gbl_pclath EQU 0x00000FFA ; bytes:1gbl_pclatu EQU 0x00000FFB ; bytes:1gbl_stkptr EQU 0x00000FFC ; bytes:1gbl_tosl EQU 0x00000FFD ; bytes:1gbl_tosh EQU 0x00000FFE ; bytes:1gbl_tosu EQU 0x00000FFF ; bytes:1CompTempVarRet489 EQU 0x0000000D ; bytes:1send_00000_arg_c EQU 0x0000000D ; bytes:1main_1_motors EQU 0x00000001 ; bytes:1main_1_sensors EQU 0x00000002 ; bytes:1main_1_leds EQU 0x00000003 ; bytes:1main_1_count EQU 0x00000004 ; bytes:4main_1_cas EQU 0x00000008 ; bytes:4CompTempVar491 EQU 0x0000000C ; bytes:1CompTempVar492 EQU 0x0000000D ; bytes:1CompTempVar496 EQU 0x0000000E ; bytes:1ORG 0x00000200GOTO _startupORG 0x00000204send_00000; { send ; function beginlabel268438562BTFSS gbl_pir1,4BRA label268438562MOVF send_00000_arg_c, WMOVWF gbl_txregRETURN; } send function endORG 0x0000020Ereceive_00000; { receive ; function beginBTFSS gbl_rcsta,1BRA label268438551BCF gbl_rcsta,4BSF gbl_rcsta,4label268438551BTFSS gbl_pir1,5BRA label268438551MOVF gbl_rcreg, WMOVWF CompTempVarRet489RETURN; } receive function endORG 0x00000220main; { main ; function beginSETF gbl_lataCLRF gbl_latbSETF gbl_latcMOVLW 0xF0MOVWF gbl_trisaMOVLW 0x3FMOVWF gbl_trisbMOVLW 0x9FMOVWF gbl_triscMOVLW 0xC6MOVWF gbl_adcon1MOVLW 0xC0MOVWF gbl_adcon0MOVLW 0x40MOVWF gbl_spbrgMOVLW 0xFBANDWF gbl_txsta, WMOVWF gbl_txstaMOVLW 0x20IORWF gbl_txsta, WMOVWF gbl_txstaMOVLW 0x10IORWF gbl_rcsta, WMOVWF gbl_rcstaMOVLW 0x80IORWF gbl_rcsta, WMOVWF gbl_rcstaCLRF main_1_motorslabel268438599BTFSC gbl_portb,0BRA label268438599MOVLW 0xF0MOVWF main_1_ledsMOVLW 0x80MOVWF main_1_countMOVLW 0x1AMOVWF main_1_count+D'1'MOVLW 0x06MOVWF main_1_count+D'2'CLRF main_1_count+D'3'label268438604MOVF main_1_count+D'3', WSUBLW 0x00BNZ label268438605MOVF main_1_count+D'2', WSUBLW 0x00BNZ label268438605MOVF main_1_count+D'1', WSUBLW 0x00BNZ label268438605MOVF main_1_count, WSUBLW 0x00label268438605BTFSC main_1_count+D'3',7BSF STATUS,CBC label268438609MOVLW 0x01SUBWF main_1_count, WMOVWF CompTempVar492MOVLW 0x00MOVWF CompTempVar496BTFSS STATUS,CINCFSZ CompTempVar496, WSUBWF main_1_count+D'1', FMOVLW 0x00MOVWF CompTempVar496BTFSS STATUS,CINCFSZ CompTempVar496, WSUBWF main_1_count+D'2', FMOVLW 0x00MOVWF CompTempVar496BTFSS STATUS,CINCFSZ CompTempVar496, WSUBWF main_1_count+D'3', FMOVF CompTempVar492, WMOVWF main_1_countMOVLW 0x00SUBWF main_1_count+D'3', WBNZ label268438621MOVLW 0x04SUBWF main_1_count+D'2', WBNZ label268438621MOVLW 0x93SUBWF main_1_count+D'1', WBNZ label268438621MOVLW 0xE0SUBWF main_1_count, Wlabel268438621BNC label4026532557BTFSS main_1_count+D'3',7BRA label268438625label4026532557MOVLW 0x01IORWF main_1_leds, WMOVWF main_1_ledslabel268438625MOVLW 0x00SUBWF main_1_count+D'3', WBNZ label268438627MOVLW 0x03SUBWF main_1_count+D'2', WBNZ label268438627MOVLW 0x0DSUBWF main_1_count+D'1', WBNZ label268438627MOVLW 0x40SUBWF main_1_count, Wlabel268438627BNC label4026532558BTFSS main_1_count+D'3',7BRA label268438631label4026532558MOVLW 0x02IORWF main_1_leds, WMOVWF main_1_ledslabel268438631MOVLW 0x00SUBWF main_1_count+D'3', WBNZ label268438633MOVLW 0x01SUBWF main_1_count+D'2', WBNZ label268438633MOVLW 0x86SUBWF main_1_count+D'1', WBNZ label268438633MOVLW 0xA0SUBWF main_1_count, Wlabel268438633BNC label4026532559BTFSS main_1_count+D'3',7BRA label268438637label4026532559MOVLW 0x04IORWF main_1_leds, WMOVWF main_1_ledslabel268438637MOVF main_1_leds, WMOVWF gbl_lataBRA label268438604label268438609SETF gbl_latalabel268438641CLRF main_1_casCLRF main_1_cas+D'1'CLRF main_1_cas+D'2'CLRF main_1_cas+D'3'SETF main_1_sensorsCALL receive_00000MOVF CompTempVarRet489, WMOVWF main_1_sensorsCLRF CompTempVar491BTFSS main_1_sensors,1BRA label268438647BTFSS main_1_sensors,0BRA label268438647INCF CompTempVar491, Flabel268438647MOVF CompTempVar491, FBNZ label268438648MOVLW 0x77MOVWF main_1_motorslabel268438648BTFSC main_1_sensors,2BRA label268438651MOVLW 0x00SUBWF main_1_cas+D'3', WBNZ label268438653MOVLW 0x06SUBWF main_1_cas+D'2', WBNZ label268438653MOVLW 0x1ASUBWF main_1_cas+D'1', WBNZ label268438653MOVLW 0x80SUBWF main_1_cas, Wlabel268438653BNC label4026532563BTFSS main_1_cas+D'3',7BRA label4026532566label4026532563INCF main_1_cas, FBTFSC STATUS,ZINCF main_1_cas+D'1', FBTFSC STATUS,ZINCF main_1_cas+D'2', FBTFSC STATUS,ZINCF main_1_cas+D'3', Flabel4026532566CLRF main_1_casCLRF main_1_cas+D'1'CLRF main_1_cas+D'2'CLRF main_1_cas+D'3'MOVLW 0xF7MOVWF main_1_motorslabel268438651BTFSC main_1_sensors,3BRA label268438668MOVLW 0x00SUBWF main_1_cas+D'3', WBNZ label268438670MOVLW 0x06SUBWF main_1_cas+D'2', WBNZ label268438670MOVLW 0x1ASUBWF main_1_cas+D'1', WBNZ label268438670MOVLW 0x80SUBWF main_1_cas, Wlabel268438670BNC label4026532568BTFSS main_1_cas+D'3',7BRA label4026532571label4026532568INCF main_1_cas, FBTFSC STATUS,ZINCF main_1_cas+D'1', FBTFSC STATUS,ZINCF main_1_cas+D'2', FBTFSC STATUS,ZINCF main_1_cas+D'3', Flabel4026532571CLRF main_1_casCLRF main_1_cas+D'1'CLRF main_1_cas+D'2'CLRF main_1_cas+D'3'MOVLW 0x7FMOVWF main_1_motorslabel268438668INCF main_1_cas, FBTFSC STATUS,ZINCF main_1_cas+D'1', FBTFSC STATUS,ZINCF main_1_cas+D'2', FBTFSC STATUS,ZINCF main_1_cas+D'3', FMOVF main_1_sensors, WMOVWF gbl_lataMOVF main_1_motors, WMOVWF send_00000_arg_cCALL send_00000BRA label268438641; } main function endORG 0x000003D6_startupGOTO mainORG 0x00300000DW 0xFEFFDW 0xFEF6ORG 0x00300004DW 0xFEFFDW 0xFFFBORG 0x00300008DW 0x3FF0DW 0x9FFFDW 0xBFFFEND