| 318 |
kaklik |
1 |
;/////////////////////////////////////////////////////////////////////////////////
|
|
|
2 |
;// Code Generator: BoostBasic Compiler - http://www.sourceboost.com
|
|
|
3 |
;// Version : 6.70
|
|
|
4 |
;// License Type : Pro License
|
|
|
5 |
;// Limitations : PIC18 max code size:Unlimited, max RAM banks:Unlimited
|
|
|
6 |
;/////////////////////////////////////////////////////////////////////////////////
|
|
|
7 |
|
|
|
8 |
ORG 0x00000200
|
| 322 |
kaklik |
9 |
0200 EF6CF001 GOTO _startup
|
| 318 |
kaklik |
10 |
ORG 0x00000204
|
| 322 |
kaklik |
11 |
0204 send_00000
|
|
|
12 |
0204 ; { send ; function begin
|
|
|
13 |
0204 label268438562
|
|
|
14 |
0204 A89E BTFSS gbl_pir1,4
|
|
|
15 |
0206 D7FE BRA label268438562
|
|
|
16 |
0208 5007 MOVF send_00000_arg_c, W
|
|
|
17 |
020A 6EAD MOVWF gbl_txreg
|
|
|
18 |
020C 0012 RETURN
|
|
|
19 |
020E ; } send function end
|
| 318 |
kaklik |
20 |
|
| 322 |
kaklik |
21 |
ORG 0x0000020E
|
|
|
22 |
020E receive_00000
|
|
|
23 |
020E ; { receive ; function begin
|
|
|
24 |
020E A2AB BTFSS gbl_rcsta,1
|
|
|
25 |
0210 D002 BRA label268438551
|
|
|
26 |
0212 98AB BCF gbl_rcsta,4
|
|
|
27 |
0214 88AB BSF gbl_rcsta,4
|
|
|
28 |
0216 label268438551
|
|
|
29 |
0216 AA9E BTFSS gbl_pir1,5
|
|
|
30 |
0218 D7FE BRA label268438551
|
|
|
31 |
021A 50AE MOVF gbl_rcreg, W
|
|
|
32 |
021C 6E07 MOVWF CompTempVarRet489
|
| 318 |
kaklik |
33 |
021E 0012 RETURN
|
| 322 |
kaklik |
34 |
0220 ; } receive function end
|
| 318 |
kaklik |
35 |
|
|
|
36 |
ORG 0x00000220
|
| 322 |
kaklik |
37 |
0220 main
|
|
|
38 |
0220 ; { main ; function begin
|
|
|
39 |
0220 6889 SETF gbl_lata
|
|
|
40 |
0222 6A8A CLRF gbl_latb
|
|
|
41 |
0224 688B SETF gbl_latc
|
|
|
42 |
0226 0EF0 MOVLW 0xF0
|
|
|
43 |
0228 6E92 MOVWF gbl_trisa
|
|
|
44 |
022A 0E3F MOVLW 0x3F
|
|
|
45 |
022C 6E93 MOVWF gbl_trisb
|
|
|
46 |
022E 0E9F MOVLW 0x9F
|
|
|
47 |
0230 6E94 MOVWF gbl_trisc
|
|
|
48 |
0232 0EC6 MOVLW 0xC6
|
|
|
49 |
0234 6EC1 MOVWF gbl_adcon1
|
|
|
50 |
0236 0EC0 MOVLW 0xC0
|
|
|
51 |
0238 6EC2 MOVWF gbl_adcon0
|
|
|
52 |
023A 0E40 MOVLW 0x40
|
|
|
53 |
023C 6EAF MOVWF gbl_spbrg
|
|
|
54 |
023E 0EFB MOVLW 0xFB
|
|
|
55 |
0240 14AC ANDWF gbl_txsta, W
|
|
|
56 |
0242 6EAC MOVWF gbl_txsta
|
|
|
57 |
0244 0E20 MOVLW 0x20
|
|
|
58 |
0246 10AC IORWF gbl_txsta, W
|
|
|
59 |
0248 6EAC MOVWF gbl_txsta
|
|
|
60 |
024A 0E10 MOVLW 0x10
|
|
|
61 |
024C 10AB IORWF gbl_rcsta, W
|
|
|
62 |
024E 6EAB MOVWF gbl_rcsta
|
|
|
63 |
0250 0E80 MOVLW 0x80
|
|
|
64 |
0252 10AB IORWF gbl_rcsta, W
|
|
|
65 |
0254 6EAB MOVWF gbl_rcsta
|
|
|
66 |
0256 6A01 CLRF main_1_motors
|
|
|
67 |
0258 label268438598
|
|
|
68 |
0258 B081 BTFSC gbl_portb,0
|
|
|
69 |
025A D7FE BRA label268438598
|
|
|
70 |
025C 0EF0 MOVLW 0xF0
|
|
|
71 |
025E 6E03 MOVWF main_1_leds
|
|
|
72 |
0260 0E80 MOVLW 0x80
|
|
|
73 |
0262 6E04 MOVWF main_1_count
|
|
|
74 |
0264 0E1A MOVLW 0x1A
|
|
|
75 |
0266 6E05 MOVWF main_1_count+D'1'
|
|
|
76 |
0268 label268438603
|
|
|
77 |
0268 5004 MOVF main_1_count, W
|
|
|
78 |
026A 0800 SUBLW 0x00
|
|
|
79 |
026C B0D8 BTFSC STATUS,C
|
|
|
80 |
026E 5005 MOVF main_1_count+D'1', W
|
|
|
81 |
0270 E013 BZ label268438605
|
|
|
82 |
0272 0E01 MOVLW 0x01
|
|
|
83 |
0274 5C04 SUBWF main_1_count, W
|
|
|
84 |
0276 6E07 MOVWF CompTempVar492
|
|
|
85 |
0278 A0D8 BTFSS STATUS,C
|
|
|
86 |
027A 0605 DECF main_1_count+D'1', F
|
|
|
87 |
027C 5007 MOVF CompTempVar492, W
|
|
|
88 |
027E 6E04 MOVWF main_1_count
|
|
|
89 |
0280 0E01 MOVLW 0x01
|
|
|
90 |
0282 1003 IORWF main_1_leds, W
|
|
|
91 |
0284 6E03 MOVWF main_1_leds
|
|
|
92 |
0286 0E02 MOVLW 0x02
|
|
|
93 |
0288 1003 IORWF main_1_leds, W
|
|
|
94 |
028A 6E03 MOVWF main_1_leds
|
|
|
95 |
028C 0E04 MOVLW 0x04
|
|
|
96 |
028E 1003 IORWF main_1_leds, W
|
|
|
97 |
0290 6E03 MOVWF main_1_leds
|
|
|
98 |
0292 5003 MOVF main_1_leds, W
|
|
|
99 |
0294 6E89 MOVWF gbl_lata
|
|
|
100 |
0296 D7E8 BRA label268438603
|
|
|
101 |
0298 label268438605
|
|
|
102 |
0298 6803 SETF main_1_leds
|
|
|
103 |
029A 6889 SETF gbl_lata
|
|
|
104 |
029C label268438623
|
|
|
105 |
029C 6802 SETF main_1_sensors
|
|
|
106 |
029E EC07F001 CALL receive_00000
|
|
|
107 |
02A2 5007 MOVF CompTempVarRet489, W
|
|
|
108 |
02A4 6E02 MOVWF main_1_sensors
|
|
|
109 |
02A6 6A06 CLRF CompTempVar491
|
|
|
110 |
02A8 A202 BTFSS main_1_sensors,1
|
|
|
111 |
02AA D003 BRA label268438628
|
|
|
112 |
02AC A002 BTFSS main_1_sensors,0
|
|
|
113 |
02AE D001 BRA label268438628
|
|
|
114 |
02B0 2A06 INCF CompTempVar491, F
|
|
|
115 |
02B2 label268438628
|
|
|
116 |
02B2 5206 MOVF CompTempVar491, F
|
|
|
117 |
02B4 E102 BNZ label268438629
|
|
|
118 |
02B6 0E77 MOVLW 0x77
|
|
|
119 |
02B8 6E01 MOVWF main_1_motors
|
|
|
120 |
02BA label268438629
|
|
|
121 |
02BA B402 BTFSC main_1_sensors,2
|
|
|
122 |
02BC D002 BRA label268438632
|
|
|
123 |
02BE 0EF7 MOVLW 0xF7
|
|
|
124 |
02C0 6E01 MOVWF main_1_motors
|
|
|
125 |
02C2 label268438632
|
|
|
126 |
02C2 B602 BTFSC main_1_sensors,3
|
|
|
127 |
02C4 D002 BRA label268438635
|
|
|
128 |
02C6 0E7F MOVLW 0x7F
|
|
|
129 |
02C8 6E01 MOVWF main_1_motors
|
|
|
130 |
02CA label268438635
|
|
|
131 |
02CA 5002 MOVF main_1_sensors, W
|
|
|
132 |
02CC 6E89 MOVWF gbl_lata
|
|
|
133 |
02CE 5001 MOVF main_1_motors, W
|
|
|
134 |
02D0 6E07 MOVWF send_00000_arg_c
|
|
|
135 |
02D2 EC02F001 CALL send_00000
|
|
|
136 |
02D6 D7E2 BRA label268438623
|
|
|
137 |
02D8 ; } main function end
|
| 318 |
kaklik |
138 |
|
| 322 |
kaklik |
139 |
ORG 0x000002D8
|
|
|
140 |
02D8 _startup
|
|
|
141 |
02D8 EF10F001 GOTO main
|
| 318 |
kaklik |
142 |
ORG 0x00300000
|
|
|
143 |
300000 FEFF DW 0xFEFF
|
|
|
144 |
300002 FEF6 DW 0xFEF6
|
|
|
145 |
ORG 0x00300004
|
|
|
146 |
300004 FEFF DW 0xFEFF
|
|
|
147 |
300006 FFFB DW 0xFFFB
|
|
|
148 |
ORG 0x00300008
|
|
|
149 |
300008 3FF0 DW 0x3FF0
|
|
|
150 |
30000A 9FFF DW 0x9FFF
|
|
|
151 |
30000C BFFF DW 0xBFFF
|