1 // Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).

     2 // All rights reserved.

     3 // This component and the accompanying materials are made available

     4 // under the terms of "Eclipse Public License v1.0"

     5 // which accompanies this distribution, and is available

     6 // at the URL "http://www.eclipse.org/legal/epl-v10.html".

     7 //

     8 // Initial Contributors:

     9 // Nokia Corporation - initial contribution.

    10 //

    11 // Contributors:

    12 //

    13 // Description:

    14 //

    15 

    16 

    17 

    18 /**

    19  @file

    20  @internalComponent 

    21 */

    22 

    23 #ifndef __CTXMESS_H__

    24 #define __CTXMESS_H__

    25 

    26 #include "Te_LoopbackTestStepBase.h"

    27 #include "Te_LoopBackScriptEng.h"

    28 

    29 const TUint8 KTestTxPduA[]= { 0x0B,0x91,0x44,0x83,0x05,0x61,0x00,0xF5,

    30 							0x07, 0x91, 0x44, 0x87, 0x20, 0x90, 0x02, 0x53, 0x04, 0x10, 0xd0, 0x42, 0xea,

    31 							0xb0, 0xcc, 0x66, 0xbb, 0xcb, 0x74, 0x00, 0x00, 0x00, 0x30, 0x80, 0x41, 0x03,

    32 							0x23, 0x00, 0x88, 0xc7, 0xb2, 0x3b, 0x5d, 0x06, 0x25, 0xdd, 0xf4, 0xb2, 0xdc,

    33 							0x5d, 0xa6, 0x83, 0xe0, 0xf2, 0x77, 0xfb, 0x4d, 0x4f, 0xbf, 0xdd, 0x3a, 0x90,

    34 							0x51, 0x5e, 0x2e, 0x83, 0xae, 0x41, 0x28, 0x28, 0xe9, 0xa6, 0x97, 0xe5, 0xee,

    35 							0x32, 0x1d, 0x04, 0x47, 0xBF, 0xDD, 0x65, 0x90, 0xB8, 0x9C, 0x76, 0x9F, 0x41,

    36 							0xE7, 0xB4, 0xBD, 0xEC, 0x06, 0x85, 0xEF, 0xE1, 0x3C, 0xA8, 0x6C, 0x2F, 0xCB,

    37 							0xF3, 0x20, 0x72, 0x38, 0x0F, 0x4A, 0xBB, 0x41, 0xCD, 0xB0, 0x7C, 0x8C, 0x76,

    38 							0x81, 0xAC, 0xE9, 0x79, 0x9A, 0x0E, 0x02, 0xA1, 0xE9, 0x74, 0xB8, 0xEE, 0xF5,

    39 							0x7A, 0x9B, 0xCD, 0x65, 0xF9, 0xDC, 0x75, 0x2E, 0xBB, 0xD3, 0x65, 0xD7, 0xF8,

    40 							0xED, 0xAA, 0xAF, 0x5F, 0xF7, 0x30, 0x1C, 0x64, 0x7E, 0xCB, 0x41, 0xE4, 0x32,

    41 							0x3D, 0x9C, 0x66, 0xCF, 0x5D };

    42 

    43 const TUint8 KTestTxPduB[]= { 0x04, 0x0c, 0x91, 0x44, 0x77, 0x74, 0x60, 0x45, 0x61, 0x00, 0x00, 0x00, 0x30,

    44 						   0x71, 0x61, 0x03, 0x52, 0x00, 0x0a, 0xd4, 0xf2, 0x9c, 0x9e, 0x76, 0x9f, 0x5d,

    45 						   0x2e, 0x17 };

    46 

    47 const TUint KMsgRefA=25;

    48 const TUint KMsgRefB=27;

    49 const TUint KMsgRefC=28;

    50 const TUint KMsgRefD=29;

    51 const TUint KMsgRefE=30;

    52 

    53 _LIT(KTxMessDefaultSca,"01632960000");

    54 _LIT8(KTxMessDefaultSca340,"\x44\x02\x57\x36\x02\x00");	// GSM 03.40 encoding of above

    55 _LIT8(KTxMessInPhoneDefaultSca340,"\x44\x02\x57\x36\x02\x10");	// This is in script & is iPhone's initial sca

    56 

    57 const TInt KMsgLocA=4;

    58 _LIT(KMsgStoA,"SMS_ME");

    59 const TUint KMsgLenA=140;

    60 const TInt KMsgLocB=7;

    61 _LIT(KMsgStoB,"SMS_ME");

    62 const TUint KMsgLenB=28;

    63 

    64 const struct TScript KTxMessScript[]= {

    65 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

    66 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    67 

    68 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

    69 

    70 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

    71 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

    72 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    73 

    74 //

    75 // The initialisation string - we don't care what it is

    76 //

    77 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

    78 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    79 

    80 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

    81 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    82 

    83 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

    84 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

    85 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    86 

    87 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

    88 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    89 

    90 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

    91 	{	ETxString, (TText8*)"ERICSSON\r",	0, ETxEvent|EFailIfTimeOut	},

    92 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    93 

    94 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

    95 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

    96 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

    97 

    98 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

    99 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

   100 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   101 

   102 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

   103 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

   104 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   105 

   106 	{	ERxString, (TText8*)"AT+CIMI",	0, ERxEvent	},

   107 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   108 

   109 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

   110 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

   111 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   112 

   113 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   114 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   115 

   116 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

   117 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   118 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   119 

   120 	{	ERxString, (TText8*)"AT+CPMS?",	0, ERxEvent	},

   121 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",	0, ETxEvent|EFailIfTimeOut	},

   122 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   123 

   124 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

   125 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   126 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   127 

   128 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

   129 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   130 

   131 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

   132 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   133 

   134 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

   135 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   136 

   137 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

   138 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   139 	

   140 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

   141 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   142 

   143 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

   144 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

   145 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   146 

   147 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

   148 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   149 

   150 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

   151 	{	ETxString, (TText8*)"+CSQ: 15,99\r",0, ETxEvent|EFailIfTimeOut	},

   152 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   153 

   154 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   155 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   156 

   157 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   158 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   159 

   160 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

   161 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   162 

   163 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

   164 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   165 

   166 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},

   167 	{	ETxString, (TText8*)"+CNMI: (0-2),(0,1,3),(0),(0),(0,1)\r",	0, ETxEvent|EFailIfTimeOut	},

   168 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   169 

   170 	{	ERxString, (TText8*)"AT+CBST=?",	0, ERxEvent	},

   171 	{	ETxString, (TText8*)"+CBST: (0-7,12,14-16,34,36,38,39,43,47-51,65,66,68,70,71,75,79-81),(0,2),(1)\r",	0, ETxEvent|EFailIfTimeOut	},

   172 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   173 

   174 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   175 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   176 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   177 

   178 	{	ERxString, (TText8*)"AT+CGREG=1",	0, ERxEvent	},

   179 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   180 

   181 	{	ERxString, (TText8*)"AT*ECAM=1",	0, ERxEvent	},

   182 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   183 

   184 // Handle a successful Tx SMS

   185 //

   186 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   187 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   188 

   189 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   190 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   191 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   192 

   193 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   194 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   195 

   196 	{	ERxString, (TText8*)"AT+CMGS=156",	0, ERxEvent	},

   197 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   198 	{	ERxString, (TText8*)"07914487209002530410d042eab0cc66bbcb7400000030804103230088c7b23b5d0625ddf4b2dc5da683e0f277fb4d4fbfdd3a90515e2e83ae412828e9a697e5ee321d0447bfdd6590b89c769f41e7b4bdec0685efe13ca86c2fcbf32072380f4abb41cdb07c8c7681ace9799a0e02a1e974b8eef57a9bcd65f9dc752ebbd365d7f8edaaaf5ff7301c647ecb41e4323d9c66cf5d",	0, ERxEvent	},

   199 

   200 // Constant below must be the same as that set in KMsgRefA above

   201 	{	ETxString, (TText8*)"\r+CMGS: 25",	0, ETxEvent|EFailIfTimeOut	},

   202 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   203 

   204 	{	EWait,		NULL,					1,	ETimeOutEvent	},

   205 	{	EComplete,	 NULL,					0, 0	}

   206 	};

   207 

   208 //

   209 // Test new standard SMS PDUs

   210 //

   211 const struct TScript KTxMessNewStdScript[]= {

   212 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

   213 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   214 

   215 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

   216 

   217 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

   218 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

   219 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   220 

   221 //

   222 // The initialisation string - we don't care what it is

   223 //

   224 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

   225 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   226 

   227 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

   228 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   229 

   230 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

   231 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

   232 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   233 

   234 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

   235 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   236 

   237 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

   238 	{	ETxString, (TText8*)"ERICSSON\r",	0, ETxEvent|EFailIfTimeOut	},

   239 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   240 

   241 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

   242 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

   243 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   244 

   245 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

   246 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

   247 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   248 

   249 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

   250 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

   251 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   252 

   253 	{	ERxString, (TText8*)"AT+CIMI",	0, ERxEvent	},

   254 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   255 

   256 

   257 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

   258 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

   259 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   260 

   261 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   262 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   263 

   264 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

   265 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   266 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   267 

   268 	{	ERxString, (TText8*)"AT+CPMS?",	0, ERxEvent	},

   269 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",	0, ETxEvent|EFailIfTimeOut	},

   270 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   271 

   272 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

   273 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   274 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   275 

   276 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

   277 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   278 

   279 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

   280 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   281 

   282 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

   283 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   284 

   285 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

   286 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   287 	

   288 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

   289 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   290 

   291 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

   292 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

   293 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   294 	

   295 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

   296 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   297 

   298 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

   299 	{	ETxString, (TText8*)"+CSQ: 15,99\r",0, ETxEvent|EFailIfTimeOut	},

   300 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   301 

   302 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   303 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   304 

   305 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   306 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   307 

   308 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

   309 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   310 

   311 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

   312 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   313 

   314 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},

   315 	{	ETxString, (TText8*)"+CNMI: (0-2),(0,1,3),(0),(0),(0,1)\r",	0, ETxEvent|EFailIfTimeOut	},

   316 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   317 

   318 	{	ERxString, (TText8*)"AT+CBST=?",	0, ERxEvent	},

   319 	{	ETxString, (TText8*)"+CBST: (0-7,12,14-16,34,36,38,39,43,47-51,65,66,68,70,71,75,79-81),(0,2),(1)\r",	0, ETxEvent|EFailIfTimeOut	},

   320 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   321 

   322 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   323 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   324 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   325 

   326 	{	ERxString, (TText8*)"AT+CGREG=1",	0, ERxEvent	},

   327 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   328 

   329 	{	ERxString, (TText8*)"AT*ECAM=1",	0, ERxEvent	},

   330 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   331 

   332 // Handle a successful Tx SMS

   333 //

   334 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   335 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   336 

   337 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   338 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   339 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   340 

   341 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   342 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   343 

   344 	{	ERxString, (TText8*)"AT+CMGS=156",	0, ERxEvent	},

   345 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   346 	{	ERxString, (TText8*)"07914487209002530410d042eab0cc66bbcb7400000030804103230088c7b23b5d0625ddf4b2dc5da683e0f277fb4d4fbfdd3a90515e2e83ae412828e9a697e5ee321d0447bfdd6590b89c769f41e7b4bdec0685efe13ca86c2fcbf32072380f4abb41cdb07c8c7681ace9799a0e02a1e974b8eef57a9bcd65f9dc752ebbd365d7f8edaaaf5ff7301c647ecb41e4323d9c66cf5d",	0, ERxEvent	},

   347 

   348 // Constant below must be the same as that set in KMsgRefA above

   349 	{	ETxString, (TText8*)"\r+CMGS: 25",	0, ETxEvent|EFailIfTimeOut	},

   350 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   351 

   352 	{	EWait,		NULL,					1,	ETimeOutEvent	},

   353 	{	EComplete,	 NULL,					0, 0	}

   354 	};

   355 

   356 //

   357 //

   358 // (1/8) Test no prefix on pdu, don't set default sca, new ETSI format

   359 //

   360 //

   361 const struct TScript KTxMessScriptNoprefixNodefscaNew[]= {

   362 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

   363 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   364 

   365 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

   366 

   367 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

   368 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

   369 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   370 

   371 //

   372 // The initialisation string - we don't care what it is

   373 //

   374 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

   375 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   376 

   377 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

   378 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   379 

   380 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

   381 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

   382 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   383 

   384 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

   385 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   386 

   387 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

   388 	{	ETxString, (TText8*)"Nokia\r",	0, ETxEvent|EFailIfTimeOut	},

   389 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   390 

   391 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

   392 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

   393 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   394 

   395 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

   396 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

   397 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   398 

   399 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

   400 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

   401 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   402 

   403 	{	ERxString, (TText8*)"AT+CIMI",		0, ERxEvent	},

   404 	{	ETxStringOK, NULL, 					0, ETxEvent|EFailIfTimeOut	},

   405 

   406 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

   407 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

   408 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   409 

   410 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   411 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   412 

   413 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

   414 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   415 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   416 

   417 	{	ERxString, (TText8*)"AT+CPMS?",	0, ERxEvent	},

   418 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",	0, ETxEvent|EFailIfTimeOut	},

   419 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   420 

   421 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

   422 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   423 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   424 

   425 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

   426 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   427 

   428 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

   429 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   430 

   431 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

   432 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   433 

   434 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

   435 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   436 	

   437 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

   438 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   439 

   440 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

   441 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

   442 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   443 

   444 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

   445 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   446 

   447 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

   448 	{	ETxString, (TText8*)"+CSQ: 15,99\r",	0, ETxEvent|EFailIfTimeOut	},

   449 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   450 	

   451 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   452 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   453 

   454 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   455 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   456 

   457 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

   458 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   459 

   460 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

   461 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   462 

   463 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},

   464 	{	ETxString, (TText8*)"+CNMI: (0-2),(0,1,3),(0),(0),(0,1)\r",	0, ETxEvent|EFailIfTimeOut	},

   465 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   466 

   467 	{	ERxString, (TText8*)"AT+CBST=?",	0, ERxEvent	},

   468 	{	ETxString, (TText8*)"+CBST: (0-7,12,14-16,34,36,38,39,43,47-51,65,66,68,70,71,75,79-81),(0,2),(1)\r",	0, ETxEvent|EFailIfTimeOut	},

   469 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   470 

   471 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   472 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   473 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   474 

   475 	{	ERxString, (TText8*)"AT+CGREG=1",	0, ERxEvent	},

   476 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   477 

   478 // Non-prefixed PDU - fail and tsy will query for SCA

   479 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   480 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   481 

   482 // Return the in iPhone default sca, this is KTxMessInPhoneDefaultSca340 above

   483 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   484 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   485 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   486 

   487 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   488 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   489 

   490 	{	ERxString, (TText8*)"AT+CMGS=156",	0, ERxEvent	},

   491 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   492 	{	ERxString, (TText8*)"07914487209002530410d042eab0cc66bbcb7400000030804103230088c7b23b5d0625ddf4b2dc5da683e0f277fb4d4fbfdd3a90515e2e83ae412828e9a697e5ee321d0447bfdd6590b89c769f41e7b4bdec0685efe13ca86c2fcbf32072380f4abb41cdb07c8c7681ace9799a0e02a1e974b8eef57a9bcd65f9dc752ebbd365d7f8edaaaf5ff7301c647ecb41e4323d9c66cf5d",	0, ERxEvent	},

   493 

   494 // Constant below must be the same as that set in KMsgRefA above

   495 	{	ETxString, (TText8*)"\r+CMGS: 25",	0, ETxEvent|EFailIfTimeOut	},

   496 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   497 

   498 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   499 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   500 

   501 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   502 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   503 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   504 

   505 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   506 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   507 

   508 // Given the previous one has failed, try again...

   509 	{	ERxString, (TText8*)"AT+CMGS=28",	0, ERxEvent	},

   510 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   511 	{	ERxString, (TText8*)"040c914477746045610000003071610352000ad4f29c9e769f5d2e17",	0, ERxEvent	},

   512 	

   513 // Constant below must be the same as that set in KMsgRefB above

   514 	{	ETxString, (TText8*)"\r+CMGS: 27",	0, ETxEvent|EFailIfTimeOut	},

   515 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   516 

   517 // Wait for 2 seconds since GSMTSY won't read the above text in one attempt, and

   518 // we don't want the loopback port to shutdown before it reads out the rest

   519 	{	EWait,		NULL,					2,	ETimeOutEvent	},

   520 	{	EComplete,	 NULL,					0, 0	}

   521 	};

   522 

   523 //

   524 //

   525 // (2/8) Test prefix on pdu, don't set default sca, new ETSI format

   526 //

   527 //

   528 const struct TScript KTxMessScriptPrefixNodefscaNew[]= {

   529 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

   530 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   531 

   532 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

   533 

   534 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

   535 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

   536 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   537 

   538 //

   539 // The initialisation string - we don't care what it is

   540 //

   541 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

   542 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   543 

   544 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

   545 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   546 

   547 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

   548 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

   549 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   550 

   551 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

   552 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   553 

   554 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

   555 	{	ETxString, (TText8*)"Nokia\r",	0, ETxEvent|EFailIfTimeOut	},

   556 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   557 

   558 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

   559 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

   560 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   561 

   562 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

   563 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

   564 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   565 

   566 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

   567 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

   568 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   569 

   570 	{	ERxString, (TText8*)"AT+CIMI",		0, ERxEvent	},

   571 	{	ETxStringOK, NULL, 					0, ETxEvent|EFailIfTimeOut	},

   572 

   573 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

   574 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

   575 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   576 

   577 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   578 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   579 

   580 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

   581 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   582 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   583 

   584 	{	ERxString, (TText8*)"AT+CPMS?",	0, ERxEvent	},

   585 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",	0, ETxEvent|EFailIfTimeOut	},

   586 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   587 

   588 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

   589 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   590 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   591 

   592 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

   593 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   594 

   595 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

   596 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   597 

   598 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

   599 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   600 

   601 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

   602 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   603 	

   604 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

   605 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   606 

   607 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

   608 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

   609 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   610 

   611 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

   612 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   613 

   614 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

   615 	{	ETxString, (TText8*)"+CSQ: 15,99\r",	0, ETxEvent|EFailIfTimeOut	},

   616 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   617 	

   618 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   619 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   620 

   621 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   622 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   623 

   624 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

   625 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   626 

   627 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

   628 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   629 

   630 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},

   631 	{	ETxString, (TText8*)"+CNMI: (0-2),(0,1,3),(0),(0),(0,1)\r",	0, ETxEvent|EFailIfTimeOut	},

   632 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   633 

   634 	{	ERxString, (TText8*)"AT+CBST=?",	0, ERxEvent	},

   635 	{	ETxString, (TText8*)"+CBST: (0-7,12,14-16,34,36,38,39,43,47-51,65,66,68,70,71,75,79-81),(0,2),(1)\r",	0, ETxEvent|EFailIfTimeOut	},

   636 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   637 

   638 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   639 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   640 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   641 

   642 	{	ERxString, (TText8*)"AT+CGREG=1",	0, ERxEvent	},

   643 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   644 

   645 // Non-prefixed PDU - fail and tsy will query for SCA

   646 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   647 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   648 

   649 // Return the in iPhone default sca, this is KTxMessInPhoneDefaultSca340 above

   650 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   651 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   652 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   653 

   654 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   655 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   656 

   657 	{	ERxString, (TText8*)"AT+CMGS=156",	0, ERxEvent	},

   658 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   659 	{	ERxString, (TText8*)"07914487209002530410d042eab0cc66bbcb7400000030804103230088c7b23b5d0625ddf4b2dc5da683e0f277fb4d4fbfdd3a90515e2e83ae412828e9a697e5ee321d0447bfdd6590b89c769f41e7b4bdec0685efe13ca86c2fcbf32072380f4abb41cdb07c8c7681ace9799a0e02a1e974b8eef57a9bcd65f9dc752ebbd365d7f8edaaaf5ff7301c647ecb41e4323d9c66cf5d",	0, ERxEvent	},

   660 

   661 // Constant below must be the same as that set in KMsgRefA above

   662 	{	ETxString, (TText8*)"\r+CMGS: 25",	0, ETxEvent|EFailIfTimeOut	},

   663 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   664 

   665 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   666 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   667 

   668 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   669 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   670 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   671 

   672 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   673 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   674 

   675 // Given the previous one has failed, try again...

   676 	{	ERxString, (TText8*)"AT+CMGS=28",	0, ERxEvent	},

   677 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   678 	{	ERxString, (TText8*)"040c914477746045610000003071610352000ad4f29c9e769f5d2e17",	0, ERxEvent	},

   679 	

   680 // Constant below must be the same as that set in KMsgRefB above

   681 	{	ETxString, (TText8*)"\r+CMGS: 27",	0, ETxEvent|EFailIfTimeOut	},

   682 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   683 

   684 // Wait for 2 seconds since GSMTSY won't read the above text in one attempt, and

   685 // we don't want the loopback port to shutdown before it reads out the rest

   686 	{	EWait,		NULL,					2,	ETimeOutEvent	},

   687 	{	EComplete,	NULL,					0,	0	}

   688 	};

   689 

   690 //

   691 //

   692 // (3/8) Test no prefix on pdu, set default sca, new ETSI format

   693 //

   694 //

   695 const struct TScript KTxMessScriptNoprefixDefscaNew[]= {

   696 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

   697 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   698 

   699 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

   700 

   701 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

   702 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

   703 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   704 

   705 //

   706 // The initialisation string - we don't care what it is

   707 //

   708 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

   709 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   710 

   711 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

   712 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   713 

   714 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

   715 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

   716 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   717 

   718 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

   719 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   720 

   721 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

   722 	{	ETxString, (TText8*)"Nokia\r",	0, ETxEvent|EFailIfTimeOut	},

   723 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   724 

   725 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

   726 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

   727 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   728 

   729 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

   730 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

   731 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   732 

   733 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

   734 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

   735 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   736 

   737 	{	ERxString, (TText8*)"AT+CIMI",		0, ERxEvent	},

   738 	{	ETxStringOK, NULL, 					0, ETxEvent|EFailIfTimeOut	},

   739 

   740 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

   741 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

   742 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   743 

   744 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   745 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   746 

   747 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

   748 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   749 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   750 

   751 	{	ERxString, (TText8*)"AT+CPMS?",		0, ERxEvent	},

   752 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",

   753 											0, ETxEvent|EFailIfTimeOut	},

   754 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   755 

   756 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

   757 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",

   758 											0, ETxEvent|EFailIfTimeOut	},

   759 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   760 

   761 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

   762 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   763 

   764 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

   765 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   766 

   767 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

   768 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   769 

   770 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

   771 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   772 	

   773 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

   774 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   775 

   776 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

   777 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

   778 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   779 

   780 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

   781 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   782 

   783 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

   784 	{	ETxString, (TText8*)"+CSQ: 15,99\r",	0, ETxEvent|EFailIfTimeOut	},

   785 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   786 	

   787 

   788 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   789 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   790 

   791 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   792 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   793 

   794 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

   795 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   796 

   797 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

   798 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   799 

   800 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},

   801 	{	ETxString, (TText8*)"+CNMI: (0-2),(0,1,3),(0),(0),(0,1)\r",	0, ETxEvent|EFailIfTimeOut	},

   802 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   803 

   804 	{	ERxString, (TText8*)"AT+CBST=?",	0, ERxEvent	},

   805 	{	ETxString, (TText8*)"+CBST: (0-7,12,14-16,34,36,38,39,43,47-51,65,66,68,70,71,75,79-81),(0,2),(1)\r",	0, ETxEvent|EFailIfTimeOut	},

   806 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   807 

   808 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   809 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   810 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   811 

   812 	{	ERxString, (TText8*)"AT+CGREG=1",	0, ERxEvent	},

   813 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   814 

   815 // Non-prefixed PDU - fail and tsy will query for SCA

   816 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   817 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   818 

   819 // Return the in iPhone default sca, this is KTxMessInPhoneDefaultSca340 above

   820 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   821 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   822 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   823 

   824 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   825 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   826 

   827 	{	ERxString, (TText8*)"AT+CMGS=156",	0, ERxEvent	},

   828 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   829 	{	ERxString, (TText8*)"07914487209002530410d042eab0cc66bbcb7400000030804103230088c7b23b5d0625ddf4b2dc5da683e0f277fb4d4fbfdd3a90515e2e83ae412828e9a697e5ee321d0447bfdd6590b89c769f41e7b4bdec0685efe13ca86c2fcbf32072380f4abb41cdb07c8c7681ace9799a0e02a1e974b8eef57a9bcd65f9dc752ebbd365d7f8edaaaf5ff7301c647ecb41e4323d9c66cf5d",	0, ERxEvent	},

   830 

   831 // Constant below must be the same as that set in KMsgRefA above

   832 	{	ETxString, (TText8*)"\r+CMGS: 25",	0, ETxEvent|EFailIfTimeOut	},

   833 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   834 

   835 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   836 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   837 

   838 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   839 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   840 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   841 

   842 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   843 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   844 

   845 // Given the previous one has failed, try again...

   846 	{	ERxString, (TText8*)"AT+CMGS=28",	0, ERxEvent	},

   847 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   848 	{	ERxString, (TText8*)"040c914477746045610000003071610352000ad4f29c9e769f5d2e17",	0, ERxEvent	},

   849 	

   850 // Constant below must be the same as that set in KMsgRefB above

   851 	{	ETxString, (TText8*)"\r+CMGS: 27",	0, ETxEvent|EFailIfTimeOut	},

   852 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   853 

   854 // Wait for 2 seconds since GSMTSY won't read the above text in one attempt, and

   855 // we don't want the loopback port to shutdown before it reads out the rest

   856 	{	EWait,		NULL,					2,	ETimeOutEvent	},

   857 	{	EComplete,	 NULL,					0, 0	}

   858 	};

   859 

   860 //

   861 //

   862 // (4/8) Test prefix on pdu, set default sca, new ETSI format

   863 //

   864 //

   865 const struct TScript KTxMessScriptPrefixDefscaNew[]= {

   866 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

   867 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   868 

   869 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

   870 

   871 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

   872 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

   873 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   874 

   875 //

   876 // The initialisation string - we don't care what it is

   877 //

   878 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

   879 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   880 

   881 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

   882 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   883 

   884 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

   885 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

   886 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   887 

   888 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

   889 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   890 

   891 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

   892 	{	ETxString, (TText8*)"Nokia\r",	0, ETxEvent|EFailIfTimeOut	},

   893 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   894 

   895 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

   896 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

   897 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   898 

   899 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

   900 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

   901 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   902 

   903 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

   904 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

   905 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   906 

   907 	{	ERxString, (TText8*)"AT+CIMI",		0, ERxEvent	},

   908 	{	ETxStringOK, NULL, 					0, ETxEvent|EFailIfTimeOut	},

   909 

   910 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

   911 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

   912 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   913 

   914 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   915 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   916 

   917 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

   918 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   919 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   920 

   921 	{	ERxString, (TText8*)"AT+CPMS?",	0, ERxEvent	},

   922 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",	0, ETxEvent|EFailIfTimeOut	},

   923 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   924 

   925 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

   926 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

   927 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   928 

   929 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

   930 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   931 

   932 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

   933 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   934 

   935 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

   936 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   937 

   938 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

   939 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

   940 	

   941 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

   942 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   943 

   944 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

   945 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

   946 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   947 

   948 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

   949 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   950 

   951 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

   952 	{	ETxString, (TText8*)"+CSQ: 15,99\r",	0, ETxEvent|EFailIfTimeOut	},

   953 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   954 	

   955 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   956 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   957 

   958 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

   959 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   960 

   961 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

   962 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   963 

   964 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

   965 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   966 

   967 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},

   968 	{	ETxString, (TText8*)"+CNMI: (0-2),(0,1,3),(0),(0),(0,1)\r",	0, ETxEvent|EFailIfTimeOut	},

   969 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   970 

   971 	{	ERxString, (TText8*)"AT+CBST=?",	0, ERxEvent	},

   972 	{	ETxString, (TText8*)"+CBST: (0-7,12,14-16,34,36,38,39,43,47-51,65,66,68,70,71,75,79-81),(0,2),(1)\r",	0, ETxEvent|EFailIfTimeOut	},

   973 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   974 

   975 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   976 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   977 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   978 

   979 	{	ERxString, (TText8*)"AT+CGREG=1",	0, ERxEvent	},

   980 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

   981 

   982 // Non-prefixed PDU - fail and tsy will query for SCA

   983 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

   984 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   985 

   986 // Return the in iPhone default sca, this is KTxMessInPhoneDefaultSca340 above

   987 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

   988 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

   989 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   990 

   991 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

   992 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

   993 

   994 	{	ERxString, (TText8*)"AT+CMGS=156",	0, ERxEvent	},

   995 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

   996 	{	ERxString, (TText8*)"07914487209002530410d042eab0cc66bbcb7400000030804103230088c7b23b5d0625ddf4b2dc5da683e0f277fb4d4fbfdd3a90515e2e83ae412828e9a697e5ee321d0447bfdd6590b89c769f41e7b4bdec0685efe13ca86c2fcbf32072380f4abb41cdb07c8c7681ace9799a0e02a1e974b8eef57a9bcd65f9dc752ebbd365d7f8edaaaf5ff7301c647ecb41e4323d9c66cf5d",	0, ERxEvent	},

   997 

   998 // Constant below must be the same as that set in KMsgRefA above

   999 	{	ETxString, (TText8*)"\r+CMGS: 25",	0, ETxEvent|EFailIfTimeOut	},

  1000 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1001 

  1002 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

  1003 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1004 

  1005 	{	ERxString, (TText8*)"AT+CSCA?",		0, ERxEvent	},

  1006 	{	ETxString, (TText8*)"+CSCA: \"441632960000\",145",	0, ETxEvent|EFailIfTimeOut	},

  1007 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1008 

  1009 	{	ERxString, (TText8*)"AT+CSCA=\"441632960000\",145",		0, ERxEvent	},

  1010 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1011 

  1012 // Given the previous one has failed, try again...

  1013 	{	ERxString, (TText8*)"AT+CMGS=28",	0, ERxEvent	},

  1014 	{	ETxString, (TText8*)"\r\012> ",		0, ETxEvent|EFailIfTimeOut	},

  1015 	{	ERxString, (TText8*)"040c914477746045610000003071610352000ad4f29c9e769f5d2e17",	0, ERxEvent	},

  1016 	

  1017 // Constant below must be the same as that set in KMsgRefB above

  1018 	{	ETxString, (TText8*)"\r+CMGS: 27",	0, ETxEvent|EFailIfTimeOut	},

  1019 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1020 

  1021 // Wait for 2 seconds since GSMTSY won't read the above text in one attempt, and

  1022 // we don't want the loopback port to shutdown before it reads out the rest

  1023 	{	EWait,		NULL,					2,	ETimeOutEvent	},

  1024 	{	EComplete,	NULL,					0,	0	}

  1025 	};

  1026 

  1027 //

  1028 //

  1029 // (5/8) Test no prefix on pdu, don't set default sca, old ETSI format

  1030 //

  1031 //

  1032 const struct TScript KTxMessScriptNoprefixNodefscaOld[]= {

  1033 	{	ERxString,	(TText8*)"AT\r",		0, ERxEvent	},

  1034 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1035 

  1036 	{	EIfRxStringJmp, (TText8*)"AT\r",	1, 0	},

  1037 

  1038 	{	ERxString, (TText8*)"AT+FCLASS=?",	0, ERxEvent	},

  1039 	{	ETxString, (TText8*)"0,1,2\r",		0, ETxEvent|EFailIfTimeOut	},

  1040 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1041 

  1042 //

  1043 // The initialisation string - we don't care what it is

  1044 //

  1045 	{	ERxString, (TText8*)"AT",			0, ERxEvent	},

  1046 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1047 

  1048 	{	ERxString, (TText8*)"AT+CNMI=,0",   0, ERxEvent	},

  1049 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1050 

  1051 	{	ERxString, (TText8*)"ATS7?",		0, ERxEvent	},

  1052 	{	ETxString, (TText8*)"050\r",		0, ETxEvent|EFailIfTimeOut	},

  1053 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1054 

  1055 	{	ERxString, (TText8*)"ATS0=0",		0, ERxEvent	},

  1056 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1057 

  1058 	{	ERxString, (TText8*)"AT+CGMI",	0, ERxEvent	},

  1059 	{	ETxString, (TText8*)"Nokia\r",	0, ETxEvent|EFailIfTimeOut	},

  1060 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1061 

  1062 	{	ERxString, (TText8*)"AT+CGMM",	0, ERxEvent	},

  1063 	{	ETxString, (TText8*)"1100801\r",	0, ETxEvent|EFailIfTimeOut	},

  1064 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1065 

  1066 	{	ERxString, (TText8*)"AT+CGMR",	0, ERxEvent	},

  1067 	{	ETxString, (TText8*)"9808261341\r",	0, ETxEvent|EFailIfTimeOut	},

  1068 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1069 

  1070 	{	ERxString, (TText8*)"AT+CGSN",	0, ERxEvent	},

  1071 	{	ETxString, (TText8*)"520002512954000\r",	0, ETxEvent|EFailIfTimeOut	},

  1072 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1073 

  1074 	{	ERxString, (TText8*)"AT+CIMI",		0, ERxEvent	},

  1075 	{	ETxStringOK, NULL, 					0, ETxEvent|EFailIfTimeOut	},

  1076 

  1077 	{	ERxString, (TText8*)"AT+CMGF=?",	0, ERxEvent	},

  1078 	{	ETxString, (TText8*)"+CMGF: (0)\r",	0, ETxEvent|EFailIfTimeOut	},

  1079 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1080 

  1081 	{	ERxString, (TText8*)"AT+CMGF=0",	0, ERxEvent	},

  1082 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1083 

  1084 	{	ERxString, (TText8*)"AT+CPMS=?",	0, ERxEvent	},

  1085 	{	ETxString, (TText8*)"+CPMS: (\"ME\",\"SM\"),(\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

  1086 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1087 

  1088 	{	ERxString, (TText8*)"AT+CPMS?",	0, ERxEvent	},

  1089 	{	ETxString, (TText8*)"+CPMS: \"SM\",0,15,\"SM\",0,15\r",	0, ETxEvent|EFailIfTimeOut	},

  1090 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1091 

  1092 	{	ERxString, (TText8*)"AT+CPBS=?",	0, ERxEvent	},

  1093 	{	ETxString, (TText8*)"+CPBS: (\"ME\",\"SM\")\r",	0, ETxEvent|EFailIfTimeOut	},

  1094 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1095 

  1096 	{	ERxString, (TText8*)"AT+CREG=0",	0, ERxEvent	},

  1097 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1098 

  1099 	{	ERxString, (TText8*)"AT+CREG=2",	0, ERxEvent	},

  1100 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

  1101 

  1102 	{	ERxString, (TText8*)"AT+CREG=1",	0, ERxEvent	},

  1103 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1104 

  1105 	{	ERxString, (TText8*)"AT+CREG?",	0, ERxEvent	},

  1106 	{	ETxString, (TText8*)"ERROR\r",	0, ETxEvent|EFailIfTimeOut	},

  1107 	

  1108 	{	ERxString, (TText8*)"AT+CRC=1",		0, ERxEvent	},

  1109 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1110 

  1111 	{	ERxString, (TText8*)"AT+COPS?",	0, ERxEvent	},

  1112 	{	ETxString, (TText8*)"+COPS: 0,0,\"UK VODAFONE\"\r",	0, ETxEvent|EFailIfTimeOut	},

  1113 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1114 

  1115 	{	ERxString, (TText8*)"AT+CBC",	0, ERxEvent	},

  1116 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1117 

  1118 	{	ERxString, (TText8*)"AT+CSQ",	0, ERxEvent	},

  1119 	{	ETxString, (TText8*)"+CSQ: 15,99\r",	0, ETxEvent|EFailIfTimeOut	},

  1120 	{	ETxStringOK, NULL,					0, ETxEvent|EFailIfTimeOut	},

  1121 	

  1122 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

  1123 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

  1124 

  1125 	{	ERxString, (TText8*)"AT+CGCLASS",	0, ERxEvent	},

  1126 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

  1127 

  1128 	{	ERxString, (TText8*)"AT+CGQREQ",	0, ERxEvent	},

  1129 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

  1130 

  1131 	{	ERxString, (TText8*)"AT+CGATT",	0, ERxEvent	},

  1132 	{	ETxString, (TText8*)"ERROR\r",		0, ETxEvent|EFailIfTimeOut	},

  1133 

  1134 	{	ERxString, (TText8*)"AT+CNMI=?",	0, ERxEvent	},