修改一下感謝81
作者:文華財經 來源:cxh99.com 發布時間:2021年10月18日
-
咨詢內容:
?N:=5;CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;NAS:=33;UR:=6;LR:=6;TC1:=IF(H=HHV(H,8*UR),H,NULL);TC2:=REFX1(BARSLAST(TC1=H),10000)+1;UPPER:=REFX1(IF(TC2=1,H,REF(H,TC2-1)),10000);BC1:=IF(L=LLV(L,8*LR),L,NULL);BC2:=REFX1(BARSLAST(BC1=L),10000)+1;LOWER:=REFX1(IF(BC2=1,L,REF(L,BC2-1)),10000);LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;STICKLINE1(IF(1,HP,LP),LOWER,UPPER,2,0),RGB(78,154,154);////////////////////寬窄調整STICKLINE1(IF(1,LP,HP),LOWER,UPPER,2,0),RGB(255,155,155);/////////////////////寬窄調整STICKLINE1(CURRBARSCOUNT<=MAX(BC2,TC2)&&CURRBARSCOUNT>=MIN(BC2,TC2),UPPER,UPPER+1*MINPRICE,5,0),RGB(78,154,154);STICKLINE1(CURRBARSCOUNT<=MAX(BC2,TC2)&&CURRBARSCOUNT>=MIN(BC2,TC2),LOWER,LOWER-1*MINPRICE,5,0),RGB(255,155,155);
AA:=BACKSET(ISLASTBAR,TC2)+BACKSET(ISLASTBAR,BC2)=1,ICON(1,'CO1';HH:=BACKSET(REFX(CROSS(BACKSET(ISLASTBAR,SUMBARS(LP,1))=1,0.5),1),HHVBARS(H,0)+1);LL:=BACKSET(REFX(CROSS(BACKSET(ISLASTBAR,SUMBARS(HP,1))=1,0.5),1),LLVBARS(L,0)+1);VERTLINE1(BARSLASTCOUNT(HH)=1);DRAWNUMBER1(BARSLASTCOUNT(HH)=1,H,H,2);VERTLINE1(BARSLASTCOUNT(LL)=1);DRAWNUMBER1(BARSLASTCOUNT(LL)=1,L,L,2),VALIGN0;
有連根白色豎線,253.20改紅色,標注奔牛。2089.20改綠色,標注奔熊。
?
?來源:程序化99
-
文華技術人員:
?參考:
??N:=5;
CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;
NAS:=33;
UR:=6;
LR:=6;
TC1:=IF(H=HHV(H,8*UR),H,NULL);
TC2:=REFX1(BARSLAST(TC1=H),10000)+1;
UPPER:=REFX1(IF(TC2=1,H,REF(H,TC2-1)),10000);
BC1:=IF(L=LLV(L,8*LR),L,NULL);
BC2:=REFX1(BARSLAST(BC1=L),10000)+1;
LOWER:=REFX1(IF(BC2=1,L,REF(L,BC2-1)),10000);
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;
STICKLINE1(IF(1,HP,LP),LOWER,UPPER,2,0),RGB(78,154,154);////////////////////寬窄調整
STICKLINE1(IF(1,LP,HP),LOWER,UPPER,2,0),RGB(255,155,155);/////////////////////寬窄調整
STICKLINE1(CURRBARSCOUNT<=MAX(BC2,TC2)&&CURRBARSCOUNT>=MIN(BC2,TC2),UPPER,UPPER+1*MINPRICE,5,0),RGB(78,154,154);
STICKLINE1(CURRBARSCOUNT<=MAX(BC2,TC2)&&CURRBARSCOUNT>=MIN(BC2,TC2),LOWER,LOWER-1*MINPRICE,5,0),RGB(255,155,155);
AA:=BACKSET(ISLASTBAR,TC2)+BACKSET(ISLASTBAR,BC2)=1,ICON(1,'CO1';
HH:=BACKSET(REFX(CROSS(BACKSET(ISLASTBAR,SUMBARS(LP,1))=1,0.5),1),HHVBARS(H,0)+1);
LL:=BACKSET(REFX(CROSS(BACKSET(ISLASTBAR,SUMBARS(HP,1))=1,0.5),1),LLVBARS(L,0)+1);
VERTLINE1(BARSLASTCOUNT(HH)=1);
DRAWTEXT(BARSLASTCOUNT(HH)=1,H,'熊',FONTSIZE24;
DRAWNUMBER1(BARSLASTCOUNT(HH)=1,H,H,2),COLORGREEN;
VERTLINE1(BARSLASTCOUNT(LL)=1);
DRAWTEXT(BARSLASTCOUNT(LL)=1,L,'牛',VALIGN0,FONTSIZE24;
DRAWNUMBER1(BARSLASTCOUNT(LL)=1,L,L,2),VALIGN0,COLORGREEN;
?
?來源: m.kzuj.com.cn
-
文華客服:
?請把豎線也改了,謝謝
?
-
網友回復:
??
-
網友回復:
?參考:
? N:=5;
CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;
NAS:=33;
UR:=6;
LR:=6;
TC1:=IF(H=HHV(H,8*UR),H,NULL);
TC2:=REFX1(BARSLAST(TC1=H),10000)+1;
UPPER:=REFX1(IF(TC2=1,H,REF(H,TC2-1)),10000);
BC1:=IF(L=LLV(L,8*LR),L,NULL);
BC2:=REFX1(BARSLAST(BC1=L),10000)+1;
LOWER:=REFX1(IF(BC2=1,L,REF(L,BC2-1)),10000);
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;
STICKLINE1(IF(1,HP,LP),LOWER,UPPER,2,0),RGB(78,154,154);////////////////////寬窄調整
STICKLINE1(IF(1,LP,HP),LOWER,UPPER,2,0),RGB(255,155,155);/////////////////////寬窄調整
STICKLINE1(CURRBARSCOUNT<=MAX(BC2,TC2)&&CURRBARSCOUNT>=MIN(BC2,TC2),UPPER,UPPER+1*MINPRICE,5,0),RGB(78,154,154);
STICKLINE1(CURRBARSCOUNT<=MAX(BC2,TC2)&&CURRBARSCOUNT>=MIN(BC2,TC2),LOWER,LOWER-1*MINPRICE,5,0),RGB(255,155,155);
AA:=BACKSET(ISLASTBAR,TC2)+BACKSET(ISLASTBAR,BC2)=1,ICON(1,'CO1';
HH:=BACKSET(REFX(CROSS(BACKSET(ISLASTBAR,SUMBARS(LP,1))=1,0.5),1),HHVBARS(H,0)+1);
LL:=BACKSET(REFX(CROSS(BACKSET(ISLASTBAR,SUMBARS(HP,1))=1,0.5),1),LLVBARS(L,0)+1);
VERTLINE1(BARSLASTCOUNT(HH)=1),COLORGREEN;
DRAWTEXT(BARSLASTCOUNT(HH)=1,H,'熊',FONTSIZE24,COLORGREEN;
DRAWNUMBER1(BARSLASTCOUNT(HH)=1,H,H,2),COLORGREEN;
VERTLINE1(BARSLASTCOUNT(LL)=1),COLORRED;
DRAWTEXT(BARSLASTCOUNT(LL)=1,L,'牛',VALIGN0,FONTSIZE24,COLORRED;
DRAWNUMBER1(BARSLASTCOUNT(LL)=1,L,L,2),VALIGN0,COLORGREEN;