資金主圖指標公式源碼

作者：大智慧來源：cxh99.com 發(fā)布時間：2024年06月17日

指標公式源碼分析及使用說明:

?分析總結(jié)與指標創(chuàng)建思路

?1. 繪制背景

背景繪制指標通過條件判斷和顏色填充實現(xiàn)圖表背景的動態(tài)變化。具體思路包括：

- 條件判斷：通過條件`v>1`，決定是否繪制背景。

- 背景填充：使用`STRIP`函數(shù)指定不同RGB顏色的條紋樣式。

?2. 帳戶總數(shù)和戶均持股

賬戶統(tǒng)計指標用于計算并顯示賬戶總數(shù)和戶均持股量。具體思路包括：

- 外部數(shù)據(jù)提取：使用`extradata`函數(shù)獲取小股民線的數(shù)據(jù)。

- 財務(wù)數(shù)據(jù)計算：利用`FINANCE2`函數(shù)和賬戶總數(shù)計算戶均持股量。

- 文本顯示：使用`DRAWTEXTREL`函數(shù)在圖表上顯示賬戶總數(shù)和戶均持股量。

?3. 我贏龍頭

動能指標通過移動平均線和平滑處理來分析價格動向。具體思路包括：

- 移動平均線：計算當(dāng)前價格的持續(xù)移動平均值。

- 平滑處理：多次平滑處理得到更穩(wěn)定的動能線。

- 填充區(qū)域：用顏色區(qū)分動能線上下的區(qū)域。

?4. 高點和低點

高低點標識指標用于標識價格的近期高點和低點。具體思路包括：

- 高點檢測：通過最高值函數(shù)`HHV`和時間序列函數(shù)`BARSLAST`標記價格的高點。

- 低點檢測：通過最低值函數(shù)`LLV`和時間序列函數(shù)`BARSLAST`標記價格的低點。

- 突破信號：判斷價格是否突破高低點，并進行標識。

?5. K線顏色填充

K線填充指標通過不同顏色填充K線柱體，區(qū)分開盤價與收盤價的漲跌情況。具體思路包括：

- 條件判斷：根據(jù)開盤價與收盤價的關(guān)系，決定填充顏色。

- 顏色填充：使用`STICKLINE`函數(shù)設(shè)置不同顏色的K線。

?具體指標使用參考說明

?1. 繪制背景

```plaintext

DRAWGBKLAST(v>1,STRIP(RGB(0,150,130),RGB(0,0,0),1));

```

使用方法：

- 當(dāng)變量`v`大于1時，繪制背景條紋；

- 條紋顏色為綠色（RGB(0,150,130)）和黑色（RGB(0,0,0)）交替。

?2. 帳戶總數(shù)和戶均持股

```plaintext

帳戶總數(shù):extradata('小股民線'),linethick0,PRECIS0;

戶均持股:=(FINANCE2(37)/帳戶總數(shù))10000;

ZH3:=ref(帳戶總數(shù),3);

HJ3:=ref(戶均持股,3);

DRAWTEXTREL(5,13,'帳戶總數(shù)(戶)：'+NUMTOSTRN(帳戶總數(shù),0)),Color0000FF;

DRAWTEXTREL(170,13,'戶均持股(股)：'+NUMTOSTRN(戶均持股,0)),Color0000FF;

```

使用方法：

- 提取小股民線的數(shù)據(jù)作為賬戶總數(shù)；

- 使用`FINANCE2`函數(shù)計算戶均持股量；

- 將結(jié)果通過`DRAWTEXTREL`函數(shù)顯示在圖表上。

?3. 我贏龍頭

```plaintext

我:=MA(CLOSE,1);

贏:=SMA(SMA(SMA(我,2,1),2,1),2,1);

龍:=MA(贏,3);

FILLRGN(贏,龍,贏>=龍),Color0000FF;

FILLRGN(贏,龍,贏<龍),Color008000;

我贏龍頭:=(LOW+HIGH+C4)/6;

```

使用方法：

- 計算價格的移動平均線；

- 通過多次平滑處理得到動能線；

- 用顏色區(qū)分動能線上下的區(qū)域（藍色和綠色）。

?4. 高點和低點

```plaintext

BDGD:=C=HHV(CLOSE,13);

GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;

高點:REF(CLOSE,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1;

突破:CROSS(CLOSE,REF(高點,1)),COLOR00FFFF,POINTDOT,LINETHICK0;

STICKLINE(GDSJ<=6,高點,高點,8,0),COLORFF00FF;

BDDD:=C=LLV(CLOSE,13);

DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;

低點:REF(CLOSE,DDSJ),COLOR00FFFF,POINTDOT,LINETHICK1;

STICKLINE(DDSJ<=6,低點,低點,8,0),COLOR00FF00;

```

使用方法：

- 標記價格的13日高點和低點；

- 標記突破高點和低點的點；

- 在圖表上用不同顏色標識高點（綠色）和低點（青色）。

?5. K線顏色填充

```plaintext

N:=20;

STICKLINE(O>=C ,C ,O,8,0 ),COLOR008800;

STICKLINE(O>=C ,C ,O,5,0 ),COLOR00aa00;

STICKLINE(O>=C ,C ,O,3,0 ),COLOR00cc00;

STICKLINE(O>=C ,C ,O,1,0 ),COLOR00ee00;

STICKLINE(C>O,C,O,8,0),COLOR000088;

STICKLINE(C>O,C,O,5,0) ,COLOR0000aa;

STICKLINE(C>O,C,O,3,0),COLOR0000cc;

STICKLINE(C>O,C,O,1,0),COLOR0000ee;

```

使用方法：

- 根據(jù)開盤價與收盤價的關(guān)系，決定K線的顏色；

- 漲時（收盤高于開盤）使用藍色系，跌時（收盤低于開盤）使用綠色系；

- 不同顏色深淺區(qū)分柱體寬度，增強視覺效果。

?結(jié)論

上述指標提供了多種技術(shù)分析工具，從背景繪制、賬戶統(tǒng)計、動能判斷到高低點標識和K線填充，共同構(gòu)成了一個全面的技術(shù)分析系統(tǒng)。建議在實際使用前，結(jié)合市場環(huán)境和個股特性進行回測和優(yōu)化。

源碼：

DRAWGBKLAST(v>1,STRIP(RGB(0,150,130),RGB(0,0,0),1));
帳戶總數(shù):extradata('小股民線'),linethick0,PRECIS0;
戶均持股:=(FINANCE2(37)/帳戶總數(shù))*10000;
ZH3:=ref(帳戶總數(shù),3);
HJ3:=ref(戶均持股,3);
DRAWTEXTREL(5,13,'帳戶總數(shù)(戶)：'+NUMTOSTRN(帳戶總數(shù),0)),Color0000FF;
DRAWTEXTREL(170,13,'戶均持股(股)：'+NUMTOSTRN(戶均持股,0)),Color0000FF;
{我贏}
我:=MA(C,1);
贏:=SMA(SMA(SMA(我,2,1),2,1),2,1);
龍:=MA(贏,3);
FILLRGN(贏,龍,贏>=龍),Color0000FF;
FILLRGN(贏,龍,贏<龍),Color008000;
我贏龍頭:=(L+H+C*4)/6;
{立樁}
BDGD:=C=HHV(C,13);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;
高點:REF(C,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1;
突破:CROSS(C,REF(高點,1)),COLOR00FFFF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ<=6,高點,高點,8,0),COLORFF00FF;
BDDD:=C=LLV(C,13);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;
低點:REF(C,DDSJ),COLOR00FFFF,POINTDOT,LINETHICK1;
STICKLINE(DDSJ<=6,低點,低點,8,0),COLOR00FF00;
{填充}
N:=20;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00aa00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00cc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00ee00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),COLOR000088;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000aa;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR0000cc;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),COLOR0000ee;
aa:=(ref(close,1)+ref(close,2)+open)/3;

{資金}
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判斷是否有數(shù)據(jù)}
{TODAY:="ddx.ddx"=0;}{判斷是否有正版數(shù)據(jù)}
Ddmr:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100;
Ddmrs:=sum(Ddmr,0);
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
散資:=(xhb-xhs)/10000;
中資:=(zhb-zhs)/10000;
大資:=(dhb-dhs)/10000;
超資:=(chb-chs)/10000;
超資增倉:=超資;
大資增倉:=大資;
中資增倉:=中資;
散資增倉:=散資;
BBD凈額:=(超資+大資);
DRAWTEXTREL(5,85,'BBD (萬)：'+NUMTOSTRN(BBD凈額,0)),LINETHICK1,Color0080FF;
DRAWTEXTREL(5,155,'超資(萬)：'+NUMTOSTRN(超資增倉,0)),LINETHICK1,COLORYELLOW;
DRAWTEXTREL(5,225,'大資(萬)：'+NUMTOSTRN(大資增倉,0)),LINETHICK1,Color62FFFF;
DRAWTEXTREL(5,295,'中資(萬)：'+NUMTOSTRN(中資增倉,0)),LINETHICK1,ColorACFFFF;
DRAWTEXTREL(5,365,'散資(萬)：'+NUMTOSTRN(散資增倉,0)),LINETHICK1,ColorFFFFFF;

DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA('特大買入')+SELFDATA('大單買入')),bigorder(1,2)),0);
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA('特大賣出')+SELFDATA('大單賣出')),bigorder(2,2)),0);
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA('特大買入')),bigorder(1,3)),0);
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA('特大賣出')),bigorder(2,3)),0);
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA('大單買入')),(bigorder(1,2)-bigorder(1,3))),0);
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA('大單賣出')),(bigorder(2,2)-bigorder(2,3))),0);
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA('中單買入')),(bigorder(1,1)-bigorder(1,2))),0);
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA('中單賣出')),(bigorder(2,1)-bigorder(2,2))),0);
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA('特大買入')+SELFDATA('大單買入')+SELFDATA('中單買入'))),1-(bigorder(1,1))),0);
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA('特大賣出')+SELFDATA('大單賣出')+SELFDATA('中單賣出'))),1-(bigorder(2,1))),0);
tdj:=tdn-tdm;
ddj:=ddn-ddm;
zdj:=zdn-zdm;
sdj:=sdn-sdm;
zlj:=zln-zlm;
DRAWTEXTREL(140,85,'占'+numtostrn(((zlj))*100,1)+'%'),Color0080FF;
DRAWTEXTREL(140,155,'占'+numtostrn((tdj)*100,1)+'%'),COLORYELLOW;
DRAWTEXTREL(140,225,'占'+numtostrn((ddj)*100,1)+'%'),Color62FFFF;
DRAWTEXTREL(140,295,'占'+numtostrn((zdj)*100,1)+'%'),ColorACFFFF;
DRAWTEXTREL(140,365,'占'+numtostrn((sdj)*100,1)+'%'),ColorFFFFFF;
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+'手'),Color0080FF;
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+'手'),COLORYELLOW;
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+'手'),Color62FFFF;
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+'手'),ColorACFFFF;
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+'手'),ColorFFFFFF;
DRAWTEXTREL(280,85,'倉 '+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+'%'),Color0080FF;
DRAWTEXTREL(280,155,'倉 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+'%'),COLORYELLOW;
DRAWTEXTREL(280,225,'倉 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+'%'),Color62FFFF;
DRAWTEXTREL(280,295,'倉 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(zdj),0),1)+'%'),ColorACFFFF;
DRAWTEXTREL(280,365,'倉 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(sdj),0),1)+'%'),ColorFFFFFF;{程序化交易 www.tumamayizhan.com }

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

資金主圖指標 公式 源碼

資金主圖指標公式源碼