-----------------部分源码展示-------------------
{板块};
DRAWTEXT_FIX(1,1-0.99,1-0.99,0,'')COLORWHITE;
所属行业:DRAWTEXT_FIX(1,1-0.99,1-0.95,0,'所属行业：'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.95,0,HYBLOCK)COLOR0080FF;
所属地域:DRAWTEXT_FIX(1,1-0.99,1-0.90,0,'所属地域：'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.90,0,DYBLOCK)COLOR00FFFF;
所属概念:DRAWTEXT_FIX(1,1-0.99,1-0.85,0,'所属概念：'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.85,0,GNBLOCK)COLOR0000FF;
所属风格:DRAWTEXT_FIX(1,1-0.99,1-0.80,0,'所属风格：'),COLORYELLOW;
DRAWTEXT_FIX(1,1-0.95,1-0.80,0,FGBLOCK)COLORFF00FF;
LDM4:=CONST(HHV(REF(HIGH,1),240));
LDM5:=CONST(LLV(REF(LOW,1),240));
LDM6:=LDM4-LDM5;
LDM7:=LOW-LDM6*0.03;
LDM8:=HIGH+LDM6*0.03;
LDM9:=CLOSE>500;
LDM10:=MAX(CLOSE,OPEN);
LDM11:=MIN(CLOSE,OPEN);
LDM12:=0;
LDM13:=1;
LDM14:=IF(LDM9,HIGH,LDM10);
LDM15:=IF(LDM9,LOW,LDM11);
LDM16:=IF(CLOSE>OPEN,IF(LDM13=0,LOW,LDM15),IF(LDM13=0,HIGH,LDM14));
LDM17:=2/1000;
LDM18:=CURRBARSCOUNT;
LDM19:=120;
LDM20:=LDM18<=LDM19;
LDM21:=LOW;
LDM22:=IF(LDM12=0,LDM21,REF(LDM12,LDM12));
基准价:IF(LDM20,CONST(LDM22),DRAWNULL),DOTLINE,COLORLIGRAY;
LDM23:=基准价;
LDM24:=LDM23*LDM17;
LDM25:=ABS(LOW-LDM23)<=LDM24;
LDM26:=ABS(OPEN-LDM23)<=LDM24;
LDM27:=ABS(CLOSE-LDM23)<=LDM24;
LDM28:=ABS(HIGH-LDM23)<=LDM24;
LDM29:=LDM25 OR LDM26 OR LDM27 OR LDM28 AND LDM20 AND LDM18!=1;
LDM30:=COUNT(LDM29,LDM19);
精准点个数:IF(LDM30>0,LDM30+1,0),NODRAW,COLORMAGENTA;
LDM31:=5;
LDM32:=REF(HIGH,LDM31)=HHV(HIGH,2*LDM31+1);
LDM33:=FILTER(LDM32,LDM31);
LDM34:=BACKSET(LDM33,LDM31+1);
LDM35:=FILTER(LDM34,LDM31);
LDM36:=REF(HIGH,BARSLAST(LDM35));
LDM37:=REF(MAX(CLOSE,OPEN),LDM31)=HHV(MAX(CLOSE,OPEN),2*LDM31+1);
LDM38:=FILTER(LDM37,LDM31);
LDM39:=BACKSET(LDM38,LDM31+1);
LDM40:=FILTER(LDM39,LDM31);
LDM41:=REF(MAX(CLOSE,OPEN),BARSLAST(LDM40));
LDM42:=REF(LOW,LDM31)=LLV(LOW,2*LDM31+1);
LDM43:=FILTER(LDM42,LDM31);
LDM44:=BACKSET(LDM43,LDM31+1);
LDM45:=FILTER(LDM44,LDM31);
LDM46:=REF(LOW,BARSLAST(LDM45));
LDM47:=REF(MIN(CLOSE,OPEN),LDM31)=LLV(MIN(CLOSE,OPEN),2*LDM31+1);
LDM48:=FILTER(LDM47,LDM31);
LDM49:=BACKSET(LDM48,LDM31+1);
LDM50:=FILTER(LDM49,LDM31);
LDM51:=REF(MIN(CLOSE,OPEN),BARSLAST(LDM50));
LDM52:=IF(LDM13=0,LDM36,LDM41);
LDM53:=IF(LDM13=0,LDM46,LDM51);
STICKLINE(LDM52=REF(LDM52,1) ,LDM52,LDM52,5,0),COLORWHITE;
STICKLINE(LDM53=REF(LDM53,1) ,LDM53,LDM53,5,0),COLORRED;
LDM138:=LDM14-(LDM14-LDM15)/3;
LDM139:=LDM15+(LDM14-LDM15)/3;
LDM140:=LDM15+(LDM14-LDM15)/2;
LDM141:=1+IF(LDM9,2,4.92)/100;
LDM142:=LDM14/LDM15>=LDM141 OR CLOSE/REF(CLOSE,1)>=LDM141;
STICKLINE(LDM142,LDM138,LDM138 ,1,0),COLORYELLOW;
STICKLINE(LDM142,LDM140,LDM140,1,0),COLORYELLOW;
STICKLINE(LDM142,LDM139,LDM139,1,0),COLORYELLOW;
STICKLINE(LDM29,LDM23,LDM23,3,1),COLORYELLOW;
STICKLINE(LDM18=1,LDM23,LDM23,3,1),COLORYELLOW;
LDM146:=IF(LDM13=0,BARSLAST(LDM35)>0,BARSLAST(LDM40)>0) AND
(ABS(LOW-LDM52)<=LDM52*LDM17 OR ABS(LDM11-LDM52)<=LDM52*LDM17);
LDM147:=IF(LDM13=0,BARSLAST(LDM45)>0,BARSLAST(LDM50)>0) AND
(ABS(LOW-LDM53)<=LDM53*LDM17 OR ABS(LDM11-LDM53)<=LDM53*LDM17);
STICKLINE(LDM146,LDM52,LDM52,1,1),COLORYELLOW;
STICKLINE(LDM147,LDM53,LDM53,1,1),COLORYELLOW;
{牛熊分界}
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC3:=IF(JJJT,0.01*EMA(AMOUNT,35)/EMA(VOL,35),EMA((HIGH+LOW+CLOSE)/3,35));
------------------------------完整公式请直接下载---------------------------------------
红绿灯操盘_0.tn6
(19.68 KB, 下载次数: 29)
|
