分享

文华财经

 西域公主 2010-11-18

TIF1:=ABS(AVPRICE-REF(AVPRICE,1));
TIF2:=ABS(REF(AVPRICE,1)-REF(AVPRICE,2));
TIF3:=ABS(REF(AVPRICE,2)-REF(AVPRICE,3));
TIF4:=ABS(REF(AVPRICE,3)-REF(AVPRICE,4));
TIF5:=ABS(REF(AVPRICE,4)-REF(AVPRICE,5));
TIF6:=ABS(REF(AVPRICE,5)-REF(AVPRICE,6));
TIF7:=ABS(REF(AVPRICE,6)-REF(AVPRICE,7));
TIF8:=ABS(REF(AVPRICE,7)-REF(AVPRICE,8));
TIFALL:=TIF1+TIF2+TIF3+TIF4+TIF5+TIF6+TIF7+TIF8;
FA1:=TIF1*AVPRICE;
FA2:=TIF2*REF(AVPRICE,1);
FA3:=TIF3*REF(AVPRICE,2);
FA4:=TIF4*REF(AVPRICE,3);
FA5:=TIF5*REF(AVPRICE,4);
FA6:=TIF6*REF(AVPRICE,5);
FA7:=TIF7*REF(AVPRICE,6);
FA8:=TIF8*REF(AVPRICE,7);
MTA:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8)/TIFALL;
RSV:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
K:=SMA(RSV,8,1);
MTACC:=IF(K<85 && K>15,1,0);
TIFMTA:=MTA-REF(MTA,1);
MTAB:=REFX(TIFMTA,1);
DRAWSL(MTACC=1,MTA,MTAB,1,0,COLORWHITE);
DRAWSL(MTACC=0,MTA,MTAB,1,0,COLORMAGENTA);

JUDGE1:=IF(MTA<CLOSE&&REF(MTA,1)>REF(CLOSE,1),1,0);
DRAWTEXT(JUDGE1 ,CLOSE,'B');
JUDGE2:=IF(MTA>CLOSE&&REF(MTA,1)<REF(CLOSE,1),1,0);
DRAWTEXT(JUDGE2 ,CLOSE,'S');
TYP := (HIGH + LOW + CLOSE)/3;
MR:=SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),8)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),8);
MFI:=100-(100/(1+MR));
CC:=IF(MFI<80 ,1,0);
A:=CLOSE-REF(CLOSE,1);
B:=REFX(A,1);
DRAWSL(CC=1,CLOSE,B,1,0,COLORRED);
DRAWSL(CC=0,CLOSE,B,1,0,COLORGREEN);

2,mta2

TIF1:=ABS(AVPRICE-REF(AVPRICE,1));
TIF2:=ABS(REF(AVPRICE,1)-REF(AVPRICE,2));
TIF3:=ABS(REF(AVPRICE,2)-REF(AVPRICE,3));
TIF4:=ABS(REF(AVPRICE,3)-REF(AVPRICE,4));
TIF5:=ABS(REF(AVPRICE,4)-REF(AVPRICE,5));
TIF6:=ABS(REF(AVPRICE,5)-REF(AVPRICE,6));
TIF7:=ABS(REF(AVPRICE,6)-REF(AVPRICE,7));
TIF8:=ABS(REF(AVPRICE,7)-REF(AVPRICE,8));
TIFALL:=TIF1+TIF2+TIF3+TIF4+TIF5+TIF6+TIF7+TIF8;
FA1:=TIF1*AVPRICE;
FA2:=TIF2*REF(AVPRICE,1);
FA3:=TIF3*REF(AVPRICE,2);
FA4:=TIF4*REF(AVPRICE,3);
FA5:=TIF5*REF(AVPRICE,4);
FA6:=TIF6*REF(AVPRICE,5);
FA7:=TIF7*REF(AVPRICE,6);
FA8:=TIF8*REF(AVPRICE,7);
MTA:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8)/TIFALL;
RSV:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
K:=SMA(RSV,8,1);
MTACC:=IF(K<85 && K>15,1,0);
TIFMTA:=MTA-REF(MTA,1);
MTAB:=REFX(TIFMTA,1);
DRAWSL(MTACC=1,MTA,MTAB,1,0,COLORWHITE);
DRAWSL(MTACC=0,MTA,MTAB,1,0,COLORMAGENTA);

DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  := EMA(DIFF,10);

JUDGE1:=IF(MTA<CLOSE&&REF(MTA,1)>REF(CLOSE,1)&&DIFF>DEA&&DEA>0,1,0);
JUDGE1P:=IF(MTA<CLOSE&&REF(MTA,1)>REF(CLOSE,1)&&DIFF<DEA&&DIFF>0,1,0);
DRAWTEXT(JUDGE1 ,CLOSE,'B');
DRAWTEXT(JUDGE1P ,CLOSE,'PK');
JUDGE2:=IF(MTA>CLOSE&&REF(MTA,1)<REF(CLOSE,1)&&DIFF<DEA&&DEA<0,1,0);
JUDGE2P:=IF(MTA>CLOSE&&REF(MTA,1)<REF(CLOSE,1)&&DIFF>DEA&&DIFF<0,1,0);
DRAWTEXT(JUDGE2 ,CLOSE,'S');
DRAWTEXT(JUDGE2P ,CLOSE,'PD');
TYP := (HIGH + LOW + CLOSE)/3;
MR:=SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),8)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),8);
MFI:=100-(100/(1+MR));
CC:=IF(MFI<80 ,1,0);
A:=CLOSE-REF(CLOSE,1);
B:=REFX(A,1);
DRAWSL(CC=1,CLOSE,B,1,0,COLORRED);

3,mta3

TIF1:=ABS(AVPRICE-REF(AVPRICE,1));
TIF2:=ABS(REF(AVPRICE,1)-REF(AVPRICE,2));
TIF3:=ABS(REF(AVPRICE,2)-REF(AVPRICE,3));
TIF4:=ABS(REF(AVPRICE,3)-REF(AVPRICE,4));
TIF5:=ABS(REF(AVPRICE,4)-REF(AVPRICE,5));
TIF6:=ABS(REF(AVPRICE,5)-REF(AVPRICE,6));
TIF7:=ABS(REF(AVPRICE,6)-REF(AVPRICE,7));
TIF8:=ABS(REF(AVPRICE,7)-REF(AVPRICE,8));
TIFALL:=TIF1+TIF2+TIF3+TIF4+TIF5+TIF6+TIF7+TIF8;
FA1:=TIF1*AVPRICE;
FA2:=TIF2*REF(AVPRICE,1);
FA3:=TIF3*REF(AVPRICE,2);
FA4:=TIF4*REF(AVPRICE,3);
FA5:=TIF5*REF(AVPRICE,4);
FA6:=TIF6*REF(AVPRICE,5);
FA7:=TIF7*REF(AVPRICE,6);
FA8:=TIF8*REF(AVPRICE,7);
MTA:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8)/TIFALL;
RSV:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
K:=SMA(RSV,8,1);
MTACC:=IF(K<85 && K>15,1,0);
TIFMTA:=MTA-REF(MTA,1);
MTAB:=REFX(TIFMTA,1);
DRAWSL(MTACC=1,MTA,MTAB,1,0,COLORWHITE);
DRAWSL(MTACC=0,MTA,MTAB,1,0,COLORMAGENTA);

DIFF :=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA  := EMA(DIFF,10);
EMTA:=EMA(MTA,3);
JUDGE1:=IF(MTA>EMTA&&REF(MTA,1)<REF(EMTA,1)&&DIFF<0&&DEA<0,1,0);
DRAWTEXT(JUDGE1 ,EMTA,'B');
JUDGE2:=IF(MTA<EMTA&&REF(MTA,1)>REF(EMTA,1)&&DIFF>0&&DEA>0,1,0);
DRAWTEXT(JUDGE2 ,EMTA,'S');
TYP := (HIGH + LOW + CLOSE)/3;
MR:=SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),8)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),8);
MFI:=100-(100/(1+MR));
CC:=IF(MFI<80 ,1,0);

A:=EMTA-REF(EMTA,1);
B:=REFX(A,1);
DRAWSL(CC=1,EMTA,B,1,0,COLORRED);
DRAWSL(CC=0,EMTA,B,1,0,COLORGREEN);

4,mta4

TIF1:=ABS(AVPRICE-REF(AVPRICE,1));
TIF2:=ABS(REF(AVPRICE,1)-REF(AVPRICE,2));
TIF3:=ABS(REF(AVPRICE,2)-REF(AVPRICE,3));
TIF4:=ABS(REF(AVPRICE,3)-REF(AVPRICE,4));
TIF5:=ABS(REF(AVPRICE,4)-REF(AVPRICE,5));
TIF6:=ABS(REF(AVPRICE,5)-REF(AVPRICE,6));
TIF7:=ABS(REF(AVPRICE,6)-REF(AVPRICE,7));
TIF8:=ABS(REF(AVPRICE,7)-REF(AVPRICE,8));
TIF9:=ABS(REF(AVPRICE,8)-REF(AVPRICE,9));
TIF10:=ABS(REF(AVPRICE,9)-REF(AVPRICE,10));
TIF11:=ABS(REF(AVPRICE,10)-REF(AVPRICE,11));
TIF12:=ABS(REF(AVPRICE,11)-REF(AVPRICE,12));
TIF13:=ABS(REF(AVPRICE,12)-REF(AVPRICE,13));
TIFALL8:=TIF1+TIF2+TIF3+TIF4+TIF5+TIF6+TIF7+TIF8;
TIFALL13:=TIFALL8+TIF9+TIF10+TIF11+TIF12+TIF13;
FA1:=TIF1*AVPRICE;
FA2:=TIF2*REF(AVPRICE,1);
FA3:=TIF3*REF(AVPRICE,2);
FA4:=TIF4*REF(AVPRICE,3);
FA5:=TIF5*REF(AVPRICE,4);
FA6:=TIF6*REF(AVPRICE,5);
FA7:=TIF7*REF(AVPRICE,6);
FA8:=TIF8*REF(AVPRICE,7);
FA9:=TIF9*REF(AVPRICE,8);
FA10:=TIF10*REF(AVPRICE,9);
FA11:=TIF11*REF(AVPRICE,10);
FA12:=TIF12*REF(AVPRICE,11);
FA13:=TIF13*REF(AVPRICE,12);
MTA8:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8)/TIFALL8;
MTA13:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8+FA9+FA10+FA11+FA12+FA13)/TIFALL13;
RSV:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
K:=SMA(RSV,8,1);
MTACC:=IF(K<85 && K>15,1,0);
TIFMTA:=MTA8-REF(MTA8,1);
MTAB:=REFX(TIFMTA,1);
DRAWSL(MTACC=1,MTA8,MTAB,1,0,COLORWHITE);
DRAWSL(MTACC=0,MTA8,MTAB,1,0,COLORMAGENTA);

JUDGE1:=IF(MTA13<MTA8&&REF(MTA13,1)>REF(MTA8,1),1,0);
DRAWTEXT(JUDGE1 ,CLOSE,'B');
JUDGE2:=IF(MTA13>MTA8&&REF(MTA13,1)<REF(MTA8,1),1,0);
DRAWTEXT(JUDGE2 ,CLOSE,'S');
TYP := (HIGH + LOW + CLOSE)/3;
MR:=SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),8)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),8);
MFI:=100-(100/(1+MR));
CC:=IF(MFI<80 ,1,0);
A:=MTA13-REF(MTA13,1);
B:=REFX(A,1);
DRAWSL(CC=1,MTA13,B,1,0,COLORRED);
DRAWSL(CC=0,MTA13,B,1,0,COLORGREEN);

5,mtacd

参数 T1:3,100,5

TIF1:=ABS(AVPRICE-REF(AVPRICE,1));
TIF2:=ABS(REF(AVPRICE,1)-REF(AVPRICE,2));
TIF3:=ABS(REF(AVPRICE,2)-REF(AVPRICE,3));
TIF4:=ABS(REF(AVPRICE,3)-REF(AVPRICE,4));
TIF5:=ABS(REF(AVPRICE,4)-REF(AVPRICE,5));
TIF6:=ABS(REF(AVPRICE,5)-REF(AVPRICE,6));
TIF7:=ABS(REF(AVPRICE,6)-REF(AVPRICE,7));
TIF8:=ABS(REF(AVPRICE,7)-REF(AVPRICE,8));
TIF9:=ABS(REF(AVPRICE,8)-REF(AVPRICE,9));
TIF10:=ABS(REF(AVPRICE,9)-REF(AVPRICE,10));
TIF11:=ABS(REF(AVPRICE,10)-REF(AVPRICE,11));
TIF12:=ABS(REF(AVPRICE,11)-REF(AVPRICE,12));
TIF13:=ABS(REF(AVPRICE,12)-REF(AVPRICE,13));
TIFALL8:=TIF1+TIF2+TIF3+TIF4+TIF5+TIF6+TIF7+TIF8;
TIFALL13:=TIFALL8+TIF9+TIF10+TIF11+TIF12+TIF13;
FA1:=TIF1*AVPRICE;
FA2:=TIF2*REF(AVPRICE,1);
FA3:=TIF3*REF(AVPRICE,2);
FA4:=TIF4*REF(AVPRICE,3);
FA5:=TIF5*REF(AVPRICE,4);
FA6:=TIF6*REF(AVPRICE,5);
FA7:=TIF7*REF(AVPRICE,6);
FA8:=TIF8*REF(AVPRICE,7);
FA9:=TIF9*REF(AVPRICE,8);
FA10:=TIF10*REF(AVPRICE,9);
FA11:=TIF11*REF(AVPRICE,10);
FA12:=TIF12*REF(AVPRICE,11);
FA13:=TIF13*REF(AVPRICE,12);
MTA8:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8)/TIFALL8;
MTA13:=(FA1+FA2+FA3+FA4+FA5+FA6+FA7+FA8+FA9+FA10+FA11+FA12+FA13)/TIFALL13;
MTADIFF:MTA8-MTA13;
MTADEA:EMA(MTADIFF,T1);

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多