[求助]求老师帮忙把通达信主图公式改为金字塔主图公式！感恩！　[金字塔]

SJTJ:=DATE<1590301;
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(HS,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR001050;
STICKLINE(LS,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLORBLACK;
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;
DRAWNUMBER(ISLASTBAR AND LS,MAH,MAH),COLORYELLOW;
DRAWNUMBER(ISLASTBAR AND HS,MAL,MAL),COLORYELLOW;
最新价:IF(SJTJ, C,DRAWNULL),LINETHICK0,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);
DRAWNUMBER(ISLASTBAR  ,C,C),COLORWHITE;
AAA:=CONST(HHV(H,50));PL5:=HHV(H,45);

动态翻译：

SJTJ赋值:日期<1590301
MAH赋值:(最高价*18+昨日最高价*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+昨日最低价*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赋值:DK2<KK2
LS赋值:KK2<DK2
W2赋值:开盘价-收盘价
HT赋值:如果收阴线,返回开盘价,否则返回收盘价
LT赋值:如果收阳线,返回开盘价,否则返回收盘价
当满足条件HS时,在日期日0日内最高价的最高值和日期日0日内最低价的最低值位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR001050
当满足条件LS时,在日期日0日内最高价的最高值和日期日0日内最低价的最低值位置之间画柱状线,宽度为6,0不为0则画空心柱.,画黑色
当满足条件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则画空心柱.,画绿色
当满足条件ISLASTBARANDLS时,在MAH位置书写数字,画黄色
当满足条件ISLASTBARANDHS时,在MAL位置书写数字,画黄色
输出最新价:如果SJTJ,返回收盘价,否则返回无效数,LINETHICK0,画黄色
趋势线赋值:(MAH+MAL)/2 画绿色,,LINETHICK2
输出趋势线上升:如果HS,返回趋势线,否则返回无效数,LINETHICK2,画红色
输出趋势线下降:如果LS,返回趋势线,否则返回无效数,LINETHICK2,画绿色
当满足条件HS时,在趋势线*0.995位置画1号图标
当满足条件LS时,在趋势线*1.005位置画2号图标
当满足条件是否最后一个周期时,在收盘价位置书写数字,画白色
AAA赋值:50日内最高价的最高值的?日取值设为常数
PL5赋值:45日内最高价的最高值

SJTJ:=DATE<1590301;
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(HS,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR001050;
STICKLINE(LS,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLORBLACK;
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;}//括号里的我认为基本没啥意思

DRAWNUMBER(ISLASTBAR AND LS,MAH,MAH,0.2),COLORYELLOW;
DRAWNUMBER(ISLASTBAR AND HS,MAL,MAL,0.2),COLORYELLOW;
最新价:IF(SJTJ, C,DRAWNULL),LINETHICK0,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);
DRAWNUMBER(ISLASTBAR  ,C,C,0.2),COLORWHITE;
AAA:=CONST(HHV(H,50));PL5:=HHV(H,45);

此主题相关图片如下：qq截图20120430075959.png