Subversion Repositories svnkaklik

Rev

Rev 319 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 319 Rev 321
Line 4... Line 4...
4
;// License Type  : Pro License
4
;// License Type  : Pro License
5
;// Limitations   : PIC18 max code size:Unlimited, max RAM banks:Unlimited
5
;// Limitations   : PIC18 max code size:Unlimited, max RAM banks:Unlimited
6
;/////////////////////////////////////////////////////////////////////////////////
6
;/////////////////////////////////////////////////////////////////////////////////
7
 
7
 
8
	ORG 0x00000200
8
	ORG 0x00000200
9
0200  EF99F001  	GOTO	_startup
9
0200  EF77F001  	GOTO	_startup
10
	ORG 0x00000204
10
	ORG 0x00000204
11
0204            send_00000
11
0204            receive_00000
12
0204            ; { send ; function begin
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
13
0204            label268438561
17
020C            label268438550
14
0204  A89E      	BTFSS gbl_pir1,4
18
020C  AA9E      	BTFSS gbl_pir1,5
15
0206  D7FE      	BRA	label268438561
19
020E  D7FE      	BRA	label268438550
16
0208  500A      	MOVF send_00000_arg_c, W
20
0210  50AE      	MOVF gbl_rcreg, W
17
020A  6EAD      	MOVWF gbl_txreg
21
0212  6E07      	MOVWF CompTempVarRet489
18
020C  0012      	RETURN
22
0214  0012      	RETURN
19
020E            ; } send function end
23
0216            ; } receive function end
20
 
24
 
21
	ORG 0x0000020E
25
	ORG 0x00000216
22
020E            receive_00000
26
0216            send_00000
23
020E            ; { receive ; function begin
27
0216            ; { send ; function begin
24
020E  A2AB      	BTFSS gbl_rcsta,1
-
 
25
0210  D002      	BRA	label268438550
-
 
26
0212  98AB      	BCF gbl_rcsta,4
-
 
27
0214  88AB      	BSF gbl_rcsta,4
-
 
28
0216            label268438550
28
0216            label268438561
29
0216  AA9E      	BTFSS gbl_pir1,5
29
0216  A89E      	BTFSS gbl_pir1,4
30
0218  D7FE      	BRA	label268438550
30
0218  D7FE      	BRA	label268438561
31
021A  50AE      	MOVF gbl_rcreg, W
31
021A  5004      	MOVF send_00000_arg_c, W
32
021C  6E0A      	MOVWF CompTempVarRet489
32
021C  6EAD      	MOVWF gbl_txreg
33
021E  0012      	RETURN
33
021E  0012      	RETURN
34
0220            ; } receive function end
34
0220            ; } send function end
35
 
35
 
36
	ORG 0x00000220
36
	ORG 0x00000220
37
0220            main
37
0220            delay_00000
38
0220            ; { main ; function begin
38
0220            ; { delay ; 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  6803      	SETF main_1_leds
-
 
67
0258  0E0F      	MOVLW 0x0F
-
 
68
025A  6E04      	MOVWF main_1_leds1
-
 
69
025C  6A01      	CLRF main_1_motors
-
 
70
025E            label268438595
39
0220            label268438570
71
025E  5081      	MOVF gbl_portb, W
-
 
72
0260  6E05      	MOVWF main_1_buttons
-
 
73
0262  B205      	BTFSC main_1_buttons,1
-
 
74
0264  D022      	BRA	label268438598
-
 
75
0266  6A06      	CLRF main_1_i
-
 
76
0268  6A07      	CLRF main_1_i+D'1'
-
 
77
026A  6A08      	CLRF main_1_i+D'2'
-
 
78
026C  6A09      	CLRF main_1_i+D'3'
-
 
79
026E  0404      	DECF main_1_leds1, W
-
 
80
0270  6E04      	MOVWF main_1_leds1
-
 
81
0272  5004      	MOVF main_1_leds1, W
40
0220  5005      	MOVF delay_00000_1_i, W
82
0274  6E89      	MOVWF gbl_lata
-
 
83
0276            label268438603
-
 
84
0276  5009      	MOVF main_1_i+D'3', W
-
 
85
0278  0800      	SUBLW 0x00
-
 
86
027A  E108      	BNZ	label268438604
-
 
87
027C  5008      	MOVF main_1_i+D'2', W
-
 
88
027E  0807      	SUBLW 0x07
-
 
89
0280  E105      	BNZ	label268438604
-
 
90
0282  5007      	MOVF main_1_i+D'1', W
41
0222  5C04      	SUBWF delay_00000_arg_cas, W
91
0284  08A1      	SUBLW 0xA1
-
 
92
0286  E102      	BNZ	label268438604
-
 
93
0288  5006      	MOVF main_1_i, W
-
 
94
028A  0820      	SUBLW 0x20
-
 
95
028C            label268438604
-
 
96
028C  E202      	BC	label4026532463
-
 
97
028E  AE09      	BTFSS main_1_i+D'3',7
-
 
98
0290  D008      	BRA	label268438608
-
 
99
0292            label4026532463
-
 
100
0292  2A06      	INCF main_1_i, F
-
 
101
0294  B4D8      	BTFSC STATUS,Z
42
0224  A0D8      	BTFSS STATUS,C
102
0296  2A07      	INCF main_1_i+D'1', F
-
 
103
0298  B4D8      	BTFSC STATUS,Z
-
 
104
029A  2A08      	INCF main_1_i+D'2', F
-
 
105
029C  B4D8      	BTFSC STATUS,Z
-
 
106
029E  2A09      	INCF main_1_i+D'3', F
-
 
107
02A0  D7EA      	BRA	label268438603
-
 
108
02A2            label268438608
-
 
109
02A2  0E11      	MOVLW 0x11
43
0226  0012      	RETURN
110
02A4  2401      	ADDWF main_1_motors, W
-
 
111
02A6  6E01      	MOVWF main_1_motors
-
 
112
02A8  D023      	BRA	label268438619
-
 
113
02AA            label268438598
44
0228            label4026532417
114
02AA  B805      	BTFSC main_1_buttons,4
-
 
115
02AC  D021      	BRA	label268438619
-
 
116
02AE  6A06      	CLRF main_1_i
-
 
117
02B0  6A07      	CLRF main_1_i+D'1'
-
 
118
02B2  6A08      	CLRF main_1_i+D'2'
-
 
119
02B4  6A09      	CLRF main_1_i+D'3'
-
 
120
02B6  2804      	INCF main_1_leds1, W
-
 
121
02B8  6E04      	MOVWF main_1_leds1
-
 
122
02BA  5004      	MOVF main_1_leds1, W
45
0228  5006      	MOVF delay_00000_1_x, W
123
02BC  6E89      	MOVWF gbl_lata
-
 
124
02BE            label268438624
-
 
125
02BE  5009      	MOVF main_1_i+D'3', W
-
 
126
02C0  0800      	SUBLW 0x00
46
022A  0864      	SUBLW 0x64
127
02C2  E108      	BNZ	label268438625
-
 
128
02C4  5008      	MOVF main_1_i+D'2', W
-
 
129
02C6  0807      	SUBLW 0x07
-
 
130
02C8  E105      	BNZ	label268438625
47
022C  E305      	BNC	label268438574
131
02CA  5007      	MOVF main_1_i+D'1', W
-
 
132
02CC  08A1      	SUBLW 0xA1
-
 
133
02CE  E102      	BNZ	label268438625
-
 
134
02D0  5006      	MOVF main_1_i, W
-
 
135
02D2  0820      	SUBLW 0x20
-
 
136
02D4            label268438625
-
 
137
02D4  E202      	BC	label4026532468
-
 
138
02D6  AE09      	BTFSS main_1_i+D'3',7
-
 
139
02D8  D008      	BRA	label268438629
-
 
140
02DA            label4026532468
-
 
141
02DA  2A06      	INCF main_1_i, F
-
 
142
02DC  B4D8      	BTFSC STATUS,Z
-
 
143
02DE  2A07      	INCF main_1_i+D'1', F
-
 
144
02E0  B4D8      	BTFSC STATUS,Z
-
 
145
02E2  2A08      	INCF main_1_i+D'2', F
-
 
146
02E4  B4D8      	BTFSC STATUS,Z
-
 
147
02E6  2A09      	INCF main_1_i+D'3', F
-
 
148
02E8  D7EA      	BRA	label268438624
-
 
149
02EA            label268438629
-
 
150
02EA  0E11      	MOVLW 0x11
-
 
151
02EC  5C01      	SUBWF main_1_motors, W
-
 
152
02EE  6E01      	MOVWF main_1_motors
-
 
153
02F0            label268438619
-
 
154
02F0  6803      	SETF main_1_leds
-
 
155
02F2  6802      	SETF main_1_sensors
-
 
156
02F4  EC07F001  	CALL receive_00000
48
022E  EC02F001  	CALL receive_00000
157
02F8  500A      	MOVF CompTempVarRet489, W
49
0232  2806      	INCF delay_00000_1_x, W
158
02FA  6E02      	MOVWF main_1_sensors
50
0234  6E06      	MOVWF delay_00000_1_x
159
02FC  B002      	BTFSC main_1_sensors,0
-
 
160
02FE  D003      	BRA	label268438643
51
0236  D7F8      	BRA	label4026532417
161
0300  0EFD      	MOVLW 0xFD
-
 
162
0302  1403      	ANDWF main_1_leds, W
-
 
163
0304  6E03      	MOVWF main_1_leds
-
 
164
0306            label268438643
-
 
165
0306  B202      	BTFSC main_1_sensors,1
-
 
166
0308  D003      	BRA	label268438646
-
 
167
030A  0EFB      	MOVLW 0xFB
-
 
168
030C  1403      	ANDWF main_1_leds, W
-
 
169
030E  6E03      	MOVWF main_1_leds
-
 
170
0310            label268438646
-
 
171
0310  B402      	BTFSC main_1_sensors,2
-
 
172
0312  D003      	BRA	label268438649
-
 
173
0314  0EFE      	MOVLW 0xFE
-
 
174
0316  1403      	ANDWF main_1_leds, W
-
 
175
0318  6E03      	MOVWF main_1_leds
-
 
176
031A            label268438649
-
 
177
031A  B602      	BTFSC main_1_sensors,3
-
 
178
031C  D003      	BRA	label268438652
-
 
179
031E  0EF7      	MOVLW 0xF7
-
 
180
0320  1403      	ANDWF main_1_leds, W
-
 
181
0322  6E03      	MOVWF main_1_leds
-
 
182
0324            label268438652
52
0238            label268438574
183
0324  5003      	MOVF main_1_leds, W
-
 
184
0326  6E89      	MOVWF gbl_lata
-
 
185
0328  5001      	MOVF main_1_motors, W
53
0238  2805      	INCF delay_00000_1_i, W
186
032A  6E0A      	MOVWF send_00000_arg_c
54
023A  6E05      	MOVWF delay_00000_1_i
187
032C  EC02F001  	CALL send_00000
-
 
188
0330  D796      	BRA	label268438595
55
023C  D7F1      	BRA	label268438570
189
0332            ; } main function end
56
023E            ; } delay function end
190
 
57
 
191
	ORG 0x00000332
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
192
0332            _startup
150
02EE            _startup
193
0332  EF10F001  	GOTO	main
151
02EE  EF1FF001  	GOTO	main
194
	ORG 0x00300000
152
	ORG 0x00300000
195
300000  FEFF      	DW 0xFEFF
153
300000  FEFF      	DW 0xFEFF
196
300002  FEF6      	DW 0xFEF6
154
300002  FEF6      	DW 0xFEF6
197
	ORG 0x00300004
155
	ORG 0x00300004
198
300004  FEFF      	DW 0xFEFF
156
300004  FEFF      	DW 0xFEFF