%> 江恩轮中轮(新画法)_股票教程网
江恩轮中轮(新画法) 5624

{江恩轮中轮}

a1:=前M个波谷位置(2,0.1,1);

a2:=前M个波峰位置(1,0.1,1);

光标位置:=系统参数(1);

cldis:=a1[系统参数(1)];

chdis:=a2[系统参数(1)];

tcl:=光标位置-cldis;

tch:=光标位置-chdis;

K1:=IF(tcl>tch,tcl,tch);

PH:=H;

PL:=L;

P1:=IF(tcl>=tch,PL[tcl+0],PH[tch+0]);

VERTLINE(数据位置=K1),COLORYELLOW,LINEDOT;

{DRAWTEXT(数据位置=K1,SYSPARAM(4)*0.95,'转\n \n折\n \n点'),COLORYELLOW;}

IF tcl>=tch THEN BEGIN

画分段线(数据位置>K1,P1*1.042),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.042,' 15° '+数字转化为字符串(P1*1.042,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.083),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.083,' 30° '+数字转化为字符串(P1*1.083,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.125),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.125,' 45° '+数字转化为字符串(P1*1.125,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.167),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.167,' 60° '+数字转化为字符串(P1*1.167,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.208),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.208,' 75° '+数字转化为字符串(P1*1.208,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.25),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.25,' 90° '+数字转化为字符串(P1*1.25,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.292),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.292,' 105° '+数字转化为字符串(P1*1.292,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.33),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.33,' 120° '+数字转化为字符串(P1*1.33,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.375),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.375,' 135° '+数字转化为字符串(P1*1.375,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.417),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.417,' 150° '+数字转化为字符串(P1*1.417,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.458),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.458,' 165° '+数字转化为字符串(P1*1.458,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.5),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.5,' 180° '+数字转化为字符串(P1*1.5,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.542),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.542,' 195° '+数字转化为字符串(P1*1.542,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.583),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.583,' 210° '+数字转化为字符串(P1*1.583,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.625),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.625,' 225° '+数字转化为字符串(P1*1.625,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.667),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.667,' 240° '+数字转化为字符串(P1*1.667,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.708),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.708,' 255° '+数字转化为字符串(P1*1.708,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.75),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.75,' 270° '+数字转化为字符串(P1*1.75,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.792),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.792,' 285° '+数字转化为字符串(P1*1.792,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.833),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.833,' 300° '+数字转化为字符串(P1*1.833,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.875),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.875,' 315° '+数字转化为字符串(P1*1.875,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.917),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.917,' 330° '+数字转化为字符串(P1*1.917,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*1.958),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*1.958,' 345° '+数字转化为字符串(P1*1.958,3)),COLORYELLOW;

画分段线(数据位置>K1,P1*2),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1*2,' 360° '+数字转化为字符串(P1*2,3)),COLORYELLOW;

END;

{ELSE BEGIN}

IF tcl<tch THEN BEGIN

画分段线(数据位置>K1,P1-P1*0.042),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.042,' 15° '+数字转化为字符串(P1-P1*0.042,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.083),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.083,' 30° '+数字转化为字符串(P1-P1*0.083,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.125),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.125,' 45° '+数字转化为字符串(P1-P1*0.125,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.167),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.167,' 60° '+数字转化为字符串(P1-P1*0.167,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.208),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.208,' 75° '+数字转化为字符串(P1-P1*0.208,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.25),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.25,' 90° '+数字转化为字符串(P1-P1*0.25,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.292),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.292,' 105° '+数字转化为字符串(P1-P1*0.292,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.33),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.33,' 120° '+数字转化为字符串(P1-P1*0.33,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.375),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.375,' 135° '+数字转化为字符串(P1-P1*0.375,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.417),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.417,' 150° '+数字转化为字符串(P1-P1*0.417,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.458),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.458,' 165° '+数字转化为字符串(P1-P1*0.458,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.5),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.5,' 180° '+数字转化为字符串(P1-P1*0.5,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.542),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.542,' 195° '+数字转化为字符串(P1-P1*0.542,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.583),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.583,' 210° '+数字转化为字符串(P1-P1*0.583,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.625),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.625,' 225° '+数字转化为字符串(P1-P1*0.625,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.667),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.667,' 240° '+数字转化为字符串(P1-P1*0.667,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.708),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.708,' 255° '+数字转化为字符串(P1-P1*0.708,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.75),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.75,' 270° '+数字转化为字符串(P1-P1*0.75,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.792),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.792,' 285° '+数字转化为字符串(P1-P1*0.792,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.833),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.833,' 300° '+数字转化为字符串(P1-P1*0.833,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.875),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.875,' 315° '+数字转化为字符串(P1-P1*0.875,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.917),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.917,' 330° '+数字转化为字符串(P1-P1*0.917,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1*0.958),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1*0.958,' 345° '+数字转化为字符串(P1-P1*0.958,3)),COLORYELLOW;

画分段线(数据位置>K1,P1-P1),COLOR00CCFF,LINEDOT;

显示文字(数据位置=K1,P1-P1,' 360° '+数字转化为字符串(P1-P1,3)),COLORYELLOW;

END;


 

{股票教程网-http://gwgz.net/承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}