相關標簽:

?

{喇叭戰法} {主圖指標}

?

原理解析：
N賦值:5 M賦值:3 VAR0賦值:((收盤價的5日指數移動平均) * 7 + (收盤價的10日指數移動平均) * 3) / 10 VAR1賦值:如果(年份)>=(2025),返回0,否則返回1 VAR2賦值:最低價的21日指數移動平均+(6.8)*(最低價的2日估算標準差)的55日指數移動平均 VAR3賦值:((收盤價/(VAR2))*((1.88)*收盤價+最低價+開盤價))/(2.75)的3日指數移動平均 VAR4賦值:(((VAR3) - (VAR2)) / (VAR2)) / 2 VAR5賦值:((VAR3)-((VAR4)*(VAR3))的5日指數移動平均) * (VAR1) 輸出黃金軌道:(如果(VAR0)>(VAR5),返回VAR0,否則返回VAR5) * (VAR1),線寬為2,畫黃色 輸出上軌:如果((VAR5)<(VAR0))AND((VAR5)<(收盤價*(0.15))),返回(收盤價的300日指數移動平均)-(3*(收盤價的300日估算標準差)),否則返回VAR5,線寬為2,畫黃色 如果(VAR5)>(VAR0),返回上軌,否則返回無效數,COLOR00FF00,線寬為2 輸出開口XG:條件連續成立次數=1,NODRAW 當滿足條件開口XG時,在上軌和黃金軌道的較小值*0.96位置畫11號圖標 VAR6賦值:(1日前的收盤價) * (0.95) VAR7賦值:(3日前的收盤價) * (0.875) VAR8賦值:VAR6和VAR7的較小值 VAR9賦值:((收盤價-(1日前的收盤價)和0的較大值的9日[1日權重]移動平均) / (收盤價-(1日前的收盤價)的絕對值的9日[1日權重]移動平均)) * (100) VAR10賦值:(((收盤價-(1日前的收盤價)和0的較大值的24日[1日權重]移動平均) / (收盤價-(1日前的收盤價)的絕對值的24日[1日權重]移動平均)) * (100)) * (VAR1) 如果(((VAR8)=(VAR6))AND((VAR0)>(VAR5)))AND((VAR10)>(64.5)),返回上軌,否則返回無效數,畫白色,線寬為2 VAR11賦值:(以((((3.48)*收盤價+最高價+最低價)/4)-(收盤價的20日指數移動平均)的絕對值)/(收盤價的20日指數移動平均)為權重((2.15)*收盤價+最低價+最高價)/4的動態移動平均的200日指數移動平均) * (0.968 + 15 / (100)) VAR12賦值:收盤價的26日簡單移動平均 + 2 * (收盤價的26日估算標準差) VAR13賦值:((收盤價-(1日前的收盤價)和0的較大值的14日[1日權重]移動平均) / (收盤價-(1日前的收盤價)的絕對值的14日[1日權重]移動平均)) * (100) VAR14賦值:(收盤價的60日指數移動平均 + 收盤價的120日指數移動平均 + 收盤價的240日指數移動平均 + 收盤價的480日指數移動平均) / 4 VAR15賦值:VAR14 + (1.91) * (VAR14的3日估算標準差) VAR16賦值:(VAR15的12日指數移動平均) * (1.23) 當滿足條件(((VAR10)>=(64.5))AND((VAR13)>=65))AND((收盤價的1日簡單移動平均)>(VAR16))時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色 當滿足條件(((VAR10)>=65)AND(平盤))AND((收盤價的1日簡單移動平均)>(VAR16))時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色 當滿足條件(((VAR10)>65)AND((VAR13)>=65))AND((收盤價的1日簡單移動平均)>(VAR16))時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫紅色 當滿足條件((((VAR10)>=(64.5))AND((VAR13)>=65))AND((VAR13)>(VAR10)))AND(收盤價<上軌)時,在開盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫紅色 當滿足條件((((VAR10)>=(64.5))AND((VAR13)>=65))AND((VAR13)>(VAR10)))AND(收盤價<上軌)時,在收盤價和最高價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫紅色 VAR17賦值:(收盤價的3日簡單移動平均 + 收盤價的6日簡單移動平均 + 收盤價的12日簡單移動平均 + 收盤價的24日簡單移動平均) / 4 如果(VAR0)>(VAR5),返回VAR17+3*(VAR17的10日估算標準差),否則返回無效數,COLORFF00FF,線寬為1 VAR18賦值:(((((((((收盤價-(1日前的收盤價)和0的較大值的24日[1日權重]移動平均) / (收盤價-(1日前的收盤價)的絕對值的24日[1日權重]移動平均)) * (100)) > 65) AND ((VAR0) > (收盤價的13日指數移動平均))) AND ((收盤價的13日指數移動平均) > (收盤價的55日指數移動平均))) AND ((VAR12) > (1日前的VAR12))) AND (收盤價 > ((最高價+最低價+收盤價)/3的13日指數移動平均))) AND ((收盤價的5日簡單移動平均) > (收盤價的10日簡單移動平均))) AND ((5日內收盤價的最高值上穿(最高價的10日簡單移動平均)*(1+5/(100))) AND ((((收盤價 - (1日前的收盤價)) / (1日前的收盤價)) * (100)) > (6.5))) 當滿足條件(VAR18)>0時,在最低價位置書寫文字,線寬為1,畫黃色 VAR19賦值:((收盤價-(1日前的收盤價))/(3日前的收盤價)的8日指數移動平均) * (100) 當滿足條件((((((((收盤價>=((1日前的收盤價)*(1.095)))AND(平盤))AND(最低價<收盤價))AND(收盤價>(VAR5)))AND((VAR19)<=6))AND((VAR19)>1))>0)AND((VAR9)>(VAR10)))AND((VAR9)>(64.5))時,在收盤價位置書寫文字,畫黃色 VAR20賦值:((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND (收盤價 > (VAR16))) AND (收盤價 > ((最高價的30日簡單移動平均) * (1 + 15 / (100)))) 如果((((VAR0)>(VAR5))AND((VAR20)>0))AND((VAR17+3*(VAR17的10日估算標準差))>(1日前的VAR17+3*(VAR17的10日估算標準差))))AND((VAR17+3*(VAR17的10日估算標準差))>(60日內收盤價的5日簡單移動平均的最高值)),返回VAR17+3*(VAR17的10日估算標準差),否則返回無效數,COLORFF00FF,線寬為3 VAR22賦值:(收盤價-(1日前的收盤價))/(3日前的收盤價)的8日指數移動平均的2日指數移動平均的2日指數移動平均的2日指數移動平均的3日指數移動平均 當滿足條件1時,在橫軸0縱軸0.9位置書寫文字COLOR00FFFF Z1賦值:字符串相加 Z2賦值:字符串相加 Z3賦值:字符串相加 當滿足條件是否最后一個周期時,在橫軸0.1縱軸0.9位置書寫文字,COLOR00FFFF VAR23賦值:(1日前的(收盤價-(1日前的收盤價))/(1日前的收盤價)) * (100) 當滿足條件((((收盤價>=((1日前的收盤價)*(1.095)))AND(平盤))AND(最低價<收盤價))AND((VAR19)>1))>0時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫白色 當滿足條件((((收盤價>=((1日前的收盤價)*(1.095)))AND(平盤))AND(最低價<收盤價))AND((VAR19)>1))>0時,在最低價和收盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫白色 當滿足條件VAR9上穿21時,在開盤價和收盤價位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,畫白色 VAR24賦值:統計120日中滿足(((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>8的天數 當滿足條件到最后交易的周期=1時,在橫軸0.145縱軸0位置書寫數字,畫黃色 當滿足條件到最后交易的周期=1時,在橫軸0縱軸0位置書寫文字,畫黃色 當滿足條件到最后交易的周期=1時,在橫軸0.16縱軸0位置書寫文字,畫黃色 VAR25賦值:收盤價 * 成交量(手) VAR26賦值:((VAR25的3日指數移動平均)/(成交量(手)的3日指數移動平均)+(VAR25的6日指數移動平均)/(成交量(手)的6日指數移動平均)+(VAR25的12日指數移動平均)/(成交量(手)的12日指數移動平均)+(VAR25的24日指數移動平均)/(成交量(手)的24日指數移動平均))/4的13日指數移動平均 VAR27賦值:(1.06) * (VAR26) 當滿足條件((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>(5.5))AND((最低價/((最高價+1日前的收盤價+開盤價)/3))*收盤價上穿(收盤價的9日指數移動平均)*(1.14)的5日指數移動平均)時,在最低價-(0.15)的1日指數移動平均位置書寫文字,COLORF00FF0 當滿足條件(((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>(8.5))AND(收盤價的1日簡單移動平均上穿(最高價的10日指數移動平均)*(1+5/(100))))AND(收盤價的1日簡單移動平均上穿VAR27)時,在(最低價+最高價+開盤價)/3和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色 當滿足條件(((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>(8.5))AND(收盤價的1日簡單移動平均上穿(最高價的10日指數移動平均)*(1+5/(100))))AND(收盤價的1日簡單移動平均上穿VAR27)時,在(最低價+最高價+開盤價)/3和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF0099 VAR28賦值:((收盤價 - (9日內最低價的最低值)) / ((9日內最高價的最高值) - (9日內最低價的最低值))) * (100) VAR29賦值:VAR28的3日[1日權重]移動平均 VAR30賦值:VAR29的3日[1日權重]移動平均 VAR31賦值:(3 * (VAR29)) - (2 * (VAR30)) VAR32賦值:((最高價 - 最低價) / (1日前的收盤價)) * (100) VAR33賦值:((收盤價 - 開盤價) / (1日前的收盤價)) * (100) VAR34賦值:((開盤價 - 最低價) / (1日前的收盤價)) * (100) VAR35賦值:((最高價 - 收盤價) / (1日前的收盤價)) * (100) VAR36賦值:(VAR32) / (1.5) 當滿足條件((((((VAR32)>7)AND((VAR36)>(4.5)))AND((VAR35)<(5.5)))AND((VAR35)<(VAR34)))AND(VAR33位于-2.5和2.5之間))AND((VAR31)<(100))時,在開盤價和最高價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫紅色 當滿足條件((((((VAR32)>7)AND((VAR36)>(4.5)))AND((VAR35)<(5.5)))AND((VAR35)<(VAR34)))AND(VAR33位于-2.5和2.5之間))AND((VAR31)<(100))時,在開盤價和收盤價位置之間畫柱狀線,寬度為3.5,0不為0則畫空心柱.,畫紅色 當滿足條件((((((VAR32)>7)AND((VAR36)>(4.5)))AND((VAR35)<(5.5)))AND((VAR35)<(VAR34)))AND(VAR33位于-2.5和2.5之間))AND((VAR31)<(100))時,在收盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORF00FF0 當滿足條件((((VAR32)>2)AND((VAR34)>(VAR33)))AND(最高價=收盤價))AND(((((((收盤價>=((1日前的收盤價)*(1.095)))AND(最低價<收盤價))AND((VAR19)<=6))AND((VAR19)>1))AND((VAR9)>(VAR10)))AND((VAR9)>64))>0)時,在最低價位置書寫文字,畫黃色 當滿足條件(((((1日前的((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))<-4)AND((1日前的VAR32)>5))AND(開盤價>(1日前的收盤價)))AND((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>3))AND(開盤價<(1日前的開盤價))時,在收盤價和收盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫黃色 當滿足條件(((((1日前的((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))<-4)AND((1日前的VAR32)>5))AND(開盤價>(1日前的收盤價)))AND((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>3))AND(開盤價<(1日前的開盤價))時,在開盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫黃色 當滿足條件(((((1日前的((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))<-4)AND((1日前的VAR32)>5))AND(開盤價>(1日前的收盤價)))AND((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>3))AND(開盤價<(1日前的開盤價))時,在最低價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫黃色 當滿足條件(((((1日前的((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))<-4)AND((1日前的VAR32)>5))AND(開盤價>(1日前的收盤價)))AND((((收盤價-(1日前的收盤價))/(1日前的收盤價))*(100))>3))AND(開盤價<(1日前的開盤價))時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色 輸出壓線:60日內收盤價的N日簡單移動平均的最高值,畫綠色

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

N:=5;M:=3;
{DRAWGBKLAST(C > 0,'$RGB(60,60,60)$RGB(0,0,0)$0');
DRAWGBKLAST((("RSI.RSI2") > ("RSI.RSI3")) AND (("RSI.RSI3") > (60.5)),'$RGB(0,0,0)$RGB(100,100,100)$1');}
VAR0:=((EMA(C,5)) * 7 + (EMA(C,10)) * 3) / 10;
VAR1:=IF((YEAR) >= (2025),0,1);
VAR2:=EMA(EMA(L,21) + (6.8) * (STD(L,2)),55);
VAR3:=EMA(((C / (VAR2)) * ((1.88) * C + L + O)) / (2.75),3);
VAR4:=(((VAR3) - (VAR2)) / (VAR2)) / 2;
VAR5:=(EMA((VAR3) - ((VAR4) * (VAR3)),5)) * (VAR1);
黃金軌道:(IF((VAR0) > (VAR5),VAR0,VAR5)) * (VAR1),LINETHICK2,COLORYELLOW;
上軌:IF(((VAR5) < (VAR0)) AND ((VAR5) < (C * (0.15))),(EMA(C,300)) - (3 * (STD(C,300))),VAR5),LINETHICK2,COLORYELLOW;
IF((VAR5) > (VAR0),上軌,DRAWNULL),COLOR00FF00,LINETHICK2;
開口XG:BARSLASTCOUNT(黃金軌道!=上軌)=1,NODRAW;
DRAWICON(開口XG,MIN(上軌,黃金軌道)*0.96,11);
VAR6:=(REF(C,1)) * (0.95);
VAR7:=(REF(C,3)) * (0.875);
VAR8:=MIN(VAR6,VAR7);
VAR9:=((SMA(MAX(C - (REF(C,1)),0),9,1)) / (SMA(ABS(C - (REF(C,1))),9,1))) * (100);
VAR10:=(((SMA(MAX(C - (REF(C,1)),0),24,1)) / (SMA(ABS(C - (REF(C,1))),24,1))) * (100)) * (VAR1);
IF((((VAR8) = (VAR6)) AND ((VAR0) > (VAR5))) AND ((VAR10) > (64.5)),上軌,DRAWNULL),COLORWHITE,LINETHICK2;
{STICKLINE((VAR6) = (VAR8),C,O,2.5,0),COLORBLUE;
STICKLINE((VAR6) = (VAR8),H,L,0,0),COLORBLUE;}
VAR11:=(EMA(DMA(((2.15) * C + L + H) / 4,(ABS((((3.48) * C + H + L) / 4) - (EMA(C,20)))) / (EMA(C,20))),200)) * (0.968 + 15 / (100));
{DRAWTEXT(((CROSS((HHV(H,13)) - (((HHV(H,13)) - (LLV(L,13))) * (0.382)),VAR5)) AND (C > (VAR5))) AND (H > (VAR11)),VAR5,'買入'),LINETHICK2,COLORWHITE;}
VAR12:=MA(C,26) + 2 * (STD(C,26));
VAR13:=((SMA(MAX(C - (REF(C,1)),0),14,1)) / (SMA(ABS(C - (REF(C,1))),14,1))) * (100);
VAR14:=(EMA(C,60) + EMA(C,120) + EMA(C,240) + EMA(C,480)) / 4;
VAR15:=VAR14 + (1.91) * (STD(VAR14,3));
VAR16:=(EMA(VAR15,12)) * (1.23);
STICKLINE((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16)),C,O,3,0),COLORRED;
STICKLINE((((VAR10) >= 65) AND (C = O)) AND ((MA(C,1)) > (VAR16)),C,O,3,0),COLORRED;
STICKLINE((((VAR10) > 65) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16)),H,L,0,0),COLORRED;
STICKLINE(((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((VAR13) > (VAR10))) AND (C < 上軌),O,L,0,0),COLORRED;
STICKLINE(((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((VAR13) > (VAR10))) AND (C < 上軌),C,H,0,0),COLORRED;
VAR17:=(MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4;
{VAR17 + 3 * (STD(VAR17,10)),LINETHICK3;}
IF((VAR0) > (VAR5),VAR17 + 3 * (STD(VAR17,10)),DRAWNULL),COLORFF00FF,LINETHICK1;
VAR18:=(((((((((SMA(MAX(C - (REF(C,1)),0),24,1)) / (SMA(ABS(C - (REF(C,1))),24,1))) * (100)) > 65) AND ((VAR0) > (EMA(C,13)))) AND ((EMA(C,13)) > (EMA(C,55)))) AND ((VAR12) > (REF(VAR12,1)))) AND (C > (EMA((H + L + C) / 3,13)))) AND ((MA(C,5)) > (MA(C,10)))) AND ((CROSS(HHV(C,5),(MA(H,10)) * (1 + 5 / (100)))) AND ((((C - (REF(C,1))) / (REF(C,1))) * (100)) > (6.5)));
DRAWTEXT((VAR18) > 0,L,'漲停追擊'),LINETHICK1,COLORYELLOW;
VAR19:=(EMA((C - (REF(C,1))) / (REF(C,3)),8)) * (100);
DRAWTEXT(((((((((C >= ((REF(C,1)) * (1.095))) AND (C = O)) AND (L < C)) AND (C > (VAR5))) AND ((VAR19) <= 6)) AND ((VAR19) > 1)) > 0) AND ((VAR9) > (VAR10))) AND ((VAR9) > (64.5)),C,'T字戰法'),COLORYELLOW;
VAR20:=((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND (C > (VAR16))) AND (C > ((MA(H,30)) * (1 + 15 / (100))));
IF(((((VAR0) > (VAR5)) AND ((VAR20) > 0)) AND ((VAR17 + 3 * (STD(VAR17,10))) > (REF(VAR17 + 3 * (STD(VAR17,10)),1)))) AND ((VAR17 + 3 * (STD(VAR17,10))) > (HHV(MA(C,5),60))),VAR17 + 3 * (STD(VAR17,10)),DRAWNULL),COLORFF00FF,LINETHICK3;
{DRAWTEXT((((VAR6) = (VAR8)) AND (C > (MA(C,20)))) AND ((MA(C,5)) > (MA(C,20))),L,'反彈'),COLORWHITE;}VAR22:=EMA(EMA(EMA(EMA(EMA((C - (REF(C,1))) / (REF(C,3)),8),2),2),2),3);
{DRAWTEXT(FILTER(((CROSS(EMA((C - (REF(C,1))) / (REF(C,3)),8),VAR22))) > 0,10),L,'抄底'),COLORYELLOW;}
DRAWTEXT_FIX(1,0,0.9,0,'所屬板塊:')COLOR00FFFF;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0.1,0.9,0,STRCAT(Z3,GNBLOCK)),COLOR00FFFF;
VAR23:=(REF((C - (REF(C,1))) / (REF(C,1)),1)) * (100);
STICKLINE(((((C >= ((REF(C,1)) * (1.095))) AND (C = O)) AND (L < C)) AND ((VAR19) > 1)) > 0,C,O,5,0),COLORWHITE;
STICKLINE(((((C >= ((REF(C,1)) * (1.095))) AND (C = O)) AND (L < C)) AND ((VAR19) > 1)) > 0,L,C,0,0),COLORWHITE;
STICKLINE(CROSS(VAR9,21),O,C,4,1),COLORWHITE;
VAR24:=COUNT((((C - (REF(C,1))) / (REF(C,1))) * (100)) > 8,120);DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0,0,VAR24),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'【股票活躍度】 '),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.16,0,0,'級: '),COLORYELLOW;
VAR25:=C * V;
VAR26:=EMA(((EMA(VAR25,3)) / (EMA(V,3)) + (EMA(VAR25,6)) / (EMA(V,6)) + (EMA(VAR25,12)) / (EMA(V,12)) + (EMA(VAR25,24)) / (EMA(V,24))) / 4,13);
VAR27:=(1.06) * (VAR26);
DRAWTEXT(((((C - (REF(C,1))) / (REF(C,1))) * (100)) > (5.5)) AND (CROSS((L / ((H + REF(C,1) + O) / 3)) * C,EMA((EMA(C,9)) * (1.14),5))),EMA(L - (0.15),1),'▲'),COLORF00FF0;
STICKLINE((((((C - (REF(C,1))) / (REF(C,1))) * (100)) > (8.5)) AND (CROSS(MA(C,1),(EMA(H,10)) * (1 + 5 / (100))))) AND (CROSS(MA(C,1),VAR27)),(L + H + O) / 3,O,3,0),COLORRED;
STICKLINE((((((C - (REF(C,1))) / (REF(C,1))) * (100)) > (8.5)) AND (CROSS(MA(C,1),(EMA(H,10)) * (1 + 5 / (100))))) AND (CROSS(MA(C,1),VAR27)),(L + H + O) / 3,C,3,0),COLORFF0099;
VAR28:=((C - (LLV(L,9))) / ((HHV(H,9)) - (LLV(L,9)))) * (100);
VAR29:=SMA(VAR28,3,1);
VAR30:=SMA(VAR29,3,1);
VAR31:=(3 * (VAR29)) - (2 * (VAR30));
VAR32:=((H - L) / (REF(C,1))) * (100);
VAR33:=((C - O) / (REF(C,1))) * (100);
VAR34:=((O - L) / (REF(C,1))) * (100);
VAR35:=((H - C) / (REF(C,1))) * (100);
VAR36:=(VAR32) / (1.5);
STICKLINE(((((((VAR32) > 7) AND ((VAR36) > (4.5))) AND ((VAR35) < (5.5))) AND ((VAR35) < (VAR34))) AND (BETWEEN(VAR33,-2.5,2.5))) AND ((VAR31) < (100)),O,H,0,0),COLORRED;
STICKLINE(((((((VAR32) > 7) AND ((VAR36) > (4.5))) AND ((VAR35) < (5.5))) AND ((VAR35) < (VAR34))) AND (BETWEEN(VAR33,-2.5,2.5))) AND ((VAR31) < (100)),O,C,3.5,0),COLORRED;
STICKLINE(((((((VAR32) > 7) AND ((VAR36) > (4.5))) AND ((VAR35) < (5.5))) AND ((VAR35) < (VAR34))) AND (BETWEEN(VAR33,-2.5,2.5))) AND ((VAR31) < (100)),C,L,0,0),COLORF00FF0;
DRAWTEXT(((((VAR32) > 2) AND ((VAR34) > (VAR33))) AND (H = C)) AND (((((((C >= ((REF(C,1)) * (1.095))) AND (L < C)) AND ((VAR19) <= 6)) AND ((VAR19) > 1)) AND ((VAR9) > (VAR10))) AND ((VAR9) > 64)) > 0),L,'錘法→'),COLORYELLOW;
STICKLINE((((((REF(((C - (REF(C,1))) / (REF(C,1))) * (100),1)) < -4) AND ((REF(VAR32,1)) > 5)) AND (O > (REF(C,1)))) AND ((((C - (REF(C,1))) / (REF(C,1))) * (100)) > 3)) AND (O < (REF(O,1))),C,C,5,0),COLORYELLOW;
STICKLINE((((((REF(((C - (REF(C,1))) / (REF(C,1))) * (100),1)) < -4) AND ((REF(VAR32,1)) > 5)) AND (O > (REF(C,1)))) AND ((((C - (REF(C,1))) / (REF(C,1))) * (100)) > 3)) AND (O < (REF(O,1))),O,O,5,0),COLORYELLOW;
STICKLINE((((((REF(((C - (REF(C,1))) / (REF(C,1))) * (100),1)) < -4) AND ((REF(VAR32,1)) > 5)) AND (O > (REF(C,1)))) AND ((((C - (REF(C,1))) / (REF(C,1))) * (100)) > 3)) AND (O < (REF(O,1))),L,O,0,0),COLORYELLOW;
STICKLINE((((((REF(((C - (REF(C,1))) / (REF(C,1))) * (100),1)) < -4) AND ((REF(VAR32,1)) > 5)) AND (O > (REF(C,1)))) AND ((((C - (REF(C,1))) / (REF(C,1))) * (100)) > 3)) AND (O < (REF(O,1))),C,O,3,0),COLORYELLOW;{DRAWTEXT(CROSS(COST(95),EMA(COST(95),10)),COST(95),'異'),COLORGREEN;}
壓線:HHV(MA(C,N),60),COLORGREEN;
大壓線:HHV(MA(H,M),120),COLORGREEN;
IF((大壓線) > (REF(大壓線,1)),大壓線,DRAWNULL),COLORYELLOW,LINETHICK1;
IF(C > 壓線,壓線,DRAWNULL),COLOR00FFFF,LINETHICK1;DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.1,0,VAR19),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.1,0,'【強度關注2級以上】 '),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.2,0.1,0,'級: '),COLORYELLOW;
天界:(EMA(H,11)) * (1 + (5.2) / (100)),NODRAW;VAR37:=((L + H) / 2);
VAR38:=(EMA((O + C + L + H) / 4,1));
VAR39:=(EMA((C + L + H) / 3,1));
STICKLINE((((((((VAR10) > (64.5)) AND (C > (MA(C,5)))) AND ((VAR17 + 3 * (STD(VAR17,10))) > (REF(VAR17 + 3 * (STD(VAR17,10)),1)))) AND (C > (VAR17 + 3 * (STD(VAR17,10))))) AND (C > (VAR5))) AND ((VAR18) > 0)) AND ((V >= ((REF(V,1)) * 2)) OR (V >= ((REF(V,3)) * 4))),VAR39,C,3,0),COLORYELLOW;
STICKLINE((((((((VAR10) > (64.5)) AND (C > (MA(C,5)))) AND ((VAR17 + 3 * (STD(VAR17,10))) > (REF(VAR17 + 3 * (STD(VAR17,10)),1)))) AND (C > (VAR17 + 3 * (STD(VAR17,10))))) AND (C > (VAR5))) AND ((VAR18) > 0)) AND ((V >= ((REF(V,1)) * 2)) OR (V >= ((REF(V,3)) * 4))),VAR37,O,3,0),COLORRED;
STICKLINE((((((((VAR10) > (64.5)) AND (C > (MA(C,5)))) AND ((VAR17 + 3 * (STD(VAR17,10))) > (REF(VAR17 + 3 * (STD(VAR17,10)),1)))) AND (C > (VAR17 + 3 * (STD(VAR17,10))))) AND (C > (VAR5))) AND ((VAR18) > 0)) AND ((V >= ((REF(V,1)) * 2)) OR (V >= ((REF(V,3)) * 4))),VAR39,VAR37,3,0),COLORBLUE;
STICKLINE((((((((VAR10) > (64.5)) AND (C > (MA(C,5)))) AND ((VAR17 + 3 * (STD(VAR17,10))) > (REF(VAR17 + 3 * (STD(VAR17,10)),1)))) AND (C > (VAR17 + 3 * (STD(VAR17,10))))) AND (C > (VAR5))) AND ((VAR18) > 0)) AND (V < ((REF(V,1)) * 2)),VAR37,C,3,0),COLORYELLOW;
STICKLINE(((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16))) AND ((MA(C,1)) > ((MA(H,30)) * (1 + 15 / (100)))),O,(VAR37 + L) / 2,3,0),COLORYELLOW;
STICKLINE(((((VAR10) >= (64.5)) AND ((VAR13) >= 65)) AND ((MA(C,1)) > (VAR16))) AND ((MA(C,1)) > ((MA(H,30)) * (1 + 15 / (100)))),L,(VAR37 + L) / 2,0,0),COLORYELLOW;
{DRAWTEXT((((C / L) > (1.05)) AND ((VAR23) < -5)) AND (C > (黃金軌道)),VAR39,'包'),LINETHICK2,COLORWHITE;}STICKLINE(((C > ((MA(H,30)) * (1 + 18 / (100)))) AND (C > (VAR5))) AND ((VAR10) > (64.5)),VAR39,VAR37,3,0),COLORWHITE;{波段買賣}
{N:10,FFD值到2時候大多為壓力位，牛股除外}FFD:=EMA((C - REF(C,1)) / REF(C,3),10) * 100;
KJHU:=EMA(EMA(EMA(EMA(FFD,2),2),2),3);
KJHU1:=EMA(KJHU,4);
A1:=SMA(MAX(C - REF(C,1),0),24,1) / SMA(ABS(C - REF(C,1)),24,1) * 100;
{龍頭啟動:(A1 > 65) * (A1 - 65) / 10 + 2,NODRAW;}
VARA1:=CLOSE-LOW;
VARA2:=HIGH-LOW;
VARA3:=CLOSE-HIGH;
VARA4:=IF(HIGH>LOW,(VARA1/VARA2+VARA3/VARA2)*VOL,0);
CYW1:=SUM(VARA4,4)/100000, COLORSTICK;
控盤度:=CYW1 / 10,COLORSTICK,LINETHICK2,COLORRED;
{STICKLINE(KJHU >= REF(KJHU,1),KJHU,KJHU * 1.2,2,0),COLORRED;
STICKLINE(KJHU < REF(KJHU,1) AND KJHU > EMA(KJHU,4),KJHU,KJHU * 1.2,1,0),COLOR00BBFF;
STICKLINE(KJHU < REF(KJHU,1) AND KJHU < EMA(KJHU,4),KJHU,KJHU * 1.2,2,0),COLORGREEN;}
DRAWICON(BARSLASTCOUNT(KJHU >= REF(KJHU,1))=1,L*0.93,7);
DRAWICON(KJHU < REF(KJHU,1) AND KJHU > EMA(KJHU,4),H*1.03,8);
{0,POINTDOT,LINETHICK2,COLORGRAY;}
{1.5,POINTDOT,COLORGRAY;}
{DRAWICON(CROSS(FFD,2),2,7);}
{CROSS(FFD,KJHU1);}
A2:=(C - REF(C,1)) / REF(C,1) * 100;
A3:=COUNT(A2 > 8,120);{DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0,0,A3),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'【關注級別大的股票】 '),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.16,0,0,'級: '),COLORYELLOW;}
NA:=14;MAA:=6;
TR1 := SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),NA,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),NA,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),NA,1);
PDI:=DMP*100/TR1;
MDI:=DMM*100/TR1;
ADX:=SMA(ABS(MDI-PDI)/(MDI+PDI)*100,NA,1);
ADXR:=(ADX+REF(ADX,MAA))/2;
{IF(PDI > MDI,2,DRAWNULL),COLOR00C800,LINETHICK4;
IF(MDI>PDI,2,DRAWNULL),COLOR64FF00,LINETHICK4;}
{IF(PDI > MDI AND ADX > ADXR AND MDI < 20,2,DRAWNULL),COLOR7850FF,LINETHICK4;}
A4:=(MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4;
A5:=A4 + 3 * STD(A4,10);
A6:=EMA(HHV(C,21),21);
{STICKLINE(FILTER(CROSS(EMA(C,3),A6) AND C > A5 AND MA(C,5) > MA(C,10),13),1.5,0,1,0),COLORMAGENTA;}
{DRAWTEXT(FILTER(CROSS(EMA(C,3),A6) AND C > A5 AND MA(C,5) > MA(C,10),13),0.2,'小黑馬↗'),LINETHICK1,COLORYELLOW;}
{DRAWTEXT(FILTER(BARSLASTCOUNT(龍頭啟動>2)=1 AND FFD > 1.9,5),6,'龍'),COLORYELLOW;
DRAWTEXT(FILTER(BARSLASTCOUNT(龍頭啟動>2)=1 AND FFD > 1.9,5),4,'頭'),COLORYELLOW;
DRAWTEXT(FILTER(BARSLASTCOUNT(龍頭啟動>2)=1 AND FFD > 1.9,5),1.5,'股'),COLORYELLOW;};

?

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

?