{正阳风暴主图源码如下}
多空:EMA(C,20),CROSSDOT,COLORGREEN,LINETHICK5;
IF(多空>REF(多空,1),多空,DRAWNULL),CROSSDOT,COLORRED,LINETHICK7;
高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);
H1:=高1-(高1-低1)*0.2;
H2:=高1-(高1-低1)*0.4;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.6;
H5:=高1-(高1-低1)*0.9;
突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
基准:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1));
AA:=CROSS(A1X,0),LINETHICK3;
STICKLINE(A1X>=0,C,O,2.7,0),COLOR0011FF;
STICKLINE(A1X>=0,C,O,1.8,0),COLOR0044FF;
STICKLINE(A1X>=0,C,O,0.9,0),COLOR0077FF;
STICKLINE(A1X>=0,C,O,0.1,0),COLOR0099FF;
STICKLINE(A1X>=0,H,L,0,0),COLOR0099FF;
STICKLINE(AA,C,O,2.7,0),COLOR330033;
STICKLINE(AA,C,O,1.8,0),COLOR770077;
STICKLINE(AA,C,O,0.9,0),COLORBB00BB;
STICKLINE(AA,C,O,0.1,0),COLORFF00FF;
STICKLINE(AA,H,L,0,0),COLORFF00FF;
DRAWICON(AA,L*1,9);
DRAWTEXT(AA,L*1,'主力买入'),COLORYELLOW;
BB:=CROSS(0,A1X),LINETHICK5;
STICKLINE(A1X<0,C,O,2.7,0),COLORAAAAAA;
STICKLINE(A1X<0,C,O,1.8,0),COLORCCCCCC;
STICKLINE(A1X<0,C,O,0.9,0),COLORDDDDDD;
STICKLINE(A1X<0,C,O,0.1,0),COLORFFFFFF;
STICKLINE(A1X<0,H,L,0,0),COLORFFFFFF;
STICKLINE(BB,C,O,2.7,0),COLOR333300;
STICKLINE(BB,C,O,1.8,0),COLOR555500;
STICKLINE(BB,C,O,0.9,0),COLOR777700;
STICKLINE(BB,C,O,0.1,0),COLOR999900;
STICKLINE(BB,H,L,0,0),COLOR999900;
DRAWICON(BB,H*1,43);
DRAWTEXT(BB,H*1,'主力卖出'),COLORYELLOW;
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;
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.03) AND ((HIGH)/(CLOSE)<1.03) AND (VAR3AA>0),92,0);
DRAWTEXT(FILTER((VAR4AA>90),30),(LOW)*(1),'★加仓'),COLOR00FFFF;
DRAWTEXT(FILTER((VAR4AA>90),10),(LOW)*(1),'★加仓'),COLOR00FFFF;
A1AA:=9;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
VAR6:=REF(C,1);
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
DRAWTEXT(CROSS(90,VAR7),H*0.99,'★减仓'),COLORYELLOW;
DRAWTEXT_FIX(1,0,0,0,'【行业】:'),COLORWHITE;
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLORWHITE;{行业}
DRAWTEXT_FIX(1,0,0.05,0,'【概念】:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0.05,0,GNBLOCK),COLORYELLOW;{概念};
假阴真阳:= C>REF(C,1) AND C<O AND PERIOD=5;
STICKLINE(假阴真阳,C,O,-1,0),COLORYELLOW;
{正阳底部副图源码如下}
X_1:=CONST(CLOSE/FINANCE(33));
X_2:=CONST(DYNAINFO(7)/FINANCE(34));
X_3:=FINANCE(33)/FINANCE(34)*100;
X_4:=CONST((FINANCE(20)-FINANCE(21))/FINANCE(20)*100);
X_5:=FINANCE(30)/FINANCE(20)*100;
X_6:=FINANCE(23)/FINANCE(20)*100;
X_7:=FINVALUE(199);
X_8:=FINANCE(30)/10000;
X_9:=FINVALUE(184);
X_10:=CONST(FINANCE(38));
X_11:=CONST(FINANCE(18));
X_12:=CONST(FINANCE(32));
X_13:=FINANCE(34);
X_14:=X_3<=0.27;
X_15:=X_6<=(-1.27);
X_16:=X_5<=0.34;
X_17:=X_10<0.002;
X_18:=X_12<=0.26;
X_19:=X_11<0;
X_20:=X_4<=4.2;
抄底风险等于:X_14 OR X_15 OR X_16 OR X_17 OR X_19 OR X_20;
X_21:=CLOSE/MA(CLOSE,40)*100<78;
X_22:=CLOSE/MA(CLOSE,60)*100<74;
X_23:=HIGH>LOW*1.051;
X_24:=X_23 AND COUNT(X_23,5)>1;
X_25:=IF(X_24 AND (X_21 OR X_22),2,0);
X_26:=CLOSE/REF(CLOSE,25)<=1.1;
X_27:=SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,2)),7,1)*100<15;
X_28:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
X_29:=SMA(X_28,2,1);
X_30:=SMA(X_29,2,1);
X_31:=IF(X_29>REF(X_29,1) AND REF(X_29,1)<REF(X_29,2) AND X_29<23,1.5,0);
青龙:X_26 AND X_25 AND X_27 AND X_31,COLORGREEN;
X_32:=MA(CLOSE,5);
X_33:=MA(CLOSE,10);
X_34:=MA(CLOSE,30);
X_35:=MA(CLOSE,60);
X_36:=MA(CLOSE,120);
X_37:=X_36>X_35 AND X_35>X_34;
X_38:=X_34>X_35 AND X_35>X_36;
X_39:=MAX(X_34,MAX(X_35,X_36));
X_40:=MIN(X_34,MIN(X_35,X_36));
X_41:=IF(X_34!=X_39 AND X_34!=X_40,X_34,IF(X_35!=X_39 AND X_35!=X_40,X_35,X_36));
X_42:=(X_39-X_40)/X_40*100;
X_43:=(X_41-X_40)/X_40*100;
X_44:=MA(REF(HHV(CLOSE,30),1),2);
X_45:=MA(REF(LLV(CLOSE,30),1),2);
X_46:=(X_44-MAX(CLOSE,OPEN))/MAX(CLOSE,OPEN)*100;
X_47:=(MIN(CLOSE,OPEN)-X_45)/X_45*100;
X_48:=BARSLASTCOUNT(X_45<REF(X_45,1) AND X_45*1.007>=REF(X_45,1));
X_49:=(MAX(CLOSE,OPEN)-MIN(CLOSE,OPEN))/MIN(CLOSE,OPEN)*100;
X_50:=(HIGH-MAX(CLOSE,OPEN))/MAX(CLOSE,OPEN)*100;
X_51:=(MIN(CLOSE,OPEN)-LOW)/LOW*100;
X_52:=BARSLASTCOUNT(MAX(OPEN,CLOSE)<=REF(MAX(OPEN,CLOSE),1) AND MIN(OPEN,CLOSE)<=REF(MIN(OPEN,CLOSE),1))>=2;
X_53:=(REF(MIN(CLOSE,OPEN),1)-MAX(CLOSE,OPEN))/MAX(CLOSE,OPEN)*100;
X_54:=BARSLASTCOUNT(X_49>2.1)>=3 AND BARSLASTCOUNT(X_53>2.1)>=2 AND COUNT(X_53>5.5,2) OR (BARSLASTCOUNT(OPEN<REF(OPEN,1) AND CLOSE<REF(CLOSE,1))=2 AND BARSLASTCOUNT(OPEN>CLOSE AND X_49>4)=3);
X_55:=RANGE(MIN(CLOSE,OPEN),MA(CLOSE,5)*0.98,MA(CLOSE,5)*1.02);
X_56:=(MAX(HHV(CLOSE,10),HHV(OPEN,10))-MIN(LLV(CLOSE,10),LLV(OPEN,10)))/MIN(LLV(CLOSE,10),LLV(OPEN,10))*100;
X_57:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
X_58:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
X_59:=REF(X_58,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_60:=REF(X_58 OR X_59,1) AND X_57;
X_61:=X_60 AND CLOSE>OPEN;
X_62:=REF(X_57,1) AND X_58 AND NOT(REF(CLOSE,3)=LLV(CLOSE,4));
X_63:=CLOSE/OPEN>1.04 AND CLOSE<SMA(HIGH,19,3) AND CLOSE>REF(CLOSE,1);
X_64:=IF(CLOSE>MA(CLOSE,4),1,0)+IF(CLOSE<MA(CLOSE,4),(-1),0)+IF(MA(CLOSE,5)>REF(MA(CLOSE,5),1),1,0)+IF(MA(CLOSE,5)<REF(MA(CLOSE,5),1),(-1),0);
X_65:=X_64=(-2) AND CLOSE>OPEN;
X_66:=IF(CLOSE>MA(CLOSE,4),1,0);
X_67:=IF(CLOSE<MA(CLOSE,4),(-1),0);
X_68:=IF(MA(CLOSE,5)>REF(MA(CLOSE,5),1),1,0);
X_69:=IF(MA(CLOSE,5)<REF(MA(CLOSE,5),1),(-1),0);
X_70:=X_66+X_67+X_68+X_69;
X_71:=X_70=2 AND CLOSE<OPEN;
X_72:=EMA((CLOSE*2+HIGH+LOW)/4,13)-EMA((CLOSE*2+HIGH+LOW)/4,73);
X_73:=CROSS(X_72,EMA(X_72,2)) AND X_72<=0.05 AND CLOSE/REF(CLOSE,1)>0.035;
X_74:=X_73 AND NOT(X_71);
X_75:=X_63 AND X_49>3.9 AND X_47<0.2 AND CLOSE>X_45 AND X_51<1.5 AND REF(X_50<3,1) AND (REF(X_49>5.5 AND CLOSE<OPEN,1) AND REF(X_49,1)>X_49)=0 AND X_74=0 AND X_65=0 AND REF(X_62 AND X_74 AND X_61=0,1)=0 AND REF(X_61=0,2);
X_76:=X_45=REF(X_45,1) OR X_48 AND CLOSE<X_40*1.01 AND BARSLASTCOUNT(X_40<=REF(X_40,1))>=7 AND X_43<11.54 AND (BARSLASTCOUNT(X_39>X_44)>=4 AND OPEN<X_45 OR (BARSLASTCOUNT(X_39<X_44)>10 AND OPEN>X_45 AND X_42<10)) AND (X_37 OR CLOSE*1.2<X_40 OR COUNT(CROSS(X_34,X_35),4)) AND BARSLASTCOUNT(X_41<X_44)>=7;
X_77:=X_75 AND X_76;
X_78:=X_63 AND X_49>5.4 AND CLOSE=HHV(CLOSE,4) AND OPEN<=REF(MAX(CLOSE,OPEN),1) AND X_50<1.7 AND X_74=0 AND X_65=0 AND (REF(BARSLASTCOUNT(X_49<1.5 AND X_55)>=3,1) OR REF(COUNT(X_52,2)>=1 AND BARSLASTCOUNT(X_49>1.5)>=3,1)) AND (REF(X_49>4.5 AND CLOSE<OPEN,1)=0 OR REF(X_54,1));
X_79:=X_47<5.4 AND X_46<14 AND CLOSE>X_45 AND CLOSE<X_39*1.01 AND CLOSE>X_40 AND BARSLASTCOUNT(X_39<X_44)>10 AND (COUNT(X_54,7) OR REF(X_56<10,1)) AND (X_38 OR BARSLASTCOUNT(X_39>=REF(X_39,1))>=10);
X_80:=X_78 AND X_79;
X_81:=X_52 AND BARSLASTCOUNT(X_49<2.5)>=3 AND X_65 AND CLOSE<X_45 OR X_54;
X_82:=BARSLASTCOUNT(CLOSE>0)<60 AND CLOSE<X_34*1.01 AND CROSS(CLOSE,X_32) AND CROSS(CLOSE,X_33) OR (X_49>5 AND X_46<14);
X_83:=X_63 AND X_49>3.9 AND X_47<1.05 AND CLOSE>X_45 AND CLOSE<X_34 AND REF(X_45,1)>REF(X_45,2) AND X_45<REF(X_45,1) AND REF(X_81,1) AND X_82;
金龙:X_77 OR X_80 OR X_83,COLORYELLOW;
赤龙:CROSS(RSI.RSI1,11),COLORRED;
白龙:IF(MA(CLOSE,1)<MA(CLOSE,144)*0.45,100,0) OR IF(MA(CLOSE,1)<MA(CLOSE,60)*0.55,100,0),COLORWHITE;
X_84:=REF(CLOSE,1);
X_85:=SMA(MAX(CLOSE-X_84,0),7,1)/SMA(ABS(CLOSE-X_84),7,1)*100;
X_86:=SMA(MAX(CLOSE-X_84,0),13,1)/SMA(ABS(CLOSE-X_84),13,1)*100;
X_87:=BARSLAST(X_86<23)<=3 AND CROSS(X_85,X_86);
X_88:=(CLOSE-MA(CLOSE,23))/MA(CLOSE,20)*100<(-12.5);
X_89:=LLV(LOW,5);
X_90:=HHV(HIGH,10);
X_91:=EMA((CLOSE-X_89)/(X_90-X_89)*100,4);
X_92:=EMA(0.667*REF(X_91,1)+0.333*X_91,2);
紫龙:0-(-1)*X_87 AND X_88 AND CROSS(X_91,X_92) AND X_91<=25,COLORMAGENTA,LINETHICK2;
X_93:=1501230;
X_94:=MA((-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),19);
X_95:=(-100)*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
X_96:=EMA((-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4);
X_97:=X_94+100;
X_98:=X_95+100;
X_99:=X_96+100;
X_100:=REF(X_99,1)>85 AND REF(X_98,1)>85 AND REF(X_97,1)>65 AND CROSS(X_97,X_98);
X_101:=X_99<REF(X_99,1) AND REF(X_99,1)>80 AND (REF(X_98,1)>95 OR REF(X_98,2)>95) AND X_97>60 AND X_98<83.5 AND X_98<X_99 AND X_98<X_97+4;
X_102:=FILTER(X_101,4);
X_103:=X_97<12 AND X_99<8 AND (X_98<7.2 OR REF(X_98,1)<5) AND (X_99>REF(X_99,1) OR X_98>REF(X_98,1)) OR (X_97<8 AND X_99<7 AND X_98<15 AND X_98>REF(X_98,1)) OR (X_97<10 AND X_99<7 AND X_98<1);
X_104:=X_97<15 AND REF(X_97,1)<15 AND X_99<18 AND X_98>REF(X_98,1) AND CROSS(X_98,X_97) AND X_98>X_99 AND (REF(X_98,1)<5 OR REF(X_98,2)<5) AND (X_99>=X_97 OR REF(X_98,1)<1);
苍龙:IF(DATE<=X_93,X_104,0),COLORCYAN;
X_105:=MA(HHV(HIGH,485),17);
X_106:=MA(HHV(HIGH,222),17);
X_107:=MA(HHV(HIGH,96),17);
X_108:=MA(LLV(LOW,485),17);
X_109:=MA(LLV(LOW,222),17);
X_110:=MA(LLV(LOW,96),17);
X_111:=MA((X_108*0.96+X_109*0.96+X_110*0.96+X_105*0.558+X_106*0.558+X_107*0.558)/6,17);
X_112:=MA((X_108*1.25+X_109*1.23+X_110*1.2+X_105*0.55+X_106*0.55+X_107*0.65)/6,17);
X_113:=MA((X_108*1.3+X_109*1.3+X_110*1.3+X_105*0.68+X_106*0.68+X_107*0.68)/6,17);
X_114:=MA((X_111*3+X_112*2+X_113)/6*1.738,17);
X_115:=IF(DATE<=1341231,X_114,X_114*DAY);
X_116:=LOW;
X_117:=REF(LOW,1);
X_118:=SMA(ABS(X_116-X_117),3,1)/SMA(MAX(X_116-X_117,0),3,1)*100;
X_119:=MA(IF(CLOSE*1.35<=X_115,X_118*10,X_118/10),3);
X_120:=LLV(LOW,30);
X_121:=HHV(X_119,30);
X_122:=1341231;
X_123:=IF(DATE<=X_122,MA(IF(LOW<=X_120,(X_119+X_121*2)/2,0),3),100000000);
朱雀:IF((REF(X_123,2)>REF(X_123,3) AND X_123<REF(X_123,1))*80,0.01,(-0.5)),COLOR555555,LINETHICK2;
X_124:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
X_125:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
X_126:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
X_127:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
X_128:=(X_125+2*X_126+3*X_127)/6;
X_129:=MA(X_128,3);
玄武:IF(X_129<=(-10),0.01,(-0.5)),COLORBLUE,LINETHICK2;
X_130:=OPEN/HHV(CLOSE,30)<0.78;
X_131:=CLOSE/MA(CLOSE,50)<0.78;
X_132:=COUNT(OPEN!=LLV(OPEN,13),3)>=1;
X_133:=COUNT(HIGH>LOW*1.05,5)>2;
X_134:=CLOSE<COST(5) AND X_130 AND X_131 AND X_132 AND X_133;
X_135:=X_134 AND CLOSE>REF(HIGH,1);
X_136:=10;
X_137:=12;
X_138:=(MIN(CLOSE,OPEN)+2*HIGH)/3;
X_139:=(MAX(CLOSE,OPEN)+2*LOW)/3;
X_140:=((X_138+X_139)/2+AMOUNT/(VOL*100))/2;
X_141:=X_140-REF(X_140,1);
X_142:=MA(X_141,5)+EMA(X_140,5);
X_143:=MA(X_141,12)+EMA(X_140,12);
X_144:=MA(X_141,21)+EMA(X_140,21);
X_145:=MAX(MAX(X_142,X_143),X_144);
X_146:=MIN(MIN(X_142,X_143),X_144);
X_147:=(X_145/X_146-1)*100;
X_148:=ATAN((X_142/REF(X_142,1)-1)*100)*180/3.1416;
X_149:=ATAN((X_143/REF(X_143,1)-1)*100)*180/3.1416;
X_150:=ATAN((X_144/REF(X_144,1)-1)*100)*180/3.1416;
X_151:=(-(3*X_148+2*X_149+X_150))/36;
X_152:=CLOSE/MA(CLOSE,30)<0.75;
X_153:=CLOSE/MA(CLOSE,50)<0.78;
X_154:=HIGH/LOW>1.053 AND COUNT(HIGH/LOW>1.053,5)>2;
X_155:=X_154 AND (X_152 OR X_153);
X_156:=DMA(EMA(CLOSE,5),SUM(VOL,8)/2.8/CAPITAL);
X_157:=(CLOSE-X_156)/X_156*100;
X_158:=REF(X_157,1)<(-34) AND X_157>REF(X_157,1) AND REF(X_157,1)<REF(X_157,2) AND X_157-REF(X_157,1)>1.76 OR X_155;
X_159:=MA(INDEXC,13)>1.05*INDEXC;
X_160:=(CLOSE-REF(CLOSE,21))/REF(CLOSE,21)*10<(-3.3);
X_161:=(CLOSE-MA(CLOSE,2))/MA(CLOSE,2)*100<(-3.7);
X_162:=X_159 AND X_160 AND X_161;
X_163:=CROSS(0.5,X_162);
X_164:=CLOSE/MA(CLOSE,30)*100<80;
X_165:=CLOSE/MA(CLOSE,50)*100<78;
X_166:=CLOSE/MA(CLOSE,70)*100<72;
X_167:=X_164 AND X_165 AND X_166;
X_168:=CROSS(REF(X_147,1),X_147) AND EXIST(X_147>X_137,3) AND EXIST(X_151>X_136,3) AND X_158 AND X_163 AND X_167;
正阳底部:IF(X_135 OR X_168,0.01,(-0.5)),COLORCCDDBB,LINETHICK2;
{正阳心理重心源码如下}
N:=12;
STICKLINE(1,100,100,10,0),COLOR0099FF;
STICKLINE(1,0,0,10,0),COLOR0099FF;
STICKLINE(1,80,80,1.5,0),COLORYELLOW;
STICKLINE(1,20,20,1.5,0),COLORYELLOW;
STICKLINE(1,50,50,0.7,0),COLORWHITE;
MID:=(3*C+L+H)/5;
本周期重心价:MID,NODRAW,COLORRED;
N内重心价上涨:COUNT(本周期重心价>REF(本周期重心价,1),N)/N*100,COLORYELLOW;
逃顶预警:IFF(N内重心价上涨>=80,N内重心价上涨,DRAWNULL),CIRCLEDOT,COLORGREEN;
抄底预警:IFF(N内重心价上涨<=20,N内重心价上涨,DRAWNULL),CIRCLEDOT,COLORRED;
DRAWICON(CROSS(80,N内重心价上涨),100,2);
DRAWICON(CROSS(N内重心价上涨,20),20,1);
{正阳改版周期源码如下}
-13;
50;
60;
{1日CCI}
P:=(HIGH + LOW + CLOSE)/3;
CCI日:=(P-MA(P,14))*100/(1.5*AVEDEV(P,14)),COLORWHITE,LINETHICK1;
CCI3日均:=MA(CCI日,3),COLOREF03CC,LINETHICK1;
DRAWICON(CCI3日均>=REF(CCI3日均,1),50,38);
DRAWICON(CCI3日均<REF(CCI3日均,1),50,39);
DRAWTEXT(CURRBARSCOUNT=1,49,' CCI3日均 '),COLORFF00FF;
{1日WR}
WR:100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)),COLORFFFFFF,NODRAW;
WR2日:=EMA(WR,5),COLORF933C2;
WR4日:=EMA(WR,9),COLORLIRED;
DRAWICON(WR2日>=REF(WR2日,1),45,38);
DRAWICON(WR2日<REF(WR2日,1),45,39);
DRAWTEXT(CURRBARSCOUNT=1,44,' 1日WR '),COLORFF00FF;
{1日改良LWR}
RSV1:=100- (HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;
LWR1:=SMA(RSV1,4,1);
LWR2:=SMA(LWR1,4,1);
DRAWICON(LWR1>=REF(LWR1,1),40,38);
DRAWICON(LWR1<REF(LWR1,1),40,39);
DRAWTEXT(CURRBARSCOUNT=1,39,' 1日LWR改良 '),COLORFF00FF;
{KDJ1日}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
DRAWICON(D>=REF(D*0.95,1),35,38);
DRAWICON(D<REF(D*0.95,1),35,39);
DRAWTEXT(CURRBARSCOUNT=1,34,' 1日KDJ '),COLORFF00FF;
{1日MACD}
DIF:=EMA(CLOSE,9)-EMA(CLOSE,21);
DEA:=EMA(DIF,9);
DRAWICON(DIF>=REF(DIF,1),30,38);
DRAWICON(DIF<REF(DIF,1),30,39);
DRAWTEXT(CURRBARSCOUNT=1,29,' 1日MACD '),COLORFF00FF;
{120分MACD}
DIF120:=EMA(CLOSE,9/2)-EMA(CLOSE,21/2);
DEA120:=EMA(DIF120,9/2);
DRAWICON(DIF120>=DEA120,25,34);
DRAWICON(DIF120<DEA120,25,35);
DRAWTEXT(CURRBARSCOUNT=1,24,' 120MACD '),COLORFF00FF;
{1日控盘}
B1:=(HHV(H,20)-C)/(HHV(H,20)-LLV(LOW,20))*100-100;
B2:=SMA(B1,25,1)+100;
B3:=(C-LLV(L,20))/(HHV(H,20)- LLV(L,20))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
控盘程度:=(IF(B6>40,B6-40,0))*2.5,COLORYELLOW;
控盘度:=100,COLOR0037CD;
DRAWICON(控盘程度<REF(控盘程度,1)*1.011,20,43);
DRAWICON(控盘程度<1 AND 控盘程度>=REF(控盘程度,1)*1.011,20,43);
DRAWICON(控盘程度>=1 AND 控盘程度>=REF(控盘程度,1)*1.011,20,42);
DRAWTEXT(CURRBARSCOUNT=1,19,' 1日控盘 '),COLORYELLOW;
{1日OBV}
VA:=IF(CLOSE>REF(MAX(O,C),1),VOL, IF(CLOSE<REF(MIN(O,C),1),-VOL, ((C-L)-(H-C))/(H-L)*V));
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
MAOBV1:=MA(OBV,2),COLOR8AD8FD;
MAOBV2:=MA(OBV,3),COLOREF03CC,LINETHICK2;
MAOBV3:=MA(MAOBV2,4),COLORB57826;
DRAWICON(MAOBV2>=REF(MAOBV2,1),15,38);
DRAWICON(MAOBV2<REF(MAOBV2,1),15,39);
DRAWTEXT(CURRBARSCOUNT=1,14,' 1日OBV '),COLOR3E9EFF;
{1日SRSI}
VALUE1:=C-O;
VALUE2:=H-L;
VALUE3:=IF(VALUE2=0,0,VALUE1/VALUE2);
SRSIN:=SUM(VALUE3,7);
SRSI:=SRSIN/7,COLORLIBLUE;
SRSIM:=MA(SRSI,3),COLORF933C2;
SRSIK:=MA(SRSI,6),COLORLIRED;
DRAWICON(SRSIM>=REF(SRSIM*1.005,1),10,38);
DRAWICON(SRSIM<REF(SRSIM*1.005,1),10,39);
DRAWTEXT(CURRBARSCOUNT=1,9,' 1日SRSI '),COLOR3E9EFF;
日RSI1:="RSI.RSI1#DAY"(7);
日RSI2:="RSI.RSI2#DAY"(7);
DRAWICON(日RSI1>=日RSI2,5,38);
DRAWICON(日RSI1<日RSI2,5,39);
DRAWTEXT(CURRBARSCOUNT=1,4,' 日R金叉 '),COLOR3E9EFF;
VOLUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,3);
MAVOL2:=MA(VOLUME,7);
DRAWICON(MAVOL1>=MAVOL2,0,38);
DRAWICON(MAVOL1<MAVOL2,0,39);
DRAWTEXT(CURRBARSCOUNT=1,-1,' 成交量 '),COLOR3E9EFF;
{KDJ2日}
RSV2:=(CLOSE-LLV(LOW,9*2))/(HHV(HIGH,9*2)-LLV(LOW,9*2))*100;
K2:=SMA(RSV2,3*2,1);
D2:=SMA(K2,3*2,1);
J2:=3*K2-2*D2;
DRAWICON(J2>=REF(J2*1,1),-5,1);
DRAWICON(J2<REF(J2*1,1),-5,2);
DRAWTEXT(CURRBARSCOUNT=1,-6,' 2日KDJ '),COLOR3E9EFF;
{2日MACD}
DIF2:=EMA(CLOSE,9*2)-EMA(CLOSE,21*2);
DEA2:=EMA(DIF2,9*2);
DRAWICON(DIF2>=REF(DIF2,1),-10,1);
DRAWICON(DIF2<REF(DIF2,1),-10,2);
DRAWTEXT(CURRBARSCOUNT=1,-11,' 2日MACD '),COLOR3E9EFF;
{共振力度}
DRAWICON(CCI3日均>=REF(CCI3日均,1) AND WR2日>=REF(WR2日,1) AND LWR1>=REF(LWR1,1) AND D>=REF(D*0.95,1) AND DIF>=REF(DIF,1) AND DIF120>=DEA120 ,59,25);
DRAWICON(控盘程度>=1 AND 控盘程度>=REF(控盘程度,1)*1.011 AND MAOBV2>=REF(MAOBV2,1) AND 日RSI1>=日RSI2 AND MAVOL1>=MAVOL2 AND SRSIM>=REF(SRSIM*1.005,1) AND J2>=REF(J2*1,1) AND DIF2>=REF(DIF2,1),55,26);