[通达信指标]当日区间支撑压力主图指标

YCJGA1:MA(CLOSE,5),COLORWHITE;

YCJGA2:MA(CLOSE,20),COLORYELLOW;

YCJGA3:MA(CLOSE,60),COLORMAGENTA;

YCJGA4:MA(CLOSE,120),COLORLIGREEN;

YCJGA5:=REF(HIGH,3)=HHV(HIGH,2*3+1);

YCJGA6:=FILTER(YCJGA5,3);

YCJGA7:=BACKSET(YCJGA6,3+1);

YCJGA8:=FILTER(YCJGA7,3);

YCJGA9:=REF(LOW,3)=LLV(LOW,2*3+1);

YCJGA10:=FILTER(YCJGA9,3);

YCJGA11:=BACKSET(YCJGA10,3+1);

YCJGA12:=FILTER(YCJGA11,3);

YCJGA13:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;

YCJGA14:=(HIGH+LOW)/2;

YCJGA15:=(YCJGA8 AND NOT((YCJGA12 AND YCJGA13>=YCJGA14))) OR ISLASTBAR  OR BARSCOUNT(CLOSE)=1;

YCJGA16:=(YCJGA12 AND NOT((YCJGA8 AND YCJGA13<YCJGA14)));

YCJGA17:=YCJGA8 AND NOT((YCJGA12 AND YCJGA13>=YCJGA14));

YCJGA18:=REF(BARSLAST(YCJGA15),1)+1;

YCJGA19:=BACKSET(YCJGA15 AND COUNT(YCJGA16,YCJGA18)>0,LLVBARS(IF(YCJGA16,LOW,10000),YCJGA18));

YCJGA20:=YCJGA19>REF(YCJGA19,1);

YCJGA21:=BACKSET(YCJGA20,2);

YCJGA22:=YCJGA21>REF(YCJGA21,1);

YCJGA23:=YCJGA22 OR ISLASTBAR  OR BARSCOUNT(CLOSE)=1;

YCJGA24:=REF(BARSLAST(YCJGA23),1)+1;

YCJGA25:=BACKSET(YCJGA23 AND COUNT(YCJGA17,YCJGA24)>0,HHVBARS(IF(YCJGA17,HIGH,0),YCJGA24));

YCJGA26:=YCJGA25>REF(YCJGA25,1);

YCJGA27:=BACKSET(YCJGA26,2);

YCJGA28:=YCJGA27>REF(YCJGA27,1);

DRAWLINE(YCJGA22,L,YCJGA28,H,0),COLORLIRED,LINETHICK1;

DRAWLINE(YCJGA28,H,YCJGA22,L,0),COLOR888888,LINETHICK1;

YCJGA29:=BACKSET(ISLASTBAR ,MIN(BARSLAST(YCJGA28),BARSLAST(YCJGA22))+1);

YCJGA30:=YCJGA29>REF(YCJGA29,1);

DRAWLINE(YCJGA30,IF(YCJGA28,H,L),ISLASTBAR ,IF(BARSLAST(YCJGA28)>BARSLAST(YCJGA22),H,L),0),COLOR888888,LINETHICK1;

YCJGA31:IF(CURRBARSCOUNT<=0, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=0)),1)),DRAWNULL)COLOR888888;

YCJGA32:IF(CURRBARSCOUNT<=0, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=0)),1)),DRAWNULL)COLOR888888;

YCJGA33:YCJGA31-(YCJGA31-YCJGA32)*0.236,DOTLINE,COLOR888888;

YCJGA34:YCJGA31-(YCJGA31-YCJGA32)*0.382,DOTLINE,COLOR888888;

YCJGA35:YCJGA31-(YCJGA31-YCJGA32)*0.5,DOTLINE,COLOR888888;

YCJGA36:YCJGA31-(YCJGA31-YCJGA32)*0.618,DOTLINE,COLOR888888;

YCJGA37:YCJGA31-(YCJGA31-YCJGA32)*0.809,DOTLINE,COLOR888888;

DRAWTEXT(ISLASTBAR,YCJGA31,'顶'),COLOR888888;

DRAWTEXT(ISLASTBAR,YCJGA32,'低'),COLOR888888;

YCJGA38:V/REF(MA(V,1),1),NODRAW;

YCJGA39:=REF(H,10)=HHV(H,2*10+1);

YCJGA40:=BACKSET(YCJGA39,10+1);

YCJGA41:=FILTER(YCJGA40,10) AND H=HHV(H,10+1);

YCJGA42:=BARSLAST(YCJGA41);

YCJGA43:=IF(YCJGA41,CURRBARSCOUNT,0);

YCJGA44:=IF(YCJGA42,REF(H,YCJGA42),H);

YCJGA45:=IF(YCJGA42,REF(YCJGA43,YCJGA42),YCJGA43);

YCJGA46:=REF(YCJGA44,YCJGA42+1);

YCJGA47:=CONST(YCJGA45);

YCJGA48:=REF(YCJGA45,YCJGA42+1);

YCJGA49:=CONST(YCJGA48);

YCJGA50:=REF(YCJGA46,YCJGA42+1);

YCJGA51:=IF(CURRBARSCOUNT>YCJGA49,0,1);

YCJGA52:DRAWLINE(CURRBARSCOUNT=YCJGA49,H,CURRBARSCOUNT=YCJGA47,H,1),COLORMAGENTA,LINETHICK1;

YCJGA53:=REF(L,10)=LLV(L,2*10+1);

YCJGA54:=BACKSET(YCJGA53,10+1);

YCJGA55:=FILTER(YCJGA54,10) AND L=LLV(L,10+1);

YCJGA56:=BARSLAST(YCJGA55);

YCJGA57:=IF(YCJGA55,CURRBARSCOUNT,0);

YCJGA58:=IF(YCJGA56,REF(L,YCJGA56),L);

YCJGA59:=IF(YCJGA56,REF(YCJGA57,YCJGA56),YCJGA57);

YCJGA60:=CONST(YCJGA59);

YCJGA61:=REF(YCJGA58,YCJGA56+1);

YCJGA62:=REF(YCJGA59,YCJGA56+1);

YCJGA63:=CONST(YCJGA62);

YCJGA64:DRAWLINE(CURRBARSCOUNT=YCJGA63,L,CURRBARSCOUNT=YCJGA60,L,1),COLORMAGENTA,LINETHICK1;

YCJGA65:=REF(H,5)=HHV(H,2*5+1);

YCJGA66:=BACKSET(YCJGA65,5+1);

YCJGA67:=FILTER(YCJGA66,5) AND H=HHV(H,5+1);

YCJGA68:=BARSLAST(YCJGA67);

YCJGA69:=IF(YCJGA67,CURRBARSCOUNT,0);

YCJGA70:=IF(YCJGA68,REF(H,YCJGA68),H);

YCJGA71:=IF(YCJGA68,REF(YCJGA69,YCJGA68),YCJGA69);

YCJGA72:=REF(YCJGA70,YCJGA68+1);

YCJGA73:=CONST(YCJGA71);

YCJGA74:=REF(YCJGA71,YCJGA68+1);

YCJGA75:=CONST(YCJGA74);

YCJGA76:=REF(YCJGA72,YCJGA68+1);

YCJGA77:=IF(CURRBARSCOUNT>YCJGA75,0,1);

YCJGA78:DRAWLINE(CURRBARSCOUNT=YCJGA75,H,CURRBARSCOUNT=YCJGA73,H,1),COLORYELLOW,LINETHICK1;

YCJGA79:=REF(L,5)=LLV(L,2*5+1);

YCJGA80:=BACKSET(YCJGA79,5+1);

YCJGA81:=FILTER(YCJGA80,5) AND L=LLV(L,5+1);

YCJGA82:=BARSLAST(YCJGA81);

YCJGA83:=IF(YCJGA81,CURRBARSCOUNT,0);

YCJGA84:=IF(YCJGA82,REF(L,YCJGA82),L);

YCJGA85:=IF(YCJGA82,REF(YCJGA83,YCJGA82),YCJGA83);

YCJGA86:=CONST(YCJGA85);

YCJGA87:=REF(YCJGA84,YCJGA82+1);

YCJGA88:=REF(YCJGA85,YCJGA82+1);

YCJGA89:=CONST(YCJGA88);

YCJGA90:DRAWLINE(CURRBARSCOUNT=YCJGA89,L,CURRBARSCOUNT=YCJGA86,L,1),COLORYELLOW,LINETHICK1;

YCJGA91:=MA(CLOSE,1);

YCJGA92:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/(6+5+4+3+2+1);

YCJGA93:=(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/(6+5+4+3+2+1);

YCJGA94:=IF(C>REF(YCJGA92,1),1,IF(C<REF(YCJGA93,1),-1,0));

YCJGA95:=BARSLAST(NOT(YCJGA94=0));

YCJGA96:=IF(YCJGA94=0,REF(YCJGA94,YCJGA95),YCJGA94);

YCJGA97:=IF(YCJGA96=-1,MA(HIGH,6),MA(LOW,6));

STICKLINE(YCJGA91<YCJGA97,LOW,HIGH,0,1),COLORCYAN;

STICKLINE(YCJGA91>YCJGA97,LOW,HIGH,0,1),COLORRED;

STICKLINE(((OPEN>CLOSE)AND(YCJGA91<YCJGA97)),(CLOSE-0.003),OPEN,3.1,0),COLORLIBLUE;

STICKLINE(((OPEN<CLOSE)AND(YCJGA91<YCJGA97)),CLOSE,OPEN,3.1,1),COLORCYAN;

STICKLINE(((OPEN>CLOSE)AND(YCJGA91>YCJGA97)),OPEN,(CLOSE-0.003),3.1,0),COLORRED;

STICKLINE(((OPEN<CLOSE)AND(YCJGA91>YCJGA97)),OPEN,CLOSE,3.1,1),COLORRED;

YCJGA98:CROSS(YCJGA91,YCJGA97),COLORRED,NODRAW;

YCJGA99:YCJGA91>YCJGA97,COLORRED,NODRAW;

DRAWICON(CROSS(YCJGA91,YCJGA97),L*0.995,7);

DRAWICON(CROSS(YCJGA97,YCJGA91),H*1.002,8);

N:=27;

PP:=0.03;

AF1:=REF(O,1);

AF2:=ABS((REF(C,1)-AF1)/AF1);

AF3:=ABS((REF(H,1)-AF1)/AF1);

AF4:=ABS((REF(L,1)-AF1)/AF1);

BF1:=ABS((AF2+AF3+AF4)/3);

BF2:=O*BF1;

预测低一:=O-BF2;

预测高一:=O+BF2;

JINRIBH:=(REF(C,2)+REF(C,1)+O)/3 ,COLOR4080FF,NODRAW;

AAF:=REF(HIGH,1);

BBF:=REF(LOW,1);

CCF:=REF(OPEN,1);

DDF:=REF(CLOSE,1);

EEF:=(AAF+BBF+CCF+2*DDF)/5;

AAAF:=EEF+(AAF-BBF);

BBBF:=2*EEF-BBF;

CCCF:=2*EEF-AAF;

DDDF:=EEF-(AAF-BBF);

EEE:=(EEF+AAAF+BBBF+CCCF+DDDF)/5;

FFF:=(EEE+OPEN)/2;

GGG:=(预测低一+FFF)/2;

预测低二:=GGG;

DRAWRECTREL(0,0,360,399,IF(120,RGB(10,0,0),0));

DRAWRECTREL(0,0,360,8,IF(120,RGB(280,0,0),0));

DRAWRECTREL(0,265,360,273,IF(120,RGB(280,0,0),0));

预测高二:=MA(REF(HIGH,1)/REF(CLOSE,2),N)*REF(CLOSE,1);

DRAWTEXT_FIX(1,0.04,0.15,0,'预测低一:'),COLORYELLOW;

DRAWNUMBER_FIX(1,0.10,0.15,0,CONST(预测低一)),COLORYELLOW;

DRAWTEXT_FIX(1,0.15,0.15,0,'元'),COLORYELLOW,LINETHICK1;

DRAWTEXT_FIX(1,0.04,0.20,0,'预测高一:'),COLORFFFFFF;

DRAWNUMBER_FIX(1,0.10,0.20,0,CONST(预测高一)),COLORFFFFFF;

DRAWTEXT_FIX(1,0.15,0.20,0,'元'),COLORFFFFFF,LINETHICK1;

DRAWTEXT_FIX(1,0.18,0.15,0,'预测低二:'),COLORYELLOW;

DRAWNUMBER_FIX(1,0.24,0.15,0,CONST(预测低二)),COLORYELLOW;

DRAWTEXT_FIX(1,0.29,0.15,0,'元'),COLORYELLOW,LINETHICK1;

DRAWTEXT_FIX(1,0.18,0.20,0,'预测高二:'),COLORFFFFFF;

DRAWNUMBER_FIX(1,0.24,0.20,0,CONST(预测高二)),COLORFFFFFF;

DRAWTEXT_FIX(1,0.29,0.20,0,'元'),COLORFFFFFF,LINETHICK1;

买回价:=预测低二*1.015;

卖出价:=买回价*(1+PP);

DRAWTEXT_FIX(1,0.04,0.10,0,'卖出价:'),COLOR8080FF,LINETHICK1;

DRAWNUMBER_FIX(1,0.10,0.10,0,CONST(卖出价)),COLOR8080FF;

DRAWTEXT_FIX(1,0.15,0.10,0,'元'),COLOR8080FF,LINETHICK1;

DRAWTEXT_FIX(1,0.18,0.10,0,'买回价:'),COLOR8080FF,LINETHICK1;

DRAWNUMBER_FIX(1,0.24,0.10,0,CONST(买回价)),COLOR8080FF;

DRAWTEXT_FIX(1,0.29,0.10,0,'元'),COLOR8080FF,LINETHICK1;