1.�����͵�Դ��

�����͵�Դ��

       显示开关:=1;

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

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

       分型顶0:=H>顶价 AND L>底价;

       分型底0:=L<顶价 AND H<底价;

       分型顶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;

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

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

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

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

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

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

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

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

       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;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

       DN:=BARSLAST(笔顶);

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

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

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

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

       UP:=BARSLAST(笔底);

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

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

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

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

       笔顶:=笔顶 OR 笔顶;

       笔底:=笔底 OR 笔底;

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

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

       UP:=BARSLAST(笔底);

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

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

       DN:=BARSLAST(笔顶);

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

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

       笔顶:=笔顶 AND UP>3 AND 顶力度 AND