ИС Дракон © Тышов Г.Н., 2007-2011 A 6,,,,,21.02.2011,"Arial,204,10,0,0","Для коммерческого использования С.Д. Ефановым." 0,157,26,,,"block_wait_press:,,/*Схема,,//",,,"21.02.2011 10:37:03",-1,-1 4,162,1339,97,-66,-19,66,19,,1,,,"""Ждём нажатия кнопки""",,,,,, 36,13,1339,149,,,,,2,4,,,,,,,,,C 20,17,1383,149,-22,-11,66,11,3,,,,RTOS,,,,rt_free;,, 36,24,1603,149,,,,,,5,,,,,,,,, 8,23,1339,193,-66,-11,66,11,5,6,,,"""Меню активно?""",,,,"""Usl = MenuOn;""",, 36,26,1603,193,,,,,,9,,,,,,,,, 8,27,1339,237,-66,-11,66,11,7,10,,,"""Кнопка нажата?""",,,,"""Usl = (FlagDTMF != 0);""",, 36,29,1515,237,,,,,,8,,,,,,,,, 8,31,1515,278,-66,-19,66,19,9,12,,,"""Микрофон включен?""",,,,"""Usl = (GSM.FlagMic != 0);""",,D 36,28,1603,278,,,,,,13,,,,,,,,, 6,30,1339,281,-66,-11,66,11,,11,,,"""Получить символ""",,,,"""SimbolDTMF = GetDTMF();""",, 19,63,1339,325,-66,-11,66,11,,14,,,"""TimeOne = 0""",,,,"""Time = GetTime();""",, 8,92,1515,338,-66,-19,66,19,13,16,,,"""TimeOne > 10 сек?""",,,,"""Usl = ((GetTime() - Time) > SEKUNDA*10);""",, 36,35,1603,338,,,,,,22,,,,,,,,, 8,109,1339,369,-66,-11,66,11,15,17,,,"""Нажата цифра?""",,,,"""Usl = ((SimbolDTMF >= '0') && (SimbolDTMF <= '9'));""",, 36,194,1427,369,,,,,,18,,,,,,,,, 13,144,1515,401,-66,-22,66,38,,19,,,Произнести,"""""""Вы находитесь в главном меню""""""",,,""" Talk += MENU0; // вы находитесь в главном меню"","" Talk += EN_COMM; // введите команду""",, 8,148,1339,421,-66,-19,66,19,18,20,,,"""Суфлер разрешён?""",,,,"""Usl = (Set.Sufler != 0);""",, 36,225,1427,421,,,,,,24,,,,,,,,, 19,159,1515,472,-66,-11,66,11,,21,,,"""TimeOne = 0""",,,,"""Time = GetTime();""",, 13,164,1339,484,-66,-22,66,22,,23,,,Произнести,"""Введённую цифру""",,,"""Talk = (D000 + SimbolDTMF - '0');""",, 36,145,1515,505,,,,,22,,,,,,,,,, 36,105,1603,505,,,,,,,,,,,,,,, 36,166,1339,528,,,,,24,25,,,,,,,,, 36,165,1427,528,,,,,,,,,,,,,,, 5,163,1339,561,-44,-11,44,11,,,,,Конец,,,,"""goto end_block_wait_press;""",, 0,78,30,,,"block_press_resh:,,/*Схема,,"" }"","" RT_END:;"",}",,,"21.02.2011 10:33:56",-1,-1 4,191,3268,96,-66,-11,66,11,,1,,,"""Нажата #""",,,,,, 6,155,3268,140,-22,-11,22,11,,2,,,Бип!,,,,"""Talk = BIP;""",, 9,71,3268,192,-66,-19,66,19,,3,,,"""Ранее принятый символ""",,,,"""Parametr = Bufer[0] - '0';"",""if((Parametr >= 1)&&(Parametr <= 4))Usl = 80;"",""else if(Parametr == 5)Usl = 87;"",""else if(Parametr == 6)Usl = 97;"",""else if(Parametr == 7)Usl = 111;"",""else Usl = 121;""",, 36,74,3268,233,,,,,4,8,,,,,,,,, 36,79,3422,233,,,,,5,9,,,,,,,,, 36,86,3576,233,,,,,6,10,,,,,,,,, 36,96,3730,233,,,,,7,11,,,,,,,,, 36,110,3840,233,,,,,,12,,,,,,,,, 10,80,3268,277,-22,-22,22,11,,14,,,1-4,,,,,, 10,87,3422,277,-22,-22,22,11,,15,,,5,,,,,, 10,97,3576,277,-22,-22,22,11,,16,,,6,,,,,, 10,111,3730,277,-22,-22,22,11,,17,,,7,,,,,, 10,121,3840,277,-22,-22,22,11,,13,,,Иное,,,,,, 6,130,3840,321,-22,-11,22,11,,28,,,Бип!,,,,"""Talk = BIP;"",""Time = GetTime();"",""Time -= SEKUNDA*11;""",, 13,88,3268,332,-66,-22,66,22,,20,,,Реле,Выключить,,,"Parametr--;,""Rele[Parametr ].Stop(); // остановить задание""",, 13,103,3422,332,-66,-22,66,22,,21,,,Сирена,Выключить,,,Sirena.Stop();,, 13,112,3576,332,-66,-22,66,22,,18,,,Микрофон,Выключить,,,GSM.OffMic();,, 13,123,3730,332,-66,-22,66,22,,19,,,Охрана,Выключить,,,"""WorkCmd(SLAVE_OFF,TLF,GSM.NomerMemo);""",, 18,124,3576,387,-44,-11,44,11,,22,,,"""0.5 сек""",,,,PAUZA(SEKUNDA/2);,, 18,133,3730,387,-44,-11,44,11,,23,,,"""1 сек""",,,,PAUZA(SEKUNDA);,, 13,107,3268,398,-66,-22,66,22,,24,,,Сообщить,"""Состояние реле""",,,"""Rele[Parametr ].Info(); //рассказать""",, 13,113,3422,398,-66,-22,66,22,,25,,,Сообщить,"""Состояние сирены""",,,Sirena.Info();,, 13,140,3576,442,-66,-22,66,22,,26,,,Сообщить,"""""""Микрофон выкл""""""",,,"""Talk += MIC_OFF;""",, 13,142,3730,442,-66,-22,66,22,,27,,,Сообщить,"""Состояние охраны""",,,WorkSpeakStateSys(1);,, 36,117,3268,486,,,,,25,29,,,,,,,,, 36,129,3422,486,,,,,26,,,,,,,,,, 36,169,3576,486,,,,,27,,,,,,,,,, 36,170,3730,486,,,,,28,,,,,,,,,, 36,141,3840,486,,,,,,,,,,,,,,, 5,192,3268,519,-44,-11,44,11,,,,,Конец,,,,"""goto end_block_press_resh;""",, 2,15,3,,,,,,"21.02.2011 08:30:35",-1,-1 36,25,35,60,,,,,,1,,,,,,,,, 32,55,35,93,,-11,132,17,,2,,,MainMenu.cpp,,,,,"13,1573,1863,1963,783", 36,32,35,132,,,,,,,,,,,,,,, 0,196,47,,,"block_press_zvezda:,,/*Схема,,//",,,"21.02.2011 10:34:06",-1,-1 4,199,2250,92,-66,-11,66,11,,1,,,"""Нажата *""",,,,,, 6,156,2250,136,-22,-11,22,11,,2,,,Бип!,,,,"""Talk = BIP;""",, 9,44,2250,188,-66,-19,66,19,,3,,,"""Ранее принятый символ""",,,,"""Parametr = Bufer[0] - '0';"",""if((Parametr >= 1)&&(Parametr <= 4))Usl = 58;"",""else if(Parametr == 5)Usl = 69;"",""else if(Parametr == 6)Usl = 76;"",""else if(Parametr == 7)Usl = 90;"",""else if(Parametr == 8)Usl = 114;"",""else if(Parametr == 9)Usl = 128;"",""else Usl = 149;""",, 36,48,2250,229,,,,,4,10,,,,,,,,, 36,53,2426,229,,,,,5,11,,,,,,,,, 36,62,2580,229,,,,,6,12,,,,,,,,, 36,75,2734,229,,,,,7,13,,,,,,,,, 36,89,2888,229,,,,,8,14,,,,,,,,, 36,102,3042,229,,,,,9,15,,,,,,,,, 36,127,3152,229,,,,,,16,,,,,,,,, 10,58,2250,273,-22,-22,22,11,,18,,,1-4,,,,,, 10,69,2426,273,-22,-22,22,11,,20,,,5,,,,,, 10,76,2580,273,-22,-22,22,11,,21,,,6,,,,,, 10,90,2734,273,-22,-22,22,11,,22,,,7,,,,,, 10,114,2888,273,-22,-22,22,11,,23,,,8,,,,,, 10,128,3042,273,-22,-22,22,11,,24,,,9,,,,,, 10,149,3152,273,-22,-22,22,11,,17,,,Иное,,,,,, 6,188,3152,317,-22,-11,22,11,,45,,,Бип!,,,,"""Talk = BIP;"",""Time = GetTime();"",""Time -= SEKUNDA*11;""",, 8,72,2250,325,-66,-19,66,19,19,26,,,"""Это реле оповещения?""",,,,"""Parametr--; "",""Usl = (Set.TipRele[Parametr] == RELE_UN);""",, 36,184,2338,325,,,,,,27,,,,,,,,, 13,81,2426,328,-66,-22,66,22,,28,,,Сирена,Включить,,,hard.sirena_on();,, 13,91,2580,328,-66,-22,66,22,,29,,,Сообщить,"""""""Микрофон вкл.""""""",,,"""for(char j = 0; j < 4; j++)"",{,"" if(Set.TipRele[j] == RELE_UN)Rele[j].Off();"",""} "",""Talk += MIC_ON; //прослушивание включено""",, 13,115,2734,328,-66,-22,66,22,,25,,,Охрана,Включить,,,"""if((WorkSysState == WORK_STATE_OFF)||(WorkSysState == WORK_STATE_HALF))// нет охраны или частичная"",{,"" char M;"","" M = 0;"","" for(char j = 1;j < 10;j++)if(PermissionPhone(j,PERMISSION_CALL_ALARM))M = 1;"","" for(char j = 1;j < 10;j++)if(PermissionPhone(j,PERMISSION_SMS_ALARM))M = 1;"","" if(M == 0) //пустой список дозвона"","" {"","" Talk += LIST_BLANK;// воспроизвести фразу """"список дозвона пустой"""""","" }"","" WorkCmd(SLAVE_ON,TLF,GSM.NomerMemo); // включить охрану Slave"","" Talk += ALARM_ON;"",},""else "",{,WorkSpeakStateSys(1);,}",, 13,131,2888,328,-66,-22,66,22,,43,,,Сообщить,Температуру,,,"""Parametr = GSM.Termo;"",""Talk = TERMO; //termo.pcm температура.);"",""if(Parametr < 0)"",{,"" Parametr *= -1;"","" Talk += MINUS;"",},""else if(Parametr > 0)"",{,"" Talk += PLUS;"",},""Talk.Sintez(Parametr ,GRADUS_0);""",, 13,158,3042,328,-66,-22,66,38,,44,,,Сообщить,"""Уровень сигнала "","" в антенне""",,,GSM.Level();,, 18,132,2734,383,-44,-11,44,11,,30,,,"""1 сек""",,,,PAUZA(SEKUNDA);,, 8,83,2250,385,-66,-19,66,19,27,31,,,"""Микрофон включен?""",,,,"""Usl = (GSM.FlagMic == 1);""",, 36,218,2338,385,,,,,,36,,,,,,,,, 13,95,2426,394,-66,-22,66,22,,40,,,Сообщить,"""Состояние сирены""",,,Sirena.Info();,, 13,116,2580,394,-66,-22,66,22,,32,,,Оповещение,Выключить,,,""" if(Set.TipRele[0]==RELE_UN)Rele[0].Off();"","" if(Set.TipRele[1]==RELE_UN)Rele[1].Off();"","" if(Set.TipRele[2]==RELE_UN)Rele[2].Off();"","" if(Set.TipRele[3]==RELE_UN)Rele[3].Off();""",, 13,168,2734,438,-66,-22,66,22,,42,,,Сообщить,"""Состояние охраны""",,,WorkSpeakStateSys(1);,, 13,101,2250,448,-66,-22,66,22,,33,,,Микрофон,Выключить,,,GSM.OffMic();,, 18,136,2580,449,-44,-11,44,11,,34,,,"""2 сек""",,,,PAUZA(SEKUNDA*2);,, 18,126,2250,503,-44,-11,44,11,,35,,,"""1 сек""",,,"""Время на выключение микрофона""",PAUZA(SEKUNDA);,,M 13,172,2580,504,-66,-22,66,22,,41,,,Микрофон,Включить,,,GSM.OnMic();,, 36,139,2250,536,,,,,36,37,,,,,,,,, 36,137,2338,536,,,,,,,,,,,,,,, 13,187,2250,580,-66,-22,66,22,,38,,,Реле,Включить,,,"""Rele[Parametr ].Stop(); // остановить задание"",""Rele[Parametr ].On(); // включить""",, 13,185,2250,646,-66,-22,66,22,,39,,,Сообщить,"""Состояние реле""",,,"""Rele[Parametr ].Info(); //рассказать""",, 36,138,2250,690,,,,,40,46,,,,,,,,, 36,119,2426,690,,,,,41,,,,,,,,,, 36,198,2580,690,,,,,42,,,,,,,,,, 36,195,2734,690,,,,,43,,,,,,,,,, 36,160,2888,690,,,,,44,,,,,,,,,, 36,189,3042,690,,,,,45,,,,,,,,,, 36,201,3152,690,,,,,,,,,,,,,,, 5,207,2250,723,-44,-11,44,11,,,,,Конец,,,,"""goto end_block_press_zvezda;""",, 1,1,50,,,"""#include """"main.h"""""",,""#define trassa_macro(x) // printf(""""^^A%d """",x);"",""#define trassa_macro_ns(x) // printf(""""^^A\r\n%d """",x);"",,""void classNewMenu::MainMenu(void)"",{,"" int Usl;"","" static int Parametr; "","" rt_begin;"",,/*Схема,,""////////////////////// ВСТАВКИ //////////////////////////////""",,,"21.02.2011 10:35:09",-1,-1 4,2,310,85,-66,-11,66,11,,2,,,"""Главное меню""",,,,,, 36,8,222,118,,,,,2,48,,,,,,,,, 36,3,310,118,,,,,,3,,,,,,,,, 21,4,310,175,-44,-35,44,11,,4,47,,"""Главное меню""",,,,,,C 7,5,310,227,-66,-19,66,19,,5,,,"""Ждём нажатия кнопки""",,,,"""goto block_wait_press;"",end_block_wait_press:",, 9,6,310,287,-44,-19,44,19,,6,,,"""Нажатая кнопка""",,,,"""if((SimbolDTMF >= '1')&&(SimbolDTMF <= '4'))Usl = 37;"",""else if(SimbolDTMF == '5')Usl = 39;"",""else if(SimbolDTMF == '6')Usl = 43;"",""else if(SimbolDTMF == '7')Usl = 49;"",""else if(SimbolDTMF == '8')Usl = 56;"",""else if(SimbolDTMF == '9')Usl = 61;"",""else if(SimbolDTMF == '0')Usl = 67;"",""else if(SimbolDTMF == '*')Usl = 77;"",""else if(SimbolDTMF == '#')Usl = 181;""",,M 36,33,310,328,,,,,7,15,,,,,,,,, 36,34,420,328,,,,,8,16,,,,,,,,, 36,37,530,328,,,,,9,17,,,,,,,,, 36,40,640,328,,,,,10,18,,,,,,,,, 36,46,750,328,,,,,11,19,,,,,,,,, 36,52,860,328,,,,,12,20,,,,,,,,, 36,60,970,328,,,,,13,21,,,,,,,,, 36,66,1102,328,,,,,14,22,,,,,,,,, 36,73,1177,328,,,,,,23,,,,,,,,, 10,36,310,372,-22,-22,22,11,,28,,,1-4,,,,,, 10,38,420,372,-22,-22,22,11,,29,,,5,,,,,, 10,42,530,372,-22,-22,22,11,,30,,,6,,,,,, 10,47,640,372,-22,-22,22,11,,31,,,7,,,,,, 10,54,750,372,-22,-22,22,11,,32,,,8,,,,,, 10,61,860,372,-22,-22,22,11,,33,,,9,,,,,, 10,67,970,372,-22,-22,22,11,,26,,,0,,,,,, 10,77,1102,372,-22,-22,22,11,,24,,,*,,,,,, 10,171,1177,372,-22,-22,22,11,,25,,,#,,,,,, 7,173,1102,416,-44,-11,44,11,,45,,,"""Нажата *""",,,,"""goto block_press_zvezda;"",,,end_block_press_zvezda:;",, 7,176,1177,489,-44,-11,44,11,,46,,,"""Нажата #""",,,,"""goto block_press_resh;"",,end_block_press_resh:;",, 8,152,970,424,-44,-19,44,19,27,41,,,"""Микрофон включен?""",,,,"""Usl = GSM.FlagMic;""",,M 36,174,1036,424,,,,,,34,,,,,,,,, 13,39,310,427,-44,-22,44,38,,35,,,Сказать,"""Состояние реле""",,,"""Rele[SimbolDTMF - '1'].Info();""",,M 13,43,420,427,-44,-22,44,38,,36,,,Сказать,"""Состояние сирены""",,,Sirena.Info();,,M 13,49,530,427,-44,-22,44,38,,37,,,Сказать,"""Состояние микр.""",,,"""if(GSM.FlagMic == 1)Talk += MIC_ON;"",""else Talk += MIC_OFF;""",,M 13,56,640,427,-44,-22,44,38,,38,,,Сказать,"""Состояние охраны""",,,WorkSpeakStateSys(1);,,M 13,64,750,427,-44,-22,44,38,,39,,,Сказать,"""Напряжение питания""",,,""" Parametr = Volt();// получить напряжение"","" Talk += POWER;//напряжение питания."","" Talk.Sintez(Parametr /10,0);"","" Talk += INTEG;"","" Talk.Sintez(Parametr %10,VOLT_0);""",,M 13,68,860,427,-44,-22,44,54,,40,,,Сказать,"""Баланс СИМ карточки""",,,"""if(Set.Ussd) // если разрешены запросы"",{,"" Talk += SIM;"","" Talk.Sintez(GSM.Rub,RUBL_0); // рассказать про деньги на СИМке"",},else,{,"" Talk += NO_USSD;// не задан"",}",,M 7,181,1036,484,-44,-19,44,19,,44,,,"""Меню настроек""",,,,"""goto insert_menu_set;"",end_insert_menu_set:",, 36,45,310,503,,,,,36,42,,,,,,,,, 36,50,420,503,,,,,37,,,,,,,,,, 36,57,530,503,,,,,38,,,,,,,,,, 36,65,640,503,,,,,39,,,,,,,,,, 36,70,750,503,,,,,40,,,,,,,,,, 36,154,860,503,,,,,41,,,,,,,,,, 36,175,970,503,,,,,,,,,,,,,,, 6,51,310,544,-66,-19,66,19,,43,,,"""Запомнить принятый символ""",,,,"""Bufer[0] = SimbolDTMF;""",,M 36,59,310,585,,,,,44,47,,,,,,,,, 36,183,1036,585,,,,,45,,,,,,,,,, 36,178,1102,585,,,,,46,,,,,,,,,, 36,182,1177,585,,,,,,,,,,,,,,, 22,222,310,618,-44,-11,44,35,,49,3,,"""Главное меню""",,,,,,C 36,7,222,675,,,,,49,,,,,,,,,, 36,223,310,675,,,,,,,,,,,,,,, 0,186,35,,,"insert_menu_set:,,/*Схема,,//",,,"21.02.2011 10:34:23",-1,-1 4,209,1717,89,-66,-11,66,11,,1,,,"""Меню настроек""",,,,,, 6,153,1717,133,-66,-11,110,11,,2,,,"""Включить ввод пароля""",,,,EnPassOn(Set.Pass2);,, 8,9,1717,177,-66,-11,66,11,3,4,,,"""Попыток > 3?""",,,,"""Usl = (CountRepeat > 3);""",,D 36,10,2135,177,,,,,,13,,,,,,,,, 36,11,1717,221,,,,,5,7,,,,,,,,,C 20,14,1761,221,-22,-11,66,11,6,,,,RTOS,,,,rt_free;,, 36,19,2113,221,,,,,,10,,,,,,,,, 8,16,1717,265,-66,-11,66,11,8,11,,,"""Пароль верен?""",,,,"""Usl = (StateEnPass == 1);""",, 36,20,2025,265,,,,,,9,,,,,,,,, 8,22,2025,298,-110,-11,66,11,10,12,,,"""Ещё можно вводить?""",,,,"""Usl = (StateEnPass == 0);""",,D 36,82,2113,298,,,,,,,,,,,,,,, 6,21,1717,309,-66,-11,66,11,,14,,,"""Очистить буфер""",,,,ClearBufer();,, 36,18,2025,331,,,,,13,15,,,,,,,,, 36,12,2135,331,,,,,,,,,,,,,,, 6,84,1717,353,-66,-11,110,11,,16,,,"""Включить меню настроек""",,,,"""OnMenuSet = 1;""",, 6,41,2025,364,-66,-11,66,11,,17,,,"""Очистить буфер""",,,,ClearBufer();,,M 13,93,1717,408,-66,-22,198,22,,18,,,Произнести,"""""""Вы находитесь в меню настроек""""""",,,"""Talk += MENU;"",""Talk += EN_COMM;""",, 19,85,2025,408,-66,-11,66,11,,33,,,"""TimeOne = 0""",,,,"""Time = GetTime();""",,M 19,98,1717,463,-66,-11,66,11,,19,,,"""TimeOne = 0""",,,,"""Time = GetTime();""",, 36,100,1717,507,,,,,20,22,,,,,,,,,C 20,106,1761,507,-22,-11,44,11,21,,,,RTOS,,,,rt_free;,, 36,122,2003,507,,,,,,25,,,,,,,,, 8,108,1717,551,-66,-11,110,11,23,26,,,"""Меню настроек активно?""",,,,"""Usl = OnMenuSet;""",,D 36,125,1871,551,,,,,,24,,,,,,,,, 8,146,1871,595,-66,-11,110,11,25,27,,,"""Главное меню активно?""",,,,"""Usl = MenuOn;""",,D 36,143,2003,595,,,,,,,,,,,,,,, 13,134,1717,606,-66,-22,66,38,,28,,,Произнести,"""""""Вы находитесь в главном меню""""""",,,"""Talk += MENU0; // вы находитесь в главном меню"",""Talk += EN_COMM; // введите команду""",, 6,151,1871,639,-66,-11,110,11,,29,,,"""Выключить меню настроек""",,,,"""OnMenuSet = 0;""",,M 36,135,1717,672,,,,,29,30,,,,,,,,, 36,150,1871,672,,,,,,,,,,,,,,, 6,120,1717,705,-66,-11,66,11,,31,,,"""Очистить буфер""",,,,ClearBufer();,, 19,104,1717,749,-66,-11,66,11,,32,,,"""TimeOne = 0""",,,,"""Time = GetTime();""",, 36,99,1717,782,,,,,33,34,,,,,,,,, 36,94,2025,782,,,,,,,,,,,,,,, 5,210,1717,815,-44,-11,44,11,,,,,Конец,,,,"""goto end_insert_menu_set;""",,