Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
Список использованных источников. [1] ОАО Беларуськалий – [электронный ресурс] – Электронные данные
|
|
[1] ОАО Беларуськалий – [электронный ресурс] – Электронные данные. Режим доступа – http://www.kali.by/russian/bel_main.html
[2] Ru – o – [электронный ресурс] – Электронные данные. Режим доступа http://ru – 0.ru/tehnika_bezopasnosti.php
[3] Эксплуатация шахтных подъемных установок – [электронный ресурс] – Электронные данные. Режим доступа – www.vetlan.ru/rpu.php
[4] Единые правила безопасности – [электронный ресурс] – Электронные данные. Режим доступа – aquagroup.ru/normdocs/16250
[5] Регистратор параметров работы – [электронный ресурс] – Электронные данные. Режим доступа – www.vetlan.ru/rpu.pdf
[6] Tera – [электронный ресурс] – Электронные данные. Режим доступа – http://www.terra.su/full/004.html
[7] Методика контроля подшипников – [электронный ресурс] – Электронные данные. Режим доступа – http://www.turbinist.ru/706 – metodika– kontrolya – podshipnikov.html
[8] Автоматизированные системы контроля – [электронный ресурс] – Электронные данные. Режим доступа – http://www.keytrade.by/rus/catalogue/
[9] Обзор WinCC – [электронный ресурс] – Электронные данные. Режим доступа – www.ste.ru/siemens/pdf/rus/WinCC_overview_2006
[10] Википедия – [электронный ресурс] – Электронные данные. Режим доступа http://ru.wikipedia.org/wiki/Simatic_WinCC
[11] Rutracker – [электронный ресурс] – Электронные данные. Режим доступа http://rutracker.org/forum/viewtopic.php?t=1497565
[12] Stella – [электронный ресурс] – Электронные данные. Режим доступа http://www.ste.ru/siemens/wincc– flex.html
ПРИЛОЖЕНИЕ А
(обязательное)
ТЕКСТ ПРОГРАММЫ
Вызов диспетчера задач.
{
ProgramExecute("taskmgr.exe");
}
Вызов проводника.
{
HWND Handle= NULL;
Handle= FindWindow("ExploreWClass",NULL);
if(Handle)
{
ShowWindow (Handle, SW_SHOWNORMAL);
SetForegroundWindow(Handle);}
else
ProgramExecute("explorer.exe");
}
Вызов калькулятора
{
ProgramExecute("calc.exe");
}
Отчёт
{
RPTJobPreview("Report Alarm Logging RT OnlineMessages New"); }
Сохранение изменений времени в трендах.
{
#define PictureWindow "PictureWindow_Schema"
#define PictureWindowRefresh"black.pdl"
int i;
char *Pic_Name;
char ss_end [20], ss_begin [20];
char *PictureWindowMain; //имя основной картинки
int Color_Control1;
Pic_Name = GetPropChar
("Startuem.pdl",PictureWindow, "PictureName");
sprintf(ss_begin,"%s",
GetPropChar(lpszPictureName,"Control_data","Value"));
sprintf(ss_end,"%s",
GetPropChar(lpszPictureName,"Control_data1","Value"));
for(i=0; i<6; i++)
{
SetPropWord(Pic_Name,"Control1","TimeColumnIndex",i);
SetPropChar(Pic_Name,"Control1","TimeColumnBeginTime",)
SetPropChar(Pic_Name,"Control1","TimeColumnEndTime",
ss_end);
}
SetPropBOOL(Pic_Name,"PictureWindow_set_time","Visible",0); //Return– Type:BOOL
}
Применение изменений времени к трендам.
{
#define PictureWindow "PictureWindow_Schema"
#define PictureWindowRefresh"black.pdl"
int i;
char *Pic_Name;
char ss_end [20], ss_begin [20];
char *PictureWindowMain;
//имя основной картинки
int Color_Control1;
Pic_Name=GetPropChar
("Startuem.pdl",PictureWindow, "PictureName");
sprintf(ss_begin,"%s", GetPropChar(lpszPictureName,"Control_data","Value"));
sprintf(ss_end,"%s", GetPropChar(lpszPictureName,"Control_data1","Value"));
for(i=0; i<6; i++)
{
SetPropWord(Pic_Name,"Control1","TimeColumnIndex",i); SetPropChar(Pic_Name,"Control1","TimeColumnBeginTime",ss_begin); SetPropChar(Pic_Name,"Control1","TimeColumnEndTime",ss_end
}
// останавливаем сдвижку
SetPropBOOL(Pic_Name,"Control1","Online", FALSE);
// обновление экрана (вызов black.pdl)
SetPropWord(Pic_Name,"Control1","RTPersistence",1);
SetPropChar(PictureWindowMain,PictureWindow,"PictureNam
PictureWindowRefresh);
//Return– Type:BOOL
SetPropChar
(PictureWindowMain,PictureWindow,"PictureNae",Pic_Name);
}
Квитирование аварий.
{
//#define TagNameInAction "for_sound_alarm"
//гашение звука колонок
//#define TagNameInAction2 "Alarm_horn"
//гашение звука сирены
int i;
for(i=1;i<=77;i++)
AcknowledgeMessage(i);
//SetTagWord(TagNameInAction,0);
//SetTagBit(TagNameInAction2,0);
}
Остановка проекта.
{
DeactivateRTProject ();
//Return– Type: BOOL
}
Тренды дискретных переменных
#include "apdefap.h"
void OnLoaded(char* lpszPictureName, char* lpszObjectName)
{
SetPropWord(lpszPictureName,"Control1","TimeColumnIndex",0);
SetPropChar(lpszPictureName,"IOField1","OutputValue",GetPropChar(lpszPictureName,"Control1","TimeColumnBeginTime")); //Return– Type: BOOL
SetPropChar(lpszPictureName,"IOField2","OutputValue",GetPropChar(lpszPictureName,"Control1","TimeColumnEndTime")); //Return– Type: BOOL
}
{
#define PictureWindowRefresh"black.pdl"
char *Pic_Name;
//имя файла картинки с расширением
char *Pic_Name_short;
//имя файла картинки без расширения
char *PictureWindow;
//имя PictureWindow, куда вложен данный pdl файл
char *PictureWindowMain;
//имя основной картинки
int Color_Control1;
Pic_Name_short=GetLocalPicture(lpszPictureName);
//имя файла картинки без расширения
//printf("Pic_Name_short=%s \r\n",Pic_Name_short);
if (lId==1001)
{
char patch [256];
char szProjektname [256];
DM_DIRECTORY_INFO dmDirInfo;
CMN_ERROR dmError;
char ss [512];
if (! DMGetRuntimeProject (szProjektname, sizeof (szProjektname)– 1, &dmError))
{
printf("DMGetRuntimeProject not successful: %s", dmError.szErrorText);
return;
}
memset(&dmDirInfo, 0, sizeof(DM_DIRECTORY_INFO));
if (!DMGetProjectDirectory("PDLRT", szProjektname, &dmDirInfo, &dmError)){
printf("DMGetProjectDirectory not successful: %s", dmError.szErrorText);
return;}
sprintf(patch,"%s",dmDirInfo.szProjectDir);
sprintf(ss,"%sdic\\list_table_v7.exe %sdic\\arch_discr.dicControl1%s\0",patch,patch,lpszPictureName);//имя файла списка задано явно
rogramExecute(ss);
}
if (lId==11)
//вызов окна выбора времени
{
SetPropBOOL(lpszPictureName,"PictureWindow_set_time","Visible",1);
}
if (lId==15)// печать экрана
{
//Activating "YES" returns the value "6", "NO" returns the value "7" and "CANCEL" returns the value "2".
//MessageBox(NULL,"Печатать секундные тренды? \n\n\n\r [ Да] [ Нет ]","Печать экрана", //если не установлен русский MUI
if (MessageBox(NULL,"Получить копию экрана?","Копия экрана", MB_YESNO|MB_ICONQUESTION|MB_SYSTEMMODAL|MB_DEFBUTTON2)==6)
{
Color_Control1=
GetPropWord(lpszPictureName,"Control1","BackColor");
SetPropWord
(lpszPictureName,Pic_Name_short,"BackColor",CO_WHITE);
SetPropWord
(lpszPictureName,"Control1","BackColor",CO_WHITE);
Sleep(1000);
WinExec("PRTSCR.EXE – hardcopy",SW_SHOWNORMAL);
SetPropWord
(lpszPictureName,Pic_Name_short,"BackColor",CO_BLACK);
SetPropWord
(lpszPictureName,"Control1","BackColor",Color_Control1)
}
// обновление экрана (вызов black.pdl)
if (lId==10)
{
SetPropWord
(lpszPictureName,"Control1","RTPersistence",1);
PictureWindow=GetParentPictureWindow(lpszPictureName);
//имя PictureWindow, куда вложен данный pdl файл
Pic_Name=GetPropChar
(PictureWindowMain,PictureWindow,"PictureName"););
//раскоротить, если нужно при обновлении вернуться к исходным настройкам свойств
SetPropChar
(PictureWindowMain,PictureWindow,"PictureName",Picture WindowRefresh);
//Return– Type:BOOL
SetPropChar
(PictureWindowMain,PictureWindow,"PictureName",Pic_Na);
//SetPropWord
(lpszPictureName,"Control1","RTPersistence",1);
//раскоротить, если нужно при обновлении вернуться к исходным настройкам свойств
// при уходе с картинки и возвращении последние свойства сбрасываться не будут (для экспериментов)
}
}
Исторические часовые тренды.
{
SetPropWord
(lpszPictureName,"Control1","TimeColumnIndex",0);
SetPropChar
(lpszPictureName,"IOField1","OutputValue",
GetPropChar
(lpszPictureName,"Control1","TimeColumnBeginTime"));
//Return– Type: BOOL
SetPropChar
(lpszPictureName,"IOField2","OutputValue",GetPropChar
(lpszPictureName,"Control1","TimeColumnEndTime"));
//Return– Type: BOOL
}
#include "apdefap.h"
void OnToolbarButtonClicked(char* lpszPictureName, char* lpszObjectName, long lId)
{#pragma code ("kernel32.dll")
VOID WINAPI Sleep (DWORD dwMilliseconds);
#pragma code()
// WINCC:PICNAME_SECTION_START
#define PictureWindowRefresh"black.pdl"
// WINCC:PICNAME_SECTION_END
char *Pic_Name;
//имя файла картинки с расширением
char *Pic_Name_short;
//имя файла картинки без расширения
char *PictureWindow;
//имя PictureWindow, куда вложен данный pdl файл
char *PictureWindowMain;
//имя основной картинки
int Color_Control1;
Pic_Name_short=GetLocalPicture(lpszPictureName);
if (lId==1001)
{
char patch [256];
char szProjektname [256];
DM_DIRECTORY_INFO dmDirInfo;
CMN_ERROR dmError;
char ss [512];
if (!DMGetRuntimeProject(szProjektname, sizeof
(szProjektname)– 1, &dmError))
{
printf("DMGetRuntimeProject not successful: %s", dmError. szErrorText);
return;
}
memset(&dmDirInfo, 0, sizeof(DM_DIRECTORY_INFO));
if (!DMGetProjectDirectory("PDLRT", szProjektname, &dmDirInfo, &dmError))
{
Printf (" DMGetProjectDirectory not successful: %s", dmError.szErrorText);
return;
}
sprintf(patch,"%s",dmDirInfo.szProjectDir);
sprintf(ss,"%sdic\\list_table_v7.exe %sdic\\arch_hour.dic Control1 %s \0",patch,patch,lpszPictureName); //имя файла списка задано явно
ProgramExecute(ss);
}
if (lId==11) //вызов окна выбора времени
{
SetPropBOOL(lpszPictureName,"PictureWindow_set_time","Visible",1);
}
if (lId==15)// печать экрана
{
//Activating "YES" returns the value "6", "NO" returns the value "7" and "CANCEL" returns the value "2".
//MessageBox(NULL,"Печатать секундные тренды? \n\n\n\r [ Да] [ Нет ]","Печать экрана",
//если не установлен русский MUI
if(MessageBox(NULL,"Получить копию экрана?","Копия экрана", MB_YESNO|MB_ICONQUESTION|MB_SYSTEMMODAL|MB_DEFBUTTON2)==6)
{
Color_Control1= GetPropWord
(lpszPictureName,"Control1","BackColor");
SetPropWord
(lpszPictureName,Pic_Name_short,"BackColor",CO_WHITE);
SetPropWord(lpszPictureName,"Control1","BackColor",CO_WHITE)
Sleep(1000);
WinExec("PRTSCR.EXE – hardcopy",SW_SHOWNORMAL);
SetPropWord
(lpszPictureName,Pic_Name_short,"BackColor",CO_BLACK);
SetPropWord
(lpszPictureName,"Control1","BackColor",Color_Control1)
}
}
// обновление экрана (вызов black.pdl)
if (lId==10)
{
SetPropWord
(lpszPictureName,"Control1","RTPersistence",1);
PictureWindowMain=GetParentPicture(lpszPictureName);
PictureWindow=GetParentPictureWindow(lpszPictureName
Pic_Name=GetPropChar
(PictureWindowMain,PictureWindow,"PictureName");
SetPropWord
(lpszPictureName,"Control1","RTPersistence",1);
//раскоротить, если нужно при обновлении вернуться к исходным настройкам свойств }
Date: 2016-05-23; view: 821; Нарушение авторских прав