稻壳阴线买入主图公式

AD15147086

昨天网上找到个好东西，分享给大家，希望大家都赚钱，我只是搬运工，谢谢！

稻壳阴线买入主图公式

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

根据源码，我作了些修改，我喜欢裸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;

分享给大家谢谢！

yangshuli1972

稻壳阴线买入主图公式

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;

cwyyx

谢谢楼主分享

四毛发艺

谢谢楼主分享

liaohx167

AD15147086 发表于 2020-8-2 20:07
根据源码，我作了些修改，我喜欢裸K线，所以去掉些东西，增加了些自已别处搬来的东西，组合成了这样。

A ...

导入出错啊

epanggong87160

谢谢老师分享

空想无用

谢谢楼主分享

chinaily

谢谢分享！

joe2014

谢谢楼主分享

kjjzsl

谢谢楼主分享

szwzs

楼主，麻烦你将源码另外用图片模式上传吧，以便知道被表情图标遮盖的是啥，我知道肯定是冒号和左括弧。

四毛发艺

谢谢群主分享

金燕369

谢楼主分享

sunxh

谢楼主分享