174 |
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 |
|
|
|
7 |
#include "mylcd.c" |
|
|
8 |
|
|
|
9 |
void main() |
|
|
10 |
{ |
|
|
11 |
char odp[8]; |
|
|
12 |
int pom,pom2,pom3,odkl,odkl2,maskovadlo; |
|
|
13 |
|
|
|
14 |
setup_adc_ports(NO_ANALOGS); |
|
|
15 |
setup_adc(ADC_OFF); |
|
|
16 |
setup_psp(PSP_DISABLED); |
|
|
17 |
setup_spi(SPI_SS_DISABLED); |
|
|
18 |
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); |
|
|
19 |
setup_timer_1(T1_DISABLED); |
|
|
20 |
setup_timer_2(T2_DISABLED,0,1); |
|
|
21 |
setup_comparator(NC_NC_NC_NC); |
|
|
22 |
setup_vref(FALSE); |
|
|
23 |
lcd_init(); |
|
|
24 |
|
|
|
25 |
while(TRUE) |
|
|
26 |
{ |
|
|
27 |
output_low(PIN_A4) ; |
|
|
28 |
delay_ms(150); |
|
|
29 |
output_high(PIN_A4); |
|
|
30 |
delay_ms(150); |
|
|
31 |
output_low(PIN_A4) ; |
|
|
32 |
delay_ms(150); |
|
|
33 |
output_high(PIN_A4); |
|
|
34 |
delay_ms(150); |
|
|
35 |
|
|
|
36 |
printf("AT+CMGL=0\r"); //vycti prijate SMS |
|
|
37 |
gets(odp); //uloz odpoved prikazu do odp |
|
|
38 |
getc(); //preskoc 0A |
|
|
39 |
getc(); //preskoc 0D |
|
|
40 |
gets(odp); //uloz pocatek odpovedi do odp |
|
|
41 |
|
|
|
42 |
if(odp[0] == 79 && odp[1] ==75) |
|
|
43 |
{ |
|
|
44 |
lcd_gotoxy(1,1); |
|
|
45 |
printf(lcd_putc,"\fNeni nova SMS zprava!"); |
|
|
46 |
lcd_gotoxy(1,2); |
|
|
47 |
printf(lcd_putc,""); |
|
|
48 |
lcd_gotoxy(1,3); |
|
|
49 |
printf(lcd_putc,"Zaslete SMS na cislo"); |
|
|
50 |
lcd_gotoxy(1,4); |
|
|
51 |
printf(lcd_putc," 736 655 250"); |
|
|
52 |
delay_ms(5000); |
|
|
53 |
}else |
|
|
54 |
{ |
|
|
55 |
|
|
|
56 |
for(pom=0;pom<55;pom++) //preskoc nedulezite informace |
|
|
57 |
{ |
|
|
58 |
getc(); |
|
|
59 |
} |
|
|
60 |
gets(odp); //uloz zakodovany text SMS |
|
|
61 |
|
|
|
62 |
/*lcd_gotoxy(1,1); |
|
|
63 |
printf(lcd_putc,"\f%s\n",odp);*/ |
|
|
64 |
|
|
|
65 |
if(odp[0]==0) odp[1]='0'; // Prevod z ASCII do BIN |
|
|
66 |
odp[0]=odp[0] - '0'; |
|
|
67 |
odp[1]=odp[1] - '0'; |
|
|
68 |
if(odp[0]>9) odp[0]=odp[0]-7; |
|
|
69 |
if(odp[1]>9) odp[1]=odp[1]-7; |
|
|
70 |
odp[0]=odp[0] << 4; |
|
|
71 |
odp[0] |= odp[1]; |
|
|
72 |
|
|
|
73 |
if(odp[2]==0) odp[3]='0'; |
|
|
74 |
odp[2]=odp[2] - '0'; |
|
|
75 |
odp[3]=odp[3] - '0'; |
|
|
76 |
if(odp[2]>9) odp[2]=odp[2]-7; |
|
|
77 |
if(odp[3]>9) odp[3]=odp[3]-7; |
|
|
78 |
odp[2]=odp[2] << 4; |
|
|
79 |
odp[2] |= odp[3]; |
|
|
80 |
|
|
|
81 |
if(odp[4]==0) odp[5]='0'; |
|
|
82 |
odp[4]=odp[4] - '0'; |
|
|
83 |
odp[5]=odp[5] - '0'; |
|
|
84 |
if(odp[4]>9) odp[4]=odp[4]-7; |
|
|
85 |
if(odp[5]>9) odp[5]=odp[5]-7; |
|
|
86 |
odp[4]=odp[4] << 4; |
|
|
87 |
odp[4] |= odp[5]; |
|
|
88 |
|
|
|
89 |
if(odp[6]==0) odp[7]='0'; |
|
|
90 |
odp[6]=odp[6] - '0'; |
|
|
91 |
odp[7]=odp[7] - '0'; |
|
|
92 |
if(odp[6]>9) odp[6]=odp[6]-7; |
|
|
93 |
if(odp[7]>9) odp[7]=odp[7]-7; |
|
|
94 |
odp[6]=odp[6] << 4; |
|
|
95 |
odp[6] |= odp[7]; |
|
|
96 |
|
|
|
97 |
odp[1]=odp[2]; |
|
|
98 |
odp[2]=odp[4]; |
|
|
99 |
odp[3]=odp[6]; |
|
|
100 |
odp[4],odp[5],odp[6]=""; |
|
|
101 |
|
|
|
102 |
/*lcd_gotoxy(1,2); |
|
|
103 |
printf(lcd_putc,"%u %u %u %u",odp[0],odp[1],odp[2]odp[3]); */ |
|
|
104 |
|
|
|
105 |
pom3=0; |
|
|
106 |
for (pom = 0; pom < 4;pom++) |
|
|
107 |
{ |
|
|
108 |
maskovadlo = maskovadlo >> 1; //rotace promene urcene pro maskovani |
|
|
109 |
maskovadlo = maskovadlo | 0x80; |
|
|
110 |
odkl = odp[pom] & maskovadlo; //odlozeni "prenosu" do odkl pomoci maskovadla |
|
|
111 |
odp[pom] = odp[pom] << pom3; //rotace znaku |
|
|
112 |
for (pom2 = 0; pom2 < (8-pom3);pom2++) //rotace odkl2 |
|
|
113 |
{ |
|
|
114 |
odkl2 = odkl2 >> 1; |
|
|
115 |
odkl2 = odkl2 & 127; |
|
|
116 |
} |
|
|
117 |
odp[pom] = odp[pom] | odkl2; //pridani odkl2 ke znaku |
|
|
118 |
odp[pom] = odp[pom] & 127; //smazani nejvysiho bitu |
|
|
119 |
odkl2 = odkl; //ulozeni odlk na dalsi pruchod |
|
|
120 |
pom3++; //inkrementace citace rotace |
|
|
121 |
if (pom3 == 8) //kazdy 8my znak |
|
|
122 |
{ |
|
|
123 |
pom3 = 0; //smaz citac |
|
|
124 |
odp[pom+1] = odkl2; //uloz 8my znak vznikly z "prenosu" |
|
|
125 |
maskovadlo = 0; //smaz maskovadlo |
|
|
126 |
} |
|
|
127 |
} |
|
|
128 |
odp[pom]='\0'; |
|
|
129 |
/*lcd_gotoxy(1,3); |
|
|
130 |
printf(lcd_putc,"%u %u %u %u",odp[0],odp[1],odp[2]odp[3]); */ |
|
|
131 |
lcd_gotoxy(1,2); |
|
|
132 |
printf(lcd_putc,"\fPrijata SMS s textem",); |
|
|
133 |
lcd_gotoxy(9,3); |
|
|
134 |
printf(lcd_putc,"%s",odp); |
|
|
135 |
output_low(PIN_A4) ; |
|
|
136 |
delay_ms(30000); |
|
|
137 |
output_high(PIN_A4); |
|
|
138 |
printf("AT+CMGD=1\r"); //smaz prijatou SMSku |
|
|
139 |
} |
|
|
140 |
} |
|
|
141 |
} |