?N1=20;N2=10;N3=5}
????? STICKLINE(CLOSE>REF(CLOSE,1)*1.095 AND
????? CLOSE=HIGH,CLOSE,OPEN,2,1),COLOR0000FF;{涨停}
????? STICKLINE(CLOSE
????? CLOSE=LOW,CLOSE,OPEN,2,1),COLORGREEN;{跌停};
????? GJ:=(C H L O)/4;
????? 明日阻力:=L (GJ-L) (C-L);
????? 明日支撑:=L (C-GJ);
????? 今日阻力:REF(明日阻力 , 1),NODRAW;
????? 今日支撑:REF(明日支撑 , 1),NODRAW;
????? STICKLINE(ISLASTBAR AND C>=今日阻力,今日阻力,今日阻力,10,1),COLOR0000FF;
????? STICKLINE(ISLASTBAR AND C
<今日阻力,今日阻力,今日阻力,10,1),COLOR00FF00;
????? STICKLINE(ISLASTBAR AND C>=今日支撑,今日支撑,今日支撑,10,1),COLORFF00FF;
????? STICKLINE(ISLASTBAR AND C
<今日支撑,今日支撑,今日支撑,10,1),COLORFF8800;
????? AA:=REF(H,N1)=HHV(H,2*N1 1);
????? QY:=BACKSET(AA,N1 1);
????? CC:=FILTER(QY,N1) AND H=HHV(H,N1 1);
????? DDD:=BARSLAST(CC);
????? GDTS:=IF(CC,CURRBARSCOUNT,0);
????? DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
????? DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
????? DINGBU1:=REF(DINGBU,DDD 1);
????? GDCS1:=CONST(DINGBUTS);
????? DINGBUTS1:=REF(DINGBUTS,DDD 1);
????? GDCS2:=CONST(DINGBUTS1);
????? DINGBU2:=REF(DINGBU1,DDD 1);
????? MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
????? 高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORRED;
????? DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
????? DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
????? AA1:=REF(L,N1)=LLV(L,2*N1 1);
????? QY1:=BACKSET(AA1,N1 1);
????? CC1:=FILTER(QY1,N1) AND L=LLV(L,N1 1);
????? DD1:=BARSLAST(CC1);
????? DDTS:=IF(CC1,CURRBARSCOUNT,0);
????? YDB:=IF(DD1,REF(L,DD1),L);
????? DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
????? DDCS1:=CONST(DDTS1);
????? ZDB:=REF(YDB,DD1 1);
????? DDTS2:=REF(DDTS1,DD1 1);
????? DDCS2:=CONST(DDTS2);
????? 低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORRED;
????? DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
????? DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLOR00FF00,POINTDOT,LINETHICK2;
????? LAA:=REF(H,N2)=HHV(H,2*N2 1);
????? LQY:=BACKSET(LAA,N2 1);
????? LCC:=FILTER(LQY,N2) AND H=HHV(H,N2 1);
????? LDDD:=BARSLAST(LCC);
????? LGDTS:=IF(LCC,CURRBARSCOUNT,0);
????? LDINGBU:=IF(LDDD,REF(H,LDDD),H);{顶部}
????? LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);
????? LDINGBU1:=REF(LDINGBU,LDDD 1);
????? LGDCS1:=CONST(LDINGBUTS);
????? LDINGBUTS1:=REF(LDINGBUTS,LDDD 1);
????? LGDCS2:=CONST(LDINGBUTS1);
????? LDINGBU2:=REF(LDINGBU1,LDDD 1);
????? LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);
????? 压力:DRAWLINE(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1,H,1),COLORFF0000;
????? DRAWLINE(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1),COLOR00FF00,POINTDOT;
????? DRAWLINE(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),COLOR00FF00,POINTDOT;
????? LAA1:=REF(L,N2)=LLV(L,2*N2 1);
????? LQY1:=BACKSET(LAA1,N2 1);
????? LCC1:=FILTER(LQY1,N2) AND L=LLV(L,N2 1);
????? LDD1:=BARSLAST(LCC1);
????? LDDTS:=IF(LCC1,CURRBARSCOUNT,0);
????? LYDB:=IF(LDD1,REF(L,LDD1),L);
????? LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);
????? LDDCS1:=CONST(LDDTS1);
????? LZDB:=REF(LYDB,LDD1 1);
????? LDDTS2:=REF(LDDTS1,DD1 1);
????? LDDCS2:=CONST(LDDTS2);
????? 支撑:DRAWLINE(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1,L,1),COLORFF0000;
????? ZGSTAR:=(压力 支撑)/2;
????? ZGEND:=CONST((压力 支撑)/2);
????? STARDAY:=IF(DDCS2
????? LLAA:=REF(H,N3)=HHV(H,2*N3 1);
????? LLQY:=BACKSET(LLAA,N3 1);
????? LLCC:=FILTER(LLQY,N3) AND H=HHV(H,N3 1);
????? LLDDD:=BARSLAST(LLCC);
????? LLGDTS:=IF(LLCC,CURRBARSCOUNT,0);
????? LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);{顶部}
????? LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);
????? LLDINGBU1:=REF(LLDINGBU,LLDDD 1);
????? LLGDCS1:=CONST(LLDINGBUTS);
????? LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD 1);
????? LLGDCS2:=CONST(LLDINGBUTS1);
????? LLDINGBU2:=REF(LLDINGBU1,LLDDD 1);
????? LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);
????? L压力:DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS1,H,1)
????? COLORFF0000;
????? DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1),COLOR00FF00,POINTDOT;
????? DRAWLINE(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1),COLOR00FF00,POINTDOT;
????? LLAA1:=REF(L,N3)=LLV(L,2*N3 1);
????? LLQY1:=BACKSET(LLAA1,N3 1);
????? LLCC1:=FILTER(LLQY1,N3) AND L=LLV(L,N3 1);
????? LLDD1:=BARSLAST(LCC1);
????? LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0);
????? LLYDB:=IF(LLDD1,REF(L,LLDD1),L);
????? LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);
????? LLDDCS1:=CONST(LLDDTS1);
????? LLZDB:=REF(LLYDB,LLDD1 1);
????? LLDDTS2:=REF(LLDDTS1,DD1 1);
????? LLDDCS2:=CONST(LLDDTS2);
????? L支撑:DRAWLINE(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS1,L,1)
????? COLORYELLOW;
????? LZGSTAR:=(L压力 L支撑)/2;
????? LZGEND:=CONST((L压力 L支撑)/2);
????? LSTARDAY:=IF(LLDDCS2
????? MA05:MA(C,5),COLORFFFFFF;
????? MA10:MA(C,10),COLOR009900;
????? MA20:MA(C,20),COLOR555555;
????? MA30:MA(C,30),COLOR999900;
????? BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416;
????? BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;
????? BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416;
????? IF(BB05>30 AND MA05>REF(MA05,1), MA05,DRAWNULL),LINETHICK1,COLOR00FFFF;
????? IF(BB05
<0 AND MA05????? IF(BB30>15 AND MA30>REF(MA30,1), MA30,DRAWNULL),LINETHICK1,COLOR0000FF
?
?