DPZX:=EMA(C,1),NODRAW; GGZX:=AMOUNT/V/100; 重心:=IF(C<300,GGZX,DPZX),NODRAW; 今重心:LLV(重心,2)COLORGREEN,NODRAW; ZC1:=CONST(LLV(重心,2)); ZC2:=CONST(LLV(重心,4)); VAR1:=(C+H+O+L)/4; MA5:=MA(C,5),COLOR000099; MA10:=MA(C,10),COLOR006600; MA20:=MA(C,20),COLOR005555; ZB1:=EMA(C,34); 长期趋势:EMA(ZB1,13),COLORRED,LINETHICK3; SQX:=(C-MA(CLOSE,13))*100; DIFF:=EMA(MA(SQX,7),1),COLORWHITE; DEA:=EMA(DIFF,7),COLORYELLOW; MACD:=(DIFF-DEA)*2,COLORSTICK; FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); TTJ:=CROSS(FF,MA15); 上:=EMA(C,3),COLORBLUE,LINETHICK1; 中:=EMA(C,5),COLORWHITE,LINETHICK1; 下:=EMA(中,5),COLOR00FF00,LINETHICK1; QQ:= C<中; MM:=上>REF(上,1) AND REF(上,1)0,MA2Q,MA2Q); MA5Q:=MA(CLOSE,5),COLOR888899; MA13:=MA(CLOSE,13),COLORFF00F0,LINETHICK2; VAR01:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2); VAR02:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4); VAR03:=CLOSE=LLV(C,4) AND (REF(C,1)=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)=REF(C,1); VAR05:=REF(C,1)=HHV(C,4) AND CREF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND REF(C,2)>=REF(C,4) AND CREF(V5,1) AND REF(V5,1)HHV(V5,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN; VAR08:=VAR07 AND COUNT(VAR06,2); VAR09:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6); VAR10:=EMA(MA(C,13),13); VAR11:=FILTER((LLV(VAR09,2)=LLV(VAR09,7) AND COUNT(VAR09<0,2) AND CROSS(VAR09,MA(VAR09,2)))=1,5); VAR12:=FILTER((HHV(VAR09,2)=HHV(VAR09,7) AND COUNT(VAR09>50,2) AND CROSS(MA(VAR09,2),VAR09))=1,1); VAR13:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10; VAR14:=FILTER(((CROSS(VAR13,0) OR CROSS(C,VAR10)) AND VAR11)=1,3); VAR15:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18)); VAR16:=VAR08 AND NOT(REF(VAR08,1)); RSVQ:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSVQ,3,1); D:=SMA(K,3,1); J:=3*K-2*D; 金叉:=CROSS(J,D); 死叉:=CROSS(D,J); 买1:=(VAR14 OR VAR15) AND VAR11; 买2:=(VAR14 OR VAR15) AND VAR04; 买3:=(VAR14 OR VAR15) AND VAR02; 买4:=(VAR02 AND VAR11) OR (VAR04 AND VAR11); 买5:=(金叉 AND VAR04) OR (金叉 AND VAR02) OR (金叉 AND VAR11); TTJ0:=VAR16; TTJ1:=买1 OR 买2 OR 买3 OR 买4 OR 买5 AND MM; XG0:=TTJ AND TTJ0; XG1:=TTJ AND TTJ1; XG11:=XG0 OR XG1; XGQ:=XG11; 拐牛:XGQ,COLORRED,NODRAW; DRAWTEXT(XGQ,L*0.99,'●拐牛'),COLORRED; MA1:=MA(C,5); MA2:=MA(C,10); MA3:=MA(C,21); 破N:=REF(MA1,1)REF(MA2,1); 试摸N:=C>MA(C,10) OR H>=MA2; 再上N:=C>O AND REF(C,1)< MA(C,10) AND 试摸N AND 破N AND MA(C,21) REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2))); VAR2MZ:=((REF(VAR1MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR3MZ:=((REF(VAR2MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR4MZ:=((REF(VAR3MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR5MZ:=((REF(VAR4MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR6MZ:=((REF(VAR5MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR7MZ:=((REF(VAR6MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR8MZ:=((REF(VAR7MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR9MZ:=((REF(VAR8MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARAMZ:=((REF(VAR9MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VARBMZ:=((REF(VARAMZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARCMZ:=((REF(VARBMZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); {红K} {STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,O,3,0),COLOR000099; STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,O,2,0),COLOR0000BB; STICKLINE((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),C,O,1,0),COLOR0000DD}; VARDMZ:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2))); VAREMZ:=((REF(VARDMZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VARFMZ:=((REF(VAREMZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR10MZ:=((REF(VARFMZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR11MZ:=((REF(VAR10MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR12MZ:=((REF(VAR11MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR13MZ:=((REF(VAR12MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR14MZ:=((REF(VAR13MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR15MZ:=((REF(VAR14MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR16MZ:=((REF(VAR15MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); VAR17MZ:=((REF(VAR16MZ,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2))); VAR18MZ:=((REF(VAR17MZ,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2))); {绿K} {STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,O,3 ,0 ),COLOR00BB00; STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,O,2 ,0 ),COLOR00DD00; STICKLINE((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),C,O,1,0 ),COLOR00FF00}; VAR19MZ:=(REF((((((((((((VARDMZ OR VAREMZ) OR VARFMZ) OR VAR10MZ) OR VAR11MZ) OR VAR12MZ) OR VAR13MZ) OR VAR14MZ) OR VAR15MZ) OR VAR16MZ) OR VAR17MZ) OR VAR18MZ),1) AND VAR1MZ); VAR1AMZ:=(REF((((((((((((VAR1MZ OR VAR2MZ) OR VAR3MZ) OR VAR4MZ) OR VAR5MZ) OR VAR6MZ) OR VAR7MZ) OR VAR8MZ) OR VAR9MZ) OR VARAMZ) OR VARBMZ) OR VARCMZ),1) AND VARDMZ); {粉红} CAX:=MAX(REF(CLOSE,2),REF(CLOSE,1)); {STICKLINE(VAR19MZ,CAX,O,3 ,0 ),COLORBB11BB; STICKLINE(VAR19MZ,CAX,O,2 ,0 ),COLORDD44DD; STICKLINE(VAR19MZ,CAX,O,1 ,0 ),COLORFF66FF}; {黄色} CIN:=MIN(REF(CLOSE,2),REF(CLOSE,1)); {STICKLINE(VAR1AMZ,CIN,O,3,0),COLOR00AAFF; STICKLINE(VAR1AMZ,CIN,O,2,0),COLOR00CCFF; STICKLINE(VAR1AMZ,CIN,O,1,0),COLOR00EEFF}; 牛节点:=CROSS(EMA(C,5),EMA(C,30))AND CROSS(EMA(C,10),EMA(C,20)); DRAWICON(牛节点,L*0.99,13); CSAR:=SAR(10,2,20); 持股:=IF(CSAR<=L,CSAR,0),CIRCLEDOT,COLORRED{持股}; 短期趋势:=EMA(SLOPE(C,21)*20+C,42),POINTDOT,LINETHICK1,COLORYELLOW; STICKLINE(1,短期趋势,短期趋势,1,0),COLORYELLOW; 止损:=EMA(C,5),COLORYELLOW,LINETHICK1; VVAR1D:=((((OPEN + LOW) + HIGH) + CLOSE) / 4); 短底:=EMA(VVAR1D,5); 支撑:=HHV(短底,60); MAN:=(SMA(HIGH,21,2) * 1.05); 下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); 中D:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6); X1D:=EMA(中D,10); RSVD:=SMA(下档线,3,1); K大:=SMA(RSVD,3,1); D大:=((3 * RSVD) - (2 * K大)); J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100); RSV24:=SMA(J12,3,1); K24:=SMA(RSV24,3,1); D24:=((3 * RSV24) - (2 * K24)); 压力位:=IF(CROSS(D24,D大),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D大)))),COLORFFFFFF; 牛浮面:=CROSS(CLOSE,MA20) AND HIGH < 压力位 AND OPEN < MA20 AND HIGH < 支撑 AND MAN - REF(MAN,1) > 0 AND X1D - REF(X1D,1)>0 AND D大 < 63 AND MA20 - REF(MA20,1) > 0,COLORWHITE; DRAWTEXT(牛浮面,L,'●牛浮面'),COLORWHITE; {STICKLINE(ISLASTBAR,ZC1,ZC1,120,0),LINETHICK1,COLORGREEN; DRAWTEXT(CURRBARSCOUNT=15,ZC1*1.02,'关键价位'),COLORGREEN; DRAWNUMBER(ISLASTBAR,ZC1*1.02,ZC1+000),COLORGREEN; STICKLINE(ISLASTBAR,ZC2,ZC2,120,0),LINETHICK1,COLORYELLOW; DRAWTEXT(CURRBARSCOUNT=15,ZC2*0.99,'支撑价位'),COLORYELLOW; DRAWNUMBER(ISLASTBAR,ZC2*0.99,ZC2+000),COLORYELLOW}; 决策:=IF(ISLASTBAR,压力位,DRAWNULL),COLORMAGENTA; {STICKLINE(ISLASTBAR ,决策,决策,60,1),LINETHICK3,COLORFFFFFF}; 底部:=LLV(HIGH,30),COLOR00FF00; 超跌:=IF(ISLASTBAR,底部,DRAWNULL),COLORRED; {STICKLINE(ISLASTBAR ,超跌,超跌,60,1),LINETHICK3,COLORRED; STICKLINE(ISLASTBAR,REF(今重心,1),REF(今重心,1),10,0),COLORGREEN}; 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); KK:=IF(S1<=0,0.05,IF(S1>=0,-0.05,0)); DRAWTEXT_FIX(1,0,S1+KK,0,T1)COLOR00FFFF; DRAWTEXT_FIX(1,0,S2+KK,0,T2)COLORFFFFFF; DRAWTEXT_FIX(1,0,S3+KK,0,T3)COLORFF00FF; DRAWTEXT_FIX(1,0,S4+KK,0,T4)COLOR0088FF; DRAWTEXT_FIX(1,0,S5+KK,0,T5)COLOR00FF00; DRAWTEXT_FIX(1,0,S6+KK,0,T6)COLOR0000FF; DRAWTEXT_FIX(1,0,S7+KK,0,T7)COLOR00CCFF; DRAWTEXT_FIX(1,0,S8+KK,0,T8)COLORFF88FF; DRAWTEXT_FIX(1,0,S9+KK,0,T9)COLORBBFFFF; X1:=(C+L+H)/3; X2:=EMA(X1,6); X3:=EMA(X2,5); DRAWICON(CROSS(X2,X3),L*0.99,7); XG:CROSS(X2,X3),NODRAW; DRAWICON(CROSS(X3,X2),H*1.01,8); YY1:=C>MA(C,5) AND OPENMA(C,10) AND OPENMA(C,30) AND OPEN