
Remote script download using RC intrinsic function
LZT 123 7799 R1B
10
else
{
/* check status of call every second */
dlys
(1);
prtf
(
"online status NUMBER 1 = %d\n"
, st);
st
=
chsts
(1);
st = st & 0x02;
}
}
if
(first == 0)
{
/* disable remote control and reset the module */
prtf
(
"disable rc\n"
);
rc
(0);
rst
(0);
}
}
ExecuteMyScript()
{
return
(0);
}
main ()
{
int
chlerr;
char
chlsts;
int
APPS_NETWORK_STATUSBYTE = 10;
int
AT_NET_REGISTERED = 1;
prs
(0);
prtf
(
"\r\n Waiting for Network registration..."
);
while
(
gtb
(APPS_NETWORK_STATUSBYTE) != AT_NET_REGISTERED)
{
dlys
(1);
}
prtf
(
"\r\n Now registered!"
);
while
(1)
{
prtf
(
"\r\n - Executing My Script..."
);
Rslt = ExecuteMyScript ();
prtf
(
"\r\n >>>
ExecuteMyScript
result: %d",
Rslt);
if
(Rslt == 0)
{
prtf
(
"\r\nOK!"
);
}
else