【通達信】分時操盤手(漲幅、大趨勢、資金流、逃頂)

TA:=IF(TIME>093000ANDTIME<094000,1,0);TT:=IF(TIME>=093000ANDTIME<=093300,1,0);T0:=IF(TIME>093600ANDTIME<095900,1,0);T1:=IF(TIME>093300ANDTIME<145900,1,0);T2:=IF(TIME>095500ANDTIME<145900,1,0);T3:=IF(TIME>142500ANDTIME<145900,1,0);T4:=IF(TIME>111000ANDTIME<145900,1,0);T5:=IF(TIME>110000ANDTIME<145900,1,0);T6:=IF(TIME>104200ANDTIME<145900,1,0);T7:=IF(TIME>103000ANDTIME<131000,1,0);T8:=IF(TIME>130000ANDTIME<155900,1,0);T9:=IF(TIME>095500ANDTIME<131000,1,0);T10:=IF(TIME>130500ANDTIME<143500,1,0);T11:=IF(TIME>094500ANDTIME<102500,1,0);T12:=IF(TIME>095000ANDTIME<140000,1,0);T13:=IF(TIME>093000ANDTIME<143500,1,0);DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);VARY1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));SD:=(C>60ANDC<100,200,100);SF:=IF(C<40ANDC<=60,300,SD);SG:=IF(C>10ANDC<=28,1000,IF(C>29ANDC<40,500,SF));SH:=IF(C<5,5000,IF(C>=5ANDC<=10,2000,SG));SJ:=IF(C>=6000,5,SH);SK:=IF(C>1000ANDC<6000,25,SJ);MACD:=(DIF-DEA)*SK,COLORSTICK;STICKLINE((MACD>=0),0,MACD,3,1),COLOR0000FF;STICKLINE(((MACD>=0)AND(MACD<REF(MACD,1))),0,MACD,3,0),COLORCYAN;STICKLINE((MACD<0),0,MACD,3,0),COLORFFFF00;STICKLINEMACDANDMACDREFMACD)),0,MACD,3,1),COLORRED;JSCLOSEREFCLOSE,5))/(5*REF(CLOSE,5));JSIFJS,JS1);JSIFJS0,JS2);RSVCLOSELLVLOW)/(HHV(HIGH,120)-LLV(LOW,120))*100;KASMARSV,1);KIFTTREFK2A,1),K2A);DSMAK,1);RSVCLOSELLVLOW(HHV(HIGH,89)-LLV(LOW,89))*100;KASMARSV,1);KIFTTREFK89A,1),K89A);RSVCCLOSELLVLOW)/(HHV(HIGH,120)-LLV(LOW,120))*100;KCSMARSVC,1);DCSMAKC6,1);DCLINETHICKCIRCLEDOTPOINTDOTCOLORYELLOWCOLORCCYPPHIGHLOWCLOSECCITYPPMATYPP(0.015*AVEDEV(TYPP,14));GGCREFC)/REF(C,210)*55;WGBARSSINCEV>0)+1;GGJXSUMCVWGSUMV,WG)+WG*0)/REF((SUM(C*V,WG)/SUM(V,WG)+WG*0),DPX(3*SMA((C-LLV(L,105))/(HHV(H,105)-LLV(L,105)),5,1)-2*SMA(SMAROSSGGGGJXKCROSSGGJXGGGBDSUMGBCSUMGBK);DYNAINFO0;STS:=FINANCE(32)>=0ANDFINANCE(34)>0ANDDYNAINFO(7)>0;AND漲幅<9.91,1,0);CCT:=DYNAINFO(8);PPP:=FILTER(CCT=0,500);DRAWTEXT(PPP,45,'★今日該股票未開盤,不能分析★'),COLORFF00FF;TDSA:=5+3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA(LVLTDSB:=IF(TA=1ANDTDSA=105,70,TDSA);WH:=TDSB;WE:=FILTER(WH>90,16);TDCJ:=(7*SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1)),COLORFF9933;WL:=TDCJ;VM1:=(C*2+H+L)/4*10;VM2:=EMA(VM1,13)-EMA(VM1,34);VM3:=EMA(VM2,5);VM4:=2*(VM2-VM3)*5.5;A:=EMA(WINNER(CLOSE),10);B:=EMA(WINNER(CLOSE),34);BA:=100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12);BD:=MA(ROC,6)*100;VAR67:=(LOW+HIGH+CLOSE)/3;VAR80:=IF(TROUGHBARS(3,16,1)=0ANDHIGH>LOW+0.04,3,0);VAR81:=ZIG(3,6)>REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1)<=REF(ZIG(3,6),2)ANDREF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR83:=ZIG(3,22)>REF(ZIG(3,22),1)ANDREF(ZIG(3,22),1)<=REF(ZIG(3,22),2)ANDREF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VARZIG,6)<REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1)>=REF(ZIG(3,6),2)ANDREFZIG3,6),2)>=REF(ZIG(3,6),3);VARZIG3,22)<REF(ZIG(3,22),1)ANDREFZIG=REF(ZIG(3,22),2)ANDREFZIG=REF(ZIG(3,22),3);VARZIG3,51)>REF(ZIG(3,51),1)ANDREFZIG=REF(ZIG(3,51),2)ANDREFZIG=REF(ZIG(3,51),3);VARZIG,72)>REF(ZIG(3,72),1)ANDREFZIG),1)<=REF(ZIG(3,72),2)ANDREFZIG),2)<=REF(ZIG(3,72),3);VARF3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1);VARA-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1));VARZIG3,51)<REF(ZIG(3,51),1)ANDREFZIG=REF(ZIG(3,51),2)ANDREFZIG=REF(ZIG(3,51),3);VARZIG3,72)<REF(ZIG(3,72),1)ANDREFZIG=REF(ZIG(3,72),2)ANDREFZIG=REF(ZIG(3,72),3);VARXMACLOSE80)-MA(CLOSE,13)/3);VARXMA(CLOSE-VARX1)/VARX1,1));NNVAR80;VARMCLOSELLVLOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;VARMSMAVARM3,1);NN(VAR81+VAR83+VAR85+VAR87);MM(VAR82+VAR84+VAR86+VAR88);MM2:=IF(MM1>0,-500,0);MMIF(C>1000,MM2*100,MM2),COLORRED,LINETHICK3;CTSUMMMANDT;{統(tǒng)計}CLEMAIFWHANDWLANDOK<55ANDL<=LLVLSMAABSLREFL)),27,1)/SMA(MAX(L-REF(L,1),0),27,1),0),3)CLIFCL,CL1);CHHSUMWEORCL;CHHIFCTANDCHH0,110,CHH1);FFFFVASC+H+L)/4;VASLLVL4);VASHHVH4);AADMACLOSE,32);BADMACLOSE);DDCROSSBARSVRCLOSELLVLOW(HHV(HIGH,9)-LLV(LOW,9))*100;VARHHVHIGH9)-LLV(LOW,9);VARHHVHIGH,9)-CLOSE;VAR4:=VAR2/VAR1*100-70;VARCLOSE+HIGH+LOW)/4;VARLLVLOW4);VARHHVHIGH34);VAREMAVAR6-VAR8)/(VAR11-VAR8)*100,13);VAREMA0.667*REF(VAR12,1)+0.333*VAR12,2);N{STICKLINEVARVARVARVAR0,0),COLORRED;STICKLINEVARVARVARVAR0,0),COLORGREEN;}RSVCLOSELLVLOW/(HHV(HIGH,35)-LLV(LOW,35))*100;KSMARSV1);DSMAK,1);STICKLINEEMADREFEMAD,EMA(D1,3),REF(EMA(D1,3),1),11STICKLINEEMADREFEMAD,EMA(D1,3),REF(EMA(D1,3),1),11KASMARSVR);DASMAKA,1);A波浪:=MACLOSELLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMASMACLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1VARMSMAVARM3,1);VARMSMAVARM3,1);AACMAC,1);BBBMAAAD;VARCLOSELLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*80;BBCSMAVAR7,1);SMXEMACEMAREFC5)*10;VARVAR67-MA(VAR67,14))/(0.015*AVEDEV(VAR67,14));WR=100*(HHV(HIGH,79)-CLOSE)/(HHV(HIGH,79)-LLV(LOW,79));VAR*CLOSE+HIGH+LOW+OPEN)/5;VARLLVLOW34);VARHHVHIGH34);CCEMACEMAREFC11),11)*10;WWL/10;WREF(WL,1)/10;SKEMAVARVARVARVAR22)*100,13);WR:=IF(WR30=0ORSK1>=90ORVAR68>-250,100,WR30);VARZREFCLOSE);VARZSMAMAXCLOSEVAR1Z,0),7,1)/SMA(ABS(CLOSE-VAR1Z),7,1)*100;VARZSMAMAXCLOSEVAR1Z,0),13,1)/SMA(ABS(CLOSE-VAR1Z),13,1)*100;VARZSMAMAXVARZ-CLOSE,0),7,1)/SMA(ABS(CLOSE-VAR1Z),7,1)*100;VARZSMAMAXVARZ-CLOSE,0),13,1)/SMA(ABS(CLOSE-VAR1Z),13,1)*100;VARZBARSCOUNTCLOSEFCKANDOKANDNNORNN,35,DRAWNULL)*2,STICK,COLORMAGENTA,LINETHICK2;{LHEMAIFCTANDTANDWH<35ANDWL<6ANDOK<65ANDL<=LLVLSMAABSLREFL)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)LLV(L,30),SMA(ABS(L-REF(L,1)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)*80,LH1);}LH2:=EMA(IF(WL<35ANDT4=1ANDL<=LLV(L,30),SMA(ABS(L-REF(L,1)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)*30,STICK,COLORYELLOW,LINETHICK2;LH:=IF(LH2>80,80,LH2);LHH:=SUM(LH,0);浪花:LH,STICK,COLORYELLOW,LINETHICK2;VAR2A:=VARF<REF(VAR9A,1)ANDVOL>REF(VOL,1)ANDCLOSE>REF(CLOSE,1);NC1:=CT=0ANDCROSS(WL,TDFZ);AND(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3));KZCTANDVARC;CHSUMKZANDT;{統(tǒng)計}PFILTERKZ6);STICKLINE(FILTER(KZ=1,16)=1,0,75,1,0),LINETHICK1,COLORMAGENTA;STICKLINE(FILTER(P1=1,45)=1,0,30,10,0),LINETHICK1,COLORMAGENTA;DRAWICON(FILTER(KZ=1,240)=1,8,5);EE:=EMA(C,150)/EMA(REF(C,150),150)*10;HH:=IF(EE>REF(EE,1),1,0);HS1:=CROSS(EE,SMX)ANDEE>CCANDSMX>CCANDHH=1;HSSUMHS0)ANDT1=1;{統(tǒng)計}DRAWTEXTCTANDT1=1ANDVAR2AANDCOUNT(VAR2A,132)=1,30,'←挖金礦?'),LINETHICK1,COLOR00FF33;STICKLINE(CT=0ANDT1=1ANDVAR2AANDCOUNT(VAR2A,132)=1,0,85,1,0),COLOR00FF33;SRBUBJSANDWL<0ANDCCT>0ANDWH<=0ANDT3=1ANDCT=0;ROSSSMBMANDWHJDDEMACLOSECOLORBLUELINETHICKVARCMASMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,SMASMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),)*100;ARDVARECROSSVARCVAR2D);DXIFVAREANDCLOSEJDD,1,0),LINETHICK0,COLORYELLOW;DCTSUMDXNDCA:=CT=1ANDT13=1AND漲幅<9.8;DDC:='★提醒：后市看跌↓當心';DRAWTEXTFILTERCA0)=1,90,'逃?'),LINETHICK1,COLORGREEN;DRAWICONFILTERCA0)=1,90,15);STICKLINEFILTERCA,1,0),LINETHICK1,COLORYELLOW;SSV1:=(2*CLOSE+HIGH+LOW)/4;SSV2:=LLV(LOW,34);SSV3:=HHV(HIGH,34);SSVA:=EMA((SSV1-SSV2)/(SSV3-SSV2)*100,12);SSVB:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);VARHQSXREFQSX1))/REF(QSX,1)*100;AAQSX<=13)ANDFILTER((QSX<=13),15);TDEFILTERQSX;TDAAIFTTANDTDE,REF(TDE,1),TDE);AADVARHND{}BUE:=JS<=-20ANDWH>=85ANDWL<=10ANDOK<50ANDT2=1;CLOSEMACLOSE1AND漲幅<9.9;TDQJSANDWH>=110ANDOK>60ANDCCT>0ANDT1=1AND漲幅<9.9;A