W:=10;
W2:=6;
W3:=1;
N1:=60;
TS:=3;
80,COLORBLacK;
45,COLORYELLOW;
30,COLORLIRED;
volUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
SSTS:=BARSSINCE(C
N4:=IF(SSTS N1,SSTS,N1);
MAV200:=EMA(VOL,N4);
QD1:=IF(MAVOL1 =MAVOL2,10,0);
{STICKLINE(MAVOL1 =MAVOL2,66,70,3,0),COLORYELLOW;
STICKLINE (MAVOL1 MAVOL2,66,70,3,1),COLOR333333;
STICKLINE(VOLUME =2*REF(VOLUME,1) AND C =REF(C,1),60,95,1,0),COLORYELLOW;
STICKLINE(VOLUME =2*REF(VOLUME,1) AND C REF(C,1),60,95,1,0),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=W3,68,'★量'),COLORFFFFFF;}
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN));
XVL:=IF(CLOSE OPEN,QJJ*(HIGH-LOW),IF(CLOSE OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF
(CLOSE OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE OPEN,0-QJJ*(HIGH-LOW),0-VOL/2));
HSL:=(XVL/20)/1.15;
攻击流量:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
GJJ:=EMA(攻击流量,8);
LLJX:=EMA(攻击流量,3);
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
A10:=资金流量
{STICKLINE(资金流量 =0,72,76,3,0),COLORLIRED;
STICKLINE (资金流量 0,72,76,3,1),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=W3,74,'★流'),COLORFFFFFF;}
QD2:=IF(资金流量 =0,10,0);
DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);
DEA60:=EMA(DIF60,9/2);
{STICKLINE(DIF60 =DEA60,54,58,3,0),COLORYELLOW;
STICKLINE(DIF60 DEA60,54,58,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,56,'★60M'),COLORFFFFFF;}
QD3:=IF(DIF60 =DEA60,10,0);
RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));
K60:=SMA(RSV60,3,1);
D60:=SMA(K60,3,1);
{STICKLINE(K60 = D60,60,64,3,0),COLORRED;
STICKLINE(K60 D60,60,64,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,62,'★60K '),COLORWHITE;}
QD4:=IF(K60 = D60,10,0);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
{STICKLINE(DIF =DEA,48,52,3,0),COLORYELLOW;
STICKLINE(DIF DEA,48,52,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,50,'★日M'),COLORFFFFFF;}
QD5:=IF(DIF =DEA,10,0);
周MD:=macd.DIF#WEEK;
周MA:=MACD.DEA#WEEK;
{STICKLINE(周MD =周MA,30,34,3,0),COLORYELLOW;
STICKLINE(周MD 周MA,30,34,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,32,'★周M'),COLORFFFFFF;}
QD6:=IF(周MD =周MA,10,0);
月MD:=MACD.DIF#MONTH;
月MA:=MACD.DEA#MONTH;
{STICKLINE(月MD =月MA,12,16,3,0),COLORYELLOW;
STICKLINE(月MD 月MA,12,16,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,14,'★月M'),COLORFFFFFF;}
QD7:=IF(月MD =月MA,10,0);
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12));
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
{STICKLINE(K =D,42,46,3,0),COLORLIRED;
STICKLINE(K D,42,46,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,44,'★日K'),COLORFFFFFF;}
QD8:=IF(K =D,10,0);
周K:=MA( kdj.K#WEEK (9,3,3) ,5);
周D:=MA( kdJ.D#WEEK (9,3,3) ,5);
周J:=MA( KDJ.J#WEEK (9,3,3) ,5);
{STICKLINE(周K =周D,24,28,3,0),COLORLIRED;
STICKLINE(周K 周D,24,28,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,26,'★周K'),COLORFFFFFF;}
QD9:=IF(周K =周D,10,0);
源码有点长未粘贴完,下载附件.....
