Вопрос разрешен. Проблема была в расставлении фигурных скобок.
Вот полностью рабочий скетч для Siemens S55!!!
Вот только может у кого есть идеи по удалению "корявостей" скетча 
PHP код:
int i=1;
char strok[61]="";
int ledpin = 22;
long previousMillis = 0;
long interval = 5000;
void setup()
{
pinMode(ledpin, OUTPUT);
Serial1.begin(9600);
Serial.begin(9600);
Serial1.flush();
delay(5000);
Serial1.println("AT+CPMS ='MT'\r" );
delay(1000);
Serial1.println("AT+CNMI=1,1\r");
delay(1000);
}
void loop()
{
unsigned long currentMillis = millis();
if(currentMillis - previousMillis > interval)
{
previousMillis = currentMillis;
Serial1.println("AT+CMGL=4\r");
delay(100);
}
if(Serial1.read()=='0' &&Serial1.read()=='7' &&Serial1.read()=='9') //только, если в Serial1 есть СМС, а то он начинает читать с АТ+ и т.д.
{
for (i=1; i<58; i++) strok[i] = Serial1.read();
// ВКЛЮЧЕНИЕ - отправляю СМС - #a1
if(strok[48] == '2' &&strok[49] == '1' &&strok[50] == '0' &&strok[51] == '3' &&strok[52] == 'A' &&strok[53] == '3' &&strok[54] == '7' &&strok[55] == '0')
{
digitalWrite (ledpin, HIGH);
delay(1000);
Serial1.println("AT+CMGD=1");
}
// ВЫКЛЮЧЕНИЕ - отправляю СМС - #a0
if(strok[48] == '2' &&strok[49] == '1' &&strok[50] == '0' &&strok[51] == '3' &&strok[52] == 'A' &&strok[53] == '3' &&strok[54] == '3' &&strok[55] == '0')
{
digitalWrite (ledpin, LOW);
delay(1000);
Serial1.println("AT+CMGD=1");
}
}
delay(100);
}