咨詢內容：
?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;
?
?來源: www.tumamayizhan.com
文華客服：
?請把豎線也改了，謝謝
?
網友回復：
??
網友回復： ?參考： ? 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;
打印本文
關閉窗口