編程思路破譯
填充背景
輸出MA10:收盤價的10日簡單移動平均
輸出MA60:收盤價的60日簡單移動平均
VAR6賦值:(( (開盤價-收盤價)的絕對值/(最高價-最低價))*成交量(手))
VAR7賦值:(( (最高價-如果(收陽線),返回收盤價,否則返回開盤價)/(最高價-最低價))*成交量(手))
VAR8賦值:(( (如果(收陽線),返回開盤價,否則返回收盤價-最低價)/(最高價-最低價))*成交量(手))
VAR9賦值:如果((成交量(手)/當前流通股本(手))>0.001),返回1,否則返回((成交量(手)/當前流通股本(手))*100)的對數(shù)的絕對值的指數(shù)
輸出加倉:VAR6>=VAR7 AND VAR6>=VAR8 AND 收陽線,NODRAW,畫紅色
輸出減倉:VAR6>=VAR7 AND VAR6>=VAR8 AND 收陰線,NODRAW,畫藍色
輸出洗盤:VAR8>VAR6 AND VAR8>VAR7,NODRAW,畫白色
輸出高拋:VAR7>VAR6 AND VAR7>VAR8,NODRAW,畫洋紅色
輸出地量:VAR9>2 AND 成交量(手)<成交量(手)的5日簡單移動平均/2,NODRAW,畫綠色
K線
TY賦值:收盤價
A1賦值:10日前的TY=2*10+1日內(nèi)TY的最高值
B1賦值:A1的10日過濾
C1賦值:若B1則將最近10+1周期置為1
HD賦值:C1的10日過濾
A2賦值:10日前的TY=2*10+1日內(nèi)TY的最低值
B2賦值:A2的10日過濾
C2賦值:若B2則將最近10+1周期置為1
LD賦值:C2的10日過濾
輸出前期高位:上次HD距今天數(shù)日前的最高價, COLORFF00FF,POINTDOT,線寬為3
輸出前期低位:上次LD距今天數(shù)日前的最低價, 畫綠色,POINTDOT,線寬為3
當滿足條件加倉時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫紅色
當滿足條件洗盤時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫白色
當滿足條件減倉時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫藍色
當滿足條件高拋時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫洋紅色
當滿足條件地量時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫綠色
JJ賦值:(3*收盤價+最高價+最低價+開盤價)/6
VAR1賦值:(8*JJ+7*1日前的JJ+6*2日前的JJ+5*3日前的JJ+4*4日前的JJ+3*5日前的JJ+2*6日前的JJ+8日前的JJ)/36
TJ1賦值:成交量(手)=10日內(nèi)成交量(手)的最高值 AND 成交量(手)>2*1日前的成交量(手) AND 收盤價>VAR1 AND 收盤價>1日前的收盤價
LJL賦值:TJ1的5日過濾
當滿足條件收盤價時,在上次LJL距今天數(shù)日前的最低價和上次LJL距今天數(shù)日前的最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫紅色
當滿足條件收盤價時,在上次LJL距今天數(shù)日前的收盤價和上次LJL距今天數(shù)日前的收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色
當滿足條件LJL時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色
當滿足條件1時,在橫軸0.0縱軸0.0位置書寫文字,畫藍色,線寬為1
當滿足條件1時,在橫軸0.00縱軸0.06位置書寫文字,畫白色,線寬為1
當滿足條件1時,在橫軸0.00縱軸0.12位置書寫文字,畫綠色,線寬為1
當滿足條件1時,在橫軸0.00縱軸0.18位置書寫文字,COLORFF00FF,線寬為1
當滿足條件1時,在橫軸0.00縱軸0.24位置書寫文字,畫紅色,線寬為1
當滿足條件1時,在橫軸0.00縱軸0.3位置書寫文字,畫黃色,線寬為1
當滿足條件收盤價>0時,在橫軸0.004縱軸1位置書寫文字,畫黃色,線寬為2
當滿足條件收盤價>0時,在橫軸0.06縱軸1位置書寫文字,畫紅色,線寬為2
當滿足條件收盤價>0時,在橫軸0.12縱軸1位置書寫文字,畫白色,線寬為2
EN1賦值:收盤價5%的之字轉(zhuǎn)向>1日前的收盤價5%的之字轉(zhuǎn)向 AND 1日前的收盤價5%的之字轉(zhuǎn)向<=2日前的收盤價5%的之字轉(zhuǎn)向 AND 2日前的收盤價5%的之字轉(zhuǎn)向<=3日前的收盤價5%的之字轉(zhuǎn)向
PL10賦值:收盤價10%的之字轉(zhuǎn)向
走強2賦值:上次PL10<1日前的PL10距今天數(shù)
ZTJZ5賦值:如果PL10>1日前的PL10,返回統(tǒng)計走強2日中滿足EN1的天數(shù),否則返回0
追2賦值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=2
追4賦值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=3
當滿足條件追2OR追4時,在最低價*0.978位置書寫文字,畫黃色
PL5賦值:收盤價5%的之字轉(zhuǎn)向
EX1賦值:收盤價5%的之字轉(zhuǎn)向=2日前的收盤價5%的之字轉(zhuǎn)向 AND 2日前的收盤價5%的之字轉(zhuǎn)向>=3日前的收盤價5%的之字轉(zhuǎn)向
EN2賦值:收盤價10%的之字轉(zhuǎn)向>1日前的收盤價10%的之字轉(zhuǎn)向 AND 1日前的收盤價10%的之字轉(zhuǎn)向<=2日前的收盤價10%的之字轉(zhuǎn)向 AND 2日前的收盤價10%的之字轉(zhuǎn)向<=3日前的收盤價10%的之字轉(zhuǎn)向
EX2賦值:收盤價10%的之字轉(zhuǎn)向=2日前的收盤價10%的之字轉(zhuǎn)向 AND 2日前的收盤價10%的之字轉(zhuǎn)向>=3日前的收盤價10%的之字轉(zhuǎn)向
PL20賦值:收盤價20%的之字轉(zhuǎn)向
EN3賦值:收盤價20%的之字轉(zhuǎn)向>1日前的收盤價20%的之字轉(zhuǎn)向 AND 1日前的收盤價20%的之字轉(zhuǎn)向<=2日前的收盤價20%的之字轉(zhuǎn)向 AND 2日前的收盤價20%的之字轉(zhuǎn)向<=3日前的收盤價20%的之字轉(zhuǎn)向
EX3賦值:收盤價20%的之字轉(zhuǎn)向=2日前的收盤價20%的之字轉(zhuǎn)向 AND 2日前的收盤價20%的之字轉(zhuǎn)向>=3日前的收盤價20%的之字轉(zhuǎn)向
PL40賦值:收盤價40%的之字轉(zhuǎn)向
走強1賦值:上次PL5<1日前的PL5距今天數(shù)
走弱1賦值:上次PL5>1日前的PL5距今天數(shù)
走弱2賦值:上次PL10>1日前的PL10距今天數(shù)
走強3賦值:上次PL20<1日前的PL20距今天數(shù)
走弱3賦值:上次PL20>1日前的PL20距今天數(shù)
ZTJD5賦值:如果PL10>1日前的PL10,返回統(tǒng)計走強2日中滿足EX1的天數(shù),否則返回0
DTJZ5賦值:如果PL10<1日前的PL10,返回統(tǒng)計走弱2日中滿足EN1的天數(shù),否則返回0
DTJD5賦值:如果PL10<1日前的PL10,返回統(tǒng)計走弱2日中滿足EX1的天數(shù),否則返回0
ZTJZ10賦值:如果PL20>1日前的PL20,返回統(tǒng)計走強3日中滿足EN2的天數(shù),否則返回0
ZTJD10賦值:如果PL20>1日前的PL20,返回統(tǒng)計走強3日中滿足EX2的天數(shù),否則返回0
DTJZ10賦值:如果PL20<1日前的PL20,返回統(tǒng)計走弱3日中滿足EN2的天數(shù),否則返回0
DTJD10賦值:如果PL20<1日前的PL20,返回統(tǒng)計走弱3日中滿足EX2的天數(shù),否則返回0
當滿足條件EN1ANDDTJZ5=1時,在最低價*0.98位置書寫文字,畫淡紅色
當滿足條件EX1ANDDTJD5=2時,在最高價*1.02位置書寫文字,畫淡藍色
當滿足條件EN2ANDZTJZ5=1時,在最低價*0.98位置書寫文字,畫黃色
當滿足條件EX1ANDPL10>1日前的PL10ANDZTJD5=1時,在最高價*1.02位置書寫文字,COLORFFFF00
當滿足條件EN1ANDPL10>1日前的PL10ANDZTJZ5=2時,在最低價*0.98位置書寫文字,COLOR0000FF
當滿足條件EX1ANDPL10>1日前的PL10ANDZTJZ5=2時,在最高價*1.02位置書寫文字,畫綠色
當滿足條件EN1ANDPL10>1日前的PL10ANDZTJZ5=3時,在最低價*0.98位置書寫文字,COLOR0000FF
當滿足條件EX2ANDPL20>1日前的PL20ANDZTJD10=1時,在最高價*1.02位置書寫文字,畫綠色
當滿足條件EN2ANDDTJZ10=1時,在最低價*0.96位置書寫文字,COLORFF00FF
當滿足條件EX2ANDDTJD10=2時,在最高價*1.03位置書寫文字,COLORFF6000
當滿足條件EN3ANDZTJZ10=1時,在最低價*0.95位置書寫文字,畫黃色
當滿足條件EX2ANDPL20>1日前的PL20ANDZTJD10=1時,在最高價*1.06位置書寫文字,線寬為3,COLORFFFF00
當滿足條件EN2ANDPL20>1日前的PL20ANDZTJZ10=2時,在最低價*0.96位置書寫文字,線寬為3,畫黃色
當滿足條件EX2ANDPL20>1日前的PL20ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2時,在最高價*1.02位置書寫文字,線寬為3,畫白色
當滿足條件EN2ANDPL20>1日前的PL20ANDZTJZ10=3時,在最低價*0.96位置書寫文字,線寬為3,畫黃色
當滿足條件EN1ANDPL10>1日前的PL10ANDZTJZ5=3時,在最低價*0.95位置書寫文字,畫黃色
EMA13賦值:收盤價的13日指數(shù)移動平均
EMA34賦值:收盤價的34日指數(shù)移動平均
EMA55賦值:收盤價的55日指數(shù)移動平均
EMA120賦值:收盤價的120日指數(shù)移動平均
CR1賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100>0.5
CR2賦值:成交量(手)>成交量(手)的5日簡單移動平均*0.6
CR3賦值:統(tǒng)計3日中滿足EMA13上穿EMA55的天數(shù)=1
CR4賦值:EMA34-EMA55的絕對值/EMA55<0.03
CR5賦值:EMA55<=EMA120 AND EMA55>=1日前的EMA55
CR6賦值:CR1ANDCR2ANDCR3ANDCR4ANDCR5的2日過濾
當滿足條件CR6時,在收盤價*0.98位置書寫文字,畫白色
程序源碼
DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'11',0);
MA10:MA(C,10);
MA60:MA(C,60);
VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);
VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);
VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);
VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));
加倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED;
減倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORBLUE;
洗盤:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORWHITE;
高拋:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORMAGENTA;
地量:VAR9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORGREEN;
DRAWKLINE(H,O,L,C);
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
前期高位:REF(H,BARSLAST(HD)), COLORFF00FF,POINTDOT,LINETHICK3;
前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK3;
STICKLINE(加倉,O,C,1,0),COLORRED;
STICKLINE(洗盤,O,C,1,0),COLORWHITE;
STICKLINE(減倉,O,C,1,0),COLORBLUE;
STICKLINE(高拋,O,C,1,0),COLORMAGENTA;
STICKLINE(地量,O,C,1,0),COLORGREEN;
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORRED;
STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORYELLOW;
STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;
DRAWTEXT_FIX(1,0.0,0.0,0,'藍芯-主力低位深度洗盤或高位出貨堅決'),COLORBLUE,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.06,0,'白芯-主力輕度洗盤'),COLORWHITE,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.12,0,'棕芯-出現(xiàn)了近期相對地量'),COLORGREEN,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.18,0,'粉芯-主力在做高拋低吸或低吸高拋'),COLORFF00FF,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.24,0,'紅芯-主力吸籌進貨積極主動'),COLORRED,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.3,0,'黃芯-主力吸籌進貨強并且成交量出現(xiàn)黃金柱'),COLORYELLOW,LINETHICK1;
DRAWTEXT_FIX(C>0,0.004,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;
DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;
DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;
EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
PL10:=ZIG(3,10);
走強2:=BARSLAST(PL10<REF(PL10,1));
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強2),0);
追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;
追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3;
DRAWTEXT(追2 OR 追4,LOW*0.978,'追'),COLORYELLOW;
PL5:=ZIG(3,5);
EX1:=ZIG(3,5)=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
EX2:=ZIG(3,10)=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);
PL20:=ZIG(3,20);
EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);
EX3:=ZIG(3,20)=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);
PL40:=ZIG(3,40);
走強1:=BARSLAST(PL5<REF(PL5,1));
走弱1:=BARSLAST(PL5>REF(PL5,1));
走弱2:=BARSLAST(PL10>REF(PL10,1));
走強3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走強2),0);
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走強3),0);
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'反彈低點'),COLORLIRED;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'反彈高點！'),COLORLIBLUE;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'底'),COLORYELLOW;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'減倉'),COLORFFFF00;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'----買'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'短賣'),COLORGREEN;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'----短買'),COLOR0000FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'短賣'),COLORGREEN;
DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'Ⅰ'),COLORFF00FF;
DRAWTEXT(EX2 AND DTJD10=2,H*1.03,'Ⅱ'),COLORFF6000;
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORYELLOW;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLORFFFF00;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORYELLOW;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'清倉!'),LINETHICK3,COLORWHITE;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORYELLOW;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,'⑷'),COLORYELLOW;
EMA13:=EMA(C,13);
EMA34:=EMA(C,34);
EMA55:=EMA(C,55);
EMA120:=EMA(C,120);
CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;
CR2:=V>MA(V,5)*0.6;
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;
CR4:=ABS(EMA34-EMA55)/EMA55<0.03;
CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);
DRAWTEXT(CR6,C*0.98,'風(fēng)險'),COLORWHITE;
該公式包含未來函數(shù):ZIG
未發(fā)現(xiàn):PEAK...
未發(fā)現(xiàn):PEAKBARS...
未發(fā)現(xiàn):TROUGH...
未發(fā)現(xiàn):TROUGHBARS...
未發(fā)現(xiàn):FLATZIG...
未發(fā)現(xiàn):FLATZIGA...
未發(fā)現(xiàn):PEAKA...
未發(fā)現(xiàn):PEAKBARSA...
未發(fā)現(xiàn):TROUGHA...
未發(fā)現(xiàn):ZIGA...
未發(fā)現(xiàn):FFT...
該公式包含未來函數(shù):BACKSET
未發(fā)現(xiàn):WINNER...
未發(fā)現(xiàn):LWINNER...
未發(fā)現(xiàn):PWINNER...
未發(fā)現(xiàn):COST...
該公式包含未來函數(shù):CAPITAL
注：
館內(nèi)各種公式為學(xué)習(xí)編程而保存，實戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率，決不能依據(jù)公式名稱的描述和形容去投資，據(jù)此入市造成投資損失由投資者自己承擔。
發(fā)文不易，如獲益，歡迎贊賞，贊賞必復(fù)！
