寬色帶改為變色線
作者：文華財經 來源：cxh99.com 發布時間：2022年03月19日
-
咨詢內容：
?老師好? ? 見截圖說明要求修改指標
K1:=51;K2:=50;N4:=3;LC :=REF(CLOSE,1);RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;RSI3:=SMA(MAX(CLOSE-LC,0),18,1)/SMA(ABS(CLOSE-LC),18,1)*100;MMS:=MA(3*RSI2-2*SMA(MAX(CLOSE-LC,0),16,1)/SMA(ABS(CLOSE-LC),16,1)*100,3);FF:=FORCAST(REF(CLOSE,1),N4);JCS:=FF;SMA10:=SMA(C,4,2);//求的10周期的柱線實體擴展指數加權移動平均。權重為3。T1:=MMS>REF(MMS,1)&&JCS>REF(JCS,1)&&SMA10>REF(SMA10,1);T2:=MMS<REF(MMS,1)&&JCS<REF(JCS,1)&&SMA10<REF(SMA10,1);N1:=BARSLAST(T1)+1;N2:=BARSLAST(T2)+1;HH:=BACKSET(H>HV(H,NK5)||ISLASTBAR,BARSLAST(L<LV(L,NK5))+1),NODRAW;LL:=BACKSET(L<LV(L,NK5)||ISLASTBAR,BARSLAST(H>HV(H,NK5))+1),NODRAW;//DRAWTEXT(LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000>10000,H,'●'),FONTSIZE30,COLORGREEN;//DRAWTEXT(L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000>10000,L,'●'),FONTSIZE30,COLORRED,VALIGN0;//DRAWTEXT(LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000<10000,H,'●'),FONTSIZE30,COLORGREEN;//DRAWTEXT(L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000<10000,L,'●'),FONTSIZE30,COLORRED,VALIGN0;X1:=BARSLAST(LL&&H>HV(H,NK5)&&REFX1(N1<N2||REFX(N1<N2,1),1));X2:=BARSLAST(L<LV(L,NK5)&&HH&&REFX1(N1>=N2||REFX(N1>=N2,1),1));//FILLRGN(X2<X1||LL&&H>HV(H,NK5),K1,K2,COLORRED);//FILLRGN(X2>X1||L<LV(L,NK5)&&HH,K1,K2,COLORGREEN);//DRAWTEXT(REFX(ISLASTBAR,10),(K1+K2)/2,'千位高低點延伸并列JCSMMSSMAMMS帶'),COLORBLACK,FONTSIZE15,COLORBLACK,ALIGN0,VALIGN1;//REFLINE:0,100;?COND1:=LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000>10000 || LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000<10000;COND2:=L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000>10000 || L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000<10000;VERTLINE(COND1,COLORGREEN),LINETHICK2;
DRAWSL(COND1,O,0,-0.35,0,COLORGREEN),LINETHICK2;DRAWSL(COND1,C,0,0.35,0,COLORGREEN),LINETHICK2;DRAWLINE(COND1,L,COND1,H,COLORGREEN),LINETHICK2;DRAWSL(COND2,O,0,-0.35,0,COLORRED),LINETHICK2;DRAWSL(COND2,C,0,0.35,0,COLORRED),LINETHICK2;DRAWLINE(COND2,L,COND2,H,COLORRED),LINETHICK2;VERTLINE(COND2,COLORRED),LINETHICK2;A1:=BARSLAST(COND1)+1;A2:=BARSLAST(COND2)+1;DRAWGBK1(A1>A2,COLORRED);DRAWGBK1(A1<A2,COLORGREEN);
文件名：睿期大戶室截圖20220215101449.jpg
?
?
?來源:程序化99
-
文華技術人員：
?參考：
K1:=51;
K2:=50;
N4:=3;
LC :=REF(CLOSE,1);
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI3:=SMA(MAX(CLOSE-LC,0),18,1)/SMA(ABS(CLOSE-LC),18,1)*100;
MMS:=MA(3*RSI2-2*SMA(MAX(CLOSE-LC,0),16,1)/SMA(ABS(CLOSE-LC),16,1)*100,3);
FF:=FORCAST(REF(CLOSE,1),N4);
JCS:=FF;
SMA10:=SMA(C,4,2);//求的10周期的柱線實體擴展指數加權移動平均。權重為3。
T1:=MMS>REF(MMS,1)&&JCS>REF(JCS,1)&&SMA10>REF(SMA10,1);
T2:=MMS<REF(MMS,1)&&JCS<REF(JCS,1)&&SMA10<REF(SMA10,1);
N1:=BARSLAST(T1)+1;
N2:=BARSLAST(T2)+1;
HH:=BACKSET(H>HV(H,NK5)||ISLASTBAR,BARSLAST(L<LV(L,NK5))+1),NODRAW;
LL:=BACKSET(L<LV(L,NK5)||ISLASTBAR,BARSLAST(H>HV(H,NK5))+1),NODRAW;
//DRAWTEXT(LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000>10000,H,'',FONTSIZE30,COLORGREEN;
//DRAWTEXT(L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000>10000,L,'',FONTSIZE30,COLORRED,VALIGN0;
//DRAWTEXT(LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000<10000,H,'',FONTSIZE30,COLORGREEN;
//DRAWTEXT(L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000<10000,L,'',FONTSIZE30,COLORRED,VALIGN0;
X1:=BARSLAST(LL&&H>HV(H,NK5)&&REFX1(N1<N2||REFX(N1<N2,1),1));
X2:=BARSLAST(L<LV(L,NK5)&&HH&&REFX1(N1>=N2||REFX(N1>=N2,1),1));
//FILLRGN(X2<X1||LL&&H>HV(H,NK5),K1,K2,COLORRED);
//FILLRGN(X2>X1||L<LV(L,NK5)&&HH,K1,K2,COLORGREEN);
//DRAWTEXT(REFX(ISLASTBAR,10),(K1+K2)/2,'位高低點延伸并列JCSMMSSMAMMS帶',COLORBLACK,FONTSIZE15,COLORBLACK,ALIGN0,VALIGN1;
//REFLINE:0,100;?
COND1:=LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000>10000 || LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000<10000;
COND2:=L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000>10000 || L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000<10000;
VERTLINE(COND1,COLORGREEN),LINETHICK2;
DRAWSL(COND1,O,0,-0.35,0,COLORGREEN),LINETHICK2;
DRAWSL(COND1,C,0,0.35,0,COLORGREEN),LINETHICK2;
DRAWLINE(COND1,L,COND1,H,COLORGREEN),LINETHICK2;
DRAWSL(COND2,O,0,-0.35,0,COLORRED),LINETHICK2;
DRAWSL(COND2,C,0,0.35,0,COLORRED),LINETHICK2;
DRAWLINE(COND2,L,COND2,H,COLORRED),LINETHICK2;
VERTLINE(COND2,COLORRED),LINETHICK2;
A1:=BARSLAST(COND1)+1;
A2:=BARSLAST(COND2)+1;
DRAWSL(A1>A2,REFX1(O,1000),0,1,0,COLORRED),LINETHICK3;
DRAWSL(A1<A2,REFX1(O,1000),0,1,0,COLORGREEN),LINETHICK3;
?
?來源: www.kzuj.com.cn
-
文華客服：
?謝謝老師? 見截圖說明要求修正
?
-
網友回復：
?無法準確取到屏幕正中間，只能手動進行修改位置調整,陰影部分取的是當天最高最低價的中間位置
參考：
K1:=51;
K2:=50;
N4:=3;
LC :=REF(CLOSE,1);
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI3:=SMA(MAX(CLOSE-LC,0),18,1)/SMA(ABS(CLOSE-LC),18,1)*100;
MMS:=MA(3*RSI2-2*SMA(MAX(CLOSE-LC,0),16,1)/SMA(ABS(CLOSE-LC),16,1)*100,3);
FF:=FORCAST(REF(CLOSE,1),N4);
JCS:=FF;
SMA10:=SMA(C,4,2);//求的10周期的柱線實體擴展指數加權移動平均。權重為3。
T1:=MMS>REF(MMS,1)&&JCS>REF(JCS,1)&&SMA10>REF(SMA10,1);
T2:=MMS<REF(MMS,1)&&JCS<REF(JCS,1)&&SMA10<REF(SMA10,1);
N1:=BARSLAST(T1)+1;
N2:=BARSLAST(T2)+1;
HH:=BACKSET(H>HV(H,NK5)||ISLASTBAR,BARSLAST(L<LV(L,NK5))+1),NODRAW;
LL:=BACKSET(L<LV(L,NK5)||ISLASTBAR,BARSLAST(H>HV(H,NK5))+1),NODRAW;
//DRAWTEXT(LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000>10000,H,'●'),FONTSIZE30,COLORGREEN;
//DRAWTEXT(L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000>10000,L,'●'),FONTSIZE30,COLORRED,VALIGN0;
//DRAWTEXT(LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000<10000,H,'●'),FONTSIZE30,COLORGREEN;
//DRAWTEXT(L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000<10000,L,'●'),FONTSIZE30,COLORRED,VALIGN0;
X1:=BARSLAST(LL&&H>HV(H,NK5)&&REFX1(N1<N2||REFX(N1<N2,1),1));
X2:=BARSLAST(L<LV(L,NK5)&&HH&&REFX1(N1>=N2||REFX(N1>=N2,1),1));
//FILLRGN(X2<X1||LL&&H>HV(H,NK5),K1,K2,COLORRED);
//FILLRGN(X2>X1||L<LV(L,NK5)&&HH,K1,K2,COLORGREEN);
//DRAWTEXT(REFX(ISLASTBAR,10),(K1+K2)/2,'千位高低點延伸并列JCSMMSSMAMMS帶'),COLORBLACK,FONTSIZE15,COLORBLACK,ALIGN0,VALIGN1;
//REFLINE:0,100;?
COND1:=LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000>10000 || LL&&H>HV(H,NK5)&&H-INTPART(H/100000)*100000<10000;
COND2:=L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000>10000 || L<LV(L,NK5)&&HH&&L-INTPART(L/100000)*100000<10000;
VERTLINE(COND1,COLORGREEN),LINETHICK2;
DRAWSL(COND1,O,0,-0.35,0,COLORGREEN),LINETHICK2;
DRAWSL(COND1,C,0,0.35,0,COLORGREEN),LINETHICK2;
DRAWLINE(COND1,L,COND1,H,COLORGREEN),LINETHICK2;
DRAWSL(COND2,O,0,-0.35,0,COLORRED),LINETHICK2;
DRAWSL(COND2,C,0,0.35,0,COLORRED),LINETHICK2;
DRAWLINE(COND2,L,COND2,H,COLORRED),LINETHICK2;
VERTLINE(COND2,COLORRED),LINETHICK2;
A1:=BARSLAST(COND1)+1;
A2:=BARSLAST(COND2)+1;
DRAWSL(A1>A2,REFX1((HHV(H,DAYBARPOS)+LLV(L,DAYBARPOS))/2,10000),0,1,0,COLORRED),LINETHICK3;
DRAWSL(A1<A2,REFX1((HHV(H,DAYBARPOS)+LLV(L,DAYBARPOS))/2,10000),0,1,0,COLORGREEN),LINETHICK3;
?
?
-
網友回復：
?謝謝老師? ??
好極了
?，請見截圖說明要求修正
文件名：睿期大戶室截圖20220215114304.jpg
打印本文
關閉窗口