[求助]老師幫忙把線體加粗一號，謝謝！
作者：文華財經 來源：cxh99.com 發布時間：2020年05月12日
-
咨詢內容：
?
?
?下載信息??[文件大?。???下載次數：?]文件名：zbcl.zip
?
?來源:程序化99
-
文華技術人員：
?
參考
MA5:MA(CLOSE,5),LINETHICK2;KU1:=IFELSE(HIGH=HHV(HIGH,3),1,0);
KD1:=IFELSE(LOW=LLV(LOW,3),1,0);
UL:=IFELSE(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IFELSE(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
HHVV:=H>UL AND H>REF(H,1) ;
LLVV:=L<DL AND L<REF(L,1) ;
HV1:=HHVV AND H>=HHV(H,BARSLAST(LLVV));
LV1:=LLVV AND L<=LLV(L,BARSLAST(HHVV));
DRAWLINE(LV1,LOW,HV1, HIGH,COLORYELLOW);
DRAWLINE(HV1,HIGH,LV1, LOW,COLORMAGENTA); ///加入中樞判定//簡化版
N1:=10;
N2:=10;
DISP:=2;
K:=1;
P1:=PEAK(O,K*N1,1,1);
P2:=PEAK(O,K*N1,2,1);
WP1:=PEAKBARS(O,K*N1,1,1);
?WP2:=PEAKBARS(O,K*N1,2,1);
?T1:=TROUGH(H,K*N2,1,1);
T2:=TROUGH(H,K*N2,2,1);
WT1:=TROUGHBARS(H,K*N2,1,1);
WT2:=TROUGHBARS(H,K*N2,2,1);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);TJ2:=FILTER(ZG>ZD,2);TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));TJ4:=TJ1 AND TJ2 AND NOT(TJ3);TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1)) AND ZD<REF(MA5,1);TJ8:=TJ4 AND NOT(TJ5 OR TJ6 OR TJ7);ZSD:=IFELSE(TJ8,ZD,REF(ZD,1)),COLORYELLOW;ZSG:=IFELSE(TJ8,ZG,REF(ZG,1)),COLORMAGENTA;ZSH:=IFELSE(TJ8,HH,REF(HH,1)),COLORBLUE;ZSL:=IFELSE(TJ8,LL,REF(LL,1)),COLORGREEN;STICKLINE(TJ8,ZSH,ZSL,0,COLORMAGENTA);STICKLINE(TJ8,ZSD,ZSG,COLORMAGENTA,1);DRAWTEXT(DISP=2,ZSH,'G';//中樞高
POLYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8)),COLORMAGENTA);//中樞低:
POLYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8)),COLORYELLOW);//中樞最高:
POLYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8)),COLORRED);//中樞最低:
POLYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8)),COLORGREEN);//趨勢高://QSGD1:POLYLINE(DISP=3,ZIGZAG(O,K*N1,1)),COLORBLUE;//趨勢低://QSDD1:POLYLINE(DISP=3,ZIGZAG(H,K*N2,1)),COLORBLUE;
MZH1:=MA5>REF(MA5,1);MZH2:=MA5<REF(MA5,1);//判定:PARTLINE(MZH1,MA5,COLORYELLOW),LINETHICK2;PARTLINE(MZH2,MA5,COLORRED),LINETHICK2;//F1:IF(MA5<REF(MA5,1),MA5,NULL),RGB(0,255,0),LINETHICK4;
?
打印本文
關閉窗口