相關標簽:

?

八仙過海主圖源碼

?

?

原理解析：
C2賦值:1日前的收盤價 漲停賦值:如果(收盤價-C2)*100/C2>=(10-0.01*100/C2),返回1,否則返回0 當滿足條件漲停時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫紅色 當滿足條件漲停時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫紅色 跌停賦值:如果(C2-收盤價)*100/C2>=(10-0.01*100/C2),返回1,否則返回0 當滿足條件跌停時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫綠色 當滿足條件跌停時,在最高價和最低價位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,畫綠色 圣賦值:(21日內最高價的最高值-收盤價)/(21日內最高價的最高值-21日內最低價的最低值)*100-10 靈賦值:(收盤價-21日內最低價的最低值)/(21日內最高價的最高值-21日內最低價的最低值)*100 石賦值:靈的13日[8日權重]移動平均 AAA賦值:(3*收盤價+最高價+最低價+開盤價)/6 VAR1賦值:(8*AAA+7*1日前的AAA+6*2日前的AAA+5*3日前的AAA+4*4日前的AAA+3*5日前的AAA+2*6日前的AAA+8日前的AAA)/36 VAR2賦值:(5日內VAR1的最高值+10日內VAR1的最高值+20日內VAR1的最高值)/3 VAR3賦值:(5日內VAR1的最低值+10日內VAR1的最低值+20日內VAR1的最低值)/3 VAR4賦值:(5日內VAR2的最高值+10日內VAR2的最高值+20日內VAR2的最高值)/3 VAR5賦值:(5日內VAR3的最低值+10日內VAR3的最低值+20日內VAR3的最低值)/3 VAR6賦值:(2日內VAR1的最低值+4日內VAR1的最低值+6日內VAR1的最低值)/3 畫帶狀線 輸出短線:VAR1,畫白色 輸出中線:VAR6,畫黃色 輸出下跌:如果VAR1=VAR6,返回VAR6,否則返回無效數,畫綠色 TJ1賦值:成交量(手)=10日內成交量(手)的最高值 AND 成交量(手)>2*1日前的成交量(手) AND 收盤價>VAR1 立樁量賦值:TJ1的5日過濾 TJ2賦值:如果上次立樁量距今天數=1ANDCLOSE>1日前的最高價,返回1,否則返回如果上次立樁量距今天數=2ANDCLOSE>2日前的最高價,返回1,否則返回如果上次立樁量距今天數=3ANDCLOSE>3日前的最高價,返回1,否則返回0 突破賦值:TJ2=1 當滿足條件收盤價時,在上次立樁量距今天數日前的最高價和上次立樁量距今天數日前的最高價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫青色 當滿足條件收盤價時,在上次立樁量距今天數日前的最低價和上次立樁量距今天數日前的最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色 TJ3賦值:如果上次立樁量距今天數=1ANDCLOSE>1日前的最低價,返回1,否則返回如果上次立樁量距今天數=2ANDCLOSE>2日前的最低價,返回1,否則返回如果上次立樁量距今天數=3ANDCLOSE>3日前的最低價,返回1,否則返回0 三天法則賦值:TJ3=1 成立賦值:三天法則 AND 突破 條件成立賦值:成立的3日過濾 當滿足條件條件成立時,在最低價*0.99位置書寫文字,畫黃色 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR000045 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR000065 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR000085 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000A5 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000C5 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR0000E5 當滿足條件收盤價>=開盤價時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000F5 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR353500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR454500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR555500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR656500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR757500 當滿足條件收陰線時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR858500 當滿足條件收陰線時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR959500 HIGHN賦值:10 LOWN賦值:10 HIGHDISPLAY賦值:0 LOWDISPLAY賦值:0 ZGDISPLAY賦值:0 MADISPLAY賦值:0 AA賦值:HIGHN日前的最高價=2*HIGHN+1日內最高價的最高值 QY賦值:若AA則將最近HIGHN+1周期置為1 CC賦值:QY的HIGHN日過濾 AND 最高價=HIGHN+1日內最高價的最高值 當滿足條件CC時,在最高價*1.02位置畫2號圖標 DDD賦值:上次CC距今天數 GDTS賦值:如果CC,返回到最后交易的周期,否則返回0 DINGBU賦值:如果DDD,返回DDD日前的最高價,否則返回最高價 DINGBUTS賦值:如果DDD,返回DDD日前的GDTS,否則返回GDTS DINGBU1賦值:DDD+1日前的DINGBU GDCS1賦值:DINGBUTS的最后一日取值設為常數 DINGBUTS1賦值:DDD+1日前的DINGBUTS GDCS2賦值:DINGBUTS1的最后一日取值設為常數 DINGBU2賦值:DDD+1日前的DINGBU1 MM賦值:如果到最后交易的周期>GDCS2,返回0,否則返回1 輸出上軌:當滿足條件到最后交易的周期=GDCS2時,在最高價位置畫直線起點，當滿足條件到最后交易的周期=GDCS1時,在最高價位置畫直線終點,1表示是否延長. 畫藍色,線寬為1 當滿足條件到最后交易的周期=GDCS2時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在GDCS2-1日前的最高價位置畫直線終點,1表示是否延長.,COLOR0055FF,POINTDOT 當滿足條件到最后交易的周期=GDCS1時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在GDCS1-1日前的最高價位置畫直線終點,1表示是否延長.,畫黃色,POINTDOT AA1賦值:LOWN日前的最低價=2*LOWN+1日內最低價的最低值 QY1賦值:若AA1則將最近LOWN+1周期置為1 CC1賦值:QY1的LOWN日過濾 AND 最低價=LOWN+1日內最低價的最低值 當滿足條件CC1時,在最低價*0.98位置畫1號圖標 DD1賦值:上次CC1距今天數 DDTS賦值:如果CC1,返回到最后交易的周期,否則返回0 YDB賦值:如果DD1,返回DD1日前的最低價,否則返回最低價 DDTS1賦值:如果DD1,返回DD1日前的DDTS,否則返回DDTS DDCS1賦值:DDTS1的最后一日取值設為常數 ZDB賦值:DD1+1日前的YDB DDTS2賦值:DD1+1日前的DDTS1 DDCS2賦值:DDTS2的最后一日取值設為常數 輸出下軌:當滿足條件到最后交易的周期=DDCS2時,在最低價位置畫直線起點，當滿足條件到最后交易的周期=DDCS1時,在最低價位置畫直線終點,1表示是否延長. 畫紅色,線寬為1 ZGSTAR賦值:(上軌+下軌)/2 ZGEND賦值:(上軌+下軌)/2的最后一日取值設為常數 STARDAY賦值:如果DDCS2<GDCS2,返回DDCS2,否則返回GDCS2 輸出中軌:當滿足條件到最后交易的周期=STARDAY時,在ZGSTAR位置畫直線起點，當滿足條件是否最后一個周期時,在ZGEND位置畫直線終點,1表示是否延長.,COLORFF55BB,線寬為1 當滿足條件到最后交易的周期=DDCS1時,在最低價位置畫直線起點，當滿足條件是否最后一個周期時,在DDCS1-1日前的最低價位置畫直線終點,1表示是否延長.,畫洋紅色,POINTDOT 當滿足條件到最后交易的周期=DDCS2時,在最低價位置畫直線起點，當滿足條件是否最后一個周期時,在DDCS2-1日前的最低價位置畫直線終點,1表示是否延長.,畫青色,POINTDOT VAR7賦值:0 VAR8賦值:收盤價-1日前的收盤價和0的較大值的34日[1日權重]移動平均/收盤價-1日前的收盤價的絕對值的7日[1日權重]移動平均*100 VAR9賦值:收盤價-1日前的收盤價和0的較大值的13日[1日權重]移動平均/收盤價-1日前的收盤價的絕對值的13日[1日權重]移動平均*100 VAR10賦值:如果收盤價16%之字轉向的前1個波谷位置=0ANDHIGH>最低價+0.04,返回4,否則返回0 VAR11賦值:收盤價6%的之字轉向>1日前的收盤價6%的之字轉向 AND 1日前的收盤價6%的之字轉向<=2日前的收盤價6%的之字轉向 AND 2日前的收盤價6%的之字轉向<=3日前的收盤價6%的之字轉向 VAR12賦值:收盤價6%的之字轉向<1日前的收盤價6%的之字轉向 AND 1日前的收盤價6%的之字轉向>=2日前的收盤價6%的之字轉向 AND 2日前的收盤價6%的之字轉向>=3日前的收盤價6%的之字轉向 VAR13賦值:收盤價22%的之字轉向>1日前的收盤價22%的之字轉向 AND 1日前的收盤價22%的之字轉向<=2日前的收盤價22%的之字轉向 AND 2日前的收盤價22%的之字轉向<=3日前的收盤價22%的之字轉向 VAR14賦值:收盤價22%的之字轉向<1日前的收盤價22%的之字轉向 AND 1日前的收盤價22%的之字轉向>=2日前的收盤價22%的之字轉向 AND 2日前的收盤價22%的之字轉向>=3日前的收盤價22%的之字轉向 VAR15賦值:收盤價51%的之字轉向>1日前的收盤價51%的之字轉向 AND 1日前的收盤價51%的之字轉向<=2日前的收盤價51%的之字轉向 AND 2日前的收盤價51%的之字轉向<=3日前的收盤價51%的之字轉向 VAR16賦值:收盤價51%的之字轉向<1日前的收盤價51%的之字轉向 AND 1日前的收盤價51%的之字轉向>=2日前的收盤價51%的之字轉向 AND 2日前的收盤價51%的之字轉向>=3日前的收盤價51%的之字轉向 VAR17賦值:收盤價72%的之字轉向>1日前的收盤價72%的之字轉向 AND 1日前的收盤價72%的之字轉向<=2日前的收盤價72%的之字轉向 AND 2日前的收盤價72%的之字轉向<=3日前的收盤價72%的之字轉向 VAR18賦值:收盤價72%的之字轉向<1日前的收盤價72%的之字轉向 AND 1日前的收盤價72%的之字轉向>=2日前的收盤價72%的之字轉向 AND 2日前的收盤價72%的之字轉向>=3日前的收盤價72%的之字轉向 VAR19賦值:收盤價的2日指數移動平均-收盤價的150日指數移動平均 買１賦值:VAR10 買２賦值:(VAR11+VAR13+VAR15+VAR17) 賣１賦值:(VAR12+VAR14+VAR16+VAR18) 輸出B:如果買１>0OR買２>0,返回最低價*0.99,否則返回無效數,CROSSDOT,線寬為3,畫黃色 當滿足條件買１>0OR買２>0時,在最低價*0.99位置書寫文字,畫紅色 輸出S:如果賣１>0,返回最高價*1.01,否則返回無效數,CROSSDOT,線寬為3,畫綠色 當滿足條件賣１>0時,在最高價*1.02位置書寫文字,畫綠色 當滿足條件(收盤價5%的之字轉向>1日前的收盤價5%的之字轉向)AND(1日前的收盤價5%的之字轉向<=2日前的收盤價5%的之字轉向)AND(2日前的收盤價5%的之字轉向<=3日前的收盤價5%的之字轉向)時,在最低價*0.98位置畫1號圖標 當滿足條件(收盤價5%的之字轉向<1日前的收盤價5%的之字轉向)AND(1日前的收盤價5%的之字轉向>=2日前的收盤價5%的之字轉向)AND(2日前的收盤價5%的之字轉向>=3日前的收盤價5%的之字轉向)時,在最高價*1.01位置畫2號圖標 ZB賦值:VAR3的5日指數移動平均的5日指數移動平均*3, COLORSTICK VARA賦值:如果VAR9ANDCROSS(收盤價的3日簡單移動平均,收盤價的5日簡單移動平均),返回20,否則返回0 K賦值:VAR7的5日指數移動平均*2, , COLORFF00FF D賦值:K的5日指數移動平均, , 畫白色 J賦值:K*3-D*2, ,畫黃色 VARB賦值:收盤價位于收盤價的3日簡單移動平均和收盤價的5日簡單移動平均之間 AND J>10 HS賦值:成交量(手)/當前流通股本(手)*100, , 畫綠色 VARE賦值:100*(收盤價-34日內收盤價的最低值)/(34日內最高價的最高值-34日內最低價的最低值)的5日簡單移動平均-20 VARF賦值:100-3*(收盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均+2*(收盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 當滿足條件VAR11ANDCOUNT(VAR11,30)=1時,在最低價*0.95位置書寫文字,線寬為1,COLORFF00FF VAR1A賦值:如果VARE>0,返回VARE,否則返回0 VAR1B賦值:如果VAR14>=200ANDVAR13>=150,返回15,否則返回如果VAR14<=-200ANDVAR13<=-150,返回-15,否則返回VAR16+60 VAR1C賦值:VAR1A>48 AND VAR1B>60 AND VAR19<100 當滿足條件VAR1CANDCOUNT(VAR1C,30)=1時,在最低價*0.95位置書寫文字 畫白色 指標王賦值:(收盤價-8日內最低價的最低值)/(8日內最高價的最高值-8日內最低價的最低值)*100的3日[1日權重]移動平均上穿(收盤價-8日內最低價的最低值)/(8日內最高價的最高值-8日內最低價的最低值)*100的3日[1日權重]移動平均的3日[1日權重]移動平均 AND (收盤價-8日內最低價的最低值)/(8日內最高價的最高值-8日內最低價的最低值)*100的3日[1日權重]移動平均<20 當滿足條件指標王時,在最低價位置書寫文字,畫黃色 當滿足條件VAR1時,在最低價*0.98位置書寫文字,畫黃色 當滿足條件收盤價的3日簡單移動平均上穿收盤價的9日簡單移動平均ANDC>=1日前的收盤價ANDC>開盤價時,在最低價*0.98位置書寫文字,畫洋紅色 輸出下降壓力線:當滿足條件最高價>=10日內最高價的最高值時,在最高價位置畫直線起點，當滿足條件最低價<=3日內最低價的最低值時,在3日內最高價的最高值位置畫直線終點,1表示是否延長.,線寬為2 當滿足條件到最后交易的周期=2時,在最低價和最低價位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,畫綠色, 當滿足條件是否最后一個周期時,在1日前的最低價位置書寫數字 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

C2:=REF(C,1);
漲停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(漲停,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(漲停,H,L,0,0),COLORRED;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
圣:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
靈:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
石:=SMA(靈,13,8);{m.weiqiv.net.cn'平臺啟動'),COLORYELLOW;}
AAA:=(3*C+H+L+O)/6;
VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
DRAWBAND(VAR1,RGB(155,50,50),VAR6,RGB(250,250,0));
短線:VAR1,COLORWHITE;
中線:VAR6,COLORYELLOW;
下跌:IF(VAR1=VAR6,VAR6,DRAWNULL),COLORGREEN;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1;
立樁量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(立樁量)),REF(HIGH,BARSLAST(立樁量)),1,0),COLORCYAN;
STICKLINE(CLOSE,REF(LOW,BARSLAST(立樁量)),REF(LOW,BARSLAST(立樁量)),1,0),COLORYELLOW;
TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法則:=TJ3=1;
成立:=三天法則 AND 突破;
條件成立:=FILTER(成立,3);
DRAWTEXT(條件成立,L*0.99,'悟道'),COLORYELLOW;
STICKLINE(C>=O,C,O,3,0),COLOR000045;
STICKLINE(C>=O,C,O,2.5,0),COLOR000065;
STICKLINE(C>=O,C,O,2,0),COLOR000085;
STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;
STICKLINE(C>=O,C,O,1,0),COLOR0000C5;
STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;
STICKLINE(C>=O,H,L,0,0),COLOR0000F5;
STICKLINE(C<O,C,O,3,0),COLOR353500;
STICKLINE(C<O,C,O,2.5,0),COLOR454500;
STICKLINE(C<O,C,O,2,0),COLOR555500;
STICKLINE(C<O,C,O,1.5,0),COLOR656500;
STICKLINE(C<O,C,O,1,0),COLOR757500;
STICKLINE(C<O,C,O,0.5,0),COLOR858500;
STICKLINE(C<O,H,L,0,0),COLOR959500;
HIGHN:=10;
LOWN:=10;
HIGHDISPLAY:=0;
LOWDISPLAY:=0;
ZGDISPLAY:=0;
MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DRAWICON(CC,H*1.02,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);{頂部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
上軌:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORBLUE,LINETHICK1;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);
DRAWICON(CC1,L*0.98,1);
DD1:=BARSLAST(CC1);

DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(L,DD1),L);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
下軌:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORRED,LINETHICK1;
ZGSTAR:=(上軌+下軌)/2;
ZGEND:=CONST((上軌+下軌)/2);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中軌:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK1;
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORMAGENTA,POINTDOT;
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORCYAN,POINTDOT;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
買１:=VAR10;
買２:=(VAR11+VAR13+VAR15+VAR17);
賣１:=(VAR12+VAR14+VAR16+VAR18);
B:IF(買１>0 OR 買２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
DRAWTEXT(買１>0 OR 買２>0,LOW*0.99,'緣起'),COLORRED;
S:IF(賣１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
DRAWTEXT(賣１>0,HIGH*1.02,'輪回'),COLORGREEN;
DRAWICON((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)),LOW*0.98,1) ;
DRAWICON((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)),HIGH*1.01,2);
ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;
VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
K:=EMA(VAR7,5)*2, , COLORFF00FF;
D:=EMA(K,5), , COLORWHITE;
J:=K*3-D*2, ,COLORYELLOW;
VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;
HS:=VOL/CAPITAL*100, , COLORGREEN;
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'眾仙歸位'),LINETHICK1,COLORFF00FF;
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.95,'大限') COLORWHITE;
指標王:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20;
DRAWTEXT(指標王,L,'八仙過海'),COLORYELLOW;
DRAWTEXT(VAR1,L*0.98,'頓悟'),COLORYELLOW;
DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L*0.98,'雞犬升天'),COLORMAGENTA;
下降壓力線:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),LINETHICK2;
STICKLINE(CURRBARSCOUNT=2,L,L,10,0),COLORGREEN,;
DRAWNUMBER(ISLASTBAR,REF(L,1),REF(L,1));
DRAWTEXT_FIX(C>O,0.01,0.9,0,' m.weiqiv.net.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?