請老師修改通達信，謝謝

作者：文華財經來源：cxh99.com 發布時間：2019年06月30日

咨詢內容： ?
VAR1:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
VAR2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
火:=BARSLAST(EMA(CLOSE,5)<REF(EMA(CLOSE,5),1)),NODRAW;
山:=COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5),NODRAW;
KL:=IF(山>0,2*火,0);
趨勢:=KL/2,COLOREE687B,NODRAW;
VARL1:=(EMA(C,12)-EMA(C,26))*100+50;
VARL2:=EMA(VARL1,9);
VARL3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10;
VARL4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
VARL5:=SMA(VARL4,13,8);
VARL6:=SMA(VARL3,21,8);
低位線:=IF((趨勢-VARL6<(-70)),0,-5);
DRAWBAND(低位線,RGB(00,300,150),-5,RGB(00,300,150));
QS:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
高位線:=IF((QS-VARL6>85),0,-5);
DRAWBAND(高位線,RGB(255,20,147),-5,RGB(255,20,147));
K1:EMA(VAR2,5),COLORLIBLUE,NODRAW;
K2:SMA(VAR2,5,1),COLORYELLOW,NODRAW;
K:EMA((K1-K2),2),COLORWHITE,NODRAW;
DRAWBAND(85,RGB(100,100,100),85+K,RGB(128,00,00));
KK1:=IF(K>12,90,85),COLORCYAN;
KK2:=IF(K<-12,80,85),COLORCYAN;
DRAWBAND(KK1,RGB(200,200,200),KK2,RGB(200,200,200));
DRAWBAND(K1,RGB(400,200,00),K2,RGB(50,300,100));
STICKLINE(C>0.1,15,15,1,0),COLORCYAN;
STICKLINE(C>0.1,50,50,1,0),COLORCYAN;
LC:=REF(CLOSE,1);
VAR01:=C-REF(C,1);
VAR02:=100*EMA(EMA(VAR01,6),6)/EMA(EMA(ABS(VAR01),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),0),COLOR00FF00;
BT:=(LLV(VAR02,2)=LLV(VAR02,7) AND COUNT(VAR02<0,2) AND CROSS(VAR02,MA(VAR02,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(BT,85,100,2,0),COLOR000088;
STICKLINE(BT,85,100,1,0),COLOR0000CC;
STICKLINE(BT,85,100,0.22,0),COLOR0000FF;
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;
STICKLINE(TJ1,85,95,3,0),COLOR880088;
STICKLINE(TJ1,85,95,1.5,0),COLORAA00AA;
STICKLINE(TJ1,85,95,0.8,0),COLORCC00CC;
STICKLINE(TJ1,85,95,0.2,0),COLORFF00FF;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33;
STICKLINE(TJ2,85,90,4,0),COLOR008888;
STICKLINE(TJ2,85,90,2,0),COLOR00AAAA;
STICKLINE(TJ2,85,90,1,0),COLOR00CCCC;
STICKLINE(TJ2,85,90,0.2,0),COLOR00FFFF;
{HZ_買底1}
A8:=100*EMA(EMA((C-REF(C,1)),6),6)/EMA(EMA(ABS((C-REF(C,1))),6),6);
UP1:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),0);
DOWN1:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),0);
買1:=IF((LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1),DRAWNULL,100);
?
?
?來源:程序化99
文華技術人員： 不同軟件函數機制不同，加載效果會有差異，請理解
請參考
STICKLINE1(C>0.1,0,100,4.8,0),COLORFF9900;STICKLINE1(C>0.1,-5,0,4.8,0),COLORFFB06C;VAR1:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;VAR2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;火:=BARSLAST(EMA(CLOSE,5)<REF(EMA(CLOSE,5),1)),NODRAW;山:=COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5),NODRAW;KL:=IF(山>0,2*火,0);趨勢:=KL/2,COLOREE687B,NODRAW;VARL1:=(EMA(C,12)-EMA(C,26))*100+50;VARL2:=EMA(VARL1,9);VARL3:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10;VARL4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;VARL5:=SMA(VARL4,13,8);VARL6:=SMA(VARL3,21,8);低位線:=IF((趨勢-VARL6<(-70)),0,-5);//DRAWBAND(低位線,RGB(00,300,150),-5,RGB(00,300,150));FILLRGN(低位線>-5,低位線,-5,RGB(00,300,150));FILLRGN(低位線<-5,低位線,-5,RGB(00,300,150));QS:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);高位線:=IF((QS-VARL6>85),0,-5);//DRAWBAND(高位線,RGB(255,20,147),-5,RGB(255,20,147));FILLRGN(高位線>-5,高位線,-5,RGB(255,20,147));FILLRGN(高位線<-5,高位線,-5,RGB(255,20,147));K1:EMA(VAR2,5),COLORBLUE,NODRAW;K2:SMA(VAR2,5,1),COLORYELLOW,NODRAW;K:EMA((K1-K2),2),COLORWHITE,NODRAW;//DRAWBAND(85,RGB(100,100,100),85+K,RGB(128,00,00));FILLRGN(85>85+K,85,85+K,RGB(100,100,100));FILLRGN(85<85+K,85,85+K,RGB(128,00,00));KK1:=IF(K>12,90,85),COLORCYAN;KK2:=IF(K<-12,80,85),COLORCYAN;//DRAWBAND(KK1,RGB(200,200,200),KK2,RGB(200,200,200));FILLRGN(KK1>KK2,KK1,KK2,RGB(200,200,200));FILLRGN(KK1<KK2,KK1,KK2,RGB(200,200,200));//DRAWBAND(K1,RGB(400,200,00),K2,RGB(50,300,100));FILLRGN(K1>K2,K1,K2,RGB(400,200,00));FILLRGN(K1<K2,K1,K2,RGB(50,300,100));STICKLINE1(C>0.1,15,15,1,0),COLORCYAN;STICKLINE1(C>0.1,50,50,1,0),COLORCYAN;LC:=REF(CLOSE,1);VAR01:=C-REF(C,1);VAR02:=100*EMA(EMA(VAR01,6),6)/EMA(EMA(ABS(VAR01),6),6);MA5:=EMA(C,5);MA13:=EMA(C,13);//DRAWLINE1(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),0),COLOR0000FF;UP:=VALUEWHEN(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1));//DRAWLINE1(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),0),COLOR00FF00;DOWN:=VALUEWHEN(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1));BT:=(LLV(VAR02,2)=LLV(VAR02,7) AND COUNT(VAR02<0,2) AND CROSS(VAR02,MA(VAR02,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);STICKLINE1(BT,85,100,2,0),COLOR000088;STICKLINE1(BT,85,100,1,0),COLOR0000CC;STICKLINE1(BT,85,100,0.22,0),COLOR0000FF;TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;STICKLINE1(TJ1,85,95,3,0),COLOR880088;STICKLINE1(TJ1,85,95,1.5,0),COLORAA00AA;STICKLINE1(TJ1,85,95,0.8,0),COLORCC00CC;STICKLINE1(TJ1,85,95,0.2,0),COLORFF00FF;HR:=HHV(HIGH,55);HRY:=LLV(LOW,55);HRY11:=HR*HRY;HRY33:=SQRT(HRY11);TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33;STICKLINE1(TJ2,85,90,4,0),COLOR008888;STICKLINE1(TJ2,85,90,2,0),COLOR00AAAA;STICKLINE1(TJ2,85,90,1,0),COLOR00CCCC;STICKLINE1(TJ2,85,90,0.2,0),COLOR00FFFF;{HZ_買底1}A8:=100*EMA(EMA((C-REF(C,1)),6),6)/EMA(EMA(ABS((C-REF(C,1))),6),6);//DRAWLINE(L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),0);UP1:=VALUEWHEN(H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1));//DRAWLINE(H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),0);DOWN1:=VALUEWHEN(L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1));買1:=IF((LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1),NULL,100);