咨詢內容：
請老師修改下這個指標
N:=1;
M:=1;
A111:=BARSTATUS=2 ;
C1:=BACKSET(A111,N);
D1:=FILTER(C1,N-1);
/*STICKLINE1(CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1),LOW,MIN(O,C),0.1,1),COLORFF8080;
STICKLINE1(CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1),H,MAX(O,C),0.1,1),COLORFF8080;
STICKLINE1(CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1),OPEN,CLOSE,2,1),COLORFF8080;
STICKLINE1(CLOSE<OPEN OR CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),COLOR83FF06;
STICKLINE1(CLOSE<OPEN OR CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),OPEN,CLOSE,2,0),COLOR83FF06;
*/
//STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFAAFF;
//STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000000;
//STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,3.5,0) ,COLORFF66FF;
//STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF66FF;
/*STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,2.5,0) ,COLORFF66FF;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFF88FF;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,1.5,0) ,COLORFF99FF;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFAAFF;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,0.5,0) ,COLORFFAAFF;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR83FF06;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR000000;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,3.5,0 ),COLOR356A00;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR46A900;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,2.5,0 ),COLOR61C100;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,1.5,0 ),COLOR620C00;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR73E600;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,0.5,0 ),COLORFFFF04;
STICKLINE1(OPEN>=CLOSE ,CLOSE ,OPEN,0.3,0 ),COLOR83FF06;
*/
A11:=(CLOSE+HIGH+LOW)/(3);
VAR11:=EMA(CLOSE,3);
VAR22:=EMA(CLOSE,8);
MA211:=EMA(CLOSE,21);
/*STICKLINE1(VAR11<VAR22 AND VAR11>MA211,H,L,0,0),COLOR8AC5FF;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,4,0),COLOR000000;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,3.5,0),COLOR0000FF;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,3,0),COLOR0000DF;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,2.5,0),COLOR0065CA;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,2,0),COLOR005CB9;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,1.0,0),COLOR006FDD;
STICKLINE1(VAR11<VAR22 AND VAR11>MA211,C,O,0,5),COLOR8AC5FF;
STICKLINE1(CLOSE>OPEN,C,O,0,0) ,COLORFFAAFF;
STICKLINE1(CLOSE>OPEN,C,O,4,0) ,COLOR000000;
STICKLINE1(CLOSE>OPEN,C,O,3.5,0) ,COLORFF66FF;
STICKLINE1(CLOSE>OPEN,C,O,3,0) ,COLORFF66FF;
STICKLINE1(CLOSE>OPEN,C,O,2.5,0) ,COLORFF66FF;
STICKLINE1(CLOSE>OPEN,C,O,2,0) ,COLORFF88FF;
STICKLINE1(CLOSE>OPEN,C,O,1.5,0) ,COLORFF99FF;
STICKLINE1(CLOSE>OPEN,C,O,1,0) ,COLORFFAAFF;
STICKLINE1(CLOSE>OPEN,C,O,0.5,0) ,COLORFFAAFF;
*/
A1:=(CLOSE+HIGH+LOW)/(3);
VAR1:=EMA(CLOSE,3);
VAR2:=EMA(CLOSE,8);
MA21:=EMA(CLOSE,21);
/*STICKLINE1(REFX(VAR1<MA21,8),H,L,0,0),COLOR83FF06;
STICKLINE1(REFX(VAR1<MA21,8),C,O,4,0),COLOR000000;
STICKLINE1(REFX(VAR1<MA21,8),C,O,3.5,0),COLOR356A00;
STICKLINE1(REFX(VAR1<MA21,8),C,O,3,0),COLOR46A900;
STICKLINE1(REFX(VAR1<MA21,8),C,O,2.5,0),COLOR61C100;
STICKLINE1(REFX(VAR1<MA21,8),C,O,2,0),COLOR62C400;
STICKLINE1(REFX(VAR1<MA21,8),C,O,1.5,0),COLOR73E600;
STICKLINE1(REFX(VAR1<MA21,8),C,O,1,0),COLOR73E600;
STICKLINE1(REFX(VAR1<MA21,8),C,O,0.5,0),COLOR83FF06;
*/
VAR19:=ZIGZAG(C,5,1)>REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)<=REF(ZIGZAG(C,5,1),2);
VAR1A:=ZIGZAG(C,5,1)<REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)>=REF(ZIGZAG(C,5,1),2);
//{青色變盤K線}
//STICKLINE(VAR1A,C,O,8,0),COLORBLACK;
//STICKLINE(VAR1A,C,O,7,0),COLORBLACK;
STICKLINE(VAR1A,C,O,6,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,5,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,4,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,3,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,0,0),COLORMAGENTA;
DRAWLINE(VAR1A,H,VAR1A,L,COLORMAGENTA);
//{粉紅變盤K線}
//STICKLINE(VAR19,C,O,8,0),COLORBLACK;
//STICKLINE(VAR19,C,O,7,0),COLORBLACK;
//STICKLINE(VAR19,C,O,6,0),COLORBLACK;
STICKLINE(VAR19,C,O,5,0),COLORFF8000;
STICKLINE(VAR19,C,O,4,0),COLORFF8000;
STICKLINE(VAR19,C,O,3,0),COLORFF8000;
STICKLINE(VAR19,C,O,0,0),COLORFF8000;
DRAWLINE(VAR19,L,VAR19,H,COLORFF8000);
{跳空（跳高）缺口圖示}
VR1:=100*(LOW-REF(HIGH,1))/REF(HIGH,1);
VR5:=100*(HIGH-REF(LOW,1))/REF(LOW,1);
//{缺口圖示}
//STICKLINE1(VR1>0,LOW,REF(HIGH,1),4,0),COLORRED,LINETHICK6;
//STICKLINE1(VR5<0,HIGH,REF(LOW,1),4,0),COLORGREEN,LINETHICK6;
//{跳空（跳高）缺口圖示}
//VR1:=100*(LOW-REF(HIGH,1))/REF(HIGH,1),COLORRED;
//VR5:=100*(HIGH-REF(LOW,1))/REF(LOW,1),COLORRED;
//{缺口圖示}
STICKLINE1(VR1>0,LOW,REF(HIGH,1),7,1);
STICKLINE1(VR5<0,HIGH,REF(LOW,1),7,1);
//{向上跳空缺口}
N2:=BARSLAST(L>REF(H,1))+1;
CON2:=EVERY(REF(H,N2)<C,N2);
STICKLINE(CON2&&N2>1,REF(H,N2),LLV(L,N2),COLOR540000,0),ALIGN1;
//{向下跳空缺口}
N1:=BARSLAST(H<REF(L,1))+1;
CON1:=EVERY(REF(L,N1)>C,N1);
STICKLINE(CON1&&N1>1,REF(L,N1),HHV(H,N1),COLOR006000,0),ALIGN1;
?
?
?來源:程序化99網（ www.tumamayizhan.com ）
博易技術人員：
N:=1;
M:=1;
A111:=BARSTATUS=2 ;
C1:=BACKSET(A111,N);
D1:=FILTER(C1,N-1);
//STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFAAFF;
//STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000000;
A11:=(CLOSE+HIGH+LOW)/(3);
VAR11:=EMA(CLOSE,3);
VAR22:=EMA(CLOSE,8);
MA211:=EMA(CLOSE,21);
A1:=(CLOSE+HIGH+LOW)/(3);
VAR1:=EMA(CLOSE,3);
VAR2:=EMA(CLOSE,8);
MA21:=EMA(CLOSE,21);
VAR19:=ZIG(C,5,1)>REF(ZIG(C,5,1),1) AND REF(ZIG(C,5,1),1)<=REF(ZIG(C,5,1),2);
VAR1A:=ZIG(C,5,1)<REF(ZIG(C,5,1),1) AND REF(ZIG(C,5,1),1)>=REF(ZIG(C,5,1),2);
//{青色變盤K線}
//STICKLINE(VAR1A,C,O,8,0),COLORBLACK;
//STICKLINE(VAR1A,C,O,7,0),COLORBLACK;
STICKLINE(VAR1A,C,O,6,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,5,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,4,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,3,0),COLORMAGENTA;
STICKLINE(VAR1A,C,O,0,0),COLORMAGENTA;
DRAWLINE(VAR1A,H,VAR1A,L,COLORMAGENTA);
//{粉紅變盤K線}
//STICKLINE(VAR19,C,O,8,0),COLORBLACK;
//STICKLINE(VAR19,C,O,7,0),COLORBLACK;
//STICKLINE(VAR19,C,O,6,0),COLORBLACK;
STICKLINE(VAR19,C,O,5,0),COLORFF8000;
STICKLINE(VAR19,C,O,4,0),COLORFF8000;
STICKLINE(VAR19,C,O,3,0),COLORFF8000;
STICKLINE(VAR19,C,O,0,0),COLORFF8000;
DRAWLINE(VAR19,L,VAR19,H,COLORFF8000);
{跳空（跳高）缺口圖示}
VR1:=100*(LOW-REF(HIGH,1))/REF(HIGH,1);
VR5:=100*(HIGH-REF(LOW,1))/REF(LOW,1);
//{缺口圖示}
//STICKLINE1(VR1>0,LOW,REF(HIGH,1),4,0),COLORRED,LINETHICK6;
//STICKLINE1(VR5<0,HIGH,REF(LOW,1),4,0),COLORGREEN,LINETHICK6;
//{跳空（跳高）缺口圖示}
//VR1:=100*(LOW-REF(HIGH,1))/REF(HIGH,1),COLORRED;
//VR5:=100*(HIGH-REF(LOW,1))/REF(LOW,1),COLORRED;
//{缺口圖示}
STICKLINE(VR1>0,LOW,REF(HIGH,1),7,1);
STICKLINE(VR5<0,HIGH,REF(LOW,1),7,1);
//{向上跳空缺口}
N2:=BARSLAST(L>REF(H,1))+1;
CON2:=COUNT(REF(H,N2)<C,N2);
STICKLINE(CON2&&N2>1,REF(H,N2),LLV(L,N2),10,0),COLOR540000,ALIGN1;
//{向下跳空缺口}
N1:=BARSLAST(H<REF(L,1))+1;
CON1:=COUNT(REF(L,N1)>C,N1);
STICKLINE(CON1&&N1>1,REF(L,N1),HHV(H,N1),10,0),COLOR006000,ALIGN1;
來源 程序化久久網
打印本文
關閉窗口