[转载]文华源码收集
(2018-04-08 14:01:08)
标签:
转载 |
分类: 文华指标 |
四个品种:胶,糖,豆,豆油,每个品种各有一个模型,全部应用在指数上的30分钟周期。没参数的
BA:=BARPOS;
VOL1:=IF(ISLASTBAR,VOL,REFX(VOL,1));
HC:=LLV(IF(H-C=0,1000,H-C),0);
CL:=LLV(IF(C-L=0,1000,ABS(C-L)),0);
CO:=LLV(IF(C-O=0,1000,ABS(C-O)),0);
ZXBD:=MIN(HC,MIN(CL,CO));
DFX:=REF(L,2)=LLV(L,5)&&REF(L,1)>REF(L,2)&&L>REF(L,2)&&REF(L,2)<=REF(L,3);
GFX:=REF(H,2)=HHV(H,4)&&REF(H,1)<REF(H,2)&&H<REF(H,2)&&REF(H,2)>=REF(H,3);
DFXI:=VALUEWHEN(DFX,BA);
GFXI:=VALUEWHEN(GFX,BA);
DDP1:=VALUEWHEN(DFX,REF(L,2));
GDP1:=VALUEWHEN(GFX,REF(H,2));
DDP:=VALUEWHEN(DFX&&DDP1<>REF(DDP1,1),DDP1);
GDP:=VALUEWHEN(GFX&&GDP1<>REF(GDP1,1),GDP1);
DFX1I:=VALUEWHEN(DFX,REF(DFXI,1));
DFX1P:=VALUEWHEN(DFX,REF(DDP,BA-DFX1I+1));
GFX1I:=VALUEWHEN(GFX,REF(GFXI,1));
GFX1P:=VALUEWHEN(GFX,REF(GDP,BA-GFX1I+1));
DFXP:=VALUEWHEN(DFX&&DDP<>REF(DDP,1),MIN(DDP,MIN(DFX1P,REF(DDP,1))));
GFXP:=VALUEWHEN(GFX&&GDP<>REF(GDP,1),MAX(GDP,MAX(GFX1P,REF(GDP,1))));
SA:=SAR(4,0.02,0.2);
DZZ:=SA>0&&NOT(REF(SA,1)>0)||BA=0;
GZZ:=SA<0&&NOT(REF(SA,1)<0)||BA=0;
DZZI:=VALUEWHEN(DZZ,BA);
GZZI:=VALUEWHEN(GZZ,BA);
DZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)<0&&DFX&&REF(L,2)=LLV(L,BA-GZZI+1),BA-2)>=0),0,VALUEWHEN(REF(SA,2)<0&&DFX&&REF(L,2) =LLV (L,BA-GZZI+1),BA-2));
GZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)>0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1),BA-2)>=0),0,VALUEWHEN(REF(SA,2)>0&&GFX&&REF (H,2)=HHV (H,BA-DZZI+1),BA-2));
DD0I:=VALUEWHEN(DZZ||DZZ0I=0,DZZ0I);
GD0I:=VALUEWHEN(GZZ||GZZ0I=0,GZZ0I);
DZZ0P:=VALUEWHEN(DZZ&&DZZI-GZZI>3,LLV(L,BA-GZZ0I+1));
GZZ0P:=VALUEWHEN(GZZ&&GZZI-DZZI>3,HHV(H,BA-DZZ0I+1));
DD0P:=VALUEWHEN(DZZ,DZZ0P);
GD0P:=VALUEWHEN(GZZ,GZZ0P);
DD0RP:=VALUEWHEN(DZZ,REF(DD0P,1));
GD0RP:=VALUEWHEN(GZZ,REF(GD0P,1));
QSI:=IF(DZZ0I=0,0,VALUEWHEN(DZZ,REF(DZZ0I,BA-GZZI+1)));
GQSI:=IF(GZZ0I=0,0,VALUEWHEN(GZZ,REF(GZZ0I,BA-DZZI+1)));
SZR:=IF(SA>0,1,0);
XDR:=IF(SA<0,1,0);
XDTS2:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,SUM(XDR,DZZI-GZZI+1));
SZTS2:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,SUM(SZR,GZZI-DZZI+1));
XDTS2I:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,BA);
SZTS2I:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,BA);
XDTS1:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,DZZI-REF(GZZI,BA-REF(DZZI,2)));
XDTS1I:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,BA);
XDTS:=IF(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,XDTS1,XDTS2);
SZTS1:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,GZZI-REF(DZZI,BA-REF(GZZI,2)));
SZTS1I:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,BA);
SZTS:=IF(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,SZTS1,SZTS2);
DINI:=IF(BA=DZZ0I||BA-DZZ0I=1,SUM(L*VOL1,BA-QSI+1)/SUM(VOL1,BA-QSI+1),SUM(L*VOL1,BA-DZZ0I+1)/SUM(VOL1,BA-DZZ0I+1));
GINI:=IF(BA=GZZ0I||BA-GZZ0I=1,SUM(H*VOL1,BA-GQSI+1)/SUM(VOL1,BA-GQSI+1),SUM(H*VOL1,BA-GZZ0I+1)/SUM(VOL1,BA-GZZ0I+1));
DDT0:=DFX&&(REF(C,2)<REF(DINI,2)||REF(C,3)<REF(DINI,3));
DDT0I:=VALUEWHEN(DDT0,DZZ0I);
DDT01I:=VALUEWHEN(DDT0,REF(DDT0I,1));
DINI0:=IF(BA=DDT0I||BA-DDT0I=1,SUM(L*VOL1,BA-DDT01I+1)/SUM(VOL1,BA-DDT01I+1),SUM(L*VOL1,BA-DDT0I+1)/SUM(VOL1,BA- DDT0I+1));
DDT00:=(DZZ&&SZTS<=XDTS&&DZZI-GZZI>3);
DDT00I:=IF(NOT(DDT00),0,VALUEWHEN(DDT00,DD0I));
DZ00I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DINI0,3)||REF(C,2)<REF(DINI0,2)),DZZ0I);
DZ0I:=MAX(DDT00I,DZ00I);
DZ0:=IF(BA=DZ0I||BA-DZ0I=1,(SUM(L*VOL1,BA-REF(DZ0I,1)+1))/(SUM(VOL1,BA-REF(DZ0I,1)+1)),(SUM(L*VOL1,BA-DZ0I+1))/(SUM (VOL1,BA-DZ0I+1)));
DZ1I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ0,3)||REF(C,2)<REF(DZ0,2)),DZZ0I);
DZ1:=IF(BA=DZ1I||BA-DZ1I=1,(SUM(L*VOL1,BA-REF(DZ1I,1)+1))/(SUM(VOL1,BA-REF(DZ1I,1)+1)),(SUM(L*VOL1,BA-DZ1I+1))/(SUM (VOL1,BA-DZ1I+1)));
DZ2I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ1,3)||REF(C,2)<REF(DZ1,2)),DZZ0I);
DZ2:=IF(BA=DZ2I||BA-DZ2I=1,(SUM(L*VOL1,BA-REF(DZ2I,1)+1))/(SUM(VOL1,BA-REF(DZ2I,1)+1)),(SUM(L*VOL1,BA-DZ2I+1))/(SUM (VOL1,BA-DZ2I+1)));
DZ3I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ2,3)||REF(C,2)<REF(DZ2,2)),DZZ0I);
DZ3:=IF(BA=DZ3I||BA-DZ3I=1,(SUM(L*VOL1,BA-REF(DZ3I,1)+1))/(SUM(VOL1,BA-REF(DZ3I,1)+1)),(SUM(L*VOL1,BA-DZ3I+1))/(SUM (VOL1,BA-DZ3I+1)));
GDT0:=GFX&&(REF(C,2)>REF(GINI,2)||REF(C,3)>REF(GINI,3));
GDT0I:=VALUEWHEN(GDT0,GZZ0I);
GDT01I:=VALUEWHEN(GDT0,REF(GDT0I,1));
GINI0:=IF(BA=GDT0I||BA-GDT0I=1,SUM(H*VOL1,BA-GDT01I+1)/SUM(VOL1,BA-GDT01I+1),SUM(H*VOL1,BA-GDT0I+1)/SUM(VOL1,BA- GDT0I+1));
GDT00:=(GZZ&&SZTS>=XDTS&&GZZI-DZZI>3);
GDT00I:=IF(NOT(GDT00),0,VALUEWHEN(GDT00,GD0I));
GZ00I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GINI0,3)||REF(C,2)>REF(GINI0,2)),GZZ0I);
GZ0I:=MAX(GDT00I,GZ00I);
GZ0:=IF(BA=GZ0I||BA-GZ0I=1,(SUM(H*VOL1,BA-REF(GZ0I,1)+1))/(SUM(VOL1,BA-REF(GZ0I,1)+1)),(SUM(H*VOL1,BA-GZ0I+1))/(SUM (VOL1,BA-GZ0I+1)));
GZ1I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ0,3)||REF(C,2)>REF(GZ0,2)),GZZ0I);
GZ1:=IF(BA=GZ1I||BA-GZ1I=1,(SUM(H*VOL1,BA-REF(GZ1I,1)+1))/(SUM(VOL1,BA-REF(GZ1I,1)+1)),(SUM(H*VOL1,BA-GZ1I+1))/(SUM (VOL1,BA-GZ1I+1)));
GZ2I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ1,3)||REF(C,2)>REF(GZ1,2)),GZZ0I);
GZ2:=IF(BA=GZ2I||BA-GZ2I=1,(SUM(H*VOL1,BA-REF(GZ2I,1)+1))/(SUM(VOL1,BA-REF(GZ2I,1)+1)),(SUM(H*VOL1,BA-GZ2I+1))/(SUM (VOL1,BA-GZ2I+1)));
GZ3I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ2,3)||REF(C,2)>REF(GZ2,2)),GZZ0I);
GZ3:=IF(BA=GZ3I||BA-GZ3I=1,(SUM(H*VOL1,BA-REF(GZ3I,1)+1))/(SUM(VOL1,BA-REF(GZ3I,1)+1)),(SUM(H*VOL1,BA-GZ3I+1))/(SUM (VOL1,BA-GZ3I+1)));
DD:=FLOOR((DZ3+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD:=FLOOR((GZ3+ZXBD)/ZXBD)*ZXBD;
GDW:=VALUEWHEN(CROSS(C,GD),BA);
DDW:=VALUEWHEN(CROSS(DD,C),BA);
DK:=IF(DDW>GDW,GD,DD);
DD1:=FLOOR((DINI+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD1:=FLOOR((GINI+ZXBD)/ZXBD)*ZXBD;
GDW11:=VALUEWHEN(CROSS(C,GD1),BA);
DDW11:=VALUEWHEN(CROSS(DD1,C),BA);
DKD:=IF(DDW11>GDW11,GD1,DD1);
DWD:=VALUEWHEN(CROSS(C,DKD),BA);
GWD:=VALUEWHEN(CROSS(DKD,C),BA);
GDW1:=VALUEWHEN(CROSS(C,GFXP)||BA=0,BA);
DDW1:=VALUEWHEN(CROSS(DFXP,C)||BA=0,BA);
DKP:=IF(DDW1>GDW1,GFXP,DFXP);
BZD:=MAX(GFXP,MAX(DKD,DK));
SZD:=MIN(DFXP,MIN(DKD,DK));
DTA:=CROSS(C,BZD);
KTA:=CROSS(SZD,C);
DTAI:=VALUEWHEN(DTA||BA=0,BA);
KTAI:=VALUEWHEN(KTA||BA=0,BA);
DTB:=SUM(DK=DKD,2)=2&&CROSS(C,DKD)&&REF(H>DKD,1);
KTB:=O>DKD&&C<DKD&&CROSS(DKD,C)&&(O=H||C=L);
DTC:=CROSS(C,DKD)&&SUM(CROSS(DKD,C)&&O>DKD,BA-GWD+1);
KTC:=CROSS(DKD,C)&&SUM(REF(L<DKD&&ISDOWN,1),2)=2;
DTD:=O<DKD&&C>DKD&&DK=DKD;
KTD:=DTAI>KTAI&&CROSS(DK,C)&&SUM(L<DK&&C>DK,BA-GWD+1)>=1;
DTE:=CROSS(C,DKD)&&O<DKD&&C>DKP;
DTF:=KTAI>DTAI&&CROSS(C,DKD)&&CROSS(C,DKP)&&SUM(H>DKD&&C<DKD,BA-GWD+1)=0;
KTE:=CROSS(DKD,C)&&ISDOWN&&SUM(SUM(C>DKP&&L<DKD&&C>DKD,2)=2,BA-DWD+1)>=1&&SUM(CROSS(C,DKP),BA-DWD+1)=0;
DTG:=DTAI>KTAI&&L<DKP&&C>DKP&&SUM(H>DKD&&C<DKD,BA-GWD)=0;
DTH:=KTAI>DTAI&&CROSS(C,DKD)&&SUM(L<DKP&&C>DKP,BA-GWD+1)>=1;
KTF:=SUM(DTH,BA-DWD+1)&&H>DK&&C<DK;
DTJ:=CROSS(C,DK)&&CROSS(C,DKD)&&DKD>DK;
DTK:=KTAI>DTAI&&CROSS(C,DKD)&&REF(H>DKD,1)&&SUM(CROSS(DK,C),BA-GWD+1);
KTG:=C>DK&&CROSS(DKD,C)&&SUM(CROSS(C,DKD)&&CROSS(C,DK)&&DKD>DK&&REF(DK=DKD,1),BA-DWD+1)&&NOT(L<DKP&&C>DKP);
KTH:=CROSS(DKD,C)&&SUM(C>DKP&&CROSS(C,DKD)&&SUM(DK=DKD,2)=2,BA-DWD+1)&&SUM(L<DKD&&C>DKD,BA-DWD+1)>=1;
DTL:=C<DKP&&CROSS(C,DKD)&&SUM(SUM(H>DKD&&C<DKD,2)=2,BA-GWD+1)>=1&&SUM(SUM(KTAI>DTAI,2)=2&&CROSS(DKP,C),BA-GWD+1);
KTJ:=C>DK&&CROSS(DKD,C)&&SUM(CROSS(C,DK)&&DKD>DK&&REF(H>DK,1),BA-DWD+1)&&L>DK;
DTM:=KTAI>DTAI&&CROSS(C,DKD)&&SUM(CROSS(DFXP,C),BA-KTAI+1)<=1&&SUM(H>DKD&&C<DKD,BA-GWD+1)=0&&SUM(CROSS(DK,C),BA-GWD+1);
KTK:=C<DK&&C>DKD&&H>DKP&&C<DKP&&SUM(DTM,BA-DWD+1);
KTL:=KTAI>DTAI&&ISUP&&DK<DKP&&H>DK&&C<DK&&C>DKD&&SUM(KTAI>DTAI&&DK<DKP&&H>DK&&C<DK&&C>DKD,BA-DWD+1)>=2;
KTM:=CROSS(DK,C)&&DTAI=KTAI;
DTN:=C<DK&&CROSS(C,DKD)&&REF(H>DKD&&ISUP,1)=1&&SUM(SUM(C<DKD,2)=2&&CROSS(DKP,C),BA-GWD+1);
KTN:=DKD>DK&&H>DKD&&H>DK&&C<DKD&&C<DK;
KTO:=SUM(C>DKP&&H>DKD&&C<DKD&&DK<>DKD&&NOT(L<DKP&&C>DKP),2)=2;
DTO:=CROSS(C,REF(DKP,2))&&REF(CROSS(DK,C)&&CROSS(DKD,C)&&CROSS(DKP,C)&&DK>DKD,1)=1;
KTQ:=C>DK&&CROSS(DKD,C)&&SUM(CROSS(C,DKD)&&H>GFXP&&C<GFXP,BA-DWD+1)&&SUM(CROSS(C,GFXP),BA-DWD+1)=0;
KTR:=CROSS(DKP,C)&&SUM(C<DKD&&L<DKP&&C>DKP&&ISUP,BA-GWD+1)>=1;
DT1:=DTA||DTB||DTC||DTD||DTE||DTF||DTG||DTH||DTJ||DTK||DTL||DTM||DTN||DTO;
KT1:=KTA||KTB||KTC||KTD||KTE||KTF||KTG||KTH||KTJ||KTK||KTL||KTM||KTN||KTO||KTQ||KTR;
DTI:=VALUEWHEN(DT1||BA=0,BA);
KTI:=VALUEWHEN(KT1||BA=0,BA);
REF(DTI<=KTI,1)=1&&DTI>KTI,BPK;
REF(DTI>=KTI,1)=1&&DTI<KTI,SPK;
BA:=BARPOS;
VOL1:=IF(LLV(VOL,0)=0,1,INTPART(VOL*100));
HC:=LLV(IF(H-C=0,1000,H-C),0);
CL:=LLV(IF(C-L=0,1000,ABS(C-L)),0);
CO:=LLV(IF(C-O=0,1000,ABS(C-O)),0);
ZXBD:=MIN(HC,MIN(CL,CO));
DFX:=REF(L,2)=LLV(L,15)&&REF(L,1)>REF(L,2)&&L>REF(L,2)&&REF(L,2)<=REF(L,3);
GFX:=REF(H,2)=HHV(H,9)&&REF(H,1)<REF(H,2)&&H<REF(H,2)&&REF(H,2)>=REF(H,3);
DFXI:=VALUEWHEN(DFX,BA);
GFXI:=VALUEWHEN(GFX,BA);
DDP1:=VALUEWHEN(DFX,REF(L,2));
GDP1:=VALUEWHEN(GFX,REF(H,2));
DDP:=VALUEWHEN(DFX&&DDP1<>REF(DDP1,1),DDP1);
GDP:=VALUEWHEN(GFX&&GDP1<>REF(GDP1,1),GDP1);
DFX1I:=VALUEWHEN(DFX,REF(DFXI,1));
DFX1P:=VALUEWHEN(DFX,REF(DDP,BA-DFX1I+1));
GFX1I:=VALUEWHEN(GFX,REF(GFXI,1));
GFX1P:=VALUEWHEN(GFX,REF(GDP,BA-GFX1I+1));
DFXP:=VALUEWHEN(DFX&&DDP<>REF(DDP,1),MIN(DDP,MIN(DFX1P,REF(DDP,1))));
GFXP:=VALUEWHEN(GFX&&GDP<>REF(GDP,1),MAX(GDP,MAX(GFX1P,REF(GDP,1))));
SA:=SAR(4,0.02,0.2);
DZZ:=SA>0&&NOT(REF(SA,1)>0)||BA=0;
GZZ:=SA<0&&NOT(REF(SA,1)<0)||BA=0;
DZZI:=VALUEWHEN(DZZ,BA);
GZZI:=VALUEWHEN(GZZ,BA);
DZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)<0&&DFX&&REF(L,2)=LLV(L,BA-GZZI+1),BA-2)>=0),0,VALUEWHEN((REF(DZZ,2)=1&&DFX)||(REF(SA,2) <0&&DFX&&REF(L,2)=LLV (L,BA-GZZI+1)),BA-2));
GZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)>0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1),BA-2)>=0),0,VALUEWHEN((REF(GZZ,2)=1&&GFX)||(REF(SA,2) >0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1)),BA-2));
DD0I:=VALUEWHEN(DZZ||DZZ0I=0,DZZ0I);
GD0I:=VALUEWHEN(GZZ||GZZ0I=0,GZZ0I);
DZZ0P:=VALUEWHEN(DZZ&&DZZI-GZZI>3,LLV(L,BA-GZZ0I+1));
GZZ0P:=VALUEWHEN(GZZ&&GZZI-DZZI>3,HHV(H,BA-DZZ0I+1));
DD0P:=VALUEWHEN(DZZ,DZZ0P);
GD0P:=VALUEWHEN(GZZ,GZZ0P);
DD0RP:=VALUEWHEN(DZZ,REF(DD0P,1));
GD0RP:=VALUEWHEN(GZZ,REF(GD0P,1));
DZP:=VALUEWHEN(DZZ,MIN(DD0P,DD0RP));
GZP:=VALUEWHEN(GZZ,MAX(GD0P,GD0RP));
QSI:=IF(DZZ0I=0,0,VALUEWHEN(DZZ,REF(DZZ0I,BA-GZZI+1)));
GQSI:=IF(GZZ0I=0,0,VALUEWHEN(GZZ,REF(GZZ0I,BA-DZZI+1)));
SZR:=IF(SA>0,1,0);
XDR:=IF(SA<0,1,0);
XDTS2:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,SUM(XDR,DZZI-GZZI+1));
SZTS2:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,SUM(SZR,GZZI-DZZI+1));
XDTS2I:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,BA);
SZTS2I:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,BA);
XDTS1:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,DZZI-REF(GZZI,BA-REF(DZZI,2)));
XDTS1I:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,BA);
XDTS:=IF(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,XDTS1,XDTS2);
SZTS1:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,GZZI-REF(DZZI,BA-REF(GZZI,2)));
SZTS1I:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,BA);
SZTS:=IF(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,SZTS1,SZTS2);
DINI:=IF(BA=DZZ0I||BA-DZZ0I=1,SUM(L*VOL1,BA-QSI+1)/SUM(VOL1,BA-QSI+1),SUM(L*VOL1,BA-DZZ0I+1)/SUM(VOL1,BA-DZZ0I+1));
GINI:=IF(BA=GZZ0I||BA-GZZ0I=1,SUM(H*VOL1,BA-GQSI+1)/SUM(VOL1,BA-GQSI+1),SUM(H*VOL1,BA-GZZ0I+1)/SUM(VOL1,BA-GZZ0I+1));
DDT0:=DFX&&(REF(C,2)<REF(DINI,2)||REF(C,3)<REF(DINI,3));
DDT0I:=VALUEWHEN(DDT0,DZZ0I);
DDT01I:=VALUEWHEN(DDT0,REF(DDT0I,1));
DINI0:=IF(BA=DDT0I||BA-DDT0I=1,SUM(L*VOL1,BA-DDT01I+1)/SUM(VOL1,BA-DDT01I+1),SUM(L*VOL1,BA-DDT0I+1)/SUM(VOL1,BA- DDT0I+1));
DDT00:=(DZZ&&SZTS<=XDTS&&DZZI-GZZI>3);
DDT00I:=IF(NOT(DDT00),0,VALUEWHEN(DDT00,DD0I));
DZ00I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DINI0,3)||REF(C,2)<REF(DINI0,2)),DZZ0I);
DZ0I:=MAX(DDT00I,DZ00I);
DZ0:=IF(BA=DZ0I||BA-DZ0I=1,(SUM(L*VOL1,BA-REF(DZ0I,1)+1))/(SUM(VOL1,BA-REF(DZ0I,1)+1)),(SUM(L*VOL1,BA-DZ0I+1))/(SUM (VOL1,BA-DZ0I+1)));
DZ1I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ0,3)||REF(C,2)<REF(DZ0,2)),DZZ0I);
DZ1:=IF(BA=DZ1I||BA-DZ1I=1,(SUM(L*VOL1,BA-REF(DZ1I,1)+1))/(SUM(VOL1,BA-REF(DZ1I,1)+1)),(SUM(L*VOL1,BA-DZ1I+1))/(SUM (VOL1,BA-DZ1I+1)));
DZ2I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ1,3)||REF(C,2)<REF(DZ1,2)),DZZ0I);
DZ2:=IF(BA=DZ2I||BA-DZ2I=1,(SUM(L*VOL1,BA-REF(DZ2I,1)+1))/(SUM(VOL1,BA-REF(DZ2I,1)+1)),(SUM(L*VOL1,BA-DZ2I+1))/(SUM (VOL1,BA-DZ2I+1)));
DZ3I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ2,3)||REF(C,2)<REF(DZ2,2)),DZZ0I);
DZ3:=IF(BA=DZ3I||BA-DZ3I=1,(SUM(L*VOL1,BA-REF(DZ3I,1)+1))/(SUM(VOL1,BA-REF(DZ3I,1)+1)),(SUM(L*VOL1,BA-DZ3I+1))/(SUM (VOL1,BA-DZ3I+1)));
GDT0:=GFX&&(REF(C,2)>REF(GINI,2)||REF(C,3)>REF(GINI,3));
GDT0I:=VALUEWHEN(GDT0,GZZ0I);
GDT01I:=VALUEWHEN(GDT0,REF(GDT0I,1));
GINI0:=IF(BA=GDT0I||BA-GDT0I=1,SUM(H*VOL1,BA-GDT01I+1)/SUM(VOL1,BA-GDT01I+1),SUM(H*VOL1,BA-GDT0I+1)/SUM(VOL1,BA- GDT0I+1));
GDT00:=(GZZ&&SZTS>=XDTS&&GZZI-DZZI>3);
GDT00I:=IF(NOT(GDT00),0,VALUEWHEN(GDT00,GD0I));
GZ00I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GINI0,3)||REF(C,2)>REF(GINI0,2)),GZZ0I);
GZ0I:=MAX(GDT00I,GZ00I);
GZ0:=IF(BA=GZ0I||BA-GZ0I=1,(SUM(H*VOL1,BA-REF(GZ0I,1)+1))/(SUM(VOL1,BA-REF(GZ0I,1)+1)),(SUM(H*VOL1,BA-GZ0I+1))/(SUM (VOL1,BA-GZ0I+1)));
GZ1I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ0,3)||REF(C,2)>REF(GZ0,2)),GZZ0I);
GZ1:=IF(BA=GZ1I||BA-GZ1I=1,(SUM(H*VOL1,BA-REF(GZ1I,1)+1))/(SUM(VOL1,BA-REF(GZ1I,1)+1)),(SUM(H*VOL1,BA-GZ1I+1))/(SUM (VOL1,BA-GZ1I+1)));
GZ2I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ1,3)||REF(C,2)>REF(GZ1,2)),GZZ0I);
GZ2:=IF(BA=GZ2I||BA-GZ2I=1,(SUM(H*VOL1,BA-REF(GZ2I,1)+1))/(SUM(VOL1,BA-REF(GZ2I,1)+1)),(SUM(H*VOL1,BA-GZ2I+1))/(SUM (VOL1,BA-GZ2I+1)));
GZ3I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ2,3)||REF(C,2)>REF(GZ2,2)),GZZ0I);
GZ3:=IF(BA=GZ3I||BA-GZ3I=1,(SUM(H*VOL1,BA-REF(GZ3I,1)+1))/(SUM(VOL1,BA-REF(GZ3I,1)+1)),(SUM(H*VOL1,BA-GZ3I+1))/(SUM (VOL1,BA-GZ3I+1)));
DD:=FLOOR((DZ3+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD:=FLOOR((GZ3+ZXBD)/ZXBD)*ZXBD;
GDW:=VALUEWHEN(CROSS(C,GD),BA);
DDW:=VALUEWHEN(CROSS(DD,C),BA);
DK:=IF(DDW>GDW,GD,DD);
DD1:=FLOOR((DINI+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD1:=FLOOR((GINI+ZXBD)/ZXBD)*ZXBD;
GDW11:=VALUEWHEN(CROSS(C,GD1),BA);
DDW11:=VALUEWHEN(CROSS(DD1,C),BA);
DKD:=IF(DDW11>GDW11,GD1,DD1);
DWD:=VALUEWHEN(CROSS(C,DKD),BA);
GWD:=VALUEWHEN(CROSS(DKD,C),BA);
GDW1:=VALUEWHEN(CROSS(C,GFXP)||BA=0,BA);
DDW1:=VALUEWHEN(CROSS(DFXP,C)||BA=0,BA);
DKP:=IF(DDW1>GDW1,GFXP,DFXP);
BZD:=MAX(DK,MAX(DKD,GFXP));
SZD:=MIN(DK,MIN(DKD,DFXP));
DTA:=CROSS(C,BZD);
KTA:=CROSS(SZD,C);
DTAI:=VALUEWHEN(DTA||BA=0,BA);
KTAI:=VALUEWHEN(KTA||BA=0,BA);
DTB:=C<DK&&C<DKD&&REF(CROSS(DKP,C),1)=1&&C>REF(DKP,2)&&DFX;
KTB:=C>DK&&C>DKD&&REF(CROSS(C,DKP),1)=1&&C<REF(DKP,2)&&GFX;
DTC:=C<DK&&C<DKD&&SUM(L<DKP&&C>DKP,2)=2;
KTC:=C>DK&&C>DKD&&SUM(H>DKP&&C<DKP,2)=2;
DTD:=C>DKD&&SUM(C>DK,2)>=2&&SUM(DKD=DK,BA-DWD+1)=BA-DWD&&DKD>DK&&REF(DKD=DK,1)=1;
KTD:=C<DKD&&SUM(C<DK,2)>=2&&SUM(DKD=DK,BA-GWD+1)=BA-GWD&&DKD<DK&&REF(DKD=DK,1)=1;
DTE:=CROSS(C,DK)&&SUM(DK=DKD,BA-REF(DWD,1)+1)=BA-REF(DWD,1)+1;
KTE:=CROSS(DK,C)&&SUM(DK=DKD,BA-REF(GWD,1)+1)=BA-REF(GWD,1)+1;
DTF:=CROSS(C,DK)&&SUM(CROSS(C,GFXP),BA-1)=0;
KTF:=CROSS(DK,C)&&SUM(CROSS(DFXP,C),BA-1)=0;
KTG:=C>DK&&CROSS(DKD,C)&&SUM(C>DK&&C>DKP&&L<DKD&&C>DKD&&O=L,BA-DWD+1)>=1;
DTG0:=C>DK&&CROSS(C,DKD)&&SUM(KTG,BA-GWD+1)>=1;
KTH:=REF(SUM(DK=DKD,2)=2&&CROSS(DK,C)&&ISUP,1)=1&&C<REF(C,1);
DTJ:=C>DKP&&C<DK&&CROSS(C,DKD)&&SUM(C<DK&&L<DKP&&C>DKP&&ISUP,BA-GWD+1)>=1;
KTJ0:=C<DK&&CROSS(DKD,C)&&SUM(DTJ,BA-DWD+1)>=1;
DTK:=C<DK&&CROSS(C,DKD)&&SUM(CROSS(DKP,C),BA-GWD+1)>=1&&ISUP&&L>REF(H,1)&&SUM(L<DK&&C>DK,BA-GWD+1)>=1;
KTK0:=C<DK&&CROSS(DKD,C)&&SUM(DTK,BA-DWD+1)>=1;
KTL:=CROSS(DKD,C)&&SUM(CROSS(C,DKP)&&C>DKD&&DKD>DK,BA-DWD+1);
KTM:=CROSS(DKD,C)&&SUM(SUM(L<DKD&&C>DKD,2)=2,BA-DWD+1)>=1&&SUM(CROSS(C,DKP)||CROSS(C,DK),BA-DWD+1)=0;
DTL:=CROSS(C,DKD)&&O-L<0.5&&SUM(CROSS(DK,C)&&DK<>DKD,BA-GWD+1);
DT1:=DTA||DTC||DTB||DTD||DTE||DTF||DTG0||DTJ||DTK||DTL;
KT1:=KTA||KTC||KTB||KTD||KTE||KTF||KTG||KTH||KTJ0||KTK0||KTL||KTM;
DTI:=VALUEWHEN(DT1||BA=0,BA);
KTI:=VALUEWHEN(KT1||BA=0,BA);
REF(DTI<=KTI,1)=1&&DTI>KTI,BPK;
REF(DTI>=KTI,1)=1&&DTI<KTI,SPK;
BA:=BARPOS;
VOL1:=IF(LLV(VOL,0)=0,1,INTPART(VOL*100));
HC:=LLV(IF(H-C=0,1000,H-C),0);
CL:=LLV(IF(C-L=0,1000,ABS(C-L)),0);
CO:=LLV(IF(C-O=0,1000,ABS(C-O)),0);
ZXBD:=MIN(HC,MIN(CL,CO));
DFX:=REF(L,2)=LLV(L,18)&&REF(L,1)>REF(L,2)&&L>REF(L,2)&&REF(L,2)<=REF(L,3);
GFX:=REF(H,2)=HHV(H,9)&&REF(H,1)<REF(H,2)&&H<REF(H,2)&&REF(H,2)>=REF(H,3);
DFXI:=VALUEWHEN(DFX,BA);
GFXI:=VALUEWHEN(GFX,BA);
DDP1:=VALUEWHEN(DFX,REF(L,2));
GDP1:=VALUEWHEN(GFX,REF(H,2));
DDP:=VALUEWHEN(DFX&&DDP1<>REF(DDP1,1),DDP1);
GDP:=VALUEWHEN(GFX&&GDP1<>REF(GDP1,1),GDP1);
DFX1I:=VALUEWHEN(DFX,REF(DFXI,1));
DFX1P:=VALUEWHEN(DFX,REF(DDP,BA-DFX1I+1));
GFX1I:=VALUEWHEN(GFX,REF(GFXI,1));
GFX1P:=VALUEWHEN(GFX,REF(GDP,BA-GFX1I+1));
DFXP:=VALUEWHEN(DFX&&DDP<>REF(DDP,1),MIN(DDP,MIN(DFX1P,REF(DDP,1))));
GFXP:=VALUEWHEN(GFX&&GDP<>REF(GDP,1),MAX(GDP,MAX(GFX1P,REF(GDP,1))));
SA:=SAR(4,0.02,0.2);
DZZ:=SA>0&&NOT(REF(SA,1)>0)||BA=0;
GZZ:=SA<0&&NOT(REF(SA,1)<0)||BA=0;
DZZI:=VALUEWHEN(DZZ,BA);
GZZI:=VALUEWHEN(GZZ,BA);
DZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)<0&&DFX&&REF(L,2)=LLV(L,BA-GZZI+1),BA-2)>=0),0,VALUEWHEN((REF(DZZ,2)=1&&DFX)||(REF(SA,2) <0&&DFX&&REF(L,2)=LLV (L,BA-GZZI+1)),BA-2));
GZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)>0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1),BA-2)>=0),0,VALUEWHEN((REF(GZZ,2)=1&&GFX)||(REF(SA,2) >0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1)),BA-2));
DD0I:=VALUEWHEN(DZZ||DZZ0I=0,DZZ0I);
GD0I:=VALUEWHEN(GZZ||GZZ0I=0,GZZ0I);
DZZ0P:=VALUEWHEN(DZZ&&DZZI-GZZI>3,LLV(L,BA-GZZ0I+1));
GZZ0P:=VALUEWHEN(GZZ&&GZZI-DZZI>3,HHV(H,BA-DZZ0I+1));
DD0P:=VALUEWHEN(DZZ,DZZ0P);
GD0P:=VALUEWHEN(GZZ,GZZ0P);
DD0RP:=VALUEWHEN(DZZ,REF(DD0P,1));
GD0RP:=VALUEWHEN(GZZ,REF(GD0P,1));
DZP:=VALUEWHEN(DZZ,MIN(DD0P,DD0RP));
GZP:=VALUEWHEN(GZZ,MAX(GD0P,GD0RP));
QSI:=IF(DZZ0I=0,0,VALUEWHEN(DZZ,REF(DZZ0I,BA-GZZI+1)));
GQSI:=IF(GZZ0I=0,0,VALUEWHEN(GZZ,REF(GZZ0I,BA-DZZI+1)));
SZR:=IF(SA>0,1,0);
XDR:=IF(SA<0,1,0);
XDTS2:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,SUM(XDR,DZZI-GZZI+1));
SZTS2:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,SUM(SZR,GZZI-DZZI+1));
XDTS2I:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,BA);
SZTS2I:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,BA);
XDTS1:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,DZZI-REF(GZZI,BA-REF(DZZI,2)));
XDTS1I:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,BA);
XDTS:=IF(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,XDTS1,XDTS2);
SZTS1:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,GZZI-REF(DZZI,BA-REF(GZZI,2)));
SZTS1I:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,BA);
SZTS:=IF(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,SZTS1,SZTS2);
DINI:=IF(BA=DZZ0I||BA-DZZ0I=1,SUM(L*VOL1,BA-QSI+1)/SUM(VOL1,BA-QSI+1),SUM(L*VOL1,BA-DZZ0I+1)/SUM(VOL1,BA-DZZ0I+1));
GINI:=IF(BA=GZZ0I||BA-GZZ0I=1,SUM(H*VOL1,BA-GQSI+1)/SUM(VOL1,BA-GQSI+1),SUM(H*VOL1,BA-GZZ0I+1)/SUM(VOL1,BA-GZZ0I+1));
DDT0:=DFX&&(REF(C,2)<REF(DINI,2)||REF(C,3)<REF(DINI,3));
DDT0I:=VALUEWHEN(DDT0,DZZ0I);
DDT01I:=VALUEWHEN(DDT0,REF(DDT0I,1));
DINI0:=IF(BA=DDT0I||BA-DDT0I=1,SUM(L*VOL1,BA-DDT01I+1)/SUM(VOL1,BA-DDT01I+1),SUM(L*VOL1,BA-DDT0I+1)/SUM(VOL1,BA- DDT0I+1));
DDT00:=(DZZ&&SZTS<=XDTS&&DZZI-GZZI>3);
DDT00I:=IF(NOT(DDT00),0,VALUEWHEN(DDT00,DD0I));
DZ00I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DINI0,3)||REF(C,2)<REF(DINI0,2)),DZZ0I);
DZ0I:=MAX(DDT00I,DZ00I);
DZ0:=IF(BA=DZ0I||BA-DZ0I=1,(SUM(L*VOL1,BA-REF(DZ0I,1)+1))/(SUM(VOL1,BA-REF(DZ0I,1)+1)),(SUM(L*VOL1,BA-DZ0I+1))/(SUM (VOL1,BA-DZ0I+1)));
DZ1I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ0,3)||REF(C,2)<REF(DZ0,2)),DZZ0I);
DZ1:=IF(BA=DZ1I||BA-DZ1I=1,(SUM(L*VOL1,BA-REF(DZ1I,1)+1))/(SUM(VOL1,BA-REF(DZ1I,1)+1)),(SUM(L*VOL1,BA-DZ1I+1))/(SUM (VOL1,BA-DZ1I+1)));
DZ2I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ1,3)||REF(C,2)<REF(DZ1,2)),DZZ0I);
DZ2:=IF(BA=DZ2I||BA-DZ2I=1,(SUM(L*VOL1,BA-REF(DZ2I,1)+1))/(SUM(VOL1,BA-REF(DZ2I,1)+1)),(SUM(L*VOL1,BA-DZ2I+1))/(SUM (VOL1,BA-DZ2I+1)));
DZ3I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ2,3)||REF(C,2)<REF(DZ2,2)),DZZ0I);
DZ3:=IF(BA=DZ3I||BA-DZ3I=1,(SUM(L*VOL1,BA-REF(DZ3I,1)+1))/(SUM(VOL1,BA-REF(DZ3I,1)+1)),(SUM(L*VOL1,BA-DZ3I+1))/(SUM (VOL1,BA-DZ3I+1)));
GDT0:=GFX&&(REF(C,2)>REF(GINI,2)||REF(C,3)>REF(GINI,3));
GDT0I:=VALUEWHEN(GDT0,GZZ0I);
GDT01I:=VALUEWHEN(GDT0,REF(GDT0I,1));
GINI0:=IF(BA=GDT0I||BA-GDT0I=1,SUM(H*VOL1,BA-GDT01I+1)/SUM(VOL1,BA-GDT01I+1),SUM(H*VOL1,BA-GDT0I+1)/SUM(VOL1,BA- GDT0I+1));
GDT00:=(GZZ&&SZTS>=XDTS&&GZZI-DZZI>3);
GDT00I:=IF(NOT(GDT00),0,VALUEWHEN(GDT00,GD0I));
GZ00I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GINI0,3)||REF(C,2)>REF(GINI0,2)),GZZ0I);
GZ0I:=MAX(GDT00I,GZ00I);
GZ0:=IF(BA=GZ0I||BA-GZ0I=1,(SUM(H*VOL1,BA-REF(GZ0I,1)+1))/(SUM(VOL1,BA-REF(GZ0I,1)+1)),(SUM(H*VOL1,BA-GZ0I+1))/(SUM (VOL1,BA-GZ0I+1)));
GZ1I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ0,3)||REF(C,2)>REF(GZ0,2)),GZZ0I);
GZ1:=IF(BA=GZ1I||BA-GZ1I=1,(SUM(H*VOL1,BA-REF(GZ1I,1)+1))/(SUM(VOL1,BA-REF(GZ1I,1)+1)),(SUM(H*VOL1,BA-GZ1I+1))/(SUM (VOL1,BA-GZ1I+1)));
GZ2I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ1,3)||REF(C,2)>REF(GZ1,2)),GZZ0I);
GZ2:=IF(BA=GZ2I||BA-GZ2I=1,(SUM(H*VOL1,BA-REF(GZ2I,1)+1))/(SUM(VOL1,BA-REF(GZ2I,1)+1)),(SUM(H*VOL1,BA-GZ2I+1))/(SUM (VOL1,BA-GZ2I+1)));
GZ3I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ2,3)||REF(C,2)>REF(GZ2,2)),GZZ0I);
GZ3:=IF(BA=GZ3I||BA-GZ3I=1,(SUM(H*VOL1,BA-REF(GZ3I,1)+1))/(SUM(VOL1,BA-REF(GZ3I,1)+1)),(SUM(H*VOL1,BA-GZ3I+1))/(SUM (VOL1,BA-GZ3I+1)));
DD:=FLOOR((DZ3+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD:=FLOOR((GZ3+ZXBD)/ZXBD)*ZXBD;
GDW:=VALUEWHEN(CROSS(C,GD),BA);
DDW:=VALUEWHEN(CROSS(DD,C),BA);
DK:=IF(DDW>GDW,GD,DD);
DD1:=FLOOR((DINI+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD1:=FLOOR((GINI+ZXBD)/ZXBD)*ZXBD;
GDW11:=VALUEWHEN(CROSS(C,GD1),BA);
DDW11:=VALUEWHEN(CROSS(DD1,C),BA);
DKD:=IF(DDW11>GDW11,GD1,DD1);
DWD:=VALUEWHEN(CROSS(C,DKD),BA);
GWD:=VALUEWHEN(CROSS(DKD,C),BA);
GDW1:=VALUEWHEN(CROSS(C,GFXP)||BA=0,BA);
DDW1:=VALUEWHEN(CROSS(DFXP,C)||BA=0,BA);
DKP:=IF(DDW1>GDW1,GFXP,DFXP);
BZD:=MAX(DK,MAX(DKD,GFXP));
SZD:=MIN(DK,MIN(DKD,DFXP));
DTA:=CROSS(C,BZD);
KTA:=CROSS(SZD,C);
DTA1:=SUM(L<DK&&C>DK,2)=2;
KTA1:=SUM(H>DK&&C<DK,2)=2;
DTA2:=REF(DKD=DK,1)=1&&C>DKD&&DKD>DK;
KTA2:=REF(DKD=DK,1)=1&&C<DKD&&DKD<DK;
DTA3:=REF(DKD<DK,1)=1&&C>DKD&&DKD>DK&&CROSS(C,DKD);
KTA3:=REF(DKD>DK,1)=1&&C<DKD&&DKD<DK&&CROSS(DKD,C);
DTA4:=SUM(C>DK&&C>DKP,2)=2&&L<DKP&&L<DK;
KTA4:=SUM(C<DK&&C<DKP,2)=2&&H>DKP&&H>DK;
DTB:=C<DK&&CROSS(C,DKD)&&REF(H>DKD&&C<DKD,1)=1&&H<DK;
KTB:=C>DK&&C>DKP&&CROSS(DKD,C)&&REF(L<DKD&&C>DKD&&ISDOWN&&C<REF(C,1)&&L<REF(L,1),1)=1;
DTB0:=C>DK&&CROSS(C,DKD)&&SUM(KTB,BA-GWD+1)>=1;
KTB0:=C<DK&&CROSS(DFXP,C)&&SUM(DTB,BA-DWD+1)>=1;
KTC:=C>DK&&CROSS(DKP,C)&&C<DKD&&SUM(C<DKD&&L<DKP&&C>DKP,BA-GWD+1)>=1;
DTC0:=C>DK&&(CROSS(C,DKD)||L<DK)&&SUM(KTC,BA-GWD+1)>=1;
DTH1:=C<DK&&C<DKD&&SUM(DFXP=REF(DFXP,1),2)=2&&CROSS(C,DFXP)&&NOT(H>DKD&&C<DKD);
DTJ:=C<DK&&CROSS(C,DKD)&&SUM(SUM(DFXP=REF(DFXP,1),2)=2&&SUM(C>DFXP&&L<DFXP,2)=2,BA-GWD+1)>=1;
KTJ0:=C<DK&&CROSS(DKD,C)&&SUM(DTJ,BA-DWD+1)>=1;
DTH:=DTH1&&SUM(DTH1,BA-GWD+1)=1;
KTK:=SUM(CROSS(C,GFXP),BA-1)+SUM(CROSS(DFXP,C),BA-1)=0&&CROSS(DK,C);
KTD:=DK=DKD&&CROSS(DK,C)&&SUM(C<DKP,2)=2&&SUM(DK=DKD,BA-DWD+1)=BA-DWD+1;
KTE:=C<REF(DKP,2)&&REF(DK=DKD&&CROSS(C,DKP),1)=1;
DTE0:=C>DK&&CROSS(C,GFXP)&&SUM(KTE,BA-DWD+1)>=1;
KTF:=C<DK&&CROSS(DKD,C)&&SUM(DKD>DK&&C<DKD&&L<DK&&C>DK,BA-REF(GWD,1)+1)>=1;
KTG:=SUM(H>GFXP&&C<GFXP,2)=2&&CEILING(O)>GFXP&&ISDOWN&&C>DK&&H<REF(H,1);
KTH:=DK=DKD&&SUM(DK=DKD,BA-DWD)=BA-DWD&&CROSS(DKD,C)&&SUM(H>DK&&C<DK&&DK=DKD&&ISDOWN,BA-REF(GWD,1)+1)>=1;
KTJ:=SUM(L<DK&&C>DK,3)=2&&CROSS(DK,C);
KTL:=SUM(H>DK&&C<DK,3)=3;
DTM:=C<DK&&CROSS(C,DKD)&&SUM(DK=DKD&&CROSS(DKP,C)&&SUM(C<DK,2)=2,BA-GWD)>=1;
KTN:=REF(DKD,1)>REF(DK,1)&&DK=DKD&&CROSS(DK,C)&&CROSS(DKD,C)&&SUM(CROSS(C,DK),BA-DWD+1)=1&&SUM(L<DKD&&C>DKD,BA-DWD+1)>=1;
KTO:=NOT(L<DK&&C>DK)&&CROSS(DKD,C)&&H<REF(L,1)&&REF(L,BA-DWD)>REF(H,BA-DWD+1)&&REF(DKD,BA-DWD)>REF(DK,BA-DWD)&&REF(C,BA-DWD)>REF(DK,BA-DWD)&&REF(C,BA-DWD)<REF(DKP,BA-DWD);
DT:=DTA||DTB||DTE0||DTJ||DTH||DTM;
KT:=KTA||KTB0||KTE||KTJ0||KTK||KTG||KTF||KTH||KTJ||KTL||KTN||KTO;
DTI:=VALUEWHEN(DT||BA=0,BA);
KTI:=VALUEWHEN(KT||BA=0,BA);
REF(DTI<=KTI,1)&&DTI>KTI,BPK;
REF(DTI>=KTI,1)&&DTI<KTI,SPK;
BA:=BARPOS;
VOL1:=IF(LLV(VOL,0)=0,1,INTPART(VOL*100));
HC:=LLV(IF(H-C=0,1000,H-C),0);
CL:=LLV(IF(C-L=0,1000,ABS(C-L)),0);
CO:=LLV(IF(C-O=0,1000,ABS(C-O)),0);
ZXBD:=MIN(HC,MIN(CL,CO));
DFX:=REF(L,2)=LLV(L,13)&&REF(L,1)>REF(L,2)&&L>REF(L,2)&&REF(L,2)<=REF(L,3);
GFX:=REF(H,2)=HHV(H,14)&&REF(H,1)<REF(H,2)&&H<REF(H,2)&&REF(H,2)>=REF(H,3);
DFXI:=VALUEWHEN(DFX,BA);
GFXI:=VALUEWHEN(GFX,BA);
DDP1:=VALUEWHEN(DFX,REF(L,2));
GDP1:=VALUEWHEN(GFX,REF(H,2));
DDP:=VALUEWHEN(DFX&&DDP1<>REF(DDP1,1),DDP1);
GDP:=VALUEWHEN(GFX&&GDP1<>REF(GDP1,1),GDP1);
DFX1I:=VALUEWHEN(DFX,REF(DFXI,1));
DFX1P:=VALUEWHEN(DFX,REF(DDP,BA-DFX1I+1));
GFX1I:=VALUEWHEN(GFX,REF(GFXI,1));
GFX1P:=VALUEWHEN(GFX,REF(GDP,BA-GFX1I+1));
DFXP:=VALUEWHEN(DFX&&DDP<>REF(DDP,1),MIN(DDP,MIN(DFX1P,REF(DDP,1))));
GFXP:=VALUEWHEN(GFX&&GDP<>REF(GDP,1),MAX(GDP,MAX(GFX1P,REF(GDP,1))));
SA:=SAR(4,0.02,0.2);
DZZ:=SA>0&&NOT(REF(SA,1)>0)||BA=0;
GZZ:=SA<0&&NOT(REF(SA,1)<0)||BA=0;
DZZI:=VALUEWHEN(DZZ,BA);
GZZI:=VALUEWHEN(GZZ,BA);
DZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)<0&&DFX&&REF(L,2)=LLV(L,BA-GZZI+1),BA-2)>=0),0,VALUEWHEN((REF(DZZ,2)=1&&DFX)||(REF(SA,2) <0&&DFX&&REF(L,2)=LLV (L,BA-GZZI+1)),BA-2));
GZZ0I:=IF(NOT(VALUEWHEN(REF(SA,2)>0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1),BA-2)>=0),0,VALUEWHEN((REF(GZZ,2)=1&&GFX)||(REF(SA,2) >0&&GFX&&REF(H,2)=HHV(H,BA-DZZI+1)),BA-2));
DD0I:=VALUEWHEN(DZZ||DZZ0I=0,DZZ0I);
GD0I:=VALUEWHEN(GZZ||GZZ0I=0,GZZ0I);
DZZ0P:=VALUEWHEN(DZZ&&DZZI-GZZI>3,LLV(L,BA-GZZ0I+1));
GZZ0P:=VALUEWHEN(GZZ&&GZZI-DZZI>3,HHV(H,BA-DZZ0I+1));
DD0P:=VALUEWHEN(DZZ,DZZ0P);
GD0P:=VALUEWHEN(GZZ,GZZ0P);
DD0RP:=VALUEWHEN(DZZ,REF(DD0P,1));
GD0RP:=VALUEWHEN(GZZ,REF(GD0P,1));
DZP:=VALUEWHEN(DZZ,MIN(DD0P,DD0RP));
GZP:=VALUEWHEN(GZZ,MAX(GD0P,GD0RP));
QSI:=IF(DZZ0I=0,0,VALUEWHEN(DZZ,REF(DZZ0I,BA-GZZI+1)));
GQSI:=IF(GZZ0I=0,0,VALUEWHEN(GZZ,REF(GZZ0I,BA-DZZI+1)));
SZR:=IF(SA>0,1,0);
XDR:=IF(SA<0,1,0);
XDTS2:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,SUM(XDR,DZZI-GZZI+1));
SZTS2:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,SUM(SZR,GZZI-DZZI+1));
XDTS2I:=VALUEWHEN(DZZ&&SUM(XDR,DZZI-GZZI+1)>3,BA);
SZTS2I:=VALUEWHEN(GZZ&&SUM(SZR,GZZI-DZZI+1)>3,BA);
XDTS1:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,DZZI-REF(GZZI,BA-REF(DZZI,2)));
XDTS1I:=VALUEWHEN(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,BA);
XDTS:=IF(DZZ&&SUM(SZR,DZZI-REF(GZZI,BA-REF(DZZI,2))+1)<4,XDTS1,XDTS2);
SZTS1:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,GZZI-REF(DZZI,BA-REF(GZZI,2)));
SZTS1I:=VALUEWHEN(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,BA);
SZTS:=IF(GZZ&&SUM(XDR,GZZI-REF(DZZI,BA-REF(GZZI,2))+1)<4,SZTS1,SZTS2);
DINI:=IF(BA=DZZ0I||BA-DZZ0I=1,SUM(L*VOL1,BA-QSI+1)/SUM(VOL1,BA-QSI+1),SUM(L*VOL1,BA-DZZ0I+1)/SUM(VOL1,BA-DZZ0I+1));
GINI:=IF(BA=GZZ0I||BA-GZZ0I=1,SUM(H*VOL1,BA-GQSI+1)/SUM(VOL1,BA-GQSI+1),SUM(H*VOL1,BA-GZZ0I+1)/SUM(VOL1,BA-GZZ0I+1));
DDT0:=DFX&&(REF(C,2)<REF(DINI,2)||REF(C,3)<REF(DINI,3));
DDT0I:=VALUEWHEN(DDT0,DZZ0I);
DDT01I:=VALUEWHEN(DDT0,REF(DDT0I,1));
DINI0:=IF(BA=DDT0I||BA-DDT0I=1,SUM(L*VOL1,BA-DDT01I+1)/SUM(VOL1,BA-DDT01I+1),SUM(L*VOL1,BA-DDT0I+1)/SUM(VOL1,BA- DDT0I+1));
DDT00:=(DZZ&&SZTS<=XDTS&&DZZI-GZZI>3);
DDT00I:=IF(NOT(DDT00),0,VALUEWHEN(DDT00,DD0I));
DZ00I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DINI0,3)||REF(C,2)<REF(DINI0,2)),DZZ0I);
DZ0I:=MAX(DDT00I,DZ00I);
DZ0:=IF(BA=DZ0I||BA-DZ0I=1,(SUM(L*VOL1,BA-REF(DZ0I,1)+1))/(SUM(VOL1,BA-REF(DZ0I,1)+1)),(SUM(L*VOL1,BA-DZ0I+1))/(SUM (VOL1,BA-DZ0I+1)));
DZ1I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ0,3)||REF(C,2)<REF(DZ0,2)),DZZ0I);
DZ1:=IF(BA=DZ1I||BA-DZ1I=1,(SUM(L*VOL1,BA-REF(DZ1I,1)+1))/(SUM(VOL1,BA-REF(DZ1I,1)+1)),(SUM(L*VOL1,BA-DZ1I+1))/(SUM (VOL1,BA-DZ1I+1)));
DZ2I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ1,3)||REF(C,2)<REF(DZ1,2)),DZZ0I);
DZ2:=IF(BA=DZ2I||BA-DZ2I=1,(SUM(L*VOL1,BA-REF(DZ2I,1)+1))/(SUM(VOL1,BA-REF(DZ2I,1)+1)),(SUM(L*VOL1,BA-DZ2I+1))/(SUM (VOL1,BA-DZ2I+1)));
DZ3I:=VALUEWHEN(DFX&&(REF(C,3)<REF(DZ2,3)||REF(C,2)<REF(DZ2,2)),DZZ0I);
DZ3:=IF(BA=DZ3I||BA-DZ3I=1,(SUM(L*VOL1,BA-REF(DZ3I,1)+1))/(SUM(VOL1,BA-REF(DZ3I,1)+1)),(SUM(L*VOL1,BA-DZ3I+1))/(SUM (VOL1,BA-DZ3I+1)));
GDT0:=GFX&&(REF(C,2)>REF(GINI,2)||REF(C,3)>REF(GINI,3));
GDT0I:=VALUEWHEN(GDT0,GZZ0I);
GDT01I:=VALUEWHEN(GDT0,REF(GDT0I,1));
GINI0:=IF(BA=GDT0I||BA-GDT0I=1,SUM(H*VOL1,BA-GDT01I+1)/SUM(VOL1,BA-GDT01I+1),SUM(H*VOL1,BA-GDT0I+1)/SUM(VOL1,BA- GDT0I+1));
GDT00:=(GZZ&&SZTS>=XDTS&&GZZI-DZZI>3);
GDT00I:=IF(NOT(GDT00),0,VALUEWHEN(GDT00,GD0I));
GZ00I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GINI0,3)||REF(C,2)>REF(GINI0,2)),GZZ0I);
GZ0I:=MAX(GDT00I,GZ00I);
GZ0:=IF(BA=GZ0I||BA-GZ0I=1,(SUM(H*VOL1,BA-REF(GZ0I,1)+1))/(SUM(VOL1,BA-REF(GZ0I,1)+1)),(SUM(H*VOL1,BA-GZ0I+1))/(SUM (VOL1,BA-GZ0I+1)));
GZ1I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ0,3)||REF(C,2)>REF(GZ0,2)),GZZ0I);
GZ1:=IF(BA=GZ1I||BA-GZ1I=1,(SUM(H*VOL1,BA-REF(GZ1I,1)+1))/(SUM(VOL1,BA-REF(GZ1I,1)+1)),(SUM(H*VOL1,BA-GZ1I+1))/(SUM (VOL1,BA-GZ1I+1)));
GZ2I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ1,3)||REF(C,2)>REF(GZ1,2)),GZZ0I);
GZ2:=IF(BA=GZ2I||BA-GZ2I=1,(SUM(H*VOL1,BA-REF(GZ2I,1)+1))/(SUM(VOL1,BA-REF(GZ2I,1)+1)),(SUM(H*VOL1,BA-GZ2I+1))/(SUM (VOL1,BA-GZ2I+1)));
GZ3I:=VALUEWHEN(GFX&&(REF(C,3)>REF(GZ2,3)||REF(C,2)>REF(GZ2,2)),GZZ0I);
GZ3:=IF(BA=GZ3I||BA-GZ3I=1,(SUM(H*VOL1,BA-REF(GZ3I,1)+1))/(SUM(VOL1,BA-REF(GZ3I,1)+1)),(SUM(H*VOL1,BA-GZ3I+1))/(SUM (VOL1,BA-GZ3I+1)));
DD:=FLOOR((DZ3+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD:=FLOOR((GZ3+ZXBD)/ZXBD)*ZXBD;
GDW:=VALUEWHEN(CROSS(C,GD),BA);
DDW:=VALUEWHEN(CROSS(DD,C),BA);
DK:=IF(DDW>GDW,GD,DD);
DD1:=FLOOR((DINI+ZXBD)/ZXBD)*ZXBD-ZXBD;
GD1:=FLOOR((GINI+ZXBD)/ZXBD)*ZXBD;
GDW11:=VALUEWHEN(CROSS(C,GD1),BA);
DDW11:=VALUEWHEN(CROSS(DD1,C),BA);
DKD:=IF(DDW11>GDW11,GD1,DD1);
DWD:=VALUEWHEN(CROSS(C,DKD),BA);
GWD:=VALUEWHEN(CROSS(DKD,C),BA);
GDW1:=VALUEWHEN(CROSS(C,GFXP)||BA=0,BA);
DDW1:=VALUEWHEN(CROSS(DFXP,C)||BA=0,BA);
DKP:=IF(DDW1>GDW1,GFXP,DFXP);
BZD:=MAX(DK,MAX(DKD,GFXP));
SZD:=MIN(DK,MIN(DKD,DFXP));
DTA:=CROSS(C,BZD);
KTA:=CROSS(SZD,C);
KTA3:=REF(DKD>DK,1)=1&&C<DKD&&DKD<DK&&CROSS(DKD,C);
DTB:=C<DK&&CROSS(C,DKD)&&REF(H>DKD&&C<DKD,1)=1&&H<DK;
KTB:=C>DK&&C>DKP&&CROSS(DKD,C)&&REF(L<DKD&&C>DKD&&ISDOWN&&C<REF(C,1)&&L<REF(L,1),1)=1;
DTB0:=C>DK&&CROSS(C,DKD)&&SUM(KTB,BA-GWD+1)>=1;
KTB0:=C<DK&&CROSS(DFXP,C)&&SUM(DTB,BA-DWD+1)>=1;
KTC:=C>DK&&CROSS(DKP,C)&&C<DKD&&SUM(C<DKD&&L<DKP&&C>DKP,BA-GWD+1)>=1;
DTC0:=C>DK&&(CROSS(C,DKD)||DFX&&REF(L<DK&&C>DK,2)=1)&&SUM(KTC,BA-GWD+1)>=1;
DTH1:=C<DK&&C<DKD&&SUM(DFXP=REF(DFXP,1),2)=2&&CROSS(C,DFXP);
DTJ:=C<DK&&CROSS(C,DKD)&&SUM(SUM(DFXP=REF(DFXP,1),2)=2&&SUM(C>DFXP&&L<DFXP,2)=2,BA-GWD+1)>=1;
KTJ0:=C<DK&&CROSS(DKD,C)&&SUM(DTJ,BA-DWD+1)>=1;
DTH:=DTH1&&(SUM(DTH1,BA-GWD+1)=1||SUM(CROSS(C,GFXP),BA)=0);
KTK:=SUM(CROSS(C,GFXP),BA-1)+SUM(CROSS(DFXP,C),BA-1)=0&&CROSS(DK,C);
KTD:=DK=DKD&&CROSS(DK,C)&&DKP=REF(DKP,BA-DWD)&&SUM(DK=DKD,BA-DWD+1)=BA-DWD+1;
KTE:=REF(C<DKD,1)=1&&REF(DKD<DKP,1)=1&&DKD=DK&&CROSS(DK,C);
DTD0:=C>DKP&&C>DKD&&CROSS(C,DK)&&SUM(KTD,BA-GWD+1)>=1;
DT:=DTA||DTH||DTJ||DTB||DTC0||DTD0;
KT:=KTA||KTJ0||KTK||KTB0||KTC||KTD||KTE;
DTI:=VALUEWHEN(DT||BA=0,BA);
KTI:=VALUEWHEN(KT||BA=0,BA);
REF(DTI<=KTI,1)&&DTI>KTI,BPK;
REF(DTI>=KTI,1)&&DTI<KTI,SPK;
金龙行天下
C:=CLOSE;
L:=LOW;
H:=HIGH;
O:=OPEN;
RSV:=(C-LLV(L,7))/(HHV(H,7)-LLV(L,7))*100;
RSV1:=(C-LLV(L,38))/(HHV(H,38)-LLV(L,38))*100;
LJ:SMA(RSV1,5,1),COLORWHITE;
SY:SMA(LJ,10,1),COLORYELLOW;
FILLRGN(LJ<=SY,LJ,SY,COLORGREEN);
FILLRGN(LJ>=SY,SY,LJ,COLORRED);
A:=(3*C+L+O+H)/6;
VAR2Q:=MA(C,80)-MA(C,13)/3;
SQX:=MA((C-VAR2Q)/VAR2Q,1);
XA:=EMA(SQX,12)*0.7;
XB:=EMA(SQX,3);
DBQY:IF(LLV(XB-XA,12)>0,0,-15),COLORBLUE;
DIFF:=(EMA(C,17)-EMA(C,73))*100;
DEA:=EMA(DIFF,73);
MACD:=2*(DIFF-DEA);
STICKLINE(DIFF<=0
&& DEA<=DIFF
&&
REF(DIFF,1)<REF(DEA,1),3,26,COLORCYAN,0);
IF(DIFF<=0 &&
DEA<=DIFF &&
REF(DIFF,1)<REF(DEA,1),10,0),COLORMAGENTA;
胶实测年收益达176%的模型(胶30分线)
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA40:=MA(CLOSE,40);
MA80:=MA(CLOSE,80);
CROSS(MA5,MA10) {5均线上穿10均线且均线成多头排列,买平买开}
&&MA10>REF(MA10,1)
&&REF(MA10,1)>REF(MA10,2)
&&MA5>REF(MA5,1)
&&REF(MA5,1)>REF(MA5,2),BPK;
CROSS(MA10,MA5) {5均线下穿10均线且均线成空头排列,卖平卖开}
&&MA10<REF(MA10,1)
&&REF(MA10,1)<REF(MA10,2)
&&MA5<REF(MA5,1)
&&REF(MA5,1)<REF(MA5,2),SPK;
江太短线升级系
M1:=MA(CLOSE,5);
M2:MA(CLOSE,20),COLORYELLOW;
ZYZS:IF((M1 > M2),M2,M1),COLORGREEN;
PARTLINE(ZYZS > REF(ZYZS,1)
&& ZYZS =
M2,ZYZS,COLORGREEN);
D:=(SMA(CLOSE,SHORT,X) > SMA(CLOSE,LONG,X));
K:=(SMA(CLOSE,SHORT,X) < SMA(CLOSE,LONG,X));
Z:=CLOSE >=OPEN;
Y:=CLOSE < OPEN;
STICKLINE(K &&
Z,OPEN,CLOSE,COLORGREEN,1);
DRAWLINE(K && Z,HIGH, K
&& Z,CLOSE,COLORGREEN);
DRAWLINE(K && Z,LOW, K
&& Z,OPEN,COLORGREEN);
STICKLINE(K &&
Y,OPEN,CLOSE,COLORGREEN,0);
DRAWLINE(K && Y,HIGH, K
&& Y,LOW,COLORGREEN);
STICKLINE(D &&
Z,OPEN,CLOSE,COLORRED,1);
DRAWLINE(D && Z,HIGH, D
&& Z,CLOSE,COLORRED);
DRAWLINE(D && Z,LOW, D
&& Z,OPEN,COLORRED);
STICKLINE(D &&
Y,OPEN,CLOSE,COLORRED,0);
DRAWLINE(D && Y,HIGH, D
&& Y,LOW,COLORRED);
见好跑
VAR3:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
VAR4:=SMA(SMA(VAR3,3,1),3,1);
VAR5:=EMA(VAR4,5);
VAR6:=VAR5;
VAR7:=3*VAR4-2*VAR5;
VAR8:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K: SMA(VAR8,3,1);
D: SMA(K,3,1);
VAR9:=3*K-2*D;
VARA:=LLV(LOW,36);
VARB:=HHV(HIGH,30);
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;
QUSHI: VARC, COLORGREEN;
STICKLINE(VARC<10,0,8,COLORYELLOW,0);
STICKLINE(VARC>90,100,92,COLORBLUE,0);
VARD:=87.5;
VARE:=(VARC-LLV(VARC,4))/(HHV(VARC,4)-LLV(VARC,4))*4*25;
DRAWTEXT(IF(CROSS(VAR9,8),87,0),48,'反弹');
DRAWTEXT(IF(CROSS(VARE,87.5) &&
QUSHI<40,87,0),10,'买');
DRAWTEXT(IF(CROSS(QUSHI,VARD) &&
VARE=100,50,0),56,'目标位');
DRAWTEXT(IF(CROSS(VARD,QUSHI),87,0),85,'见好跑');
DRAWTEXT(IF(CROSS(QUSHI,VARE) &&
QUSHI>87,87,0),70,'卖');
VARF:=SMA(VAR3,20,1);
VAR10:=SMA(VARF,15,1);
VAR11:=(3*VARF+2*VAR10)/4;
VAR12:=REF(VAR11,1);
VAR13:=SMA(MAX(VAR11-VAR12,0),2,1)/SMA(ABS(VAR11-VAR12),2,1)*100;
VAR14:=MA(VAR13,10);
VAR15:=IF(CROSS(VAR14,90),25,0);
DRAWTEXT(CROSS(VAR14,90),27,'强势整理'); STICKLINE((CROSS(QUSHI,10)
&& QUSHI>10),0,30,
COLORRED,0);
VAR16:=(CLOSE+LOW+HIGH)/3;
VAR17:=SUM((VAR16-REF(LOW,1)-(HIGH-VAR16))*VOL/100000/(HIGH-LOW),0);
VAR18:=EMA(VAR17,1);
VAR19:=MA(VAR18,12);
VAR1A:=MA(VAR18,26);
VAR1B:=(VAR18-VAR19)*10;
VAR1C:=OPI/EMA(VOL,5)/30*1.1;
VAR1D:=IF(CROSS(VAR1B,VAR1C),1,0);
极品均线
VAR1:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
VAR2:=EMA(VAR1,13);
VAR3:=REF(VAR2,1);
STICKLINE(VAR2>=VAR3,VAR3,VAR2,COLORRED,1);
STICKLINE(VAR3>VAR2,VAR2,VAR3,COLORCYAN,0);
MA1:MA(VAR2,3),COLORWHITE;
MA2:MA(VAR2,7),COLORYELLOW;
MA3:MA(VAR2,9),COLORGREEN;
MA4:MA(VAR2,18),COLORRED;
火焰之王-空
VAR1:=EMA(HHV(HIGH,500),21);
VAR2:=EMA(HHV(HIGH,250),21);
VAR3:=EMA(HHV(HIGH,90),21);
VAR4:=EMA(LLV(LOW,500),21);
VAR5:=EMA(LLV(LOW,250),21);
VAR6:=EMA(LLV(LOW,90),21);
VAR7:=EMA((((((((VAR4 * 0.96) + (VAR5 * 0.96)) + (VAR6 * 0.96)) +
(VAR1 * 0.558)) + (VAR2 * 0.558)) + (VAR3 * 0.558)) / 6),21);
VAR8:=EMA((((((((VAR4 * 1.25) + (VAR5 * 1.23)) + (VAR6 * 1.2)) +
(VAR1 * 0.55)) + (VAR2 * 0.55)) + (VAR3 * 0.65)) / 6),21);
VAR9:=EMA((((((((VAR4 * 1.3) + (VAR5 * 1.3)) + (VAR6 * 1.3)) +
(VAR1 * 0.68)) + (VAR2 * 0.68)) + (VAR3 * 0.68)) / 6),21);
VARA:=EMA((((((VAR7 * 3) + (VAR8 * 2)) + VAR9) / 6) *
1.738),21);
VARB1:=REF(HIGH,1);
VARC1:=((SMA(ABS((HIGH - VARB1)),3,1) / SMA(MIN((HIGH -
VARB1),0),3,1)) * 100);
VARD1:=EMA(IF(((CLOSE * 1.35) > VARA),(VARC1 *
10),(VARC1 / 10)),3);
VARE1:=LLV(LOW,30);
VARF1:=HHV(VARD1,30);
VAR10:=IF(MA(CLOSE,58),1,0);
HILL:((EMA(IF((LOW >= VARE1),((VARD1 + (VARF1 *
2)) / 2),0),3) / 618) * VAR10);
STICKLINE((HILL < 0),0,HILL,COLORRED,1);
JL:HILL;
STICKLINE((HILL < 0),0,(JL *
1.2),COLORRED,0);
STICKLINE((HILL < 0),0,(JL *
0.8),COLORMAGENTA,0);
STICKLINE((HILL < 0),0,(JL *
0.6),COLORYELLOW,0);
STICKLINE((HILL < 0),0,(JL *
0.4),COLORGREEN,0);
STICKLINE((HILL < 0),0,(JL *
0.2),COLORBLUE,0);
DRAWTEXT(HILL<= -45,(JL *
1.2),'机会来了!上吧,好好把握这一切');
短线文华指标
H:=HHV(HIGH,3);
L:=LLV(LOW,3);
H1:=IF(H<REF(H,1)&&H<REF(H,2)&&H<REF(H,4)&&L<REF(L,1)&&L<REF(L,3)&&L<REF(L,5)&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(H,4),0);
L1:=IF(L>REF(L,1)&&L>REF(L,3)&&L>REF(L,5)&&H>REF(H,1)&&H>REF(H,2)&&H>REF(H,4)&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(L,4),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IF(CLOSE>H2,-3,IF(CLOSE<L2,1,0));K2:=VALUEWHEN(K1<>0,K1);G:=IF(K2=1,H2,L2);
G1:=VALUEWHEN(ISLASTBAR,G);DRAWNUMBER(L>0,G1,G1,0,COLORCYAN);
TMP:=K2; W1:=K2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
DRAWLINE(W1=1,HIGH,W1=1,HT,COLORCYAN);
DRAWLINE(W1=1,LOW,W1=1,LT,COLORCYAN);
DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED);
DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED);
STICKLINE(W1>0,OPEN,CLOSE,COLORCYAN,1);
STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1);
STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,COLORRED,0);
STICKLINE(W2>0&&W1>0,OPEN,CLOSE,COLORCYAN,0);
DRAWLINE(TMP=1&&REF(TMP,1)=1,G,TMP=1&&REF(TMP,1)=1,REF(G,1),COLORCYAN);DRAWLINE(TMP=-3&&REF(TMP,1)=-3,G,TMP=-3&&REF(TMP,1)=-3,REF(G,1),COLORRED);DRAWSL(K2=1,G,0,1,0,COLORCYAN);DRAWSL(K2=-3,G,0,1,0,COLORRED);
DRAWTEXT(CROSS(TMP,0),H,'卖');
DRAWTEXT(CROSS(0,TMP),L,'买');
MA55:=MA(CLOSE,55)&&DATE<071231;
DRAWTEXT(CROSS(TMP,0)&&CLOSE<=MA55,H,'卖↓');
DRAWTEXT(CROSS(0,TMP)&&CLOSE>=MA55,L,'买↑');
抢金多空版破解
S:=CROSS(CLOSE,EMA2(HIGH,30));
X:=CROSS(EMA2(LOW,30),CLOSE);
WS:=BARSLAST(S)+1;
WX:=BARSLAST(X)+1;
SS:=CROSS(SUM(S,WX),0.5);
XX:=CROSS(SUM(X,WS),0.5);
STICKLINE(CLOSE>EMA2(HIGH,30),EMA2(HIGH,30),EMA2(LOW,30),COLORMAGENTA,1);
STICKLINE(CLOSE<EMA2(LOW,30),EMA2(LOW,30),EMA2(HIGH,30),COLORBLUE,1);
STICKLINE(CLOSE>EMA2(HIGH,150),EMA2(HIGH,150),EMA2(LOW,150),COLORLIGHTRED,1);
STICKLINE(CLOSE<EMA2(LOW,150),EMA2(LOW,150),EMA2(HIGH,150),COLORLIGHTGREEN,1);
PARTLINE(CLOSE>EMA2(HIGH,30),EMA2(HIGH,30),COLORMAGENTA);
PARTLINE(CLOSE<EMA2(HIGH,30),EMA2(HIGH,30),COLORBLUE);
PARTLINE(CLOSE>EMA2(LOW,30),EMA2(LOW,30),COLORMAGENTA);
PARTLINE(CLOSE<EMA2(LOW,30),EMA2(LOW,30),COLORBLUE);
PARTLINE(CLOSE>EMA2(HIGH,150),EMA2(HIGH,150),COLORLIGHTRED);
PARTLINE(CLOSE<EMA2(HIGH,150),EMA2(HIGH,150),COLORLIGHTGREEN);
PARTLINE(CLOSE>EMA2(LOW,150),EMA2(LOW,150),COLORLIGHTRED);
PARTLINE(CLOSE<EMA2(LOW,150),EMA2(LOW,150),COLORLIGHTGREEN);
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,COLORRED,0);
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,COLORCYAN,0);
DRAWTEXT(SS,LOW,'买入');
DRAWTEXT(XX,HIGH,'卖出');

加载中…