ÈÕ:=500;×òÇ°:=60;¸ß:=REF(HHV(H,ÈÕ),×òÇ°);µÍ:=REF(LLV(L,ÈÕ),×òÇ°);H1:=¸ß-(¸ß-µÍ)*1;H2:=¸ß-(¸ß-µÍ)*0.91;H3:=¸ß-(¸ß-µÍ)*0.85;H4:=¸ß-(¸ß-µÍ)*0.809;H5:=¸ß-(¸ß-µÍ)*0.777;H6:=¸ß-(¸ß-µÍ)*0.707;
H7:=¸ß-(¸ß-µÍ)*0.666;H8:=¸ß-(¸ß-µÍ)*0.618;H9:=¸ß-(¸ß-µÍ)*0.563;H10:=¸ß-(¸ß-µÍ)*0.5;H11:=¸ß-(¸ß-µÍ)*0.424;H12:=¸ß-(¸ß-µÍ)*0.382;H13:=¸ß-(¸ß-µÍ)*0.309;H14:=¸ß-(¸ß-µÍ)*0.25;H15:=¸ß-(¸ß-µÍ)*0.191;
H16:=¸ß-(¸ß-µÍ)*0.1375;H17:=¸ß-(¸ß-µÍ)*0.0807;Ò»:REFDATE(H2,DATE),COLORLIBLUE,DOTLINE;¶þ:=REFDATE(H3,DATE),COLORYELLOW;Èý:=REFDATE(H4,DATE),COLORLIBLUE;ËÄ:=REFDATE(H5,DATE),COLORLIRED;
Îå:=REFDATE(H6,DATE),COLORYELLOW;Áù:=REFDATE(H7,DATE),COLORLIBLUE;Æß:REFDATE(H8,DATE),,DOTLINE,COLORGRAY;°Ë:=REFDATE(H9,DATE),COLORYELLOW;¾Å:=REFDATE(H10,DATE),COLORLIBLUE;
Ê®:=REFDATE(H11,DATE),COLORLIRED;ʮһ:=REFDATE(H12,DATE),COLORYELLOW;Ê®¶þ:=REFDATE(H13,DATE),COLORLIBLUE;Ê®Èý:=REFDATE(H14,DATE),COLORLIRED;Ê®ËÄ:=REFDATE(H15,DATE),COLORYELLOW;
Ê®Îå:=REFDATE(H16,DATE),COLORLIBLUE;Ê®Áù:REFDATE(H17,DATE),COLORYELLOW,DOTLINE;µ×:REFDATE(H1,DATE),COLORLIGREEN;¶¥:REFDATE(¸ß,DATE),COLORLIRED;DRAWKLINE(HIGH,OPEN,LOW,CLOSE);Âò:=CROSS(C,Ò»);
Âô:=CROSS(Ê®Áù,C);DRAWICON(Âò,µ×,1);DRAWICON(Âô,¶¥,2);N:=3;FF:=(C-REF(C,N))/REF(C,N);AH1:=MAX(DYNAINFO(3),DYNAINFO(5));AL1:=MIN(DYNAINFO(3),DYNAINFO(6));AP1:=AH1-AL1;×èÁ¦:=AL1+AP1*7/8;
Ö§³Å:=AL1+AP1*0.5/8;ÏÖ¼Û:=CLOSE;DRAWTEXT(LONGCROSS(Ö§³Å,ÏÖ¼Û,2),C*0.999,'Âò'),COLORCYAN;DRAWTEXT(LONGCROSS(ÏÖ¼Û,×èÁ¦,2),C*1.004,' Âô'),COLORMAGENTA;DRAWICON(LONGCROSS(ÏÖ¼Û,×èÁ¦,2),C*1.002,15);
TT:=BARSCOUNT(CLOSE);CC:=CLOSE;¾ùÏß:=IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0)));ÉϾù:=(¾ùÏß*1.007 );Ͼù:=(¾ùÏß/1.005 );ʱ³¤:=IF(HOUR>=10 AND HOUR<15,1,0);
ÕÇ·ù:=(CLOSE>DYNAINFO(3))>1.02;µø·ù:=(CLOSE/DYNAINFO(3))<0.98;ºáÅÌ:=((HHV(CLOSE,BARSCOUNT(CLOSE))-LLV(CLOSE,BARSCOUNT(CLOSE)))/CLOSE)<0.03;YY:=SMA(VOL,30,1);·ÅÁ¿:=SUM(VOL,6)>REF(MA(VOL,30),1)*0.03;
Õǵø·ù:=ÕÇ·ù OR µø·ù;ºáÕÇ:=ºáÅÌ AND ·ÅÁ¿ AND (C>ÉϾù);DRAWTEXT(FILTER(ºáÕÇ,50),¾ùÏß*0.995,' Í»ÆÆ'),COLORLIRED;DRAWICON(FILTER(ºáÕÇ,50),¾ùÏß*0.995,26);MA30:=EMA(CLOSE,30);A2:=DYNAINFO(3);
A3:=IF(C=A2,C*1.005,IF(C<A2,C*1.005,C*0.995));A5:=IF(C=A2,CON2STR(0,2),IF(C>A2,CON2STR((C-A2)/A2*100,2),CON2STR((A2-C)/A2*100,2)));
A6:=IF(ZTPRICE(DYNAINFO(3),0.1)=C OR DTPRICE(DYNAINFO(3),0.1)=C,STRCAT(CON2STR(C,2),'¡ï '),IF(C=REF(C,1),STRCAT(CON2STR(C,2),'¡ô '),IF(C>REF(C,1),STRCAT(CON2STR(C,2),'¡ø '),STRCAT(CON2STR(C,2),' '))));
A4:=STRCAT(STRCAT(' ',A6),STRCAT(A5,'%'));·Öʱ×î¸ß¼Û:=REF(HHV(HIGH,240),1);·Öʱ×îµÍ¼Û:=REF(LLV(LOW,240),1);A7:=IF(DYNAINFO(3)>C,0.9973,1.0027);DRAWTEXT(CURRBARSCOUNT=240,C*A7,'');
DRAWTEXT(ISLASTBAR AND C>A2 ,C*1,A4),COLOR3333FF;DRAWTEXT(ISLASTBAR AND C=A2 ,C*1,A4),COLORWHITE;DRAWTEXT(ISLASTBAR AND C<A2 ,C*1,A4),COLOR42C800;´ÎÈÕÕÇÍ£:=STRCAT(STRCAT('´ÎÈÕÕÇÍ£ ',CON2STR(ZTPRICE(CLOSE,0.1),2)),' ¡ø');
´ÎÈÕµøÍ£:=STRCAT(STRCAT('´ÎÈÕµøÍ£ ',CON2STR(DTPRICE(CLOSE,0.1),2)),' ¡ô');DRAWTEXT_FIX(CURRBARSCOUNT=240,0.001,0.001,0,´ÎÈÕÕÇÍ£),COLOR3030FF;DRAWTEXT_FIX(CURRBARSCOUNT=240,0.001,0.046,0,´ÎÈÕµøÍ£),COLORGREEN;
WA1:=V*C/100;WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);
WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);»ú¹¹ÂòÅÌ:=(WA2);»ú¹¹ÂôÅÌ:=(WA3);É¢»§ÂòÅÌ:=(WA4);É¢»§ÂôÅÌ:=(WA5);DRAWTEXT_FIX(1,0.730,1-0.088,0,STRCAT(STRCAT('¡¾»ú¹¹ÂòÅÌ¡¿',CON2STR(»ú¹¹ÂòÅÌ,2)),' Íò')),COLORRED;
DRAWTEXT_FIX(1,0.730,1-0.001,0,STRCAT(STRCAT('¡¾»ú¹¹ÂôÅÌ¡¿',CON2STR(»ú¹¹ÂôÅÌ,2)),' Íò')),COLORGREEN;DRAWTEXT_FIX(1,0.860,1-0.088,0,STRCAT(STRCAT('¡¾É¢»§ÂòÅÌ¡¿',CON2STR(É¢»§ÂòÅÌ,2)),' Íò')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.860,1-0.001,0,STRCAT(STRCAT('¡¾É¢»§ÂôÅÌ¡¿',CON2STR(É¢»§ÂôÅÌ,2)),' Íò')),COLORCYAN;
QA1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);³É½»¶î:=V*C/100,NODRAW;{ÍòÔª}QA4:=SUM((IF(((³É½»¶î/8<20) AND (CLOSE>(REF(CLOSE,1)))),³É½»¶î,0)),0);
QA2:=SUM((IF(((³É½»¶î/8>20) AND (CLOSE>(REF(CLOSE,1)))),³É½»¶î,0)),0);QA3:=SUM((IF(((³É½»¶î/8>20) AND (CLOSE<(REF(CLOSE,1)))),³É½»¶î,0)),0);
QA5:=SUM((IF(((³É½»¶î/8<20) AND (CLOSE<(REF(CLOSE,1)))),³É½»¶î,0)),0);QA6:=((QA2+QA3)+QA4)+QA5;QA7:=IF((ISLASTBAR),((100*QA2)/QA6),0);QA8:=IF((ISLASTBAR),((100*QA3)/QA6),0);QA9:=IF((ISLASTBAR),((100*QA4)/QA6),0);
QA10:=IF((ISLASTBAR),((100*QA5)/QA6),0);»ú¹¹Âò:=(QA2);»ú¹¹Âô:=(QA3);»ú¹¹½ø³ö:=»ú¹¹Âò-»ú¹¹Âô;DD1:=1;AAA1:=STRCAT(STRCAT('»ú¹¹ÂòÈë ',CON2STR((100*QA2)/QA6,0)),'%');AAA2:=STRCAT(STRCAT('»ú¹¹Âô³ö ',CON2STR((100*QA3)/QA6,0)),'%');
AAA0:=STRCAT(STRCAT('»ú¹¹×ÜÂòÈë ',CON2STR((100*(QA2-QA3))/A6,0)),'%');AAA3:=STRCAT(STRCAT('É¢»§ÂòÈë ',CON2STR((100*QA4)/QA6,0)),'%');AAA4:=STRCAT(STRCAT('É¢»§Âô³ö ',CON2STR((100*QA5)/QA6,0)),'%');
AAA5:=STRCAT(STRCAT('É¢»§×ÜÂòÈë ',CON2STR((100*(QA4-QA5))/QA6,0)),'%');DRAWTEXT_FIX(DD1=1,0.001,0.150,0,AAA1),COLORRED;DRAWTEXT_FIX(DD1=1,0.001,0.200,0,AAA2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0.001,0.255,0,AAA3),COLORMAGENTA;DRAWTEXT_FIX(DD1=1,0.001,0.305,0,AAA4),COLORCYAN;DRAWTEXT_FIX(DD1=1,0.001,0.360,0,AAA0),COLORYELLOW;DRAWTEXT_FIX(DD1=1,0.001,0.410,0,AAA5),COLORWHITE;
|