Rev 223 Rev 238
Line 1... Line 1...
1 #include ".\main.h" 1 #include <16F876A.h>
-   2 #device adc=8
2   3  
-   4 #FUSES NOWDT //Watch Dog Timer
3 #define LCD_RS PIN_B1 // rizeni registru LCD displeje 5 #FUSES HS//XT //Crystal osc <= 4mhz
4 #define LCD_E PIN_B0 // enable LCD displeje 6 #FUSES NOPUT //No Power Up Timer
-   7 #FUSES NOPROTECT //Code not protected from reading
-   8 #FUSES NODEBUG //No Debug mode for ICD
-   9 #FUSES NOBROWNOUT //No brownout reset
5 #define LCD_DATA_LSB PIN_C0 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou) 10 #FUSES NOLVP //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O
-   11 #FUSES NOCPD //No EE protection
-   12 #FUSES NOWRT //Program memory not write protected
-   13  
6 #define zar1 PIN_A3 14 #use delay(clock=18432000,RESTART_WDT)
-   15 #use rs232(STREAM=MOBIL,baud=19200,invert,force_sw,parity=N,xmit=PIN_C6,rcv=PIN_C7,bits=8)
-   16 #use rs232(STREAM=VRTULE,baud=600,parity=N,xmit=PIN_B2,rcv=PIN_B4,bits=8)
7   17  
8 #include "mylcd.c" -  
9   -  
10 void main() -  
11 { -  
12 char odp[96]; -  
13 int pom,pom2,pom3,odkl,odkl2,maskovadlo,status; -  
14   -  
15 setup_adc_ports(NO_ANALOGS); -  
16 setup_adc(ADC_OFF); -  
17 setup_psp(PSP_DISABLED); -  
18 setup_spi(SPI_SS_DISABLED); -  
19 setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); -  
20 setup_timer_1(T1_DISABLED); -  
21 setup_timer_2(T2_DISABLED,0,1); -  
22 setup_comparator(NC_NC_NC_NC); -  
23 setup_vref(FALSE); -  
24 setup_wdt(WDT_2304MS); -  
25 lcd_init(); -  
26 -  
27 /* -  
28 delay_us(10); -  
29 lcd_gotoxy(1,1); -  
30 printf(lcd_putc," Ovladani mobilem"); -  
31 lcd_gotoxy(1,2); -  
32 printf(lcd_putc,""); -  
33 lcd_gotoxy(1,3); -  
34 printf(lcd_putc," autor: Tomas Kapl"); -  
35 lcd_gotoxy(1,4); -  
36 printf(lcd_putc," www.kapl.cz"); -  
37 delay_ms(5000); -  
38 */ -  
39 -  
40 while(TRUE) -  
41 { -  
42 restart_wdt(); -  
43 -  
44 output_low(PIN_A4) ; -  
45 delay_ms(150); -  
46 output_high(PIN_A4); -  
47 delay_ms(150); -  
48 output_low(PIN_A4) ; -  
49 delay_ms(150); -  
50 output_high(PIN_A4); -  
51 delay_ms(150); -  
52 -  
53 printf("AT+CMGL=0\r"); //vycti prijate SMS -  
54 -  
55 -  
56 gets(odp); //uloz odpoved prikazu do odp -  
57 getc(); //preskoc 0A -  
58 getc(); //preskoc 0D -  
59 gets(odp); //uloz pocatek odpovedi do odp -  
60 -  
61 -  
62 if(odp[0] == 79 && odp[1] ==75) -  
63 { -  
64 lcd_gotoxy(1,1); -  
65 printf(lcd_putc,"\fNeni nova SMS zprava"); -  
66 lcd_gotoxy(1,2); -  
67 printf(lcd_putc,""); -  
68 lcd_gotoxy(1,3); -  
69 printf(lcd_putc,"Zaslete SMS na cislo"); -  
70 lcd_gotoxy(1,4); -  
71 printf(lcd_putc," 736 655 250"); -  
72 delay_ms(5000); -  
73 }else -  
74 { -  
75 -  
76 for(pom=0;pom<55;pom++) //preskoc nedulezite informace -  
77 { -  
78 getc(); -  
79 } -  
80 //gets(odp); //uloz zakodovany text SMS -  
81 -  
82 odp[0]=getc(); -  
83 odp[1]=getc(); -  
84 odp[2]=getc(); -  
85 odp[3]=getc(); -  
86 odp[4]=getc(); -  
87 odp[5]=getc(); -  
88 odp[6]=getc(); -  
89 odp[7]=getc(); -  
90 -  
91 /*lcd_gotoxy(1,1); -  
92 printf(lcd_putc,"\f%s\n",odp);*/ -  
93 -  
94 if(odp[0]==0) odp[1]='0'; // Prevod z ASCII do BIN -  
95 odp[0]=odp[0] - '0'; -  
96 odp[1]=odp[1] - '0'; -  
97 if(odp[0]>9) odp[0]=odp[0]-7; -  
98 if(odp[1]>9) odp[1]=odp[1]-7; -  
99 odp[0]=odp[0] << 4; -  
100 odp[0] |= odp[1]; -  
101 -  
102 if(odp[2]==0) odp[3]='0'; -  
103 odp[2]=odp[2] - '0'; -  
104 odp[3]=odp[3] - '0'; -  
105 if(odp[2]>9) odp[2]=odp[2]-7; -  
106 if(odp[3]>9) odp[3]=odp[3]-7; -  
107 odp[2]=odp[2] << 4; -  
108 odp[2] |= odp[3]; -  
109 -  
110 if(odp[4]==0) odp[5]='0'; -  
111 odp[4]=odp[4] - '0'; -  
112 odp[5]=odp[5] - '0'; -  
113 if(odp[4]>9) odp[4]=odp[4]-7; -  
114 if(odp[5]>9) odp[5]=odp[5]-7; -  
115 odp[4]=odp[4] << 4; -  
116 odp[4] |= odp[5]; -  
117 -  
118 if(odp[6]==0) odp[7]='0'; -  
119 odp[6]=odp[6] - '0'; -  
120 odp[7]=odp[7] - '0'; -  
121 if(odp[6]>9) odp[6]=odp[6]-7; -  
122 if(odp[7]>9) odp[7]=odp[7]-7; -  
123 odp[6]=odp[6] << 4; -  
124 odp[6] |= odp[7]; -  
125   -  
126 odp[1]=odp[2]; -  
127 odp[2]=odp[4]; -  
128 odp[3]=odp[6]; -  
129 odp[4],odp[5],odp[6]=""; -  
130 -  
131 /*lcd_gotoxy(1,2); -  
132 printf(lcd_putc,"%u %u %u %u",odp[0],odp[1],odp[2]odp[3]); */ -  
133 -  
134 pom3=0; -  
135 for (pom = 0; pom < 4;pom++) -  
136 { -  
137 maskovadlo = maskovadlo >> 1; //rotace promene urcene pro maskovani -  
138 maskovadlo = maskovadlo | 0x80; -  
139 odkl = odp[pom] & maskovadlo; //odlozeni "prenosu" do odkl pomoci maskovadla -  
140 odp[pom] = odp[pom] << pom3; //rotace znaku -  
141 for (pom2 = 0; pom2 < (8-pom3);pom2++) //rotace odkl2 -  
142 { -  
143 odkl2 = odkl2 >> 1; -  
144 odkl2 = odkl2 & 127; -  
145 } -  
146 odp[pom] = odp[pom] | odkl2; //pridani odkl2 ke znaku -  
147 odp[pom] = odp[pom] & 127; //smazani nejvysiho bitu -  
148 odkl2 = odkl; //ulozeni odlk na dalsi pruchod -  
149 pom3++; //inkrementace citace rotace -  
150 if (pom3 == 8) //kazdy 8my znak -  
151 { -  
152 pom3 = 0; //smaz citac -  
153 odp[pom+1] = odkl2; //uloz 8my znak vznikly z "prenosu" -  
154 maskovadlo = 0; //smaz maskovadlo -  
155 } -  
156 } -  
157 odp[pom]='\0'; -  
158 /*lcd_gotoxy(1,3); -  
159 printf(lcd_putc,"%u %u %u %u",odp[0],odp[1],odp[2],odp[3]); */ -  
160 lcd_gotoxy(1,1); -  
161 printf(lcd_putc,"\fPrijata SMS s textem",); -  
162 lcd_gotoxy(9,3); -  
163 printf(lcd_putc,"%s",odp); -  
164 output_low(PIN_A4) ; -  
165 delay_ms(5000); -  
166 output_high(PIN_A4); -  
167 printf("AT+CMGD=1\r"); //smaz prijatou SMSku -  
168 -  
169 if (odp[0] > 64 && odp[0] < 91 ) -  
170 { -  
171 odp[0] += 32; -  
172 } -  
173 -  
174 if (odp[1] > 64 && odp[1] < 91 ) -  
175 { -  
176 odp[1] += 32; -  
177 } -  
178 -  
179 if (odp[2] > 64 && odp[2] < 91 ) -  
180 { -  
181 odp[2] += 32; -  
182 } -  
183 -  
184 if (odp[3] > 64 && odp[3] < 91 ) -  
185 { -  
186 odp[3] += 32; -  
187 } -  
188 -  
189 -  
190 lcd_gotoxy(1,1); -  
191 printf(lcd_putc,"\f Odstraneni velkych",); -  
192 lcd_gotoxy(1,2); -  
193 printf(lcd_putc," pismen"); -  
194 lcd_gotoxy(9,4); -  
195 printf(lcd_putc,"%s",odp); -  
196 output_low(PIN_A4) ; -  
197 delay_ms(5000); -  
198 output_high(PIN_A4); -  
199 -  
200 -  
201 if (odp[0] == 122 && odp[1] == 97 && odp[2] == 112 && odp[3] == 49) //odp=="zap1" -  
202 { -  
203 status=1; -  
204 } -  
205 -  
206 if (odp[0] == 118 && odp[1] == 121 && odp[2] == 112 && odp[3]== 49) //odp=="vyp1" -  
207 { -  
208 status=2; -  
209 } -  
210 -  
211 if (odp[0] == 97 && odp[1] == 104 && odp[2] == 111 && odp[3]== 106) //odp=="ahoj" -  
212 { -  
213 status=3; -  
214 } -  
215 -  
216 switch (status) { -  
217   -  
218 case 1: output_low(zar1); -  
219 printf(lcd_putc,"\f"); -  
220 lcd_gotoxy(1,2); -  
221 printf(lcd_putc," Zapnuto zarizeni 1"); -  
222 -  
223   -  
224 break; -  
225   -  
226 case 2: output_high(zar1); -  
227 printf(lcd_putc,"\f"); -  
228 lcd_gotoxy(1,2); -  
229 printf(lcd_putc," Vypnuto zarizeni 1"); -  
230   -  
231 break; -  
232 -  
233 case 3: printf(lcd_putc,"\f"); -  
234 lcd_gotoxy(1,2); -  
235 printf(lcd_putc," Preji hezky den!"); -  
236   -  
237 break; -  
238 -  
239 default:printf(lcd_putc,"\f"); -  
240 lcd_gotoxy(1,2); -  
241 printf(lcd_putc," Prikaz nebyl"); -  
242 lcd_gotoxy(1,3); -  
243 printf(lcd_putc," rozeznan"); -  
244   -  
245 break; } -  
246 -  
247 delay_ms(5000); -  
248 -  
249 } -  
250 } -  
251 } -