咨詢內容：

老師幫我改一下這個指標，通達信改成博弈大師的，如果改不好，就幫我改一條MA20均線下方加箭頭，20均線正負用箭頭表達。謝謝老師。

DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'竹',0);
DRAWNUMBER(ISLASTBAR ,C,C),COLORMAGENTA;

SJTJ:=DATE<1590301;
AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,30))/MA(CLOSE,30);
長期趨勢線:=DMA((2*CLOSE+LOW+HIGH)/4,AA);
CC:=(CLOSE/長期趨勢線);
MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3);
MAAA:=((MA1-長期趨勢線)/長期趨勢線)/3;
TMP:=MA1-MAAA*MA1;
長期趨勢上升:IF(TMP>長期趨勢線 ,長期趨勢線,DRAWNULL),LINETHICK4,COLORRED;
IF(TMP>長期趨勢線,長期趨勢線,DRAWNULL),COLORYELLOW,POINTDOT,LINETHICK4;
長期趨勢下降:IF(TMP<=長期趨勢線,長期趨勢線,DRAWNULL),LINETHICK4,COLORGREEN;
IF(TMP<=長期趨勢線,長期趨勢線,DRAWNULL),COLORBLUE,POINTDOT,LINETHICK4;
HZS:=CROSS(TMP,長期趨勢線);
LZS:=CROSS(長期趨勢線,TMP);
DRAWICON(HZS,長期趨勢線-0.1,23);
DRAWICON(LZS,長期趨勢線+0.1,24);
{DRAWICON(TMP<=長期趨勢線 AND NOT(LZS),長期趨勢線-0.1,14)};
{DRAWICON(TMP>長期趨勢線 AND NOT(HZS),長期趨勢線+0.1,13)};
MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;
MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:= SJTJ AND( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60));
KK:= SJTJ AND( MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60));
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1));
KK2:=BARSLAST(CROSS(DK1,KK1));
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(W2>0 AND HS,OPEN,H,0.0,0),COLORRED;
STICKLINE(W2>0 AND HS,C,L,0.0,0),COLORRED;
STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1),COLORRED;
STICKLINE(W2<=0 AND HS,O,L,0.0,0),COLORRED;
STICKLINE(W2<=0 AND HS,C,H,0.0,0),COLORRED;
STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(W2>0 AND LS,OPEN,H,0.0,0),COLORGREEN;
STICKLINE(W2>0 AND LS,C,L,0.0,0),COLORGREEN;
STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1),COLORGREEN;
STICKLINE(W2<=0 AND LS,C,H,0.0,0),COLORGREEN;
STICKLINE(W2<=0 AND LS,O,L,0.0,0),COLORGREEN;
DRAWICON(HS=1 AND REF(LS,1),LOW*0.995,34),COLORYELLOW;
DRAWICON(LS=1 AND REF(HS,1),H*1.005,35),COLORYELLOW;


DRAWNUMBER(ISLASTBAR AND LS,MAH,MAH),COLORYELLOW;
DRAWNUMBER(ISLASTBAR AND HS,MAL,MAL),COLORYELLOW;
趨勢線:=(MAH+MAL)/2 COLORGREEN,,LINETHICK2;
中級趨勢上升:IF(HS,趨勢線,DRAWNULL),LINETHICK2,COLORRED;
中級趨勢下降:IF(LS,趨勢線,DRAWNULL),LINETHICK2,COLORGREEN;
DRAWICON(HS,趨勢線*0.995,1);
DRAWICON(LS,趨勢線*1.005,2);
最新價:IF(SJTJ, C,DRAWNULL),LINETHICK0,COLORYELLOW;
DRAWTEXT_FIX(C>0,0.004,1,0,EXTERNSTR(0,1)),COLORBLUE,LINETHICK2; <!-- 咨詢內容：

附件 :

-->

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： DRAWNUMBER(ISLASTBAR ,C,C,0),COLORMAGENTA;
SJTJ:=DATE<1590301;
AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,30))/MA(CLOSE,30);
長期趨勢線:=DMA((2*CLOSE+LOW+HIGH)/4,AA);
CC:=(CLOSE/長期趨勢線);
MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3);
MAAA:=((MA1-長期趨勢線)/長期趨勢線)/3;
TMP:=MA1-MAAA*MA1;
長期趨勢上升:IF(TMP>長期趨勢線 ,長期趨勢線,DRAWNULL),LINETHICK4,COLORRED;
IF(TMP>長期趨勢線,長期趨勢線,DRAWNULL),COLORYELLOW,POINTDOT,LINETHICK4;
長期趨勢下降:IF(TMP<=長期趨勢線,長期趨勢線,DRAWNULL),LINETHICK4,COLORGREEN;
IF(TMP<=長期趨勢線,長期趨勢線,DRAWNULL),COLORBLUE,POINTDOT,LINETHICK4;
HZS:=CROSS(TMP,長期趨勢線);
LZS:=CROSS(長期趨勢線,TMP);
DRAWICON(HZS,長期趨勢線-0.1,1);
DRAWICON(LZS,長期趨勢線+0.1,2);
{DRAWICON(TMP<=長期趨勢線 AND NOT(LZS),長期趨勢線-0.1,14)};
{DRAWICON(TMP>長期趨勢線 AND NOT(HZS),長期趨勢線+0.1,13)};
MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;
MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:= SJTJ AND( CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60));
KK:= SJTJ AND( MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60));
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1));
KK2:=BARSLAST(CROSS(DK1,KK1));
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(W2>0 AND HS,OPEN,H,0.0,0),COLORRED;
STICKLINE(W2>0 AND HS,C,L,0.0,0),COLORRED;
STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1),COLORRED;
STICKLINE(W2<=0 AND HS,O,L,0.0,0),COLORRED;
STICKLINE(W2<=0 AND HS,C,H,0.0,0),COLORRED;
STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(W2>0 AND LS,OPEN,H,0.0,0),COLORGREEN;
STICKLINE(W2>0 AND LS,C,L,0.0,0),COLORGREEN;
STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1),COLORGREEN;
STICKLINE(W2<=0 AND LS,C,H,0.0,0),COLORGREEN;
STICKLINE(W2<=0 AND LS,O,L,0.0,0),COLORGREEN;
DRAWICON(HS=1 AND REF(LS,1),LOW*0.995,4);
DRAWICON(LS=1 AND REF(HS,1),H*1.005,5);
DRAWNUMBER(ISLASTBAR AND LS,MAH,MAH,0),COLORYELLOW;
DRAWNUMBER(ISLASTBAR AND HS,MAL,MAL,0),COLORYELLOW;
趨勢線:=MAH+MAL/2, COLORGREEN,LINETHICK2;
中級趨勢上升:IF(HS,趨勢線,DRAWNULL),LINETHICK2,COLORRED;
中級趨勢下降:IF(LS,趨勢線,DRAWNULL),LINETHICK2,COLORGREEN;
//DRAWICON(HS,趨勢線*0.995,1);
//DRAWICON(LS,趨勢線*1.005,2);
最新價:IF(SJTJ, C,DRAWNULL),LINETHICK0,COLORYELLOW;
? DRAWNUMBER(ISLASTBAR,C,C,0),COLORMAGENTA;
SJTJ:=DATE<1590301;
AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,30))/MA(CLOSE,30);
長期趨勢線:=DMA((2*CLOSE+LOW+HIGH)/4,AA);
CC:=(CLOSE/長期趨勢線);
MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3);
MAAA:=((MA1-長期趨勢線)/長期趨勢線)/3;
TMP:=MA1-MAAA*MA1;
長期趨勢上升:IF(TMP>長期趨勢線,長期趨勢線,DRAWNULL),LINETHICK4,COLORRED;
IF(TMP>長期趨勢線,長期趨勢線,DRAWNULL),COLORYELLOW,POINTDOT,LINETHICK4;
長期趨勢下降:IF(TMP<=長期趨勢線,長期趨勢線,DRAWNULL),LINETHICK4,COLORGREEN;
IF(TMP<=長期趨勢線,長期趨勢線,DRAWNULL),COLORBLUE,POINTDOT,LINETHICK4;
HZS:=CROSS(TMP,長期趨勢線);
LZS:=CROSS(長期趨勢線,TMP);
DRAWICON(HZS,長期趨勢線-0.1,1);
DRAWICON(LZS,長期趨勢線+0.1,2);
{DRAWICON(TMP<=長期趨勢線ANDNOT(LZS),長期趨勢線-0.1,14)};
{DRAWICON(TMP>長期趨勢線ANDNOT(HZS),長期趨勢線+0.1,13)};
MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;
MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA60:=MA(CLOSE,60);
DK:=SJTJAND(CLOSE>=MAHOR(C>MA5ANDC>MA10ANDC>MA20ANDC>MA60));
KK:=SJTJAND(MAL>CLOSEOR(C<MA5ANDC<MA10ANDC<MA20ANDC<MA60));
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1));
KK2:=BARSLAST(CROSS(DK1,KK1));
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(W2>0ANDHS,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(W2>0ANDHS,OPEN,H,0.0,0),COLORRED;
STICKLINE(W2>0ANDHS,C,L,0.0,0),COLORRED;
STICKLINE(W2<=0ANDHS,OPEN,CLOSE,2,1),COLORRED;
STICKLINE(W2<=0ANDHS,O,L,0.0,0),COLORRED;
STICKLINE(W2<=0ANDHS,C,H,0.0,0),COLORRED;
STICKLINE(W2>0ANDLS,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(W2>0ANDLS,OPEN,H,0.0,0),COLORGREEN;
STICKLINE(W2>0ANDLS,C,L,0.0,0),COLORGREEN;
STICKLINE(W2<=0ANDLS,OPEN,CLOSE,2,1),COLORGREEN;
STICKLINE(W2<=0ANDLS,C,H,0.0,0),COLORGREEN;
STICKLINE(W2<=0ANDLS,O,L,0.0,0),COLORGREEN;
DRAWICON(HS=1ANDREF(LS,1),LOW*0.995,4);
DRAWICON(LS=1ANDREF(HS,1),H*1.005,5);
DRAWNUMBER(ISLASTBARANDLS,MAH,MAH,0),COLORYELLOW;
DRAWNUMBER(ISLASTBARANDHS,MAL,MAL,0),COLORYELLOW;
趨勢線:=MAH+MAL/2,COLORGREEN,LINETHICK2;
中級趨勢上升:=IF(HS,趨勢線,DRAWNULL),LINETHICK2,COLORRED;
中級趨勢下降:=IF(LS,趨勢線,DRAWNULL),LINETHICK2,COLORGREEN;
//DRAWICON(HS,趨勢線*0.995,1);
//DRAWICON(LS,趨勢線*1.005,2);
最新價:IF(SJTJ,C,DRAWNULL),LINETHICK0,COLORYELLOW;
? 來源 程序化久久網