編程思路破譯 C22賦值:1日前的收盤價 ZT賦值:如果(收盤價-C22)*100/C22>=(10-0.01*100/C22),返回1,否則返回0 LG賦值:當前值是近成交量(手)周期的最大值 FZG賦值:最高價/60日前的最低價< 1.6 AND 最高價/20日前的最低價< 1.5 AND 最高價/4日前的最低價< 1.3 AND 最高價/10日前的最低價< 1.5 AND 統(tǒng)計5日中滿足ZT的天數(shù)<=3 AND 統(tǒng)計50日中滿足ZT的天數(shù)<=5 ZLC賦值:開盤價/1日前的收盤價>1.07 AND 收陰線AND LG>60 AND FZG BGY賦值:1日前的ZT AND 開盤價/1日前的收盤價>1.01 AND 收陰線AND LG>60 AND FZG BGYY賦值:1日前的ZT AND 最高價/1日前的收盤價>1.07 AND 收陽線AND LG>100 AND FZG EBY賦值:開盤價/1日前的收盤價>1.01 AND 收陰線AND 成交量(手)< 1日前的成交量(手) AND 1日前的ZT AND FZG HF賦值:收盤價=最高價 AND 收盤價/1日前的收盤價>1.095 AND 平盤AND 最低價< 收盤價 TZBS31賦值: 1日前的HF AND 成交量(手) <= 0.7*1日前的成交量(手) BGS31賦值: 1日前的成交量(手)=100日內(nèi)成交量(手)的最高值 AND 1日前的收盤價 > 2日前的收盤價 AND 成交量(手) <= 0.7*1日前的成交量(手) BBZTS31賦值: 2日前的ZT AND 2日前的成交量(手) >= 2* 3日前的成交量(手) AND 1日前的ZT AND 1日前的成交量(手) >= 2* 2日前的成交量(手) AND 1日前的成交量(手)=60日內(nèi)成交量(手)的最高值 AND 成交量(手) <= 0.7*1日前的成交量(手) BLZT賦值: 1日前的ZT AND 1日前的成交量(手) >= 2日前的成交量(手)*2 AND 1日前的成交量(手)=30日內(nèi)成交量(手)的最高值 AND 成交量(手)<= 0.5*1日前的成交量(手) ZTBGS31賦值: 2日前的ZT AND 1日前的成交量(手)=100日內(nèi)成交量(手)的最高值 AND 成交量(手) <= 0.7*1日前的成交量(手) 當滿足條件ZTBGS31ORBBZTS31ORBGS31ORTZBS31ORHFORZLCORBGYORBGYYOREBYORBLZT時,在最高價*1.015位置畫9號圖標,畫紅色 輸出均價:成交額(元)/成交量(手)/100,NODRAW,畫黃色 BK賦值:如果屬于某板塊,返回0.2,否則返回如果屬于某板塊,返回0.2,否則返回如果屬于某板塊,返回0.05,否則返回0.1 當滿足條件(收盤價>=計算漲停價ANDC=最高價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.7,0不為0則畫空心柱.,COLORFF00FF 當滿足條件(收盤價<=計算跌停價ANDC=最低價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.7,0不為0則畫空心柱.,COLOR00BF00 TC賦值:取反 AND 取反 LB10賦值:最高價>=1日前的收盤價*1.085 AND 收盤價< 1日前的收盤價*1.11 AND 收盤價< 最高價 AND TC 當滿足條件LB10時,在最高價和開盤價和收盤價的較大值位置之間畫柱狀線,寬度為0.02,0不為0則畫空心柱.,COLORFF00FF QB10賦值:收盤價*1.085< 1日前的收盤價 AND 收盤價*1.13>1日前的收盤價 AND 收盤價>最低價 AND TC 當滿足條件QB10時,在最低價和開盤價和收盤價的較小值位置之間畫柱狀線,寬度為0.02,0不為0則畫空心柱.,COLORFF8000 LB20賦值:最高價>1日前的收盤價*1.196 AND 收盤價< 1日前的收盤價*1.22 AND 收盤價< 最高價 當滿足條件LB20時,在最高價和開盤價和收盤價的較大值位置之間畫柱狀線,寬度為0.02,0不為0則畫空心柱.,COLORFF00FF QB20賦值:收盤價*1.192< 1日前的收盤價AND 收盤價*1.26>1日前的收盤價 AND 收盤價>最低價 當滿足條件QB20時,在最低價和開盤價和收盤價的較小值位置之間畫柱狀線,寬度為0.02,0不為0則畫空心柱.,COLORFF8000 向上跳空賦值:收盤價和開盤價的較小值>1日前的收盤價和開盤價的較大值 輸出明日漲停參考:收盤價*1.1,NODRAW,畫黃色 輸出明日創(chuàng)業(yè)漲停:收盤價*1.2,NODRAW,畫黃色 當滿足條件向上跳空=1時,在開盤價和收盤價位置之間畫柱狀線,寬度為0.4,0不為0則畫空心柱.,畫黃色 HS賦值:成交量(手)/當前流通股本(手)*100 輸出換手比:HS/1日前的HS,NODRAW,COLORFF00FF 輸出三一:開盤價和收盤價的較大值-開盤價-收盤價的絕對值/3,NODRAW,畫黃色 輸出二一:(開盤價+收盤價)/2,NODRAW,畫黃色 輸出三二:開盤價和收盤價的較小值+開盤價-收盤價的絕對值/3,NODRAW,畫黃色 輸出虛31:最高價和最低價的較大值-(最高價-最低價)/3,NODRAW,畫黃色 輸出虛21:(最低價+最高價)/2,NODRAW,畫黃色 輸出虛32:最高價和最低價的較小值+(最高價-最低價)/3,NODRAW,畫黃色 AA11賦值:(1日后的(未作平滑處理)收盤價+2日后的(未作平滑處理)收盤價+3日后的(未作平滑處理)收盤價)/3>開盤價和收盤價的較大值 輸出高于實頂:如果AA11,返回1,否則返回0,畫黃色,NODRAW T11賦值:10日內(nèi)最低價距今天數(shù)的最后一日取值設(shè)為常數(shù) T11H賦值:T11日前的最高價的最后一日取值設(shè)為常數(shù) CC賦值:到最后交易的周期的最后一日取值設(shè)為常數(shù) T12賦值:上次到最后交易的周期>CC+T11ANDH>T11H距今天數(shù)的最后一日取值設(shè)為常數(shù) T12H賦值:T12日前的最高價的最后一日取值設(shè)為常數(shù) T13賦值:上次到最后交易的周期>CC+T12ANDH>T12H距今天數(shù)的最后一日取值設(shè)為常數(shù) T13H賦值:T13日前的最高價的最后一日取值設(shè)為常數(shù) 所屬板塊賦值:字符串相加 當滿足條件開盤價>0時,在橫軸0縱軸0.00位置書寫文字,畫黃色 當滿足條件開盤價>0時,在橫軸0縱軸0.05位置書寫文字 當滿足條件開盤價>0時,在橫軸0.08縱軸0.05位置書寫文字,COLORFF00FF 自由流通市值賦值:字符串相加 當滿足條件開盤價>0時,在橫軸0縱軸0.09位置書寫文字,畫黃色 一字板賦值:最低價=最高價 AND (收盤價+0.005-1日前的收盤價)/1日前的收盤價*100>=10 當滿足條件一字板時,在1日前的收盤價和收盤價位置之間畫柱狀線,寬度為2.8,-1不為0則畫空心柱.,COLORFFEEBB 收陰賦值:收陰線AND (開盤價-收盤價)/開盤價>0.04 收陽賦值:收陽線AND (收盤價-開盤價)/開盤價>0.04 實體大于4%賦值:如果收陰線,返回收陰,否則返回收陽 當滿足條件實體大于4%時,在二一和二一位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫深灰色 TK賦值:收陽線AND 開盤價>=1日前的收盤價和開盤價的較大值+0.01 OR 開盤價>=1日前的收盤價+0.01 當滿足條件TK時,在開盤價和(收盤價-開盤價)*0.01+開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色 GLT賦值:高量天數(shù)日內(nèi)成交量(手)距今天數(shù)的最后一日取值設(shè)為常數(shù) 高量頂賦值:如果到最后交易的周期<=GLT+1,返回GLT日前的收盤價和開盤價的較大值的最后一日取值設(shè)為常數(shù),否則返回無效數(shù) 高量底賦值:如果到最后交易的周期<=GLT+1,返回如果(GLT日前的收盤價和開盤價的較大值-GLT日前的收盤價和開盤價的較小值)/GLT日前的開盤價<=0.033,返回GLT日前的最低價,否則返回GLT日前的收盤價和開盤價的較小值的最后一日取值設(shè)為常數(shù),否則返回無效數(shù) 當滿足條件高量底時,在高量底和高量底位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫綠色 當滿足條件高量頂時,在高量頂和高量頂位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫紅色 當滿足條件是否最后一個周期時,在高量頂位置書寫文字,畫紅色 當滿足條件是否最后一個周期時,在高量底位置書寫文字,畫綠色 程序源碼 C22:=REF(C,1); ZT:=IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0); LG:=TOPRANGE(VOL); FZG:=H/REF(L,60)< 1.6 AND H/REF(L,20)< 1.5 AND H/REF(L,4)< 1.3 AND H/REF(L,10)< 1.5 AND COUNT(ZT,5)<=3 AND COUNT(ZT,50)<=5; ZLC:=O/REF(C,1)>1.07 AND C< O AND LG>60 AND FZG; BGY:=REF(ZT,1) AND O/REF(C,1)>1.01 AND C< O AND LG>60 AND FZG; BGYY:=REF(ZT,1) AND H/REF(C,1)>1.07 AND C>O AND LG>100 AND FZG; EBY:=O/REF(C,1)>1.01 AND C< O AND V< REF(V,1) AND REF(ZT,1) AND FZG; HF:=C=H AND C/REF(C,1)>1.095 AND C=O AND L< C; TZBS31:= REF(HF,1) AND V <= 0.7*REF(V,1); BGS31:= REF(V=HHV(V,100),1) AND REF(C,1) > REF(C,2) AND V <= 0.7*REF(V,1); BBZTS31:= REF(ZT,2) AND REF(V,2) >= 2* REF(V,3) AND REF(ZT,1) AND REF(V,1) >= 2* REF(V,2) AND REF(V=HHV(V,60),1) AND V <= 0.7*REF(V,1); BLZT:= REF(ZT,1) AND REF(V,1) >= REF(V,2)*2 AND REF(V=HHV(V,30),1) AND V<= 0.5*REF(V,1); ZTBGS31:= REF(ZT,2) AND REF(V=HHV(V,100),1) AND V <= 0.7*REF(V,1); DRAWICON(ZTBGS31 OR BBZTS31 OR BGS31 OR TZBS31 OR HF OR ZLC OR BGY OR BGYY OR EBY OR BLZT,H*1.015,9),COLORRED; 均價:AMOUNT/VOL/100,NODRAW,COLORYELLOW; BK:=IF(INBLOCK('科創(chuàng)板'),0.2,IF(INBLOCK('創(chuàng)業(yè)板'),0.2,IF(INBLOCK('ST板塊'),0.05,0.1))); STICKLINE((C>=ZTPRICE(REF(C,1),BK) AND C=H),C,O,2.7,0),COLORFF00FF; STICKLINE((C<=DTPRICE(REF(C,1),BK) AND C=L),C,O,2.7,0),COLOR00BF00; TC:=NOT(INBLOCK('創(chuàng)業(yè)板')) AND NOT(INBLOCK('科創(chuàng)板')); LB10:=H>=REF(C,1)*1.085 AND C< REF(C,1)*1.11 AND C< H AND TC; STICKLINE(LB10,H,MAX(O,C),0.02,0),COLORFF00FF; QB10:=C*1.085< REF(C,1) AND C*1.13>REF(C,1) AND C>L AND TC; STICKLINE(QB10,L,MIN(O,C),0.02,0),COLORFF8000; LB20:=H>REF(C,1)*1.196 AND C< REF(C,1)*1.22 AND C< H; STICKLINE(LB20,H,MAX(O,C),0.02,0),COLORFF00FF; QB20:=C*1.192< REF(C,1)AND C*1.26>REF(C,1) AND C>L; STICKLINE(QB20,L,MIN(O,C),0.02,0),COLORFF8000; 向上跳空:=MIN(C,O)>REF(MAX(C,O),1); 明日漲停參考:C*1.1,NODRAW,COLORYELLOW; 明日創(chuàng)業(yè)漲停:C*1.2,NODRAW,COLORYELLOW; STICKLINE(向上跳空=1,O,C,0.4,0),COLORYELLOW; HS:=VOL/CAPITAL*100; 換手比:HS/REF(HS,1),NODRAW,COLORFF00FF; 三一:MAX(O,C)-ABS(O-C)/3,NODRAW,COLORYELLOW; 二一:(O+C)/2,NODRAW,COLORYELLOW; 三二:MIN(O,C)+ABS(O-C)/3,NODRAW,COLORYELLOW; 虛31:MAX(H,L)-(H-L)/3,NODRAW,COLORYELLOW; 虛21:(L+H)/2,NODRAW,COLORYELLOW; 虛32:MIN(H,L)+(H-L)/3,NODRAW,COLORYELLOW; AA11:=(REFXV(C,1)+REFXV(C,2)+REFXV(C,3))/3>MAX(O,C) ; 高于實頂:IF(AA11,1,0),COLORYELLOW,NODRAW; T11:=CONST(LLVBARS(L,10)); T11H:=CONST(REF(H,T11)); CC:=CONST(CURRBARSCOUNT); T12:=CONST(BARSLAST(CURRBARSCOUNT>CC+T11 AND H>T11H)); T12H:=CONST(REF(H,T12)); T13:=CONST(BARSLAST(CURRBARSCOUNT>CC+T12 AND H>T12H)); T13H:=CONST(REF(H,T13)); 所屬板塊:=STRCAT('所屬板塊: ',STRCAT(STRCAT(STRCAT(' 【行業(yè)】:',HYBLOCK),STRCAT(' 【地域】:',DYBLOCK)),STRCAT(' 【概念】:',GNBLOCK))); DRAWTEXT_FIX(O>0,0,0.00,0,所屬板塊),COLORYELLOW; DRAWTEXT_FIX(O>0,0,0.05,0,'同花順概念:'); DRAWTEXT_FIX(O>0,0.08,0.05,0,EXTERNSTR(0,1)),COLORFF00FF; 自由流通市值:=STRCAT(STRCAT('自由流通市值:', CON2STR(C*FINANCE(46)/100000000,2)),'億'); DRAWTEXT_FIX(O>0,0,0.09,0,自由流通市值),COLORYELLOW; 一字板:=L=H AND (C+0.005-REF(C,1))/REF(C,1)*100>=10; STICKLINE(一字板,REF(C,1),C,2.8,-1),COLORFFEEBB; 收陰:=O>C AND (O-C)/O>0.04; 收陽:=O< C AND (C-O)/O>0.04; 實體大于4%:=IF(O>C,收陰,收陽); STICKLINE(實體大于4%,二一,二一,2,0),COLORGRAY; TK:=C>O AND O>=REF(MAX(C,O),1)+0.01 OR O>=REF(C,1)+0.01 ; STICKLINE(TK, O,(C-O)*0.01+O,3,0),COLORYELLOW; GLT:=CONST(HHVBARS(V,高量天數(shù))); 高量頂:=IF(CURRBARSCOUNT<=GLT+1,CONST(REF(MAX(C,O),GLT)),DRAWNULL); 高量底:=IF(CURRBARSCOUNT<=GLT+1,CONST(IF((REF(MAX(C,O),GLT)-REF(MIN(C,O),GLT))/REF(O,GLT)<=0.033,REF(L,GLT),REF(MIN(C,O),GLT))),DRAWNULL); STICKLINE(高量底,高量底,高量底,5,0),COLORGREEN; STICKLINE(高量頂,高量頂,高量頂,5,0),COLORRED; DRAWTEXT(ISLASTBAR,高量頂,STRCAT(' ','安全線')),COLORRED; DRAWTEXT(ISLASTBAR,高量底,STRCAT(' ','保命線')),COLORGREEN;
注: 館內(nèi)各種公式為學習編程而保存,,實戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率,,決不能依據(jù)公式名稱的描述和形容去投資,,據(jù)此入市造成投資損失由投資者自己承擔,。 發(fā)文不易,,如獲益,,歡迎贊賞,,贊賞必復(fù),! |
|