Subversion Repositories svnkaklik

Rev

Rev 321 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 321 Rev 322
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  EF77F001  	GOTO	_startup
 9 
0200  EF6CF001  	GOTO	_startup
10 
	ORG 0x00000204
 10 
	ORG 0x00000204
11 
0204            receive_00000
 11 
0204            send_00000
12 
0204            ; { receive ; function begin
 12 
0204            ; { send ; 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
 13 
0204            label268438562
18 
020C  AA9E      	BTFSS gbl_pir1,5
 14 
0204  A89E      	BTFSS gbl_pir1,4
19 
020E  D7FE      	BRA	label268438550
 15 
0206  D7FE      	BRA	label268438562
20 
0210  50AE      	MOVF gbl_rcreg, W
 16 
0208  5007      	MOVF send_00000_arg_c, W
21 
0212  6E07      	MOVWF CompTempVarRet489
 17 
020A  6EAD      	MOVWF gbl_txreg
22 
0214  0012      	RETURN
 18 
020C  0012      	RETURN
23 
0216            ; } receive function end
 19 
020E            ; } send function end
24 
 
 20 
 
25 
	ORG 0x00000216
 21 
	ORG 0x0000020E
26 
0216            send_00000
 22 
020E            receive_00000
27 
0216            ; { send ; function begin
 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            label268438561
 28 
0216            label268438551
29 
0216  A89E      	BTFSS gbl_pir1,4
 29 
0216  AA9E      	BTFSS gbl_pir1,5
30 
0218  D7FE      	BRA	label268438561
 30 
0218  D7FE      	BRA	label268438551
31 
021A  5004      	MOVF send_00000_arg_c, W
 31 
021A  50AE      	MOVF gbl_rcreg, W
32 
021C  6EAD      	MOVWF gbl_txreg
 32 
021C  6E07      	MOVWF CompTempVarRet489
33 
021E  0012      	RETURN
 33 
021E  0012      	RETURN
34 
0220            ; } send function end
 34 
0220            ; } receive function end
35 
 
 35 
 
36 
	ORG 0x00000220
 36 
	ORG 0x00000220
37 
0220            delay_00000
 37 
0220            main
38 
0220            ; { delay ; function begin
 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
39 
0220            label268438570
 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
40 
0220  5005      	MOVF delay_00000_1_i, W
 80 
026E  5005      	MOVF main_1_count+D'1', W
- 
 
 81 
0270  E013      	BZ	label268438605
- 
 
 82 
0272  0E01      	MOVLW 0x01
41 
0222  5C04      	SUBWF delay_00000_arg_cas, W
 83 
0274  5C04      	SUBWF main_1_count, W
- 
 
 84 
0276  6E07      	MOVWF CompTempVar492
42 
0224  A0D8      	BTFSS STATUS,C
 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
43 
0226  0012      	RETURN
 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
44 
0228            label4026532417
 101 
0298            label268438605
45 
0228  5006      	MOVF delay_00000_1_x, W
 102 
0298  6803      	SETF main_1_leds
46 
022A  0864      	SUBLW 0x64
 103 
029A  6889      	SETF gbl_lata
47 
022C  E305      	BNC	label268438574
 104 
029C            label268438623
- 
 
 105 
029C  6802      	SETF main_1_sensors
48 
022E  EC02F001  	CALL receive_00000
 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
49 
0232  2806      	INCF delay_00000_1_x, W
 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
50 
0234  6E06      	MOVWF delay_00000_1_x
 124 
02C0  6E01      	MOVWF main_1_motors
- 
 
 125 
02C2            label268438632
- 
 
 126 
02C2  B602      	BTFSC main_1_sensors,3
51 
0236  D7F8      	BRA	label4026532417
 127 
02C4  D002      	BRA	label268438635
- 
 
 128 
02C6  0E7F      	MOVLW 0x7F
- 
 
 129 
02C8  6E01      	MOVWF main_1_motors
52 
0238            label268438574
 130 
02CA            label268438635
53 
0238  2805      	INCF delay_00000_1_i, W
 131 
02CA  5002      	MOVF main_1_sensors, W
- 
 
 132 
02CC  6E89      	MOVWF gbl_lata
- 
 
 133 
02CE  5001      	MOVF main_1_motors, W
54 
023A  6E05      	MOVWF delay_00000_1_i
 134 
02D0  6E07      	MOVWF send_00000_arg_c
- 
 
 135 
02D2  EC02F001  	CALL send_00000
55 
023C  D7F1      	BRA	label268438570
 136 
02D6  D7E2      	BRA	label268438623
56 
023E            ; } delay function end
 137 
02D8            ; } main function end
57 
 
 138 
 
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
 139 
	ORG 0x000002D8
150 
02EE            _startup
 140 
02D8            _startup
151 
02EE  EF1FF001  	GOTO	main
 141 
02D8  EF10F001  	GOTO	main
152 
	ORG 0x00300000
 142 
	ORG 0x00300000
153 
300000  FEFF      	DW 0xFEFF
 143 
300000  FEFF      	DW 0xFEFF
154 
300002  FEF6      	DW 0xFEF6
 144 
300002  FEF6      	DW 0xFEF6
155 
	ORG 0x00300004
 145 
	ORG 0x00300004
156 
300004  FEFF      	DW 0xFEFF
 146 
300004  FEFF      	DW 0xFEFF