查看完整版本: 映山红

tzwxlj1 2006-8-14 11:22

映山红

映山红


DRAWICON(((CLOSE > 0) AND (ISLASTBAR = 1)),CLOSE,'映山红1'),ALIGN4,SHIFT2;VAR1:=(EMA(VOL,12) - EMA(VOL,26));
VAR2:=EMA(VAR1,9);
VAR3:=(((EMA(CLOSE,30) * 2) + MA(CLOSE,60)) / 3);
A3:=(((EMA(CLOSE,10) * 2) + MA(CLOSE,20)) / 3);
VAR4:=(VOL * CLOSE);
VAR5:=(EMA(VAR4,13) / EMA(VOL,13));
VAR6:=(EMA(VAR4,60) / EMA(VOL,60));
VAR7:=EMA(((VAR5 + VAR6) / 2),3);
A5:=(EMA(VAR4,5) / EMA(VOL,5));
A6:=(EMA(VAR4,20) / EMA(VOL,20));
A7:=EMA(((A5 + A6) / 2),3);
A:=MA(((A3 + A7) / 2),1);
A1:=REF(A,1);
A8:=MA(((VAR3 + VAR7) / 2),1);
A22:=MA(((VAR3 + VAR7) / 2),1);
【中线强弱线】:A22,LINETHICK0,colorFF;
DRAWICON((A8 < REF(A8,1)),REF(A8,2),11),LINETHICK2,colorFFFFFF;
DRAWICON((A8 >= REF(A8,1)),REF(A8,2),10),LINETHICK2,colorFF;
VAR11:=(((((2 * CLOSE) + OPEN) + HIGH) + LOW) / 5);
VAR12:=VOL;
【短期强弱线】:(SUM((VAR11 * VAR12),13) / SUM(VAR12,13)),LINETHICK1,colorFFFF;
PARTLINE((【短期强弱线】 > REF(【短期强弱线】,1)),【短期强弱线】),colorFF00FF;
AM:=DMA(MA(DMA(CLOSE,VAR2),6),(VOL / SUM(VOL,89)));
【牛熊线】:AM,LINETHICK2,color9900;
VARA:=IF((CLOSE > 150),91.3,0.913);
【下沿】:=(INTPART((CLOSE / VARA)) * VARA);
【上沿】:=(【下沿】 + VARA);
【中线】:=((【下沿】 + 【上沿】) / 2);
STICKLINE(((((SYSPARAM(1) = BARPOS) AND 【下沿】) AND (CLOSE > 【下沿】)) AND (CLOSE < 【中线】)),【下沿】,【下沿】,50,0),LINETHICK3,colorFF9900;
STICKLINE(((((SYSPARAM(1) = BARPOS) AND 【上沿】) AND (CLOSE < 【上沿】)) AND (CLOSE > 【中线】)),【上沿】,【上沿】,50,0),LINETHICK3,color99FF;
STICKLINE(((SYSPARAM(1) = BARPOS) AND 【中线】),【中线】,【中线】,50,0),LINETHICK3,colorFFFFFF;
【蓝色】:【下沿】,LINETHICK0,colorFF9900;
【棕色】:【上沿】,LINETHICK0,color99FF;
【白色】:【中线】,LINETHICK0,colorFFFFFF;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【下沿】) AND (CLOSE > 【下沿】)) AND (CLOSE < 【中线】)),【下沿】,'支撑'),SHIFT3,colorFF00;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【下沿】) AND (CLOSE > 【下沿】)) AND (CLOSE < 【中线】)),【中线】,'压力'),SHIFT3,colorFF;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【上沿】) AND (CLOSE < 【上沿】)) AND (CLOSE > 【中线】)),【上沿】,'压力'),SHIFT3,colorFF;
DRAWTEXT(((((SYSPARAM(1) = BARPOS) AND 【上沿】) AND (CLOSE < 【上沿】)) AND (CLOSE > 【中线】)),【中线】,'支撑'),SHIFT3,colorFF00;

买:EMA(C,5),colorff0000;
A:=(REF(买,1));
STICKLINE((买>A),A,买,6,0),Color00FF00;
STICKLINE((买<=A),A,买,6,0),Color0000FF;
卖:EMA(SLOPE(C,21)*20+C,42);
b:=cross(买,卖);
s:=cross(卖,买);
drawtext(b,LOW-0.1,'Ψ买 '),colorf00ff0,linethick5;
drawtext(s,HIGH+0.1,'◎卖'),colorwhite,linethick5;

yzty 2006-9-14 11:56

谢谢提供指标原码,支持一下!!!!!!!!!!!

小小股民 2006-9-14 12:34

谢谢

xujie 2006-9-14 15:19

谢谢!

shujenwen 2006-9-15 03:49

3q!

3q3q3q!

chenjiaq 2006-9-15 05:20

谢谢支持原码提供

soprano 2006-10-17 20:03

顶一下,支持~:smokin:

藏一 2007-10-16 19:57

谢谢提供指标原码,支持一下.

xpceo 2007-12-23 13:01

谢谢

tzx1232 2008-1-31 02:22

:clap: :clap:

yang8787 2008-2-14 23:04

谢谢

我心如星 2008-2-22 19:23

谢谢!

安修 2008-5-17 11:41

:clap: :clap: :clap: 谢谢提供指标原码

mukunda 2008-5-23 13:00

:clap: :clap: :clap: :clap: :clap:

wswdx 2008-5-27 11:10

谢谢分享需要优化

xyxoo00 2008-5-27 12:12

谢谢分享需要优化

傻嘟嘟 2008-5-27 13:41

看过了 好贴

傻嘟嘟 2008-5-27 13:41

:crying: :crying: :crying: :crying: :crying: :crying:

傻嘟嘟 2008-5-27 13:44

:d: :d: :d: :d: :d: :d: :d: :d:

傻嘟嘟 2008-5-27 13:44

:bhuhhh: :bhuhhh: :bhuhhh: :bhuhhh:

傻嘟嘟 2008-5-27 13:46

:bhuhhh: :bhuhhh: :bhuhhh: :bhuhhh: :bhuhhh: :bhuhhh:
页: [1]
查看完整版本: 映山红