beyond202104 发表于 2023-8-28 16:32:09

CCI主图本人加了支撑压力位（源码）


AAF:LLV(LOW,34),LINETHICK1,COLORFFFFCC;   

BBF:MA(AAF,4),LINETHICK1,COLORYELLOW;   

TYP := (HIGH + LOW + CLOSE)/3;   

CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,5));   

差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;   

CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));   

差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;   

CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));   

差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;   

CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));   

差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;   

CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));   

差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;   

CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;   

AAA:=(3*C+H+L+O)/6;   

VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)   

+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;   

VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;   

VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;   

VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;   

VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;   

VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;   

短线:VAR1,COLORWHITE;   

中线:VAR6,COLORYELLOW;   

下跌:IF(VAR1=VAR6,VAR6, DRAWNULL),COLORGREEN;   

TJ1:= CCI1>差值4;   

立桩量:=FILTER(TJ1,0),NODRAW;   

TJ2:=IF(BARSLAST(立桩量)=1 ,1,0);   

STICKLINE(立桩量 !=1,REF(HIGH,BARSLAST(立桩量)),   

REF(HIGH,BARSLAST(立桩量)),1,1),COLORCYAN;   

{STICKLINE(立桩量 !=1,REF(LOW,BARSLAST(立桩量)),   

REF(LOW,BARSLAST(立桩量)),1,1),COLORCYAN;}   

成立1:=TJ2=1;   

条件成立1:=FILTER(成立1,5);   

DRAWTEXT(条件成立1, REF(HIGH,BARSLAST(立桩量)),'看跌'),COLORLIBLUE;   

TJ11:= CCI1<-差值4 ;   

立桩量2:=FILTER(TJ11,0),NODRAW;   

TJ22:=IF(BARSLAST(立桩量2)=1 AND CLOSE>REF(HIGH,1),1,0);   

突破2:=TJ22=1;   

{STICKLINE(CLOSE AND 下跌!= VAR6,REF(HIGH,BARSLAST(立桩量2)),   

REF(HIGH,BARSLAST(立桩量2)),1,1),COLORYELLOW;}   

STICKLINE(CLOSE AND 下跌!= VAR6,REF(LOW,BARSLAST(立桩量2)),   

REF(LOW,BARSLAST(立桩量2)),1,1),COLORYELLOW;   

TJ:=IF(BARSLAST(立桩量2)=1 AND CLOSE>REF(LOW,1),1,0);   

成立2:=TJ=1;   

条件成立2:=FILTER(成立2,5);   

DRAWTEXT(条件成立2,REF(LOW,BARSLAST(立桩量2)),'看涨'),COLORLIMAGENTA;   

TJ111:=ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5);   

立桩量3:=FILTER(TJ111,3);   

TJ3:=IF(BARSLAST(立桩量3)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量3)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量3)=3 AND CLOSE>REF(LOW,3),1,0)));   

成立:=TJ3=1;   

条件成立:=FILTER(成立,5);   

DRAWTEXT(条件成立 AND 下跌!= VAR6,L*0.97,'☆成立');   

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(FF,MA15),BBF,'底背离'),COLORA6E500;   

DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背离'),COLOR1880FF;   

X1:=(C+L+H)/3;   

BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;   

EMA8:=EMA(C,8);   

DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),   

EMA8,'∠45'),COLORWHITE;   



STICKLINE(1,C,O,2.8,0),COLOR666600;   

STICKLINE(立桩量,C,O,2.8,0),COLOR0000FF;   

STICKLINE(1,C,O,0,0),COLORCCCCCC;   

AA:=IF((CLOSE < 100),CLOSE,(CLOSE / 100));   

A:=INTPART(((4 * (LOG(AA) / LOG(2))) + 1));   

B:=((A - 1) / 4);   

支撑:IF((CLOSE > 100),(POW(2,B) * 100),POW(2,B)),CIRCLEDOT,LINETHICK1,COLORBROWN;   

压力:IF((CLOSE > 100),(POW(2,(B + (1 / 4))) * 100),POW(2,(B + (1 / 4)))),CIRCLEDOT,LINETHICK1,COLORFF5500;   

DRAWICON(REF(压力,1)=支撑,L*0.95,1);   

{DRAWICON(支撑>HHV(H,15),H*1.05,2);};   

DRAWTEXT(ISLASTBAR,支撑,'----支撑'),COLOR00AAFF;   

DRAWTEXT(ISLASTBAR,压力,'----压力'),COLORFF5500;　


悟空丶2017 发表于 2023-9-14 06:56:19

看帖回帖是美德！:lol

最爱儒老 发表于 2023-9-22 08:13:22

厉害了！

ww492 发表于 2023-10-5 12:48:00

好人啊！

123458575 发表于 2023-10-15 21:01:37

内容真的很不错

幸福就在身边0 发表于 2024-1-11 12:43:05

点赞楼主！

苏麒麟麒q 发表于 2024-2-20 20:52:44

沙发！沙发!

春风富贵糖 发表于 2024-3-20 13:12:18

无量天尊！

美通老虎 发表于 2024-3-24 16:14:21

牛人一个

常食脸静伯 发表于 2024-3-25 19:44:53

过来看看的
页: [1]
查看完整版本: CCI主图本人加了支撑压力位（源码）