|
MA1:=EMA(C,30); MA2:=EMA(C,900); GJ:=C,COLORWHITE; JJ:=SUM(C*V,FROMOPEN)/SUM(V,FROMOPEN),COLORYELLOW,LINETHICK1.5; 均量:=MA(V,5); 量连增:=均量>REF(均量,1) AND REF(均量,1)>REF(均量,2); 价连涨:=C>=REF(C,1) AND REF(C,1)>REF(C,2); 价量线上:=C>JJ AND V>均量; 倍量:=V>=REF(V,1)*2 ; 价新高:=C>=HHV(C,FROMOPEN); 量新高:=V>=HHV(V,FROMOPEN); 限幅:=C/DYNAINFO(3)<=1.02; 起爆:=FILTER(量连增 AND 价连涨 AND 价量线上 AND 倍量 AND 价新高 AND 量新高 AND 限幅,20); DRAWTEXT(起爆,C,'起爆'),COLOR00FFFF; DRAWICON(起爆,C,1); STICKLINE(起爆,C,JJ,1,0),COLOR1000FF; VV:=BARSSINCE(起爆); 起爆价:REF(C,VV),LINETHICK2; 起爆时间:=REF(TIME/10000,VV); 收益:=(DYNAINFO(7)-起爆价)/起爆价*100; DRAWICON(VV>=2,起爆价,13),NODRAW; DRAWTEXT_FIX(1,0,0,0,'起爆时间:'),COLOR00FFFF; DRAWNUMBER_FIX(1,0.1,0,0,CONST(起爆时间)),COLOR00FFFF; DRAWTEXT_FIX(1,0.2,0,0,'起爆价:'),COLOR00FFFF; DRAWNUMBER_FIX(1,0.26,0,0,CONST(起爆价)),COLOR00FFFF; DRAWTEXT_FIX(1,0.33,0,0,'收益:'),COLOR00FFFF; DRAWNUMBER_FIX(1,0.38,0,0,CONST(收益)),COLOR00FFFF; UR:=10;LR:=10; {线性回归线} TC1:=IF(H=HHV(H,8*UR),H,DRAWNULL); TC2:=CONST(BARSLAST(TC1=H))+1; UP:CONST(IF(TC2=1,H,REF(H,TC2-1))); BC1:=IF(L=LLV(L,8*LR),L,DRAWNULL); BC2:=CONST(BARSLAST(BC1=L))+1; LL:CONST(IF(BC2=1,L,REF(L,BC2-1))); LP:=CURRBARSCOUNT<=BC2 AND L=LL;{低点定位} HP:=CURRBARSCOUNT<=TC2 AND H=UP;{高点定位} STICKLINE(IF(BC2>TC2,HP,LP),LL,UP,0,0),COLOR628962; STICKLINE(IF(BC2>TC2,LP,HP),LL,UP,0,0),COLOR628962; NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));{用时} LR1:=FORCAST(C,NOD+1); NP:IF(CURRBARSCOUNT<=MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8;{近点} LR2:=SLOPE(C,NOD+1); LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1))); FP:NP-LR3*(NOD),POINTDOT,COLOR93BDA8;{远点} EQU:(NP+FP)/2,POINTDOT,COLOR93BDA8; AD:=ABS(NP-FP);{高差}; DBL:=BARSLAST(BC1!=DRAWNULL)+1; DBH:=BARSLAST(TC1!=DRAWNULL)+1; BSP:=IF(BC2>TC2,DBL,DBH)-1; LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP); AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND H>LRL,H,LRL); AT2:=HHV(AT1-LRL,MAX(BC2,TC2)); AT3:=CONST(BARSLAST(AT1-LRL=AT2)); AT4:=CONST(IF(AT3=0,H,REF(H,AT3))); AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3))); ATL:=LRL+AT5; UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L<LRL,L,LRL); UT2:=HHV(LRL-UT1,MAX(BC2,TC2)); UT3:=CONST(BARSLAST(LRL-UT1=UT2)); UT4:=CONST(IF(UT3=0,H,REF(H,UT3))); {WWW.GUPANG.COM 股旁网_通达信指标公式} UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3))); UTL:=LRL-UT5; RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11)));{限制高} RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11)));{限制低} 中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLOR628962; 上轨:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLOR628962; 下轨:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLOR628962; N1:=18;N2:=36;N3:=55; EM1:=EMA(C,N1),NODRAW; EM2:=EMA(C,N2),COLORRED; EM3:=EMA(C,N3),COLORGREEN; TJ:=BETWEEN(EM2,EM1,EM3); DRAWICON(TJ=0,L,14); B1:='<-----------------财富平台'; DRAWTEXT(VOL=HHV(VOL,20),C ,B1),COLORRED; VARM2:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100; VARM3:=SMA(SMA(VARM2,9,4),9,4)/7.777777; VARM4:=EMA(VARM3,5); VARM5:=3*VARM3-2*VARM4; AAM:=CROSS(VARM5,VARM3) AND VARM3<1.7777777 AND C>O; VARM6:=(2*CLOSE+HIGH+LOW)/4; VARM7:=LLV(LOW,13); VARM8:=HHV(HIGH,13); VARM9:=EMA((VARM6-VARM7)/(VARM8-VARM7)*100,13); VARMA:=EMA(0.667*REF(VARM9,1)+0.333*VARM9,2); DRAWTEXT(AAM,L,'区域底部'),COLORMAGENTA; {立体K线部分} STICKLINE(C>=0,C,O,3,0),COLOR0000AA; STICKLINE(C>=0,C,O,2.5,0),COLOR0000BB ; STICKLINE(C>=0,C,O,1.5,0),COLOR0000CC ; STICKLINE(C>=0,C,O,1,0),COLOR0000EE; STICKLINE(C>=0,H,L,0,0),COLOR0000FF; STICKLINE(C<O,O,C,3,0),COLOR005500; STICKLINE(C<O,O,C,0.6,0),COLOR007700; STICKLINE(C<O,L,H,0.00001,0),COLOR007700; 1.智能诊断 T1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),STRCAT('敢死队席位：',EXTERNSTR(0,13)),''); T2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),STRCAT('智能诊断：',EXTERNSTR(0,12)),''); T3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),STRCAT('年报业绩：',EXTERNSTR(0,8)),''); T4:=IF(FINDSTR(EXTERNSTR(0,10),'，'),STRCAT('主题投资：',EXTERNSTR(0,10)),''); T5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),STRCAT('解禁日期：',EXTERNSTR(0,15)),''); T6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),STRCAT('千股千评：',EXTERNSTR(0,1)),''); T7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),STRCAT('业绩预报：',EXTERNSTR(0,14)),''); T8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),STRCAT('机构评级：',EXTERNSTR(0,11)),''); T9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),STRCAT('中报业绩：',EXTERNSTR(0,9)),''); N:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT); {本输出适用于锁定K线数为120,N可改为你习惯的K线数,见下图} HH0:=HHV(H,N); LL0:=LLV(L,N); MM0:=CONST((HH0+LL0)*0.5); S01:=CONST(IF(REF(C,N-15)>MM0,1.00,-0.08)); S02:=CONST(IF(REF(C,N-15)>MM0,-1,1)); S1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),S01+(0.08*S02),S01),NODRAW; S2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),S1+(0.08*S02),S1),NODRAW; S3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),S2+(0.08*S02),S2),NODRAW; S4:=IF(FINDSTR(EXTERNSTR(0,10),'，'),S3+(0.08*S02),S3); S5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),S4+(0.08*S02),S4); S6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),S5+(0.08*S02),S5); S7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),S6+(0.08*S02),S6); S8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),S7+(0.08*S02),S7); S9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),S8+(0.08*S02),S8); K:=IF(S1<=0,0.05,IF(S1>=0,-0.05,0)); DRAWTEXT_FIX(1,0,S1+K,0,T1)COLOR00FFFF; DRAWTEXT_FIX(1,0,S2+K,0,T2)COLORFFFFFF; DRAWTEXT_FIX(1,0,S3+K,0,T3)COLORFF00FF; DRAWTEXT_FIX(1,0,S4+K,0,T4)COLOR0088FF; DRAWTEXT_FIX(1,0,S5+K,0,T5)COLOR00FF00; DRAWTEXT_FIX(1,0,S6+K,0,T6)COLOR0000FF; DRAWTEXT_FIX(1,0,S7+K,0,T7)COLOR00CCFF; DRAWTEXT_FIX(1,0,S8+K,0,T8)COLORFF88FF; DRAWTEXT_FIX(1,0,S9+K,0,T9)COLORBBFFFF; WN:=P;{原码 N:=3;} WA1:=REF(H,WN)=HHV(H,2*WN+1); WB1:=FILTER(WA1,WN); WC1:=BACKSET(WB1,WN+1); WD1:=FILTER(WC1,WN);{高点} WA2:=REF(L,WN)=LLV(L,2*WN+1); WB2:=FILTER(WA2,WN); WC2:=BACKSET(WB2,WN+1); WD2:=FILTER(WC2,WN);{低点} WR1:=BACKSET(ISLASTBAR,BARSLAST(WD1)+1); WS1:=WR1>REF(WR1,1); {前一高} WT1:=BACKSET(ISLASTBAR,BARSLAST(WD2)+1); WU1:=WT1>REF(WT1,1); {前一低} WR2:=BACKSET(WS1,REF(BARSLAST(WD1),1)+2); WS2:=WR2>REF(WR2,1); {前二高} WT2:=BACKSET(WU1,REF(BARSLAST(WD2),1)+2); WU2:=WT2>REF(WT2,1); {前二低} WR3:=BACKSET(WS2,REF(BARSLAST(WD1),1)+2); WS3:=WR3>REF(WR3,1); {前三高} WT3:=BACKSET(WU2,REF(BARSLAST(WD2),1)+2); WU3:=WT3>REF(WT3,1); {前三低} WR4:=BACKSET(WS3,REF(BARSLAST(WD1),1)+2); WS4:=WR4>REF(WR4,1); {前四高} WT4:=BACKSET(WU3,REF(BARSLAST(WD2),1)+2); WU4:=WT4>REF(WT4,1); {前四高} 压力A:=DRAWLINE(WS2,H,WS1,H,1),COLOR0000FF; {★压力１:} 支撑A:=DRAWLINE(WU2,L,WU1,L,1),COLOR0000FF;{★支撑１:} 压力B:=DRAWLINE(WS3,H,WS2,H,1),COLOR999999; {★压力２:} 支撑B:=DRAWLINE(WU3,L, WU2,L,1),COLOR999999;{★支撑２:} IF(BETWEEN(压力A,HH,LH),压力A,DRAWNULL),COLOR0000FF; IF(BETWEEN(支撑A,HH,LH),支撑A,DRAWNULL),COLOR0000FF; IF(BETWEEN(压力B,HH,LH),压力B,DRAWNULL),COLOR999999; IF(BETWEEN(支撑B,HH,LH),支撑B,DRAWNULL),COLOR999999; 2. 生命线:=MA(C,60); 牛熊线:=MA(C,120); V1:=(C+H+L)/3; MA3:=MA(V1,2); MA5:=MA(V1,5); DRAWBAND(MA2,RGB(200,50,55),MA5,RGB(0,100,50)); IF(生命线>=牛熊线,生命线,DRAWNULL),COLORRED; IF(牛熊线>=生命线,牛熊线,DRAWNULL),COLORFF9900; IF(生命线>=牛熊线,牛熊线,DRAWNULL),COLOR00FFFF; IF(牛熊线>=生命线,生命线,DRAWNULL),COLOR00FF00; DRAWTEXT_FIX(1,0.0,0.00,0,EXTERNSTR(0,1))COLOR0077FF; 3. JJ:=(3*C+H+L+O)/6; VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1); LJL:=FILTER(TJ1,5); DRAWTEXT_FIX(1,0.00,0.02,0,'所属行业：'),COLORYELLOW; DRAWTEXT_FIX(1,0.07,0.02,0,HYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.14,0.02,0,'所属地区：'),COLORYELLOW; DRAWTEXT_FIX(1,0.21,0.02,0,DYBLOCK),COLORYELLOW; N:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT); HH0:=HHV(H,N); LL0:=LLV(L,N); MM0:=CONST((HH0+LL0)*0.5); S01:=CONST(IF(REF(C,N-15)>MM0,1.00,-0.08)); S02:=CONST(IF(REF(C,N-15)>MM0,-1,1)); S1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),S01+(0.08*S02),S01),NODRAW; S2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),S1+(0.08*S02),S1),NODRAW; S3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),S2+(0.08*S02),S2),NODRAW; S4:=IF(FINDSTR(EXTERNSTR(0,10),'，'),S3+(0.08*S02),S3); S5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),S4+(0.08*S02),S4); S6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),S5+(0.08*S02),S5); S7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),S6+(0.08*S02),S6); S8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),S7+(0.08*S02),S7); S9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),S8+(0.08*S02),S8); K:=IF(S1<=0,0.05,IF(S1>=0,-0.05,0)); T1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),STRCAT('敢死队席位：',EXTERNSTR(0,13)),''); T2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),STRCAT('智能诊断：',EXTERNSTR(0,12)),''); T3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),STRCAT('年报业绩：',EXTERNSTR(0,8)),''); T4:=IF(FINDSTR(EXTERNSTR(0,10),'，'),STRCAT('主题投资：',EXTERNSTR(0,10)),''); T5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),STRCAT('解禁日期：',EXTERNSTR(0,15)),''); T6:=IF(FINDSTR(EXTERNSTR(0,1),'，'),STRCAT('千股千评：',EXTERNSTR(0,1)),''); T7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),STRCAT('业绩预报：',EXTERNSTR(0,14)),''); T8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),STRCAT('机构评级：',EXTERNSTR(0,11)),''); T9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),STRCAT('中报业绩：',EXTERNSTR(0,9)),''); {DRAWTEXT_FIX(1,0,S1+K,0,T1)COLOR00FFFF;} DRAWTEXT_FIX(1,0.00,0.12,0,T2),COLOR00FF00; {DRAWTEXT_FIX(1,0.00,0.1,0,T3),COLORFF00FF;} DRAWTEXT_FIX(1,0.30,0.02,0,T4),COLOR0088FF; DRAWTEXT_FIX(1,0.30,0.07,0,T5)COLOR00FF00; DRAWTEXT_FIX(1,0.00,0.92,0,T6),COLOR00FFFF; DRAWTEXT_FIX(1,0.00,0.07,0,T7),COLOR00CCFF; {DRAWTEXT_FIX(1,0,S8+K,0,T8)COLORFF88FF;} {DRAWTEXT_FIX(1,0,S9+K,0,T9)COLORBBFFFF;} {DRAWTEXT_FIX(1,0.00,0.25,0,'绿芯-高位出货坚决撤离为佳'),COLOR00FF00,LINETHICK1;} {DRAWTEXT_FIX(1,0.00,0.3,0,'蓝芯-主力低位深度洗盘或高位出货坚决'),COLORFF0000,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.35,0,'白芯-主力轻度洗盘'),COLORFFFFFF,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.4,0,'粉芯-主力在做高抛低吸或低吸高抛'),COLORFF00FF,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.45,0,'红芯-主力吸筹进货积极主动'),COLOR0000FF,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.5,0,'黄芯-主力吸筹进货强并且成交量出现黄金柱'),COLORYELLOW,LINETHICK1;} VAR111:=ZIG(3,13); STICKLINE((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),CLOSE,OPEN,3,0),COLOR66FF00; DRAWTEXT_FIX(STICKLINE((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),CLOSE,OPEN,5,0),0.00,0.11,0,''),COLOR00FF00,LINETHICK1; 天线:=MA(REF(HHV(C,30),1),2),LINETHICK3,COLORMAGENTA; 地线:=MA(REF(LLV(C,30),1),2),COLORGREEN,LINETHICK3; 4.主力进出 {PP超级资金流} 流通盘:=CAPITAL/1000000,COLOR7F00FF,LINETHICK0; ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算} SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算} ZSHTL:=SHCM/(ZLCM+SHCM)*200;{//散户套牢筹码比率} ZZLKP:=ZLCM/(ZLCM+SHCM)*200;{//主力控盘筹码比率} ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量} ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数} ZSHJJ:=EMA(ZSHTL,89);{//散户警戒} ZZLJJ:=EMA(ZZLKP,89);{//主力警戒} ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//资金流入强度} SH8:=EMA(ZSHTL,8); DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0); 散户套牢线1:=INTPART(ZSHTL),COLORFFEEBB,LINETHICK2; 主力控盘线1:=INTPART(ZZLKP),COLOR4D4DFF,LINETHICK2; DRAWBAND(主力控盘线1,RGB(0,255,255),散户套牢线1,RGB(50,50,50)); {柱状线} STICKLINE(((主力控盘线1>REF(主力控盘线1,1)) AND (主力控盘线1>100)),主力控盘线1,散户套牢线1,2,0),COLOR8000FF; 主力:INTPART(ZZLKP),COLOR4D4DFF,LINETHICK2; 散:INTPART(ZSHTL),COLORFFEEBB,LINETHICK2; {资金流入线:ZJLRQD,,COLOR7F00FF,LINETHICK2; 资金强弱线:15,COLORFF80FF,LINETHICK2,CROSSDOT; 控盘临界线:55,COLORFF937F,LINETHICK2,CROSSDOT; 强势控盘线:75,COLORFF3399,LINETHICK2,CROSSDOT;}; {主力监控} B1:=(HHV(H,35)-C)/(HHV(H,35)-LLV(LOW,35))*100-35; B2:=SMA(B1,35,1)+100; B3:=(C-LLV(L,35))/(HHV(H,35)-LLV(L,35))*100; B4:=SMA(B3,3,1); B5:=SMA(B4,3,1)+100; B6:=B5-B2; 控盘程度:(IF(B6>1,B6-1,0))*2.5,COLORRED,LINETHICK2; 控盘度:100,COLORWHITE; {柱状线} 控盘上:IF(控盘程度>REF(控盘程度,1), 控盘程度,DRAWNULL), STICK,COLORYELLOW,LINETHICK1; 控盘下:IF(控盘程度<REF(控盘程度,1), 控盘程度,DRAWNULL), STICK,COLORFF9900,LINETHICK1; 进:IF(控盘程度>REF(控盘程度,1),5,DRAWNULL),CIRCLEDOT,COLORYELLOW; 出:IF(控盘程度<REF(控盘程度,1),5,DRAWNULL),CIRCLEDOT,COLORFF9900; {SAR} 持币:IF(SAR(10,2,20)>=H,100,DRAWNULL),CIRCLEDOT,COLORBLUE; 持股:IF(SAR(10,2,20)<=L,100,DRAWNULL),CIRCLEDOT,COLORRED; 5.分时主图 AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,N))/MA(CLOSE,N); °2??:DMA((2*CLOSE+LOW+HIGH)/4,AA),LINETHICK3,COLORMAGENTA; CC:=(CLOSE/??°2??); MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3); MAAA:=((MA1-??°2??)/??°2??)/3; TMP:=MA1-MAAA*MA1; J:IF(TMP<=??°2??,??°2??,DRAWNULL),LINETHICK3,COLORCYAN; A:=TMP,LINETHICK2,COLORYELLOW; X:IF(TMP<=??°2??,TMP,DRAWNULL),LINETHICK,COLORGREEN; 涨家数:INDEXADV,COLOR0080FF,NODRAW; 跌家数:INDEXDEC,COLORGREEN,NODRAW; 6. VAR111:=ZIG(3,13); STICKLINE((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),CLOSE,OPEN,5,0),COLOR66FF00; DRAWTEXT_FIX(1,0.00,0,0,'所属行业：'),COLORYELLOW; DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.14,0,0,'所属地区：'),COLORYELLOW; DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.05,0,'千股千评：'),COLORYELLOW; DRAWTEXT_FIX(1,0.07,0.05,0,EXTERNSTR(0,1)),COLORYELLOW; 7. TT:=240/FROMOPEN; 比:=TT; 促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED; AY2:=EMA(CLOSE,12)-EMA(CLOSE,26); AZ2:=EMA(AY2,9); LT2:=(AY2-AZ2); L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT; ZGD:=HHV(H,80)*0.99; ZGD2:=CONST(ZGD); ZDD:=LLV(L211,80); ZDD2:=CONST(ZDD); YYA4:=MA(CLOSE,20); YYA5:=(CLOSE > MA(CLOSE,5)); YYA6:=(MA(CLOSE,5) > MA(CLOSE,10)); YYA7:=(CLOSE > MA(CLOSE,10)); YYA8:=(MA(CLOSE,5) > MA(CLOSE,20)); YYA9:=(CLOSE > MA(CLOSE,20)); YYA10:=REF(YYA4,1); YYA11:=(YYA4 > YYA10); YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 - 10))) + IF(YYA11,10,(0 - 10))); DSLX:=(CLOSE / INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); YYV1:=MA(VOL,5); YYV2:=MA(VOL,10); J1:=CONST(IF( YYAVX > 0,200,100)); J2:=CONST(IF( YYAVX > 0,00,100)); J3:=CONST(IF( YYAVX > 0,100,100)); ZGD3:=ZGD2; ZDD3:=ZDD2; ZGD4:=ZGD2; 天使:=EMA(C,2),COLOR000000; 魔鬼:=EMA(SLOPE(C,21)*20+C,42),COLOR000000; 买:=CROSS(天使,魔鬼); 卖:=CROSS(魔鬼,天使); DRAWICON(买,L*0.97,1); DRAWTEXT(买,L*0.95,'B'),COLORYELLOW; DRAWICON(卖,H*1.03,2); DRAWTEXT(卖,H*1.05,'S'),COLORWHITE; STICKLINE(天使>=魔鬼,LOW,HIGH,0.01,0),COLOR0000DD; STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,1),COLORRED; {STICKLINE(天使>=魔鬼,CLOSE,OPEN,3,0),COLOR0000CC; STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,0),COLOR0000DD; STICKLINE(天使>=魔鬼,CLOSE,OPEN,1,0),COLOR0000FF;} {STICKLINE(天使<魔鬼,CLOSE,OPEN,1,0),COLOREEEE00; STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORDDDD00; STICKLINE(天使<魔鬼,CLOSE,OPEN,3,0),COLORCCCC00;} STICKLINE(天使<魔鬼,LOW,HIGH,0.01,0),COLORFFDD00; STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORFFFF00; STICKLINE(CROSS(天使,魔鬼),OPEN,CLOSE,2.5,0),COLORYELLOW; STICKLINE(CROSS(魔鬼,天使),OPEN,CLOSE,2.5,0),COLORWHITE; 情况1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)),NODRAW; 情况2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)),1,0)); 情况4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 <= YYV2)) AND (DSLX < DSLX1)),1,0)); 情况5:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)); 情况8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); 情况9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况11:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)),NODRAW; 情况12:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); 情况13:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况14:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0)); 情况15:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0)); 情况16:=CONST(IF(((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)),1,0)); 大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 >= YYV2)),1,0)); 大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 < YYV2)),1,0)); 大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0)); 大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 < YYV2)),1,0)); 大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)),1,0)); 大盘6:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)),1,0)); 大盘7:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)),1,0)); 大盘8:=CONST(IF((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)),1,0)); MFI:=(HIGH-LOW)*1000000/(VOL*比); 绿灯:=MFI>=REF(MFI,1)AND VOL*比>=REF(VOL,1); MMM1:=CONST(绿灯); 衰退:=MFI<REF(MFI,1)AND VOL*比<REF(VOL,1); MMM2:=CONST(衰退); 伪装:=MFI>=REF(MFI,1)AND VOL*比<REF(VOL,1); MMM3:=CONST(伪装); 蛰伏:=MFI<REF(MFI,1)AND VOL*比>=REF(VOL,1); MMM4:=CONST(蛰伏); TS1:=IF(情况1=1,0.7+0.06,0.7); TS2:=IF(情况2=1,TS1+0.06,TS1); TS3:=IF(情况3=1,TS2+0.06,TS2); TS4:=IF(情况4=1,TS3+0.06,TS3); TS5:=IF(情况5=1,TS4+0.06,TS4); TS6:=IF(情况6=1,TS5+0.06,TS5); TS7:=IF(情况7=1,TS6+0.06,TS6); TS8:=IF(情况8=1,TS7+0.06,TS7); TS9:=IF(情况9=1,TS8+0.06,TS8); TS10:=IF(情况10=1,TS9+0.06,TS9); TS11:=IF(情况11=1,TS10+0.06,TS10); TS12:=IF(情况12=1,TS11+0.06,TS11); TS13:=IF(情况13=1,TS12+0.06,TS12); TS14:=IF(情况14=1,TS13+0.06,TS13); TS15:=IF(情况15=1,TS14+0.06,TS14); TS16:=IF(情况16=1,TS15+0.06,TS15); TS17:=IF(大盘1=1,TS16+0.06,TS16); TS18:=IF(大盘2=1,TS17+0.06,TS17); TS19:=IF(大盘3=1,TS18+0.06,TS18); TS20:=IF(大盘4=1,TS19+0.06,TS19); TS21:=IF(大盘5=1,TS20+0.06,TS20); TS22:=IF(大盘6=1,TS21+0.06,TS21); TS23:=IF(大盘7=1,TS22+0.06,TS22); TS24:=IF(大盘8=1,TS23+0.06,TS23); TS25:=IF(MMM1=1,TS24+0.06,TS24); TS26:=IF(MMM2=1,TS25+0.06,TS25); TS27:=IF(MMM3=1,TS26+0.06,TS26); TS28:=IF(MMM4=1,TS27+0.06,TS27); DRAWTEXT_FIX(情况1=1 ,0,TS1,0,'量能理想,明显走强,中线参与，仓位在2/3左右'),COLORFF00FF; DRAWTEXT_FIX(情况2=1 ,0,TS2,0,'走势趋强量能不足，短线进场，仓位在1/2左右'),COLORFF00FF; DRAWTEXT_FIX(情况3=1 ,0,TS3,0,'量价良好，并没有明显走强，短线进场，仓位1/2左右。'),COLORFF00FF; DRAWTEXT_FIX(情况4=1 ,0,TS4,0,'形态尚可，量能不足，未完全走强,短线参与，仓位1/3左右。'),COLORFF00FF; DRAWTEXT_FIX(情况5=1 ,0,TS5,0,'形态变坏，走势尚可，重仓减大半，清仓者观望。'),COLOR00FFFF; DRAWTEXT_FIX(情况6=1 ,0,TS6,0,'随大盘一起下跌，明显缩量走势，考虑大盘风险，减持或清仓。'),COLOR00FFFF; DRAWTEXT_FIX(情况7=1 ,0,TS7,0,'该股放量下跌，走势明显偏弱，离场观望。'),COLORFFFFFF; DRAWTEXT_FIX(情况8=1 ,0,TS8,0,'该股缩量下跌，走势偏弱，离场观望。'),COLORFFFF00; DRAWTEXT_FIX(情况9=1 ,0,TS9,0,'该股形态良好，强势明显，量能充足，可以继续持有。'),COLOR00FFFF; DRAWTEXT_FIX(情况10=1,0,TS10,0,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险'),COLOR00FFFF; DRAWTEXT_FIX(情况11=1,0,TS11,0,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。'),COLORFFFFFF; DRAWTEXT_FIX(情况12=1,0,TS12,0,'该股走势趋弱，量能不足，减持大部分筹码'),COLORFFFF00; DRAWTEXT_FIX(情况13=1,0,TS13,0,'该股形态不佳，注意成交量的变化，但目前不适合参与。'),COLORFFFF00; DRAWTEXT_FIX(情况14=1,0,TS14,0,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。'),COLORFFFF00; DRAWTEXT_FIX(情况15=1,0,TS15,0,'有走强迹象，但量能不足，趋势不明，不适合操作'),COLORFFFF00; DRAWTEXT_FIX(情况16=1,0,TS16,0,'该股走势太弱，没有参与价值。'),COLORFFFFFF; DRAWTEXT_FIX(大盘1,0,TS17,0,'总势量能理想,2/3仓位, 前一轮下跌，是否最佳买点，否则谨慎介入。'),COLOR00FF00; DRAWTEXT_FIX(大盘2,0,TS18,0,'总势趋强，量能不足，若前一轮下跌，短线进场1/2，量能放大加仓。'),COLORFF00FF; DRAWTEXT_FIX(大盘3,0,TS19,0,'总势形态走坏，重仓者可以减去大部分仓位。'),COLORAAAAAA; DRAWTEXT_FIX(大盘4,0,TS20,0,'总势缩量调整，注意风险，短线清仓观望。'),COLORFFFFFF; DRAWTEXT_FIX(大盘5,0,TS21,0,'总势走势良好，量能理想，可以继续持有强势股。'),COLOR00FFFF; DRAWTEXT_FIX(大盘6,0,TS22,0,'总势形态良好，但量能稍显不足，随时准备减仓'),COLOR00FF00; DRAWTEXT_FIX(大盘7,0,TS23,0,'总势趋势不明，注意成交量变化，目前不适宜进场。'),COLORFFFFFF; DRAWTEXT_FIX(大盘8,0,TS24,0,'总势趋势向下，量能萎缩，不适合进场。'),COLORFFFFFF; DRAWTEXT_FIX(MMM1,0,TS25,0,'［绿灯］实计交易量增加。MFI促进指数增加。'),COLORFFFFFF; DRAWTEXT_FIX(MMM2,0,TS26,0,'［衰退］实计交易量减少。MFI促进指数减少。'),COLORGREEN; DRAWTEXT_FIX(MMM3,0,TS27,0,'［伪装］实计交易量减少。MFI促进指数增加。'),COLORGREEN; DRAWTEXT_FIX(MMM4,0,TS28,0,'［蛰伏］实计交易量增加。MFI促进指数减少。'),COLORYELLOW; 8.多空天地线 VAR2:=485; VAR3:=222; VAR4:=96; VAR5:=MA(HHV(HIGH,VAR2),17); VAR6:=MA(HHV(HIGH,VAR3),17); VAR7:=MA(HHV(HIGH,VAR4),17); VAR8:=MA(LLV(LOW,VAR2),17); VAR9:=MA(LLV(LOW,VAR3),17); VARA:=MA(LLV(LOW,VAR4),17); VARB:=MA((VAR8*0.96+VAR9*0.96+VARA*0.96+VAR5*0.558+VAR6*0.558+VAR7*0.558)/6,17); VARC:=MA((VAR8*1.25+VAR9*1.23+VARA*1.2+VAR5*0.55+VAR6*0.55+VAR7*0.65)/6,17); VARD:=MA((VAR8*1.3+VAR9*1.3+VARA*1.3+VAR5*0.68+VAR6*0.68+VAR7*0.68)/6,17); VARE:=MA((VARB*3+VARC*2+VARD)/6*1.738,17); VARF:=MA((VARB*2.38+VARC*2.18+VARD*1.85+VAR5*1.05)/4,17); VAR10:=MA((VARD+VARE)*0.5,17); 满仓: VARB; 半仓: VARC; 低吸: VARD; 中线: VAR10; 高抛: VARE; 出货: VARF; 9.DDX最新 N:=20;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW); QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))); QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN)))); QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))); QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ))); DDX:((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000),COLOR00AAAA,LINETHICK; DX:=MA(DDX,5)*N; STICKLINE(DDX>0,0,DDX,3,0),COLOR000088; STICKLINE(DDX>0,0,DDX,2.5,0),COLOR0000AA; STICKLINE(DDX>0,0,DDX,1.5,0),COLOR0000CC; STICKLINE(DDX>0,0,DDX,1,0),COLOR0000EE; STICKLINE(DDX<0,0,DDX,3,0),COLOR008800; STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00; STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00; STICKLINE(DDX<0,0,DDX,1,0),COLOR00EE00; DDX1:SMA(DX,3,1),COLORFFFFFF; DDX2:SMA(DDX1,3,1),COLOR00FFFF; DDX3:EMA(DDX2,5),COLORFF00FF; 预警:DDX>0 AND MA(V,5)>MA(MA(V,5),5) AND CROSS(DDX1,DDX2),LINETHICK; 天:=COUNT(DDX>0,5),COLORRED; DRAWTEXT(预警,DDX*1.06,'★'),LINETHICK3,COLOR00FFFF; 10.DDY最新 N:=22;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW); QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))); QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN)))); QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))); QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ))); DDY:((QJ2+QJ4)-(QJ1+QJ3))/IF(CAPITAL=0,1000000,10000),COLOR00DD00,LINETHICK; DY:=MA(DDY,5)*N; STICKLINE(DDY<0,0,DDY,3,0),COLORFF8800; STICKLINE(DDY<0,0,DDY,2.5,0),COLORFFAA00; STICKLINE(DDY<0,0,DDY,1.5,0),COLORFFCC00; STICKLINE(DDY<0,0,DDY,1,0),COLORFFEE00; STICKLINE(DDY>0,0,DDY,3,0),COLOR880088; STICKLINE(DDY>0,0,DDY,2.5,0),COLORAA00AA; STICKLINE(DDY>0,0,DDY,1.5,0),COLORCC00CC; STICKLINE(DDY>0,0,DDY,1,0),COLOREE00EE; DDY1:SMA(DY,3,1),COLORFFFFFF; DDY2:SMA(DDY1,3,1),COLOR00FFFF; DDY3:EMA(DDY2,5),COLORFF00FF; 预警:DDY>0 AND CROSS(DDY1,DDY2) AND DDY1<0,LINETHICK; DRAWTEXT(预警,DDY*1.06,'★'),LINETHICK3,COLOR00BBFF; 11.分时买卖主 AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,N))/MA(CLOSE,N); °2??:DMA((2*CLOSE+LOW+HIGH)/4,AA),LINETHICK3,COLORMAGENTA; CC:=(CLOSE/??°2??); MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3); MAAA:=((MA1-??°2??)/??°2??)/3; TMP:=MA1-MAAA*MA1; J:IF(TMP<=??°2??,??°2??,DRAWNULL),LINETHICK3,COLORCYAN; A:TMP,LINETHICK2,COLORYELLOW; X:IF(TMP<=??°2??,TMP,DRAWNULL),LINETHICK2,COLORGREEN; 12.分时凤舞九天 RCC:=DYNAINFO(3); S2:=SMA(C,2,1); S6:=SMA(C,3,1); DK:=8*(S2-S6); KK:=IF(PERIOD=8,0.95,1); XG:HHV(H,480),COLORRED,LINETHICK9; STICKLINE(FILTER(CROSS(C,REF(XG,1)),10),C*0.99,C,8,0),COLORYELLOW; DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10),C*0.99,'★多头上攻+先看量比曲线+逢高卖出■★★★★★★★★★★ '),COLORRED; XY:LLV(H,480),COLOR00FF00,LINETHICK9; STICKLINE(FILTER(CROSS(C,REF(XY,1)),10),C*0.99,C,8,0),COLOR00FF00; DRAWTEXT(FILTER(CROSS(C,REF(XY,1)),10),C*0.99,'★空头砸盘+先看量比曲线+慎重补仓■★★★★★★★★★★★★★'),COLORYELLOW; QM0:=ZST1.净流入#DAY; QM1:=ZST1.超大单#DAY; QM2:=ZST1.大单#DAY; QM3:=ZST1.中单#DAY; QM4:=ZST1.小单#DAY; QMAXV:=ZST1.DAZHI#DAY; {DRAWRECTREL(0,649,252,999.2,IF(120,RGB(10,0,0),0));} DRAWRECTREL(0,CONST(950-(ABS(QM0)*200/QMAXV)),40,950,IF(CONST(QM0)>0,RGB(100,0,0),RGB(0,50,0))); DRAWRECTREL(50,CONST(950-(ABS(QM1)*200/QMAXV)),90,950,IF(CONST(QM1)>0,RGB(100,0,0),RGB(0,50,0))); DRAWRECTREL(100,CONST(950-(ABS(QM2)*200/QMAXV)),140,950,IF(CONST(QM2)>0,RGB(100,0,0),RGB(0,50,0))); DRAWRECTREL(150,CONST(950-(ABS(QM3)*200/QMAXV)),190,950,IF(CONST(QM3)>0,RGB(100,0,0),RGB(0,50,0))); DRAWRECTREL(200,CONST(950-(ABS(QM4)*200/QMAXV)),240,950,IF(CONST(QM4)>0,RGB(100,0,0),RGB(0,50,0))); DRAWTEXT_FIX(CURRBARSCOUNT=1,0,1,0,'净流'),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.053,1,0,'超大'),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.103,1,0,'大户'),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.153,1,0,'中户'),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.204,1,0,'散户'),COLORYELLOW; 分时线:CLOSE,COLORWHITE; 大单动向:="DDX.大单动向#DAY",NODRAW; DRAWTEXT_FIX(1,0.537,0.99,0,'DDX:'),COLORWHITE; DRAWNUMBER_FIX(1,0.577,0.99,0,CONST(大单动向)),COLORRED; 涨跌动因:="DDY.涨跌动因#DAY",NODRAW; DRAWTEXT_FIX(1,0.637,0.99,0,'DDY:'),COLORWHITE; DRAWNUMBER_FIX(1,0.677,0.99,0,CONST(涨跌动因)),COLORRED; 大单差分:="DDZ.大单差分#DAY",NODRAW; DRAWTEXT_FIX(1,0.737,0.99,0,'DDZ:'),COLORWHITE; DRAWNUMBER_FIX(1,0.777,0.99,0,CONST(大单差分)),COLORRED; 均线:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)), 1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORMAGENTA ,LINETHICK8; AAA:DYNAINFO(5),COLORWHITE,LINETHICK1,POINTDOT;{最高} BBB:DYNAINFO(6),COLORWHITE,LINETHICK1,POINTDOT;{最低} CCC:=AAA-BBB;中G:(AAA+BBB)/2,COLORWHITE,LINETHICK1,POINTDOT;{中} 上顶:BBB+CCC*7/8,COLORWHITE,DOTLINE; 阻力:BBB+CCC*2/3,COLORWHITE,LINETHICK1,POINTDOT; 支撑:BBB+CCC/3,COLORWHITE,LINETHICK1,POINTDOT; 下底:BBB+CCC*1/8,COLORWHITE,DOTLINE; DRAWNUMBER(CURRBARSCOUNT=12,AAA*0.9995,AAA),COLORFFAAFF; DRAWNUMBER(CURRBARSCOUNT=12,BBB,BBB),COLORDDDD00; DRAWNUMBER(CURRBARSCOUNT=12,中G,中G),COLORDDDDDD; DRAWNUMBER(CURRBARSCOUNT=12,上顶,上顶),COLOR00FFFF; DRAWNUMBER(CURRBARSCOUNT=12,阻力,阻力),COLOR00FFFF; DRAWNUMBER(CURRBARSCOUNT=12,支撑,支撑),COLOR00FFFF; DRAWNUMBER(CURRBARSCOUNT=12,下底,下底),COLOR00FFFF; DRAWTEXT(CURRBARSCOUNT=20,AAA*0.9995,'最高:'),COLORFFAAFF; DRAWTEXT(CURRBARSCOUNT=20,BBB,'最低:'),COLORGREEN; DRAWTEXT(CURRBARSCOUNT=20,上顶,'上顶:'),COLOR00FF00; DRAWTEXT(CURRBARSCOUNT=20,阻力,'阻力:'),COLORFFFF00; DRAWTEXT(CURRBARSCOUNT=20,支撑,'支撑:'),COLORFFFF00; DRAWTEXT(CURRBARSCOUNT=20,下底,'下底:'),COLOR00FFFF; DRAWTEXT(CURRBARSCOUNT=20,中G,'平衡:'),COLOREEEEEE; DRAWTEXT(LONGCROSS(下底,分时线,2),BBB*1.001,'★买★'),COLORRED;{吸} DRAWTEXT(LONGCROSS(分时线,上顶,2),分时线,'★卖★'),COLORRED;{抛}; 涨家数:INDEXADV,COLOR0080FF,NODRAW; 跌家数:INDEXDEC,COLORGREEN,NODRAW; 13.黑马线 LS261:=EMA(CLOSE,2); LS262:=EMA(CLOSE,150); LS26:=LS261-LS262; LS27:=EMA(LS26,100); LS28:=2*(LS26-LS27); LS29:=POW(LS28,3)*0.1+POW(LS28,1); 黑马线:IF(LS28>0.1,LS29,0)*5,COLOR0066FF,LINETHICK2; 马线:EMA(黑马线,3),COLORBLUE,LINETHICK2; 量价线:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100,COLORMAGENTA,LINETHICK1; 量价1:=EMA(量价线,3),COLORWHITE; 量价2:=EMA(EMA(量价线,3),3),COLORCYAN; 启动:CROSS(黑马线,0.01)*黑马线,STICK,COLORYELLOW,LINETHICK3; DRAWICON(启动>0 AND 马线>REF(马线,1),0.2,1); {起跑指标} VAR1:=LLV(L,3)<=LLV(L,60); VAR2:=C>O AND (C/O>1.03 OR C/REF(C,1)>1.03); 起:IF(VAR1 AND VAR2,量价线,0),STICK,COLORRED,LINETHICK3; DRAWTEXT(起>0 OR 起<0 ,0.8 , '▲'),COLORRED,LINETHICK1; VAR3:=HHV(H,3)>=HHV(H,60); VAR4:=C<O AND (C/O<0.97 OR C/REF(C,1)<0.97); 跑:IF(VAR3 AND VAR4,黑马线,0),STICK,COLORFF6600,LINETHICK3; DRAWICON(跑>0,0.2,2); 14.M资金趋势 {MACD资金趋势} A:=VOL*C; B:=SUM(A,1)/SUM(VOL,1); B1:=EMA(B,17); 资金:=(B-B1)*100/B; DIFF:EMA(资金,12)-EMA(资金,26),COLORYELLOW; DEA:EMA(DIFF,9),COLORLIGRAY; MAC: 2*(DIFF-DEA), COLORSTICK; STICKLINE(MAC>=REF(MAC,1)AND MAC>0,0,MAC,3,0),COLOR0000AA;{红色} STICKLINE(MAC>=REF(MAC,1)AND MAC>0,0,MAC,2,0),COLOR0000CC; STICKLINE(MAC>=REF(MAC,1)AND MAC>0,0,MAC,1,0),COLOR0000EE; STICKLINE(MAC>=REF(MAC,1)AND MAC>0,0,MAC,0.1,0),COLOR5555FF; STICKLINE(MAC>=REF(MAC,1)AND MAC>0,0,MAC,0,0),COLOR8080FF; STICKLINE(MAC<REF(MAC,1)AND MAC>0,0,MAC,3,0),COLOR770077;{紫色} STICKLINE(MAC<REF(MAC,1)AND MAC>0,0,MAC,2,0),COLOR990099; STICKLINE(MAC<REF(MAC,1)AND MAC>0,0,MAC,1,0),COLORBB00BB; STICKLINE(MAC<REF(MAC,1)AND MAC>0,0,MAC,0,0),COLORDD00DD; STICKLINE(MAC<REF(MAC,1)AND MAC>0,0,MAC,0.1,0),COLORFF00FF; STICKLINE(MAC>REF(MAC,1)AND MAC<0,0,MAC,3,0),COLORFF0000;{蓝色} STICKLINE(MAC>REF(MAC,1)AND MAC<0,0,MAC,2,0),COLORFF5500; STICKLINE(MAC>REF(MAC,1)AND MAC<0,0,MAC,1,0),COLORFF9900; STICKLINE(MAC>REF(MAC,1)AND MAC<0,0,MAC,0,0),COLORFFFF00; STICKLINE(MAC<=REF(MAC,1)AND MAC<0,0,MAC,3,0),COLOR155500;{绿色} STICKLINE(MAC<=REF(MAC,1)AND MAC<0,0,MAC,2,0),COLOR208000; STICKLINE(MAC<=REF(MAC,1)AND MAC<0,0,MAC,1,0),COLOR2BAA00; STICKLINE(MAC<=REF(MAC,1)AND MAC<0,0,MAC,0.1,0),COLOR35D500; STICKLINE(MAC<=REF(MAC,1)AND MAC<0,0,MAC,0,0),COLOR40FF00; EMA(DIFF,26),CROSSDOT,COLORFF3333,LINETHICK1; DIFF,COLORYELLOW;DEA; 15.分时主图 AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,N))/MA(CLOSE,N); °2??:DMA((2*CLOSE+LOW+HIGH)/4,AA),LINETHICK3,COLORMAGENTA; CC:=(CLOSE/??°2??); MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3); MAAA:=((MA1-??°2??)/??°2??)/3; TMP:=MA1-MAAA*MA1; J:IF(TMP<=??°2??,??°2??,DRAWNULL),LINETHICK3,COLORCYAN; A:=TMP,LINETHICK2,COLORYELLOW; X:IF(TMP<=??°2??,TMP,DRAWNULL),LINETHICK,COLORGREEN; 涨家数:INDEXADV,COLOR0080FF,NODRAW; 跌家数:INDEXDEC,COLORGREEN,NODRAW; 16.均+量选股 VAR15:=MA(CLOSE,5); VAR16:=MA(CLOSE,13); VAR17:=MA(CLOSE,21); VAR18:=MA(CLOSE,34); VAR19:=MA(CLOSE,55); VAR20:=MA(CLOSE,144); VAR21:=MA(CLOSE,233); WW5:=RANGE(VAR15 ,O,C); QQ13:=RANGE(VAR16 ,O,C); GG21:=RANGE(VAR17 ,O,C); DD34:=RANGE(VAR18 ,O,C); WW55:=RANGE(VAR19 ,O,C); TT144:=RANGE(VAR20 ,O,C); GG233:=RANGE(VAR21 ,O,C); JJBB:=WW5+QQ13+GG21+DD34+WW55+TT144+GG233; VOLUME:=VOL; MAVOL1:=MA(VOLUME,5); MAVOL2:=MA(VOLUME,34); MAVOL3:=MA(VOLUME,144); V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1); 选股:JJBB>=3 AND V2>=1,COLORYELLOW; 17.DDX. AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0; 卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN; 大单动向:(买量+卖量)*10000/FINANCE(7),COLOR00FFFF,NODRAW; STICKLINE(大单动向<0,0,大单动向,2,0),COLORCYAN; STICKLINE(大单动向<0,0,大单动向,2,0),COLORCYAN; STICKLINE(大单动向<0,0,大单动向,2,0),COLORCYAN; STICKLINE(大单动向<0,0,大单动向,0.5,0),COLORCYAN; STICKLINE(大单动向>0,0,大单动向,2,0),COLORRED; STICKLINE(大单动向>0,0,大单动向,1,0),COLORRED; STICKLINE(大单动向>0,0,大单动向,1.5,0),COLORRED; STICKLINE(大单动向>0,0,大单动向,0.5,0),COLORRED; MA1:MA(大单动向,N)COLORYELLOW; 18.定选 位置1:=REF(HHV(H,N1),N2); 定点1:=REFDATE(位置1,DATE); 位置2:=REF(LLV(L,M1),M2); 定点2:=REFDATE(位置2,DATE); 定选1:=IF(定点2=L AND ((C-L)>(O-C) OR (O-L)>(C-O)),1,0); 定选2:IF(定点2=L AND ((HIGH-MAX(CLOSE,OPEN))>(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))*1.03 OR (MIN(CLOSE,OPEN)-LOW)>(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))*1.03),1,0); 19. DRAWTEXT_FIX(1,0.0,0.06,0,DYBLOCK),COLOR0079FF; DRAWTEXT_FIX(1,0.06,0.06,0,HYBLOCK),COLORFFFFFF; DRAWTEXT_FIX(1,0.12,0.06,0,EXTERNSTR(0,10)),COLOR0077FF; DRAWTEXT_FIX(1,0,0.12,0,STRCAT('千股千评：',EXTERNSTR(0,1))); DRAWTEXT_FIX(1,0,0.18,0,STRCAT('年报业绩：',EXTERNSTR(0,8))),COLORFF00FF; DRAWTEXT_FIX(1,0,0.24,0,STRCAT('智能诊断：',EXTERNSTR(0,12))),COLOR0000FF; DRAWTEXT_FIX(1,0.0,0.00,0,'★五里理念★： ★趋势为先，看长做短, 5线分仓, 波段操作★ ★★严守纪律, 坚决止损★★ ★★★永远不要让个股的亏损超过5-7℅!★★★'),COLORFF66FF; 20.机构持仓 换手:=V*100/CAPITAL; 主力:=MA(换手,4); 大户:=MA(换手,9); 中户:=MA(换手,17); 散户:=MA(换手,34); 均量:=(主力+大户+中户+散户)/4; 主力能量:=(主力-均量); 操盘:STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),0,主力能量,2,0),COLORRED; 减仓:STICKLINE(主力能量>=0 AND 主力能量< REF(主力能量,1),0,主力能量,2,0),COLORLIMAGENTA; 反弹:STICKLINE(主力能量<0 AND 主力能量>=REF(主力能量,1),0,主力能量,2,0),COLORLIGRAY; 寻底:STICKLINE(主力能量<0 AND 主力能量< REF(主力能量,1),0,主力能量,2,0),COLORGREEN; 21. 预高:(C+REF(C,1)+REF(C,2)+REF(C,3)+REF(C,4)+REF(C,5)+REF(C,6)+REF(C,7)+REF(C,8)+REF(C,9)+REF(C,10)+REF(C,11)+REF(C,12)+REF(C,13)+REF(C,14)+REF(C,15)+REF(C,16)+REF(C,17)+REF(C,18)+REF(C,19)+(C*1.1))/21,COLORRED,NODRAW; 预低:(C+REF(C,1)+REF(C,2)+REF(C,3)+REF(C,4)+REF(C,5)+REF(C,6)+REF(C,7)+REF(C,8)+REF(C,9)+REF(C,10)+REF(C,11)+REF(C,12)+REF(C,13)+REF(C,14)+REF(C,15)+REF(C,16)+REF(C,17)+REF(C,18)+REF(C,19)+(C*0.9))/21,COLORGREEN,NODRAW; STICKLINE(ISLASTBAR,预高,预低,0.1,0),COLORYELLOW; DRAWTEXT_FIX(1,0,0,0,STRCAT('千股千评：',EXTERNSTR(0,1))),COLORRED; DRAWTEXT_FIX(1,0,0.1,0,STRCAT('年报业绩：',EXTERNSTR(0,8))),COLORYELLOW; DRAWTEXT_FIX(1,0,0.5,0,STRCAT('中报业绩：',EXTERNSTR(0,9))),COLORBLUE; DRAWTEXT_FIX(1,0,0.6,0,STRCAT('主题投资：',EXTERNSTR(0,10))),COLORBROWN; DRAWTEXT_FIX(1,0,0.7,0,STRCAT('机构评级：',EXTERNSTR(0,11))),COLORCYAN; DRAWTEXT_FIX(1,0,0.8,0,STRCAT('智能诊断：',EXTERNSTR(0,12))),COLORRED; DRAWTEXT_FIX(1,0,1,0,STRCAT('敢死队席位：',EXTERNSTR(0,13))),COLORLIMAGENTA; DRAWTEXT_FIX(1,0.6,0,0,STRCAT('业绩预报：',EXTERNSTR(0,14))),COLORYELLOW; DRAWTEXT_FIX(1,0.6,0.1,0,STRCAT('解禁日期：',EXTERNSTR(0,15))),COLORBLUE; 22.五里1号 DRAWTEXT_FIX(1,0.0,0.06,0,DYBLOCK),COLOR0079FF; DRAWTEXT_FIX(1,0.06,0.06,0,HYBLOCK),COLORFFFFFF; DRAWTEXT_FIX(1,0.12,0.06,0,EXTERNSTR(0,10)),COLOR0077FF; DRAWTEXT_FIX(1,0,0.12,0,STRCAT('千股千评：',EXTERNSTR(0,1))); DRAWTEXT_FIX(1,0,0.18,0,STRCAT('年报业绩：',EXTERNSTR(0,8))),COLORFF00FF; DRAWTEXT_FIX(1,0,0.24,0,STRCAT('智能诊断：',EXTERNSTR(0,12))),COLOR0000FF; DRAWTEXT_FIX(1,0.0,0.00,0,'★五里理念★： ★趋势为先，看长做短, 5线分仓, 波段操作★ ★★严守纪律, 坚决止损★★ ★★★永远不要让个股的亏损超过5-7℅!★★★'),COLORFF66FF; 23.自动划线 A1:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点} A2:=REF(LOW,3)=LLV(LOW,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点} E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍} H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; H2:=D1 AND NOT(D2 AND E1>=E2); L1:=D2 AND NOT(D1 AND E1=E2); X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1)); G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);{过滤后低点} L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2)); G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点} J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1); A3:=H; B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2)); D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);{找出全部长期高点} A4:=L>REF(L,REF(BARSLAST(LD),1)+1); B4:=REF(L,REF(BARSLAST(LD),1)+1); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点} DRAWICON(HH,H*1.01,8); DRAWICON(LL,L*0.999,7); H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤，方法同前。只是不用考虑高低点出现在同一K线} X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3)); G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1); {长期低点，也可供引用} L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1; X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4)); G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1);{长期高点，也可供引用} K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1); UU:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); VV:=UU>REF(UU,1); WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2); XX:=WW>REF(WW,1); UU2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); VV2:=UU2>REF(UU2,1); WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2); XX2:=WW2>REF(WW2,1); 前一低:REF(L,BARSLAST(VV)),COLOR99FF66,LINETHICK1; 前二低:REF(L,BARSLAST(XX)),COLOR99FF66,LINETHICK1; 前一高:REF(H,BARSLAST(VV2)),COLORCYAN,LINETHICK1; 前二高:REF(H,BARSLAST(XX2)),COLORCYAN,LINETHICK1; DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1; DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1; DRAWTEXT(CURRBARSCOUNT=5,前一低*0.995,'前一低'),COLOR99FF66; DRAWTEXT(CURRBARSCOUNT=5,前二低*0.995,'前二低'),COLOR99FF66; DRAWTEXT(CURRBARSCOUNT=1,前一高*1.01,'前一高'),COLORCYAN; DRAWTEXT(CURRBARSCOUNT=1,前二高*1.01,'前二高'),COLORCYAN; 涨家数:INDEXADV,COLOR0080FF,NODRAW; 跌家数:INDEXDEC,COLORGREEN,NODRAW; 24.
|
|
|
