Rev Author Line No. Line
223 kapl 1 #include ".\main.h"
2  
3 #define LCD_RS PIN_B1 // rizeni registru LCD displeje
4 #define LCD_E PIN_B0 // enable LCD displeje
5 #define LCD_DATA_LSB PIN_C0 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
6 #define zar1 PIN_A3
7  
238 kaklik 8 #bit SPEN=0x18.7
9 #bit RCIF=0x0C.5
10  
223 kapl 11 #include "mylcd.c"
12  
13 void main()
14 {
239 kaklik 15 char odp[40];
223 kapl 16 int pom,pom2,pom3,odkl,odkl2,maskovadlo,status;
17  
18 setup_adc_ports(NO_ANALOGS);
19 setup_adc(ADC_OFF);
20 setup_spi(SPI_SS_DISABLED);
21 setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
22 setup_timer_1(T1_DISABLED);
23 setup_timer_2(T2_DISABLED,0,1);
24 setup_comparator(NC_NC_NC_NC);
25 setup_vref(FALSE);
26 setup_wdt(WDT_2304MS);
27 lcd_init();
239 kaklik 28  
223 kapl 29 while(TRUE)
30 {
31 restart_wdt();
239 kaklik 32  
223 kapl 33 output_low(PIN_A4) ;
34 delay_ms(150);
35 output_high(PIN_A4);
36 delay_ms(150);
37 output_low(PIN_A4) ;
38 delay_ms(150);
39 output_high(PIN_A4);
40 delay_ms(150);
239 kaklik 41  
238 kaklik 42 /*
43 while(kbhit(MOBIL)) {fgetc(MOBIL); delay_ms(100);} // Preskoc zbytek radku
44 fprintf(MOBIL,"AT\r"); //vycti prijate SMS
45 while(fgetc(MOBIL)!=0x0A); // predkoc prvni radek odpovedi
46  
47 delay_ms(500);
48 for(pom=0;pom<80;pom++) odp[pom]=0;
49 fprintf(MOBIL,"AT\r"); //vycti prijate SMS
50 odp[0]=fgetc(MOBIL);
51 odp[1]=fgetc(MOBIL);
52 odp[2]=fgetc(MOBIL);
53  
54 fprintf(VRTULE,"*%s*\n\r",odp);
55 fgetc(MOBIL);
56 output_low(PIN_A4);
57 fgetc(MOBIL);
58 fgetc(MOBIL);
59  
60 delay_ms(1000);
61 continue;
62 */
239 kaklik 63 fprintf(MOBIL,"AT+CMGL=1\r"); //vycti prijate SMS (0=nove;1=vsechny)
238 kaklik 64 //SPEN=1;
239 kaklik 65  
66  
238 kaklik 67 while(fgetc(MOBIL)!=0x0A); // predkoc prvni radek odpovedi
68  
69 odp[0]=fgetc(MOBIL); // Nacti prvni dva znaky druheho radku odpovedi
70 odp[1]=fgetc(MOBIL);
71 while(fgetc(MOBIL)!=0x0A); // Preskoc zbytek radku
72  
239 kaklik 73 // while(kbhit(MOBIL)) {fgetc(MOBIL); delay_ms(100);} // Preskoc zbytek radku
74 output_high(PIN_A4);
238 kaklik 75  
76  
77 if(odp[0] == 79 && odp[1] ==75) // Je odpoved "OK"?
223 kapl 78 {
79 lcd_gotoxy(1,1);
80 printf(lcd_putc,"\fNeni nova SMS zprava");
81 lcd_gotoxy(1,2);
82 printf(lcd_putc,"");
83 lcd_gotoxy(1,3);
84 printf(lcd_putc,"Zaslete SMS na cislo");
85 lcd_gotoxy(1,4);
86 printf(lcd_putc," 736 655 250");
87 delay_ms(5000);
239 kaklik 88 }
89 else
223 kapl 90 {
238 kaklik 91 //!!!KAKL for(pom=0;pom<55;pom++) //preskoc nedulezite informace
92 for(pom=0;pom<54;pom++) //preskoc nedulezite informace
223 kapl 93 {
238 kaklik 94 fgetc(MOBIL);
239 kaklik 95 }
96  
223 kapl 97 //gets(odp); //uloz zakodovany text SMS
239 kaklik 98  
238 kaklik 99 odp[0]=fgetc(MOBIL);
100 odp[1]=fgetc(MOBIL);
101 odp[2]=fgetc(MOBIL);
102 odp[3]=fgetc(MOBIL);
103 odp[4]=fgetc(MOBIL);
104 odp[5]=fgetc(MOBIL);
105 odp[6]=fgetc(MOBIL);
106 odp[7]=fgetc(MOBIL);
107  
223 kapl 108 /*lcd_gotoxy(1,1);
109 printf(lcd_putc,"\f%s\n",odp);*/
239 kaklik 110  
111 if(odp[0]==0) odp[1]='0'; // Prevod z ASCII do BIN
223 kapl 112 odp[0]=odp[0] - '0';
113 odp[1]=odp[1] - '0';
114 if(odp[0]>9) odp[0]=odp[0]-7;
115 if(odp[1]>9) odp[1]=odp[1]-7;
116 odp[0]=odp[0] << 4;
117 odp[0] |= odp[1];
239 kaklik 118  
223 kapl 119 if(odp[2]==0) odp[3]='0';
120 odp[2]=odp[2] - '0';
121 odp[3]=odp[3] - '0';
122 if(odp[2]>9) odp[2]=odp[2]-7;
123 if(odp[3]>9) odp[3]=odp[3]-7;
124 odp[2]=odp[2] << 4;
125 odp[2] |= odp[3];
239 kaklik 126  
223 kapl 127 if(odp[4]==0) odp[5]='0';
128 odp[4]=odp[4] - '0';
129 odp[5]=odp[5] - '0';
130 if(odp[4]>9) odp[4]=odp[4]-7;
131 if(odp[5]>9) odp[5]=odp[5]-7;
132 odp[4]=odp[4] << 4;
133 odp[4] |= odp[5];
239 kaklik 134  
223 kapl 135 if(odp[6]==0) odp[7]='0';
136 odp[6]=odp[6] - '0';
137 odp[7]=odp[7] - '0';
138 if(odp[6]>9) odp[6]=odp[6]-7;
139 if(odp[7]>9) odp[7]=odp[7]-7;
140 odp[6]=odp[6] << 4;
141 odp[6] |= odp[7];
142  
143 odp[1]=odp[2];
144 odp[2]=odp[4];
145 odp[3]=odp[6];
239 kaklik 146 odp[4]=odp[5]=odp[6]=0;
147  
148 /*lcd_gotoxy(1,2);
223 kapl 149 printf(lcd_putc,"%u %u %u %u",odp[0],odp[1],odp[2]odp[3]); */
239 kaklik 150  
223 kapl 151 pom3=0;
239 kaklik 152 for (pom = 0; pom < 4;pom++)
223 kapl 153 {
154 maskovadlo = maskovadlo >> 1; //rotace promene urcene pro maskovani
155 maskovadlo = maskovadlo | 0x80;
156 odkl = odp[pom] & maskovadlo; //odlozeni "prenosu" do odkl pomoci maskovadla
157 odp[pom] = odp[pom] << pom3; //rotace znaku
158 for (pom2 = 0; pom2 < (8-pom3);pom2++) //rotace odkl2
159 {
160 odkl2 = odkl2 >> 1;
239 kaklik 161 odkl2 = odkl2 & 127;
223 kapl 162 }
163 odp[pom] = odp[pom] | odkl2; //pridani odkl2 ke znaku
164 odp[pom] = odp[pom] & 127; //smazani nejvysiho bitu
165 odkl2 = odkl; //ulozeni odlk na dalsi pruchod
166 pom3++; //inkrementace citace rotace
167 if (pom3 == 8) //kazdy 8my znak
168 {
169 pom3 = 0; //smaz citac
170 odp[pom+1] = odkl2; //uloz 8my znak vznikly z "prenosu"
171 maskovadlo = 0; //smaz maskovadlo
172 }
173 }
239 kaklik 174 odp[pom]='\0';
175  
223 kapl 176 /*lcd_gotoxy(1,3);
177 printf(lcd_putc,"%u %u %u %u",odp[0],odp[1],odp[2],odp[3]); */
238 kaklik 178 lcd_init();
223 kapl 179 lcd_gotoxy(1,1);
239 kaklik 180 printf(lcd_putc,"\fPrijata SMS s textem");
223 kapl 181 lcd_gotoxy(9,3);
239 kaklik 182 printf(lcd_putc,"%s",odp);
223 kapl 183 output_low(PIN_A4) ;
238 kaklik 184 delay_ms(1000);
223 kapl 185 output_high(PIN_A4);
238 kaklik 186  
187 //!!! fprintf(MOBIL,"AT+CMGD=1\r"); //smaz prijatou SMSku
239 kaklik 188  
223 kapl 189 if (odp[0] > 64 && odp[0] < 91 )
190 {
191 odp[0] += 32;
192 }
239 kaklik 193  
223 kapl 194 if (odp[1] > 64 && odp[1] < 91 )
195 {
196 odp[1] += 32;
197 }
239 kaklik 198  
223 kapl 199 if (odp[2] > 64 && odp[2] < 91 )
200 {
201 odp[2] += 32;
202 }
239 kaklik 203  
223 kapl 204 if (odp[3] > 64 && odp[3] < 91 )
205 {
206 odp[3] += 32;
207 }
239 kaklik 208  
223 kapl 209 lcd_gotoxy(1,1);
239 kaklik 210 printf(lcd_putc,"\f Odstraneni velkych");
223 kapl 211 lcd_gotoxy(1,2);
212 printf(lcd_putc," pismen");
213 lcd_gotoxy(9,4);
239 kaklik 214 printf(lcd_putc,"%s",odp);
223 kapl 215 output_low(PIN_A4) ;
238 kaklik 216 delay_ms(1000);
223 kapl 217 output_high(PIN_A4);
238 kaklik 218  
239 kaklik 219  
238 kaklik 220 //!!!KAKL
221 fprintf(VRTULE,"%s",odp);
222  
223  
223 kapl 224 if (odp[0] == 122 && odp[1] == 97 && odp[2] == 112 && odp[3] == 49) //odp=="zap1"
225 {
226 status=1;
227 }
239 kaklik 228  
223 kapl 229 if (odp[0] == 118 && odp[1] == 121 && odp[2] == 112 && odp[3]== 49) //odp=="vyp1"
230 {
231 status=2;
232 }
239 kaklik 233  
223 kapl 234 if (odp[0] == 97 && odp[1] == 104 && odp[2] == 111 && odp[3]== 106) //odp=="ahoj"
235 {
236 status=3;
237 }
239 kaklik 238  
239 switch (status)
238 kaklik 240 {
223 kapl 241  
242 case 1: output_low(zar1);
243 printf(lcd_putc,"\f");
244 lcd_gotoxy(1,2);
245 printf(lcd_putc," Zapnuto zarizeni 1");
246 break;
247  
248 case 2: output_high(zar1);
249 printf(lcd_putc,"\f");
250 lcd_gotoxy(1,2);
251 printf(lcd_putc," Vypnuto zarizeni 1");
252 break;
239 kaklik 253  
223 kapl 254 case 3: printf(lcd_putc,"\f");
255 lcd_gotoxy(1,2);
256 printf(lcd_putc," Preji hezky den!");
257 break;
239 kaklik 258  
223 kapl 259 default: printf(lcd_putc,"\f");
260 lcd_gotoxy(1,2);
261 printf(lcd_putc," Prikaz nebyl");
262 lcd_gotoxy(1,3);
263 printf(lcd_putc," rozeznan");
239 kaklik 264 break;
238 kaklik 265 }
266 delay_ms(1000);
223 kapl 267 }
238 kaklik 268  
223 kapl 269 }
270 }