AD15147086 发表于 2018-8-20 09:11

谢谢分享！

股海金客 发表于 2018-8-21 14:09

弄这么多苦脸啊，没有办法破解，无法通过的

101813322 发表于 2018-11-10 15:20

研究了下，应该是这样的
三一:HIGH-(HIGH-LOW)*0.333,NODRAW;
二一:(HIGH+LOW)*0.5,NODRAW;
三分之二:HIGH-(HIGH-LOW)*0.666,NODRAW;
实体三一:MIN(CLOSE,OPEN)+(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))*0.666,NODRAW;
实体二一:(CLOSE+OPEN)*0.5,NODRAW;
实体三二:MIN(CLOSE,OPEN)+(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))*0.333,NODRAW;
VAR1:=STRCAT(HYBLOCK,5);
VAR2:=STRCAT(VAR1,DYBLOCK);
VAR3:=STRCAT(VAR2,5);
STICKLINE(REF(LOW,1)>HIGH,HIGH,REF(LOW,1),3,0),COLORGRAY;
STICKLINE(REF(HIGH,1)<LOW,LOW,REF(HIGH,1),3,0),COLORGRAY;
VAR4:=MA(CLOSE,5);{WWW.BUYHAOGU.COM}
MA5角度:ATAN((VAR4/REF(VAR4,1)-1)*100)*180/3.1416,NODRAW;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
VAR5:=REF(CLOSE,1);
VAR6:=IF(CLOSE>=1,10000,100000);
VAR7:=1.1*VAR5-49/VAR6;
VAR8:=1.05*VAR5-49/VAR6;
VAR9:=0.9*VAR5+51/VAR6;
VAR10:=0.95*VAR5+51/VAR6;
VAR11:=NAMELIKE(1) OR NAMELIKE(2);
VAR12:=IF(VAR11,CLOSE>=VAR8,CLOSE>=VAR7);
VAR13:=IF(VAR11,CLOSE<=VAR10,CLOSE<=VAR9);
VAR14:=IF(VAR11,HIGH>=VAR8,HIGH>=VAR7);
VAR15:=IF(VAR11,LOW<=VAR10,LOW<=VAR9);
STICKLINE(VAR14,HIGH,MAX(CLOSE,OPEN),0,0),COLORMAGENTA;
STICKLINE(VAR15,LOW,MIN(CLOSE,OPEN),0,0),COLORLICYAN;
VAR16:=CLOSE>OPEN AND (CLOSE>=VAR8 OR CLOSE>1.05*OPEN-51/VAR6) OR (CLOSE>1000 AND CLOSE>VAR5*1.024);{WWW.BUYHAOGU.COM}
STICKLINE(VAR16,OPEN,CLOSE,1,0),COLOR0000BB;
VAR17:=CLOSE<OPEN AND (CLOSE<=VAR10 OR CLOSE<0.95*OPEN+49/VAR6) OR (CLOSE>1000 AND CLOSE<VAR5*0.976);{WWW.BUYHAOGU.COM}
STICKLINE(VAR17,OPEN,CLOSE,1,0),COLORLIGREEN;
STICKLINE(VAR12,OPEN,CLOSE,1,0),COLORMAGENTA;
STICKLINE(VAR13,OPEN,CLOSE,1,0),COLORLICYAN;
VAR18:=CLOSE<OPEN AND CLOSE>REF(CLOSE,1);
STICKLINE(VAR18,OPEN,CLOSE,0,0),COLORRED;
VAR19:=CLOSE>OPEN AND CLOSE<REF(CLOSE,1);
STICKLINE(VAR19,OPEN,CLOSE,0,0),COLORGREEN;
实体上三分之一:(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),COLORGREEN,NODRAW;
实体下三分之一:(MAX(O,C)-MIN(O,C))/3+MIN(O,C),NODRAW;
实体二分之一:(O+C)/2,NODRAW;
整体上三分之一:(MAX(H,L)-MIN(H,L))*2/3+MIN(H,L),NODRAW;
整体下三分之一:(MAX(H,L)-MIN(H,L))/3+MIN(H,L),COLORYELLOW,NODRAW;
整体二分之一:(H+L)/2,COLORLIMAGENTA,NODRAW;
STICKLINE(O<>C,实体上三分之一,实体下三分之一,2,0),COLOR824173;
STICKLINE(O<>C,实体二分之一,实体二分之一,2,0),COLORGREEN;

101813322 发表于 2018-11-10 15:21

三一:HIGH-(HIGH-LOW)*0.333,NODRAW;
二一:(HIGH+LOW)*0.5,NODRAW;
三分之二:HIGH-(HIGH-LOW)*0.666,NODRAW;
实体三一:MIN(CLOSE,OPEN)+(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))*0.666,NODRAW;
实体二一:(CLOSE+OPEN)*0.5,NODRAW;
实体三二:MIN(CLOSE,OPEN)+(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))*0.333,NODRAW;
VAR1:=STRCAT(HYBLOCK,5);
VAR2:=STRCAT(VAR1,DYBLOCK);
VAR3:=STRCAT(VAR2,5);
STICKLINE(REF(LOW,1)>HIGH,HIGH,REF(LOW,1),3,0),COLORGRAY;
STICKLINE(REF(HIGH,1)<LOW,LOW,REF(HIGH,1),3,0),COLORGRAY;
VAR4:=MA(CLOSE,5);{WWW.BUYHAOGU.COM}
MA5角度:ATAN((VAR4/REF(VAR4,1)-1)*100)*180/3.1416,NODRAW;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
VAR5:=REF(CLOSE,1);
VAR6:=IF(CLOSE>=1,10000,100000);
VAR7:=1.1*VAR5-49/VAR6;
VAR8:=1.05*VAR5-49/VAR6;
VAR9:=0.9*VAR5+51/VAR6;
VAR10:=0.95*VAR5+51/VAR6;
VAR11:=NAMELIKE(1) OR NAMELIKE(2);
VAR12:=IF(VAR11,CLOSE>=VAR8,CLOSE>=VAR7);
VAR13:=IF(VAR11,CLOSE<=VAR10,CLOSE<=VAR9);
VAR14:=IF(VAR11,HIGH>=VAR8,HIGH>=VAR7);
VAR15:=IF(VAR11,LOW<=VAR10,LOW<=VAR9);
STICKLINE(VAR14,HIGH,MAX(CLOSE,OPEN),0,0),COLORMAGENTA;
STICKLINE(VAR15,LOW,MIN(CLOSE,OPEN),0,0),COLORLICYAN;
VAR16:=CLOSE>OPEN AND (CLOSE>=VAR8 OR CLOSE>1.05*OPEN-51/VAR6) OR (CLOSE>1000 AND CLOSE>VAR5*1.024);{WWW.BUYHAOGU.COM}
STICKLINE(VAR16,OPEN,CLOSE,1,0),COLOR0000BB;
VAR17:=CLOSE<OPEN AND (CLOSE<=VAR10 OR CLOSE<0.95*OPEN+49/VAR6) OR (CLOSE>1000 AND CLOSE<VAR5*0.976);{WWW.BUYHAOGU.COM}
STICKLINE(VAR17,OPEN,CLOSE,1,0),COLORLIGREEN;
STICKLINE(VAR12,OPEN,CLOSE,1,0),COLORMAGENTA;
STICKLINE(VAR13,OPEN,CLOSE,1,0),COLORLICYAN;
VAR18:=CLOSE<OPEN AND CLOSE>REF(CLOSE,1);
STICKLINE(VAR18,OPEN,CLOSE,0,0),COLORRED;
VAR19:=CLOSE>OPEN AND CLOSE<REF(CLOSE,1);
STICKLINE(VAR19,OPEN,CLOSE,0,0),COLORGREEN;
实体上三分之一:(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),COLORGREEN,NODRAW;
实体下三分之一:(MAX(O,C)-MIN(O,C))/3+MIN(O,C),NODRAW;
实体二分之一:(O+C)/2,NODRAW;
整体上三分之一:(MAX(H,L)-MIN(H,L))*2/3+MIN(H,L),NODRAW;
整体下三分之一:(MAX(H,L)-MIN(H,L))/3+MIN(H,L),COLORYELLOW,NODRAW;
整体二分之一:(H+L)/2,COLORLIMAGENTA,NODRAW;
STICKLINE(O<>C,实体上三分之一,实体下三分之一,2,0),COLOR824173;
STICKLINE(O<>C,实体二分之一,实体二分之一,2,0),COLORGREEN;

绿舟 发表于 2018-11-10 20:33

绿舟 发表于 2018-11-10 20:36

风在江之上 发表于 2018-11-11 22:10

修改不来啊

跟庄天天乐 发表于 2020-4-1 06:08

量友早上好！
















打酒不带壶 发表于 2020-4-1 12:31

谢谢楼主分享

kjjzsl 发表于 2020-4-1 14:37

楼主能配个图吗？谢谢分享

kjjzsl 发表于 2020-4-1 16:07

楼主能配个图吗？谢谢分享

kjjzsl 发表于 2020-4-1 16:13

楼主能配个图吗？谢谢分享

小城农夫 发表于 2020-4-2 21:08

谢谢分享！

缘分五月66 发表于 2020-4-2 21:20

谢谢分享，好好学习，天天向上。

打酒不带壶 发表于 2020-4-4 15:15

谢谢楼主分享
页: 1 [2] 3 4
查看完整版本: 主图加强色并且标注：K线实体整体三一二一位