| 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
|
| 321 |
kaklik |
9 |
0200 EF77F001 GOTO _startup
|
| 318 |
kaklik |
10 |
ORG 0x00000204
|
| 321 |
kaklik |
11 |
0204 receive_00000
|
|
|
12 |
0204 ; { receive ; function begin
|
|
|
13 |
0204 A2AB BTFSS gbl_rcsta,1
|
|
|
14 |
0206 D002 BRA label268438550
|
|
|
15 |
0208 98AB BCF gbl_rcsta,4
|
|
|
16 |
020A 88AB BSF gbl_rcsta,4
|
|
|
17 |
020C label268438550
|
|
|
18 |
020C AA9E BTFSS gbl_pir1,5
|
|
|
19 |
020E D7FE BRA label268438550
|
|
|
20 |
0210 50AE MOVF gbl_rcreg, W
|
|
|
21 |
0212 6E07 MOVWF CompTempVarRet489
|
|
|
22 |
0214 0012 RETURN
|
|
|
23 |
0216 ; } receive function end
|
| 318 |
kaklik |
24 |
|
| 321 |
kaklik |
25 |
ORG 0x00000216
|
|
|
26 |
0216 send_00000
|
|
|
27 |
0216 ; { send ; function begin
|
|
|
28 |
0216 label268438561
|
|
|
29 |
0216 A89E BTFSS gbl_pir1,4
|
|
|
30 |
0218 D7FE BRA label268438561
|
|
|
31 |
021A 5004 MOVF send_00000_arg_c, W
|
|
|
32 |
021C 6EAD MOVWF gbl_txreg
|
| 318 |
kaklik |
33 |
021E 0012 RETURN
|
| 321 |
kaklik |
34 |
0220 ; } send function end
|
| 318 |
kaklik |
35 |
|
|
|
36 |
ORG 0x00000220
|
| 321 |
kaklik |
37 |
0220 delay_00000
|
|
|
38 |
0220 ; { delay ; function begin
|
|
|
39 |
0220 label268438570
|
|
|
40 |
0220 5005 MOVF delay_00000_1_i, W
|
|
|
41 |
0222 5C04 SUBWF delay_00000_arg_cas, W
|
|
|
42 |
0224 A0D8 BTFSS STATUS,C
|
|
|
43 |
0226 0012 RETURN
|
|
|
44 |
0228 label4026532417
|
|
|
45 |
0228 5006 MOVF delay_00000_1_x, W
|
|
|
46 |
022A 0864 SUBLW 0x64
|
|
|
47 |
022C E305 BNC label268438574
|
|
|
48 |
022E EC02F001 CALL receive_00000
|
|
|
49 |
0232 2806 INCF delay_00000_1_x, W
|
|
|
50 |
0234 6E06 MOVWF delay_00000_1_x
|
|
|
51 |
0236 D7F8 BRA label4026532417
|
|
|
52 |
0238 label268438574
|
|
|
53 |
0238 2805 INCF delay_00000_1_i, W
|
|
|
54 |
023A 6E05 MOVWF delay_00000_1_i
|
|
|
55 |
023C D7F1 BRA label268438570
|
|
|
56 |
023E ; } delay function end
|
| 318 |
kaklik |
57 |
|
| 321 |
kaklik |
58 |
ORG 0x0000023E
|
|
|
59 |
023E main
|
|
|
60 |
023E ; { main ; function begin
|
|
|
61 |
023E 6889 SETF gbl_lata
|
|
|
62 |
0240 6A8A CLRF gbl_latb
|
|
|
63 |
0242 688B SETF gbl_latc
|
|
|
64 |
0244 0EF0 MOVLW 0xF0
|
|
|
65 |
0246 6E92 MOVWF gbl_trisa
|
|
|
66 |
0248 0E3F MOVLW 0x3F
|
|
|
67 |
024A 6E93 MOVWF gbl_trisb
|
|
|
68 |
024C 0E9F MOVLW 0x9F
|
|
|
69 |
024E 6E94 MOVWF gbl_trisc
|
|
|
70 |
0250 0EC6 MOVLW 0xC6
|
|
|
71 |
0252 6EC1 MOVWF gbl_adcon1
|
|
|
72 |
0254 0EC0 MOVLW 0xC0
|
|
|
73 |
0256 6EC2 MOVWF gbl_adcon0
|
|
|
74 |
0258 0E40 MOVLW 0x40
|
|
|
75 |
025A 6EAF MOVWF gbl_spbrg
|
|
|
76 |
025C 0EFB MOVLW 0xFB
|
|
|
77 |
025E 14AC ANDWF gbl_txsta, W
|
|
|
78 |
0260 6EAC MOVWF gbl_txsta
|
|
|
79 |
0262 0E20 MOVLW 0x20
|
|
|
80 |
0264 10AC IORWF gbl_txsta, W
|
|
|
81 |
0266 6EAC MOVWF gbl_txsta
|
|
|
82 |
0268 0E10 MOVLW 0x10
|
|
|
83 |
026A 10AB IORWF gbl_rcsta, W
|
|
|
84 |
026C 6EAB MOVWF gbl_rcsta
|
|
|
85 |
026E 0E80 MOVLW 0x80
|
|
|
86 |
0270 10AB IORWF gbl_rcsta, W
|
|
|
87 |
0272 6EAB MOVWF gbl_rcsta
|
|
|
88 |
0274 6A01 CLRF main_1_motors
|
|
|
89 |
0276 0E0E MOVLW 0x0E
|
|
|
90 |
0278 6E89 MOVWF gbl_lata
|
|
|
91 |
027A 0EC8 MOVLW 0xC8
|
|
|
92 |
027C 6E04 MOVWF delay_00000_arg_cas
|
|
|
93 |
027E EC10F001 CALL delay_00000
|
|
|
94 |
0282 0E0D MOVLW 0x0D
|
|
|
95 |
0284 6E89 MOVWF gbl_lata
|
|
|
96 |
0286 0EC8 MOVLW 0xC8
|
|
|
97 |
0288 6E04 MOVWF delay_00000_arg_cas
|
|
|
98 |
028A EC10F001 CALL delay_00000
|
|
|
99 |
028E 0E0B MOVLW 0x0B
|
|
|
100 |
0290 6E89 MOVWF gbl_lata
|
|
|
101 |
0292 0EC8 MOVLW 0xC8
|
|
|
102 |
0294 6E04 MOVWF delay_00000_arg_cas
|
|
|
103 |
0296 EC10F001 CALL delay_00000
|
|
|
104 |
029A 0E07 MOVLW 0x07
|
|
|
105 |
029C 6E89 MOVWF gbl_lata
|
|
|
106 |
029E 0EC8 MOVLW 0xC8
|
|
|
107 |
02A0 6E04 MOVWF delay_00000_arg_cas
|
|
|
108 |
02A2 EC10F001 CALL delay_00000
|
|
|
109 |
02A6 0E77 MOVLW 0x77
|
|
|
110 |
02A8 6E01 MOVWF main_1_motors
|
|
|
111 |
02AA 0E64 MOVLW 0x64
|
|
|
112 |
02AC 6E04 MOVWF delay_00000_arg_cas
|
|
|
113 |
02AE EC10F001 CALL delay_00000
|
|
|
114 |
02B2 label268438640
|
|
|
115 |
02B2 6802 SETF main_1_sensors
|
|
|
116 |
02B4 EC02F001 CALL receive_00000
|
|
|
117 |
02B8 5007 MOVF CompTempVarRet489, W
|
|
|
118 |
02BA 6E02 MOVWF main_1_sensors
|
|
|
119 |
02BC 6A03 CLRF CompTempVar491
|
|
|
120 |
02BE A202 BTFSS main_1_sensors,1
|
|
|
121 |
02C0 D003 BRA label268438645
|
|
|
122 |
02C2 A002 BTFSS main_1_sensors,0
|
|
|
123 |
02C4 D001 BRA label268438645
|
|
|
124 |
02C6 2A03 INCF CompTempVar491, F
|
|
|
125 |
02C8 label268438645
|
|
|
126 |
02C8 5203 MOVF CompTempVar491, F
|
|
|
127 |
02CA E102 BNZ label268438646
|
|
|
128 |
02CC 0E77 MOVLW 0x77
|
|
|
129 |
02CE 6E01 MOVWF main_1_motors
|
|
|
130 |
02D0 label268438646
|
|
|
131 |
02D0 B402 BTFSC main_1_sensors,2
|
|
|
132 |
02D2 D002 BRA label268438649
|
|
|
133 |
02D4 0EF7 MOVLW 0xF7
|
|
|
134 |
02D6 6E01 MOVWF main_1_motors
|
|
|
135 |
02D8 label268438649
|
|
|
136 |
02D8 B602 BTFSC main_1_sensors,3
|
|
|
137 |
02DA D002 BRA label268438652
|
|
|
138 |
02DC 0E7F MOVLW 0x7F
|
|
|
139 |
02DE 6E01 MOVWF main_1_motors
|
|
|
140 |
02E0 label268438652
|
|
|
141 |
02E0 5002 MOVF main_1_sensors, W
|
|
|
142 |
02E2 6E89 MOVWF gbl_lata
|
|
|
143 |
02E4 5001 MOVF main_1_motors, W
|
|
|
144 |
02E6 6E04 MOVWF send_00000_arg_c
|
|
|
145 |
02E8 EC0BF001 CALL send_00000
|
|
|
146 |
02EC D7E2 BRA label268438640
|
|
|
147 |
02EE ; } main function end
|
|
|
148 |
|
|
|
149 |
ORG 0x000002EE
|
|
|
150 |
02EE _startup
|
|
|
151 |
02EE EF1FF001 GOTO main
|
| 318 |
kaklik |
152 |
ORG 0x00300000
|
|
|
153 |
300000 FEFF DW 0xFEFF
|
|
|
154 |
300002 FEF6 DW 0xFEF6
|
|
|
155 |
ORG 0x00300004
|
|
|
156 |
300004 FEFF DW 0xFEFF
|
|
|
157 |
300006 FFFB DW 0xFFFB
|
|
|
158 |
ORG 0x00300008
|
|
|
159 |
300008 3FF0 DW 0x3FF0
|
|
|
160 |
30000A 9FFF DW 0x9FFF
|
|
|
161 |
30000C BFFF DW 0xBFFF
|