2024年3月13日发(作者：敏香之)
{缠论看盘指标}
MA5:MA(CLOSE5) COLORWHITELINETHICK2;
MA10:MA(CLOSE10) COLORMAGENTALINETHICK1;
MA20:MA(CLOSE20) COLORBLUELINETHICK1;
MA60:MA(CLOSE60) COLORYELLOWLINETHICK2;
MA250:MA(CLOSE250) COLORREDLINETHICK1;
老笔:=0;
G:=MA(C5);D:=MA(C10);
HH:=REF(H5)=HHV(H11);
LL:=REF(L5)=LLV(L11);
FG01:=BACKSET(HH6)>BACKSET(HH5) ;
FD01:=BACKSET(LL6)>BACKSET(LL5) ;
FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>DFG01
IF(BARSLAST(FD01)>BARSLAST(FG01)FG010));
FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>GFD01
IF(BARSLAST(FG01)>BARSLAST(FD01)FD010));
FG0:=FG02 AND H=HHV(HBARSLAST(FD02));
FD0:=FD02 AND L=LLV(LBARSLAST(FG02));
GP:IF(FG0HDRAWNULL)CIRCLEDOTCOLORCYAN;
DP:IF(FD0LDRAWNULL)CIRCLEDOTCOLORCYAN;
GQ:=L>REF(H1) AND DAY!=REF(DAY1);
DQ:=H GQL:=REF(LBARSLAST(GQ)); DQH:=REF(HBARSLAST(DQ)); FGH:=REF(HBARSLAST(FG0)); FGL:=REF(LBARSLAST(FG0)); FGH1:=REF(HBARSLAST(FG0)+1); FGL1:=REF(LBARSLAST(FG0)+1); FGH2:=REF(HBARSLAST(FG0)+2); FGL2:=REF(LBARSLAST(FG0)+2); FDH:=REF(HBARSLAST(FD0)); FDL:=REF(LBARSLAST(FD0)); FDH1:=REF(HBARSLAST(FD0)+1); FDL1:=REF(LBARSLAST(FD0)+1); FDH2:=REF(HBARSLAST(FD0)+2); FDL2:=REF(LBARSLAST(FD0)+2); FGZH:=IF(FGL<=FGL1FGH2FGH1); FGZL:=IF(FGH1 FDZH:=IF(FDL1>FDHFDHIF(FDH>=FDH1FDH2FDH1)); FDZL:=IF(FDH>=FDH1FDL2FDL1); FG1:=FGH>FDZH AND FG0; FD1:=FDL FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL; FD:=FD1 AND FDL BH0:=(H<=REF(H1) AND L>=REF(L1)) OR (H>=REF(H1) AND L<=REF(L1)); BHG:=COUNT(BH0BARSLAST(FD0)); BHD:=COUNT(BH0BARSLAST(FG0)); BGQ:=COUNT(GQBARSLAST(FD0)); BDQ:=COUNT(DQBARSLAST(FG0)); BK0:=IF(BHG>0BHG+2+老笔IF(BHDBHD+2+老笔3)); BK:=IF(BGQBK0-BGQIF(BDQBK0-BDQBK0)); G1X:=(FG AND BARSLAST(FD)>BK); D1X:=(FD AND BARSLAST(FG)>BK); G1:=(FG0 AND REF(HBARSLAST(FG0))>=REF(HBARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X)) OR (FG1 AND COUNT(GQBARSLAST(FD1))>0 AND REF(HBARSLAST(FG1))>REF(HBARSLAST(G1X))); D1:=(FD0 AND REF(LBARSLAST(FD0))<=REF(LBARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X)) OR (FD1 AND COUNT(DQBARSLAST(FG1))>0 AND REF(LBARSLAST(FD1)) G1H:=IF(BARSLAST(D1)>BARSLAST(G1)REF(HBARSLAST(G1))REF(HBARSLAST(D1))); D1L:=IF(BARSLAST(G1)>BARSLAST(D1)REF(LBARSLAST(D1))REF(LBARSLAST(G1))); G2:=G1 AND H=HHV(G1HBARSLAST(D1)+1) AND H>REF(H1) AND BARSLAST(D1)>BARSLAST(G1); D2:=D1 AND L=LLV(D1LBARSLAST(G1)+1) AND L BARSLAST(G1)>BARSLAST(D1); G3:=G2 OR (FG0 AND REF(HBARSLAST(FG0))>REF(HBARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2)); D3:=D2 OR (FD0 AND REF(LBARSLAST(FD0)) BARSLAST(G2)>BARSLAST(D2)); GPB:IF(G1XHDRAWNULL)CIRCLEDOTCOLORYELLOW; DPB:IF(D1XLDRAWNULL)CIRCLEDOTCOLORYELLOW; DRAWICON(CROSS(MA20MA60)MA60*0.989); DIF:=MA(CLOSE5)-MA(CLOSE89); DIFMA:=MA(DIF36); XG:=CROSS(DIFDIFMA) AND DIF<3; {DRAWICON(XGH*1.0323);} {画线} NN:=G3;UU:=D3; L1:DRAWLINE(UULNN L0)COLORLIGREEN; H0)COLORLIGREEN;L2:DRAWLINE(NNHUU {标示端点数值} DRAWNUMBER(L1 AND L2 AND NN HH)COLORLIRED;DRAWNUMBER(L1 AND L2 AND UU LL)COLORLIMAGENTA; {折扣价} {DRAWICON(CURRBARSCOUNT=6LOW*0.9824);} DRAWNUMBER(CURRBARSCOUNT=6LOW*0.96C); {DRAWICON(CURRBARSCOUNT=11LOW*0.9825);} DRAWNUMBER(CURRBARSCOUNT=11LOW*0.96C); {DRAWICON(CURRBARSCOUNT=21LOW*0.9826);} DRAWNUMBER(CURRBARSCOUNT=21LOW*0.96C); {DRAWICON(CURRBARSCOUNT=61LOW*0.9827);} DRAWNUMBER(CURRBARSCOUNT=61LOW*0.96C); {DRAWICON(CURRBARSCOUNT=121LOW*0.9818);} DRAWNUMBER(CURRBARSCOUNT=121LOW*0.96C); {量能平台} N250:=250; PT250:=CONST(HHVBARS(VN250)); {T250:IF(CURRBARSCOUNT<=N250CONST(IF(PT250=0CREF(CPT250)))DRAWNULL) COLOR990000;} {IF(CURRBARSCOUNT=PT250+1T250DRAWNULL)CIRCLEDOTCOLORFF0000LINETHI CK2;} {DRAWTEXT(CURRBARSCOUNT=N250T250'250')COLOR990000;} N120:=120; PT120:=CONST(HHVBARS(VN120)); {T120:IF(CURRBARSCOUNT<=N120CONST(IF(PT120=0CREF(CPT120)))DRAWNULL) COLORAAAA00;} {IF(CURRBARSCOUNT=PT120+1T120DRAWNULL)CIRCLEDOTCOLORFFFF00LINETHI CK2;} {DRAWTEXT(CURRBARSCOUNT=N120T120'120')COLORAAAA00;} N60:=60; PT60:=CONST(HHVBARS(VN60)); {T60:IF(CURRBARSCOUNT<=N60CONST(IF(PT60=0CREF(CPT60)))DRAWNULL)COL OR00BB00;} {IF(CURRBARSCOUNT=PT60+1T60DRAWNULL)CIRCLEDOTCOLOR00FF00LINETHIC K2;} {DRAWTEXT(CURRBARSCOUNT=N60T60'60')COLOR00BB00;} N30:=30; PT30:=CONST(HHVBARS(VN30)); {T30:IF(CURRBARSCOUNT<=N30CONST(IF(PT30=0CREF(CPT30)))DRAWNULL)COL OR0000CC;} {IF(CURRBARSCOUNT=PT30+1T30DRAWNULL)CIRCLEDOTCOLOR0000FFLINETHIC K2;} {DRAWTEXT(CURRBARSCOUNT=N30T30'30')COLOR0000CC;} N20:=20; PT20:=CONST(HHVBARS(VN20)); {T20:IF(CURRBARSCOUNT<=N20CONST(IF(PT20=0CREF(CPT20)))DRAWNULL)COL ORDD00DD;} {IF(CURRBARSCOUNT=PT20+1T20DRAWNULL)CIRCLEDOTCOLORFF00FFLINETHICK 2;} {DRAWTEXT(CURRBARSCOUNT=N20T20'20')COLORDD00DD;} N10:=10; PT10:=CONST(HHVBARS(VN10)); {T10:IF(CURRBARSCOUNT<=N10CONST(IF(PT10=0CREF(CPT10)))DRAWNULL)COL OR00EEEE;} {IF(CURRBARSCOUNT=PT10+1T10DRAWNULL)CIRCLEDOTCOLOR00FFFFLINETHICK 2;} {DRAWTEXT(CURRBARSCOUNT=N10T10'10')COLOR00EEEE;} N5:=5; PT5:=CONST(HHVBARS(VN5)); {T5:IF(CURRBARSCOUNT<=N5CONST(IF(PT5=0CREF(CPT5)))DRAWNULL)COLORFF FFFF;} {IF(CURRBARSCOUNT=PT5+1T5DRAWNULL)CIRCLEDOTCOLORFFFFFFLINETHICK2;} {DRAWTEXT(CURRBARSCOUNT=N5T5'5')COLORFFFFFF;} ND:=10; PTD:=CONST(LLVBARS(VND)); TDPX:IF(CURRBARSCOUNT<=NDCONST(IF(PTD=0OREF(OPTD)))DRAWNULL) COLOR9370DB; IF(CURRBARSCOUNT=PTD+1TDPXDRAWNULL)CIRCLEDOT COLOR9370DBLINETHICK2; 2024年3月13日发(作者：敏香之) {缠论看盘指标} MA5:MA(CLOSE5) COLORWHITELINETHICK2; MA10:MA(CLOSE10) COLORMAGENTALINETHICK1; MA20:MA(CLOSE20) COLORBLUELINETHICK1; MA60:MA(CLOSE60) COLORYELLOWLINETHICK2; MA250:MA(CLOSE250) COLORREDLINETHICK1; 老笔:=0; G:=MA(C5);D:=MA(C10); HH:=REF(H5)=HHV(H11); LL:=REF(L5)=LLV(L11); FG01:=BACKSET(HH6)>BACKSET(HH5) ; FD01:=BACKSET(LL6)>BACKSET(LL5) ; FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>DFG01 IF(BARSLAST(FD01)>BARSLAST(FG01)FG010)); FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>GFD01 IF(BARSLAST(FG01)>BARSLAST(FD01)FD010)); FG0:=FG02 AND H=HHV(HBARSLAST(FD02)); FD0:=FD02 AND L=LLV(LBARSLAST(FG02)); GP:IF(FG0HDRAWNULL)CIRCLEDOTCOLORCYAN; DP:IF(FD0LDRAWNULL)CIRCLEDOTCOLORCYAN; GQ:=L>REF(H1) AND DAY!=REF(DAY1); DQ:=H GQL:=REF(LBARSLAST(GQ)); DQH:=REF(HBARSLAST(DQ)); FGH:=REF(HBARSLAST(FG0)); FGL:=REF(LBARSLAST(FG0)); FGH1:=REF(HBARSLAST(FG0)+1); FGL1:=REF(LBARSLAST(FG0)+1); FGH2:=REF(HBARSLAST(FG0)+2); FGL2:=REF(LBARSLAST(FG0)+2); FDH:=REF(HBARSLAST(FD0)); FDL:=REF(LBARSLAST(FD0)); FDH1:=REF(HBARSLAST(FD0)+1); FDL1:=REF(LBARSLAST(FD0)+1); FDH2:=REF(HBARSLAST(FD0)+2); FDL2:=REF(LBARSLAST(FD0)+2); FGZH:=IF(FGL<=FGL1FGH2FGH1); FGZL:=IF(FGH1 FDZH:=IF(FDL1>FDHFDHIF(FDH>=FDH1FDH2FDH1)); FDZL:=IF(FDH>=FDH1FDL2FDL1); FG1:=FGH>FDZH AND FG0; FD1:=FDL FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL; FD:=FD1 AND FDL BH0:=(H<=REF(H1) AND L>=REF(L1)) OR (H>=REF(H1) AND L<=REF(L1)); BHG:=COUNT(BH0BARSLAST(FD0)); BHD:=COUNT(BH0BARSLAST(FG0)); BGQ:=COUNT(GQBARSLAST(FD0)); BDQ:=COUNT(DQBARSLAST(FG0)); BK0:=IF(BHG>0BHG+2+老笔IF(BHDBHD+2+老笔3)); BK:=IF(BGQBK0-BGQIF(BDQBK0-BDQBK0)); G1X:=(FG AND BARSLAST(FD)>BK); D1X:=(FD AND BARSLAST(FG)>BK); G1:=(FG0 AND REF(HBARSLAST(FG0))>=REF(HBARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X)) OR (FG1 AND COUNT(GQBARSLAST(FD1))>0 AND REF(HBARSLAST(FG1))>REF(HBARSLAST(G1X))); D1:=(FD0 AND REF(LBARSLAST(FD0))<=REF(LBARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X)) OR (FD1 AND COUNT(DQBARSLAST(FG1))>0 AND REF(LBARSLAST(FD1)) G1H:=IF(BARSLAST(D1)>BARSLAST(G1)REF(HBARSLAST(G1))REF(HBARSLAST(D1))); D1L:=IF(BARSLAST(G1)>BARSLAST(D1)REF(LBARSLAST(D1))REF(LBARSLAST(G1))); G2:=G1 AND H=HHV(G1HBARSLAST(D1)+1) AND H>REF(H1) AND BARSLAST(D1)>BARSLAST(G1); D2:=D1 AND L=LLV(D1LBARSLAST(G1)+1) AND L BARSLAST(G1)>BARSLAST(D1); G3:=G2 OR (FG0 AND REF(HBARSLAST(FG0))>REF(HBARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2)); D3:=D2 OR (FD0 AND REF(LBARSLAST(FD0)) BARSLAST(G2)>BARSLAST(D2)); GPB:IF(G1XHDRAWNULL)CIRCLEDOTCOLORYELLOW; DPB:IF(D1XLDRAWNULL)CIRCLEDOTCOLORYELLOW; DRAWICON(CROSS(MA20MA60)MA60*0.989); DIF:=MA(CLOSE5)-MA(CLOSE89); DIFMA:=MA(DIF36); XG:=CROSS(DIFDIFMA) AND DIF<3; {DRAWICON(XGH*1.0323);} {画线} NN:=G3;UU:=D3; L1:DRAWLINE(UULNN L0)COLORLIGREEN; H0)COLORLIGREEN;L2:DRAWLINE(NNHUU {标示端点数值} DRAWNUMBER(L1 AND L2 AND NN HH)COLORLIRED;DRAWNUMBER(L1 AND L2 AND UU LL)COLORLIMAGENTA; {折扣价} {DRAWICON(CURRBARSCOUNT=6LOW*0.9824);} DRAWNUMBER(CURRBARSCOUNT=6LOW*0.96C); {DRAWICON(CURRBARSCOUNT=11LOW*0.9825);} DRAWNUMBER(CURRBARSCOUNT=11LOW*0.96C); {DRAWICON(CURRBARSCOUNT=21LOW*0.9826);} DRAWNUMBER(CURRBARSCOUNT=21LOW*0.96C); {DRAWICON(CURRBARSCOUNT=61LOW*0.9827);} DRAWNUMBER(CURRBARSCOUNT=61LOW*0.96C); {DRAWICON(CURRBARSCOUNT=121LOW*0.9818);} DRAWNUMBER(CURRBARSCOUNT=121LOW*0.96C); {量能平台} N250:=250; PT250:=CONST(HHVBARS(VN250)); {T250:IF(CURRBARSCOUNT<=N250CONST(IF(PT250=0CREF(CPT250)))DRAWNULL) COLOR990000;} {IF(CURRBARSCOUNT=PT250+1T250DRAWNULL)CIRCLEDOTCOLORFF0000LINETHI CK2;} {DRAWTEXT(CURRBARSCOUNT=N250T250'250')COLOR990000;} N120:=120; PT120:=CONST(HHVBARS(VN120)); {T120:IF(CURRBARSCOUNT<=N120CONST(IF(PT120=0CREF(CPT120)))DRAWNULL) COLORAAAA00;} {IF(CURRBARSCOUNT=PT120+1T120DRAWNULL)CIRCLEDOTCOLORFFFF00LINETHI CK2;} {DRAWTEXT(CURRBARSCOUNT=N120T120'120')COLORAAAA00;} N60:=60; PT60:=CONST(HHVBARS(VN60)); {T60:IF(CURRBARSCOUNT<=N60CONST(IF(PT60=0CREF(CPT60)))DRAWNULL)COL OR00BB00;} {IF(CURRBARSCOUNT=PT60+1T60DRAWNULL)CIRCLEDOTCOLOR00FF00LINETHIC K2;} {DRAWTEXT(CURRBARSCOUNT=N60T60'60')COLOR00BB00;} N30:=30; PT30:=CONST(HHVBARS(VN30)); {T30:IF(CURRBARSCOUNT<=N30CONST(IF(PT30=0CREF(CPT30)))DRAWNULL)COL OR0000CC;} {IF(CURRBARSCOUNT=PT30+1T30DRAWNULL)CIRCLEDOTCOLOR0000FFLINETHIC K2;} {DRAWTEXT(CURRBARSCOUNT=N30T30'30')COLOR0000CC;} N20:=20; PT20:=CONST(HHVBARS(VN20)); {T20:IF(CURRBARSCOUNT<=N20CONST(IF(PT20=0CREF(CPT20)))DRAWNULL)COL ORDD00DD;} {IF(CURRBARSCOUNT=PT20+1T20DRAWNULL)CIRCLEDOTCOLORFF00FFLINETHICK 2;} {DRAWTEXT(CURRBARSCOUNT=N20T20'20')COLORDD00DD;} N10:=10; PT10:=CONST(HHVBARS(VN10)); {T10:IF(CURRBARSCOUNT<=N10CONST(IF(PT10=0CREF(CPT10)))DRAWNULL)COL OR00EEEE;} {IF(CURRBARSCOUNT=PT10+1T10DRAWNULL)CIRCLEDOTCOLOR00FFFFLINETHICK 2;} {DRAWTEXT(CURRBARSCOUNT=N10T10'10')COLOR00EEEE;} N5:=5; PT5:=CONST(HHVBARS(VN5)); {T5:IF(CURRBARSCOUNT<=N5CONST(IF(PT5=0CREF(CPT5)))DRAWNULL)COLORFF FFFF;} {IF(CURRBARSCOUNT=PT5+1T5DRAWNULL)CIRCLEDOTCOLORFFFFFFLINETHICK2;} {DRAWTEXT(CURRBARSCOUNT=N5T5'5')COLORFFFFFF;} ND:=10; PTD:=CONST(LLVBARS(VND)); TDPX:IF(CURRBARSCOUNT<=NDCONST(IF(PTD=0OREF(OPTD)))DRAWNULL) COLOR9370DB; IF(CURRBARSCOUNT=PTD+1TDPXDRAWNULL)CIRCLEDOT COLOR9370DBLINETHICK2;