通达信单阳不破源码主图贴图

以单阳K线 算黄金分割 幅度

{www.gszb.com单阳不破}
阳涨幅:=4;
阳倍量:=2;
GF:=2;
单阳:=C>O*(1+阳涨幅/100) AND VOL>REF(VOL,1)*阳倍量;
DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.998,'阳'),COLOR00FFFF;
高不破价:=REF(C,BARSLAST(单阳));
中不破价:=REF((C+L)/2,BARSLAST(单阳));
低不破价:=REF(L,BARSLAST(单阳));
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND (LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价);
阳低:IF(单阳不破 AND GF>=1,低不破价,DRAWNULL),COLORRED;
FU:=C-阳低;
低到当前幅度%:FU/阳低*100,NODRAW,COLOR00FFFF;
阳高:HHV(H,BARSLAST(单阳)),NODRAW,COLOR00DD00;
FUGA:=阳高-C;
高到当前幅度%:FUGA/阳高*100,NODRAW,COLORFFFF00;
DRAWTEXT(BARSLAST(单阳)=1 AND 单阳不破,低不破价*0.998,'1'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=2 AND 单阳不破,低不破价*0.998,'2'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=3 AND 单阳不破,低不破价*0.998,'3'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=4 AND 单阳不破,低不破价*0.998,'4'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=5 AND 单阳不破,低不破价*0.998,'5'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=6 AND 单阳不破,低不破价*0.998,'6'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=7 AND 单阳不破,低不破价*0.998,'7'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=8 AND 单阳不破,低不破价*0.998,'8'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=9 AND 单阳不破,低不破价*0.998,'9'),COLORGREEN;
DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价*0.998,'10'),COLORGREEN;
低价A:=IF(单阳不破 AND GF>=1,(阳低+(阳高 - 阳低)*0.191),DRAWNULL);
低价B:=IF(单阳不破 AND GF>=1,(阳低+(阳高 - 阳低)*0.381),DRAWNULL);
低价C:=IF(单阳不破 AND GF>=1,(阳低+(阳高 - 阳低)*0.50),DRAWNULL);
低价D:=IF(单阳不破 AND GF>=1,(阳低+(阳高 - 阳低)*0.618),DRAWNULL);
低价E:=IF(单阳不破 AND GF>=1,(阳低+(阳高 - 阳低)*0.809),DRAWNULL);
低价F:=IF(单阳不破 AND GF>=1,(阳低+(阳高 - 阳低)),DRAWNULL);
DRAWBAND(阳低,RGB(80,0,0),低价A,RGB(110,11,115));
DRAWBAND(低价A,RGB(80,0,0),低价B,RGB(66,166,66));
DRAWBAND(低价B,RGB(80,0,0),低价C,RGB(77,77,77));
DRAWBAND(低价C,RGB(80,0,0),低价D,RGB(88,88,88));
DRAWBAND(低价D,RGB(80,0,0),低价E,RGB(6,55,66));
DRAWBAND(低价E,RGB(80,90,0),低价F,RGB(99,55,66));
实体幅度2:=REF((O+(C-O)*0.667),BARSLAST(单阳));{www.gszb.com//当日实体幅度的2/3}
实体幅度1:=REF((O+(C-O)*0.333),BARSLAST(单阳));{www.gszb.com//当日实体幅度的1/3}
幅度的1二:=REF((L+(H-L)/2),BARSLAST(单阳));{www.gszb.com//当日幅度的1/2}
幅度:IF(单阳不破 AND GF>=1,幅度的1二,DRAWNULL),COLOR209FFF,DOTLINE;
幅度A:IF(单阳不破 AND GF>=1,实体幅度2,DRAWNULL),COLORFFFF00,DOTLINE;
幅度B:IF(单阳不破 AND GF>=1,实体幅度1,DRAWNULL),COLORFFFF00,DOTLINE;
低价1:IF(单阳不破 AND GF>=1,阳低*1.03,DRAWNULL),COLOR00FF00;
低价2:IF(单阳不破 AND GF>=1,阳低*1.05,DRAWNULL),COLOR00FF00;
低价3:IF(单阳不破 AND GF>=2,阳低*1.08,DRAWNULL),COLOR00FF00;
低价4:IF(单阳不破 AND GF>=2,阳低*1.13,DRAWNULL),COLOR00FF00;
STICKLINE(C>=O,C,O,3,0),COLOR0000FF;
STICKLINE(C>=O,H,L,0,0),COLOR0000FF;
STICKLINE(C<=O,C,O,3,0),COLORFFFF00;
STICKLINE(C<=O,H,L,0,0),COLORFFFF00;
DRAWTEXT(ISLASTBAR AND GF>=1,阳低*1.03,'3'),COLOR00FF00;
DRAWTEXT(ISLASTBAR AND GF>=1,阳低*1.05,'5'),COLOR00FF00;
DRAWTEXT(ISLASTBAR AND GF>=2,阳低*1.08,'8'),COLOR00FF00;
DRAWTEXT(ISLASTBAR AND GF>=2,阳低*1.13,'13'),COLOR00FF00;
DRAWTEXT(ISLASTBAR AND GF>=1,低价A*1.0025,'←■'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND GF>=1,低价B*1.0025,'←■'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND GF>=1,低价C*1.0025,'←■'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND GF>=1,低价D*1.0025,'←■'),COLOR208FFF;
DRAWTEXT(ISLASTBAR AND GF>=1,低价E*1.0025,'←■'),COLOR208FFF;
两天:=LLV(L,BARSLAST(单阳))>低不破价 OR LLV(L,BARSLAST(单阳))=低不破价;
一般:=LLV(L,BARSLAST(单阳)-2)>低不破价 OR LLV(L,BARSLAST(单阳)-2)=低不破价;
DRAWTEXT(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 一般,低不破价*1.001,'＾'),LINETHICK2,COLOR88FF00;{www.gszb.com一般选股}
较强:=LLV(L,BARSLAST(单阳)-2)>中不破价 OR LLV(L,BARSLAST(单阳)-2)=中不破价;
DRAWTEXT(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 较强,中不破价,'＾'),LINETHICK2,COLOR208FFF;{www.gszb.com较强选股}
最强:=LLV(L,BARSLAST(单阳)-3)>高不破价 OR LLV(L,BARSLAST(单阳)-2)=高不破价;
DRAWTEXT(CURRBARSCOUNT<100 AND BARSLAST(单阳)<9 AND 两天 AND 最强,高不破价,'＾'),LINETHICK2,COLOR0FFFFF;{www.gszb.com最强选股}
STICKLINE(C=C,O+((C-O)*0.667),(O+(C-O)*0.667),1.5,0),COLORFF0000,LINETHICK1;{www.gszb.com//当日实体幅度的2/3}
STICKLINE(C=C,O+((C-O)*0.333),(O+(C-O)*0.333),1.5,0),COLORFF0000,LINETHICK1;{www.gszb.com//当日实体幅度的1/3}
STICKLINE(C=C,O+((C-O)/2),(O+(C-O)/2),2,0),COLOR00FFFF,LINETHICK1;{www.gszb.com//当日实体幅度的1/2}
STICKLINE(C=C,L+((H-L)/2),(L+(H-L)/2),2.5,0),COLOR208FFF,LINETHICK1;{www.gszb.com//当日幅度的1/2}