通达信指标公式源码 股魔雷达副图指标 源码.doc

LC:=REF(CLOSE,1);RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;卖点雷达:=CROSS(85,RSI1)*30,COLOR00FF00,HICK2;DRAWTEXT(CROSS(85,RSI1),20,'顶'),COLOR00FF00;STICKLINE(卖点雷达,0,20,3,0),COLOR00FF00; VARB:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100; VARC:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100; VARD:=BARSCOUNT(CLOSE);买点雷达:(VARB<20ANDVARC<25ANDVARD>50ANDAR<70)*30,HICK2,COLOR0078FF;BT1:=CROSS(RSI1,25);{好} DRAWTEXT(BT1,-80,'底'),COLOR0000FF;STICKLINE(BT1,-100,-80,3,0),COLOR0000FF; 主力:EMA((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,HICK1,COLOR0000FF; 散户:EMA((CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5,HICK2,COLORC87800; BT2:=CROSS(主力,散户)AND主力<-10; DRAWICON(CROSS(RSI1,25),主力,26);DRAWICON(CROSS(主力,散户)AND主力<-10,主力,23);BT:=FILTER(COUNT(BT1ORBT2,3)>=2,3);STICKLINE(BT,0,50,4,1),COLOR0000FF; DRAWTEXT(BT,50,'金底'),COLOR0000FF; STICKLINE(BT2,0,20,3,0),COLORFF00FF;DRAWTEXT(BT2,20,'升'),COLORFF00FF;VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);VAR2:=HIGH-REF(HIGH,1);VAR3:=REF(LOW,1)-LOW;VAR4:=SUM(IF(VAR2>0ANDVAR2>VAR3,VAR2,0),25);VAR5:=SUM(IF(VAR3>0ANDVAR3>VAR2,VAR3,0),25);VAR6:=VAR4*10/VAR1;VAR7:=VA