相關標簽:同花順主力拉升源碼 、 主力籌碼指標公式源碼 、 主力持倉指標源碼公式 、 主力資金指標公式源碼 、 主力狀態指標公式源碼 、 主力倉位指標公式源碼 、 主力出貨指標公式源碼 、 同花順分時指標源碼 、 主力買賣指標公式源碼 、 同花順主圖公式源碼 、 主力監控指標公式源碼 、 主力意愿指標公式源碼 、 主力建倉源碼指標公式 、 主力散戶指標公式源碼 、

?

?

原理解析：
PJJ賦值:以0.9為權重(((最高價+最低價)+(收盤價*2))/4)的動態移動平均 JJ賦值:1日前的PJJ的3日指數移動平均 QJJ賦值:(成交量(手) / (((最高價 - 最低價) * 2) - (收盤價-開盤價)的絕對值)) XVL賦值:(如果(收陽線),返回(QJJ*(最高價-最低價)),否則返回如果(收陰線),返回(QJJ*((最高價-開盤價)+(收盤價-最低價))),否則返回(成交量(手)/2) + 如果(收陽線),返回(0-(QJJ*((最高價-收盤價)+(開盤價-最低價)))),否則返回如果(收陰線),返回(0-(QJJ*(最高價-最低價))),否則返回(0-(成交量(手)/2))) ZLL賦值:(成交量(手) / 當前流通股本(手)) HSL1賦值:如果(ZLL>10),返回10,否則返回ZLL HSL賦值:((XVL / 20) / 1.15) 攻擊流量賦值:(((HSL * 0.55) + (1日前的HSL * 0.33)) + (2日前的HSL * 0.22)) GJJ賦值:攻擊流量的8日指數移動平均 LLJX賦值:攻擊流量的3日指數移動平均 當滿足條件((HSL*0.4)>=0)時,在((HSL*0.4)+LLJX)和0位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00FFFF 當滿足條件((HSL*0.4)<0)時,在((HSL*0.4)+LLJX)和0位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00FF00 資金流入賦值:如果(HSL*0.4+LLJX)>0,返回(HSL*0.4+LLJX),否則返回無效數,畫紅色 資金流出賦值:如果(HSL*0.4+LLJX)<0,返回(HSL*0.4+LLJX),否則返回無效數,COLOR00FF00 資金進出賦值:(HSL*0.4+LLJX),線寬為0 萬元賦值:成交額(元)/10000,VOLSTICK,COLORFF00FF 輸出資金凈進出:如果(HSL*0.4+LLJX)>0,返回資金流入,否則返回資金流出,畫白色,POINTDOT 輸出進出比例:如果(HSL*0.4+LLJX)>0,返回資金流入/萬元*100,否則返回資金流出/萬元*100,畫黃色 輸出三日資金:資金進出的3日累和,畫白色,NODRAW 輸出五日資金:資金進出的5日累和,COLORFF00FF,NODRAW 輸出十日資金:資金進出的10日累和,COLOR0000FF,NODRAW 資金流量賦值:LLJX,線寬為0,COLOR0000FF 當滿足條件(資金流量>0)時,在資金流量和0位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR0000FF 當滿足條件(資金流量<0)時,在資金流量和0位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF3300 黃柱初出藍賦值:1日前的資金流出<0 AND 資金流入>30 AND 收陽線AND 收盤價>1日前的收盤價 AND 收盤價>收盤價的3日簡單移動平均 X賦值:(3*收盤價+2*最低價+開盤價+最高價)/7 多空線賦值:(20*X+19*1日前的X+18*2日前的X+17*3日前的X+16*4日前的X+15*5日前的X+14*6日前的X+13*7日前的X+12*8日前的X+11*9日前的X+10*10日前的X+9*11日前的X+8*12日前的X+7*13日前的X+6*14日前的X+5*15日前的X+4*16日前的X+3*17日前的X+2*18日前的X+20日前的X)/210 長黃柱賦值: 資金流入>300 AND 收盤價上穿多空線 當滿足條件黃柱初出藍時,在-30位置書寫文字,COLORFF00FF 當滿足條件長黃柱時,在((HSL*0.4)*1.5)*1.4位置書寫文字,畫紅色 輸出連紅天:條件連續成立次數,,COLORA20FFD,NODRAW TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

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)))));
ZLL:=(VOL / CAPITAL);
HSL1:=IF((ZLL > 10),10,ZLL);
HSL:=((XVL / 20) / 1.15);
攻擊流量:=(((HSL * 0.55) + (REF(HSL,1) * 0.33)) + (REF(HSL,2) * 0.22));
GJJ:=EMA(攻擊流量,8);
LLJX:=EMA(攻擊流量,3);
STICKLINE(((HSL * 0.4) >= 0),((HSL * 0.4) +LLJX),0,6,0),COLOR00FFFF;
STICKLINE(((HSL * 0.4) < 0),((HSL * 0.4) +LLJX),0,6,0),COLOR00FF00;
資金流入:=IF((HSL*0.4+LLJX)>0,(HSL*0.4+LLJX),DRAWNULL),colorred;
資金流出:=IF((HSL*0.4+LLJX)<0,(HSL*0.4+LLJX),DRAWNULL),COLOR00FF00;
資金進出:=(HSL*0.4+LLJX),LINETHICK0;
萬元:=AMOUNT/10000,VOLSTICK,COLORFF00FF;
資金凈進出:IF((HSL*0.4+LLJX)>0,資金流入,資金流出),colorwhite,POINTDOT;
進出比例:IF((HSL*0.4+LLJX)>0,資金流入/萬元*100,資金流出/萬元*100),coloryellow;
三日資金:SUM(資金進出,3),colorwhite,NODRAW;
五日資金:SUM(資金進出,5),COLORFF00FF,NODRAW;
十日資金:SUM(資金進出,10),COLOR0000FF,NODRAW;
資金流量:=LLJX,LINETHICK0,COLOR0000FF;
STICKLINE((資金流量 > 0),資金流量,0,6,0),COLOR0000FF;
STICKLINE((資金流量 < 0),資金流量,0,6,0),COLORFF3300;
黃柱初出藍:=REF(資金流出,1)<0 AND 資金流入>30 AND C>O AND C>REF(C,1) AND C>MA(C,3);
X:=(3*C+2*L+O+H)/7;
多空線:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210;
長黃柱:= 資金流入>300 AND CROSS(C,多空線);
DRAWTEXT(黃柱初出藍,-30,''),COLORFF00FF;
DRAWTEXT(長黃柱 ,((HSL * 0.4) * 1.5)*1.4 ,''),colorred;
連紅天:BARSLASTCOUNT(資金凈進出>0),,COLORA20FFD,NODRAW;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?