| 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
|
| 323 |
kaklik |
9 |
0200 EF63F001 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
|
| 323 |
kaklik |
16 |
0208 5006 MOVF send_00000_arg_c, W
|
| 322 |
kaklik |
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
|
| 323 |
kaklik |
32 |
021C 6E06 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
|
| 323 |
kaklik |
74 |
0264 label268438603
|
|
|
75 |
0264 5004 MOVF main_1_count, W
|
|
|
76 |
0266 0800 SUBLW 0x00
|
|
|
77 |
0268 E20E BC label268438604
|
|
|
78 |
026A 0404 DECF main_1_count, W
|
|
|
79 |
026C 6E04 MOVWF main_1_count
|
|
|
80 |
026E 0E01 MOVLW 0x01
|
|
|
81 |
0270 1003 IORWF main_1_leds, W
|
|
|
82 |
0272 6E03 MOVWF main_1_leds
|
|
|
83 |
0274 0E02 MOVLW 0x02
|
|
|
84 |
0276 1003 IORWF main_1_leds, W
|
|
|
85 |
0278 6E03 MOVWF main_1_leds
|
|
|
86 |
027A 0E04 MOVLW 0x04
|
|
|
87 |
027C 1003 IORWF main_1_leds, W
|
|
|
88 |
027E 6E03 MOVWF main_1_leds
|
|
|
89 |
0280 5003 MOVF main_1_leds, W
|
|
|
90 |
0282 6E89 MOVWF gbl_lata
|
|
|
91 |
0284 D7EF BRA label268438603
|
|
|
92 |
0286 label268438604
|
|
|
93 |
0286 6803 SETF main_1_leds
|
|
|
94 |
0288 6889 SETF gbl_lata
|
|
|
95 |
028A label268438619
|
|
|
96 |
028A 6802 SETF main_1_sensors
|
|
|
97 |
028C EC07F001 CALL receive_00000
|
|
|
98 |
0290 5006 MOVF CompTempVarRet489, W
|
|
|
99 |
0292 6E02 MOVWF main_1_sensors
|
|
|
100 |
0294 6A05 CLRF CompTempVar491
|
|
|
101 |
0296 A202 BTFSS main_1_sensors,1
|
|
|
102 |
0298 D003 BRA label268438624
|
|
|
103 |
029A A002 BTFSS main_1_sensors,0
|
|
|
104 |
029C D001 BRA label268438624
|
|
|
105 |
029E 2A05 INCF CompTempVar491, F
|
|
|
106 |
02A0 label268438624
|
|
|
107 |
02A0 5205 MOVF CompTempVar491, F
|
|
|
108 |
02A2 E102 BNZ label268438625
|
|
|
109 |
02A4 0E77 MOVLW 0x77
|
|
|
110 |
02A6 6E01 MOVWF main_1_motors
|
|
|
111 |
02A8 label268438625
|
|
|
112 |
02A8 B402 BTFSC main_1_sensors,2
|
|
|
113 |
02AA D002 BRA label268438628
|
|
|
114 |
02AC 0EF7 MOVLW 0xF7
|
|
|
115 |
02AE 6E01 MOVWF main_1_motors
|
|
|
116 |
02B0 label268438628
|
|
|
117 |
02B0 B602 BTFSC main_1_sensors,3
|
|
|
118 |
02B2 D002 BRA label268438631
|
|
|
119 |
02B4 0E7F MOVLW 0x7F
|
|
|
120 |
02B6 6E01 MOVWF main_1_motors
|
|
|
121 |
02B8 label268438631
|
|
|
122 |
02B8 5002 MOVF main_1_sensors, W
|
|
|
123 |
02BA 6E89 MOVWF gbl_lata
|
|
|
124 |
02BC 5001 MOVF main_1_motors, W
|
|
|
125 |
02BE 6E06 MOVWF send_00000_arg_c
|
|
|
126 |
02C0 EC02F001 CALL send_00000
|
|
|
127 |
02C4 D7E2 BRA label268438619
|
|
|
128 |
02C6 ; } main function end
|
| 318 |
kaklik |
129 |
|
| 323 |
kaklik |
130 |
ORG 0x000002C6
|
|
|
131 |
02C6 _startup
|
|
|
132 |
02C6 EF10F001 GOTO main
|
| 318 |
kaklik |
133 |
ORG 0x00300000
|
|
|
134 |
300000 FEFF DW 0xFEFF
|
|
|
135 |
300002 FEF6 DW 0xFEF6
|
|
|
136 |
ORG 0x00300004
|
|
|
137 |
300004 FEFF DW 0xFEFF
|
|
|
138 |
300006 FFFB DW 0xFFFB
|
|
|
139 |
ORG 0x00300008
|
|
|
140 |
300008 3FF0 DW 0x3FF0
|
|
|
141 |
30000A 9FFF DW 0x9FFF
|
|
|
142 |
30000C BFFF DW 0xBFFF
|