【股票指标公式下载】-【通达信】色彩峰(高点压力、低点支撑).doc

【通达信】色彩峰（高点压力、低点支撑）-指标公式源码高:=CONST(REF(HHV(H,150),3); 低:=CONST(REF(LLV(L,150),3);色彩峰:=高-低;NN:=100;AA:=REF(H,9)=HHV(H,2*9+1); AA1:=REF(L,9)=LLV(L,2*9+1);QY:=BACKSET(AA,9+1); QY1:=BACKSET(AA1,9+1);CC:=FILTER(QY,9) AND H=HHV(H,9+1); CC1:=FILTER(QY1,9) AND L=LLV(L,9+1);DDD:=BARSLAST(CC); DD1:=BARSLAST(CC1);GDTS:=IF(CC,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0);DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1);GDCS13:=CONST(REF(HIGH,GDCS1-1); DDCS13:=CONST(REF(L,DDCS1-1);DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD1+1);GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);M:=INTPART(3*9/5);AAA:=REF(H,M)=HHV(H,2*M+1);QYY:=BACKSET(AAA,M+1);CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);DDDD:=BARSLAST(CCC),NODRAW;GDTSS:=IF(CCC,CURRBARSCOUNT,0);DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);GDCS11:=CONST(DINGBUTSS);DINGBUTS11:=REF(DINGBUTSS,DDDD+1);GDCS22:=CONST(DINGBUTS11);AA11:=REF(L,M)=LLV(L,2*M+1);QY11:=BACKSET(AA11,M+1);CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);DD11:=BARSLAST(CC11);DDTSS:=IF(CC11,CURRBARSCOUNT,0);DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);DDCS11:=CONST(DDTS11);DDTS22:=REF(DDTS11,DD11+1);DDCS22:=CONST(DDTS22);ZGD:=HHV(H,60)*1.01.00;ZGD2:=CONST(ZGD);高点压力M:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;低点支撑M:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1;高点压力1:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;低点支撑1:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;高点:=CONST(HHV(H,NN);低点:=CONST(LLV(L,NN);GJ:=(C+H+L+O)/4;明日阻力:=L+(GJ-L)+(C-L);明日支撑:=L+(C-GJ);明日阻力2:=L+2*(GJ-L)+(C-L);明日支撑2:=L+(C-GJ)-(GJ-L);今日阻力:=CONST(REF(明日阻力 , 1),NODRAW;今日支撑:=CONST(REF(明日支撑 , 1),NODRAW;今日阻力2:=CONST(REF(明日阻力2 , 1),NODRAW;今日支撑2:=CONST(REF(明日支撑2 , 1),NODRAW;STICKLINE(ISLASTBAR,今日阻力,今日阻力2,10,0),COLOR555555;DRAWTEXT(ISLASTBAR,今日阻力, 阻),COLOR0000FF;STICKLINE(ISLASTBAR,今日支撑,今日支撑2,10,0),COLOR555555;DRAWTEXT(ISLASTBAR,今日支撑, 支),COLOR00FF00;JRH:=HHV(C,2);JRL:=LLV(C,2);MA3:=MA(CLOSE,3);YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;R1:=(CLOSEREF(CLOSE,1) AND CLOSEREF(CLOSE,2);R2:=(REF(R1,1) AND CLOSE=REF(CLOSE,2);R3:=(REF(R2,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R4:=(REF(R3,1) AND CLOSE=REF(CLOSE,2);R5:=(REF(R4,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R6:=(REF(R5,1) AND CLOSE=REF(CLOSE,2);R7:=(REF(R6,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R8:=(REF(R7,1) AND CLOSE=REF(CLOSE,2);R9:=(REF(R8,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);RA:=(REF(R9,1) AND CLOSE=REF(CLOSE,2);RB:=(REF(RA,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);RC:=(REF(RB,1) AND CLOSE=REF(CLOSE,2);RD:=(CLOSEREF(CLOSE,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);RF:=(REF(RE,1) AND CLOSE=REF(CLOSE,2);R10:=(REF(RF,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R11:=(REF(R10,1) AND CLOSE=REF(CLOSE,2);R12:=(REF(R11,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R13:=(REF(R12,1) AND CLOSE=REF(CLOSE,2);R14:=(REF(R13,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R15:=(REF(R14,1) AND CLOSE=REF(CLOSE,2);R16:=(REF(R15,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R17:=(REF(R16,1) AND CLOSE=REF(CLOSE,2);R18:=(REF(R17,1) AND CLOSE=REF(CLOSE,1) AND CLOSE=REF(CLOSE,2);R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1;R1A:=(REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1) AND RD);VAR3:=IF(C200 ,MA(COST(80),3),2500),NODRAW;VAR4:=(HIGH + LOW) + CLOSE) / 3);VAR5:=EMA(OPEN + HIGH) + LOW) + CLOSE) / 4),2330);VAR6:=(VAR5 + (VAR5 * 6) / 100);短买春:R19,NODRAW,COLOR00DD00;秋离场:R1A,NODRAW,COLOR2288EE;红持股:R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,NODRAW,COLOR0000FF;阴观望:RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,NODRAW,COLOR999999;急速超跌关注:=(CLOSE-MA(CLOSE,34)/MA(CLOSE,34)*100-14,COLORBBBBBB,NODRAW;离场:=IF(红持股,JRL,DRAWNULL);明离场价:=离场,COLORFF99FF,NODRAW;今离场价:=REF(离场,1)COLOR0000FF,NODRAW;进:=IF(阴观望,JRH,DRAWNULL);明进场价:=进,COLOR33AACC,NODRAW;今进场价:=REF(明进场价,1),COLOR00FF00,NODRAW;大雪:=MA(HIGH + LOW) + CLOSE) / 3),8);无痕:=MA(HIGH + LOW) + CLOSE) / 3),21);VAR111:=EMA(OPEN + CLOSE) / 2),26);VAR222:=IF(C200 , MA(COST(30),3),2300),NODRAW;天下有雪:=IF(C 0.1),COLORFFFFFF,NODRAW;早春:=ISLASTBAR AND (VAR4 无痕) OR (VAR4 无痕) OR (VAR4 无痕) AND (VAR111 无痕),COLOR00FF00,NODRAW;初夏:=ISLASTBAR AND (VAR4 天下有雪) AND (VAR4 VAR111) AND (VAR4 VAR5) AND (VAR222 REF(VAR222,1) OR (VAR4 VAR222) AND (VAR4 VAR111) AND (VAR4 VAR5) AND (VAR222 REF(VAR222,1),COLOR0000FF,NODRAW;深秋:=ISLASTBAR AND (VAR4 VAR6) AND (VAR4 VAR3) AND (大雪 无痕) AND (VAR111 REF(VAR111,1),COLOR00FFFF,NODRAW;SAAA:=(3*C+H+L+O)/6;SVAR1:=(8*SAAA+7*REF(SAAA,1)+6*REF(SAAA,2)+5*REF(SAAA,3)+4*REF(SAAA,4)+3*REF(SAAA,5)+2*REF(SAAA,6)+REF(SAAA,8)/36;SVAR2:=(HHV(SVAR1,5)+HHV(SVAR1,10)+HHV(SVAR1,20)/3;SVAR3:=(LLV(SVAR1,5)+LLV(SVAR1,10)+LLV(SVAR1,20)/3;SVAR4:=(HHV(SVAR2,5)+HHV(SVAR2,10)+HHV(SVAR2,20)/3;SVAR5:=(LLV(SVAR3,5)+LLV(SVAR3,10)+LLV(SVAR3,20)/3;SVAR6:=(LLV(SVAR1,2)+LLV(SVAR1,4)+LLV(SVAR1,6)/3;Q1:=CONST(IF(短买春,0,IF(秋离场,150,IF(红持股,150,IF(急速超跌关注,150,100),NODRAW;Q2:=CONST(IF(短买春,100,IF(秋离场,100,IF(红持股,0,IF(急速超跌关注,150,100),NODRAW;Q3:=CONST(IF(短买春,0,IF(秋离场,20,IF(红持股,70,IF(急速超跌关注,150,100),NODRAW;DRAWBAND(高点,RGB(Q1,Q2,Q3),低点,DRAWNULL);IF(BETWEEN(高点压力M,高点,低点),高点压力M,DRAWNULL),COLORYELLOW,LINETHICK1;IF(BETWEEN(低点支撑M,高点,低点),低点支撑M,DRAWNULL),COLORYELLOW,LINETHICK1;IF(BETWEEN(高点压力1,高点,低点),高点压力1,DRAWNULL),COLORGREEN,LINETHICK1;IF(BETWEEN(低点支撑1,高点,低点),低点支撑1,DRAWNULL),COLORGREEN,LINETHICK1;中:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24)/4;AAAX:=(3*C+H+L+O)/6;中长:IF(C,(8*AAAX+7*REF(AAAX,1)+6*REF(AAAX,2)+5*REF(AAAX,3)+4*REF(AAAX,4)+3*REF(AAAX,5)+2*REF(AAAX,6)+REF(AAAX,8)/36,DRAWNULL),COLOR00FF00;IF(中长 REF(中长,1),中长,DRAWNULL),COLORMAGENTA,LINETHICK2;下档线:=(CLOSE - LLV(LOW,13) / (HHV(HIGH,13) - LLV(LOW,13) * 100);RRRSV:=SMA(下档线,3,1);KKK:=SMA(RRRSV,3,1);DDDDD:=(3 * RRRSV) - (2 * KKK);JJ12:=(CLOSE - LLV(LOW,55) / (HHV(HIGH,55) - LLV(LOW,55) * 100);RSV24:=SMA(JJ12,3,1);K24:=SMA(RSV24,3,1);D24:=(3 * RSV24) - (2 * K24);压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD),COLORFFFFFF;底部:=LLV(HIGH,30),COLOR00FF00;压力位:=IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;底部位:=IF(ISLASTBAR,底部,DRAWNULL),NODRAW;底:=CONST(底部);STICKLINE(ISLASTBAR ,压力位,压力位,30,0),COLORFFFFFF;STICKLINE(ISLASTBAR ,底部位,底部位,25,0),COLOR00FFFF;辰星线:=(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20)/211;等待:=IF(MA3辰星线,辰星线,MA3);卖出-VAR55:=EMA(EMA(EMA(CLOSE,8),13),62);VAR56:=(REF(HIGH,1) + REF(LOW,1) / 2);VAR57:=(MA(CLOSE,20) + (2 * STD(CLOSE,20);VAR58:=(SMA(MAX(CLOSE - REF(CLOSE,1),0),7,1) / SMA(ABS(CLOSE - REF(CLOSE,1),7,1) * 100);卖出1:=FILTER(CROSS(79,VAR58),4);MA21:=REF(CLOSE,1);ZX:=(SMA(MAX(CLOSE - MA21),0),6,1) / SMA(ABS(CLOSE - MA21),6,1) * 100);卖出2:=CROSS(84,ZX),COLORFF00FF;卖出3:=CROSS(90,RSI);卖出:=卖出1 OR 卖出2 OR 卖出3;买入-QQ2:=(CLOSE-LLV(LOW, 18)/(HHV(HIGH, 18)-LLV(LOW, 18)*100; QQ3:=SMA(QQ2, 9, 1); QQ4:=SMA(QQ3, 3, 1); 长趋势:=3*QQ3-2*QQ4,COLORWHITE,LINETHICK3; 趋势线:=EMA(QQ3, 3),COLORRED,LINETHICK3; 金叉:= CROSS(长趋势,趋势线);AAAA1:=AMOUNT/V;BBB1:=L1.2;DDD1:=LMA(C,5)*0.921;EEE1:=V0,0,-20),LINETHICK2,COLORGREEN;DIFF:=( EMA(CLOSE,12) - EMA(CLOSE,26)*100;DEA:=EMA(DIFF,9);MACD:= 2*(DIFF-DEA);抄底:=IF(快到底0 AND CROSS(MACD,0) AND VAR4=2099 AND MONTH2,0,1);AVAR4:=LLV(LOW,5);AVAR5:=HHV(HIGH,4);散户:= EMA(AVAR2-AVAR4)/(AVAR5-AVAR4)*100,4)*AVAR3;庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2)*AVAR3;试买:=(CROSS(散户,庄家) AND 散户50 AND 29散户) NOT 大雪)OR (CROSS(散户,庄家) AND 散户30 AND 角30) OR 抄底; AA05:=MA(C,5),COLOR0099CC;五日乖离率:=(C-AA05)/AA05*100;BB05:=ATAN(AA05/REF(AA05,1)-1)*100)*180/3.1416;速度5:=SMA(EMA(AA05-REF(AA05,1)/REF(AA05,1),3)*100,3,1);加速度5:=EMA(速度5-REF(速度5,1),3),NODRAW;AA10:=MA(C,10);AA20:=MA(C,20);BB10:=ATAN(AA10/REF(AA10,1)-1)*100)*180/3.1416;AA30:=MA(C,30);三拾日乖离率:=(C-AA30)/AA30*100;加仓:=FILTER(COUNT(CROSS(BB05,30),5)=1 AND AA05REF(AA05,1) AND 三拾日乖离率REF(三拾日乖离率,1) AND AA10REF(AA10,1)AND 加速度5REF(加速度5,1) AND 速度5REF(速度5,1) ,10) ;DRAWICON(加仓,L*0.99,23);IF(BARSCOUNT(CLOSE)45,2*MA(上轨,12)-MA(C,21),DRAWNULL),COLORAAAAAA;IF(等待REF(等待,1),等待,DRAWNULL),LINETHICK2,COLOR00FFFF;IF(辰星线REF(辰星线,1),辰星线,DRAWNULL),LINETHICK2,COLOR0000FF;IF(辰星线 0.1),HIGH,LOW,0,0),COLORFFFFFF;早春:STICKLINE(VAR4 无痕) OR (VAR4 无痕) OR (VAR4 无痕) AND (VAR111 无痕),HIGH,LOW,0,0),COLOR00FF00;初夏:STICKLINE(VAR4 天下有雪) AND (VAR4 VAR111) AND (VAR4 VAR5) AND (VAR222 REF(VAR222,1) OR (VAR4 VAR222) AND (VAR4 VAR111) AND (VAR4 VAR5) AND (VAR222 REF(VAR222,1),HIGH,LOW,0,0),COLOR0000FF;深秋:STICKLINE(VAR4 VAR6) AND (VAR4 VAR3) AND (大雪 无痕) AND (VAR111 REF(VAR111,1),HIGH,LOW,0,0),COLOR00FFFF;STICKLINE(VAR4 0.1) AND (CLOSE 0.1) AND (CLOSE = OPEN),OPEN,CLOSE,2.8,1),COLORCCCCCC;STICKLINE(VAR4 0.1) AND (CLOSE = O