不同的顏色在K線上標識漲跌停公式源碼[同花順公式]

相關標簽:

?

用不同的顏色把漲跌停板用不同的顏色在K線上標識。用法：在主圖使用，自動添加均線5 10 20 30 60 120 240 360，后面3條均線不顯示提醒頂底分型

?

原理解析：
VERLINE(小時<1日前的小時,2),COLOR666666 C2賦值:1日前的收盤價 漲停賦值:如果(收盤價-C2)*100/C2>=(10-0.01*100/C2),返回1,否則返回0 當滿足條件漲停時,在開盤價和收盤價位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,畫黃色 當滿足條件漲停時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫黃色 跌停賦值:如果(C2-收盤價)*100/C2>=(10-0.01*100/C2),返回1,否則返回0 當滿足條件跌停時,在開盤價和收盤價位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,畫綠色 當滿足條件跌停時,在最高價和最低價位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,畫綠色 輸出//MID : 收盤價的26日簡單移動平均 輸出//UPPER: MID + 2*收盤價的26日估算標準差 輸出//LOWER: MID - 2*收盤價的26日估算標準差 //當滿足條件1時,在最高價和最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫淡藍色 V00賦值: 最高價<1日前的最高價 AND 最低價<1日前的最低價 V01賦值: 最高價<1日前的最高價 AND 最低價>1日前的最低價 V02賦值: 最高價>1日前的最高價 AND 最低價<1日前的最低價 V03賦值: 最高價>1日前的最高價 AND 最低價>1日前的最低價 V04賦值: 2日前的最高價 < 最高價 AND 2日前的最低價 < LOWAND 2日前的最高價 > 1日前的最高價 AND 2日前的最低價 < 1日前的最低價 V1賦值: 統計6日中滿足V00的天數>=3 AND 統計5日中滿足V01ORV02的天數=0 AND 6日內最低價距今天數 = 1 AND 6日內最高價距今天數 >= 5 AND V03 V2賦值: 統計7日中滿足V00的天數>=3 AND 統計6日中滿足V01ORV02的天數=1 AND 7日內最低價距今天數 = 2 AND 7日內最高價距今天數 >= 6 AND V04 V3賦值: 統計7日中滿足V00的天數>=3 AND 統計6日中滿足V01ORV02的天數=1 AND 7日內最低價距今天數 = 1 AND 7日內最高價距今天數 >= 6 AND V03 V4賦值: 統計8日中滿足V00的天數>=3 AND 統計7日中滿足V01ORV02的天數<=2 AND 8日內最低價距今天數 = 2 AND 8日內最高價距今天數 >= 7 AND V04 V5賦值: 統計8日中滿足V00的天數>=3 AND 統計7日中滿足V01ORV02的天數<=2 AND 8日內最低價距今天數 = 1 AND 8日內最高價距今天數 >= 7 AND V03 V6賦值: 統計9日中滿足V00的天數>=3 AND 統計8日中滿足V01ORV02的天數<=3 AND 9日內最低價距今天數 = 2 AND 9日內最高價距今天數 >= 8 AND V04 V7賦值: 統計9日中滿足V00的天數>=3 AND 統計8日中滿足V01ORV02的天數<=3 AND 9日內最低價距今天數 = 1 AND 9日內最高價距今天數 >= 8 AND V03 V8賦值: 統計10日中滿足V00的天數>=3 AND 統計9日中滿足V01ORV02的天數<=4 AND 10日內最低價距今天數 = 2 AND 10日內最高價距今天數 >= 9 AND V04 V9賦值: 統計10日中滿足V00的天數>=3 AND 統計9日中滿足V01ORV02的天數<=4 AND 10日內最低價距今天數 = 1 AND 10日內最高價距今天數 >= 9 AND V03 V10賦值: 統計11日中滿足V00的天數>=3 AND 統計10日中滿足V01ORV02的天數<=5 AND 11日內最低價距今天數 = 2 AND 11日內最高價距今天數 >= 10 AND V04 XG賦值: V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10 當滿足條件XG=1的5日過濾時,在最低價*0.998位置書寫文字,畫黃色 HV00賦值: 最高價>1日前的最高價 AND 最低價>1日前的最低價 HV01賦值: 最高價<1日前的最高價 AND 最低價>1日前的最低價 HV02賦值: 最高價>1日前的最高價 AND 最低價<1日前的最低價 HV03賦值: 最高價<1日前的最高價 AND 最低價<1日前的最低價 HV04賦值: 2日前的最高價 > 最高價 AND 2日前的最低價 > 最低價 AND 2日前的最高價 > 1日前的最高價 AND 2日前的最低價 < 1日前的最低價 HV1賦值: 統計6日中滿足HV00的天數>=3 AND 統計5日中滿足HV01ORHV02的天數=0 AND 6日內最高價距今天數 = 1 AND 6日內最低價距今天數 >= 5 AND HV03 HV2賦值: 統計7日中滿足HV00的天數>=3 AND 統計6日中滿足HV01ORHV02的天數=1 AND 7日內最高價距今天數 = 2 AND 7日內最低價距今天數 >= 6 AND HV04 HV3賦值: 統計7日中滿足HV00的天數>=3 AND 統計6日中滿足HV01ORHV02的天數=1 AND 7日內最高價距今天數 = 1 AND 7日內最低價距今天數 >= 6 AND HV03 HV4賦值: 統計8日中滿足HV00的天數>=3 AND 統計7日中滿足HV01ORHV02的天數<=2 AND 8日內最高價距今天數 = 2 AND 8日內最低價距今天數 >= 7 AND HV04 HV5賦值: 統計8日中滿足HV00的天數>=3 AND 統計7日中滿足HV01ORHV02的天數<=2 AND 8日內最高價距今天數 = 1 AND 8日內最低價距今天數 >= 7 AND HV03 HV6賦值: 統計9日中滿足HV00的天數>=3 AND 統計8日中滿足HV01ORHV02的天數<=3 AND 9日內最高價距今天數 = 2 AND 9日內最低價距今天數 >= 8 AND HV04 HV7賦值: 統計9日中滿足HV00的天數>=3 AND 統計8日中滿足HV01ORHV02的天數<=3 AND 9日內最高價距今天數 = 1 AND 9日內最低價距今天數 >= 8 AND HV03 HV8賦值: 統計10日中滿足HV00的天數>=3 AND 統計9日中滿足HV01ORHV02的天數<=4 AND 10日內最高價距今天數 = 2 AND 10日內最低價距今天數 >= 9 AND HV04 HV9賦值: 統計10日中滿足HV00的天數>=3 AND 統計9日中滿足HV01ORHV02的天數<=4 AND 10日內最高價距今天數 = 1 AND 10日內最低價距今天數 >= 9 AND HV03 HV10賦值: 統計11日中滿足HV00的天數>=3 AND 統計10日中滿足HV01ORHV02的天數<=5 AND 11日內最高價距今天數 = 2 AND 11日內最低價距今天數 >= 10 AND HV04 HXG賦值:HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10 當滿足條件HXG=1的3日過濾時,在最高價*1.01位置書寫文字,畫綠色 如果K<=0,返回?,否則返回?RETURN 0 輸出簡單移動平均$1[輸出名錯誤]:收盤價的N1日簡單移動平均,畫白色 如果K<=1,返回?,否則返回?RETURN 0 輸出簡單移動平均$2[輸出名錯誤]:收盤價的N2日簡單移動平均,畫黃色 如果K<=2,返回?,否則返回?RETURN 0 輸出簡單移動平均$3[輸出名錯誤]:收盤價的N3日簡單移動平均,畫洋紅色 如果K<=3,返回?,否則返回?RETURN 0 輸出簡單移動平均$4[輸出名錯誤]:收盤價的N4日簡單移動平均,畫綠色 如果K<=4,返回?,否則返回?RETURN 0 輸出簡單移動平均$5[輸出名錯誤]:收盤價的N5日簡單移動平均,畫青色 如果K<=5,返回?,否則返回?RETURN 0 輸出簡單移動平均$6[輸出名錯誤]:收盤價的N6日簡單移動平均,畫紅色 如果K<=6,返回?,否則返回?RETURN 0 輸出簡單移動平均$7[輸出名錯誤]:收盤價的N7日簡單移動平均 如果K<=7,返回?,否則返回?RETURN 0 輸出簡單移動平均$8[輸出名錯誤]:收盤價的N8日簡單移動平均 購買點提醒賦值:如果1日前的收盤價的N1日指數移動平均上穿1日前的收盤價的N2日指數移動平均ANDC>收盤價的N1日指數移動平均,返回1,否則返回0 //當滿足條件購買點提醒時,在簡單移動平均$5*0.95位置畫"買入開倉"號圖標 當滿足條件購買點提醒時,在最低價*0.998位置書寫文字,畫黃色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.tumamayizhan.com '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

VERLINE(HOUR<REF(HOUR,1),2),COLOR666666;C2:=REF(C,1);漲停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);STICKLINE(漲停,OPEN,CLOSE,10,0),coloryellow;STICKLINE(漲停,H,L,0,0),coloryellow;跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);STICKLINE(跌停,OPEN,CLOSE,10,0),colorgreen;STICKLINE(跌停,H,L,10,0),colorgreen;//MID : MA(CLOSE,26);//UPPER: MID + 2*STD(CLOSE,26);//LOWER: MID - 2*STD(CLOSE,26);//STICKLINE(1,H,L,1,0),colorliblue;//{筆底分型 選股預警 確保向下筆成立后的底分型}V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOWAND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);V1:= COUNT(V00,6)>=3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND HHVBARS(HIGH,6) >= 5 AND V03;V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) >= 6 AND V04;V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) >= 6 AND V03;V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 2 AND HHVBARS(HIGH,8) >= 7 AND V04;V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 1 AND HHVBARS(HIGH,8) >= 7 AND V03;V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 2 AND HHVBARS(HIGH,9) >= 8 AND V04;V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 1 AND HHVBARS(HIGH,9) >= 8 AND V03;V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 2 AND HHVBARS (HIGH,10) >= 9 AND V04;V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 1 AND HHVBARS (HIGH,10) >= 9 AND V03;V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 AND LLVBARS(LOW,11) = 2 AND HHVBARS (HIGH,11) >= 10 AND V04;XG:= V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;DRAWTEXT(FILTER(XG=1,5),L*0.998,'底分型'),coloryellow;//{筆頂分型 選股 預警 確保向上筆成立后的頂分型}HV00:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);HV01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);HV02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);HV03:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);HV04:= REF(HIGH,2) > HIGH AND REF(LOW,2) > LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);HV1:= COUNT(HV00,6)>=3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 AND LLVBARS (LOW,6) >= 5 AND HV03;HV2:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 AND LLVBARS (LOW,7) >= 6 AND HV04;HV3:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 AND LLVBARS (LOW,7) >= 6 AND HV03;HV4:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 2 AND LLVBARS (LOW,8) >= 7 AND HV04;HV5:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 1 AND LLVBARS (LOW,8) >= 7 AND HV03;HV6:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 2 AND LLVBARS (LOW,9) >= 8 AND HV04;HV7:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 1 AND LLVBARS (LOW,9) >= 8 AND HV03;HV8:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 2 AND LLVBARS (LOW,10) >= 9 AND HV04;HV9:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 1 AND LLVBARS (LOW,10) >= 9 AND HV03;HV10:= COUNT(HV00,11)>=3 AND COUNT(HV01 OR HV02,10)<=5 AND HHVBARS(HIGH,11) = 2 AND LLVBARS (LOW,11) >= 10 AND HV04;HXG:=HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10;DRAWTEXT(FILTER(HXG=1,3),H*1.01,'頂分型'),colorgreen;IF (k<=0)RETURN 0;MA$1:MA(CLOSE, N1),colorwhite;IF (k<=1)RETURN 0;MA$2:MA(CLOSE, N2),coloryellow;IF (k<=2)RETURN 0;MA$3:MA(CLOSE, N3),colormagenta;IF (k<=3)RETURN 0;MA$4:MA(CLOSE, N4),colorgreen;IF (k<=4)RETURN 0;MA$5:MA(CLOSE, N5),colorcyan;IF (k<=5)RETURN 0;MA$6:MA(CLOSE, N6),colorred;IF (k<=6)RETURN 0;MA$7:MA(CLOSE, N7);IF (k<=7)RETURN 0;MA$8:MA(CLOSE, N8);//基于k線買賣提醒,5日線突破13日線且收盤大于5日線購買點提醒:=IF(CROSS(REF(EMA(C,N1),1),REF(EMA(C,N2),1)) AND C>EMA(C,N1),1,0);//DRAWICON(購買點提醒,MA$5*0.95,"buy");DRAWTEXT(購買點提醒,L*0.998,'buy'),coloryellow;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.tumamayizhan.com '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?