标题: [大智慧]大智慧空中加油副图源码公式 [打印本页] 作者: 我是一个兵 时间: 2010-5-6 01:18 标题: [大智慧]大智慧空中加油副图源码公式 大智慧空中加油源码公式：
M5:=MA(CLOSE,5);
M10:=MA(CLOSE,10);
M20:=MA(CLOSE,20);
M30:=MA(CLOSE,30);
M250:=MA(CLOSE,250);
N1:=BARSLAST(CROSS(M5,M10));
N2:=BARSLAST(CROSS(M10,M5));
D:=IF(N1<N2,N1+1,0);
K:=IF(N2<N1,N2+1,0);
QSXS:=M5>M20 AND M10>M20 AND M20>REF(M20,1)
AND M30>REF(M30,1);
启动:D*QSXS,COLORRED,LINETHICK0;
跑道:K*QSXS,COLORFFFF00,LINETHICK0;
HKFJ:=HHV(D,5)>=2 AND QSXS AND M5>REF(M5,1) AND M5>M10;
飞机:HKFJ*D,COLORFF00FF,LINETHICK2;
HKSJ:=BARSLAST(飞机>0 AND NOT(REF(飞机,1)))+1;
高度:(C/REF(C,HKSJ)-1)*100,COLOR00FFFF;
加油:启动>0 AND 飞机=0,COLOR00FF00,POINTDOT,LINETHICK0;
N3:=BARSLAST(加油)+1;
K5:=ATAN((M5/REF(M5,1)-1)*100)*180/3.14159;
JXGD1:=K5>REF(K5,1) AND REF(K5,1)<REF(K5,2);
JXGD2:=M5>REF(M5,1) AND REF(M5,1)<REF(M5,2);
加速:FILTER((JXGD1 OR JXGD2)
AND C>M5 AND HKFJ,3),COLOR00FFFF,POINTDOT,LINETHICK0;
N4:=BARSLAST(加速);
STICKLINE(加油,0,启动/10+1,4,1),COLOR00FF00;
STICKLINE(N4>0 AND N4<=5,REF(启动,N4+1),REF(启动,N4+1),4,0),COLORFFFFFF;
DRAWTEXT(加速,启动,'▲'),COLOR00FFFF;
空中加油主图（源码）用法：图有提示
M5:=MA(C,5);
M10:MA(C,10),LINETHICK1;
M20:MA(C,20),LINETHICK2;
M30:MA(C,30),LINETHICK1;
M250:MA(C,250),COLORFF3399,LINETHICK3;
N1:=BARSLAST(CROSS(M5,M10));
N2:=BARSLAST(CROSS(M10,M5));
D:=IF(N1<N2,N1+1,0);
K:=IF(N2<N1,N2+1,0);
QSXS:=M5>M20 AND M10>M20 AND M20>REF(M20,1) AND M30>REF(M30,1);
启动: D*QSXS,COLORRED,LINETHICK0;
跑道: K*QSXS,COLORFFFF00,LINETHICK0;
HKFJ:=HHV(D,5)>=2 AND QSXS AND M5>REF(M5,1) AND M5>M10;
飞机: HKFJ*D,COLORFF00FF,LINETHICK0;
HKSJ:=BARSLAST(飞机>0 AND NOT(REF(飞机,1)))+1;
高度: (C/REF(C,HKSJ)-1)*100,COLOR00FFFF,LINETHICK0;
加油:启动>0 AND 飞机=0,COLOR00FF00,POINTDOT,LINETHICK0;
N3:=BARSLAST(加油)+1;
K5:=ATAN((M5/REF(M5,1)-1)*100)*180/3.14159;
JXGD1:=K5>REF(K5,1) AND REF(K5,1)<REF(K5,2);
JXGD2:=M5>REF(M5,1) AND REF(M5,1)<REF(M5,2);
加速:FILTER((JXGD1 OR JXGD2)
AND C>M5 AND HKFJ,3),COLOR00FFFF,POINTDOT,LINETHICK0;
N4:=BARSLAST(加速);
STICKLINE(加油,(O+C)/2-0.01,(O+C)/2+0.01,4,0),COLOR00FF00;
STICKLINE(加油,L,H,1,1),COLOR00FF00;
STICKLINE(加速,(O+C)/2-0.01,(O+C)/2+0.01,4,0),COLOR00FFFF;
STICKLINE(加速,L,H,1,1),COLOR00FFFF;
STICKLINE(N4>0 AND N4<=5,REF(O,N4+1),REF(O,N4+1),4,1),COLORFFFFFF;
DRAWTEXT(加速,L,'加▲速'),COLOR00FFFF;
DRAWTEXT(飞机,M30,'。'),COLORFFFFFF;
原文链接：http://www..com/viewthread.php?tid=3529767
