相關標簽:同花順主圖指標源碼 、 同花順主圖公式源碼 、 同花順使用的副圖指標 、 同花順短線副圖指標 、 同花順主圖指標公式 、 同花順分時指標源碼 、 同花順ddx指標源碼 、 同花順畫線指標源碼 、 同花順籌指標源碼 、 同花順波段指標源碼 、 同花順cyc指標源碼 、 同花順cci指標源碼 、 同花順逃頂指標源碼 、 同花順pvi指標源碼 、 通達信提款機副圖指標 、

?

按提示操作，買入與賣出，不會被套。
《提款機之一》，提款機開出現牛股后，堅決買入。

原理解析：
N賦值:9 M1賦值:3 M2賦值:3 P賦值:9 RSV賦值:(收盤價-N日內最低價的最低值)/(N日內最高價的最高值-N日內最低價的最低值)*100 K賦值:RSV的M1日[1日權重]移動平均,畫紅色,線寬為2 D賦值:K的M2日[1日權重]移動平均,COLOR00FF00 JJ賦值:P*(3*D-2*K),COLOR00FF00 J賦值:((3 * K) - (2 * D)) MAIRU賦值: K上穿D AND K<20 MAICHU賦值: D上穿K AND D>80 VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的3日[1日權重]移動平均/最低價-VAR2和0的較大值的3日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.3,返回VAR3*10,否則返回VAR3/10的3日指數移動平均 VAR5賦值:30日內最低價的最低值 VAR6賦值:30日內VAR4的最高值 VAR7賦值:如果收盤價的58日簡單移動平均,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:如果VAR8>100,返回100,否則返回VAR8 輸出吸籌:當滿足條件VAR9>-120時,在0和VAR9位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,COLORF00FF0 輸出快線:(收盤價-N日內最低價的最低值)/(N日內最高價的最高值-N日內最低價的最低值)*100,COLORFF937F 輸出慢線:快線的M1日[1日權重]移動平均,畫紅色,線寬為2 輸出空:慢線的M2日[1日權重]移動平均,COLOR00FF00 輸出牛股:如果上次慢線上穿空距今天數<PANDBARSLAST(空上穿慢線)<PANDCROSS(慢線,空)AND慢線<20,返回90,否則返回0,STICK,COLORFF937F 當滿足條件牛股時,在0和90位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,線寬為4,STICK,COLORFF937F BB賦值:如果上次慢線上穿快線距今天數>=3ANDCROSS(快線,慢線)AND慢線<30,返回20,否則返回0 輸出買:當滿足條件BB時,在0和20位置之間畫柱狀線,寬度為7,1不為0則畫空心柱.,畫黃色 AA賦值:如果上次快線上穿慢線距今天數>=4ANDCROSS(慢線,快線)AND快線>50,返回20,否則返回0 輸出賣:當滿足條件AA時,在80和100位置之間畫柱狀線,寬度為7,1不為0則畫空心柱.,COLOR00FF00 V1賦值:收盤價12%的之字轉向 輸出V2:如果2日前的V1>1日前的V1ANDV1>1日前的V1,返回50,否則返回0,畫紅色,線寬為2 輸出V3:如果2日前的V1<1日前的V1ANDV1<1日前的V1,返回50,否則返回0,畫綠色,線寬為2 VAR1賦值:收盤價12%的之字轉向<1日前的收盤價12%的之字轉向 AND 1日前的收盤價12%的之字轉向>2日前的收盤價12%的之字轉向 VAR2賦值:收盤價12%的之字轉向>1日前的收盤價12%的之字轉向 AND 1日前的收盤價12%的之字轉向<2日前的收盤價12%的之字轉向 當滿足條件VAR1時,在50位置書寫文字,畫黃色 當滿足條件VAR2時,在50位置書寫文字,畫黃色 輸出資金趨勢:30*(收盤價-34日內最低價的最低值)/(34日內最高價的最高值-34日內最低價的最低值)的3日指數移動平均*3, 畫紅色,線寬為1 VAR3賦值:如果收盤價16%之字轉向的前1個波谷位置=0ANDHIGH>最低價+0.04,返回4,否則返回0 買點賦值: VAR3,畫紅色 當滿足條件買點>0時,在45位置書寫文字,畫洋紅色 當滿足條件買點時,在0和50位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫洋紅色,線寬為1 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

N:=9;M1:=3;M2:=3;P:=9;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1),colorred,LINETHICK2;
D:=SMA(K,M2,1),COLOR00FF00;
JJ:=P*(3*D-2*K),COLOR00FF00;
J:=((3 * K) - (2 * D));
MAIRU:= CROSS(K,D) AND K<20;
MAICHU:= CROSS(D,K) AND D>80;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
VAR5:=LLV(LOW,30);
VAR6:=HHV(VAR4,30);
VAR7:=IF(MA(CLOSE,58),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=IF(VAR8>100,100,VAR8);
吸籌:STICKLINE(VAR9>-120,0,VAR9,6,1),COLORF00FF0;
快線:(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,COLORFF937F;
慢線:SMA(快線,M1,1),colorred,LINETHICK2;
空:SMA(慢線,M2,1),COLOR00FF00;
牛股:IF(BARSLAST(CROSS(慢線,空))<P AND BARSLAST(CROSS(空,慢線))<P AND CROSS(慢線,空) AND 慢線<20,90,0),STICK,COLORFF937F;
STICKLINE(牛股,0,90,6,1),LINETHICK4,STICK,COLORFF937F;
BB:=IF(BARSLAST(CROSS(慢線,快線))>=3 AND CROSS(快線,慢線) AND 慢線<30,20,0);
買:STICKLINE(BB,0,20,7,1),coloryellow;
AA:=IF(BARSLAST(CROSS(快線,慢線))>=4 AND CROSS(慢線,快線) AND 快線>50,20,0);
賣:STICKLINE(AA,80,100,7,1),COLOR00FF00;V1:=ZIG(3,12);
V2:IF(REF(V1,2)>REF(V1,1) AND V1>REF(V1,1),50,0),colorred,LINETHICK2;
V3:IF(REF(V1,2)<REF(V1,1) AND V1<REF(V1,1),50,0),colorgreen,LINETHICK2;
VAR1:=ZIG(3,12)<REF(ZIG(3,12),1) AND REF(ZIG(3,12),1)>REF(ZIG(3,12),2);
VAR2:=ZIG(3,12)>REF(ZIG(3,12),1) AND REF(ZIG(3,12),1)<REF(ZIG(3,12),2);
DRAWTEXT(VAR1,50,'地獄之門=》做空'),coloryellow;
DRAWTEXT(VAR2,50,'天堂之路=》做多'),coloryellow;
資金趨勢:EMA(30*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3)*3, colorred,LINETHICK1;
VAR3:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
買點:= VAR3,colorred;
DRAWTEXT(買點>0,45,'低吸點'),colormagenta;
STICKLINE(買點,0,50,2,0),colormagenta,LINETHICK1;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

?

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

?