WINCC实现声音报警

在WINCC中实现声音报警2009-02-06 20:13先在alarm logging里把报警分类打开自定义的报警类属性有3项 "status tag" "lock tag" "acknowledge tag" 后两个没用在status tag里添加一个byte格式的tag "A"然后你可以试验一下有报警了A为0x1f 确认后为0x01然后C s cript编一下须要编一下了if(GetTagByte("OS1_ALARM") &0xf0){cc_playsound("A.wav");return 1;}此外还需要cc_playsound()和GetProjectPath()两个函数我有现成了把这两个函数复制到项目library里编译一下脚本就行了对了声音文件*.wav放在项目sound下没有的自己建一个//Project Function GetProjectPath()BOOL GetProjectPath(char* lpstrProjectPath){BOOL bRet = FALSE;char szProjectFile[_MAX_PATH+1];char* psz = NULL;CMN_ERROR Error;bRet = DMGetRuntimeProject(szProjectFile,_MAX_PATH+1,&Error);if (bRet == FALSE){return FALSE;}psz = strrchr(szProjectFile,'\');if (psz ==NULL){return FALSE;}*(psz+1) = 0;strcpy(lpstrProjectPath, szProjectFile);return TRUE;}//Project Function CC_PlaySound()#include "apdefap.h"void cc_playsound(char* lpszSoundFile){#pragma code("winmm.dll")BOOL PlaySound(LPCTSTR lpszSound, HMODULE hModule,DWORD dwSound); #define SND_FILENAME 0x00020000L#define SND_ASYNC 0x0001#define SND_LOOP 0x0008#pragma code()BOOL bRet = FALSE;char szProjectPath[_MAX_PATH];char szSoundPath[_MAX_PATH];if (lpszSoundFile == NULL){bRet=PlaySound(NULL,NULL,SND_FILENAME|SND_ASYNC);}else{GetProjectPath(szProjectPath);sprintf(szSoundPath,"%sSound%s", szProjectPath, lpszSoundFile); bRet=PlaySound(szSoundPath,NULL,SND_FILENAME|SND_ASYNC);}if (bRet == FALSE){MessageBeep((WORD)-1);}}报警可以用以下两种实现方法：1、建一个全局脚本，时基为2S#include "apdefap.h"int gscAction( void ){#pragma code("Winmm.dll")VOID WINAPI PlaySoundA(char* pszSound,char* hmode,DWORD dwFlag);#pragma code( )if(GetTagByte("TAG")==1) 或 if (GetTagByte("TAG")>500){PlaySoundA("d: ingout.wav",NULL,1);}return 0;}用以上程序就可以实现单个变量报警，开关量为1或模似量大于500都可以报警，用户可以根据自己的情况改变以上数值，如果有多个变量可以增加多个if .2、通过报警记录，先在报警记录中组态好报警记录建一个全局脚本，时基为2S#include "apdefap.h"int gscAction( void ){MSG_RTDATA_STRUCT mRT;int i;char* pszToken;//Now is my code#pragma code("Winmm.dll")BOOL WINAPI sndPlaySoundA(char* szWave,DWORD dwFlag);#pragma code()DWORD SND_ASYNC=0x0001;DWORD SND_LOOP=0x0008;DWORD alarmsum,alarmunack;LPCMN_ERROR errorunack,errorsum;#pragma code("msrtcli.dll")#pragma code()LPDWORD lpdwServiceID;MSG_SERVICE_NOTIFY_PROC lpfnNotifyProc;LPMSG_FILTER_STRUCT lpMsgFilter;DWORD dwNotifyMask;LPVOID lpvUser;LPCMN_ERROR lpError;BOOL n1;n1=MSRTGetMsgQuit(&alarmunack,errorunack);SetTagDWord("number",alarmunack);MSRTGetMsgActual(&alarmsum,errorsum);SetTagDWord("sum",alarmsum);if (alarmsum==0)sndPlaySoundA(NULL,SND_ASYNC);else{if (alarmunack>0)sndPlaySoundA("C:Program FilesWindowsNTPinballSOUND36.WAV",SND_ASYNC|SND_LOOP);elsesndPlaySoundA(NULL,SND_ASYNC);//sndPlaySoundA("C:windowsmediaoffice97laser.wav",SND_ASYNC|SND_LOOP) ;}return 1;}这个可以实现报警记录中只要有报警发生，那么就触发声音报警。

以上程序均已在WINCC5.1、WINCC6下运行通过//在菜单栏的触发器里选择周期触发250MS#include "apdefap.h"int gscAction( void ){#pragma code("winmm.dll")BOOL PlaySound(LPCTSTR lpszSound,HMODULE hmodule,DWORD dwsound );//BOOL aa=FALSE;#pragma code( )if(GetTagBit("test")==1){PlaySound("c:\\winnt\\Media\\ringout",NULL,8 );}return 0;}WinCC中如何播放声音文件（下）——播放声音文件:文章标签: wincc项目函数CC_PlaySound● 在第一部分中，集成apdefap.h文件。

通过该文件，当前项目函数也可以调用其它项目函数。

● 函数标题定义了一个字符串变量，作为传送参数。

使用该变量，可传送要播放的声音文件的名称。

● 在第二部分中，集成Windows DLL winmm。

由于只需要 DLL 的一个函数，因此直接声明该函数。

此外，还定义两个符号常量。

● 该项目函数假定项目文件夹中存在一个声音子文件夹。

在该文件夹中，存储项目中使用的声音文件。

所期望声音文件的路径包括项目路径，声音文件夹的名称以及所传送的声音文件的名称。

它将存储在变量szSoundPath中。

● 通过Windows函数PlaySound()即可播放该声音。

如果不能播放声音文件，则通过Windows函数MessageBeep()产生简短的蜂鸣声来代替声音文件。

#include "apdefap.h"void CC_PlaySound(char* lpszSoundFile){#pragma code("winmm.dll")BOOL PlaySound( LPCTSTR lpszSound,HMODULE hModule,DWORD dwSound); #define SND_FILENAME 0x00020000L#define SND_ASYNC 0x0001#pragma code()BOOL bRet = FALSE;char szProjectPath[_MAX_PATH];char szSoundPath[_MAX_PATH];GetProjectPath(szProjectPath); //Return-Type: BOOLAuthor:Smartsyssprintf( szSoundPath,"%sSound\\%s",szProjectPath,lpszSoundFile); bRet = PlaySound( szSoundPath,NULL,SND_FILENAME|SND_ASYNC);if (bRet == FALSE){MessageBeep((WORD)-1);}}。