input:p(26,20,100,8);
input:s(12,5,40,4);
input:m(9,2,60,6);
DIFF := EMA(CLOSE,S) - EMA(CLOSE,P);
DEA := EMA(DIFF,M);
MACD : =2*(DIFF-DEA), COLORSTICK;
shang:=ref(h,1)>ref(h,2) and ref(h,3)>ref(h,2) and diff>0 ;
xia:=ref(l,1)<ref(l,2) and ref(l,3)<ref(l,2) and diff<0;
DRAWTEXT( ref(l,1)<ref(l,2) and ref(l,2)>ref(l,3) and diff<0 ,l ,'低点预警' ,colorblue );
DRAWTEXT( ref(h,1)>ref(h,2) and ref(h,2)<ref(h,3) and diff>0 ,h ,'高点预警' ,colorred );
//diff1:= ref(l,1)<ref(l,2) and ref(l,3)<ref(l,2);
//diff2:= ref(h,1)>ref(h,2) and ref(h,3)>ref(h,2);
//DRAWsl( diff1 and diff<0 ,l ,0 ,2 ,1 );
//DRAWsl( diff2 and diff>0 ,h ,0 ,2 ,3 );
//EXPLAIN(shang, '低点预警\n')
//EXPLAIN(xia, '高点预警\n')
//PLAYSOUND(shang,'d:\Order3.wav'),ALLOWREPEAT;
//PLAYSOUND(xia,'d:\OrderOK.wav'),ALLOWREPEAT;
EXTGBDATASET('gaoyu',barpos); //存地址
IF BarPos<>EXTGBDATA("gaoyu") THEN
BEGIN
PLAYSOUND(shang,'d:\Order3.wav'); //播放音效文件
EXTGBDATASET("gaoyu",BarPos);//给自定义的全局变量重新赋值
END
EXTGBDATASET('diyu',barpos); //存地址
IF BarPos<>EXTGBDATA("diyu") THEN
BEGIN
PLAYSOUND(xia,'d:\OrderOK.wav'); //播放音效文件
EXTGBDATASET("diyu",BarPos);//给自定义的全局变量重新赋值
END