//黄金位分割% 飞狐主图
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;
|