文华财经指标公式源码文华财经指标 笑脸哭脸

/*AR5S:=HHV(HIGH,4);
散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S; 庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S; DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.05,'←吸'),COLORRED;
{神秘心理指标}
均价:=(OPEN+HIGH+LOW+CLOSE*2)/5,NODRAW;
突破:均价+HIGH-LOW,NODRAW;
阻力:均价*2-LOW,NODRAW;
支撑:=均价*2-HIGH,NODRAW;
下降:=均价-HIGH+LOW,NODRAW;
心理:=(均价+突破+阻力+支撑+下降)/5,NODRAW,COLORRED;
m1 1 60 3
m2 1 60 19
趋势:=EXPMA(CLOSE,12),NODRAW,COLORYELLOW;
{涨停不破价}
ZT:=C/REF(C,1)>1.097;
ZTBPJ:=REF(C,BARSLAST(ZT)+1)*0.98;{涨停不破价}
ZTBP:=BARSLAST(ZT)<30 AND (LLV(C,BARSLAST(ZT))>=ZTBPJ OR LLV(C,BARSLAST(ZT))=ZTBPJ);{涨停不破价}
STICKLINE(ZTBP,REF(C,BARSLAST(ZT)+1)-REF(C,BARSLAST(ZT)+1) *0.001,REF(C,BARSLAST(ZT)+1),1,0),COLORYELLOW;
不破价:=REF(L,BARSLAST(ZT));
LS0:=BARSLAST(ZT);LS11:=IF(2,LS0=2,ZT);
LS21:=IF(2,LLV(L,2)>REF(L,2),1);
ZT不破2:=LS11 AND LS21;
DRAWTEXT(ZT不破2,不破价-不破价*0.02,'3'),COLORGREEN;
LS14:=IF(4,LS0=4,ZT);
LS24:=IF(4,LLV(L,4)>REF(L,4),1);
ZT不破4:=LS14 AND LS24;
DRAWTEXT(ZT不破4,不破价-不破价*0.02,'5'),COLORGREEN;
LS17:=IF(7,LS0=7,ZT);
LS27:=IF(7,LLV(L,7)>REF(L,7),1);
ZT不破7:=LS17 AND LS27;
DRAWTEXT(ZT不破7,不破价-不破价*0.02,'8'),COLORGREEN;
LS22:=IF(12,LS0=12,ZT);
LS32:=IF(12,LLV(L,12)>REF(L,12),1);
ZT不破12:=LS22 AND LS32;
DRAWTEXT(ZT不破12,不破价-不破价*0.02,'13'),COLORGREEN; XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
迫线:=C>O AND V>REF(V,1) AND L>REF(C,1) AND REF(ZT,1);
小阳:=C>O AND V>REF(V,1) AND REF(ZT,1);
起爆:=REF(HHV(V,8),1)/V>=1.97 AND REF(HHV(小阳,8),1) AND C>O; STICKLINE(ZT,REF(O,BH),REF(C,BH),2,0),COLORYELLOW; STICKLINE(迫线,O,C,2,0),COLORMAGENTA;
盘整天数:=5;{盘整天数自己调，以5--7日为最佳}
下探幅度:=5;
上冲幅度:=25;
涨停:=(C-REF(C,1))/REF(C,1)>0.09;{涨幅大于9个点}
缩量:=HHV(VOL,盘整天数-2)<REF(VOL,盘整天数-1) AND
SUM(VOL, 盘整天数)>2* SUM(VOL, 盘整天数-2);
七伤拳:=缩量 AND REF(涨停,盘整天数) AND COUNT(涨停,盘整天数+1)=1 AND (HHV(H,盘整天数)-REF(C,盘整天数))/REF(C,盘整天
数)*100<上冲幅度 AND (LLV(L,盘整天数)-REF(C,盘整天数))/REF(C,盘整天数)*100>(下探幅度*-1);
DRAWTEXT(七伤拳,LOW*0.98,'七伤拳'),COLORRED;
*/
G:=MA(C,5);
DY:=MA(C,10);
NNH:=BARSLAST(H=HHV(H,7)) ,NODRAW;
NNL:=BARSLAST(L=LLV(L,7)) ,NODRAW;
NN:=IF(REF(G,NNH)>REF(DY,NNH) AND NNH<=4,NNH,IF(REF(G,NNL)<REF(DY,NNL) AND NNL<=4,NNL,5)) ,NODRAW;
YN:=IF(ISLASTBAR AND NN>0,NN,5) ,NODRAW;
HHY:=REF(H,YN)=HHV(H,6);
LL Y:=REF(L,YN)=LLV(L,6);
FG01:=BACKSET(HHY,YN+1)>BACKSET(HHY,YN),NODRAW;//只设置前面第6个
FD01:=BACKSET(LL Y,YN+1)>BACKSET(LL Y,YN) ,NODRAW;
FG02:=FG01=FD01 AND G>DY,NODRAW;
FD02:=FG01=FD01 AND G<DY,NODRAW;
TTTT:=BARSLAST(FD01),NODRAW;
FG0:=FG01 AND IF(FG02=1,H=HHV(H,BARSLAST(REF(FD01,1))+1),H=HHV(H,IF(BARSLAST(L=LLV(L,7)) >=5,5,BARSLAST(FD01)))) AND FD02=0 ,NODRAW;
FD0:=FD01 AND IF(FD02=1,L=LLV(L,BARSLAST(REF(FG01,1))+1),L=LLV(L,IF(BARSLAST(H=HHV(L,7))> =5,5,BARSLAST(FG01)))) AND FG02=0 ,NODRAW;
GT:=BARSLAST(FG0),NODRAW;
DT:=BARSLAST(FD0),NODRAW;
LLLL:=DT=0 AND REF(DT,1)<GT AND L>REF(L,REF(DT,1)+1),NODRAW;
FG1:=BACKSET(REFX(GT,1)=0 AND GT<DT AND
REFX(H,1)>=REF(H,GT),GT+1),NODRAW;
FD1:=BACKSET(REFX(DT,1)=0 AND DT<GT AND REFX(L,1)<=REF(L,DT),DT+1),NODRAW;
FG11:=IF(GT=0 AND REF(GT,1)<DT AND IF(REF(G,BARSLAST(L=LLV(L,7)))>REF(DY,BARSLAST(L=LLV(L,7))),BARSLAST(L=LL V(L,7))<5,1) AND H<REF(H,REF(GT,1)+1),1,0),NODRAW;
FD11:=IF(DT=0 AND REF(DT,1)<GT AND IF(REF(G,BARSLAST(H=HHV(H,7)))<REF(DY,BARSLAST(H=HHV(H,7))),BARSLAST(H= HHV(H,7))<5,1) AND L>REF(L,REF(DT,1)+1),1,0),NODRAW;
GT1:=BARSLAST(FG11<>1 AND FG1<>1 AND FG0),NODRAW;
DT1:=BARSLAST(FD11<>1 AND FD1<>1 AND FD0),NODRAW;
FD2:=BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)>LLV(L,GT1+5),DT1+1),NODRAW;
FG2A:=BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)<=LLV(L,GT1+5) AND REF(H,GT1)>HHV(H,GT1+5),GT1+1),NODRAW;
FG2B:=IF(GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 AND REF(L,DT1)<=LLV(L,REF(GT1,1)+6) AND H>HHV(H,REF(GT1,1)+6),1,0),NODRAW;
FG2:=BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)<HHV(H,DT1+5),GT1+1),NODRAW;
FD2A:=BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)>=HHV(L,DT1+5) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FD2B:=IF(DT1=0 AND GT1<4 AND REF(DT1,1)-GT1<4 AND REF(H,GT1)>=HHV(H,REF(DT1,1)+6) AND L>LLV(L,REF(DT1,1)+6),1,0),NODRAW; TTTTTT:= H<REF(H,REF(GT1,1)+1) AND DT1<4,NODRAW;
HHHHHH:=REF(LLV(L,10),DT1),NODRAW;
FG21:=IF(GT1=0 AND DT1<4 AND H<=REF(H,REF(GT1,1)+1) ,1,0),NODRAW;
FD21:=IF(DT1=0 AND GT1<4 AND L>=REF(L,REF(DT1,1)+1) ,1,0),NODRAW;
FD231:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>REF(LLV(L,10),DT1),DT1+1),NODRAW;
FG23:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND (REF(H,GT1)<REF(HHV(H,13),GT1) OR REF(FD231,DT1)=0),GT1+1),NODRAW;
FG231:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND REF(H,GT1)<REF(HHV(H,10),GT1) ,GT1+1),NODRAW;
FD23:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND ( REF(L,DT1)>REF(LLV(L,13),DT1) OR REF(FG231,GT1)=0),DT1+1),NODRAW;
FDD23:=REF(H,GT1)<REF(HHV(H,10),GT1) OR REF(FD23,DT1)=0,NODRAW;
FD24:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)<HHV(H,GT1+3) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FG24:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)>LLV(L,DT1+3) AND REF(H,GT1)<HHV(H,GT1+5),GT1+1),NODRAW;
GT2:=BARSLAST(FG21<>1 AND FG23<>1 AND FG231<>1 AND FG24<>1 AND FG2<>1 AND FG2A<>1 AND FG2B<>1 AND GT1=0),NODRAW;
DT2:=BARSLAST(FD21<>1 AND FD23<>1 AND FD231<>1 AND FD24<>1 AND FD2<>1 AND FD2A<>1 AND FD2B<>1 AND DT1=0),NODRAW;
FG3:=BACKSET(REFX(GT2,1)=0 AND GT2<DT2 AND REFX(H,1)>=REF(H,GT2),GT2+1),NODRAW;
FD3:=BACKSET(REFX(DT2,1)=0 AND DT2<GT2 AND REFX(L,1)<=REF(L,DT2),DT2+1),NODRAW;
FG31:=IF(GT2=0 AND REF(GT2,1)<DT2 AND H<REF(H,REF(GT2,1)+1),1,0),NODRAW;
FD31:=IF(DT2=0 AND REF(DT2,1)<GT2 AND L>REF(L,REF(DT2,1)+1),1,0),NODRAW;
GT3:=BARSLAST(GT2=0 AND FG3<>1 AND FG31<>1 ),NODRAW;
DT3:=BARSLAST(DT2=0 AND FD3<>1 AND FD31<>1),NODRAW;
FG4:=BACKSET(REFX(GT3,1)=0 AND GT3<DT3 AND REFX(H,1)>=REF(H,GT3),GT3+1),NODRAW;
FD4:=BACKSET(REFX(DT3,1)=0 AND DT3<GT3 AND REFX(L,1)<=REF(L,DT3),DT3+1),NODRAW;
FG41:=IF(GT3=0 AND REF(GT3,1)<DT3 AND H<REF(H,REF(GT3,1)+1),1,0),NODRAW;
FD41:=IF(DT3=0 AND REF(DT3,1)<GT3 AND L>REF(L,REF(DT3,1)+1),1,0),NODRAW; HHH:=GT3=0 AND FG31<>1 AND FG3<>1,NODRAW;
LLL:=DT3=0 AND FD31<>1 AND FD3<>1,NODRAW;
XX:=BACKSET(ISLASTBAR,SUMBARS(HHH,3));
ZZ:=BACKSET(ISLASTBAR,SUMBARS(LLL,3));
Q:=BACKSET(ISLASTBAR,SUMBARS(HHH,1));
W:=BACKSET(ISLASTBAR,SUMBARS(LLL,1));
DRAWLINE1(HHH&&XX,H,HHH&&Q,H,1);
DRAWLINE1(LLL&&ZZ,L,LLL&&W,L,1);
N:=2;//N是调整标注的距离的，需要根据加载的合约自行修改
DRAWICON(HHH,H+N*MINPRICE,'ICO17');
DRAWICON(LLL,L-N*MINPRICE,'ICO16'),VALIGN0;。