[通達信]通達信 分時主圖,打板.做t.追漲,全天候 -指標公式(源碼 貼圖 說明)
{反轉MACD 參數: p, 0, 20, 4;}
前量:="FSKY.前量#DAY";
昨量:="FSKY.昨量#DAY";
今量:="FSKY.今量#DAY";
前總:=前量;
昨總:=昨量;
總:=今量,NODRAW;
BMM:=MAX(前總,昨總);
AMM:=IF(總/BMM>2,BMM*3,BMM);
MM:=200/AMM;
KP:=DYNAINFO(4);
ZX:=DYNAINFO(7);
A1:=IF(ZX>=KP,355,0);
A2:=IF(ZX>=KP,0,355);
A3:=IF(ZX>=KP,0,0);
DRAWRECTREL(0,80,MM*今量,110,RGB(A1,A2,A3));
昨開:="FSKY.昨開#DAY";
昨收:="FSKY.昨收#DAY";
A4:=IF(昨收>=昨開,355,0);
A5:=IF(昨收>=昨開,0,355);
A6:=IF(昨收>=昨開,0,0);
DRAWRECTREL(0,40,MM*昨量,70,RGB(A4,A5,A6));
前開:="FSKY.前開#DAY";
前收:="FSKY.前收#DAY";
A7:=IF(前收>=前開,355,0);
A8:=IF(前收>=前開,0,355);
A9:=IF(前收>=前開,0,0);
DRAWRECTREL(0,0,MM*前量,30,RGB(A7,A8,A9));
RC:=DYNAINFO( 3);
量比超2.5:=IF(DYNAINFO(17)>2.5,RC-0.15,DRAWNULL),COLORFF9933;
量比超5:=IF(DYNAINFO(17)>5,RC-0.15,DRAWNULL),COLORBA75FF;
DRAWBAND(量比超2.5,RGB(51,153,255),量比超2.5+0.015,RGB(51,153,255));
DRAWBAND(量比超5,RGB(255,118,188),量比超5+0.015,RGB(255,118,188));
{首次起爆}
TT:=BARSCOUNT(C);{取得有效收盤價}
均價黃:SUM(C*V,TT)/SUM(V,TT),LINETHICK1,COLOR00FFE1;{分時均線的取值}
量兩步:=MA(V,5)>REF(MA(V,5),1) AND REF(MA(V,5),1)>REF(MA(V,5),2);
價兩步:= C>=REF(C,1) AND REF(C,1)>REF(C,2);
價上崗量破5:=C>均價黃 AND V>MA(V,5);
量起爆:=V>=REF(V,1)*2 ;
價創新高:=C>=HHV(C,0);
量創新高:=V>=HHV(V,0);
對昨日漲幅:=C/DYNAINFO(3)<=1.02;{漲幅控制2個點以內}
每日一點:=量兩步 AND 價兩步 AND 價上崗量破5 AND 量起爆 AND 價創新高 AND 量創新高 AND 對昨日漲幅;
{計算收益、已爆分鐘}
VC:=BARSSINCE(每日一點)+1;
首次起爆價:REF(C,VC-1),NODRAW;
今天收益:(DYNAINFO(7)-首次起爆價)/首次起爆價*100,NODRAW;
起爆時間:REF(TIME/10000,VC),NODRAW;
已爆分鐘:VC-1,NODRAW;
首次起爆量:=REF(VOL,VC-1);
DRAWICON(已爆分鐘>=2,RC-0.1,11);{出現金手指，至少已經確認2分鐘了};
{MACD P:1,20,4;}
{RC:=DYNAINFO( 3);}
S2:=SMA(C,2,1);
S6:=SMA(C,6,1);
DK:=2*(S2-S6);
STICKLINE(DK>0,RC,RC+DK,0,1),COLOR0000AA;
STICKLINE(DK<0,RC,RC+DK,0,1),COLOR00AA00;
AP1:=REF(C,P)=HHV(C,2*P+1);
BB1:=FILTER(AP1,P);
CC1:=BACKSET(BB1,P+1);
DD1:=FILTER(CC1,P);{高點}
AP2:=REF(C,P)=LLV(C,2*P+1);
BB2:=FILTER(AP2,P);
CC2:=BACKSET(BB2,P+1);
DD2:=FILTER(CC2,P);{低點}
上:=REF(C,BARSLAST(DD1)),COLORFF00FF,NODRAW;
下:=REF(C,BARSLAST(DD2)),COLOR00FF00,NODRAW;
相對能量:(C-下)/(上-下)*100,COLORYELLOW,NODRAW;
R11:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
S11:=R11>REF(R11,1);
壓力線:DRAWLINE(DD1,C,S11,C,1),COLOR00FF00;
T11:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
U11:=T11>REF(T11,1);
支撐線:DRAWLINE(DD2,C,U11,C,1),COLOR00FFFF;
STICKLINE(C>0,下,下,1,0),COLOR00FF00;
STICKLINE(C>0,上,上,1,0),COLORFF00FF;
DRAWNUMBER(ISLASTBAR,壓力線,壓力線),COLOR00FF00;
DRAWNUMBER(ISLASTBAR,支撐線,支撐線),COLOR00FFFF;
R1:=MA(C,13);
R2:=SMA(R1,5,2);
DRAWBAND(R1,RGB(255,0,125),R2,RGB(0,111,255));
C,LINETHICK2,COLORDDDDDD;
{漲停}
地:=DYNAINFO(11)+(DYNAINFO(11)*0.021);
漲停:IF(DYNAINFO(7)>地,1,0),NODRAW,COLOR0088FF;
漲:=IF(漲停=1,C+0.0075,DRAWNULL),COLOR8000FF,LINETHICK2;
DRAWBAND(漲,RGB(255,211,0),C-0.0075,RGB(255,125,0));
時間:=TIME=100000;
N:=BARSLAST(時間);
常數:=CONST(IF(N=0,C,REF(C,N))),COLORGREEN,DOTLINE;
CS1:=CONST(IF(N,HHV(H,0),REF(HHV(H,0),N)));
CS2:=CONST(IF(N,LLV(L,0),REF(LLV(L,0),N)));
STICKLINE(時間=1,CS1,CS2,1.2,0),COLOR008888;
均價A:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
{CONST(IF(時間,HHV(H,0),REF(HHV(H,0),N))),COLOR000066,DOTLINE;
CONST(IF(時間,LLV(L,0),REF(LLV(L,0),N))),COLOR006600,DOTLINE;
CONST(IF(N,LLV(L,1),REF(LLV(L,0),N))),COLOR888888;
CONST(IF(N,HHV(L,1),REF(HHV(L,0),N))),COLOR888888;}
{漲停2}
AA:=BARSLAST(TIME=103000);
CC:=REF(HHV(C,0),AA+1);
VV:=REF(HHV(V,0),AA+1);
ZF:=CC/DYNAINFO(3)<1.05;
漲停2:=CROSS(C,CC) AND V>VV AND ZF,COLOR0000FF;
DRAWICON(漲停2,RC-0.06,13);
{開量沖板}
資金:=C*IF(PERIOD=0 AND MINUTE=31,VOL,0),COLORSTICK,NODRAW;{√}
沖板線:=(CAPITAL/100)*1/20,COLORCYAN,LINETHICK1,NODRAW;
單量必板線:=資金>1000;{分時圖單量超1000萬資金};
單量沖板線:=資金>沖板線 AND 資金<1000;{分時圖單量超500萬資金};
DRAWICON(單量必板線 AND DYNAINFO(4)/DYNAINFO(3)>1.01,RC+0.03,31);{1000萬處畫仙人指}
DRAWICON(單量沖板線 AND DYNAINFO(4)/DYNAINFO(3)>1.01,RC-0.03,23);{500萬處畫十字星，以示警戒};
|
|
|
