获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;Z1:=STRCAT(HYBLOCK,' ');Z2:=STRCAT(Z1,DYBLOCK);Z3:=STRCAT(Z2,' ');DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;DRAWKLINE(H,O,L,C);均线25:=MA(CLOSE,25);均线43:=MA(CLOSE,43);均线50:=MA(CLOSE,50),COLOR0000FF;均线88:=MA(CLOSE,88);N8:=STRCAT(CON2STR(YEAR,0),'年');Y8:=STRCAT(CON2STR(MONTH,0),'月');R8:=STRCAT(CON2STR(DAY,0),'日');K:=BARSLAST(CURRBARSCOUNT=120);GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));筹码D:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));KJ:=GD-筹码D;GD4:=IF(CURRBARSCOUNT<=120/30,GD,DRAWNULL);低:=IF(CURRBARSCOUNT<=120/30,筹码D,DRAWNULL),COLORFFFF00;高:=IF(CURRBARSCOUNT<=120/30,GD,DRAWNULL),COLOR00FFFF;支撑:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.191,DRAWNULL),COLOR00FFFF;强势:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.382,DRAWNULL),COLORFF00FF;突破:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ/2,DRAWNULL),COLOR0000FF;警示:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.618,DRAWNULL),COLORCYAN;压力:=IF(CURRBARSCOUNT<=120/30,筹码D+KJ*0.809,DRAWNULL),COLORGREEN;建仓:=ZIG(3,6);筹码卖:=MA(建仓,2);STICKLINE(建仓>筹码卖 AND O>=C,C,O,-1,0),COLORRED;STICKLINE(建仓>筹码卖 AND O>=C,L,H,0,0),COLORRED;STICKLINE(建仓 < 筹码卖 AND O<=C,O,C,-1,1),COLORCYAN;STICKLINE(建仓 < 筹码卖 AND O<=C,O,L,0,1),COLORCYAN;STICKLINE(建仓 < 筹码卖 AND O<=C,C,H,0,1),COLORCYAN;AH:=HHV(H,60);飞龙筹码O:=LLV(L,60);A0:=(AH-飞龙筹码O)/21;A01:=C>REF(C,4);NT:=BARSLASTCOUNT(A01);筹码11:=NT=9;筹码13:=ISLASTBAR AND BETWEEN(NT,5,8);AY:=(BACKSET(筹码11>0,9) OR BACKSET(筹码13>0,NT))*NT;DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),COLORYELLOW;DRAWTEXT(NT=9,H+1.1*A0,'9'),COLORGREEN;DRAWTEXT(NT=13,H+1.1*A0,'13'),COLORGREEN;DRAWTEXT(NT=18,H+1.1*A0,'18'),COLORGREEN;B1:=C<REF(C,4);NT0:=BARSLASTCOUNT(B1);筹码21:=NT0=9 ;筹码23:=ISLASTBAR AND BETWEEN(NT0,5,8);AY1:=(BACKSET(筹码21>0,9) OR BACKSET(筹码23>0,NT0))*NT0;DRAWTEXT(AY1>0,L-1*A0,VAR2STR(AY1,0)),COLORLIGREEN;DRAWTEXT(NT0=9,H+1.1*A0,'9'),COLORYELLOW;DRAWTEXT(NT0=13,H+1.1*A0,'13'),COLORYELLOW;DRAWTEXT(NT0=18,H+1.1*A0,'18'),COLORYELLOW;N11:=2,200,13;UR00:=2,200,6;LR0:=2,200,6;TC01:=IF(H=HHV(H,8*UR00),H,DRAWNULL);TC02:=CONST(BARSLAST(TC01=H))+1;UPPER:=CONST(IF(TC02=1,H,REF(H,TC02-1)));BC1:=IF(L=LLV(L,8*LR0),L,DRAWNULL);BC2:=CONST(BARSLAST(BC1=L))+1;LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;HP:=CURRBARSCOUNT<=TC02 AND H=UPPER;NOD:=(IF(TC02>BC2,TC02,BC2)-IF(TC02>BC2,BC2,TC02));LR1:=FORCAST(C,NOD+1);NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC02),CONST(IF(MIN(TC02,BC2)=1,LR1,REF(LR1,MIN(TC02,BC2)-1))),DRAWNULL),POINTDOT,COLORRED;LR2:=SLOPE(C,NOD+1);LR3:=CONST(IF(MIN(TC02,BC2)=1,LR2,REF(LR2,MIN(TC02,BC2)-1)));FP:=NP-LR3*(NOD),POINTDOT,COLORYELLOW;EQU:=(NP+FP)/2,POINTDOT,COLORWHITE;AD:=Abs(NP-FP);DBL0:=BARSLAST(BC1!=DRAWNULL)+1;DBH:=BARSLAST(TC01!=DRAWNULL)+1;BSP:=IF(BC2>TC02,DBL0,DBH)-1;LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND H>LRL,H,LRL);AT2:=HHV(AT1-LRL,MAX(BC2,TC02));AT3:=CONST(BARSLAST(AT1-LRL=AT2));AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));捉妖筹码:=LRL+AT5;捉妖筹码K1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND L<LRL,L,LRL);捉妖筹码K2:=HHV(LRL-捉妖筹码K1,MAX(BC2,TC02));捉妖筹码K3:=CONST(BARSLAST(LRL-捉妖筹码K1=捉妖筹码K2));捉妖筹码K4:=CONST(IF(捉妖筹码K3=0,H,REF(H,捉妖筹码K3)));捉妖筹码K5:=CONST(IF(捉妖筹码K3=0,LRL-捉妖筹码K1,REF(LRL-捉妖筹码K1,捉妖筹码K3)));捉妖筹码L:=LRL-捉妖筹码K5;RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,捉妖筹码,CONST(REF(捉妖筹码,MIN(BC2,TC02)-11)));RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,捉妖筹码L,CONST(REF(捉妖筹码L,MIN(BC2,TC02)-11)));中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORBBBBBB;上轨:IF(NP>FP,IF(捉妖筹码<=RH,捉妖筹码,DRAWNULL),IF(捉妖筹码>=RL,捉妖筹码,DRAWNULL)),COLORFF0000;下轨:IF(NP>FP,IF(捉妖筹码L<=RH,捉妖筹码L,DRAWNULL),IF(捉妖筹码L>=RL,捉妖筹码L,DRAWNULL)),COLORFF00FF;飞龙筹码1:=(REF(HIGH,3) = HHV(HIGH,((2 * 3) + 1)));
源码未完整理,下载附件里全源码....
图片
图片
本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。顺阳网提示：文章来自网络，不代表本站观点。
