全倉買入版

作者：飛狐來源：cxh99.com 發(fā)布時(shí)間：2021年06月03日

相關(guān)標(biāo)簽:

原理解析：

N賦值:21

M賦值:5

輸出天:400,POINTDOT,畫藍(lán)色,線寬為4

輸出海:100,POINTDOT,畫紅色,線寬為4

TH賦值:如果收盤價(jià)>1日前的收盤價(jià),返回成交量(手),否則返回0的N日累和

TL賦值:如果收盤價(jià)<1日前的收盤價(jià),返回成交量(手),否則返回0的N日累和

TQ賦值:如果收盤價(jià)=1日前的收盤價(jià),返回成交量(手),否則返回0的N日累和

輸出VAR0:100*(TH*2+TQ)/(TL*2+TQ),COLOR0000FF,線寬為2

輸出VAR1:VAR0的M日簡(jiǎn)單移動(dòng)平均,COLOR00FFFF,線寬為2

W賦值:VAR0上穿VAR1

WL1賦值:VAR1<100

WL2賦值:VAR1<150 AND VAR1>1日前的VAR1

WLT1賦值:W AND WL1

WLT2賦值:W AND WL2

TJ1賦值:WLT1的5日過濾

TJ2賦值:WLT2的8日過濾

當(dāng)滿足條件TJ1時(shí),在0和80位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR000099

當(dāng)滿足條件TJ1時(shí),在0和80位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000BB

當(dāng)滿足條件TJ1時(shí),在0和80位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000DD

當(dāng)滿足條件TJ1時(shí),在0和80位置之間畫柱狀線,寬度為0.3,0不為0則畫空心柱.,COLOR0000FF

當(dāng)滿足條件TJ1時(shí),在83位置書寫文字,COLOR00FFFF

當(dāng)滿足條件TJ2時(shí),在0和50位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR990099

當(dāng)滿足條件TJ2時(shí),在0和50位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORBB00BB

當(dāng)滿足條件TJ2時(shí),在0和50位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORDD00DD

當(dāng)滿足條件TJ2時(shí),在0和50位置之間畫柱狀線,寬度為0.3,0不為0則畫空心柱.,COLORFF00FF

當(dāng)滿足條件TJ2時(shí),在53位置書寫文字,COLOR00FFFF

輸出SAL1:VAR1上穿VAR0 AND VAR1>250

輸出SAL2:VAR0>400

輸出SAL:SAL1ORSAL2的5日過濾

當(dāng)滿足條件SAL時(shí),在VAR0位置畫15號(hào)圖標(biāo)

源碼：

N:=21; M:=5;
天:400,POINTDOT,COLORBLUE,LINETHICK4;
海:100,POINTDOT,COLORRED,LINETHICK4;
TH:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),N);
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),N);
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),N);
VAR0:100*(TH*2+TQ)/(TL*2+TQ),COLOR0000FF,LINETHICK2;
VAR1:MA(VAR0,M),COLOR00FFFF,LINETHICK2;
{DRAWBAND(VAR0,RGB(255,0,0),VAR1,RGB(0,0,220));}
W:=CROSS(VAR0,VAR1);
WL1:=VAR1<100;
WL2:=VAR1<150 AND VAR1>REF(VAR1,1);
WLT1:=W AND WL1;
WLT2:=W AND WL2;
TJ1:=FILTER(WLT1,5);
TJ2:=FILTER(WLT2,8);
STICKLINE(TJ1,0,80,4,0),COLOR000099;
STICKLINE(TJ1,0,80,2,0),COLOR0000BB;
STICKLINE(TJ1,0,80,1,0),COLOR0000DD;
STICKLINE(TJ1,0,80,0.3,0),COLOR0000FF;
DRAWTEXT(TJ1,83,'全倉'),COLOR00FFFF;
STICKLINE(TJ2,0,50,4,0),COLOR990099;
STICKLINE(TJ2,0,50,2,0),COLORBB00BB;
STICKLINE(TJ2,0,50,1,0),COLORDD00DD;
STICKLINE(TJ2,0,50,0.3,0),COLORFF00FF;
DRAWTEXT(TJ2,53,'追買'),COLOR00FFFF;
SAL1:CROSS(VAR1,VAR0) AND VAR1>250;
SAL2:VAR0>400;
SAL:FILTER(SAL1 OR SAL2,5);
DRAWICON(SAL,VAR0,15);

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