DRAWGBK(CLOSE 1,COLORRGB(50,80,40),COLORRGB(20,70,110),1);
PARTLINE(CLOSE 1,0),POINTDOT,colorFFFFFF;
V3:=MA(VOL,2);
VAR1:=EMA(MA(IF(CLOSE OPEN,(CLOSE-OPEN)*VOL/V3,IF(CLOSE OPEN,(CLOSE-OPEN)*VOL/V3,0)),3),2);
VAR2:=EMA(MA(IF(CLOSE REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL/V3,IF(CLOSE REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL/V3,0)),4),2);
VAR3:=EMA(MA(IF(OPEN REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL/V3,IF(OPEN REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL/V3,0)),5),2);
VAR4:=EMA(MA(IF(CLOSE OPEN,(OPEN-CLOSE)*VOL/V3,IF(CLOSE OPEN,(OPEN-CLOSE)*VOL/V3,0)),6),2);
VAR5:=EMA(MA(IF(CLOSE REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL/V3,IF(CLOSE REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL/V3,0)),7),2);
VAR6:=EMA(MA(IF(OPEN REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL/V3,IF(OPEN REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL/V3,0)),8),2);
VAR7:=CLOSE OPEN;
VAR8:=CLOSE REF(CLOSE,1);
VAR9:=OPEN REF(CLOSE,1);
多:=(VAR1+VAR2*2+VAR3)/6/4;
空:=(VAR4+VAR5*2+VAR6)/6/4;
SHT:=多;
LNG:=空;
AX1:=(MA(CLOSE,29)+MA(CLOSE,30))/2*1.105;
XXC:=(MA(CLOSE,29)+MA(CLOSE,30))/2;
BX2:=(MA(CLOSE,29)+MA(CLOSE,30))/2/1.142;
AX13:=MA(AX1,2);
BX23:=MA(BX2,2);
DX1:=HHV(AX13,35);
DX2:=LLV(BX23,35);
C34:=((DX1+DX2)/2+XXC)/2;
PVAR1:=EMA(MA(IF(CLOSE OPEN,(CLOSE-OPEN)*VOL/V3,IF(CLOSE OPEN,(CLOSE-OPEN)*VOL/V3,0)),5),2);
PVAR2:=EMA(MA(IF(CLOSE C34,(CLOSE-C34)*VOL/V3,IF(CLOSE C34,(CLOSE-C34)*VOL/V3,0)),6),2);
PVAR3:=EMA(MA(IF(OPEN C34,(OPEN-C34)*VOL/V3,IF(OPEN C34,(OPEN-C34)*VOL/V3,0)),7),2);
PVAR4:=EMA(MA(IF(CLOSE OPEN,(OPEN-CLOSE)*VOL/V3,IF(CLOSE OPEN,(OPEN-CLOSE)*VOL/V3,0)),8),2);
PVAR5:=EMA(MA(IF(CLOSE C34,(C34-CLOSE)*VOL/V3,IF(CLOSE C34,(C34-CLOSE)*VOL/V3,0)),9),2);
PVAR6:=EMA(MA(IF(OPEN C34,(C34-OPEN)*VOL/V3,IF(OPEN C34,(C34-OPEN)*VOL/V3,0)),10),2);
PVAR7:=CLOSE OPEN;
PVAR8:=CLOSE REF(CLOSE,1);
PVAR9:=OPEN REF(CLOSE,1);
P多:=(PVAR1+PVAR2*2+PVAR3)/6/4;
P空:=(PVAR4+PVAR5*2+PVAR6)/6/4;
QQ多:(P多+多)/2,LINETHICK2,colorFF;
QQ空:(P空+空)/2,colorFFFF;
AP2:=QQ多*(1.89-(1-VOL/MA(VOL,12)/(VOL/MA(VOL,3))/9));
AP2A:=EMA(AP2,2)*1;
PSHT:=QQ多;
PLNG:=QQ空;
PARTLINE(PSHT 0,PSHT),LINETHICK2,color10B210;
PARTLINE(PLNG 0,PLNG),LINETHICK4,color66FF;
XX1:(EMA(EMA((PVAR1+PVAR2+PVAR3+600)/3-(PVAR4+PVAR5+PVAR6+600)/3,4),3))*1/4/4,colorFF00FF;
XX2:EMA((COUNT(PVAR8,10)/10+COUNT(PVAR7,10)/10+COUNT(PVAR9,10)/10)/3*MA((P多+多)/2,4)*1.75*1,5),colorFFFF00;
STICKLINE(QQ空 0,0,QQ空,1,0),colorFFFF00;
破解:=(EMA(EMA((PVAR1+PVAR2+PVAR3)/3-(PVAR4+PVAR5+PVAR6)/3,5),5))*1/400;
PARTLINE(PSHT 0 AND PSHT XX1,PSHT),LINETHICK2,color660099;
STICKLINE(PSHT 0 AND PLNG =0,PSHT,PLNG,1,0),color10B210;
STICKLINE(PSHT =0 AND PLNG =0,PSHT,0,1,0),colorFF;
STICKLINE(PSHT =0 AND PLNG =0 OR PSHT 0 AND PLNG 0,PSHT,PLNG,1,0),color808080;
STICKLINE(PSHT 0 AND PSHT XX1,PSHT,0,1,0),color6600CC;
STICKLINE(PSHT =AP2A AND PSHT 0,PSHT,0,1,0),colorFFFF;
XX2A:XX2,POINTDOT,LINETHICK3,colorFFCCFF;
QQ多A:QQ多,POINTDOT,LINETHICK4,colorCCFF99;
EHH:=HIGH REF(HIGH,1);
ELL:=LOW REF(LOW,1);
ESARL:=(MA(LLV(LOW,4),2)+EMA(LOW,3)*1.5)/2.5;
ESARH:=(MA(HHV(HIGH,4),2)+EMA(HIGH,3)*1.5)/2.5;
ESART:=LOW;
FEC:=CLOSE;
FEH:=HIGH;
FEL:=LOW;
%
vc=ffl.vardata( fec )
vh=ffl.vardata( feh )
vl=ffl.vardata( fel )
vhh=ffl.vardata( Ehh )
vll=ffl.vardata( Ell )
vsarh=ffl.vardata( Esarh )
vsarl=ffl.vardata( Esarl )
vsart=ffl.vardata( Esart )
vcc=ffl.vardata( Ehh )
vee=ffl.vardata( Ell )
last=ubound(vc)
vsart(1)=vsarl(1)
vcc(1)=0.02
vee(1)=0.02
vcc1=0
vee1=0
for i=2 to last
if vc(i-1) = vsart(i-1) and vsarl(i) vsart(i-1) then
vsart(i)=vsarl(i)
elseif vc(i-1) = vsart(i-1) and vsarl(i) = vsart(i-1) then vsart(i)=vsart(i-1)
elseif vc(i-1) vsart(i-1) and vsarh(i) vsart(i-1) then vsart(i)=vsarh(i)
elseif vc(i-1) vsart(i-1) and vsarh(i) = vsart(i-1) then vsart(i)=vsart(i-1)
end if
rem if vc(i-1) = vsart(i-1) and vsarl(i) vsarl(i-1) then
rem vsart(i)=vsarl(i)
rem elseif vc(i-1) = vsart(i-1) and vsarl(i) = vsarl(i-1) then vsart(i)=vsarl(i-1) ----- changed by cheng
rem elseif vc(i-1) = vsart(i-1) and vsarl(i) = vsarl(i-1) then vsart(i)=vsart(i-1)
rem elseif vc(i-1) vsart(i-1) and vsarh(i) vsarh(i-1) then vsart(i)=vsarh(i)
rem elseif vc(i-1) vsart(i-1) and vsarh(i) = vsarh(i-1) then vsart(i)=vsarh(i-1) ----- changed by cheng
rem elseif vc(i-1) vsart(i-1) and vsarh(i) = vsarh(i-1) then vsart(i)=vsart(i-1)
rem end if
if vc(i-1) = vsart(i-1) and vc(i) vsart(i) then
vsart(i)=vh(i-1)
else
vcc1=1
end if
if vc(i-1) vsart(i-1) and vc(i) = vsart(i) then
vsart(i)=vl(i-1)
else
vee1=1
end if
next
ffl.vardata( Esart )=vsart
%
ESARTA:=ESART;
QWSARL:=(EMA(LOW,9)+EMA(LOW,8))/2;
QWSARH:=(EMA(HIGH,9)+EMA(HIGH,8))/2;
QWSART:=LOW;
FQWC:=CLOSE;
FQWH:=HIGH;
FQWL:=LOW;
%
vc=ffl.vardata( fqwc )
vh=ffl.vardata( fqwh )
vl=ffl.vardata( fqwl )
vsarh=ffl.vardata( qwsarh )
vsarl=ffl.vardata( qwsarl )
vsart=ffl.vardata( qwsart )
vcc=ffl.vardata( fqwc )
vee=ffl.vardata( fqwc )
last=ubound(vc)
vsart(1)=vsarl(1)
vcc(1)=0.02
vee(1)=0.02
vcc1=0
vee1=0
for i=2 to last
if vcc1=0 then vcc(i)=0.020
if vcc1=1 then vcc(i)=vcc(i-1)+0.0170
if vcc1=2 then vcc(i)=vcc(i-1)
if vcc(i) 0.150 then vcc(i)=0.15
if vee1=0 then vee(i)=0.020
if vee1=1 then vee(i)=vee(i-1)+0.0170
if vee1=2 then vee(i)=vee(i-1)
if vee(i) 0.15 then vee(i)=0.15
if vc(i-1) = vsart(i-1) and vh(i) vh(i-1) then
vsart(i)=vsart(i-1)+(vl(i)-vsart(i-1))*vcc(i)*1.05
rem elseif vc(i-1) = vsart(i-1) and vh(i) = vh(i-1) then vsart(i)=vsart(i-1) --------- changed by cheng
elseif vc(i-1) = vsart(i-1) and vh(i) = vh(i-1) then vsart(i)=vsart(i-1)+(vh(i)-vsart(i-1))*vcc(i)*0.85
elseif vc(i-1) vsart(i-1) and vl(i) vl(i-1) then vsart(i)=vsart(i-1)-abs(vh(i)-vsart(i-1))*vee(i)*1.05
elseif vc(i-1) vsart(i-1) and vl(i) = vl(i-1) then vsart(i)=vsart(i-1)-abs(vl(i)-vsart(i-1))*vee(i)*0.85
end if
if vc(i-1) = vsart(i-1) and vc(i) vsart(i) then
vcc1=0
vee1=0
vsart(i)=vsarh(i-1)
elseif vc(i-1) = vsart(i-1) and vh(i) = vh(i-1) then vcc1=2
else
vcc1=1
end if
if vc(i-1) vsart(i-1) and vc(i) = vsart(i) then
vee1=0
vcc1=0
vsart(i)=vsarl(i-1)
elseif vc(i-1) vsart(i-1) and vl(i) = vl(i-1) then vee1=2
else
vee1=1
end if
next
ffl.vardata( qwsart )=vsart
%
QWSARTA:=QWSART;
AB:=(QWSART+QWSART)/2;
AC:=QQ多+(CLOSE/AB-1)*ABS(MA(QQ多,20)/2)*6;
AH:=QQ多+(HIGH/AB-1)*ABS(MA(QQ多,20)/2)*6;
AL:=QQ多+(LOW/AB-1)*ABS(MA(QQ多,20)/2)*6;
AO:=QQ多+(OPEN/AB-1)*ABS(MA(QQ多,20)/2)*6;
STICKLINE(AC =AO,AH,AC,1,0),color225588;
STICKLINE(AC =AO,AH,AC,0,0),color66CCFF;
STICKLINE(AC =AO,AO,AL,1,0),color225588;
STICKLINE(AC =AO,AO,AL,0,0),color66CCFF;
STICKLINE(AC AO,AC,AO,8,0),color225588;
STICKLINE(AC AO,AC,AO,7,0),color226699;
STICKLINE(AC AO,AC,AO,6,0),color3377AA;
STICKLINE(AC AO,AC,AO,5,0),color3388BB;
STICKLINE(AC AO,AC,AO,4,0),color4499CC;
STICKLINE(AC AO,AC,AO,3,0),color44AADD;
STICKLINE(AC AO,AC,AO,2,0),color55BBEE;
STICKLINE(AC AO,AC,AO,1,0),color66CCFF;
STICKLINE(AC =AO,AH,AC,1,0),color888800;
STICKLINE(AC =AO,AH,AC,0,0),colorFFFF00;
STICKLINE(AC =AO,AO,AL,1,0),color888800;
STICKLINE(AC =AO,AO,AL,0,0),colorFFFF00;
STICKLINE(AC =AO,AC,AO,8,0),color888800;
STICKLINE(AC =AO,AC,AO,7,0),color999900;
STICKLINE(AC =AO,AC,AO,6,0),colorAAAA00;
STICKLINE(AC =AO,AC,AO,5,0),colorBBBB00;
STICKLINE(AC =AO,AC,AO,4,0),colorCCCC00;
STICKLINE(AC =AO,AC,AO,3,0),colorDDDD00;
STICKLINE(AC =AO,AC,AO,2,0),colorEEEE00;
STICKLINE(AC =AO,AC,AO,1,0),colorFFFF00;
STICKLINE(AC QQ多,AC,AO,9,0),colorFF00CC;
STICKLINE(AC QQ多,AH,AL,3,0),colorFF00CC;
STICKLINE(AC QQ多,AC,AO,9,0),colorFFFFFF;
STICKLINE(AC QQ多,AH,AL,3,0),colorFFFFFF;
