請老師修改指標 [博易POBO]
咨詢內容：
1?
HH:=H;
LL:=L;
多止損:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*3.5,NODRAW,COLORYELLOW;
多止盈:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1+REFX1(MA(HH,25),25/2),NODRAW,COLORWHITE;
空止損:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*3.5+REFX1(MA(HH,25),25/2),NODRAW,COLORYELLOW;
空止盈:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1,NODRAW,COLORWHITE;
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90),COLORRED,LINETHICK1;
D90L:=EMA(短低L,90),COLORRED,LINETHICK1;
D90差:=D90H-D90L;
D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;
D90底:=D90L-D90差*2,COLORRED,LINETHICK1;
高0:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1+REFX1(MA(HH,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底 AND 高0>=D90頂;
空頭定位:=高0<=D90頂 AND 低0<=D90底;
震蕩定位:=低0>=D90底 AND 高0<=D90頂;
短頂:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*2+REFX1(MA(HH,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,NODRAW,COLORRED;
頂1:=120000,COLORYELLOW,LINETHICK3;
底1:=-20000,COLORYELLOW,LINETHICK3;
STICKLINE1(多頭定位=1,頂1,底1,11,0),COLOR000066;
STICKLINE1(空頭定位=1,頂1,底1,11,0),COLOR003300;
STICKLINE1(震蕩定位=1,頂1,底1,11,0),COLOR555555;
HD:=REFX1(MA(短線高盤,25),25/2);
LD:=REFX1(MA(短線低盤,25),25/2);
震蕩頂:=(REFX1(MA(LD,25),25/2)-REFX1(MA(HD,25),25/2))*1+REFX1(MA(LD,25),25/2),POINTDOT,COLORWHITE;
震蕩底:=REFX1(MA(HD,25),25/2)-((REFX1(MA(LD,25),25/2))-REFX1(MA(HD,25),25/2))*1,POINTDOT,COLORWHITE;
做空:=80000,COLORWHITE,LINETHICK1;
做多:=20000,COLORWHITE,LINETHICK1;
空損:=120000,COLORMAGENTA,LINETHICK2;
多損:=-20000,COLORMAGENTA,LINETHICK2;
多減倉:=65000,POINTDOT,COLORRED;
空減倉:=35000,POINTDOT,COLORGREEN;
DRAWTEXT(ISLASTBAR,120000,'損'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,'空'),COLORWHITE;
DRAWTEXT(ISLASTBAR,65000,'減'),COLORRED;
DRAWTEXT(ISLASTBAR,35000,'減'),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,'多'),COLORWHITE;
DRAWTEXT(ISLASTBAR,-20000,'損'),COLORMAGENTA;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
今D:=EMA(D,3);
昨D:=REF(今D,1);
STICKLINE1(今D>=昨D,短線低盤,短線高盤,0,0),COLORRED;?
STICKLINE1(今D>=昨D,短線收盤,短線開盤,8,0),COLORRED;
STICKLINE1(今D<=昨D,短線低盤,短線高盤,0,0),COLORGREEN;?
STICKLINE1(今D<=昨D,短線收盤,短線開盤,8,0),COLORGREEN;
白色點多定位1:=短線低盤<做多 AND 短線高盤>做多;
白色點空定位1:=短線高盤>做空 AND 短線低盤<做空;
STICKLINE1(白色點多定位1=1,短線低盤,做多,8,0),COLORWHITE;?
STICKLINE1(白色點空定位1=1,短線高盤,做空,8,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE1(白色點多定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE1(白色點多定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
STICKLINE1(白色點空定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE1(白色點空定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
多頭紅色點:=今D>昨D;
空頭紅色點:=今D<昨D;
多頭紅色點定位1:=白色點多定位1=1 AND 多頭紅色點=1;
空頭紅色點定位1:=白色點空定位1=1 AND 空頭紅色點=1;
STICKLINE1(多頭紅色點定位1=1,短線低盤,做多,8,0),COLORMAGENTA;?
STICKLINE1(空頭紅色點定位1=1,短線高盤,做空,8,0),COLORMAGENTA;?
多頭紅色點定位2:=白色點多定位2=1 AND 多頭紅色點=1;
空頭紅色點定位2:=白色點空定位2=1 AND 空頭紅色點=1;
STICKLINE1(多頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE1(多頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
STICKLINE1(空頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE1(空頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,78);
DRAWICON(多頭平定位=1,短線高盤,67);
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,短線低盤,48);
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,短線高盤,49);
STICKLINE1(1,80000,80000,15,0),COLORWHITE;
STICKLINE1(1,20000,20000,15,0),COLORWHITE;
STICKLINE1(1,120000,120000,15,0),COLORMAGENTA;
STICKLINE1(1,-20000,-20000,15,0),COLORMAGENTA;
STICKLINE1(1,65000,65000,2,0),COLORRED;
STICKLINE1(1,35000,35000,2,0),COLORGREEN;
?
?
?
?
2
DRAWGBK(C>0, RGB(50,60,250),RGB(17,21,89),0);
H1:=MAX(GETPRICE('YCLOSE'),GETPRICE('HIGH'));
L1:=MIN(GETPRICE('YCLOSE'),GETPRICE('LOW'));
P1:=H1-L1;
阻力:=L1+P1*7/8,COLORGREEN;
支撐:=L1+P1*0.5/8,COLORRED;
中線:=(支撐+阻力)/2,COLORWHITE,POINTDOT;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趨勢線:EMA(V11,3),LINETHICK2,COLORMAGENTA;
V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100;
準備買入:IF(趨勢線<11,趨勢線,NULL);
STICKLINE1(趨勢線<11,趨勢線,11,5,0),COLORYELLOW;
AA:=(趨勢線<11) AND FILTER((趨勢線<=11),15) AND C<中線;
BB0:=REF(趨勢線,1)<11 AND CROSS(趨勢線,11) AND C<中線;
BB1:=REF(趨勢線,1)<11 AND REF(趨勢線,1)>6 AND CROSS(趨勢線,11);
BB2:=REF(趨勢線,1)<6 AND REF(趨勢線,1)>3 AND CROSS(趨勢線,6);
BB3:=REF(趨勢線,1)<3 AND REF(趨勢線,1)>1 AND CROSS(趨勢線,3);
BB4:=REF(趨勢線,1)<1 AND REF(趨勢線,1)>0 AND CROSS(趨勢線,1);
BB5:=REF(趨勢線,1)<0 AND CROSS(趨勢線,0);
BB:=BB1=1 OR BB2=1 OR BB3=1 OR BB4=1 OR BB5=1;
下單買入:IF(BB=1 AND C<中線,11,NULL);
STICKLINE1(BB=1 AND C<中線,11,50,3,0),COLORRED;
DRAWICON(BB=1 AND C<中線,55,1);
DRAWTEXT(BB0,60,'★買'),COLORRED;
DRAWTEXT(AA,16,'準備買入'),COLORYELLOW;
準備賣出:IF(趨勢線>89,趨勢線,NULL);
STICKLINE1(趨勢線>89,趨勢線,89,5,0),COLORWHITE;
CC:=(趨勢線>89) AND FILTER((趨勢線>89),15) AND C>中線;
DD0:=REF(趨勢線,1)>89 AND CROSS(89,趨勢線) AND C>中線;
DD1:=REF(趨勢線,1)>89 AND REF(趨勢線,1)<94 AND CROSS(89,趨勢線);
DD2:=REF(趨勢線,1)>94 AND REF(趨勢線,1)<97 AND CROSS(94,趨勢線);
DD3:=REF(趨勢線,1)>97 AND REF(趨勢線,1)>99 AND CROSS(97,趨勢線);
DD4:=REF(趨勢線,1)>99 AND REF(趨勢線,1)<100 AND CROSS(99,趨勢線);
DD5:=REF(趨勢線,1)>100 AND CROSS(100,趨勢線);
DD:=DD1=1 OR DD2=1 OR DD3=1 OR DD4=1 OR DD5=1;
下單賣出:IF(DD=1 AND C>中線,89,NULL);
STICKLINE(DD=1 AND C>中線,89,50,3,0),COLORGREEN;
DRAWICON(DD=1 AND C>中線,45,2);
DRAWTEXT(DD0,40,'★賣'),COLORGREEN;
DRAWTEXT (CC,84,'準備賣出'),COLORWHITE;
頂:89,COLORGREEN;
底:11,COLORRED;
中:50,POINTDOT,COLORWHITE;
DRAWTEXT(ISLASTBAR,頂,'頂'),COLORGREEN;
DRAWTEXT(ISLASTBAR,底,'底'),COLORRED;
DRAWTEXT(ISLASTBAR,中,'中'),COLORWHITE;?
?
?
?
3
//TECHNAME:=FSL
//TECHTITLE:=分水線;
N1:=3;
N2:=10;
M1:=5;
M2:=20;
LC:= REF(CLOSE,1);?
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;?
RSI2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;?
買:EMA(RSI1,M1),COLORRED,LINETHICK2;?
賣:EMA(RSI2,M2),LINETHICK2,COLORFFFF00;
//DRAWK:=FALSE;
VAR1:=REF(CLOSE,1);?
VAR2:SMA(MAX(CLOSE-VAR1,0),6,1)/SMA(ABS(CLOSE-VAR1),6,1)*100;?
好財神:=CROSS(80,VAR2);
DRAWICON(好財神>0,買*1.15,2);
DRAWTEXT(好財神>0,買,'財神跑');
VAR3:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;?
VAR4:SMA(SMA(VAR3,3,1),3,1),COLOR00FF00;
VAR5:=EMA(VAR4,5);?
VAR7:3*VAR4-2*VAR5,COLORGREEN;
DRAWTEXT(CROSS(VAR7,VAR4) AND VAR7<21,VAR4,'財神到'),COLORYELLOW;?
DRAWICON(CROSS(VAR7,VAR4)>0 AND VAR7<21,VAR4,1);
?
?
?
?
4
?
Q_1:=C-REF(C,1);
Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6);
Q_3:=CROSS(EMA(C,19),EMA(C,7));
Q_4:=CROSS(EMA(C,7),EMA(C,19));
Z1:=L=LLV(L,BARSLAST(Q_3)+1);
Z2:=LLV(L,BARSLAST(Q_3)+1);
Z3:=H=HHV(H,BARSLAST(Q_4)+1);
Z4:=HHV(H,BARSLAST(Q_4)+1);
//DRAWLINE1(Z1,Z2,Z3,Z4,0),COLORMAGENTA,LINETHICK2;
//Q_A:TRENDLINES( Z1,Z2 ,Z3 ,Z4 ),NODRAW;
Y1:=H=HHV(H,BARSLAST(Q_4)+1);
Y2:=HHV(H,BARSLAST(Q_4)+1);
Y3:=L=LLV(L,BARSLAST(Q_3)+1);
Y4:=LLV(L,BARSLAST(Q_3)+1);
//DRAWLINE1(Y1,Y2,Y3,Y4,0),COLORCYAN,LINETHICK2;
//Q_B:TRENDLINES(Y1,Y2,Y3,Y4),NODRAW;
X01:=LLV(Q_2,2)=LLV(Q_2,7);
X2:=COUNT(Q_2<0,2);
X3:=CROSS(Q_2,MA(Q_2,2));
//X4:=REF(Q_B,1)<REF(Q_B,2);
//X5:=Q_A>REF(Q_B,1);
//買進:(X01 AND X2 AND X3) AND X4 AND X5;
//TJ0:=IF(Q_A<REF(Q_A,1) AND Q_B=Q_A,1,0);
//TJ1:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0);
A:BACKSET(Y3,BARSLAST(Y1)),NODRAW;
B:BACKSET(A=1&&REF(ISNULL(A),1),BARSLAST(Y3)),NODRAW;
STICKLINE1(1,0,23,2,0),COLORLIGHTRED;
//持股:IF(B=1,23,0),STICK,COLORLIGHTRED,LINETHICK3;
STICKLINE1(REFX1(B=1,1),0,23,2,0),COLORLIGHTRED;
STICKLINE1(A=1,0,35,2,0),COLORLIGHTGREEN;
STICKLINE1(REFX(A=1&&REF(ISNULL(A),1),1),0,60,1,0),COLORCYAN;
X:BACKSET(A=1&&REF(ISNULL(A),1),BARSLAST(Y3)),NODRAW;
CC:BACKSET(ISLASTBAR,BARSLAST(A=1)+1),NODRAW;
STICKLINE1(A=1&&REFX1(A,1)=0&&CC<>1||A=1&&REFX1(ISNULL(A),1)&&CC<>1,0,60,1,0),COLORRED;//
?
STICKLINE1(A=0&&REF(A=1,1)&&CC,0,60,1,0),COLORRED;
VVV:BACKSET(ISLASTBAR,BARSLAST(Y1)+1),NODRAW;
STICKLINE1(REF(CROSS(VVV,0.5),1)&&REFX1(BARSLAST(Y1)<BARSLAST(A=1),10000),0,60,1,0),COLORCYAN;
//買一絕:IF(REF(TJ1,1)=0 AND TJ1>=1,60,0),STICK,COLORRED,LINETHICK3;//
//堪稱賣絕:IF(REF(TJ0,1)=0 AND TJ0>=1,60,0),STICK,COLORCYAN,LINETHICK3;
?
地獄線:0,COLORGRAY;
地平線:20,COLORGRAY;
天際線:80,COLORGRAY;
RSV:=(((CLOSE - LLV(LOW,33)) / (HHV(HIGH,33) - LLV(LOW,33))) * 100);
短線:SMA(RSV,7,1),COLORWHITE;
中線:SMA(SMA(RSV,7,1),3,1),COLORYELLOW;
長線:SMA(SMA(SMA(RSV,6,1),5,1),3,1),COLORMAGENTA;
財神到:CROSS(短線,20),NODRAW;
DRAWICON((CROSS(短線,20)),10,1);
地獄:(CLOSE/COST(13))<=0.8,NODRAW;
STICKLINE1(地獄,-1,0,2,0),COLORGREEN;
地獄重生:地獄<>1 AND REF(地獄=1,1),NODRAW;
DRAWICON(地獄重生,20,23);?
?
?
第一個指標和原來差異大
原圖：
?
修改后：
HH:=H;
LL:=L;
多止損:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*3.5,NODRAW,COLORYELLOW;
多止盈:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1+REFX(MA(HH,25),25/2),NODRAW,COLORWHITE;
空止損:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*3.5+REFX(MA(HH,25),25/2),NODRAW,COLORYELLOW;
空止盈:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1,NODRAW,COLORWHITE;
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90),COLORRED,LINETHICK1;
D90L:=EMA(短低L,90),COLORRED,LINETHICK1;
D90差:=D90H-D90L;
D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;
D90底:=D90L-D90差*2,COLORRED,LINETHICK1;
高0:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1+REFX(MA(HH,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底AND高0>=D90頂;
空頭定位:=高0<=D90頂AND低0<=D90底;
震蕩定位:=低0>=D90底AND高0<=D90頂;
短頂:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*2+REFX(MA(HH,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,NODRAW,COLORRED;
頂1:=120000,COLORYELLOW,LINETHICK3;
底1:=-20000,COLORYELLOW,LINETHICK3;
STICKLINE(多頭定位=1,頂1,底1,11,0),COLOR000066;
STICKLINE(空頭定位=1,頂1,底1,11,0),COLOR003300;
STICKLINE(震蕩定位=1,頂1,底1,11,0),COLOR555555;
HD:=REFX(MA(短線高盤,25),25/2);
LD:=REFX(MA(短線低盤,25),25/2);
震蕩頂:=(REFX(MA(LD,25),25/2)-REFX(MA(HD,25),25/2))*1+REFX(MA(LD,25),25/2),POINTDOT,COLORWHITE;
震蕩底:=REFX(MA(HD,25),25/2)-((REFX(MA(LD,25),25/2))-REFX(MA(HD,25),25/2))*1,POINTDOT,COLORWHITE;
做空:=80000,COLORWHITE,LINETHICK1;
做多:=20000,COLORWHITE,LINETHICK1;
空損:=120000,COLORMAGENTA,LINETHICK2;
多損:=-20000,COLORMAGENTA,LINETHICK2;
多減倉:=65000,POINTDOT,COLORRED;
空減倉:=35000,POINTDOT,COLORGREEN;
DRAWTEXT(ISLASTBAR,120000,'損'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,'空'),COLORWHITE;
DRAWTEXT(ISLASTBAR,65000,'減'),COLORRED;
DRAWTEXT(ISLASTBAR,35000,'減'),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,'多'),COLORWHITE;
DRAWTEXT(ISLASTBAR,-20000,'損'),COLORMAGENTA;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
今D:=EMA(D,3);
昨D:=REF(今D,1);
STICKLINE(今D>=昨D,短線低盤,短線高盤,1,0),COLORRED;?
STICKLINE(今D>=昨D,短線收盤,短線開盤,8,0),COLORRED;
STICKLINE(今D<=昨D,短線低盤,短線高盤,1,0),COLORGREEN;?
STICKLINE(今D<=昨D,短線收盤,短線開盤,8,0),COLORGREEN;
白色點多定位1:=短線低盤<做多AND短線高盤>做多;
白色點空定位1:=短線高盤>做空AND短線低盤<做空;
STICKLINE(白色點多定位1=1,短線低盤,做多,8,0),COLORWHITE;?
STICKLINE(白色點空定位1=1,短線高盤,做空,8,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE(白色點多定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點多定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
STICKLINE(白色點空定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點空定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
多頭紅色點:=今D>昨D;
空頭紅色點:=今D<昨D;
多頭紅色點定位1:=白色點多定位1=1AND多頭紅色點=1;
空頭紅色點定位1:=白色點空定位1=1AND空頭紅色點=1;
STICKLINE(多頭紅色點定位1=1,短線低盤,做多,8,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位1=1,短線高盤,做空,8,0),COLORMAGENTA;?
多頭紅色點定位2:=白色點多定位2=1AND多頭紅色點=1;
空頭紅色點定位2:=白色點空定位2=1AND空頭紅色點=1;
STICKLINE(多頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(多頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
STICKLINE(空頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
多頭多定位:=CROSS(做多,短線低盤)AND多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空)AND多頭定位=1AND震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空)AND空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤)AND空頭定位=1AND震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤)AND震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空)AND震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,78);
DRAWICON(多頭平定位=1,短線高盤,67);
DRAWICON(多頭多定位=1OR震蕩多定位=1,短線低盤,48);
DRAWICON(空頭空定位=1OR震蕩空定位=1,短線高盤,49);
STICKLINE(1,80000,80000,15,0),COLORWHITE;
STICKLINE(1,20000,20000,15,0),COLORWHITE;
STICKLINE(1,120000,120000,15,0),COLORMAGENTA;
STICKLINE(1,-20000,-20000,15,0),COLORMAGENTA;
STICKLINE(1,65000,65000,2,0),COLORRED;
STICKLINE(1,35000,35000,2,0),COLORGREEN;
? 來源 程序化久久網
請老師修改指標
老師麻煩修改成匯點用的1?
HH:=H;
LL:=L;
多止損:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*3.5,NODRAW,COLORYELLOW;
多止盈:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1+REFX1(MA(HH,25),25/2),NODRAW,COLORWHITE;
空止損:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*3.5+REFX1(MA(HH,25),25/2),NODRAW,COLORYELLOW;
空止盈:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1,NODRAW,COLORWHITE;
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90),COLORRED,LINETHICK1;
D90L:=EMA(短低L,90),COLORRED,LINETHICK1;
D90差:=D90H-D90L;
D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;
D90底:=D90L-D90差*2,COLORRED,LINETHICK1;
高0:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1+REFX1(MA(HH,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底 AND 高0>=D90頂;
空頭定位:=高0<=D90頂 AND 低0<=D90底;
震蕩定位:=低0>=D90底 AND 高0<=D90頂;
短頂:=(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*2+REFX1(MA(HH,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX1(MA(LL,25),25/2)-(REFX1(MA(HH,25),25/2)-REFX1(MA(LL,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,NODRAW,COLORRED;
頂1:=120000,COLORYELLOW,LINETHICK3;
底1:=-20000,COLORYELLOW,LINETHICK3;
STICKLINE1(多頭定位=1,頂1,底1,11,0),COLOR000066;
STICKLINE1(空頭定位=1,頂1,底1,11,0),COLOR003300;
STICKLINE1(震蕩定位=1,頂1,底1,11,0),COLOR555555;
HD:=REFX1(MA(短線高盤,25),25/2);
LD:=REFX1(MA(短線低盤,25),25/2);
震蕩頂:=(REFX1(MA(LD,25),25/2)-REFX1(MA(HD,25),25/2))*1+REFX1(MA(LD,25),25/2),POINTDOT,COLORWHITE;
震蕩底:=REFX1(MA(HD,25),25/2)-((REFX1(MA(LD,25),25/2))-REFX1(MA(HD,25),25/2))*1,POINTDOT,COLORWHITE;
做空:=80000,COLORWHITE,LINETHICK1;
做多:=20000,COLORWHITE,LINETHICK1;
空損:=120000,COLORMAGENTA,LINETHICK2;
多損:=-20000,COLORMAGENTA,LINETHICK2;
多減倉:=65000,POINTDOT,COLORRED;
空減倉:=35000,POINTDOT,COLORGREEN;
DRAWTEXT(ISLASTBAR,120000,'損'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,'空'),COLORWHITE;
DRAWTEXT(ISLASTBAR,65000,'減'),COLORRED;
DRAWTEXT(ISLASTBAR,35000,'減'),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,'多'),COLORWHITE;
DRAWTEXT(ISLASTBAR,-20000,'損'),COLORMAGENTA;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
今D:=EMA(D,3);
昨D:=REF(今D,1);
STICKLINE1(今D>=昨D,短線低盤,短線高盤,0,0),COLORRED;?
STICKLINE1(今D>=昨D,短線收盤,短線開盤,8,0),COLORRED;
STICKLINE1(今D<=昨D,短線低盤,短線高盤,0,0),COLORGREEN;?
STICKLINE1(今D<=昨D,短線收盤,短線開盤,8,0),COLORGREEN;
白色點多定位1:=短線低盤<做多 AND 短線高盤>做多;
白色點空定位1:=短線高盤>做空 AND 短線低盤<做空;
STICKLINE1(白色點多定位1=1,短線低盤,做多,8,0),COLORWHITE;?
STICKLINE1(白色點空定位1=1,短線高盤,做空,8,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE1(白色點多定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE1(白色點多定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
STICKLINE1(白色點空定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE1(白色點空定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
多頭紅色點:=今D>昨D;
空頭紅色點:=今D<昨D;
多頭紅色點定位1:=白色點多定位1=1 AND 多頭紅色點=1;
空頭紅色點定位1:=白色點空定位1=1 AND 空頭紅色點=1;
STICKLINE1(多頭紅色點定位1=1,短線低盤,做多,8,0),COLORMAGENTA;?
STICKLINE1(空頭紅色點定位1=1,短線高盤,做空,8,0),COLORMAGENTA;?
多頭紅色點定位2:=白色點多定位2=1 AND 多頭紅色點=1;
空頭紅色點定位2:=白色點空定位2=1 AND 空頭紅色點=1;
STICKLINE1(多頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE1(多頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
STICKLINE1(空頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE1(空頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
多頭多定位:=CROSS(做多,短線低盤) AND 多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空) AND 多頭定位=1 AND 震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空) AND 空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤) AND 空頭定位=1 AND 震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤) AND 震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空) AND 震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,78);
DRAWICON(多頭平定位=1,短線高盤,67);
DRAWICON(多頭多定位=1 OR 震蕩多定位=1,短線低盤,48);
DRAWICON(空頭空定位=1 OR 震蕩空定位=1,短線高盤,49);
STICKLINE1(1,80000,80000,15,0),COLORWHITE;
STICKLINE1(1,20000,20000,15,0),COLORWHITE;
STICKLINE1(1,120000,120000,15,0),COLORMAGENTA;
STICKLINE1(1,-20000,-20000,15,0),COLORMAGENTA;
STICKLINE1(1,65000,65000,2,0),COLORRED;
STICKLINE1(1,35000,35000,2,0),COLORGREEN;
?
?
?
?
2
DRAWGBK(C>0, RGB(50,60,250),RGB(17,21,89),0);
H1:=MAX(GETPRICE('YCLOSE'),GETPRICE('HIGH'));
L1:=MIN(GETPRICE('YCLOSE'),GETPRICE('LOW'));
P1:=H1-L1;
阻力:=L1+P1*7/8,COLORGREEN;
支撐:=L1+P1*0.5/8,COLORRED;
中線:=(支撐+阻力)/2,COLORWHITE,POINTDOT;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趨勢線:EMA(V11,3),LINETHICK2,COLORMAGENTA;
V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100;
準備買入:IF(趨勢線<11,趨勢線,NULL);
STICKLINE1(趨勢線<11,趨勢線,11,5,0),COLORYELLOW;
AA:=(趨勢線<11) AND FILTER((趨勢線<=11),15) AND C<中線;
BB0:=REF(趨勢線,1)<11 AND CROSS(趨勢線,11) AND C<中線;
BB1:=REF(趨勢線,1)<11 AND REF(趨勢線,1)>6 AND CROSS(趨勢線,11);
BB2:=REF(趨勢線,1)<6 AND REF(趨勢線,1)>3 AND CROSS(趨勢線,6);
BB3:=REF(趨勢線,1)<3 AND REF(趨勢線,1)>1 AND CROSS(趨勢線,3);
BB4:=REF(趨勢線,1)<1 AND REF(趨勢線,1)>0 AND CROSS(趨勢線,1);
BB5:=REF(趨勢線,1)<0 AND CROSS(趨勢線,0);
BB:=BB1=1 OR BB2=1 OR BB3=1 OR BB4=1 OR BB5=1;
下單買入:IF(BB=1 AND C<中線,11,NULL);
STICKLINE1(BB=1 AND C<中線,11,50,3,0),COLORRED;
DRAWICON(BB=1 AND C<中線,55,1);
DRAWTEXT(BB0,60,'★買'),COLORRED;
DRAWTEXT(AA,16,'準備買入'),COLORYELLOW;
準備賣出:IF(趨勢線>89,趨勢線,NULL);
STICKLINE1(趨勢線>89,趨勢線,89,5,0),COLORWHITE;
CC:=(趨勢線>89) AND FILTER((趨勢線>89),15) AND C>中線;
DD0:=REF(趨勢線,1)>89 AND CROSS(89,趨勢線) AND C>中線;
DD1:=REF(趨勢線,1)>89 AND REF(趨勢線,1)<94 AND CROSS(89,趨勢線);
DD2:=REF(趨勢線,1)>94 AND REF(趨勢線,1)<97 AND CROSS(94,趨勢線);
DD3:=REF(趨勢線,1)>97 AND REF(趨勢線,1)>99 AND CROSS(97,趨勢線);
DD4:=REF(趨勢線,1)>99 AND REF(趨勢線,1)<100 AND CROSS(99,趨勢線);
DD5:=REF(趨勢線,1)>100 AND CROSS(100,趨勢線);
DD:=DD1=1 OR DD2=1 OR DD3=1 OR DD4=1 OR DD5=1;
下單賣出:IF(DD=1 AND C>中線,89,NULL);
STICKLINE(DD=1 AND C>中線,89,50,3,0),COLORGREEN;
DRAWICON(DD=1 AND C>中線,45,2);
DRAWTEXT(DD0,40,'★賣'),COLORGREEN;
DRAWTEXT (CC,84,'準備賣出'),COLORWHITE;
頂:89,COLORGREEN;
底:11,COLORRED;
中:50,POINTDOT,COLORWHITE;
DRAWTEXT(ISLASTBAR,頂,'頂'),COLORGREEN;
DRAWTEXT(ISLASTBAR,底,'底'),COLORRED;
DRAWTEXT(ISLASTBAR,中,'中'),COLORWHITE;?
?
?
?
3
//TECHNAME:=FSL
//TECHTITLE:=分水線;
N1:=3;
N2:=10;
M1:=5;
M2:=20;
LC:= REF(CLOSE,1);?
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;?
RSI2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;?
買:EMA(RSI1,M1),COLORRED,LINETHICK2;?
賣:EMA(RSI2,M2),LINETHICK2,COLORFFFF00;
//DRAWK:=FALSE;
VAR1:=REF(CLOSE,1);?
VAR2:SMA(MAX(CLOSE-VAR1,0),6,1)/SMA(ABS(CLOSE-VAR1),6,1)*100;?
好財神:=CROSS(80,VAR2);
DRAWICON(好財神>0,買*1.15,2);
DRAWTEXT(好財神>0,買,'財神跑');
VAR3:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;?
VAR4:SMA(SMA(VAR3,3,1),3,1),COLOR00FF00;
VAR5:=EMA(VAR4,5);?
VAR7:3*VAR4-2*VAR5,COLORGREEN;
DRAWTEXT(CROSS(VAR7,VAR4) AND VAR7<21,VAR4,'財神到'),COLORYELLOW;?
DRAWICON(CROSS(VAR7,VAR4)>0 AND VAR7<21,VAR4,1);
?
?
?
?
4
?
Q_1:=C-REF(C,1);
Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6);
Q_3:=CROSS(EMA(C,19),EMA(C,7));
Q_4:=CROSS(EMA(C,7),EMA(C,19));
Z1:=L=LLV(L,BARSLAST(Q_3)+1);
Z2:=LLV(L,BARSLAST(Q_3)+1);
Z3:=H=HHV(H,BARSLAST(Q_4)+1);
Z4:=HHV(H,BARSLAST(Q_4)+1);
//DRAWLINE1(Z1,Z2,Z3,Z4,0),COLORMAGENTA,LINETHICK2;
//Q_A:TRENDLINES( Z1,Z2 ,Z3 ,Z4 ),NODRAW;
Y1:=H=HHV(H,BARSLAST(Q_4)+1);
Y2:=HHV(H,BARSLAST(Q_4)+1);
Y3:=L=LLV(L,BARSLAST(Q_3)+1);
Y4:=LLV(L,BARSLAST(Q_3)+1);
//DRAWLINE1(Y1,Y2,Y3,Y4,0),COLORCYAN,LINETHICK2;
//Q_B:TRENDLINES(Y1,Y2,Y3,Y4),NODRAW;
X01:=LLV(Q_2,2)=LLV(Q_2,7);
X2:=COUNT(Q_2<0,2);
X3:=CROSS(Q_2,MA(Q_2,2));
//X4:=REF(Q_B,1)<REF(Q_B,2);
//X5:=Q_A>REF(Q_B,1);
//買進:(X01 AND X2 AND X3) AND X4 AND X5;
//TJ0:=IF(Q_A<REF(Q_A,1) AND Q_B=Q_A,1,0);
//TJ1:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0);
A:BACKSET(Y3,BARSLAST(Y1)),NODRAW;
B:BACKSET(A=1&&REF(ISNULL(A),1),BARSLAST(Y3)),NODRAW;
STICKLINE1(1,0,23,2,0),COLORLIGHTRED;
//持股:IF(B=1,23,0),STICK,COLORLIGHTRED,LINETHICK3;
STICKLINE1(REFX1(B=1,1),0,23,2,0),COLORLIGHTRED;
STICKLINE1(A=1,0,35,2,0),COLORLIGHTGREEN;
STICKLINE1(REFX(A=1&&REF(ISNULL(A),1),1),0,60,1,0),COLORCYAN;
X:BACKSET(A=1&&REF(ISNULL(A),1),BARSLAST(Y3)),NODRAW;
CC:BACKSET(ISLASTBAR,BARSLAST(A=1)+1),NODRAW;
STICKLINE1(A=1&&REFX1(A,1)=0&&CC<>1||A=1&&REFX1(ISNULL(A),1)&&CC<>1,0,60,1,0),COLORRED;//
?
STICKLINE1(A=0&&REF(A=1,1)&&CC,0,60,1,0),COLORRED;
VVV:BACKSET(ISLASTBAR,BARSLAST(Y1)+1),NODRAW;
STICKLINE1(REF(CROSS(VVV,0.5),1)&&REFX1(BARSLAST(Y1)<BARSLAST(A=1),10000),0,60,1,0),COLORCYAN;
//買一絕:IF(REF(TJ1,1)=0 AND TJ1>=1,60,0),STICK,COLORRED,LINETHICK3;//
//堪稱賣絕:IF(REF(TJ0,1)=0 AND TJ0>=1,60,0),STICK,COLORCYAN,LINETHICK3;
?
地獄線:0,COLORGRAY;
地平線:20,COLORGRAY;
天際線:80,COLORGRAY;
RSV:=(((CLOSE - LLV(LOW,33)) / (HHV(HIGH,33) - LLV(LOW,33))) * 100);
短線:SMA(RSV,7,1),COLORWHITE;
中線:SMA(SMA(RSV,7,1),3,1),COLORYELLOW;
長線:SMA(SMA(SMA(RSV,6,1),5,1),3,1),COLORMAGENTA;
財神到:CROSS(短線,20),NODRAW;
DRAWICON((CROSS(短線,20)),10,1);
地獄:(CLOSE/COST(13))<=0.8,NODRAW;
STICKLINE1(地獄,-1,0,2,0),COLORGREEN;
地獄重生:地獄<>1 AND REF(地獄=1,1),NODRAW;
DRAWICON(地獄重生,20,23);?
?
?
?來源:程序化99網（ www.tumamayizhan.com ）
博易技術人員： 謝謝老師?
第一個指標和原來差異大
原圖：
?
修改后：
HH:=H;LL:=L;
多止損:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*3.5,NODRAW,COLORYELLOW;
多止盈:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1+REFX(MA(HH,25),25/2),NODRAW,COLORWHITE;
空止損:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*3.5+REFX(MA(HH,25),25/2),NODRAW,COLORYELLOW;
空止盈:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1,NODRAW,COLORWHITE;
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90),COLORRED,LINETHICK1;
D90L:=EMA(短低L,90),COLORRED,LINETHICK1;
D90差:=D90H-D90L;
D90頂:=D90H+D90差*2,COLORRED,LINETHICK1;
D90底:=D90L-D90差*2,COLORRED,LINETHICK1;
高0:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1+REFX(MA(HH,25),25/2),LINETHICK1,COLORWHITE;
低0:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*1,LINETHICK1,COLORWHITE;
多頭定位:=低0>=D90底AND高0>=D90頂;
空頭定位:=高0<=D90頂AND低0<=D90底;
震蕩定位:=低0>=D90底AND高0<=D90頂;
短頂:=(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*2+REFX(MA(HH,25),25/2),LINETHICK2,COLORGREEN;
短底:=REFX(MA(LL,25),25/2)-(REFX(MA(HH,25),25/2)-REFX(MA(LL,25),25/2))*2,LINETHICK2,COLORGREEN;
短線收盤:=(C-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線開盤:=(O-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線高盤:=(H-短底)/(短頂-短底)*100000,LINETHICK2,COLORRED;
短線低盤:=(L-短底)/(短頂-短底)*100000,NODRAW,COLORRED;
頂1:=120000,COLORYELLOW,LINETHICK3;
底1:=-20000,COLORYELLOW,LINETHICK3;
STICKLINE(多頭定位=1,頂1,底1,11,0),COLOR000066;
STICKLINE(空頭定位=1,頂1,底1,11,0),COLOR003300;
STICKLINE(震蕩定位=1,頂1,底1,11,0),COLOR555555;
HD:=REFX(MA(短線高盤,25),25/2);
LD:=REFX(MA(短線低盤,25),25/2);
震蕩頂:=(REFX(MA(LD,25),25/2)-REFX(MA(HD,25),25/2))*1+REFX(MA(LD,25),25/2),POINTDOT,COLORWHITE;
震蕩底:=REFX(MA(HD,25),25/2)-((REFX(MA(LD,25),25/2))-REFX(MA(HD,25),25/2))*1,POINTDOT,COLORWHITE;
做空:=80000,COLORWHITE,LINETHICK1;
做多:=20000,COLORWHITE,LINETHICK1;
空損:=120000,COLORMAGENTA,LINETHICK2;
多損:=-20000,COLORMAGENTA,LINETHICK2;
多減倉:=65000,POINTDOT,COLORRED;
空減倉:=35000,POINTDOT,COLORGREEN;
DRAWTEXT(ISLASTBAR,120000,'損'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,80000,'空'),COLORWHITE;
DRAWTEXT(ISLASTBAR,65000,'減'),COLORRED;
DRAWTEXT(ISLASTBAR,35000,'減'),COLORGREEN;
DRAWTEXT(ISLASTBAR,20000,'多'),COLORWHITE;
DRAWTEXT(ISLASTBAR,-20000,'損'),COLORMAGENTA;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
今D:=EMA(D,3);
昨D:=REF(今D,1);
STICKLINE(今D>=昨D,短線低盤,短線高盤,1,0),COLORRED;?
STICKLINE(今D>=昨D,短線收盤,短線開盤,8,0),COLORRED;
STICKLINE(今D<=昨D,短線低盤,短線高盤,1,0),COLORGREEN;?
STICKLINE(今D<=昨D,短線收盤,短線開盤,8,0),COLORGREEN;
白色點多定位1:=短線低盤<做多AND短線高盤>做多;
白色點空定位1:=短線高盤>做空AND短線低盤<做空;
STICKLINE(白色點多定位1=1,短線低盤,做多,8,0),COLORWHITE;?
STICKLINE(白色點空定位1=1,短線高盤,做空,8,0),COLORWHITE;?
白色點多定位2:=短線高盤<做多;
白色點空定位2:=短線低盤>做空;
STICKLINE(白色點多定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點多定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
STICKLINE(白色點空定位2=1,短線低盤,短線高盤,0,0),COLORWHITE;?
STICKLINE(白色點空定位2=1,短線收盤,短線開盤,8,0),COLORWHITE;
多頭紅色點:=今D>昨D;
空頭紅色點:=今D<昨D;
多頭紅色點定位1:=白色點多定位1=1AND多頭紅色點=1;
空頭紅色點定位1:=白色點空定位1=1AND空頭紅色點=1;
STICKLINE(多頭紅色點定位1=1,短線低盤,做多,8,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位1=1,短線高盤,做空,8,0),COLORMAGENTA;?
多頭紅色點定位2:=白色點多定位2=1AND多頭紅色點=1;
空頭紅色點定位2:=白色點空定位2=1AND空頭紅色點=1;
STICKLINE(多頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(多頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
STICKLINE(空頭紅色點定位2=1,短線低盤,短線高盤,0,0),COLORMAGENTA;?
STICKLINE(空頭紅色點定位2=1,短線收盤,短線開盤,8,0),COLORMAGENTA;
多頭多定位:=CROSS(做多,短線低盤)AND多頭定位=1;
多頭平定位:=CROSS(短線高盤,做空)AND多頭定位=1AND震蕩定位=0;
空頭空定位:=CROSS(短線高盤,做空)AND空頭定位=1;
空頭平定位:=CROSS(做多,短線低盤)AND空頭定位=1AND震蕩定位=0;
震蕩多定位:=CROSS(做多,短線低盤)AND震蕩定位=1;
震蕩空定位:=CROSS(短線高盤,做空)AND震蕩定位=1;
DRAWICON(空頭平定位=1,短線低盤,78);
DRAWICON(多頭平定位=1,短線高盤,67);
DRAWICON(多頭多定位=1OR震蕩多定位=1,短線低盤,48);
DRAWICON(空頭空定位=1OR震蕩空定位=1,短線高盤,49);
STICKLINE(1,80000,80000,15,0),COLORWHITE;
STICKLINE(1,20000,20000,15,0),COLORWHITE;
STICKLINE(1,120000,120000,15,0),COLORMAGENTA;
STICKLINE(1,-20000,-20000,15,0),COLORMAGENTA;
STICKLINE(1,65000,65000,2,0),COLORRED;
STICKLINE(1,35000,35000,2,0),COLORGREEN;
? 來源 程序化久久網
有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號：cxh99cxh99 進行 有償收費 編寫！
(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)
相關文章
-
沒有相關內容