稻壳阴线买入主图公式
昨天网上找到个好东西，分享给大家，希望大家都赚钱，我只是搬运工，谢谢！稻壳阴线买入主图公式
E40:EXPMA(CLOSE,40);工作线:=MA(CLOSE,1);M3:MA(CLOSE,3)COLORRED;M13:MA(CLOSE,13)COLORGREEN;收:C,COLORRED,NODRAW;高:H,NODRAW;三:C*1.0348,NODRAW;五:C*1.055,NODRAW;八:C*1.0848,NODRAW;十:C*1.1048,NODRAW;十五:C*1.1548,NODRAW;廿:C*1.2048,NODRAW;止:C*(1-0.025),NODRAW;TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);TT1:=REF(EMA(TT2,3),1);RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);FF:=EMA(CLOSE,3);稻壳1:EMA(CLOSE,144),POINTDOT,COLORWHITE;稻壳2:EMA(C,318);AA1:=AMOUNT/VOL;BB1:=L<AA1*0.9;CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=VOL<MA(V,5)*1.5;FF1:=BB1 AND CC1 AND DD1 AND EE1;F:=100*(C-REF(C,1))/REF(C,1);P1:=IF(C<REF(O,1) AND F<0,1,0);P2:=IF(C<REF(O,2) AND F<0,1,0);TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;Z1:=MA(C,13);ZX:=REF(Z1,13/2+1);DRAWICON(CROSS(ZX,C),H*1.01,2);{DRAWTEXT(CROSS(工作线,M13)AND J<55,LOW,'入')COLORWHITE;}DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'顶'),COLOR00FFFF;{DRAWTEXT(FF1,L*0.99,'超短'),COLOR00FF00;}STICKLINE(TT3,OPEN,CLOSE,3,0),COLORFF00FF;{STICKLINE(TT4,OPEN,CLOSE,3,0),COLORGREEN;};日跌: L*0.99,NODRAW,COLORFF00FF;周跌: L*0.94,NODRAW,COLORFF00FF;
源码分享给大家。在这谢谢谢谢源码作者！谢谢！
根据源码，我作了些修改，我喜欢裸K线，所以去掉些东西，增加了些自已别处搬来的东西，组合成了这样。
A_: CONST(C),COLOR708070;{现价线}
B_: CONST(O),COLOR808080;{现价线}
{稻壳}
E40:EXPMA(CLOSE,00),COLORYELLOW,NODRAW;
工作线:=MA(CLOSE,0),NODRAW;
M3:MA(CLOSE,0),COLOR00FF00,LINETHICK1;
M13:MA(CLOSE,00),COLORGREEN;
收:C,COLORRED,NODRAW;
高:H,NODRAW;
三:C*1.0348,NODRAW;
五:C*1.055,NODRAW;
八:C*1.0848,NODRAW;
十:C*1.1048,NODRAW;
十五:C*1.1548,NODRAW;
廿:C*1.2048,NODRAW;
止:C*(1-0.025),NODRAW;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
AA1:=AMOUNT/VOL;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=VOL<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C<REF(O,1) AND F<0,1,0);
P2:=IF(C<REF(O,2) AND F<0,1,0);
TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;
TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;
Z1:=MA(C,13);
ZX:=REF(Z1,13/2+1);
DRAWICON(CROSS(ZX,C),H*1.01,2);
{DRAWTEXT(CROSS(工作线,M13)AND J<55,LOW,'')COLORWHITE;}
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,''),COLORRED;
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,''),COLOR00FFFF;
{DRAWTEXT(FF1,L*0.99,''),COLOR00FF00;}
STICKLINE(TT3,OPEN,CLOSE,1,0),COLORFF00FF;
{STICKLINE(TT4,OPEN,CLOSE,1,0),COLORLICYAN;};
{长阴柱}
长阴:=C<O*0.952;
二分之一:(MAX(C,O)+MIN(C,O))/2,NODRAW;
三分之二:(MAX(C,O)-MIN(C,O))/3*2+MIN(C,O),NODRAW;
三分之一:(MAX(C,O)-MIN(C,O))/3+MIN(C,O),NODRAW;
STICKLINE(长阴,C,二分之一,0.001,0),COLORBLUE;
STICKLINE(长阴,(C+O)/2,(C+O)/2,0,0),COLORFFFFFF;
{长阴柱}
DH:=(((CLOSE-REF(CLOSE,1))/REF(CLOSE,1))*100);
STICKLINE(DH<=-4,(C+O)/2,C,0.1,0),COLORAA0000;
STICKLINE(DH<=-4,(C+O)/2,C,0.1,0),COLORCC0000;
STICKLINE(DH<=-4,(C+O)/2,C,0.1,0),COLOREE0000;
STICKLINE(DH<=-4,(C+O)/2,C,0.1,0),COLORFF0000;
{3121}
STICKLINE(C/REF(C,1)>=1.04 OR C/REF(C,1)<=0.96,(C+O)/2,(C+O)/2,4,1),COLORYELLOW;{中分线};
STICKLINE(C/REF(C,1)>=1.04 OR C/REF(C,1)<=0.96,(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),1,1),COLORGREEN;{上三一线};
STICKLINE(C/REF(C,1)>=1.04 OR C/REF(C,1)<=0.96,(MAX(O,C)-MIN(O,C))/3+MIN(O,C),(MAX(O,C)-MIN(O,C))/3+MIN(O,C),1,1),COLORGREEN;{下三一线};
{3121}
中:=MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)<1.02 AND MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)>=1.006;
大:=MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)>=1.02;
中阴线:=CLOSE<OPEN AND 中;
大阴线:=CLOSE<OPEN AND 大;二一位:=(CLOSE+OPEN)/2;
三一位:=(OPEN-CLOSE)/3+CLOSE;三二位:=(OPEN-CLOSE)*2/3+CLOSE;
STICKLINE(中阴线,二一位,二一位,1,1 ),COLORYELLOW;
STICKLINE(大阴线,二一位,二一位,1,1 ),COLORYELLOW;
STICKLINE(大阴线,三一位,三一位,1,1 ),COLORGREEN;
STICKLINE(大阴线,三二位,三二位,1,1 ),COLORGREEN;
中阳线:=CLOSE>OPEN AND 中;
大阳线:=CLOSE>OPEN AND 大;
二一位Y:=(CLOSE+OPEN)/2;
三一位Y:=(CLOSE-OPEN)/3+OPEN;
三二位Y:=(CLOSE-OPEN)*2/3+OPEN;
STICKLINE(中阳线,二一位Y,二一位Y,1,1 ),COLORYELLOW;
STICKLINE(大阳线,二一位Y,二一位Y,1,1 ),COLORYELLOW;
STICKLINE(大阳线,三一位Y,三一位Y,1,1 ),COLORGREEN;
STICKLINE(大阳线,三二位Y,三二位Y,1,1 ),COLORGREEN;
分享给大家谢谢！ 稻壳阴线买入主图公式
E40:EXPMA(CLOSE,40);
工作线:=MA(CLOSE,1);
M3:MA(CLOSE,3)COLORRED;
M13:MA(CLOSE,13)COLORGREEN;
收:C,COLORRED,NODRAW;
高:H,NODRAW;
三:C*1.0348,NODRAW;
五:C*1.055,NODRAW;
八:C*1.0848,NODRAW;
十:C*1.1048,NODRAW;
十五:C*1.1548,NODRAW;
廿:C*1.2048,NODRAW;
止:C*(1-0.025),NODRAW;
TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
TT1:=REF(EMA(TT2,3),1);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
稻壳1:EMA(CLOSE,144),POINTDOT,COLORWHITE;
稻壳2:EMA(C,318);
AA1:=AMOUNT/VOL;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=VOL<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
F:=100*(C-REF(C,1))/REF(C,1);
P1:=IF(C<REF(O,1) AND F<0,1,0);
P2:=IF(C<REF(O,2) AND F<0,1,0);
TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;
TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;
Z1:=MA(C,13);
ZX:=REF(Z1,13/2+1);
DRAWICON(CROSS(ZX,C),H*1.01,2);
{DRAWTEXT(CROSS(工作线,M13)AND J<55,LOW,'入')COLORWHITE;}
DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;
DRAWTEXT(CROSS(88,RSI),HIGH * 1.02,'顶'),COLOR00FFFF;
{DRAWTEXT(FF1,L*0.99,'超短'),COLOR00FF00;}
STICKLINE(TT3,OPEN,CLOSE,3,0),COLORFF00FF;
{STICKLINE(TT4,OPEN,CLOSE,3,0),COLORGREEN;};
日跌: L*0.99,NODRAW,COLORFF00FF;
周跌: L*0.94,NODRAW,COLORFF00FF; 谢谢楼主分享 谢谢楼主分享 AD15147086 发表于 2020-8-2 20:07
根据源码，我作了些修改，我喜欢裸K线，所以去掉些东西，增加了些自已别处搬来的东西，组合成了这样。
A ...
导入出错啊 谢谢老师分享 谢谢楼主分享 谢谢分享！
谢谢楼主分享
谢谢楼主分享 楼主，麻烦你将源码另外用图片模式上传吧，以便知道被表情图标遮盖的是啥，我知道肯定是冒号和左括弧。
谢谢群主分享 谢楼主分享 谢楼主分享
页:
[1]
2