//黄金位分割% 飞狐主图
INPUT:M(120,1,300),S(5,1,300);
DRAWBKBMP(DATE>900101,'moon');
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorAA;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCC;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,4,0),colorDD;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2,0),colorFF;
STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),colorFF;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,8,0),color7B00;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,6,0),color9000;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,4,0),colorA800;
STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,2,0),colorFF00;
STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),colorFF00;
MA1:MA(CLOSE,S),LINETHICK0,colorFFFFFF;
MA2:MA(CLOSE,M),LINETHICK0,colorFFFF00;
强弱分界:MA(CLOSE,27),LINETHICK0,colorFFFF;
卖:强弱分界+2*STD(CLOSE,27),LINETHICK0,colorFF00FF;
DRAWTEXT(CROSS(HIGH,卖),HIGH*1.004,'★'),colorFF00FF;
DRAWICON(CROSS(HIGH,卖),HIGH*1.007,12);
DRAWICON(CROSS(CLOSE,卖),HIGH*1.01,6);
上限:强弱分界+3*STD(CLOSE,27),LINETHICK0,colorFFFF;
DRAWICON(CROSS(CLOSE,上限),HIGH*1.018,9);
DRAWTEXT(CROSS(HIGH,上限),HIGH*1.015,'★上'),colorFFFF;
买:强弱分界-2*STD(CLOSE,27),LINETHICK0,colorF0FF00;
DRAWICON(CROSS(买,CLOSE),LOW-0.02,11);
DRAWTEXT(CROSS(买,CLOSE),LOW-0.05,'→观'),colorF0FF00;
下限:强弱分界-2.9*STD(CLOSE,27),LINETHICK0,colorFF00;
DRAWICON(CROSS(下限,CLOSE),LOW-0.04,15);
DRAWTEXT(CROSS(下限,LOW),LOW-0.06,'→下观'),colorFF00;
HH:=SYSPARAM(4);
LL:=SYSPARAM(5);
P1:=LL+(HH-LL)*0.191;
P16:=LL+(HH-LL)*0.625;
P2:=LL+(HH-LL)*0.382;
P17:=LL+(HH-LL)*0.375;
P4:=LL+(HH-LL)*0.5;
P18:=LL+(HH-LL)*0.2;
P5:=LL+(HH-LL)*0.618;
P19:=LL+(HH-LL)*0.25;
P6:=LL+(HH-LL)*0.809;
P20:=LL+(HH-LL)*0.05;
P7:=LL+(HH-LL)*0.875;
P21:=LL+(HH-LL)*0.95;
P8:=LL+(HH-LL)*0.667;
P22:=LL+(HH-LL)*0.9;
P9:=LL+(HH-LL)*0.5;
P23:=LL+(HH-LL)*0.28;
P10:=LL+(HH-LL)*0.333;
P24:=LL+(HH-LL)*0.22;
P11:=LL+(HH-LL)*0.125;
P25:=LL+(HH-LL)*0.85;
P12:=LL+(HH-LL)*0.45;
P26:=LL+(HH-LL)*0.75;
P13:=LL+(HH-LL)*0.55;
P27:=LL+(HH-LL)*0.1;
P14:=LL+(HH-LL)*0.78;
P28:=LL+(HH-LL)*0.15;
P15:=LL+(HH-LL)*0.72;
P29:=LL+(HH-LL)*0.22;
DRAWTEXT(ISLASTBAR=1,P7,' ▲87.5%：'+NUMTOSTR(P7,2)),ALIGN2,color84C1FF;
DRAWTEXT(ISLASTBAR=1,P8,' ▲66.7%：'+NUMTOSTR(P8,2)),ALIGN2,color84C1FF;
DRAWTEXT(ISLASTBAR=1,P9,' 50%：'+NUMTOSTR(P9,2)),ALIGN1,colorFFFF;
DRAWTEXT(ISLASTBAR=1,P10,' ▲33.3%：'+NUMTOSTR(P10,2)),ALIGN2,colorFFFF00;
DRAWTEXT(ISLASTBAR=1,P11,' ▲12.5%：'+NUMTOSTR(P11,2)),ALIGN2,colorFFFF00;
DRAWTEXT(ISLASTBAR=1,P12,' 45%：'+NUMTOSTR(P12,2)),ALIGN2,colorFFFFFF;
DRAWTEXT(ISLASTBAR=1,P13,' 55%：'+NUMTOSTR(P13,2)),ALIGN2,colorFFFFFF;
DRAWTEXT(ISLASTBAR=1,P14,' 78%：'+NUMTOSTR(P14,2)),ALIGN2,colorFFFFFF;
DRAWTEXT(ISLASTBAR=1,P15,' 72%：'+NUMTOSTR(P15,2)),ALIGN2,colorFFFFFF;
DRAWTEXT(ISLASTBAR=1,P16,' ⊙62.5%：'+NUMTOSTR(P16,2)),ALIGN0,colorFF00;
DRAWTEXT(ISLASTBAR=1,P17,' ⊙37.5%：'+NUMTOSTR(P17,2)),ALIGN0,colorFF00;
DRAWTEXT(ISLASTBAR=1,P18,' 20%：'+NUMTOSTR(P18,2)),ALIGN1,colorFFFF;
DRAWTEXT(ISLASTBAR=1,P19,' 25%：'+NUMTOSTR(P19,2)),ALIGN2,colorFFFFFF;
DRAWTEXT(ISLASTBAR=1,P20,' 5%：'+NUMTOSTR(P20,2)),ALIGN1,colorFFFF;
DRAWTEXT(ISLASTBAR=1,P21,' 95%：'+NUMTOSTR(P21,2)),ALIGN2,colorFFFFFF;
DRAWTEXT(ISLASTBAR=1,P22,' 90%：'+NUMTOSTR(P22,2)),ALIGN1,colorDAFC8B;
DRAWTEXT(ISLASTBAR=1,P23,' 28%：'+NUMTOSTR(P23,2)),ALIGN1,color84C1FF;
DRAWTEXT(ISLASTBAR=1,P25,' 85%：'+NUMTOSTR(P25,2)),ALIGN1,colorDAFC8B;
DRAWTEXT(ISLASTBAR=1,P26,' 75%：'+NUMTOSTR(P26,2)),ALIGN1,colorDAFC8B;
DRAWTEXT(ISLASTBAR=1,P27,' 10%：'+NUMTOSTR(P27,2)),ALIGN1,color84C1FF;
STICKLINE(1,HH,HH,180,0),colorFF00FF;
STICKLINE(1,LL,LL,180,0),colorFFFF00;
DRAWTEXT(ISLASTBAR=1,P27,'￣￣￣￣￣'),ALIGN1,PXUP2,color84C1FF;
DRAWTEXT(ISLASTBAR=1,P25,'￣￣￣￣￣'),ALIGN1,PXUP2,colorDAFC8B;
DRAWTEXT(ISLASTBAR=1,P9,'￣￣￣￣￣'),ALIGN1,PXUP2,colorFFFF;
DRAWTEXT(ISLASTBAR=1,P22,'￣￣￣￣￣'),ALIGN1,PXUP2,colorDAFC8B;
DRAWTEXT(ISLASTBAR=1,P18,'￣￣￣￣￣'),ALIGN1,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P20,'￣￣￣￣￣'),ALIGN1,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P19,'￣￣￣￣￣'),ALIGN2,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P12,'￣￣￣￣￣'),ALIGN2,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P13,'￣￣￣￣￣'),ALIGN2,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P14,'￣￣￣￣￣'),ALIGN2,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P15,'￣￣￣￣￣'),ALIGN2,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P21,'￣￣￣￣￣'),ALIGN2,PXUP2,colorFF00FF;
DRAWTEXT(ISLASTBAR=1,P23,'￣￣￣￣￣'),ALIGN1,PXUP2,color84C1FF;
DRAWTEXT(ISLASTBAR=1,P26,'￣￣￣￣￣'),ALIGN1,PXUP2,colorDAFC8B;
DRAWTEXT(ISLASTBAR=1,P16,'￣￣￣￣￣￣￣'),ALIGN0,PXUP2,colorFF00;
DRAWTEXT(ISLASTBAR=1,P17,'￣￣￣￣￣￣￣'),ALIGN0,PXUP2,colorFF00;
DRAWTEXT(ISLASTBAR=1,P10,'￣￣￣￣￣￣￣￣'),ALIGN2,colorFFFF00;
DRAWTEXT(ISLASTBAR=1,P11,'￣￣￣￣￣￣￣￣'),ALIGN2,colorFFFF00;
DRAWTEXT(ISLASTBAR=1,P7,'￣￣￣￣￣￣￣￣'),ALIGN2,color84C1FF;
DRAWTEXT(ISLASTBAR=1,P8,'￣￣￣￣￣￣￣￣'),ALIGN2,color84C1FF;
NNL:=BARPOS=SYSPARAM(3);
江05:LL+(HH-LL)*0.05,POINTDOT,LINETHICK1,colorFFFFFF;
江10:LL+(HH-LL)*0.1,POINTDOT,LINETHICK1,colorFFFFFF;
江15:LL+(HH-LL)*0.15,POINTDOT,LINETHICK1,colorFFFFFF;
黄191:LL+(HH-LL)*0.191,LINETHICK1,colorFFFF;
江22:LL+(HH-LL)*0.22,POINTDOT,LINETHICK1,colorFFFFFF;
江25:LL+(HH-LL)*0.25,POINTDOT,LINETHICK1,colorFFFFFF;
江28:LL+(HH-LL)*0.28,POINTDOT,LINETHICK1,colorFFFFFF;
黄甘337:LL+(HH-LL)*0.337,POINTDOT,LINETHICK1,colorFFFFFF;
黄382:LL+(HH-LL)*0.382,LINETHICK1,colorFFFF;
甘45:LL+(HH-LL)*0.45,POINTDOT,LINETHICK1,colorFFFFFF;
黄500:LL+(HH-LL)*0.5,colorFFFF;
黄618:LL+(HH-LL)*0.618,LINETHICK1,colorFFFF;
黄甘667:LL+(HH-LL)*0.667,POINTDOT,LINETHICK1,colorFFFFFF;
黄甘75:LL+(HH-LL)*0.75,POINTDOT,LINETHICK1,colorFFFFFF;
黄809:LL+(HH-LL)*0.809,LINETHICK1,colorFFFF;
江55:LL+(HH-LL)*0.55,POINTDOT,LINETHICK1,colorFFFFFF;
江75:LL+(HH-LL)*0.75,POINTDOT,LINETHICK1,colorFFFFFF;
江78:LL+(HH-LL)*0.78,POINTDOT,LINETHICK1,colorFFFFFF;
江85:LL+(HH-LL)*0.85,POINTDOT,LINETHICK1,colorFFFFFF;
江90:LL+(HH-LL)*0.9,POINTDOT,LINETHICK1,colorFFFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.1,'江10%('+NUMTOSTR(江10,2)+')'),color84C1FF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.15,'江15%('+NUMTOSTR(江15,2)+')'),color84C1FF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.22,'江22%('+NUMTOSTR(江22,2)+')'),color84C1FF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.28,'江28%('+NUMTOSTR(江28,2)+')'),color84C1FF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.191,'黄金19.1%('+NUMTOSTR(黄191,2)+')'),colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.382,'★黄金38.2%('+NUMTOSTR(黄382,2)+')'),colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.5,'黄金强弱分界('+NUMTOSTR(黄500,2)+')'),colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.618,'★黄金61.8%('+NUMTOSTR(黄618,2)+')'),colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.75,'江75%('+NUMTOSTR(江75,2)+')'),colorDAFC8B;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.809,'黄金80.9%('+NUMTOSTR(黄809,2)+')'),colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.85,'江85%('+NUMTOSTR(江85,2)+')'),colorDAFC8B;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.9,'江90%('+NUMTOSTR(江90,2)+')'),colorDAFC8B;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.981,'最高价￥('+NUMTOSTR(HH,2)+')'),colorFF00FF;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL+(HH-LL)*0.0381,'最低价￥('+NUMTOSTR(LL,2)+')'),colorFFFF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,LL*0.998,'所属板块:'+BLKNAME),ALIGN5,colorCCFFFF;
DRAWTEXT(SYSPARAM(3)=BARPOS,LL+(HH-LL)*0.981,'天'),ALIGN2,SHIFT1,PXUP6,colorFFFF;
DRAWTEXT(SYSPARAM(3)-3=BARPOS AND SYSPARAM(3)<>SYSPARAM(1),LL+(HH-LL)*0.981,NUMTOSTR(SYSPARAM(3)-SYSPARAM(1)+1,0)),ALIGN2,SHIFT1,colorFFFF;
多空2:=EMA(CLOSE,148);
多空3:=EMA(CLOSE,250);
出货:EXPLAIN(CLOSE>=多空2,'股价在半年线之上'),LINETHICK2,colorFF00;
EXPLAIN(CLOSE>=多空3,'股价在年线之上 '),colorFFFF;
EXPLAIN(CLOSE<多空2,'股价在半年线之下 '),colorFFFF;
EXPLAIN(CLOSE<多空3,'股价在年线之下 '),colorFFFF00;
EXPLAIN(多空2>=REF(多空2,1),'半年线趋势向上'),colorFFFF00;
EXPLAIN(多空3>=REF(多空3,1),'年线趋势向上 '),colorFFFF;
EXPLAIN(多空2<REF(多空2,1),'半年线趋势向下 '),colorFFFF;
EXPLAIN(多空3<REF(多空3,1),'年线趋势向下 '),colorFFFF00;
TQ:=CLOSE*2.5/100+CLOSE;
HD:=CLOSE-CLOSE*2.5/100;
EXPLAINEX(COST(50),'市场平均成本:',COST(50),2,0),colorFFFF00;
EXPLAINEX(COST(4),'主力平均成本:',COST(4),2,0),colorFFFF;
EXPLAINEX(COST(30),'控盘平均成本:',COST(30),2,0),colorFF;
EXPLAINEX(COST(75),'拉升平均成本:',COST(75),2,0),colorFF;
EXPLAINEX(COST(95),'顶部平均成本:',COST(95),2,0),colorFFFF;
EXPLAINEX(COST(0.05),'底部平均成本:',COST(0.05),2,0),colorFFFF;
EXPLAINEX(TQ,'股道卖出价预测:',TQ,2,0),colorFFFF;
EXPLAINEX(HD,'股道买入价预测:',HD,2,0),color99FF;
EXPLAINEX(1,'获利盘比例=',WINNER(CLOSE)*100,2,0),color99FF;
EXPLAINEX(1,'套牢盘比例=',100-WINNER(CLOSE)*100,2,0),colorFF;
LD:=MA(VOL/(HIGH-LOW),4);
DMP:=ABS(CLOSE-OPEN);
DMM:=VOL/(HIGH-LOW);
EXPLAIN(DMM<LD AND DMP<MA(DMP,4),'资金无入场意愿，萎缩中'),colorFFFF00;
EXPLAIN(DMM<LD AND DMP>MA(DMP,4),'场内资金有运作行为'),colorFFFF00;
EXPLAINICON(DMM<LD AND DMP>MA(DMP,4),1);
EXPLAIN(DMM>LD AND DMP<MA(DMP,4),'多空双方激烈争夺中'),colorFFFF;
EXPLAIN(DMM>LD AND DMP>MA(DMP,4),'场外资金介入（或出局）意愿强烈'),colorFFFF;
PSY:=CLOSE-REF(CLOSE,6);
布林1:=MA(PSY,6);
EXPLAIN(CROSS(PSY,布林1) AND 布林1<-0.8,'MTM从下向上突破MTMMA，买入信号'),colorFF00;
EXPLAIN(CROSS(布林1,PSY) AND 布林1>0.8,'MTM从上向下跌破MTMMA，卖出信号'),colorFF00;
布林2:=REF(CLOSE,1);
布林3:=(SMA(MAX(CLOSE-布林2,0),6,1))/(SMA(ABS(CLOSE-布林2),6,1))*100;
布林4:=(SMA(MAX(CLOSE-布林2,0),12,1))/(SMA(ABS(CLOSE-布林2),12,1))*100;
EXPLAIN(布林3>85,'6日RSI超买,防止回挡'),colorFFFF00;
EXPLAIN(布林3>80,'6日RSI向上突破85，超买,考虑卖出'),colorFFFF00;
EXPLAIN(布林3<15,'6日RSI超卖,随时有可能反弹'),colorFFFF00;
EXPLAIN(布林3<15,'6日RSI向下跌破15，超卖，考虑买入'),colorFFFF;
EXPLAIN(CROSS(布林3,15),'6日RSI向上突破15，买进信号'),colorFFFF;
EXPLAIN(CROSS(布林3,85),'6日RSI向下跌破85，卖出信号'),colorFF00;
布林5:=(COUNT(CLOSE>REF(CLOSE,1),12))/12*100;
布林6:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
布林7:=布林6+3*STD(布林6,10);
XX:=布林6-3*STD(布林6,10);
A001:=(布林7-XX)/布林7<0.03;
A002:=(布林7-XX)/布林7>0.18;
A003:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15;
A004:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
EXPLAIN(A001,'多空布林收敛中，有变盘的可能，上下自己分析'),colorFFFF00;
EXPLAIN(A003 AND A002 AND CLOSE>OPEN,'布林上下乖离太大，有反弹的可能'),colorFFFF;
EXPLAIN(A004 AND A002 AND CLOSE<OPEN,'布林上下乖离太大，有回落的可能'),colorFF00;
EXPLAIN(HIGH>=HHV(HIGH,20),'创20天新高'),colorFFFF00;
EXPLAINICON(HIGH>=HHV(HIGH,20),4);
 |
