分享

【飞 狐】斑主请帮忙!!!…………(已答)

 海天云骞 2017-06-09
请把它运行一下,贴张图出来,3q

input:M(6,3,40),N(14,3,30),SW0(56,10,120),SW1(78,20,180);
TYP:=(((HIGH + LOW) + CLOSE) / 3);
CC6:=((TYP - MA(TYP,M)) / (0.015 * AVEDEV(TYP,M)));
BB:=((TYP - MA(TYP,N)) / (0.015 * AVEDEV(TYP,N)));
DIRCOUNT:="WOODIE@DIRCOUNT"(TYP,6);
STICKLINE((DIRCOUNT = 6),0,BB,2,0),Linethick3,colorAA22;
STICKLINE((DIRCOUNT= (0 - 6)),0,BB,2,0),Linethick3,color222299;
STICKLINE((ABS(BB) = 0),0,BB,2,0),Linethick3,color333333;
STICKLINE((ABS(BB) = 5),0,BB,2,0),,colorFFFF;
BB,Linethick3,color555555;
DRAWICON((ABS(BB) >= 200),BB,12),;
EMA34:=EMA(CLOSE,34);
PARTLINE((CLOSE >= EMA34),100),,colorFF00;
PARTLINE((CLOSE >=EMA34 ),(0 - 100)),,colorFF00;
PARTLINE((CLOSE < EMA34),100),,colorFF;
PARTLINE((CLOSE < EMA34),(0 - 100)),,colorFF;
LSMA:="WOODIE@LSMA"((((CLOSE + HIGH) + CLOSE) / 3),25);
PARTLINE((CLOSE > LSMA),0),CROSSDOT,colorFF00;
PARTLINE((CLOSE < LSMA),0),CROSSDOT,colorFF;
CC6,color33FF99;
SW:="WOODIE@MSLOPE"(EMA34,LSMA);
PARTLINE((ABS(SW) < SW0),200),,color808080;
PARTLINE(((ABS(SW) >= SW0) AND (ABS(SW) < SW1)),200),,colorFFFF;
PARTLINE((ABS(SW) >= SW1),200),,colorFF00;
PARTLINE((ABS(SW) < SW0),(0 - 200)),,color808080;
PARTLINE(((ABS(SW) >= SW0) AND (ABS(SW) < SW1)),(0 - 200)),,colorFFFF;
PARTLINE((ABS(SW) >= SW1),(0 - 200)),,colorFF00;
WP:="WOODIE@WOODPOINT"((0 - 360));
DRAWNUMBER(ISLASTBAR,210,DYNAINFO(5),4),,colorFF00;
DRAWNUMBER(ISLASTBAR,210,(DYNAINFO(7) - DYNAINFO(5)),4),,colorFF00;
DRAWNUMBER(ISLASTBAR,(0 - 200),DYNAINFO(6),4),,colorFF;
DRAWNUMBER(ISLASTBAR,(0 - 200),(DYNAINFO(7) - DYNAINFO(6)),4),,colorFF;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,6))) AND (CLOSE < REF(WP,7))),150,'R3'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,6))) AND (CLOSE < REF(WP,7))),150,(CLOSE - REF(WP,7)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,5))) AND (CLOSE < REF(WP,6))),150,'R2'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,5))) AND (CLOSE < REF(WP,6))),150,(CLOSE - REF(WP,6)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,4))) AND (CLOSE < REF(WP,5))),150,'R1'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,4))) AND (CLOSE < REF(WP,5))),150,(CLOSE - REF(WP,5)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,3))) AND (CLOSE < REF(WP,4))),150,'R1'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,3))) AND (CLOSE < REF(WP,4))),150,(CLOSE - REF(WP,4)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,2))) AND (CLOSE < REF(WP,3))),150,'PP'),,colorCCFF00;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,2))) AND (CLOSE < REF(WP,3))),150,(CLOSE - REF(WP,3)),4),,colorCCFF00;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,1))) AND (CLOSE < REF(WP,2))),150,'S1'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,1))) AND (CLOSE < REF(WP,2))),150,(CLOSE - REF(WP,2)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > WP)) AND (CLOSE < REF(WP,1))),150,'S2'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > WP)) AND (CLOSE < REF(WP,1))),150,(CLOSE - REF(WP,1)),4),;
DRAWTEXT((ISLASTBAR AND (CLOSE < WP)),150,'S3 '),;
DRAWNUMBER((ISLASTBAR AND (CLOSE < WP)),150,(CLOSE - WP),4),;
DRAWTEXT((ISLASTBAR AND (CLOSE > REF(WP,7))),150,'R3+'),;
DRAWNUMBER((ISLASTBAR AND (CLOSE > REF(WP,7))),(0 - 150),(CLOSE - REF(WP,7)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,6))) AND (CLOSE < REF(WP,7))),(0 - 150),'R3+'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,6))) AND (CLOSE < REF(WP,7))),(0 - 150),(CLOSE - REF(WP,6)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,5))) AND (CLOSE < REF(WP,6))),(0 - 150),'R2+'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,5))) AND (CLOSE < REF(WP,6))),(0 - 150),(CLOSE - REF(WP,5)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,4))) AND (CLOSE < REF(WP,5))),(0 - 150),'R1+'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,4))) AND (CLOSE < REF(WP,5))),(0 - 150),(CLOSE - REF(WP,4)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,3))) AND (CLOSE < REF(WP,4))),(0 - 150),'PP+'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,3))) AND (CLOSE < REF(WP,4))),(0 - 150),(CLOSE - REF(WP,3)),4),;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,2))) AND (CLOSE < REF(WP,3))),(0 - 150),'S1+'),,colorCC33CC;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,2))) AND (CLOSE < REF(WP,3))),(0 - 150),(CLOSE - REF(WP,2)),4),,colorCC33CC;
DRAWTEXT(((ISLASTBAR AND (CLOSE > REF(WP,1))) AND (CLOSE < REF(WP,2))),(0 - 150),'S2+'),;
DRAWNUMBER(((ISLASTBAR AND (CLOSE > REF(WP,1))) AND (CLOSE < REF(WP,2))),(0 - 150),(CLOSE - REF(WP,1)),4),;
DRAWTEXT(ISLASTBAR,7,'新:'),,colorFFFF;
DRAWNUMBER(ISLASTBAR,7,DYNAINFO(7),4),,colorFFFF;

[ 本帖最后由 烟雨飘梦 于 2006-2-16 17:45 编辑 ]股票论坛 www.55188.com

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

    0条评论

    发表

    请遵守用户 评论公约