Rev Author Line No. Line
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 }