|
回覆: 分享 日線預測明日盤(分時 日周月)
引用:
最初由 ifuian 發表
日線預測明日盤.試看看不錯用.無加密.無期限
希望大家共同交流
ifuian 大大 (日線預測明日盤)
明日盤壓力
{N=26;}
StickLine( IsUp , CLOSE , HIGH , 0.1 , 0 ) , ColorRed ;
StickLine( IsUp , OPEN , LOW , 0.1 , 0 ) , ColorRed ;
StickLine( IsUp , CLOSE , OPEN , 8 , 1 ) , ColorRed ;
StickLine( IsDown , HIGH , LOW , 0.1 , 0 ) , Color009933 ;
StickLine( IsDown , CLOSE , OPEN , 8 , 0 ) , Color009933;
StickLine( IsEqual and C>=REF( C , 1 ) , HIGH , LOW , 0.1 , 0 ) , ColorRed ;
StickLine( IsEqual and C>=REF( C , 1 ) , CLOSE , OPEN , 8 , 0 ) , ColorRed ;
StickLine( IsEqual and C<REF( C , 1 ) , HIGH , LOW , 0.1 , 0 ) , Color009933;
StickLine( IsEqual and C<REF( C , 1 ) , CLOSE , OPEN , 8 , 0 ) , Color009933;
XX:=Barscount( Close ) ; { 以下是描繪第一個交易日的K線 }
StickLine( ( IsUp or IsEqual ) and ( XX = 1 ) , CLOSE , HIGH , 0.1 , 0 ) , ColorRed ;
StickLine( ( IsUp or IsEqual ) and ( XX = 1 ) , CLOSE , LOW , 0.1 , 0 ) , ColorRed ;
StickLine( ( IsUp or IsEqual ) and ( XX = 1 ) , CLOSE , OPEN , 8 , 1 ) , ColorRed ;
StickLine( IsDown and XX = 1 , HIGH, LOW, 0.1, 0 ) , Colorgreen;
StickLine( IsDown and XX = 1 , CLOSE , OPEN , 8 , 0 ) , Colorgreen ;
XA:=IsLastBar ;
XB:=Backset( XA=1, 36 ) ;
Y:=BarsLast( XB=1 ) ;
X:=Y + 1 ;
AP:=DATAPERIOD;
X1:=IF(AP=2,1,IF(AP=3,1,IF(AP=4,1,IF(AP=5,1,IF(AP=6,1,IF(AP=7,1,IF(AP=8,1,IF(AP=10, 6,0))))))));
X2:=IF(AP=2,1,IF(AP=3,1,IF(AP=4,1,IF(AP=5,1,IF(AP=6,1,IF(AP=10, 6,0))))));
X3:=IF(AP=2,1,IF(AP=3,1,IF(AP=4,1,IF(AP=5,1,IF(AP=10, 6,0)))));
X4:=IF(AP=6,1,IF(AP=7,1,IF(AP=8,1,IF(AP=10, 6,0))));
X5:=IF(AP=7,1,IF(AP=8,1,IF(AP=10, 6,0)));
E:=(O+H+L+2*C)/5;
壓力:=2*E-L;
支撐:=2*E-H;
反轉:=E-(H-L);
HL轉:=(壓力+支撐)/2;
開盤:=(E+壓力+支撐)/3;
收盤:=(開盤+O)/2;
EHL轉:=EMA(HL轉,N);
E開盤:=EMA(開盤,N);
RE:=REF(E,1);
R壓力:=REF(壓力,1);
R支撐:=REF(支撐,1);
RHL轉:=REF(HL轉,1);
R開盤:=REF(開盤,1);
REHL轉:=EMA(RHL轉,N);
ER開盤:=EMA(R開盤,N);
FE:=X3*" 日線預測明日盤.E壓力#MIN5"(N);
FRE:=X3*" 日線預測明日盤.RE壓力#MIN5"(N);
FE1:=X3*" 日線預測明日盤.E壓力#MIN15"(N);
FRE1:=X3*" 日線預測明日盤.RE壓力#MIN15"(N);
FE3:=X3*" 日線預測明日盤.E壓力#MIN30"(N);
FRE3:=X3*" 日線預測明日盤.RE壓力#MIN30"(N);
FE6:=X3*" 日線預測明日盤.E壓力#MIN60"(N);
FRE6:=X3*" 日線預測明日盤.RE壓力#MIN60"(N);
FRE61:X3*" 日線預測明日盤.RE壓力#MIN60"(N*2) COLORGRAY POINTDOT LINETHICK3;
明日EE:" 日線預測明日盤.E壓力#DAY"(N) LINETHICK0;
DREE1:X4*" 日線預測明日盤.RE壓力#DAY"(N/2) COLOR0088CC;
DREE:" 日線預測明日盤.RE壓力#DAY"(N) COLOR0088FF LINETHICK2;
WEE:=" 日線預測明日盤.E壓力#WEEK"(N);
WREE:" 日線預測明日盤.RE壓力#WEEK"(N) COLORMAGENTA;
MEE:=" 日線預測明日盤.E壓力#MONTH"(N);
MREE:" 日線預測明日盤.RE壓力#MONTH"(N) COLORGRAY;
DHU:=X3*DREE*1.1618;
DH:=X3*DREE*1.0618;
DL:=X3*DREE/1.0618;
DLD:=X3*DREE/1.1618;
MHU:=X4*MREE*1.618;
MH:=X4*MREE*1.382;
ML:=X4*MREE/1.382;
MLD:=X4*MREE/1.618;
PARTLINE(DH,DH) POINTDOT COLORCYAN;
PARTLINE(DL,DL) POINTDOT COLORGREEN;
{PARTLINE(DHU,DHU) POINTDOT COLORBLUE;}
{PARTLINE(DLD,DLD) POINTDOT COLOR009933;}
PARTLINE(MH,MH) POINTDOT COLORCYAN;
PARTLINE(ML,ML) POINTDOT COLORGREEN;
PARTLINE(MHU,MHU) POINTDOT COLORBLUE;
PARTLINE(MLD,MLD) POINTDOT COLOR009933;
PARTLINE(FRE,FRE) COLORMAGENTA ;
PARTLINE(FRE1,FRE1) COLORRED ;
PARTLINE(FRE3,FRE3) COLORYELLOW ;
PARTLINE(FRE6,FRE6) COLORWHITE LINETHICK2;
PARTLINE(FE<FRE,FRE) COLOR009933 ;
PARTLINE(FE1<FRE1,FRE1) COLORGREEN ;
PARTLINE(FE3<FRE3,FRE3) COLORCYAN ;
PARTLINE(FE6<FRE6,FRE6) COLOR009933 LINETHICK2;
PARTLINE(明日EE<DREE,DREE) COLORGREEN LINETHICK2;
PARTLINE(WEE<WREE,WREE) COLOR009933 ;
PARTLINE(MEE<MREE,MREE) COLORBLUE ;
DRAWICON(X3* CROSS("KD.K#MIN60","KD.D#MIN60") , L*0.996 , 4 );
DRAWICON(X3* CROSS("KD.D#MIN60","KD.K#MIN60") , H*1.004 , 5 );
DRAWICON( CROSS("KD.K#DAY","KD.D#DAY") , L*0.996 , 1 );
DRAWICON( CROSS("KD.D#DAY","KD.K#DAY") , H*1.004 , 2 );
DRAWNUMBER(ISLASTBAR,DREE,"KD.K#DAY",0)SHIFT2 COLORWHITE ;
 附件: 明日盤壓力.alg
此文件已被下載 557 次。
|
2004-10-11 15:37
