多空線:=(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)
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)))));
補(bǔ)一下，老師的資金主力指標(biāo)，我手上有一個(gè)升級(jí)版，也是來自論壇，在這先多謝哪位分享的老師，源碼如下：
{主買主賣，副圖}
DRAWRECTREL(0,0,400,988,IF(120,RGB(10,0,0),0));
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
主買A:=ACTINVOL,COLORRED,NODRAW;
主賣A:=ACTOUTVOL,COLORGREEN,NODRAW;
主買:=主買A*100/(主買A+主賣A),NODRAW,COLORRED;
主賣:=主賣A*100/(主買A+主賣A),NODRAW,COLORGREEN;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
【量能飽和】:IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW;
主力凈買量:=(LARGEINTRDVOL-LARGEOUTTRDVOL),COLORYELLOW,NODRAW;
大宗凈流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW;
主動(dòng)買賣差:=(ACTINVOL-ACTOUTVOL),COLORMAGENTA,NODRAW;
主力資金差:=((L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1)))/10000,COLORCYAN,NODRAW;
DRAWRECTREL(100,0,90+CONST(主買*300/100),40,RGB(230,65,0));
DRAWRECTREL(100,60,90+CONST(主賣*300/100),100,RGB(0,104,0));
DRAWRECTREL(100,120,390,160,RGB(0,0,100));
DRAWRECTREL(100,120,90+CONST(【量能飽和】*300/100),160,RGB(250,104,0));
大單動(dòng)向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),NODRAW;
T1:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)<0,1,0);
T2:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)<0,2,T1);
T3:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)<0,3,T2);
T4:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)<0,4,T3);
T5:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)>0 AND REF(大單動(dòng)向,5)<0,5,T4);
T6:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)>0 AND REF(大單動(dòng)向,5)>0 AND REF(大單動(dòng)向,6)<0,6,T5);
T7:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)>0 AND REF(大單動(dòng)向,5)>0 AND REF(大單動(dòng)向,6)>0 AND REF(大單動(dòng)向,7)<0,7,T6);
T8:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)>0 AND REF(大單動(dòng)向,5)>0 AND REF(大單動(dòng)向,6)>0 AND REF(大單動(dòng)向,7)>0 AND REF(大單動(dòng)向,8)<0,8,T7);
T9:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)>0 AND REF(大單動(dòng)向,5)>0 AND REF(大單動(dòng)向,6)>0 AND REF(大單動(dòng)向,7)>0 AND REF(大單動(dòng)向,8)>0 AND REF(大單動(dòng)向,9)<0,9,T8);
T:=IF (大單動(dòng)向>0 AND REF(大單動(dòng)向,1)>0 AND REF(大單動(dòng)向,2)>0 AND REF(大單動(dòng)向,3)>0 AND REF(大單動(dòng)向,4)>0 AND REF(大單動(dòng)向,5)>0 AND REF(大單動(dòng)向,6)>0 AND REF(大單動(dòng)向,7)>0 AND REF(大單動(dòng)向,8)>0 AND REF(大單動(dòng)向,9)>0,10,T9);
D:=COUNT(大單動(dòng)向>0,10),NODRAW;
DRAWTEXT_FIX(1,0.005,0.01,0,STRCAT(STRCAT('【主買比】: ',CON2STR(主買,1)),' ％ ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.07,0,STRCAT(STRCAT('【主賣比】: ',CON2STR(主賣,1)),' ％ ')),COLORGREEN;
DRAWTEXT_FIX(1,0.005,0.13,0,STRCAT(STRCAT('【量能飽和】: ',CON2STR(【量能飽和】,1)),' ％ ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.19,0,STRCAT(STRCAT('【主力資金差】: ',CON2STR(主力資金差,1)),' 萬元 ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.19,0,STRCAT(STRCAT('【大宗凈流入】: ',CON2STR(大宗凈流入,1)),' 萬元 ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.25,0,STRCAT(STRCAT('【主力凈買量】: ',CON2STR(主力凈買量,1)),' 手')),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.25,0,STRCAT(STRCAT('【主動(dòng)買賣差】: ',CON2STR(主動(dòng)買賣差,1)),' 手')),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.31,0,STRCAT(STRCAT('【DDX 連 紅 天 數(shù)】: ',CON2STR(T,0)),' 天 ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.31,0,STRCAT(STRCAT('【DDX兩周紅天數(shù)】: ',CON2STR(D,0)),' 天 ')),COLORYELLOW;
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,3,0),COLOR00FFFF;
STICKLINE(((HSL * 0.4) < 0),((HSL * 0.4) +LLJX),0,3,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;
資金進(jìn)出:=(HSL*0.4+LLJX),LINETHICK0;
萬元:=AMOUNT/10000{0000},VOLSTICK,COLORFF00FF;
資金凈進(jìn)出:IF((HSL*0.4+LLJX)>0,資金流入,資金流出),COLORWHITE,POINTDOT;
進(jìn)出比例%:IF((HSL*0.4+LLJX)>0,資金流入/萬元*100,資金流出/萬元*100),COLORYELLOW;
連紅天1:=BARSLASTCOUNT(資金凈進(jìn)出>0),,COLORA20FFD,NODRAW;
連紅天2:=IF(連紅天1=0,REF(連紅天1,1),連紅天1),,COLORA20FFD,NODRAW;
連紅天3:=IF(連紅天2=0,REF(連紅天1,2),連紅天2),,COLORA20FFD,NODRAW;
連紅天4:=IF(連紅天3=0,REF(連紅天1,3),連紅天3),,COLORA20FFD,NODRAW;
近期連紅天:IF(連紅天4=0,REF(連紅天1,4),連紅天4),,COLORYELLOW,NODRAW;
最多連紅天1:=MAX(REF(近期連紅天,1),近期連紅天),COLORYELLOW,NODRAW;
最多連紅天2:=MAX(最多連紅天1,REF(近期連紅天,2)),COLORYELLOW,NODRAW;
最多連紅天3:=MAX(最多連紅天2,REF(近期連紅天,3)),COLORYELLOW,NODRAW;
最多連紅天4:=MAX(最多連紅天3,REF(近期連紅天,4)),COLORYELLOW,NODRAW;
最多連紅天5:=MAX(最多連紅天4,REF(近期連紅天,5)),COLORYELLOW,NODRAW;
最多連紅天:MAX(最多連紅天5,REF(近期連紅天,6)),COLORYELLOW,NODRAW;
三日資金:SUM(資金進(jìn)出,3),COLORWHITE,NODRAW;
五日資金:SUM(資金進(jìn)出,5),COLORFF00FF,NODRAW;
十日資金:SUM(資金進(jìn)出,10),COLOR0000FF,NODRAW;
資金流量:=LLJX,LINETHICK0,COLOR0000FF;
STICKLINE((資金流量 > 0),資金流量,0,3,0),COLOR0000FF;
STICKLINE((資金流量 < 0),資金流量,0,3,0),COLORFF3300;
黃柱初出藍(lán):=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;
長(zhǎng)黃柱:= 資金流入>300 AND CROSS(C,多空線);
DRAWTEXT(黃柱初出藍(lán),-30,'★'),COLORFF00FF;
DRAWTEXT(長(zhǎng)黃柱 ,((HSL * 0.4) * 1.5)*1.4 ,'★'),COLORRED;
另外分享兩個(gè)分時(shí)副圖指標(biāo)，在這里多謝瘦石頭 以及 平菜老師。。。
{瘦石資金博弈，分時(shí)副圖}
JLX:=IF(C>REF(C,1),AMOUNT,0);
JLZ:=IF(C<REF(C,1),AMOUNT,0);
總成交額:SUM(AMOUNT,0)/10000,NODRAW,COLORYELLOW;
凈流入:(SUM(JLX,0)-SUM(JLZ,0))/10000,COLORRED;
IF(凈流入<0,凈流入,DRAWNULL),COLORGREEN ;
流入比:凈流入/總成交額*100,NODRAW;
0,COLORMAGENTA;
{}
MA5:="FSKY1.MA5#DAY";
MA10:="FSKY1.MA10#DAY";
MA20:="FSKY1.MA20#DAY";
MA60:="FSKY1.MA60#DAY";
DRAWTEXT_FIX(1,0.14,0,0,'5日:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.33,0,0,'10日:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.51,0,0,'20日:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.71,0,0,'60日:'),COLORMAGENTA;
DRAWNUMBER_FIX(1,0.19,0,0,CONST(MA5)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.39,0,0,CONST(MA10)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.58,0,0,CONST(MA20)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.78,0,0,CONST(MA60)),COLORYELLOW;
獲利1:=WINNER(C)*100,COLOR0033FF,NODRAW;
DRAWTEXT_FIX(1,0,0.35,0,'日獲利盤:'),COLORMAGENTA;
DRAWNUMBER_FIX(1,0.12,0.35,0,CONST(獲利1)),COLORYELLOW;
MA1:=MA(C,5);
角度MA1:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
DRAWTEXT_FIX(1,0.8,0.35,0,'5線角度:'),COLORMAGENTA;
DRAWNUMBER_FIX(1,0.91,0.35,0,CONST(角度MA1)),COLORYELLOW;
{}
大單動(dòng)向:="DDX.大單動(dòng)向#DAY",NODRAW;
DRAWTEXT_FIX(1,0.300,1,0,'DDX:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.327,0.99,0,CONST(大單動(dòng)向)),COLORRED;
漲跌動(dòng)因:="DDY.漲跌動(dòng)因#DAY",NODRAW;
DRAWTEXT_FIX(1,0.400,1,0,'DDY:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.427,0.99,0,CONST(漲跌動(dòng)因)),COLORRED;
大單差分:="DDZ.大單差分#DAY",NODRAW;
DRAWTEXT_FIX(1,0.500,1,0,'DDZ:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.527,0.99,0,CONST(大單差分)),COLORRED;
{}
上漲家數(shù):=IF(PERIOD=0 ,"FSKY1.上漲家數(shù)#DAY",DRAWNULL),NODRAW;
下跌家數(shù):=IF(PERIOD=0 ,"FSKY1.下跌家數(shù)#DAY",DRAWNULL),NODRAW;
DRAWTEXT_FIX(1,0.200,1,0,STRCAT('上漲家數(shù):',CON2STR(上漲家數(shù),0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.588,1,0,STRCAT('下跌家數(shù):',CON2STR(下跌家數(shù),0))),COLORYELLOW;
---------------------------------------------------------------------------------------------------
{瘦石BBD，分時(shí)副圖}
超買:=IF((ISBUYORDER,AMOUNT>=(FINANCE(40)*0.05/100))AND(DCLOSE>=DOPEN),AMOUNT/10000,0);
超賣:=IF((AMOUNT>=(FINANCE(40)*0.05/100))AND(DCLOSE<=DOPEN),AMOUNT/10000,0);
大買:=IF(((ISBUYORDER,AMOUNT>=(FINANCE(40)*0.025/100))AND(ISBUYORDER,AMOUNT<(FINANCE(40)*0.05/100)))AND(DCLOSE>=DOPEN),AMOUNT/10000,0);
大賣:=IF(((AMOUNT>=(FINANCE(40)*0.025/100))AND(AMOUNT<(FINANCE(40)*0.05/100)))AND(DCLOSE<=DOPEN),AMOUNT/10000,0);
中買:=IF(((ISBUYORDER,AMOUNT>=(FINANCE(40)*0.005/100))AND(ISBUYORDER,AMOUNT<(FINANCE(40)*0.025/100)))AND(DCLOSE>=DOPEN),AMOUNT/10000,0);
中賣:=IF(((AMOUNT>=(FINANCE(40)*0.005/100))AND(AMOUNT<(FINANCE(40)*0.025/100)))AND(DCLOSE<=DOPEN),AMOUNT/10000,0);
散買:=IF((ISBUYORDER,AMOUNT<(FINANCE(40)*0.005/100))AND(DCLOSE>=DOPEN),AMOUNT/10000,0);
散賣:=IF((AMOUNT<(FINANCE(40)*0.005/100))AND(DCLOSE<=DOPEN),AMOUNT/10000,0);
凈流入額:(SUM(超買,0)-SUM(超賣,0))+(SUM(大買,0)-SUM(大賣,0))+(SUM(中買,0)-SUM(中賣,0))+(SUM(散買,0)-SUM(散賣,0))NODRAW;
★超大單:=(SUM(超買,0)-SUM(超賣,0)),LINETHICK1,COLORYELLOW;
★大單:=SUM(大買,0)-SUM(大賣,0),COLORMAGENTA,LINETHICK1;
★中單:=SUM(中買,0)-SUM(中賣,0),COLORGREEN,LINETHICK1;
★小單:=SUM(散買,0)-SUM(散賣,0),COLORLIGRAY,LINETHICK1;
機(jī)構(gòu)BBD:★超大單+★大單,COLORRED;
散戶BBD:★中單+★小單,COLORGREEN;
{}
MA5:="FSKY1.MA5#DAY";
MA10:="FSKY1.MA10#DAY";
MA20:="FSKY1.MA20#DAY";
MA60:="FSKY1.MA60#DAY";
DRAWTEXT_FIX(1,0.14,0,0,'5日:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.33,0,0,'10日:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.51,0,0,'20日:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.71,0,0,'60日:'),COLORMAGENTA;
DRAWNUMBER_FIX(1,0.19,0,0,CONST(MA5)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.39,0,0,CONST(MA10)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.58,0,0,CONST(MA20)),COLORYELLOW;
DRAWNUMBER_FIX(1,0.78,0,0,CONST(MA60)),COLORYELLOW;
獲利1:=WINNER(C)*100,COLOR0033FF,NODRAW;
DRAWTEXT_FIX(1,0,0.35,0,'日獲利盤:'),COLORMAGENTA;
DRAWNUMBER_FIX(1,0.12,0.35,0,CONST(獲利1)),COLORYELLOW;
MA1:=MA(C,5);
角度MA1:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
DRAWTEXT_FIX(1,0.8,0.35,0,'5線角度:'),COLORMAGENTA;
DRAWNUMBER_FIX(1,0.91,0.35,0,CONST(角度MA1)),COLORYELLOW;
{}
大單動(dòng)向:="DDX.大單動(dòng)向#DAY",NODRAW;
DRAWTEXT_FIX(1,0.300,1,0,'DDX:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.327,0.99,0,CONST(大單動(dòng)向)),COLORRED;
漲跌動(dòng)因:="DDY.漲跌動(dòng)因#DAY",NODRAW;
DRAWTEXT_FIX(1,0.400,1,0,'DDY:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.427,0.99,0,CONST(漲跌動(dòng)因)),COLORRED;
大單差分:="DDZ.大單差分#DAY",NODRAW;
DRAWTEXT_FIX(1,0.500,1,0,'DDZ:'),COLORWHITE;
DRAWNUMBER_FIX(1,0.527,0.99,0,CONST(大單差分)),COLORRED;
{}
上漲家數(shù):=IF(PERIOD=0 ,"FSKY1.上漲家數(shù)#DAY",DRAWNULL),NODRAW;
下跌家數(shù):=IF(PERIOD=0 ,"FSKY1.下跌家數(shù)#DAY",DRAWNULL),NODRAW;
DRAWTEXT_FIX(1,0.200,1,0,STRCAT('上漲家數(shù):',CON2STR(上漲家數(shù),0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.588,1,0,STRCAT('下跌家數(shù):',CON2STR(下跌家數(shù),0))),COLORYELLOW;
