distren » 09 июн 2016, 17:44
Ура! пришел ">" макрос:
unsigned char str_0Dh[2]={13,0}
unsigned char CmdNumbText[8]="AT+CMGS=" // текст команды ввода смс
unsigned char quot[2]={34,0} // кавычки
unsigned char Cmd7[2]="+7" // текст +7
unsigned short kod // код оператора в панели
unsigned char str_KodOperator[4] // текст код оператора
unsigned int tel
unsigned char str_tel[7] // текст номер телефона
unsigned char CommandNumber[32] // команда ввода номера
// собираем строку ввода номера
GetData(Kod, "Local HMI", RW, 30, 1) // берем код опер.
DEC2ASCII(Kod, str_KodOperator[0], 3) // преобразуем в строку
GetData(tel, "Local HMI", RW, 31, 1) // берем номер телефона
DEC2ASCII(tel, str_tel[0], 7) // преобразуем в строку
StringCopy(CmdNumbText[0], CommandNumber[0])
StringCat(quot[0], CommandNumber[0])
StringCat(Cmd7[0], CommandNumber[0])
StringCat(str_KodOperator[0], CommandNumber[0])
StringCat(str_tel[0], CommandNumber[0])
StringCat(quot[0], CommandNumber[0])
StringCat(str_0Dh[0], CommandNumber[0])
int l2
l2=StringLength(CommandNumber[0])
SetData(l2, "Local HMI", LW, 13, 1)
SetData(CommandNumber[0], "Local HMI", LW, 200, 28)
OUTPORT(CommandNumber[0], "modem owen", 32)