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  
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 }