唐政A/唐政B指标(主图) 通达信公式

[复制链接]
查看146 | 回复0 | 2021-8-20 15:50:44 | 显示全部楼层 |阅读模式

151325P95360-54X5.jpg

151325P95360-54X5.jpg


{唐政A} HR:=HHV(HIGH,55); HRY:=LLV(LOW,55); HRY11:=HR*HRY; HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2; IF(C > HRY33 AND HRY33  > =REF(HRY33 ,1), HRY33 ,DRAWNULL),LINETHICK2,COLORRED;   TT:=240/FROMOPEN; 比:=TT; J12:=(HIGH - ((HIGH - LOW) / 3)); J23:=(LOW + ((HIGH - LOW) / 3)); AAA:=CONST(HHV(H,90)); BBB:=CONST(LLV(L,100)); {DRAWBAND(AAA,RGB(50,100,00),BBB,RGB(00,00,00));}   MA3:MA(CLOSE,3),COLORFFFFFF; MA13:MA(CLOSE,13),COLORFF00FF,POINTDOT,LINETHICK4; MA55:=MA(CLOSE,55); MA89:=MA(CLOSE,89); MA250:=MA(CLOSE,250); DRAWKLINE(H,O,L,C); T1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)  <  0.95 AND REF(OPEN,1)   <  REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1) < 0.03 AND CLOSE/OPEN > 1.05 AND CLOSE > REF(CLOSE,2)),1,0)); T2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)  >  1.03 AND REF(OPEN,1)   >  REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1) < 0.02  AND CLOSE/OPEN < 0.97 AND CLOSE < REF(CLOSE,2)),1,0)); T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW  > 1.03),1,0)); T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0)); T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)  <  0.95 AND REF(OPEN,1)   <  REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND CLOSE/OPEN > 1.05 AND CLOSE > REF(CLOSE,2)),1,0)); T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)  >  1.05 AND REF(OPEN,1)   >  REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND CLOSE/OPEN < 0.95 AND CLOSE < REF(CLOSE,2)),1,0)); T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW  >   3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE  >  MA(CLOSE,5)),1,0)); T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW  >   3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE  <  MA(CLOSE,5)),1,0)); T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW  >   3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE  <  MA(CLOSE,5)),1,0)); T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW  >   3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE > MA(CLOSE,5)),1,0)); T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1) > 1.03 AND CLOSE/OPEN < 0.96  AND CLOSE < REF(OPEN,1)  AND OPEN > REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1) < 0.97 AND CLOSE/OPEN > 1.04  AND CLOSE > REF(OPEN,1) AND OPEN < REF(CLOSE,1))),1,0)); T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1) > 1.03 AND CLOSE/OPEN < 0.97  AND OPEN > REF(CLOSE,1) AND CLOSE < REF(CLOSE,1)),1,0)); T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1) < 0.97 AND CLOSE/OPEN > 1.03  AND OPEN < REF(CLOSE,1) AND CLOSE > REF(CLOSE,1)),1,0)); T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)  >  0.04  AND ABS(CLOSE-OPEN)/CLOSE < 0.005 AND MAX(CLOSE,OPEN)  <  MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)   >  MIN(REF(CLOSE,1),REF(OPEN,1))),1,0)); T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)  >  0.04  AND CLOSE=OPEN AND CLOSE  <  MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE  >  MIN(REF(CLOSE,1) ,REF(OPEN,1))),1,0)); T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH < 0.001),1,0)); T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW < 0.001 AND ABS(REF(LOW,1) -REF(LOW,2))/REF(LOW,1) < =0.001)),1,0)); T18{大阳烛}:=CONST(IF((CLOSE/OPEN > 1.05 AND HIGH/LOW  <  CLOSE/OPEN+0.018),1,0)); T19{三个白武士}:=CONST(IF((REF(CLOSE,2) > REF(OPEN,2) AND REF(CLOSE,1)  > REF(OPEN,1) AND CLOSE > OPEN  AND REF(CLOSE,1) > REF(CLOSE,2) AND CLOSE > REF(CLOSE,1)),1,0)); T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1) < REF(OPEN,1) AND CLOSE < OPEN  AND CLOSE/OPEN < 0.98),1,0)); T21{孕育线}:=CONST(IF((REF(CLOSE,2) > REF(OPEN,2) AND (REF(CLOSE,2) -REF(OPEN,2))/REF(OPEN,2) > =2/100  AND REF(OPEN,1) > =REF(CLOSE,1)  AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1) < =2/100 AND REF(OPEN,1)  < =REF(CLOSE,2) AND REF(CLOSE,1) > =REF(OPEN,2) AND C > =OPEN  AND (CLOSE-OPEN)/OPEN > =2/100 AND CLOSE > =REF(OPEN,1) AND OPEN < =REF(CLOSE,1)  AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))  < =1/100),1,0)); T22{多方炮}:=CONST(IF((REF(CLOSE,2) > REF(OPEN,2) AND REF(CLOSE,1) < REF(OPEN,1)  AND CLOSE > OPEN),1,0)); T23{出水芙蓉}:=CONST(IF(((OPEN < EMA(C,20) OR OPEN < EMA(C,40) OR OPEN <  EMA(C,60)) AND (C > MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))AND (V/MA(V,30)  > 1.2 AND C/REF(C,1) > 1.049)),1,0)); T24{上升三部曲}:=CONST(IF((REF(CLOSE,4)/REF(OPEN,4) > 1.03 AND REF(CLOSE,3)  < REF(OPEN,3) AND REF(CLOSE,2) < REF(OPEN,2) AND REF(CLOSE,1) < REF(OPEN,1)  AND REF(LOW,4) < REF(LOW,3) AND REF(LOW,4) < REF(LOW,2) AND REF(LOW,4)  < REF(LOW,1) AND REF(HIGH,4) > REF(HIGH,3) AND REF(HIGH,4) > REF(HIGH,2)  AND REF(HIGH,4) > REF(HIGH,1) AND CLOSE/OPEN > 1.03 AND CLOSE > REF(CLOSE,4)),1,0)); T25{下跌三部曲}:=CONST(IF(( REF(CLOSE,4)/REF(OPEN,4) < 0.97 AND REF(CLOSE,3)  > REF(OPEN,3) AND REF(CLOSE,2) > REF(OPEN,2) AND REF(CLOSE,1) > REF(OPEN,1)  AND REF(LOW,4) < REF(LOW,3) AND REF(LOW,4) < REF(LOW,2) AND REF(LOW,4)  < REF(LOW,1) AND REF(HIGH,4) > REF(HIGH,3) AND REF(HIGH,4) > REF(HIGH,2) AND REF(HIGH,4) > REF(HIGH,1) AND CLOSE/OPEN < 0.97 AND CLOSE < REF(CLOSE,4)),1,0)); T26{跳空缺口}:=CONST(IF(HIGH < REF(LOW,1) OR LOW > REF(HIGH,1),1,0)); T27{三只乌鸦}:=CONST(IF((REF(CLOSE,2) < REF(OPEN,2) AND REF(CLOSE,1)  < REF(OPEN,1) AND CLOSE < OPEN AND REF(CLOSE,1) < REF(CLOSE,2)  AND CLOSE < REF(CLOSE,1)),1,0)); T28{光脚阴线}:=CONST(IF((LOW=CLOSE AND HIGH!=LOW),1,0)); T29{光头阳线}:=CONST(IF((HIGH=CLOSE AND HIGH!=LOW),1,0)); T30{分离}:=CONST(IF((OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1) -REF(OPEN,1)) < 0),1,0)); T31{长下影}:=CONST(IF(((MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW) > 0.667),1,0)); T32{长上影}:=CONST(IF(((HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW) > 0.667),1,0)); T33{十字星}:=CONST(IF((CLOSE=OPEN AND HIGH!=LOW),1,0)); T34{大阴烛}:=CONST(IF((OPEN/CLOSE  >  1.05 AND HIGH/LOW  <  OPEN/CLOSE+0.018),1,0)); T35{好友反攻}:=CONST(IF(((REF(CLOSE,1) < REF(OPEN,1) AND CLOSE > OPEN  AND ABS(CLOSE-REF(CLOSE,1))/CLOSE < 0.002) OR (REF(CLOSE,1) > REF(OPEN,1)  AND CLOSE < OPEN AND ABS(CLOSE-REF(CLOSE,1)) /CLOSE < 0.002)),1,0)); T36{倾盆大雨}:=CONST(IF((REF(C,1)/REF(O,1) > =1.03 AND O < REF(C,1) AND O  > REF(O,1) AND C < REF(O,1)),1,0)); T37{M9}:=CONST(V*比 > REF(V,1) AND MA(V,5) > REF(MA(V,5),1)); T38{M10}:=CONST(V*比 < REF(V,1) AND MA(V,5) > REF(MA(V,5),1)); T39{M11}:=CONST(V*比 > REF(V,1)AND MA(V,5) < REF(MA(V,5),1)); T40{M12}:=CONST(V*比 < REF(V,1)AND MA(V,5) < REF(MA(V,5),1)); T41{M13}:=CONST((((IF((CLOSE = OPEN),1,0) + IF((CLOSE  > = J12),1,0)) + IF((CLOSE  < = J23),1,0))  >  1)); T42{M14}:=CONST((((AMOUNT / VOL) / 100)  >  REF(HIGH,1))); T43{M15}:=CONST((((AMOUNT / VOL) / 100)  <  REF(LOW,1))); TS1:=IF(T1=1,0+0.03,0); TS2:=IF(T2=1,TS1+0.03,TS1); TS3:=IF(T3=1,TS2+0.03,TS2); TS4:=IF(T4=1,TS3+0.03,TS3); TS5:=IF(T5=1,TS4+0.03,TS4); TS6:=IF(T6=1,TS5+0.03,TS5); TS7:=IF(T7=1,TS6+0.03,TS6); TS8:=IF(T8=1,TS7+0.03,TS7); TS9:=IF(T9=1,TS8+0.03,TS8); TS10:=IF(T10=1,TS9+0.03,TS9); TS11:=IF(T11=1,TS10+0.03,TS10); TS12:=IF(T12=1,TS11+0.03,TS11); TS13:=IF(T13=1,TS12+0.03,TS12); TS14:=IF(T14=1,TS13+0.03,TS13); TS15:=IF(T15=1,TS14+0.03,TS14); TS16:=IF(T16=1,TS15+0.03,TS15); TS17:=IF(T17=1,TS16+0.03,TS16); TS18:=IF(T18=1,TS17+0.03,TS17); TS19:=IF(T19=1,TS18+0.03,TS18); TS20:=IF(T20=1,TS19+0.03,TS19); TS21:=IF(T21=1,TS20+0.03,TS20); TS22:=IF(T22=1,TS21+0.03,TS21); TS23:=IF(T23=1,TS22+0.03,TS22); TS24:=IF(T24=1,TS23+0.03,TS23); TS25:=IF(T25=1,TS24+0.03,TS24); TS26:=IF(T26=1,TS25+0.03,TS25); TS27:=IF(T27=1,TS26+0.03,TS26); TS28:=IF(T28=1,TS27+0.03,TS27); TS29:=IF(T29=1,TS28+0.03,TS28); TS30:=IF(T30=1,TS29+0.03,TS29); TS31:=IF(T31=1,TS30+0.03,TS30); TS32:=IF(T32=1,TS31+0.03,TS31); TS33:=IF(T33=1,TS32+0.03,TS32); TS34:=IF(T34=1,TS33+0.03,TS33); TS35:=IF(T35=1,TS34+0.03,TS34); TS36:=IF(T36=1,TS35+0.03,TS35); TS37:=IF(T37=1,TS36+0.03,TS36); TS38:=IF(T38=1,TS37+0.03,TS37); TS39:=IF(T39=1,TS38+0.03,TS38); TS40:=IF(T40=1,TS39+0.03,TS39); TS41:=IF(T41=1,TS40+0.03,TS40); TS42:=IF(T42=1,TS41+0.03,TS41); TS43:=IF(T43=1,TS42+0.03,TS42); DRAWTEXT(T1=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS1),'早晨之星,见底回升‖'),COLORFF00FF  ; DRAWTEXT(T2=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS2),'黄昏之星,见顶回落‖'),COLORFFFF00  ; DRAWTEXT(T3=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS3),'长十字,重要的警告信号,原趋势停顿或反转‖'),COLOR00FFFF  ; DRAWTEXT(T4=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS4),'垂死十字,下跌信号‖'),COLORFFFF00  ; DRAWTEXT(T5=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS5),'早晨十字星,上涨信号,见底回升‖'),COLORFF00FF  ; DRAWTEXT(T6=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS6),'黄昏十字星,趋势停顿或反转,下跌或,见顶回落‖'),COLORFFFF00  ; DRAWTEXT(T7=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS7),'射击之星,市场顶部就在眼前,可能见顶回落,可靠性低‖'),COLORFFFF00  ; DRAWTEXT(T8=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS8),'倒转锤头构成一个看涨信号,可能见底回升‖'),COLORFF00FF  ; DRAWTEXT(T9=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS9),'锤头,可能见底回升,如有量配合,信号强烈‖'),COLOR0000FF  ; DRAWTEXT(T10=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS10),'吊颈,上升行情中见顶回落,顶部出现,见顶信号‖'),COLORFFFF00  ; DRAWTEXT(T11=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS11),'穿头破脚,顶部出现,见顶回落信号‖'),COLORFFFF00  ; DRAWTEXT(T12=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS12),'乌云盖顶,见顶回落信号‖'),COLORFFFF00  ; DRAWTEXT(T13=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS13),'曙光初现,将演化为V型反转或横盘。后市见底回升‖'),COLORFF00FF  ; DRAWTEXT(T14=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS14),'身怀六甲,底部,是见底回升,顶部,是见顶回落信号‖'),COLOR00FFFF  ; DRAWTEXT(T15=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS15),'十字胎‖'),COLOR00FFFF  ; DRAWTEXT(T16=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS16),'平顶,行情见顶,股价将反转。但下跌力度较小‖'),COLORFFFFFF  ; DRAWTEXT(T17=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS17),'平底,行情探低见底,股价行将反转上升,但力度较小‖'),COLORFFFFFF  ; DRAWTEXT(T18=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS18),'大阳烛,上升中,剧烈地向上攀升。下行中,剧烈地向上反弹‖'),COLOR0000FF  ; DRAWTEXT(T19=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS19),'三个白武士,每日收盘价上移,表示可能见底回升‖'),COLORFFFFFF  ; DRAWTEXT(T20=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS20),'双飞乌鸦,行情开始疲软将见顶回落‖'),COLORFF0000  ; DRAWTEXT(T21=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS21),'孕育线,注意股价位置‖'),COLOR00FFFF  ; DRAWTEXT(T22=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS22),'多方炮,底部可能上涨,中间上涨中继,顶部见顶信号‖'),COLOR00FFFF  ; DRAWTEXT(T23=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS23),'出水芙蓉,阳线穿过20、40、60日均线,上攻势头初现‖'),COLORFF00FF  ; DRAWTEXT(T24=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS24),'上升三部曲,上涨信号‖'),COLORFF00FF  ; DRAWTEXT(T25=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS25),'下跌三部曲,下跌信号‖'),COLORFFFF00  ; DRAWTEXT(T26=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS26),'跳空缺口,突破盘整,向上涨、向下跌开始‖'),COLOR00FFFF  ; DRAWTEXT(T27=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS27),'三只乌鸦站枝头,可能见顶回落‖'),COLORFFFF00  ; DRAWTEXT(T28=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS28),'光脚阴线,下跌信号‖'),COLORFFFF00  ; DRAWTEXT(T29=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS29),'光头阳线,多方积极上攻态势,后市看涨‖'),COLOR0000FF  ; DRAWTEXT(T30=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS30),'分离,注意看涨分离和看跌分离‖'),COLOR00FFFF  ; DRAWTEXT(T31=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS31),'长下影,有可能止跌回升,升势末期,须小心‖'),COLOR00FFFF  ; DRAWTEXT(T32=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS32),'长上影,表明行情上档压力沉重,升势受阻‖'),COLORFFFF00  ; DRAWTEXT(T33=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS33),'十字星,重要的警告信号,原趋势停顿或反转‖'),COLOR00FFFF  ; DRAWTEXT(T34=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS34),'大阴烛,后市向淡,发生逆转‖'),COLORFF0000  ; DRAWTEXT(T35=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS35),'好友反攻,跌势已尽,要展开一段反弹行情‖'),COLORFF00FF  ; DRAWTEXT(T36=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS36),'倾盆大雨,见顶信号‖'),COLORFFFF00  ;  DRAWTEXT(T37=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS37),'今日成交量大于昨日,且有继续增大趋势'),COLORYELLOW ; DRAWTEXT(T38=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS38),'今日成交量小于昨日,但有放大迹象'),COLORFFFF00  ; DRAWTEXT(T39=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS39),'今日成交量大于昨日, 但有缩小迹象'),COLORRED  ; DRAWTEXT(T40=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS40),'今日成交量小于昨日,且有缩小迹象'),COLORRED   ; DRAWTEXT(T41=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS41),'极端行情,在未来的几日内有85%的机会变更方向'),COLORWHITE ; DRAWTEXT(T42=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS42),'上涨趋势'),COLORRED  ; DRAWTEXT(T43=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS43),'下跌趋势'),COLORGREEN  ;   STICKLINE(CROSS(C,MA13) AND MA13 > =REF(MA13,1),C,O,3,0),COLOR00FFFF; {STICKLINE(CROSS(MA3,C) AND C < MA3*0.98,C,O,3,0),COLORFF0000;} STICKLINE(CROSS(C,MA3) AND MA3 > =REF(MA3,1) AND REF(MA3,2) > REF(MA3,1),C,O,3,0),COLORFF00FF;   [[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]

151325P95Q0-D221.jpg

151325P95Q0-D221.jpg



{唐政B} PT  := REF(HIGH,1)-REF(LOW,1); 重心:(HIGH + LOW + CLOSE)/3,NODRAW; 压力Ⅰ: 2*重心-LOW,NODRAW; 压力Ⅱ:重心 + PT,NODRAW; 支撑Ⅰ:2*重心-HIGH,NODRAW; 支撑Ⅱ: 重心 - PT,NODRAW; AAA:=CONST(HHV(H,90)); R1:=MA(CLOSE,1); R2:=MA(CLOSE,3); R3:=(MA(R2,1)*1); R4:=(MA(R2,3)*1); DRAWTEXT(CROSS(R3,R4),(LOW-0.1),'B'),COLOR00FFFF; X1:=(C+L+H)/3; DD:=TOTALCAPITAL; SS:=FINANCE(7); GG:=FINANCE(33); TH:=DYNAINFO(39); A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1); LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'S'),COLORGREEN; 双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,COLOR00FF00; 单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,COLOR0000FF;   VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; VAR12:=(HIGH+LOW+CLOSE)/3; VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14)); VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70)); VAR15:=IF(VAR13 > =150 AND VAR13 < 200 AND VAR14 > =150 AND VAR14 < 200,10,0); VAR16:=IF(VAR13 < =-150 AND VAR13 > -200 AND VAR14 < =-150 AND VAR14 > -200,-10,VAR15); VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; VAR18:=100-ABS(VAR17); VAR19:=IF(VAR18 < 90,VAR18,100); VAR1A:=IF(VARE > 0,VARE,0); VAR1B:=IF(VAR14 > =200 AND VAR13 > =150,15,IF(VAR14 < =-200 AND VAR13 < =-150,-15,VAR16))+60; VAR1C:=VAR1A > 48 AND VAR1B > 60 AND VAR19 < 100; DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,HIGH*1.02,'大笔出货'),LINETHICK1,COLORFFCC66; AA1:=AMOUNT/V; BB1:=L < AA1*0.9; CC1:=(C-REF(C,1))/REF(C,1)*100 > 1.2; DD1:=L < MA(C,5)*0.921; EE1:=V < MA(V,5)*1.5; 老鼠仓:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0; DRAWTEXT(老鼠仓,(LOW* 0.99),'老鼠仓'),COLOR40CCFF;   A74:=MA(CLOSE,20); A75:=(CLOSE  >  MA(CLOSE,5)); A76:=(MA(CLOSE,5)  >  MA(CLOSE,10)); A77:=(CLOSE  >  MA(CLOSE,10)); A78:=(MA(CLOSE,5)  >  MA(CLOSE,20)); A79:=(CLOSE  >  MA(CLOSE,20)); A710:=REF(A74,1); A711:=(A74  >  A710); AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10))); DSLX:=(CLOSE / INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); V1:=MA(VOL,5); V2:=MA(VOL,10); T1:=CONST(IF(C < 200 AND ((CROSS(AVX,1) AND (V1  > = V2)) AND (DSLX  > = DSLX1)),1,0));  T2:=CONST(IF(C < 200 AND ((CROSS(AVX,1) AND (V1  <  V2)) AND (DSLX  > = DSLX1)),1,0)); T3:=CONST(IF(C < 200 AND ((CROSS(AVX,1) AND (V1  >  V2)) AND (DSLX  <  DSLX1)),1,0));  T4:=CONST(IF(C < 200 AND ((CROSS(AVX,1) AND (V1  < = V2)) AND (DSLX  <  DSLX1)),1,0)); T5:=CONST(IF(C < 200 AND ((CROSS(1,AVX) AND (V1  > = V2)) AND (DSLX  > = DSLX1)),1,0)); T6:=CONST(IF(C < 200 AND ((CROSS(1,AVX) AND (V1  <  V2)) AND (DSLX  > = DSLX1)),1,0)); T7:=CONST(IF(C < 200 AND ((CROSS(1,AVX) AND (V1  > = V2)) AND (DSLX  <  DSLX1)),1,0));  T8:=CONST(IF(C < 200 AND ((CROSS(1,AVX) AND (V1  <  V2)) AND (DSLX  <  DSLX1)),1,0)); T9:=CONST(IF(C < 200 AND ((((AVX  > = 1) AND (REF(AVX,1)  >  0)) AND (V1  > = V2)) AND (DSLX  > = DSLX1)),1,0));  T10:=CONST(IF(C < 200 AND ((((AVX  > = 1) AND (REF(AVX,1)  >  0)) AND (V1  <  V2)) AND (DSLX  > = DSLX1)),1,0));  T11:=CONST(IF(C < 200 AND ((((AVX  > = 1) AND (REF(AVX,1)  >  0)) AND (V1  > = V2)) AND (DSLX  <  DSLX1)),1,0));  T12:=CONST(IF(C < 200 AND ((((AVX  > = 1) AND (REF(AVX,1)  >  0)) AND (V1  <  V2)) AND (DSLX  <  DSLX1)),1,0));  T13:=CONST(IF(C < 200 AND ((((AVX  <  1) AND (REF(AVX,1)  <  0)) AND (V1  > = V2)) AND (DSLX  > = DSLX1)),1,0));  T14:=CONST(IF( C < 200 AND ((((AVX  <  1) AND (REF(AVX,1)  <  0)) AND (V1  <  V2)) AND (DSLX  > = DSLX1)),1,0)); T15:=CONST(IF(C < 200 AND ((((AVX  <  1) AND (REF(AVX,1)  <  0)) AND (V1  > = V2)) AND (DSLX  <  DSLX1)),1,0));  T16:=CONST(IF(C < 200 AND ((((AVX  <  1) AND (REF(AVX,1)  <  0)) AND (V1  <  V2)) AND (DSLX  <  DSLX1)),1,0)); T17:=CONST(IF(C > 200 AND (CROSS(AVX,1) AND (V1  > = V2)),1,0));  T18:=CONST(IF(C > 200 AND (CROSS(AVX,1) AND (V1  > = V2)),1,0));  T19:=CONST(IF(C > 200 AND (CROSS(AVX,1) AND (V1  <  V2)),1,0));   T20:=CONST(IF(C > 200 AND (CROSS(1,AVX) AND (V1  > = V2)),1,0)); T21:=CONST(IF(C > 200 AND (CROSS(1,AVX) AND (V1  <  V2)),1,0));  T22:=CONST(IF(C > 200 AND (((AVX  > = 1) AND (REF(AVX,1)  >  0)) AND (V1  > = V2)),1,0)); T23:=CONST(IF(C > 200 AND (((AVX  > = 1) AND (REF(AVX,1)  >  0)) AND (V1  <  V2)),1,0)); T24:=CONST(IF(C > 200 AND (((AVX  <  1) AND (REF(AVX,1)  <  0)) AND (V1  > = V2)),1,0)); T25:=CONST(IF(C > 200 AND (((AVX  <  1) AND (REF(AVX,1)  <  0)) AND (V1  <  V2)),1,0)); DRAWTEXT(T1=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'量能理想,明显走强,中线参与,仓位在2/3左右'),COLORFF00FF  ; DRAWTEXT(T2=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'走势趋强,还显不足,短线进场,仓位在1/2左右'),COLORFF00FF  ; DRAWTEXT(T3=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'量价良好,没有明显走强,短线进场,仓位1/2左右'),COLORFF00FF  ; DRAWTEXT(T4=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'形态尚可,量能不足,未完全走强,短线参与,仓位1/3左右'),COLORFF00FF  ; DRAWTEXT(T5=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'形态变坏,重仓者减持大半,清仓者观望'),COLORFF00FF  ; DRAWTEXT(T6=1 AND CURRBARSCOUNT=60,AAA*0.98 ,'随大盘一起下跌,明显缩量走势,考虑到风险,减持或清仓'),COLORFF00FF  ; DRAWTEXT(T7=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股放量下跌,走势明显偏弱,离场观望'),COLORFF00FF  ; DRAWTEXT(T8=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股缩量下跌,走势偏弱,离场观望。'),COLORFF00FF  ; DRAWTEXT(T9=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股形态良好,强势明显,量能充足,可以继续持有'),COLORFF00FF  ; DRAWTEXT(T10=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'上行趋势不变,强势依然,量能开始转弱,注意风险'),COLORFF00FF  ; DRAWTEXT(T11=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓'),COLORFF00FF  ; DRAWTEXT(T12=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股走势趋弱,量能不足,减持大部分筹码'),COLORFF00FF  ; DRAWTEXT(T13=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股形态不佳,注意成交量的变化,目前不适合参与'),COLORFF00FF  ; DRAWTEXT(T14=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'趋势不明,股价偏弱,注意量能变化,目前不宜参与'),COLORFF00FF  ; DRAWTEXT(T15=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'有走强迹象,但量能不足,趋势不明,不适合操作'),COLORFF00FF  ; DRAWTEXT(T16=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'该股走势太弱,没有参与价值。'),COLORFF00FF  ; DRAWTEXT(T17=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘理想,有明显走强迹象,中线参与,仓位在2/3左右'),COLORFF00FF  ; DRAWTEXT(T18=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'如前期经过一轮下跌,最佳买点,前期有过一段涨幅需谨慎'),COLORFF00FF  ; DRAWTEXT(T19=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'考虑短线进场,仓位在1/2左右,一旦量能放大,加仓买入'),COLORFF00FF  ; DRAWTEXT(T20=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘形态走坏,重仓者可以减去大部分仓位。'),COLORFF0000  ; DRAWTEXT(T21=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘缩量调整,注意风险,短线清仓观望。'),COLORFF0000  ; DRAWTEXT(T22=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘走势良好,量能理想,可以继续持有强势股。'),COLORFF0000  ; DRAWTEXT(T23=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘形态良好,但量能稍显不足,随时准备减仓。'),COLORFF0000  ; DRAWTEXT(T24=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘趋势不明,注意成交量变化,目前不适宜进场。'),COLORFF0000  ; DRAWTEXT(T25=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03) ,'大盘趋势向下,量能萎缩,不适合进场。'),COLORFF0000  ;  
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则