关心你
发表于 2014-11-27 09:31
沙漠蜥蜴
发表于 2014-11-27 16:28
多谢与之分享!
小小笑
发表于 2014-11-27 16:59
{:soso_e163:}
老白鲨
发表于 2014-11-27 17:33
感谢分享!!
海边剑客
发表于 2014-11-27 18:00
{:soso_e163:}
驭马追日
发表于 2014-11-27 18:32
本帖最后由 驭马追日 于 2014-11-27 18:35 编辑
这个公式好象并不是你所创,你还拿来卖钱???
3121多彩K线指标原码
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.05,0,HYBLOCK),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.0,0,0,DYBLOCK),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.15,0,GNBLOCK),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.0,0.20,0,FGBLOCK),COLORMAGENTA;
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
C_: CONST(C),COLORLIRED,POINTDOT;{现价线}
MA5:=MA(C,5);
MA5角度: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW;
DRAWKLINE(H,O,L,C);{重绘K线}
RC1:=REF(C,1);{178448-WEN98编写}
CS:=IF(C>=1,10000,100000);
C涨停10:=1.10*RC1-49/CS;{考虑到4舍5入}
C涨停5 :=1.05*RC1-49/CS;
C跌停10:=0.90*RC1+51/CS;
C跌停5 :=0.95*RC1+51/CS;
ST:=NAMELIKE('S') OR NAMELIKE('*S');
涨停:= IF(ST, C>=C涨停5, C>=C涨停10);
跌停:= IF(ST, C<=C跌停5, C<=C跌停10);
盘中涨停:=IF(ST, H>=C涨停5, H>=C涨停10);
盘中跌停:=IF(ST, L<=C跌停5, L<=C跌停10);
STICKLINE(盘中涨停,H,MAX(C,O),0,0),COLORMAGENTA;{涨停后回落}
STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升}
大阳线:= C>O AND (C>=C涨停5 OR C>(1.05*O-51/CS) )
OR (C>1000 AND C > RC1*1.024);
STICKLINE(大阳线,O,C,1,0),COLOR0000BB;
大阴线:= C<O AND (C<=C跌停5 OR C<(0.95*O+49/CS) )
OR (C>1000 AND C < RC1*0.976);
STICKLINE(大阴线,O,C,1,0),COLORLIGREEN;
STICKLINE(涨停,O,C,1,0),COLORMAGENTA;
STICKLINE(跌停,O,C,1,0),COLORLICYAN;
假阴:=C<O AND C>REF(C,1);
STICKLINE(假阴,O,C,0,0),COLORRED;{假阴柱};
假阳:=C>O AND C<REF(C,1);
STICKLINE(假阳,O,C,0,0),COLORGREEN;{假阳柱};
大盘TJ:=PERIOD=5 AND NAMELIKE('上证指数')
AND (ABS((C-REF(C,1)))/REF(C,1)>=0.025 OR ABS(C-O)>=60);
STICKLINE(大盘TJ,(H+L)/2,(H+L)/2,2,0),COLORYELLOW;{显示大盘日线的60点大K线中值};
STICKLINE((大阳线 OR 大阴线 OR 涨停 OR 跌停)
AND BETWEEN(C,1,500),L+(H-L)/2,L+(H-L)/2,1,0),COLORYELLOW;{大K线画中点线};
DYNAINFO(7),COLORBBBBBB,LINETHICK1;{现价}
DYNAINFO(6),COLOR22FF22,DOTLINE;{最低}
DYNAINFO(5),COLORC4F18F,DOTLINE;{最高}
半分位:
(O+C)/2,NODRAW;
上三分之一位:(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),NODRAW;
下三分之一位:(MAX(O,C)-MIN(O,C))/3+MIN(O,C),NODRAW;
rangxi1234
发表于 2014-11-27 18:59
谢谢分享学习学习
曲径通幽1
发表于 2014-11-27 20:52
谢谢分享,辛苦了。。。。
王义
发表于 2014-12-12 21:45
谢谢学长分享
dtts
发表于 2014-12-21 12:48
谢谢学长分享
lhl311
发表于 2015-1-4 15:53
我也涨停 发表于 2014-11-26 13:59
当前公式 : 三一二一 (指标画线公式)
错误句 :上三分之一位:(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),NODRA ...
上三分之一位:(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),NODRAW;
下三分之一位:(MAX(O,C)-MIN(O,C))/3+MIN(O,C),NODRAW;
春风馨晴
发表于 2015-1-4 16:40
多谢与之分享!!!!!!!
wke502
发表于 2015-2-19 19:16
公式里一点错误都不能有
八分贝
发表于 2015-2-19 19:39
庄在散先的规律,告诉我们每根价柱的最高最低点,都与庄家与主力有关
股海老兵
发表于 2015-2-20 08:37
谢谢了
页:
1
2
3
4
[5]
6
7
8
9
10
11
12