主图均线解盘,能够正常显示
文章出处: 发布时间:2006-07-02
b:=BARSCOUNT(C)=SYSPARAM(2);
d:=BARSLAST(b);
e:=hhv(h,d);
MSTATUS:=BARSTATUS=2;
MA5:MA(C,5);
MA10:MA(C,10);
MA30:MA(C,30);
MA60:MA(C,60);
MA125:MA(C,125);
MA250:MA(C,250);
t1:=(MA5 > MA10 and MA10 > MA30 and MA5 > MA30);
t2:=(MA5 < MA10 and MA10 < MA30 and MA5 < MA30);
t3:=(MA30 > MA60 and MA30 > MA125 and MA60 > MA125);
t4:=(MA30 < MA60 and MA30 < MA125 and MA60 < MA125);
t5:=(MA60 > MA125 and MA125 > MA250 and MA60 > MA250);
t6:=(MA60 < MA125 and MA125 < MA250 and MA60 < MA250);
t7:=(CROSS(MA5,MA10));
t8:=(CROSS(MA10,MA5));
t9:=(CROSS(C,MA125));
t10:=(CROSS(MA125,C));
t11:=(CROSS(C,MA250));
t12:=(CROSS(MA250,C));
t13:=(CROSS(C,MA60) and CROSS(C,MA125) and CROSS(C,MA250));
t14:=(MA30 > REF(MA30,1));
t15:=(MA30 > REF(MA30,1) AND MA30 < REF(MA30,1)*1.001);
t16:=(MA30 < REF(MA30,1));
t17:=(MA5 > REF(MA5,1)*1.015);
t18:=(MA5 > REF(MA5,1) AND MA5 < REF(MA5,1)*1.005);
t19:=(MA5 < REF(MA5,1)*0.985);
i:=0;
DRAWTEXT(MSTATUS and t1 ,e-i*0.2,'短期均线多头排列 '+NUMTOSTR(ma5,2)+' > '+NUMTOSTR(ma10,2)+' > '+NUMTOSTR(ma30,2)+'; '),COLORRED,ALIGN2;i:=i+t1;
DRAWTEXT(MSTATUS and t2,e-i*0.2,'短期均线空头排列 '+NUMTOSTR(ma5,2)+' < '+NUMTOSTR(ma10,2)+' < '+NUMTOSTR(ma30,2)+'; '),COLORGREEN,ALIGN2;i:=i+t2;
DRAWTEXT(MSTATUS and t3,e-i*0.2,'中期均线多头排列 '+NUMTOSTR(ma30,2)+' > '+NUMTOSTR(ma60,2)+' > '+NUMTOSTR(ma125,2)+'; '),COLORRED,ALIGN2;i:=i+t3;
DRAWTEXT(MSTATUS and t4,e-i*0.2,'中期均线空头列排 '+NUMTOSTR(ma30,2)+' < '+NUMTOSTR(ma60,2)+' < '+NUMTOSTR(ma125,2)+'; '),COLORGREEN,ALIGN2;i:=i+t4;
DRAWTEXT(MSTATUS and t5,e-i*0.2,'长期均线多头排列 '+NUMTOSTR(ma60,2)+' > '+NUMTOSTR(ma125,2)+' > '+NUMTOSTR(ma250,2)+';'+'; '),COLORRED,ALIGN2;i:=i+t5;
DRAWTEXT(MSTATUS and t6,e-i*0.2,'长期均线空头排列 '+NUMTOSTR(ma60,2)+' < '+NUMTOSTR(ma125,2)+' < '+NUMTOSTR(ma250,2)+'; '),COLORGREEN,ALIGN2;i:=i+t6;
DRAWTEXT(MSTATUS and t7,e-i*0.2,'短期5日10日均线金叉'+'; '),COLORRED,ALIGN2;i:=i+t7;
DRAWTEXT(MSTATUS and t8,e-i*0.2,'短期5日10日均线死叉'+'; '),COLORGREEN,ALIGN2;i:=i+t8;
DRAWTEXT(MSTATUS and t9,e-i*0.2,'今日股价上穿半年线'+'; '),COLORFF00FF,ALIGN2;i:=i+t9;
DRAWTEXT(MSTATUS and t10,e-i*0.2,'今日股价跌破半年线'+'; '),COLORGREEN,ALIGN2;i:=i+t10;
DRAWTEXT(MSTATUS and t11,e-i*0.2,'今日股价上穿年线'+'; '),COLORFF00FF,ALIGN2;i:=i+t11;
DRAWTEXT(MSTATUS and t12,e-i*0.2,'今日股价跌破年线'+'; '),COLORGREEN,ALIGN2;i:=i+t12;
DRAWTEXT(MSTATUS and t13,e-i*0.2,'股价一阳穿三线'+'; '),COLORRED,ALIGN2;i:=i+t13;
DRAWTEXT(MSTATUS and t14,e-i*0.2,'30日均线趋势向上'+'; '),COLORRED,ALIGN2;i:=i+t14;
DRAWTEXT(MSTATUS and t15,e-i*0.2,'30日均线趋势走平'+'; '),COLORFFCC66,ALIGN2;i:=i+t15;
DRAWTEXT(MSTATUS and t16,e-i*0.2,'30日均线趋势向下'+'; '),COLORGREEN,ALIGN2;i:=i+t16;;
DRAWTEXT(MSTATUS and t17,e-i*0.2,'5日均线强劲向上'+'; '),COLORRED,ALIGN2;i:=i+t17;
DRAWTEXT(MSTATUS and t18,e-i*0.2,'5日均线方向不明'+'; '),COLORYELLOW,ALIGN2;i:=i+t18;
DRAWTEXT(MSTATUS and t19,e-i*0.2,'5日均线快速向下'+'; '),COLORGREEN,ALIGN2