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>0);
N4:=IF(SSTS
MAV200:=EMA(VOL,N4);
QD1:=IF(MAVOL1>=MAVOL2,10,0);
{STICKLINE(MAVOL1>=MAVOL2,66,70,3,0),COLORYELLOW;
STICKLINE (MAVOL1
STICKLINE(VOLUME>=2*REF(VOLUME,1) AND C>=REF(C,1),60,95,1,0),COLORYELLOW;
STICKLINE(VOLUME>=2*REF(VOLUME,1) AND C
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
(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE
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:=资金流量>0;
{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
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
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
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);
 

源码有点长未粘贴完,下载附件.....