趋势智能跟踪（主图）

开来明道

趋势智能跟踪
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;
DRAWTEXT(HS=1 AND REF(LS,1),LOW*0.995,12),COLORYELLOW;
DRAWTEXT(LS=1 AND REF(HS,1),H*1.005,13),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;

开来明道

DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'竹',0);
DRAWNUMBER(ISLASTBAR  ,C,C),COLORMAGENTA;
PL5:=HHV(H,18);
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,26);
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;
DRAWTEXT(HS=1 AND REF(LS,1),LOW*0.995,12),COLORYELLOW;
DRAWTEXT(LS=1 AND REF(HS,1),H*1.005,13),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;

开来明道

填充背景
当满足条件是否最后一个周期时,在收盘价位置书写数字,画洋红色
PL5赋值:18日内最高价的最高值
SJTJ赋值:日期<1590301
AA赋值2*收盘价+最高价+最低价)/4-收盘价的30日简单移动平均的绝对值/收盘价的30日简单移动平均
长期趋势线赋值:以AA为权重(2*收盘价+最低价+最高价)/4的动态移动平均
CC赋值收盘价/长期趋势线)
MA1赋值:CC*(2*收盘价+最高价+最低价)/4的3日简单移动平均
MAAA赋值(MA1-长期趋势线)/长期趋势线)/3
TMP赋值:MA1-MAAA*MA1
输出长期趋势上升:如果TMP>长期趋势线,返回长期趋势线,否则返回无效数,线宽为4,画红色
如果TMP>长期趋势线,返回长期趋势线,否则返回无效数,画黄色,POINTDOT,线宽为4
输出长期趋势下降:如果TMP<=长期趋势线,返回长期趋势线,否则返回无效数,线宽为4,画绿色
如果TMP<=长期趋势线,返回长期趋势线,否则返回无效数,画蓝色,POINTDOT,线宽为4
HZS赋值:TMP上穿长期趋势线
LZS赋值:长期趋势线上穿TMP
当满足条件HZS时,在长期趋势线-0.1位置画26号图标
当满足条件LZS时,在长期趋势线+0.1位置画24号图标


MAH赋值最高价*18+1日前的最高价*17+2日前的最高价*16+3日前的最高价*15+4日前的最高价*14+5日前的最高价*13+6日前的最高价*12+7日前的最高价*11+8日前的最高价*10+9日前的最高价*9+10日前的最高价*8+11日前的最高价*7+12日前的最高价*6+13日前的最高价*5+14日前的最高价*4+15日前的最高价*3+16日前的最高价*2+17日前的最高价*1)/171
MAL赋值最低价*18+1日前的最低价*17+2日前的最低价*16+3日前的最低价*15+4日前的最低价*14+5日前的最低价*13+6日前的最低价*12+7日前的最低价*11+8日前的最低价*10+9日前的最低价*9+10日前的最低价*8+11日前的最低价*7+12日前的最低价*6+13日前的最低价*5+14日前的最低价*4+15日前的最低价*3+16日前的最低价*2+17日前的最低价*1)/171
MA5赋值:收盘价的5日简单移动平均
MA10赋值:收盘价的10日简单移动平均
MA20赋值:收盘价的20日简单移动平均
MA60赋值:收盘价的60日简单移动平均
DK赋值: SJTJ AND( 收盘价>=MAH OR (收盘价>MA5 AND 收盘价>MA10 AND 收盘价>MA20 AND 收盘价>MA60))
KK赋值: SJTJ AND( MAL>收盘价 OR (收盘价<MA5 AND 收盘价<MA10 AND 收盘价<MA20 AND 收盘价<MA60))
DK1赋值:上次DK距今天数
KK1赋值:上次KK距今天数
DK2赋值:上次KK1上穿DK1距今天数
KK2赋值:上次DK1上穿KK1距今天数
HS赋值K2<KK2
LS赋值:KK2<DK2
W2赋值:开盘价-收盘价
HT赋值:如果收阴线,返回开盘价,否则返回收盘价
LT赋值:如果收阳线,返回开盘价,否则返回收盘价
当满足条件W2>0ANDHS时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色
当满足条件W2>0ANDHS时,在开盘价和最高价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画红色
当满足条件W2>0ANDHS时,在收盘价和最低价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画红色
当满足条件W2<=0ANDHS时,在开盘价和收盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色
当满足条件W2<=0ANDHS时,在开盘价和最低价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画红色
当满足条件W2<=0ANDHS时,在收盘价和最高价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画红色
当满足条件W2>0ANDLS时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件W2>0ANDLS时,在开盘价和最高价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画绿色
当满足条件W2>0ANDLS时,在收盘价和最低价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画绿色
当满足条件W2<=0ANDLS时,在开盘价和收盘价位置之间画柱状线,宽度为2,1不为0则画空心柱.,画绿色
当满足条件W2<=0ANDLS时,在收盘价和最高价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画绿色
当满足条件W2<=0ANDLS时,在开盘价和最低价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,画绿色
当满足条件HS=1ANDREF(LS,1)时,在最低价*0.995位置书写文字,画黄色
当满足条件LS=1ANDREF(HS,1)时,在最高价*1.005位置书写文字,画黄色
当满足条件ISLASTBARANDLS时,在MAH位置书写数字,画黄色
当满足条件ISLASTBARANDHS时,在MAL位置书写数字,画黄色
趋势线赋值MAH+MAL)/2 画绿色,,线宽为2
输出中级趋势上升:如果HS,返回趋势线,否则返回无效数,线宽为2,画红色
输出中级趋势下降:如果LS,返回趋势线,否则返回无效数,线宽为2,画绿色
当满足条件HS时,在趋势线*0.995位置画1号图标
当满足条件LS时,在趋势线*1.005位置画2号图标
输出最新价:如果SJTJ,返回收盘价,否则返回无效数,线宽为0,画黄色
当满足条件收盘价>0时,在横轴0.004纵轴1位置书写文字,画蓝色,线宽为2