关于预警修改 (文华财经WH6赢顺V6.7)

投资者咨询:关于预警修改 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-8-29 12:09
 老师 您好
帮忙把下面这个指标做个预警 这个预警要求信号出来的时候只预警一次,我现在做的这个是一直在预警
DRAWGBK(C>0,RGB(60,0,0),RGB(0,0,0),0);
CC:=H;
N:=25; 
AA:=REFX(MA(CC,N),N/2); 
AA1:=IF(ISNULL(AA),MA(CC,N-INTPART(N/2)),AA); 
BB:=REFX(MA(CC,N),N/2-1); 
BB1:=IF(ISNULL(BB),MA(C,N-(N/2-1)),BB); 
B:=IF(MOD(N,2)<>0,AA1,BB1);
LAA:=REFX(MA(L,N),N/2); 
LAA1:=IF(ISNULL(LAA),MA(L,N-INTPART(N/2)),LAA); 
LBB:=REFX(MA(L,N),N/2-1); 
LBB1:=IF(ISNULL(LBB),MA(C,N-(N/2-1)),LBB); 
LB:=IF(MOD(N,2)<>0,LAA1,LBB1);
XX:=B;
XAA:=REFX(MA(XX,N),N/2); 
XAA1:=IF(ISNULL(XAA),MA(XX,N-INTPART(N/2)),XAA); 
XBB:=REFX(MA(XX,N),N/2-1); 
XBB1:=IF(ISNULL(XBB),MA(C,N-(N/2-1)),XBB); 
XB:=IF(MOD(N,2)<>0,XAA1,XBB1);
SS:=LB;
SAA:=REFX(MA(SS,N),N/2); 
SAA1:=IF(ISNULL(SAA),MA(L,N-INTPART(N/2)),SAA); 
SBB:=REFX(MA(SS,N),N/2-1); 
SBB1:=IF(ISNULL(SBB),MA(C,N-(N/2-1)),SBB); 
SB:=IF(MOD(N,2)<>0,SAA1,SBB1);
金牛:(XB-SB)*1+XB,CROSSDOT,COLORYELLOW,LINETHICK4;
金钻趋势:SB-(XB-SB)*1,LINETHICK2,COLORRED;
金牛2:EMA(金钻趋势,25),COLORCYAN;
FILLRGN1 (金钻趋势>金牛2,金牛2,金钻趋势),RGB(55,0,0);
FILLRGN1 (金钻趋势<金牛2,金牛2,金钻趋势),RGB(0,91,0);
STICKLINE(金钻趋势>LOW AND 金钻趋势<HIGH,金钻趋势,L,2,0),COLORYELLOW;
PLAYSOUND(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),'B');

STICKLINE(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
PLAYSOUND(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),'B');

STICKLINE(金钻趋势>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;

STICKLINE(金钻趋势>HIGH,HIGH,LOW,0,0),COLORYELLOW;

STICKLINE(金牛<H AND 金牛<C,金牛,H,2,0),COLORYELLOW;
PLAYSOUND( 金牛<H,'B');
STICKLINE(金牛<H,金牛,H,2,0),COLORYELLOW;
PLAYSOUND( 金牛<H,'B');
STICKLINE(金牛<MIN(C,O) AND 金牛<MAX(C,O),金牛,MAX(C,O),2,0),COLORYELLOW;
PLAYSOUND(金牛<MIN(C,O),'B');

DD:=C-REF(C,1);
N1:=6;
DAA:=REFX(MA(DD,N1),N1/2); 
DAA1:=IF(ISNULL(DAA),MA(DD,N1-INTPART(N1/2)),DAA); 
DBB:=REFX(MA(DD,N1),N1/2-1); 
DBB1:=IF(ISNULL(DBB),MA(C,N1-(N1/2-1)),DBB); 
DB:=IF(MOD(N1,2)<>0,DAA1,DBB1);
KK:=DB;
KAA:=REFX(MA(KK,N1),N1/2); 
KAA1:=IF(ISNULL(KAA),MA(KK,N-INTPART(N1/2)),KAA); 
KBB:=REFX(MA(KK,N1),N1/2-1); 
KBB1:=IF(ISNULL(KBB),MA(C,N1-(N1/2-1)),KBB); 
KB:=IF(MOD(N1,2)<>0,KAA1,KBB1);
VAR23:=100*KB/ABS(KB);
回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;
DRAWTEXT(XG,L,'▲买入'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
CAPITAL:=GETPRICE1('总股本');
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK1;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=DAYSTOEXPIRED('CODE ')=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;
DRAWTEXT(XG2,L,'▲抓牛'),COLORYELLOW;
DRAWTEXT(XG2 AND L<金钻趋势,L,'�金钻起涨'),COLORMAGENTA;
DRAWKLINE1(H,O,L,C);

技术人员回复
日期:2018-8-29 13:15
 这么改下试试

DRAWGBK(C>0,RGB(60,0,0),RGB(0,0,0),0);
CC:=H;
N:=25; 
AA:=REFX(MA(CC,N),N/2); 
AA1:=IF(ISNULL(AA),MA(CC,N-INTPART(N/2)),AA); 
BB:=REFX(MA(CC,N),N/2-1); 
BB1:=IF(ISNULL(BB),MA(C,N-(N/2-1)),BB); 
B:=IF(MOD(N,2)<>0,AA1,BB1);
LAA:=REFX(MA(L,N),N/2); 
LAA1:=IF(ISNULL(LAA),MA(L,N-INTPART(N/2)),LAA); 
LBB:=REFX(MA(L,N),N/2-1); 
LBB1:=IF(ISNULL(LBB),MA(C,N-(N/2-1)),LBB); 
LB:=IF(MOD(N,2)<>0,LAA1,LBB1);
XX:=B;
XAA:=REFX(MA(XX,N),N/2); 
XAA1:=IF(ISNULL(XAA),MA(XX,N-INTPART(N/2)),XAA); 
XBB:=REFX(MA(XX,N),N/2-1); 
XBB1:=IF(ISNULL(XBB),MA(C,N-(N/2-1)),XBB); 
XB:=IF(MOD(N,2)<>0,XAA1,XBB1);
SS:=LB;
SAA:=REFX(MA(SS,N),N/2); 
SAA1:=IF(ISNULL(SAA),MA(L,N-INTPART(N/2)),SAA); 
SBB:=REFX(MA(SS,N),N/2-1); 
SBB1:=IF(ISNULL(SBB),MA(C,N-(N/2-1)),SBB); 
SB:=IF(MOD(N,2)<>0,SAA1,SBB1);
金牛:(XB-SB)*1+XB,CROSSDOT,COLORYELLOW,LINETHICK4;
金钻趋势:SB-(XB-SB)*1,LINETHICK2,COLORRED;
金牛2:EMA(金钻趋势,25),COLORCYAN;
FILLRGN1 (金钻趋势>金牛2,金牛2,金钻趋势),RGB(55,0,0);
FILLRGN1 (金钻趋势<金牛2,金牛2,金钻趋势),RGB(0,91,0);
STICKLINE(金钻趋势>LOW AND 金钻趋势<HIGH,金钻趋势,L,2,0),COLORYELLOW;
PLAYSOUND(CROSS(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),0.5),'B');
STICKLINE(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
PLAYSOUND(CROSS(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),0.5),'B');
STICKLINE(金钻趋势>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(金钻趋势>HIGH,HIGH,LOW,0,0),COLORYELLOW;
STICKLINE(金牛<H AND 金牛<C,金牛,H,2,0),COLORYELLOW;
STICKLINE(金牛<H,金牛,H,2,0),COLORYELLOW;
STICKLINE(金牛<MIN(C,O) AND 金牛<MAX(C,O),金牛,MAX(C,O),2,0),COLORYELLOW;
DD:=C-REF(C,1);
N1:=6;
DAA:=REFX(MA(DD,N1),N1/2); 
DAA1:=IF(ISNULL(DAA),MA(DD,N1-INTPART(N1/2)),DAA); 
DBB:=REFX(MA(DD,N1),N1/2-1); 
DBB1:=IF(ISNULL(DBB),MA(C,N1-(N1/2-1)),DBB); 
DB:=IF(MOD(N1,2)<>0,DAA1,DBB1);
KK:=DB;
KAA:=REFX(MA(KK,N1),N1/2); 
KAA1:=IF(ISNULL(KAA),MA(KK,N-INTPART(N1/2)),KAA); 
KBB:=REFX(MA(KK,N1),N1/2-1); 
KBB1:=IF(ISNULL(KBB),MA(C,N1-(N1/2-1)),KBB); 
KB:=IF(MOD(N1,2)<>0,KAA1,KBB1);
VAR23:=100*KB/ABS(KB);
回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;
DRAWTEXT(XG,L,'▲买入'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
CAPITAL:=GETPRICE1('总股本');
FROMOPEN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK1;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=DAYSTOEXPIRED('CODE ')=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;
DRAWTEXT(XG2,L,'▲抓牛'),COLORYELLOW;
DRAWTEXT(XG2 AND L<金钻趋势,L,'�金钻起涨'),COLORMAGENTA;
DRAWKLINE1(H,O,L,C);