[天狼之眼],[天眼一号]解密原码
文章出处： 发布时间：2006-06-19
天眼一号原码:draWGBK(1,COLORRGB(33,33,0),COLORRGB(633,0,0),0),colorFF0000;
论坛:CLOSE,LINETHICK0,colorFFFF;
LC:=REF(CLOSE,1);
STICKLINE((OPEN >= CLOSE),OPEN,CLOSE,8,0),colorFFFF00;
STICKLINE((OPEN >= CLOSE),HIGH,LOW,0,0),colorFFFF00;
STICKLINE((OPEN < CLOSE),OPEN,CLOSE,8,0),colorFF;
STICKLINE((OPEN < CLOSE),HIGH,LOW,0,0),colorFF;
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
AA:=(CLOSE - MA15);
波动回调提示图:MA(CLOSE,10000);
STICKLINE((MA15 > REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,colorFF;
STICKLINE((MA15 < REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,colorFF00;
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'上拐点'),colorFFFF;
DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'下拐点'),colorFF00;
DRAWTEXT(CROSS(78,RSI),(HIGH * 1.02),'回调！'),colorFFFFFF;
DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,'论坛网址：www.jhgp.net'),ALIGN5,LINETHICK4,colorFFFF;{---------------------------------------------}
天狼之眼原码:DAT:=1;
D:=DMA("399001$CLOSE",("399001$CLOSE" / SUM("399001$CLOSE",240)));
DCYC:=(("399001$CLOSE" / D) - 1);
C0:=DMA(CLOSE,(VOL / SUM(VOL,240)));
CCYC:=((CLOSE / C0) - 1);
ZZ:=MA((C0 * ((1 + DCYC) - CCYC)),5);
∑5:DMA(CLOSE,IF((CLOSE < 100),(VOL / SUM(VOL,5)),(VOL / SUM(VOL,240)))),,color808080;
∑13:DMA(CLOSE,IF((CLOSE < 100),(VOL / SUM(VOL,13)),(VOL / SUM(VOL,240)))),,color808080;
∑34:DMA(CLOSE,IF((CLOSE < 100),(VOL / SUM(VOL,34)),(VOL / SUM(VOL,240)))),,color808080;
∑:DMA(CLOSE,IF((CLOSE < 100),(VOL / CAPITAL),(VOL / SUM(VOL,240)))),,color808080;
A:=WINNER((COST(50) * 1.1));
B:=WINNER((COST(50) * 0.91));
▲:=COST((100 * (A - B)));
VAR1:=(EMA(CLOSE,12) - EMA(CLOSE,26));
VAR2:=(2 * (VAR1 - EMA(VAR1,9)));
VAR3:=MA(VAR2,60);
VAR4:=(VAR3 + (2 * STD(VAR2,60)));
VAR5:=(VAR3 - (2 * STD(VAR2,60)));
YYY:=(CROSS(VAR2,VAR5) OR CROSS(VAR2,VAR4));
STICKLINE(((YYY > 0) AND (DAT = 1)),CLOSE,OPEN,8,0),,colorFFFF;
天狼:PARTLINE(((CLOSE > ▲) AND (DAT = 1)),∑),,colorFF;
之眼:PARTLINE((((∑ > ZZ) AND (∑13 > ∑)) AND (DAT = 1)),∑),,colorFFFF;
DRAWICON(ISLASTBAR,(∑ * 1.1),11),;
DRAWICON(ISLASTBAR,(∑ * 1.21),11),;
DRAWICON(ISLASTBAR,(∑ * 0.91),11),;
DRAWICON(ISLASTBAR,(∑ * 0.826),11),;
DRAWICON(ISLASTBAR,∑,10)