改一下　[文華財經]

NN:=5;

AF1:=REF(O,1);
AF2:=ABS((REF(C,1)-AF1)/AF1);
AF3:=ABS((REF(H,1)-AF1)/AF1);
AF4:=ABS((REF(L,1)-AF1)/AF1);
BF1:=ABS((AF2+AF3+AF4)/3);
BF2:=O*BF1;
預測低一:=O-BF2;
預測高一:=O+BF2;
今日保護價:=(REF(C,2)+REF(C,1)+O)/3 ,COLOR4080FF,NODRAW;
開盤價1:=OPEN;
開盤價2:=REF(OPEN,1);
最高價1:=HIGH;
最高價2:=REF(HIGH,1);
最低價1:=LOW;
最低價2:=REF(LOW,1);
收盤價1:=CLOSE;
收盤價2:=REF(CLOSE,1);
AAF:=最高價2;
BBF:=最低價2;
CCF:=開盤價2;
DDF:=收盤價2;
EEF:=(AAF+BBF+CCF+2*DDF)/5;
AAAF:=EEF+(AAF-BBF);
BBBF:=2*EEF-BBF;
CCCF:=2*EEF-AAF;
DDDF:=EEF-(AAF-BBF);
上升突破價:=AAAF;
上升阻力價:=BBBF;
下跌支撐價:=CCCF;
下跌反轉價:=DDDF;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
阻力:=E+(HIGH-LOW);
支撐:=E-(HIGH-LOW);
EEE:=(EEF+上升突破價+上升阻力價+下跌支撐價+下跌反轉價)/5;
心理價:=EEE;
FFF:=(EEE+開盤價1)/2;
GGG:=(預測低一+FFF)/2;
預測低二:MIN(GGG,支撐),NODRAW;
預測高二:MAX(MA(REF(HIGH,1)/REF(CLOSE,2),27)*REF(CLOSE,1),阻力),NODRAW;
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);//短周期與長周期的收盤價的指數平滑移動平均值做差。
DEA := EMA(DIFF,9);//DIFF的M個周期指數平滑移動平均
MQ1:=12;
MQ2:=50;
MQ3:=60;
EXP1:=EMA(CLOSE,MQ1);
EXP2:=EMA(CLOSE,MQ2);
EXP3:=EMA(CLOSE,MQ3);
AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA:=EMA(AB,5);
A1:=REFX1(REF(HHV(H,96),5),10000);

B1:=REFX1(REF(LLV(L,96),5),10000);
DY:=((A1)+(B1))/2;
箱頂:=IF(AB>0 AND AB-BA<=0,A1,A1),LINETHICK3,COLOR00FF00;
箱腰:=IF(AB>0 AND AB-BA<=0,DY,DY),LINETHICK3,COLOR00FF00;
箱低:=IF(AB>0 AND AB-BA<=0,B1,B1),LINETHICK3,COLOR00FF00;
高1:=IF(AB>0 AND AB-BA>0,A1,NULL),LINETHICK3,COLORRED;
中1:=IF(AB>0 AND AB-BA>0,DY,NULL),LINETHICK3,COLORRED;
低1:=IF(AB>0 AND AB-BA>0,B1,NULL),LINETHICK3,COLORRED;
頂周期:=20;
底周期:=20;
上內:=LLVBARS(H,頂周期);
上外:=LLVBARS(L,頂周期);
下內:=HHVBARS(L,底周期);
下外:=HHVBARS(H,底周期);
上力度:=HHV(L,上內+1)>LLV(H,上內+1);
下力度:=HHV(L,下內+1)>LLV(H,下內+1);
上包含:=COUNT(L>=REF(L,1),上外)>2 AND COUNT(H>=REF(H,1),上內)>2;
下包含:=COUNT(H<=REF(H,1),下外)>2 AND COUNT(L<=REF(L,1),下內)>2;
頂0:=頂周期 AND 上力度 AND 上包含 AND 上外>3;
底0:=底周期 AND 下力度 AND 下包含 AND 下外>3;
頂分天數:=BARSLAST(頂0);
底分天數:=BARSLAST(底0);
含中間K線:=IF(頂分天數=0,底分天數,頂分天數)>=3;
頂:=頂0 AND 含中間K線 AND H=HHV(H,BARSLAST(底0));
底:=底0 AND 含中間K線 AND L=LLV(L,BARSLAST(頂0));
NOTEXT上筆劃線:TRENDLINES(CROSS( BACKSET(頂,BARSLAST( 底)+1),0.5),L,CROSS( BACKSET(底,BARSLAST( 頂)+1),0.5),H),COLORMAGENTA,LINETHICK3;
NOTEXT下筆劃線:TRENDLINES(CROSS( BACKSET(底,BARSLAST( 頂)+1),0.5),H,CROSS( BACKSET(頂,BARSLAST( 底)+1),0.5),L),COLORGREEN,LINETHICK3;
分界點:=NOTEXT上筆劃線 AND NOTEXT下筆劃線 ;
位置調整:=
IF(PERIOD=11,0.02, IF(PERIOD=10,0.02, IF(PERIOD=9,0.02, IF(PERIOD=8,0.001, IF(PERIOD=7,0.02, IF(PERIOD=6,0.01, IF(PERIOD=5,0.005, IF(PERIOD=4,0.002, IF(PERIOD=3,0.001, IF(PERIOD=2,0.001, IF(PERIOD=1,0.0003, IF(PERIOD=0,0.0002,0))))))))))));
DRAWNUMBER1(分界點 AND 頂,H+H*位置調整+0.2,H,2),COLORRED;
DRAWNUMBER1(分界點 AND 底,L-0.12,L,2),COLORYELLOW;
STICKLINE(分界點 AND 底,B1,B1+0.2,6,0),COLORMAGENTA;
STICKLINE(分界點 AND 頂,A1,A1-0.2,6,0),COLORGREEN;
買線:=EMA(C,3);
賣線:=EMA(SLOPE(C,21)*20+C,55)*1;
買賣差:=(買線-賣線),COLORYELLOW,NODRAW;
MID:=MA(CLOSE,13);
B3:=MA(C,1);
B4:=SMA(SMA(SMA(B3,2,1),2,1),2,1),COLORYELLOW;
SMA5:=MA(B4,3),COLORYELLOW;
STICKLINE(買賣差>=0 OR B4> SMA5,(買線-買賣差*0.80),MID,2,0),COLORRED;
STICKLINE1(買賣差<0 OR B4<=SMA5,(賣線+買賣差*0.50),MID,1.5,0),COLORBLUE;
主力線:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*
SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),LINETHICK1,POINTDOT;
超短線:=(((主力線-LLV(主力線,21))/(HHV(主力線,21)-LLV(主力線,21)))*(4))*(0.5),COLORYELLOW,LINETHICK3,NODRAW;
HH:=(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;

LL:=(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(HH,90),COLORRED,LINETHICK1;
D90L:=EMA(LL,90),COLORRED,LINETHICK1;
D90C:=D90H-D90L;
D90D:=D90H+D90C*2,COLORRED,LINETHICK1;
D90T:=D90L-D90C*2,COLORRED,LINETHICK1;
G0:=(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1+REFX1(MA(REFX1(MA(H,25),25/2),25),25/2),LINETHICK1,COLORWHITE;
D0:=REFX1(MA(REFX1(MA(L,25),25/2),25),25/2)-(REFX1(MA(REFX1(MA(H,25),25/2),25),25/2)-REFX1(MA(REFX1(MA(L,25),25/2),25),25/2))*1,LINETHICK1,COLORWHITE;
DTD:=D0>=D90T AND G0>=D90D;
KTD:=G0<=D90D AND D0<=D90T;
X2:=((EMA(CLOSE,3)-EMA(CLOSE,8)))*10;
//STICKLINE(X2>0,B1,B1+NN*MINPRICE,10,0),COLORRED,LINETHICK2;
//STICKLINE(KTD=1,B1,B1+NN*MINPRICE,10,0),COLORYELLOW,LINETHICK2;
//STICKLINE(X2<0,B1,B1+NN*MINPRICE,10,0),COLORGREEN,LINETHICK2;

IF(X2>0,B1,NULL),CIRCLEDOT,COLORRED;
IF(KTD=1,B1,NULL),CIRCLEDOT,COLORYELLOW;
IF(X2<0,B1,NULL),CIRCLEDOT,COLORGREEN;

操作160日均線:EMA(C,160),COLORYELLOW,LINETHICK4;
紅升:IF(操作160日均線>REF(操作160日均線,1),操作160日均線,NULL),COLORRED,LINETHICK4;
綠降:IF(操作160日均線<REF(操作160日均線,1),操作160日均線,NULL),COLOR009300,LINETHICK4;
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,LINETHICK2,COLORRED;
VAR2:=(HHV(VAR1,2)+HHV(VAR1,4)+HHV(VAR1,8))/3;
VAR3:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;
VAR4:(HHV(VAR2,2)+HHV(VAR2,4)+HHV(VAR2,8))/3,LINETHICK3;
VAR5:(LLV(VAR3,2)+LLV(VAR3,4)+LLV(VAR3,8))/3,COLORWHITE,LINETHICK3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3;
IF((VAR1 <= REF(VAR1,1)),VAR1,NULL),COLORGREEN,LINETHICK3;
IF((VAR1 >= REF(VAR1,1)),VAR1,NULL),COLORRED,LINETHICK3;
STICKLINE1(VAR4>VAR1,VAR4,VAR1,0,0),COLORBLUE;
趨勢55日線:EMA(C,55),COLORYELLOW,LINETHICK1,NODRAW;
紅升4:IF(趨勢55日線>REF(趨勢55日線,1),趨勢55日線,NULL),COLOR0080FF,CIRCLEDOT;
綠降4:IF(趨勢55日線<REF(趨勢55日線,1),趨勢55日線,NULL),COLORFFFF00,CIRCLEDOT;
年線:EMA(C,360),COLORYELLOW,LINETHICK1,NODRAW;
年紅升:IF(年線>REF(年線,1),年線,NULL),COLOR8000FF,LINETHICK1;
年綠降:IF(年線<REF(年線,1),年線,NULL),COLORFFFF00,DOT,LINETHICK1;
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
突破:=CROSS(C,VAR4) AND ZT;
DRAWTEXT(突破,L,'爆點');
STICKLINE(突破,CLOSE,OPEN,3.2,0),COLOR0077FF;
STICKLINE(突破,CLOSE,OPEN,2.5,0),COLOR0099FF;
STICKLINE(突破,CLOSE,OPEN,1.9,0),COLOR00BBFF;
STICKLINE(突破,CLOSE,OPEN,1.2,0),COLOR00DDFF;
STICKLINE(突破,CLOSE,OPEN,0.3,0),COLOR00FFFF;



文件名：15820201268166392551679878690953.jpg

?

?來源:程序化99

?

?來源: www.tumamayizhan.com

?

?