請幫忙把通達(dá)信的三平底翻紅指標(biāo)改為文華財經(jīng)版本，謝謝！

作者：文華財經(jīng) 來源：cxh99.com 發(fā)布時間：2019年08月20日

咨詢內(nèi)容： ?{寶塔線K線——寶塔線（副圖）指標(biāo)}
? {使用方法：黃托底買進(jìn)，綠壓頂賣出。}
?MA5:MA(C,5),COLORWHITE;
? ? X:=(3*C+L+O+H)/6;
? ? 多空線:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
? ? +13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
? ? +7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
? ? REF(X,20))/210,COLORMAGENTA,LINETHICK3;
? ? 拐頭:=DRAWTEXT(LONGCROSS(REF(MA5,0),REF(MA5,1),5),LOW-1,'頭'COLORRED;
? ? 翻紅:=DRAWTEXT(LONGCROSS(MA5,多空線,5),LOW-1,'紅'COLORMAGENTA;
? ? 標(biāo)識01:STICKLINE(REF(多空線,1)<多空線,多空線,REF(多空線,1),3,1),COLORRED;
? ? 標(biāo)識02:STICKLINE(REF(多空線,1)>多空線,多空線,REF(多空線,1),3,1),COLORCYAN;
? ? VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
? ? VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? 標(biāo)識03:STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
? ? VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3.2,1),COLORRED;
? ? VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
? ? VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? 標(biāo)識04:STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
? ? VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3.2,0),COLORFFCC66;
? ? VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
? ? VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
? ? 標(biāo)識05:STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.2,1),COLORYELLOW;
? ? VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
? ? VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
? ? 標(biāo)識06:STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,2),COLOR00FF00{98FD};
? ? 標(biāo)識07:STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORYELLOW;
? ? 標(biāo)識08:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLOR00C8FF;
? ? 標(biāo)識09:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF;
? ? 標(biāo)識10:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),1,0),COLOR10FFFF;
? ? 標(biāo)識11:=STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR10F0FF;
? ? 標(biāo)識12:STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORGREEN;
? ? 標(biāo)識13:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLOR93FFD1;
? ? 標(biāo)識14:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR93FF22;
? ? 標(biāo)識15:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1,0),COLOR24FF22;
? ? 標(biāo)識16:=STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2;
?
?來源:程序化99
文華技術(shù)人員： ?參考：
MA5:MA(C,5),COLORWHITE;
? ? X:=(3*C+L+O+H)/6;
? ? 多空線:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
? ? +13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
? ? +7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
? ? REF(X,20))/210,COLORMAGENTA,LINETHICK3;
? ?DRAWTEXT(LONGCROSS(REF(MA5,0),REF(MA5,1),5),LOW-1,'頭',COLORRED;
? ? DRAWTEXT(LONGCROSS(MA5,多空線,5),LOW-1,'紅',COLORMAGENTA;
? ? STICKLINE(REF(多空線,1)<多空線,多空線,REF(多空線,1),3,1),COLORRED;
? ?STICKLINE(REF(多空線,1)>多空線,多空線,REF(多空線,1),3,1),COLORCYAN;
? ? VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
? ? VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
? ? VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3.2,1),COLORRED;
? ? VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
? ? VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
? ? VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
? ? STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
? ? VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3.2,0),COLORFFCC66;
? ? VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
? ? VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
? ? STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.2,1),COLORYELLOW;
? ? VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
? ? VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
? ? STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,2),COLOR00FF00{98FD};
? ? STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORYELLOW;
? ? STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLOR00C8FF;
? ?STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF;
? ? STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),1,0),COLOR10FFFF;
? ?STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR10F0FF;
? ? STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORGREEN;
? ? STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLOR93FFD1;
? ? STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR93FF22;
? ? STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1,0),COLOR24FF22;
? ? STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2;