通达信源码【趋势共振】黄金坑底主力出现

N:=14;

MM:=6;

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,DYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;

HAN:=DATE<1141230;

ZBHJ1:=IF(WINNER(CLOSE),WINNER(CLOSE)*100,0);

DRAWKLINE(H,O,L,C);

ZBHJ2:=(COST(95)-COST(5))/(COST(95)+COST(5))*100;

ZBHJ3:COST(ZBHJ2),LINETHICK2,COLORMAGENTA;

入1:IF(ZBHJ3>REF(ZBHJ3,1),ZBHJ3,DRAWNULL),COLORRED,LINETHICK2;

出1:IF(ZBHJ3<REF(ZBHJ3,1),ZBHJ3,DRAWNULL),COLORGREEN,LINETHICK2;

STICKLINE(ZBHJ3>LOW AND ZBHJ3<HIGH,ZBHJ3,MIN(MIN(OPEN,CLOSE),ZBHJ3),3.2,0)*HAN,COLOR0077FF;

STICKLINE(ZBHJ3>LOW AND ZBHJ3<HIGH,ZBHJ3,MIN(MIN(OPEN,CLOSE),ZBHJ3),2.5,0)*HAN,COLOR0099FF;

STICKLINE(ZBHJ3>LOW AND ZBHJ3<HIGH,ZBHJ3,MIN(MIN(OPEN,CLOSE),ZBHJ3),1.9,0)*HAN,COLOR00BBFF;

STICKLINE(ZBHJ3>LOW AND ZBHJ3<HIGH,ZBHJ3,MIN(MIN(OPEN,CLOSE),ZBHJ3),1.2,0)*HAN,COLOR00DDFF;

STICKLINE(ZBHJ3>LOW AND ZBHJ3<HIGH,ZBHJ3,MIN(MIN(OPEN,CLOSE),ZBHJ3),0.3,0)*HAN,COLOR00FFFF;

STICKLINE(ZBHJ3>MIN(C,O) AND ZBHJ3<MAX(C,O),ZBHJ3,MIN(OPEN,CLOSE),3.2,0)*HAN,COLOR0077FF;

STICKLINE(ZBHJ3>MIN(C,O) AND ZBHJ3<MAX(C,O),ZBHJ3,MIN(OPEN,CLOSE),2.5,0)*HAN,COLOR0099FF;

STICKLINE(ZBHJ3>MIN(C,O) AND ZBHJ3<MAX(C,O),ZBHJ3,MIN(OPEN,CLOSE),1.9,0)*HAN,COLOR00BBFF;

STICKLINE(ZBHJ3>MIN(C,O) AND ZBHJ3<MAX(C,O),ZBHJ3,MIN(OPEN,CLOSE),1.2,0)*HAN,COLOR00DDFF;

STICKLINE(ZBHJ3>MIN(C,O) AND ZBHJ3<MAX(C,O),ZBHJ3,MIN(OPEN,CLOSE),0.3,0)*HAN,COLOR00FFFF;

STICKLINE(ZBHJ3>HIGH,CLOSE,OPEN,3.2,0)*HAN,COLOR0077FF;

STICKLINE(ZBHJ3>HIGH,CLOSE,OPEN,2.5,0)*HAN,COLOR0099FF;

STICKLINE(ZBHJ3>HIGH,CLOSE,OPEN,1.9,0)*HAN,COLOR00BBFF;

STICKLINE(ZBHJ3>HIGH,CLOSE,OPEN,1.2,0)*HAN,COLOR00DDFF;

STICKLINE(ZBHJ3>HIGH,CLOSE,OPEN,0.3,0)*HAN,COLOR00FFFF;

STICKLINE(ZBHJ3>HIGH,HIGH,LOW,0,0),COLORGREEN;

DF2:=(C-REF(C,1))/REF(C,1)*100>5;

DF3:=(C-O)/O*100>4;

当天涨幅:(C-O)/O*100,NODRAW;

V型反转:=L<ZBHJ3 AND DF2;

V型反转2:=CROSS(C,ZBHJ3) AND DF2;

V型反转3:=L<ZBHJ3 AND DF3;

DRAWTEXT(V型反转,L*0.98,'↖主力'),COLORCYAN;

DRAWTEXT(V型反转2,L*0.98,'↖主力'),COLORCYAN;

DRAWTEXT(V型反转3,L*0.98,'↖主力'),COLORCYAN;

STICKLINE(V型反转=1,C,O,3.2,0),COLORRED;

STICKLINE(V型反转2=1,C,O,3.2,0),COLORRED;

STICKLINE(V型反转3=1,C,O,3.2,0),COLORRED;

ZBHJ:=EMA(WINNER(CLOSE)*70,3);

ZBHJM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);

ZBHJL:=ZBHJM/(ZBHJ+ZBHJM)*100;

ZZLKP:=ZBHJ/(ZBHJ+ZBHJM)*100;

ZCMZL:=MA(ZBHJ+ZBHJM,13);

ZZNTS:=BARSLAST(ZBHJL<90 AND REF(ZBHJL,1)>90);

ZSHJJ:=EMA(ZBHJL,89);

ZZLJJ:=EMA(ZZLKP,89);

ZJLRQD:=INTPART(ZZLKP-ZZLJJ);

SH8:=EMA(ZBHJL,8);

DKB:=IF(ZZLKP-REF(ZZLKP,1) > ZBHJL-REF(ZBHJL,1),1,0);

STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZBHJL,ZSHJJ,2,0),COLOR00FF00;

STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,2,0),COLORRED;

散户:INTPART(ZBHJL),COLORCYAN,LINETHICK1;

主力:INTPART(ZZLKP),COLORWHITE,LINETHICK1;

无