SendCR("at*s");
Waitfor("OK",10000);
SendCR("at*$");
Waitfor("   Strike any key when ready . . .",10000);
SendCR("");
Waitfor("OK",10000);
SendCR("at*v");
Waitfor("PassWord:",10000);
Send("Z");
Waitfor("*",10000);
Send("y");
Waitfor("*",10000);
Send("X");
Waitfor("*",10000);
Send("E");
Waitfor("*",10000);
Send("L");
Waitfor("*",10000);
SendCR("");
Waitfor("OK",10000);