波段主圖+融勝軌道+籌碼堆積+撐壓提示指標公式

相關標簽:

?

干凈實用的波段主圖+融軌（數字）+籌碼堆積+撐壓提示1.波段很直觀，做股票在強勢區域做還是比弱勢要容易的多，謝謝上上的主圖。
2.疊加了融勝軌道，但軌道不顯示線而是跟隨每根K線上數字顯示，感謝融隊的思路和公式。
3.疊加了論壇里一個很經典的籌碼，忘記是哪位老師的了。籌碼在右側顯示，中長線盡量考慮買靠近下方籌碼位置的票，放量突破上方重壓籌碼區并且漲幅不大的時候可以追倉；短線找放量突破較大籌碼堆積區的票并且買入的價格盡量介于下方支撐籌碼位置。如果買在兩堆籌碼中間了，那震蕩起來就比較痛苦了。
4.疊加了千鈞老師DDE金指里的一部分代碼，在此緬懷老師并深深感謝老師。另：主圖上疊加了一些財務數據，只是個人習慣，需要的還可以再添加別的，我平常關注的主要是收益、流通和負債率。負債率大于1，收益大于1.5的票如果處于剛突破下方2條籌碼附近的，那絕對是好股，源碼{籌碼}

?

原理解析：
C1賦值:收盤價 N賦值:10 LB賦值:獲利盤為1%的成本分布 HB賦值:獲利盤為99%的成本分布 W賦值:(HB-LB)/10 N0賦值:LB N1賦值:LB+W N2賦值:LB+2*W N3賦值:LB+3*W N4賦值:LB+4*W N5賦值:LB+5*W N6賦值:LB+6*W N7賦值:LB+7*W N8賦值:LB+8*W N9賦值:LB+9*W N10賦值:HB A0賦值:以N1計算的獲利盤比例*100-以N0計算的獲利盤比例*100 A1賦值:以N2計算的獲利盤比例*100-以N1計算的獲利盤比例*100 A2賦值:以N3計算的獲利盤比例*100-以N2計算的獲利盤比例*100 A3賦值:以N4計算的獲利盤比例*100-以N3計算的獲利盤比例*100 A4賦值:以N5計算的獲利盤比例*100-以N4計算的獲利盤比例*100 A5賦值:以N6計算的獲利盤比例*100-以N5計算的獲利盤比例*100 A6賦值:以N7計算的獲利盤比例*100-以N6計算的獲利盤比例*100 A7賦值:以N8計算的獲利盤比例*100-以N7計算的獲利盤比例*100 A8賦值:以N9計算的獲利盤比例*100-以N8計算的獲利盤比例*100 A9賦值:以N10計算的獲利盤比例*100-以N9計算的獲利盤比例*100 輸出XA0:當滿足條件數據位置狀態=2ANDA0>0時,在(N1+N0)/2位置畫斜線0斜率N*A0長度,1方向.,COLOR262626,線寬為4 輸出XA1:當滿足條件數據位置狀態=2ANDA1>0時,在(N2+N1)/2位置畫斜線0斜率N*A1長度,1方向.,COLOR262626,線寬為4 輸出XA2:當滿足條件數據位置狀態=2ANDA2>0時,在(N3+N2)/2位置畫斜線0斜率N*A2長度,1方向.,COLOR262626,線寬為4 輸出XA3:當滿足條件數據位置狀態=2ANDA3>0時,在(N4+N3)/2位置畫斜線0斜率N*A3長度,1方向.,COLOR262626,線寬為4 輸出XA4:當滿足條件數據位置狀態=2ANDA4>0時,在(N5+N4)/2位置畫斜線0斜率N*A4長度,1方向.,COLOR262626,線寬為4 輸出XA5:當滿足條件數據位置狀態=2ANDA5>0時,在(N6+N5)/2位置畫斜線0斜率N*A5長度,1方向.,COLOR262626,線寬為4 輸出XA6:當滿足條件數據位置狀態=2ANDA6>0時,在(N7+N6)/2位置畫斜線0斜率N*A6長度,1方向.,COLOR262626,線寬為4 輸出XA7:當滿足條件數據位置狀態=2ANDA7>0時,在(N8+N7)/2位置畫斜線0斜率N*A7長度,1方向.,COLOR262626,線寬為4 輸出XA8:當滿足條件數據位置狀態=2ANDA8>0時,在(N9+N8)/2位置畫斜線0斜率N*A8長度,1方向.,COLOR262626,線寬為4 輸出XA9:當滿足條件數據位置狀態=2ANDA9>0時,在(N10+N9)/2位置畫斜線0斜率N*A9長度,1方向.,COLOR262626,線寬為4 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0088FF 當滿足條件收陰線時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR666600 AA賦值:(2*收盤價+最高價+最低價)/4的5日簡單移動平均 通1賦值:AA*102/100 通2賦值:AA*(200-102)/100 ZZ賦值:(2*收盤價+最高價+最低價)/4-收盤價的20日簡單移動平均的絕對值/收盤價的20日簡單移動平均 DD賦值:以ZZ為權重收盤價的動態移動平均 上賦值:(1+7/100)*DD 下賦值:(1-7/100)*DD 中賦值:(上+下)/2 頂賦值:(1+14/100)*DD 底賦值:(1-14/100)*DD 軌道角度1賦值:((底的5日簡單移動平均/1日前的底的5日簡單移動平均-1)*100的反正切*180/3.14115926),線寬為0 五日角度1賦值:((收盤價的5日簡單移動平均/1日前的收盤價的5日簡單移動平均-1)*100的反正切*180/3.14115926),線寬為0 當滿足條件SYSPARAM(1)=BARPOSANDC>頂時,在最低價位置書寫文字,PXDN27,COLOR0088FF 當滿足條件SYSPARAM(1)=BARPOSANDC<頂時,在最低價位置書寫文字,PXDN27,COLOR666600 當滿足條件SYSPARAM(1)=BARPOSANDC>上時,在最低價位置書寫文字,PXDN52,COLOR0088FF 當滿足條件SYSPARAM(1)=BARPOSANDC<上時,在最低價位置書寫文字,PXDN52,COLOR666600 當滿足條件SYSPARAM(1)=BARPOSANDC>中時,在最低價位置書寫文字,PXDN77,COLOR0088FF 當滿足條件SYSPARAM(1)=BARPOSANDC<中時,在最低價位置書寫文字,PXDN77,COLOR666600 當滿足條件SYSPARAM(1)=BARPOSANDC>下時,在最低價位置書寫文字,PXDN102,COLOR0088FF 當滿足條件SYSPARAM(1)=BARPOSANDC<下時,在最低價位置書寫文字,PXDN102,COLOR666600 當滿足條件SYSPARAM(1)=BARPOSANDC>底時,在最低價位置書寫文字,PXDN127,COLOR0088FF 當滿足條件SYSPARAM(1)=BARPOSANDC<底時,在最低價位置書寫文字,PXDN127,COLOR666600 ZH賦值:22日內最高價的最高值 ZHH賦值:最高價 ZGF1賦值:ZHH/1.0809 ZGF2賦值:ZHH/1.1618 ZGF3賦值:ZHH/1.0809/1.1618 ZGF4賦值:ZHH/1.1618/1.1618 輸出DRAWTEXTEX(收盤價,1,10,650,'第一回調區:'+NUMTOSTR(ZGF1[SYSPARAM(1)],2)+'--'+NUMTOSTR(ZGF2[SYSPARAM(1)],2)+''),COLOR00FF00 輸出DRAWTEXTEX(收盤價,1,10,700,'第二回調區:'+NUMTOSTR(ZGF3[SYSPARAM(1)],2)+'--'+NUMTOSTR(ZGF4[SYSPARAM(1)],2)+''),COLOR00FF00 ZL賦值:22日內最低價的最低值 ZLL賦值:最低價 ZGFB1賦值:ZLL*1.0809 ZGFB2賦值:ZLL*1.1618 ZGFB3賦值:ZLL*1.0809*1.1618 ZGFB4賦值:ZLL*1.1618*1.1618 輸出DRAWTEXTEX(收盤價,1,10,450,'第一壓力區:'+NUMTOSTR(ZGFB1[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(ZGFB2[SYSPARAM(1)],2)+''),COLOR00EEFF 輸出DRAWTEXTEX(收盤價,1,10,500,'第二壓力區:'+NUMTOSTR(ZGFB3[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(ZGFB4[SYSPARAM(1)],2)+''),COLOR00EEFF 輸出DRAWTEXTEX(收盤價,1,10,400,'本次起動價:'+NUMTOSTR(ZL[SYSPARAM(1)],2)+''),COLOR00EEFF 輸出DRAWTEXTEX(收盤價,1,10,600,'預計回調價:'+NUMTOSTR(ZH[SYSPARAM(1)],2)+''),COLOR00DD00 輸出DRAWTEXTEX(收盤價,1,10,50,'收 益: '+ NUMTOSTR(每股收益(全年折算),2)+' 元'),COLORFFB060 輸出DRAWTEXTEX(收盤價,1,120,50,'凈資產: '+NUMTOSTR(每股凈資產,2 )+' 元'),COLORFFB060 輸出DRAWTEXTEX(收盤價,1,10,100,'流通股:'+ NUMTOSTR(流通股本(股)/10000,2)+' 億'),COLORFFB060 輸出DRAWTEXTEX(收盤價,1,120,100,'占總股本:'+NUMTOSTR(流通股本(股)/總股本(股)*100 ,2)+' %'),COLORFFB060 輸出DRAWTEXTEX(收盤價,1,10,150,'負債率:'+ NUMTOSTR(流動資產/流動負債,2)),COLORFFB060 輸出DRAWTEXTEX(收盤價,1,120,150,'主營收入:'+NUMTOSTR(營業收入/10000,1 )+''),COLORFFB060 輸出DRAWTEXTEX(收盤價,1,10,200,'主題投資:'+SELFSTRING('主題投資')),COLORFFB060 DRAWTEXTEX(收盤價,1,10,0,'善謀者，謀勢；不善者，謀子'),COLOR0088FF 輸出 INPUT:KG1(20,1,50) 輸出INPUT:F1(10,1,20) 輸出INPUT:P(10,1,20) 輸出D3X3:收盤價的3日簡單移動平均,SHIFT3,畫洋紅色 KG賦值:如果DATATYPE<=1,返回1,否則返回如果DATATYPE<=3,返回5,否則返回如果DATATYPE<=5,返回10,否則返回KG1 F賦值:如果DATATYPE<=3,返回1,否則返回如果DATATYPE=4,返回3,否則返回如果DATATYPE=5,返回5,否則返回F1 ZX賦值:4KG%的之字轉向 CCH賦值:4KG%之字轉向的前1個波峰值 CCY賦值:4KG%之字轉向的前1個波谷值 輸出CC:如果ZX<1日前的ZX,返回CCH,否則返回CCY,線寬為0 W1賦值:CCH-0.02上穿ZX W2賦值:ZX上穿CCY+0.02

?

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

源碼：

?

{干凈實用的波段主圖}
c1:=C;
N:=10;
LB:=COST(1);
HB:=COST(99);
W:=(HB-LB)/10;
N0:=LB;
N1:=LB+W;
N2:=LB+2*W;
N3:=LB+3*W;
N4:=LB+4*W;
N5:=LB+5*W;
N6:=LB+6*W;
N7:=LB+7*W;
N8:=LB+8*W;
N9:=LB+9*W;
N10:=HB;
A0:=WINNER(N1)*100-WINNER(N0)*100;
A1:=WINNER(N2)*100-WINNER(N1)*100;
A2:=WINNER(N3)*100-WINNER(N2)*100;
A3:=WINNER(N4)*100-WINNER(N3)*100;
A4:=WINNER(N5)*100-WINNER(N4)*100;
A5:=WINNER(N6)*100-WINNER(N5)*100;
A6:=WINNER(N7)*100-WINNER(N6)*100;
A7:=WINNER(N8)*100-WINNER(N7)*100;
A8:=WINNER(N9)*100-WINNER(N8)*100;
A9:=WINNER(N10)*100-WINNER(N9)*100;
xa0:DRAWSL(BARSTATUS=2 and A0>0,(N1+N0)/2,0,N*A0,1),Color262626,LINETHICK4;
xa1:DRAWSL(BARSTATUS=2 and A1>0,(N2+N1)/2,0,N*A1,1),Color262626,LINETHICK4;
xa2:DRAWSL(BARSTATUS=2 and A2>0,(N3+N2)/2,0,N*A2,1),Color262626,LINETHICK4;
xa3:DRAWSL(BARSTATUS=2 and A3>0,(N4+N3)/2,0,N*A3,1),Color262626,LINETHICK4;
xa4:DRawsl(BARSTATUS=2 and A4>0,(N5+N4)/2,0,N*A4,1),Color262626,LINETHICK4;
xa5:DRAWSL(BARSTATUS=2 and A5>0,(N6+N5)/2,0,N*A5,1),Color262626,LINETHICK4;
xa6:DRAWSL(BARSTATUS=2 and A6>0,(N7+N6)/2,0,N*A6,1),Color262626,LINETHICK4;
xa7:DRAWSL(BARSTATUS=2 and A7>0,(N8+N7)/2,0,N*A7,1),Color262626,LINETHICK4;
xa8:DRAWSL(BARSTATUS=2 and A8>0,(N9+N8)/2,0,N*A8,1),Color262626,LINETHICK4;
xa9:DRAWSL(BARSTATUS=2 and A9>0,(N10+N9)/2,0,N*A9,1),Color262626,LINETHICK4;
{K線顏色}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),Color0088FF;
STICKLINE(CLOSE<OPEN,OPEN,CLOSE,8,0),COLOR666600;

?

{融勝軌道}
AA:=MA((2*CLOSE+HIGH+LOW)/4,5);
通1:=AA*102/100;
通2:=AA*(200-102)/100;
ZZ:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,ZZ);
上:=(1+7/100)*DD;
下:=(1-7/100)*DD;
中:=(上+下)/2;
頂:=(1+14/100)*DD;
底:=(1-14/100)*DD;
軌道角度1:=(ATAN((MA(底,5)/REF(MA(底,5),1)-1)*100)*180/3.14115926),LINETHICK0;
五日角度1:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926),LINETHICK0;
DRAWTEXT(SYSPARAM(1)=BARPOS and C>頂,L,'頂 '+NUMTOSTR(頂[SYSPARAM(1)],2)),pxdn27,Color0088FF;
DRAWTEXT(SYSPARAM(1)=BARPOS and C<頂,L,'頂 '+NUMTOSTR(頂[SYSPARAM(1)],2)),pxdn27,COLOR666600;
DRAWTEXT(SYSPARAM(1)=BARPOS and C>上,L,'上 '+NUMTOSTR(上[SYSPARAM(1)],2)),pxdn52,Color0088FF;
DRAWTEXT(SYSPARAM(1)=BARPOS and C<上,L,'上 '+NUMTOSTR(上[SYSPARAM(1)],2)),pxdn52,COLOR666600;
DRAWTEXT(SYSPARAM(1)=BARPOS and C>中,L,'中 '+NUMTOSTR(中[SYSPARAM(1)],2)),pxdn77,Color0088FF;
DRAWTEXT(SYSPARAM(1)=BARPOS and C<中,L,'中 '+NUMTOSTR(中[SYSPARAM(1)],2)),pxdn77,COLOR666600;
DRAWTEXT(SYSPARAM(1)=BARPOS and C>下,L,'下 '+NUMTOSTR(下[SYSPARAM(1)],2)),pxdn102,Color0088FF;
DRAWTEXT(SYSPARAM(1)=BARPOS and C<下,L,'下 '+NUMTOSTR(下[SYSPARAM(1)],2)),pxdn102,COLOR666600;
DRAWTEXT(SYSPARAM(1)=BARPOS and C>底,L,'底 '+NUMTOSTR(底[SYSPARAM(1)],2)),pxdn127,Color0088FF;
DRAWTEXT(SYSPARAM(1)=BARPOS and C<底,L,'底 '+NUMTOSTR(底[SYSPARAM(1)],2)),pxdn127,COLOR666600;
{DRAWTEXT(SYSPARAM(1)=BARPOS and 上,上,'上'+NUMTOSTR(上[SYSPARAM(1)],2)),pxup8,colorwhite;
DRAWTEXT(SYSPARAM(1)=BARPOS and 中,中,'中'+NUMTOSTR(中[SYSPARAM(1)],2)),pxup8,colorYellow;
DRAWTEXT(SYSPARAM(1)=BARPOS and 下,下,'下'+NUMTOSTR(下[SYSPARAM(1)],2)),pxup8,colorwhite;
DRAWTEXT(SYSPARAM(1)=BARPOS and 底,底,'底'+NUMTOSTR(底[SYSPARAM(1)],2)),pxup8,colorgreen;}
ZH:=HHV(H,22);ZHH:=H;
ZGF1:=ZHH/1.0809;ZGF2:=ZHH/1.1618;
ZGF3:=ZHH/1.0809/1.1618;ZGF4:=ZHH/1.1618/1.1618;
DRAWTEXTEX(c,1,10,650,'第一回調區:'+NUMTOSTR(ZGF1[SYSPARAM(1)],2)+'--'+NUMTOSTR(ZGF2[SYSPARAM(1)],2)+''),Color00FF00;
DRAWTEXTEX(c,1,10,700,'第二回調區:'+NUMTOSTR(ZGF3[SYSPARAM(1)],2)+'--'+NUMTOSTR(ZGF4[SYSPARAM(1)],2)+''),Color00FF00;
ZL:=LLV(L,22);ZLL:=L;
ZGFB1:=ZLL*1.0809;ZGFB2:=ZLL*1.1618;ZGFB3:=ZLL*1.0809*1.1618;ZGFB4:=ZLL*1.1618*1.1618;
DRAWTEXTEX(c,1,10,450,'第一壓力區:'+NUMTOSTR(ZGFB1[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(ZGFB2[SYSPARAM(1)],2)+''),Color00EEFF;
DRAWTEXTEX(c,1,10,500,'第二壓力區:'+NUMTOSTR(ZGFB3[SYSPARAM(1)],2)+''+'--'+NUMTOSTR(ZGFB4[SYSPARAM(1)],2)+''),Color00EEFF;
DRAWTEXTEX(c,1,10,400,'本次起動價:'+NUMTOSTR(ZL[SYSPARAM(1)],2)+''),Color00EEFF;
DRAWTEXTEX(c,1,10,600,'預計回調價:'+NUMTOSTR(ZH[SYSPARAM(1)],2)+''),color00DD00;
DRAWTEXTEX(c,1,10,50,'收 益: '+ NUMTOSTR(FINANCE(33),2)+' 元'),ColorFFB060;
DRAWTEXTEX(c,1,120,50,'凈資產: '+NUMTOSTR(FINANCE(34),2 )+' 元'),ColorFFB060;
DRAWTEXTEX(c,1,10,100,'流通股:'+ NUMTOSTR(FINANCE(7)/10000,2)+' 億'),ColorFFB060;
DRAWTEXTEX(c,1,120,100,'占總股本:'+NUMTOSTR(FINANCE(7)/FINANCE(1)*100 ,2)+' %'),ColorFFB060;
DRAWTEXTEX(c,1,10,150,'負債率:'+ NUMTOSTR(FINANCE(11)/FINANCE(15),2)),ColorFFB060;
DRAWTEXTEX(c,1,120,150,'主營收入:'+NUMTOSTR(FINANCE(20)/10000,1 )+''),ColorFFB060;
{DRAWTEXTEX(c,1,10,250,STRLEFT(BLKNAME,90)),Color00FFFF;}
DRAWTEXTEX(c,1,10,200,'主題投資:'+SELFSTRING('主題投資')),ColorFFB060;
DRAWTEXTEX(c,1,10,0,'善謀者，謀勢；不善者，謀子'),Color0088FF;

?

{波段主圖}
input:KG1(20,1,50);
input:F1(10,1,20);
input:P(10,1,20);
D3X3:ma(c,3),SHIFT3,COLORMAGENTA;
KG:=IF(DATATYPE<=1,1,IF(DATATYPE<=3,5,IF(DATATYPE<=5,10,KG1)));
F:=IF(DATATYPE<=3,1,IF(DATATYPE=4,3,IF(DATATYPE=5,5,F1)));
ZX:=ZIG(4,KG);
CCH:=PEAK(4,KG,1);
CCY:=TROUGH(4,KG,1);
CC:IF(ZX<REF(ZX,1),CCH,CCY),LINETHICK0;
W1:=CROSS(CCH-0.02,ZX);
W2:=CROSS(ZX,CCY+0.02);
FD:=F/100;
YS:=IF(ZX<REF(ZX,1),FD,-FD);
W:=IF(ZX<REF(ZX,1),W1,W2);
H1:REF(CC*(1-YS*1),BARSLAST(W)),LINETHICK0;
H2:REF(CC*(1-YS*2),BARSLAST(W)),LINETHICK0;
H3:REF(CC*(1-YS*3),BARSLAST(W)),LINETHICK0;
H4:REF(CC*(1-YS*4),BARSLAST(W)),LINETHICK0;
H5:REF(CC*(1-YS*5),BARSLAST(W)),LINETHICK0;
H6:REF(CC*(1-YS*6),BARSLAST(W)),LINETHICK0;
H7:REF(CC*(1-YS*7),BARSLAST(W)),LINETHICK0;
H8:REF(CC*(1-YS*8),BARSLAST(W)),LINETHICK0;
H9:REF(CC*(1-YS*9),BARSLAST(W)),LINETHICK0;
H10:REF(CC*(1-YS*10),BARSLAST(W)),LINETHICK0;
H11:REF(CC*(1-YS*11),BARSLAST(W)),LINETHICK0;
H12:REF(CC*(1-YS*12),BARSLAST(W)),LINETHICK0;
H13:REF(CC*(1-YS*13),BARSLAST(W)),LINETHICK0;
H14:REF(CC*(1-YS*14),BARSLAST(W)),LINETHICK0;
H15:REF(CC*(1-YS*15),BARSLAST(W)),LINETHICK0;
HHD:=SYSPARAM(4);
LLD:=SYSPARAM(5);
系數:=IF(DATATYPE=2,1.00005,IF(DATATYPE<6,1.0005,1.002));
STICKLINE(CC>=LLD AND CC<=HHD,CC,CC*系數,20,0),colorFF;
STICKLINE(CC>=LLD AND CC<=HHD,H1,H1,5,0),colorA0A0A0;
STICKLINE(H1>LLD AND H1<HHD,H2,H2,5,0),colorA0A0A0;
STICKLINE(H2>LLD AND H2<HHD,H3,H3,5,0),colorA0A0A0;
STICKLINE(H3>LLD AND H3<HHD,H4,H4,5,0),colorA0A0A0;
STICKLINE(H4>LLD AND H4<HHD,H5,H5,5,0),colorA0A0A0;
STICKLINE(H5>LLD AND H5<HHD,H6,H6,5,0),colorA0A0A0;
STICKLINE(H6>LLD AND H6<HHD,H7,H7,5,0),colorA0A0A0;
STICKLINE(H7>LLD AND H7<HHD,H8,H8,5,0),colorA0A0A0;
STICKLINE(H8>LLD AND H8<HHD,H9,H9,5,0),colorA0A0A0;
STICKLINE(H9>LLD AND H9<HHD,H10,H10,5,0),colorA0A0A0;
STICKLINE(H10>LLD AND H10<HHD,H11,H11,5,0),colorA0A0A0;
STICKLINE(H11>LLD AND H11<HHD,H12,H12,5,0),colorA0A0A0;
STICKLINE(H12>LLD AND H12<HHD,H13,H13,5,0),colorA0A0A0;
STICKLINE(H13>LLD AND H13<HHD,H14,H14,5,0),colorA0A0A0;
STICKLINE(H14>LLD AND H14<HHD,H15,H15,5,0),colorA0A0A0;
DRAWTEXT(W AND CC>=LLD AND CC<=HHD,H1,''+NUMTOSTR(F*1,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H1>LLD AND H1<HHD,H2,''+NUMTOSTR(F*2,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H2>LLD AND H2<HHD,H3,''+NUMTOSTR(F*3,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H3>LLD AND H3<HHD,H4,''+NUMTOSTR(F*4,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H4>LLD AND H4<HHD,H5,''+NUMTOSTR(F*5,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H5>LLD AND H5<HHD,H6,''+NUMTOSTR(F*6,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H6>LLD AND H6<HHD,H7,''+NUMTOSTR(F*7,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H7>LLD AND H7<HHD,H8,''+NUMTOSTR(F*8,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H8>LLD AND H8<HHD,H9,''+NUMTOSTR(F*9,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H9>LLD AND H9<HHD,H10,''+NUMTOSTR(F*10,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H10>LLD AND H10<HHD,H11,''+NUMTOSTR(F*11,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H11>LLD AND H11<HHD,H12,''+NUMTOSTR(F*12,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H12>LLD AND H12<HHD,H13,''+NUMTOSTR(F*13,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H13>LLD AND H13<HHD,H14,''+NUMTOSTR(F*14,0)+'%'),PXDN5,colorA0A0A0;
DRAWTEXT(W AND H14>LLD AND H14<HHD,H15,''+NUMTOSTR(F*15,0)+'%'),PXDN5,colorA0A0A0;
AK1:=BARSLAST(W1)+1;
BK1:=BARSLAST(W2)+1;
目前:=IF(BK1>AK1,AK1,BK1);
DRAWNUMBER(W1,CC,REF(目前,1),0),ALIGN2,PXUP30,colorFF00FF;
DRAWNUMBER(W2,CC,REF(目前,1),0),ALIGN2,PXDN10,colorFF00;
方向:=IF(CC=CCH,'下行 ','上升 ');
周期:=IF(DATATYPE=6,'天 ',IF(DATATYPE=7,'周 ',IF(DATATYPE=8,'月 ','單位')));
DRAWTEXTEX(CC=CCH,1,320,0,'目前波段'+方向+NUMTOSTR(目前,0)+周期),COLOR666600;
DRAWTEXTEX(CC<>CCH,1,320,0,'目前波段'+方向+NUMTOSTR(目前,0)+周期),Color0088FF;
DRAWTEXT(W1,CC,''+周期),PXUP30,colorFF00FF;
DRAWTEXT(W2,CC,''+周期),PXDN10,colorFF00;
{p:10,1,30}
X1:=TROUGH(4,P,1);
X8:=TROUGHBARS(4,P,1)=0;
X11:=TROUGHBARS(4,P,2);
X18:=TROUGHBARS(4,P,1);
X13:=TROUGHBARS(4,P,1);
X3:=PEAK(4,P,1);
X31:=PEAKBARS(4,P,2);
X38:=PEAKBARS(4,P,1);
X33:=PEAKBARS(4,P,1);
X5:=PEAKBARS(4,P,1)=0;
光標位置:=SYSPARAM(1);
CLDIS:=X13[SYSPARAM(1)];
CHDIS:=X33[SYSPARAM(1)];
TCL:=光標位置-CLDIS;
TCH:=光標位置-CHDIS;
BLDIS:=X18[SYSPARAM(1)];
BHDIS:=X38[SYSPARAM(1)];
TBL:=光標位置-BLDIS;
TBH:=光標位置-BHDIS;
ALDIS:=X11[SYSPARAM(1)];
AHDIS:=X31[SYSPARAM(1)];
TAL:=光標位置-ALDIS;
TAH:=光標位置-AHDIS;
K一浪A:=IF(TCL>TCH,TAL,TAH);
K二浪B:=IF(TCL>TCH,TBH,TBL);
K三浪C:=IF(TCL>TCH,TCL,TCH);
PH:=HIGH;
PL:=LOW;
P一浪A:IF(TCL>TCH,PL[TAL+0],PH[TAH+0]),LINETHICK0;
P二浪B:IF(TCL>TCH,PH[TBH+0],PL[TBL+0]),LINETHICK0;
P三浪C:IF(TCL>TCH,PL[TCL+0],PH[TCH+0]),LINETHICK0;
DRAWLINE(BARPOS=K一浪A,P一浪A,BARPOS=K二浪B,P二浪B,0),LINEDOT,color77FFFF;
DRAWLINE(BARPOS=K二浪B,P二浪B,BARPOS=K三浪C,P三浪C,0),LINEDOT,color77FFFF;
一浪長:=P二浪B-P一浪A;
Y1:=一浪長;
P1:=P三浪C+Y1;
VERTLINE(BARPOS=K三浪C),LINEDOT,colorFFFF;
DRAWTEXT(BARPOS=K三浪C,SYSPARAM(4)*0.95,'轉\n \n\n折\n \n點'),colorFFFF;
Y0618:=一浪長*0.618;
P0618:=P三浪C+Y0618;
PARTLINE(BARPOS>K三浪C,P0618),colorCCFF;
DRAWTEXT(BARPOS=K三浪C,P0618,' '+NUMTOSTR(P0618,3)+' cop'),colorCCFF;
Y1000:=一浪長*1;
P1000:=P三浪C+Y1000;
PARTLINE(BARPOS>K三浪C,P1000),colorCCFF;
DRAWTEXT(BARPOS=K三浪C,P1000,' '+NUMTOSTR(P1000,3)+' op'),colorCCFF;
Y1618:=一浪長*1.618;
P1618:=P三浪C+Y1618;
PARTLINE(BARPOS>K三浪C,P1618),colorCCFF;
DRAWTEXT(BARPOS=K三浪C,P1618,' '+NUMTOSTR(P1618,3)+' xop'),colorCCFF;
DK:=MA(CLOSE,7);
{STICKLINE(DK<=CLOSE AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorFF;
STICKLINE(DK<=CLOSE AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorFF;
STICKLINE(DK<=CLOSE AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorFF;
STICKLINE(DK<=CLOSE AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorFF;
STICKLINE(DK>CLOSE AND CLOSE>=OPEN,HIGH,LOW,0.1,1),colorFF00;
STICKLINE(DK>CLOSE AND CLOSE>=OPEN,CLOSE,OPEN,8,1),colorFF00;
STICKLINE(DK>CLOSE AND CLOSE<OPEN,HIGH,LOW,0.1,0),colorFF00;
STICKLINE(DK>CLOSE AND CLOSE<OPEN,CLOSE,OPEN,8,0),colorFF00;}
當前月:=FRACPART(ROUND(CURRENTDATE/100)/100)*100;
月:=MONTH;
日:=DAY;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='1',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:5(小寒)、6、15、20(大寒)、21、*25\n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='2',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:4(立春)、6、15、18(雨水)21\n \n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='3',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:5(驚蟄)、6、15、*20(春分)、21\n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='4',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:4(清明)、6、15、20(谷雨)21\n \n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='5',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:5(立夏)、6、*12、15、21(小滿)\n \n \n \n \n'),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='6',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:5(芒種)、6、*14、21(夏至)\n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='7',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:7(小暑)、8、15、*19、23(大暑)\n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='8',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:*6、7(立秋)、8、18、23(處暑)\n \n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='9',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:7(白露)、8、15、*18、23(秋分)\n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='10',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:8(寒露)、15、23(霜降)、*31\n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='11',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:7(立冬)、8、15、22(小雪)23、*28\n \n \n \n \n \n '),ALIGN5,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS AND NUMTOSTR(當前月,0)='12',CLOSE,NUMTOSTR(當前月,0)+'月時間之窗:7(大雪)、8、15、22(冬至)23、*31\n \n \n \n \n \n '),ALIGN5,colorFFFF;{程序化交易 www.tumamayizhan.com }

?

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

?