咨詢內容:
請老師幫忙修改
Q:=BACKSET(ISLASTBAR,DAYBARPOS);
P8:=PEAK(H,0.2,1,1);///////////////////////////////////////////////////////////////////////////////////君耀編輯
P81:=PEAKBARS(H,0.2,1,1),NODRAW;
P83:=TROUGH(L,0.1,2,1);
P82:=TROUGHBARS(L,0.2,1,1),NODRAW;
A8:=BACKSET(ISLASTBAR,SUMBARS(P81=0,1));//
B8:=BACKSET(ISLASTBAR,BARSLAST(P82=0)+1);
A1:=CROSS(A8,0.5);
A2:=CROSS(B8,0.5);//
P82=0,NODRAW;//////////////////////////////////////////////////冬夜編輯
HS:=P81<=P82 && P81<>0 ||P82=0;
LS:=P82<=P81 && P82<>0 ||P81=0;
DRAWCOLORKLINE(HS ,COLORBLUE,0);///////////藍色K線
DRAWLINE(HS,H,1,L,COLORBLUE),LINETHICK3;//藍色影線
DRAWCOLORKLINE(LS,RGB(213,0,0),0);//////////////紅色K線////////
DRAWLINE(LS,H,1,L,RGB(213,0,0)),LINETHICK3;////紅色影線////////冬夜編輯
DRAWCOLORKLINE(H>VALUEWHEN(P81<=P82&&Q,REF(H,P81))&&P81<=P82,RGB(213,0,0),0);///////////////////////////君耀編輯
DRAWLINE(H>VALUEWHEN(P81<=P82&&Q,REF(H,P81))&&P81<=P82,H,1,L,RGB(213,0,0)),LINETHICK3;
DRAWCOLORKLINE(L<VALUEWHEN(P81>=P82&&Q,REF(L,P82))&&P82<=P81,COLORBLUE,0); /////////////君耀編輯 /////請重新編輯
DRAWLINE(L<VALUEWHEN(P81>=P82&&Q,REF(L,P82))&&P82<=P81,H,1,L,COLORBLUE),LINETHICK3;/////冬夜編輯
QQ:=BACKSET(ISLASTBAR,SUMBARS(P81=0||P82=0,4));
DRAWSL(P81<=P82&&QQ,REF(H,P81),0,1,0,COLORWHITE),DASH;////藍色壓力線//////////////
DRAWSL(P81>=P82&&QQ,REF(L,P82),0,1,0,COLORYELLOW),DASH;/////紅色支撐線//////君耀編輯
?
?來源:程序化99網( www.kzuj.com.cn )
博易技術人員:
老師好修改后不對了沒有連續性,請老師再看看改一下

DAYBARPOS:=BARSLAST(REF(HOUR,1)=15ANDHOUR<>15);
Q:=BACKSET(ISLASTBAR,DAYBARPOS);
P8:=PEAK(H,0.2,1,1);///////////////////////////////////////////////////////////////////////////////////君耀編輯
P81:=PEAKBARS(H,0.2,1,1),NODRAW;
P83:=TROUGH(L,0.1,2,1);
P82:=TROUGHBARS(L,0.2,1,1),NODRAW;
A8:=BACKSET(ISLASTBAR,SUMBARS(P81=0,1));//
B8:=BACKSET(ISLASTBAR,BARSLAST(P82=0)+1);
A1:=CROSS(A8,0.5);
A2:=CROSS(B8,0.5);//
P82=0,NODRAW;//////////////////////////////////////////////////冬夜編輯
HS:=P81<=P82&&P81<>0||P82=0;
LS:=P82<=P81&&P82<>0||P81=0;
DRAWKLINEEX(HS,H,O,L,C),COLORBLUE;///////////藍色K線
DRAWKLINEEX(LS,H,O,L,C),COLOR0000D5;//////////////紅色K線////////
DRAWKLINEEX(H>=VALUEWHEN(P81<=P82&&Q,REF(H,P81))&&P81<=P82,H,O,L,C),COLORRED;///////////////////////////君耀編輯
DRAWKLINEEX(L<=VALUEWHEN(P81>=P82&&Q,REF(L,P82))&&P82<=P81,H,O,L,C),COLORBLUE;/////////////君耀編輯/////請重新編輯
QQ:=BACKSET(ISLASTBAR,SUMBARS(P81=0||P82=0,4));
DRAWSL(P81<=P82&&QQ,REF(H,P81),0,1,0),COLORWHITE,DASH;////藍色壓力線//////////////
DRAWSL(P81>=P82&&QQ,REF(L,P82),0,1,0),COLORYELLOW,DASH;/////紅色支撐線//////君耀編輯
來源 程序化久久網