怎样把同花顺的K线全部修改成实心的宝塔线，我现在已经修改了，但是有的线上面多空一截空的来，看着

Question

很不舒服！

Answer 1

我正好有个公式，是我自己改好的，通达信用。可以复制进去放在副图使用。
M:=20;
A1:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,3)+EMA((OPEN+HIGH+LOW+CLOSE)/4,6)+EMA((OPEN+HIGH+LOW+CLOSE)/4,9))/3;
A2:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,5)+EMA((OPEN+HIGH+LOW+CLOSE)/4,10)+EMA((OPEN+HIGH+LOW+CLOSE)/4,20))/3;
A3:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,7)+EMA((OPEN+HIGH+LOW+CLOSE)/4,14)+EMA((OPEN+HIGH+LOW+CLOSE)/4,28))/3;
A4:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,9)+EMA((OPEN+HIGH+LOW+CLOSE)/4,18)+EMA((OPEN+HIGH+LOW+CLOSE)/4,36))/3;
A5:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,11)+EMA((OPEN+HIGH+LOW+CLOSE)/4,22)+EMA((OPEN+HIGH+LOW+CLOSE)/4,44))/3;
A6:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,13)+EMA((OPEN+HIGH+LOW+CLOSE)/4,26)+EMA((OPEN+HIGH+LOW+CLOSE)/4,52))/3;
A7:=(EMA((OPEN+HIGH+LOW+CLOSE)/4,21)+EMA((OPEN+HIGH+LOW+CLOSE)/4,34)+EMA((OPEN+HIGH+LOW+CLOSE)/4,68))/3;
VAR1:=FORCAST(A1,3);
VAR2:=FORCAST(A2,3);
VAR3:=FORCAST(A3,3);
VAR4:=FORCAST(A4,3);
VAR5:=FORCAST(A5,3);
VAR6:=FORCAST(A6,3);
VAR7:=FORCAST(A7,3);
IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),POINTDOT,COLORFF00FF;
IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL),POINTDOT,COLOR00FF00;
IF(VAR2>REF(VAR2,1),VAR2,DRAWNULL),POINTDOT,COLORFF00FF;
IF(VAR2<REF(VAR2,1),VAR2,DRAWNULL),POINTDOT,COLOR00FF00;
IF(VAR3>REF(VAR3,1),VAR3,DRAWNULL),POINTDOT,COLORFF00FF;
IF(VAR3<REF(VAR3,1),VAR3,DRAWNULL),POINTDOT,COLOR00FF00;
IF(VAR4>REF(VAR4,1),VAR4,DRAWNULL),POINTDOT,COLORFF00FF;
IF(VAR4<REF(VAR4,1),VAR4,DRAWNULL),POINTDOT,COLOR00FF00;
IF(VAR5>REF(VAR5,1),VAR5,DRAWNULL),POINTDOT,COLORFF00FF;
IF(VAR5<REF(VAR5,1),VAR5,DRAWNULL),POINTDOT,COLOR00FF00;
IF(VAR6>REF(VAR6,1),VAR6,DRAWNULL),POINTDOT,COLORFF00FF;
IF(VAR6<REF(VAR6,1),VAR6,DRAWNULL),POINTDOT,COLOR00FF00;
IF(VAR7>REF(VAR7,1),VAR7,DRAWNULL),LINETHICK2,COLORFF00FF;
IF(VAR7<REF(VAR7,1),VAR7,DRAWNULL),LINETHICK2,COLOR00FF00;
TOWERC:=FORCAST(EMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),6);
DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1));
DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1));

C1:=REF(C,1);
C2:=REF(C,2);
MAX1:=MAX(C,C2);
MAX2:=MAX(C1,C2);

MIN1:=MIN(C,C2);
MIN2:=MIN(C1,C2);

RED1:=IF(C1>MAX1,MAX1,IF(C>MAX2,MAX2,C2));
HRED:=IF(C1>MAX1,C1-MAX1,IF(C>MAX2,C-MAX2,0));

GREEN1:=IF(C1<MIN1,C1,IF(C<MIN2,C,C2));
HGREEN:=IF(C1<MIN1,MIN1-C1,IF(C<MIN2,MIN2-C,0));

STICKLINE(HRED>0,RED1,RED1+HRED,3,1),COLORRED;
STICKLINE(HGREEN>0,GREEN1,GREEN1+HGREEN,3,0),COLORGREEN;
STICKLINE(REF(HGREEN,1)+REF(HGREEN,2)=0 AND C<=MIN1,REF(RED1,1),REF(HRED+RED1,1),3,0),COLORRED;
STICKLINE(REF(HRED,1)+REF(HRED,2)=0 AND C>=MAX2,REF(GREEN1,1),REF(GREEN1+HGREEN,1),3,0),COLORGREEN;

Answer 2

STICKLINE函数后面的括号内，最后一个数字0改成1即可

{如果回答满意，请记得给采纳}本回答被提问者采纳