糖模型

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;

有才，别说改，就是理解一下也挺不容易的。

不能理解原理的东西改了也意义不大。