采用缠论分笔架构编制的两点自动全波段半对数空间预测指标

显示开关:=1;

顶价:=REF(H,BARSLAST(H>REF(H,1)));

底价:=REF(L,BARSLAST(L<REF(L,1)));

分型顶0:=H>REF(顶价,1) AND L>REF(底价,1);

分型底0:=L<REF(底价,1) AND H<REF(顶价,1);

分型顶1:=分型顶0 AND H=HHV(H,BARSLAST(分型底0));

分型底1:=分型底0 AND L=LLV(L,BARSLAST(分型顶0));

分型顶:=FILTERX(分型顶1,BARSLAST(分型底1));

分型底:=FILTERX(分型底1,BARSLAST(分型顶1));

UP1:=BARSLAST(分型底);

顶力度1:=HHV(L,UP1+1)>LLV(H,UP1+1);

顶包含1:=COUNT(L>REF(L,1),UP1)>2 AND COUNT(H>REF(H,1),UP1)>2;

DN1:=BARSLAST(分型顶);

底力度1:=HHV(L,DN1+1)>LLV(H,DN1+1);

底包含1:=COUNT(H<REF(H,1),DN1)>2 AND COUNT(L<REF(L,1),DN1)>2;

笔顶10:=分型顶 AND UP1>3 AND 顶力度1 AND 顶包含1;

笔底10:=分型底 AND DN1>3 AND 底力度1 AND 底包含1;

笔顶11:=笔顶10 AND H=HHV(H,BARSLAST(笔底10));

笔底11:=笔底10 AND L=LLV(L,BARSLAST(笔顶10));

笔顶12:=笔顶11 AND H=HHV(H,BARSLAST(笔底11));

笔底12:=笔底11 AND L=LLV(L,BARSLAST(笔顶11));

笔顶1:=FILTERX(笔顶12,BARSLAST(笔底12));

笔底1:=FILTERX(笔底12,BARSLAST(笔顶12));

UP2:=BARSLAST(笔底1);

顶力度2:=HHV(L,UP2+1)>LLV(H,UP2+1);

顶包含2:=COUNT(L>REF(L,1),UP2)>2 AND COUNT(H>REF(H,1),UP2)>2;

DN2:=BARSLAST(笔顶1);

底力度2:=HHV(L,DN2+1)>LLV(H,DN2+1);

底包含2:=COUNT(H<REF(H,1),DN2)>2 AND COUNT(L<REF(L,1),DN2)>2;

笔顶20:=分型顶 AND UP2>3 AND 顶力度2 AND 顶包含2;

笔底20:=分型底 AND DN2>3 AND 底力度2 AND 底包含2;

笔顶21:=笔顶20 AND H=HHV(H,BARSLAST(笔底20));

笔底21:=笔底20 AND L=LLV(L,BARSLAST(笔顶20));

笔顶2:=FILTERX(笔顶21,BARSLAST(笔底21));

笔底2:=FILTERX(笔底21,BARSLAST(笔顶21));

笔顶3:=笔顶1 OR 笔顶2;

笔底3:=笔底1 OR 笔底2;

笔顶41:=FILTERX(笔顶3 AND H=HHV(H,BARSLAST(笔底3)),BARSLAST(笔底3));

笔底41:=FILTERX(笔底3 AND L=LLV(L,BARSLAST(笔顶3)),BARSLAST(笔顶3));

笔顶42:=FILTERX(笔顶41 AND H=HHV(H,BARSLAST(笔底41)),BARSLAST(笔底41));

笔底42:=FILTERX(笔底41 AND L=LLV(L,BARSLAST(笔顶41)),BARSLAST(笔顶41));

笔顶431:=笔顶42 AND (BARSLAST(笔底42)>1 OR BARSLAST(笔底42)=DRAWNULL);

笔底431:=笔底42 AND (BARSLAST(笔顶42)>1 OR BARSLAST(笔顶42)=DRAWNULL);

笔顶432:=笔顶431 AND (H=HHV(H,BARSLAST(笔底431)) OR BARSLAST(笔底431)=DRAWNULL);

笔底432:=笔底431 AND (L=LLV(L,BARSLAST(笔顶431)) OR BARSLAST(笔顶431)=DRAWNULL);

笔顶43:=FILTERX(笔顶432,BARSLAST(笔底431));

笔底43:=FILTERX(笔底432,BARSLAST(笔顶431));

笔顶441:=笔顶43 AND (BARSLAST(笔底43)>2 OR BARSLAST(笔底43)=DRAWNULL);

笔底441:=笔底43 AND (BARSLAST(笔顶43)>2 OR BARSLAST(笔顶43)=DRAWNULL);

笔顶442:=笔顶441 AND (H=HHV(H,BARSLAST(笔底441)) OR BARSLAST(笔底441)=DRAWNULL);

笔底442:=笔底441 AND (L=LLV(L,BARSLAST(笔顶441)) OR BARSLAST(笔顶441)=DRAWNULL);

笔顶44:=FILTERX(笔顶442,BARSLAST(笔底441));

笔底44:=FILTERX(笔底442,BARSLAST(笔顶441));

笔顶451:=笔顶44 AND (BARSLAST(笔底44)>3 OR BARSLAST(笔底44)=DRAWNULL);

笔底451:=笔底44 AND (BARSLAST(笔顶44)>3 OR BARSLAST(笔顶44)=DRAWNULL);

笔顶452:=笔顶451 AND (H=HHV(H,BARSLAST(笔底451)) OR BARSLAST(笔底451)=DRAWNULL);

笔底452:=笔底451 AND (L=LLV(L,BARSLAST(笔顶451)) OR BARSLAST(笔顶451)=DRAWNULL);

笔顶45:=FILTERX(笔顶452,BARSLAST(笔底452));

笔底45:=FILTERX(笔底452,BARSLAST(笔顶452));

DN511:=BARSLAST(笔顶45);

底力度511:=HHV(L,DN511+1)>LLV(H,DN511+1);

底包含511:=COUNT(H<REF(H,1),DN511)>2 AND COUNT(L<REF(L,1),DN511)>2;

笔底511:=笔底43 AND (笔底45<>1) AND DN511>3 AND 底力度511 AND 底包含511 AND (L=LLV(L,BARSLAST(笔顶45)));

笔底51:=FILTERX(笔底511,BARSLAST(笔顶45));

UP512:=BARSLAST(笔底45);

顶力度512:=HHV(L,UP512+1)>LLV(H,UP512+1);

顶包含512:=COUNT(L>REF(L,1),UP512)>2 AND COUNT(H>REF(H,1),UP512)>2;

笔顶512:=笔顶43 AND (笔顶45<>1) AND UP512>3 AND 顶力度512 AND 顶包含512 AND (H=HHV(H,BARSLAST(笔底45)));

笔顶51:=FILTERX(笔顶512,BARSLAST(笔底45));

笔顶521:=笔顶45 OR 笔顶51;

笔底521:=笔底45 OR 笔底51;

笔顶52:=FILTERX(笔顶521 AND H=HHV(H,BARSLAST(笔底521)),BARSLAST(笔底521));

笔底52:=FILTERX(笔底521 AND L=LLV(L,BARSLAST(笔顶521)),BARSLAST(笔顶521));

UP53:=BARSLAST(笔底52);

顶力度53:=HHV(L,UP53+1)>LLV(H,UP53+1);

顶包含53:=COUNT(L>REF(L,1),UP53)>2 AND COUNT(H>REF(H,1),UP53)>2;

DN53:=BARSLAST(笔顶52);

底力度53:=HHV(L,DN53+1)>LLV(H,DN53+1);

底包含53:=COUNT(H<REF(H,1),DN53)>2 AND COUNT(L<REF(L,1),DN53)>2;

笔顶53:=笔顶52 AND UP53>3 AND 顶力度53 AND 顶包含53 AND (H=HHV(H,BARSLAST(笔底52)));

笔底53:=笔底52 AND DN53>3 AND 底力度53 AND 底包含53 AND (L=LLV(L,BARSLAST(笔顶52)));

笔顶54:=FILTERX(笔顶53 AND H=HHV(H,BARSLAST(笔底53)),BARSLAST(笔底53));

笔底54:=FILTERX(笔底53 AND L=LLV(L,BARSLAST(笔顶53)),BARSLAST(笔顶53));

笔顶55:={分型顶 AND}H=HHV(H,BARSLAST(笔底54)) AND L>LLV(L,BARSLAST(笔底54)) AND  BARSLAST(笔顶54)<BARSLAST(笔底54)  AND (BARSNEXT(笔底54)<BARSNEXT(笔顶54) OR BARSNEXT(笔顶54)=DRAWNULL);

笔底55:={分型底 AND}L=LLV(L,BARSLAST(笔顶54)) AND H<HHV(H,BARSLAST(笔顶54)) AND  BARSLAST(笔底54)<BARSLAST(笔顶54)  AND (BARSNEXT(笔顶54)<BARSNEXT(笔底54) OR BARSNEXT(笔底54)=DRAWNULL);

笔顶56:=笔顶54 OR 笔顶55;

笔底56:=笔底54 OR 笔底55;

笔顶6:=FILTERX(笔顶56 AND H=HHV(H,BARSLAST(笔底56)),BARSLAST(笔底56));

笔底6:=FILTERX(笔底56 AND L=LLV(L,BARSLAST(笔顶56)),BARSLAST(笔顶56));

笔顶7:=笔顶6 AND BARSLAST(笔底6)>3;

笔底7:=笔底6 AND BARSLAST(笔顶6)>3;

笔顶:=BARSLAST(笔顶6),NODRAW;

笔底:=BARSLAST(笔底6),NODRAW;



NOTEXT_上笔:DRAWLINE(笔底=0,L,笔顶=0,H,0),COLORGREEN,LINETHICK2;

NOTEXT_下笔:DRAWLINE(笔顶=0,H,笔底=0,L,0),COLOR0000FF,LINETHICK2;



L低:=REF(L,笔底);

H高:=REF(H,笔顶);

L低A:=IF(笔顶<笔底 AND 显示开关=1 OR 显示开关=2,L低,DRAWNULL);

H高A:=IF(笔顶<笔底 AND 显示开关=1 OR 显示开关=2,H高,DRAWNULL);



PB1A:=POW(L低A,0.382)*POW(H高A,0.618);

PB2A:=SQRT(L低A*H高A);

PB3A:=POW(L低A,0.618)*POW(H高,0.382);

PB4A:=POW(L低A,0.875)*POW(H高A,0.125);

PB5A:=H高A-(H高A-L低A)*1.236,NODRAW;

PB6A:=H高A-(H高A-L低A)*1.618,NODRAW;



DRAWTEXT(笔顶,(PB1A),VARCAT('PB1=',VAR2STR(PB1A,2))),COLORYELLOW;

DRAWTEXT(笔顶,(PB2A),VARCAT('PB2=',VAR2STR(PB2A,2))),COLORYELLOW;

DRAWTEXT(笔顶,(PB3A),VARCAT('PB3=',VAR2STR(PB3A,2))),COLORYELLOW;

DRAWTEXT(笔顶,(PB4A),VARCAT('PB4=',VAR2STR(PB4A,2))),COLORYELLOW;

DRAWTEXT(笔顶,(PB5A),VARCAT('PB5=',VAR2STR(PB5A,2))),COLORYELLOW;

DRAWTEXT(笔顶,(PB6A),VARCAT('PB6=',VAR2STR(PB6A,2))),COLORYELLOW;





STICKLINE(笔顶<笔底,PB1A,PB1A,3,1),COLORFF8800;

STICKLINE(笔顶<笔底,PB2A,PB2A,3,1),COLORFF8800;

STICKLINE(笔顶<笔底,PB3A,PB3A,3,1),COLORFF8800;

STICKLINE(笔顶<笔底,PB4A,PB4A,3,1),COLORFF8800;

STICKLINE(笔顶<笔底,PB5A,PB5A,3,1),COLORFF8800;

STICKLINE(笔顶<笔底,PB6A,PB6A,3,1),COLORFF8800;

STICKLINE(笔顶=0,H,PB6A,0,0),COLORFF8800;

L低B:=IF(笔顶>笔底 AND 显示开关=1 OR 显示开关=3,L低,DRAWNULL);

H高B:=IF(笔顶>笔底 AND 显示开关=1 OR 显示开关=3,H高,DRAWNULL);

PS1B:=POW(H高B,0.382)*POW(L低B,0.618);

PS2B:=SQRT(H高B*L低B);

PS3B:=POW(H高B,0.618)*POW(L低B,0.382);

PS4B:=POW(H高B,0.875)*POW(L低B,0.125);

PS5B:=L低B+(H高B-L低B)*1.236,NODRAW;

PS6B:=L低B+(H高B-L低B)*1.618,NODRAW;



DRAWTEXT(笔底,(PS1B),VARCAT('PS1=',VAR2STR(PS1B,2))),COLORWHITE;

DRAWTEXT(笔底,(PS2B),VARCAT('PS2=',VAR2STR(PS2B,2))),COLORWHITE;

DRAWTEXT(笔底,(PS3B),VARCAT('PS3=',VAR2STR(PS3B,2))),COLORWHITE;

DRAWTEXT(笔底,(PS4B),VARCAT('PS4=',VAR2STR(PS4B,2))),COLORWHITE;

DRAWTEXT(笔底,(PS5B),VARCAT('PS5=',VAR2STR(PS5B,2))),COLORWHITE;

DRAWTEXT(笔底,(PS6B),VARCAT('PS6=',VAR2STR(PS6B,2))),COLORWHITE;



STICKLINE(笔顶>笔底,PS1B,PS1B,3,1),COLORMAGENTA;

STICKLINE(笔顶>笔底,PS2B,PS2B,3,1),COLORMAGENTA;

STICKLINE(笔顶>笔底,PS3B,PS3B,3,1),COLORMAGENTA;

STICKLINE(笔顶>笔底,PS4B,PS4B,3,1),COLORMAGENTA;

STICKLINE(笔顶>笔底,PS5B,PS5B,3,1),COLORMAGENTA;

STICKLINE(笔顶>笔底,PS6B,PS6B,3,1),COLORMAGENTA;

STICKLINE(笔底=0,L,PS6B,0,0),COLORMAGENTA;

DRAWTEXT(笔底=0,L,VARCAT('【低点】',VAR2STR(底价,2))),COLORGREEN;

DRAWTEXT(笔顶=0,H,VARCAT('【高点】',VAR2STR(顶价,2))),COLORRED;

DRAWICON(笔顶=0,H,2);

DRAWICON(笔底=0,L,1);

原理解析：
显示开关赋值:1
顶价赋值:REF(H,上次H>REF(H,1距今天数))
底价赋值:REF(L,上次L 分型顶0赋值:H>1日前的顶价 AND L>1日前的底价
分型底0赋值:L<1日前的底价 AND H<1日前的顶价
分型顶1赋值:分型顶0 AND H=HHV(H,上次分型底0距今天数)
分型底1赋值:分型底0 AND L=LLV(L,上次分型顶0距今天数)
分型顶赋值:FILTERX(分型顶1,上次分型底1距今天数)
分型底赋值:FILTERX(分型底1,上次分型顶1距今天数)
UP1赋值:上次分型底距今天数
顶力度1赋值:UP1+1日内L最高值>UP1+1日内H最低值
顶包含1赋值:COUNT(L>1日前的L,UP1)>2 AND COUNT(H>1日前的H,UP1)>2
DN1赋值:上次分型顶距今天数
底力度1赋值:DN1+1日内L最高值>DN1+1日内H最低值
底包含1赋值:COUNT(H<1日前的H,DN1)>2 AND COUNT(L<1日前的L,DN1)>2
笔顶10赋值:分型顶 AND UP1>3 AND 顶力度1 AND 顶包含1
笔底10赋值:分型底 AND DN1>3 AND 底力度1 AND 底包含1
笔顶11赋值:笔顶10 AND H=HHV(H,上次笔底10距今天数)
笔底11赋值:笔底10 AND L=LLV(L,上次笔顶10距今天数)
笔顶12赋值:笔顶11 AND H=HHV(H,上次笔底11距今天数)
笔底12赋值:笔底11 AND L=LLV(L,上次笔顶11距今天数)
笔顶1赋值:FILTERX(笔顶12,上次笔底12距今天数)
笔底1赋值:FILTERX(笔底12,上次笔顶12距今天数)
UP2赋值:上次笔底1距今天数
顶力度2赋值:UP2+1日内L最高值>UP2+1日内H最低值
顶包含2赋值:COUNT(L>1日前的L,UP2)>2 AND COUNT(H>1日前的H,UP2)>2
DN2赋值:上次笔顶1距今天数
底力度2赋值:DN2+1日内L最高值>DN2+1日内H最低值
底包含2赋值:COUNT(H<1日前的H,DN2)>2 AND COUNT(L<1日前的L,DN2)>2
笔顶20赋值:分型顶 AND UP2>3 AND 顶力度2 AND 顶包含2
笔底20赋值:分型底 AND DN2>3 AND 底力度2 AND 底包含2
笔顶21赋值:笔顶20 AND H=HHV(H,上次笔底20距今天数)
笔底21赋值:笔底20 AND L=LLV(L,上次笔顶20距今天数)
笔顶2赋值:FILTERX(笔顶21,上次笔底21距今天数)
笔底2赋值:FILTERX(笔底21,上次笔顶21距今天数)
笔顶3赋值:笔顶1 OR 笔顶2
笔底3赋值:笔底1 OR 笔底2
笔顶41赋值:FILTERX(笔顶3 AND H=HHV(H,上次笔底3距今天数),上次笔底3距今天数)
笔底41赋值:FILTERX(笔底3 AND L=LLV(L,上次笔顶3距今天数),上次笔顶3距今天数)
笔顶42赋值:FILTERX(笔顶41 AND H=HHV(H,上次笔底41距今天数),上次笔底41距今天数)
笔底42赋值:FILTERX(笔底41 AND L=LLV(L,上次笔顶41距今天数),上次笔顶41距今天数)
笔顶431赋值:笔顶42 AND (上次笔底42距今天数>1 OR 上次笔底42距今天数=DRAWNULL)
笔底431赋值:笔底42 AND (上次笔顶42距今天数>1 OR 上次笔顶42距今天数=DRAWNULL)
笔顶432赋值:笔顶431 AND (H=HHV(H,上次笔底431距今天数) OR 上次笔底431距今天数=DRAWNULL)
笔底432赋值:笔底431 AND (L=LLV(L,上次笔顶431距今天数) OR 上次笔顶431距今天数=DRAWNULL)
笔顶43赋值:FILTERX(笔顶432,上次笔底431距今天数)
笔底43赋值:FILTERX(笔底432,上次笔顶431距今天数)
笔顶441赋值:笔顶43 AND (上次笔底43距今天数>2 OR 上次笔底43距今天数=DRAWNULL)
笔底441赋值:笔底43 AND (上次笔顶43距今天数>2 OR 上次笔顶43距今天数=DRAWNULL)
笔顶442赋值:笔顶441 AND (H=HHV(H,上次笔底441距今天数) OR 上次笔底441距今天数=DRAWNULL)
笔底442赋值:笔底441 AND (L=LLV(L,上次笔顶441距今天数) OR 上次笔顶441距今天数=DRAWNULL)
笔顶44赋值:FILTERX(笔顶442,上次笔底441距今天数)
笔底44赋值:FILTERX(笔底442,上次笔顶441距今天数)
笔顶451赋值:笔顶44 AND (上次笔底44距今天数>3 OR 上次笔底44距今天数=DRAWNULL)
笔底451赋值:笔底44 AND (上次笔顶44距今天数>3 OR 上次笔顶44距今天数=DRAWNULL)
笔顶452赋值:笔顶451 AND (H=HHV(H,上次笔底451距今天数) OR 上次笔底451距今天数=DRAWNULL)
笔底452赋值:笔底451 AND (L=LLV(L,上次笔顶451距今天数) OR 上次笔顶451距今天数=DRAWNULL)
笔顶45赋值:FILTERX(笔顶452,上次笔底452距今天数)
笔底45赋值:FILTERX(笔底452,上次笔顶452距今天数)
DN511赋值:上次笔顶45距今天数
底力度511赋值:DN511+1日内L最高值>DN511+1日内H最低值
底包含511赋值:COUNT(H<1日前的H,DN511)>2 AND COUNT(L<1日前的L,DN511)>2
笔底511赋值:笔底43 AND (笔底45<>1) AND DN511>3 AND 底力度511 AND 底包含511 AND (L=LLV(L,上次笔顶45距今天数))
笔底51赋值:FILTERX(笔底511,上次笔顶45距今天数)
UP512赋值:上次笔底45距今天数
顶力度512赋值:UP512+1日内L最高值>UP512+1日内H最低值
顶包含512赋值:COUNT(L>1日前的L,UP512)>2 AND COUNT(H>1日前的H,UP512)>2
笔顶512赋值:笔顶43 AND (笔顶45<>1) AND UP512>3 AND 顶力度512 AND 顶包含512 AND (H=HHV(H,上次笔底45距今天数))
笔顶51赋值:FILTERX(笔顶512,上次笔底45距今天数)
笔顶521赋值:笔顶45 OR 笔顶51
笔底521赋值:笔底45 OR 笔底51
笔顶52赋值:FILTERX(笔顶521 AND H=HHV(H,上次笔底521距今天数),上次笔底521距今天数)
笔底52赋值:FILTERX(笔底521 AND L=LLV(L,上次笔顶521距今天数),上次笔顶521距今天数)
UP53赋值:上次笔底52距今天数
顶力度53赋值:UP53+1日内L最高值>UP53+1日内H最低值
顶包含53赋值:COUNT(L>1日前的L,UP53)>2 AND COUNT(H>1日前的H,UP53)>2
DN53赋值:上次笔顶52距今天数
底力度53赋值:DN53+1日内L最高值>DN53+1日内H最低值
底包含53赋值:COUNT(H<1日前的H,DN53)>2 AND COUNT(L<1日前的L,DN53)>2
笔顶53赋值:笔顶52 AND UP53>3 AND 顶力度53 AND 顶包含53 AND (H=HHV(H,上次笔底52距今天数))
笔底53赋值:笔底52 AND DN53>3 AND 底力度53 AND 底包含53 AND (L=LLV(L,上次笔顶52距今天数))
笔顶54赋值:FILTERX(笔顶53 AND H=HHV(H,上次笔底53距今天数),上次笔底53距今天数)
笔底54赋值:FILTERX(笔底53 AND L=LLV(L,上次笔顶53距今天数),上次笔顶53距今天数)
笔顶55赋值:{分型顶 AND}H=HHV(H,上次笔底54距今天数) AND L>LLV(L,上次笔底54距今天数) AND BARSLAST(笔顶54)<上次笔底54距今天数 AND (BARSNEXT(笔底54) 笔底55赋值:{分型底 AND}L=LLV(L,上次笔顶54距今天数) AND H 笔顶56赋值:笔顶54 OR 笔顶55
笔底56赋值:笔底54 OR 笔底55
笔顶6赋值:FILTERX(笔顶56 AND H=HHV(H,上次笔底56距今天数),上次笔底56距今天数)
笔底6赋值:FILTERX(笔底56 AND L=LLV(L,上次笔顶56距今天数),上次笔顶56距今天数)
笔顶7赋值:笔顶6 AND 上次笔底6距今天数>3
笔底7赋值:笔底6 AND 上次笔顶6距今天数>3
笔顶赋值:上次笔顶6距今天数,NODRAW
笔底赋值:上次笔底6距今天数,NODRAW

输出NOTEXT_上笔:DRAWLINE(笔底=0,L,笔顶=0,H,0),画绿色, 线宽为2
输出NOTEXT_下笔:DRAWLINE(笔顶=0,H,笔底=0,L,0),COLOR0000FF, 线宽为2

L低赋值:笔底日前的L
H高赋值:笔顶日前的H
如果笔顶<笔底 AND 显示开关=1 OR 显示开关=2返回L低否则返回DRAWNULL
如果笔顶<笔底 AND 显示开关=1 OR 显示开关=2返回H高否则返回DRAWNULL

PB1A赋值:POW(L低A,0.382)*POW(H高A,0.618)
PB2A赋值:SQRT(L低A*H高A)
PB3A赋值:POW(L低A,0.618)*POW(H高,0.382)
PB4A赋值:POW(L低A,0.875)*POW(H高A,0.125)
PB5A赋值:H高A-(H高A-L低A)*1.236,NODRAW
PB6A赋值:H高A-(H高A-L低A)*1.618,NODRAW

DRAWTEXT(笔顶,(PB1A),VARCAT('PB1=',VAR2STR(PB1A,2))),画黄色
DRAWTEXT(笔顶,(PB2A),VARCAT('PB2=',VAR2STR(PB2A,2))),画黄色
DRAWTEXT(笔顶,(PB3A),VARCAT('PB3=',VAR2STR(PB3A,2))),画黄色
DRAWTEXT(笔顶,(PB4A),VARCAT('PB4=',VAR2STR(PB4A,2))),画黄色
DRAWTEXT(笔顶,(PB5A),VARCAT('PB5=',VAR2STR(PB5A,2))),画黄色
DRAWTEXT(笔顶,(PB6A),VARCAT('PB6=',VAR2STR(PB6A,2))),画黄色
当满足条件笔顶<笔底时,在PB1A和PB1A之间画柱状线
当满足条件笔顶<笔底时,在PB2A和PB2A之间画柱状线
当满足条件笔顶<笔底时,在PB3A和PB3A之间画柱状线
当满足条件笔顶<笔底时,在PB4A和PB4A之间画柱状线
当满足条件笔顶<笔底时,在PB5A和PB5A之间画柱状线
当满足条件笔顶<笔底时,在PB6A和PB6A之间画柱状线
当满足条件笔顶=0时,在H和PB6A之间画柱状线
如果笔顶>笔底 AND 显示开关=1 OR 显示开关=3返回L低否则返回DRAWNULL
如果笔顶>笔底 AND 显示开关=1 OR 显示开关=3返回H高否则返回DRAWNULL
PS1B赋值:POW(H高B,0.382)*POW(L低B,0.618)
PS2B赋值:SQRT(H高B*L低B)
PS3B赋值:POW(H高B,0.618)*POW(L低B,0.382)
PS4B赋值:POW(H高B,0.875)*POW(L低B,0.125)
PS5B赋值:L低B+(H高B-L低B)*1.236,NODRAW
PS6B赋值:L低B+(H高B-L低B)*1.618,NODRAW

DRAWTEXT(笔底,(PS1B),VARCAT('PS1=',VAR2STR(PS1B,2))),画白色
DRAWTEXT(笔底,(PS2B),VARCAT('PS2=',VAR2STR(PS2B,2))),画白色
DRAWTEXT(笔底,(PS3B),VARCAT('PS3=',VAR2STR(PS3B,2))),画白色
DRAWTEXT(笔底,(PS4B),VARCAT('PS4=',VAR2STR(PS4B,2))),画白色
DRAWTEXT(笔底,(PS5B),VARCAT('PS5=',VAR2STR(PS5B,2))),画白色
DRAWTEXT(笔底,(PS6B),VARCAT('PS6=',VAR2STR(PS6B,2))),画白色
当满足条件笔顶>笔底时,在PS1B和PS1B之间画柱状线
当满足条件笔顶>笔底时,在PS2B和PS2B之间画柱状线
当满足条件笔顶>笔底时,在PS3B和PS3B之间画柱状线
当满足条件笔顶>笔底时,在PS4B和PS4B之间画柱状线
当满足条件笔顶>笔底时,在PS5B和PS5B之间画柱状线
当满足条件笔顶>笔底时,在PS6B和PS6B之间画柱状线
当满足条件笔底=0时,在L和PS6B之间画柱状线
DRAWTEXT(笔底=0,L,VARCAT('【低点】',VAR2STR(底价,2))),画绿色
DRAWTEXT(笔顶=0,H,VARCAT('【高点】',VAR2STR(顶价,2))),画红色
当满足条件笔顶=0时,在H和2之间画图标
当满足条件笔底=0时,在L和1之间画图标