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 ifrem 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=0for 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.15if 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.15if 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 ifif 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 ifnext 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;{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |