|
MA5:MA(CLOSE,5); MA10:MA(CLOSE,10); MA20:MA(CLOSE,20); MA60:MA(CLOSE,60); STICKLINE(C>O,C,O,3,0 ),COLOR000055; STICKLINE(C>O,C,O,2.6,0 ),COLOR000077; STICKLINE(C>O,C,O,2.1,0 ),COLOR000099; STICKLINE(C>O,C,O,1.5,0 ),COLOR0000BB; STICKLINE(C>O,C,O,0.9,0 ),COLOR0000DD; STICKLINE(C>O,C,O,0.1,0 ),COLOR0000FF; STICKLINE(C>O,H,L,0,0),COLORRED; {STICKLINE(C>O,H,L,0,0),COLOR7D7DFF; STICKLINE(C>O,C,O,0,0),COLOR7D7DFF; STICKLINE(C>O,C,O,3.1,0),COLOR1313FF; STICKLINE(C>O,C,O,2.4,0),COLOR2424FF; STICKLINE(C>O,C,O,2.0,0),COLOR2D2DFF; STICKLINE(C>O,C,O,1.6,0),COLOR4444FF; STICKLINE(C>O,C,O,1.2,0),COLOR5757FF; STICKLINE(C>O,C,O,0.6,0),COLOR6666FF; STICKLINE(C>O,C,O,0.1,0),COLOR7D7DFF;} STICKLINE(C<O,H,L,0,0),COLORFF9900; STICKLINE(C<O,C,O,0,0),COLORFF5500; STICKLINE(C<O,C,O,3.1,0),COLORFF6600; STICKLINE(C<O,C,O,2.4,0),COLORFF7700; STICKLINE(C<O,C,O,2.0,0),COLORFF8800; STICKLINE(C<O,C,O,1.6,0),COLORFF9900; STICKLINE(C<O,C,O,1.2,0),COLORFFAA00; STICKLINE(C<O,C,O,0.6,0),COLORFFCC00; STICKLINE(C<O,C,O,0.1,0),COLORFFFF00; RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; K1:=SMA(RSV,10,1); D1:=SMA(K1,5,1); KK:=INTPART(K1); DD0:=INTPART(D1); TFXXS:=KK+DD0;TGLD:=MOD(TFXXS,10);TGLXS:=(TFXXS-REF(TFXXS,1))*10;TYCFX:=TFXXS+TGLXS;乖离系数:TGLXS,LINETHICK0,COLORGREEN,NODRAW; DRAWTEXT_FIX(1,0.00,0,0,所属地区:),COLORWHITE; DRAWTEXT_FIX(1,0.04,0,0,DYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.11,0,0,所属行业:),COLORWHITE; DRAWTEXT_FIX(1,0.15,0,0,HYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.25,0,0,概念题材:),COLORWHITE; DRAWTEXT_FIX(1,0.29,0,0,GNBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0,0.05,0,风格板块:),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0.04,0.05,0,FGBLOCK),COLORLIMAGENTA; DRAWTEXT_FIX(ISLASTBAR,0,0.39,0,EXTERNSTR(0,3)),COLORWHITE; DRAWTEXT_FIX(ISLASTBAR,0,0.36,0,EXTERNSTR(0,6)),COLORLIBLUE; DRAWTEXT_FIX(ISLASTBAR,0,0.33,0,EXTERNSTR(0,12)),COLORLIGREEN;DRAWTEXT_FIX(ISLASTBAR,0,0.3,0,EXTERNSTR(0,1)),COLORYELLOW;{DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,1、乖离系数,大于40关注 小于-50坚决不进场 ,大于60坚决买入。 2、控盘系数大于20 可以做个小波段 准确率80%。)COLORWHITE;} 涨幅限制:=IF(NAMELIKE(ST) OR NAMELIKE(*ST) OR NAMELIKE(SST) OR NAMELIKE(S*ST),105,110);跌幅限制:=IF(NAMELIKE(ST) OR NAMELIKE(*ST) OR NAMELIKE(SST) OR NAMELIKE(S*ST),95,90);涨停:=ROUND(CLOSE*100)>=ROUND(REF(CLOSE,1)*涨幅限制) AND CLOSE=HIGH; STICKLINE(涨停,C,O,3,0),COLORDD00DD; STICKLINE(涨停,C,O,2,0),COLORFF00FF; STICKLINE(涨停,C,O,1.5,0),COLORFF00FF; STICKLINE(涨停,C,O,0.5,0),COLORFABBFF; 跌停:=ROUND(CLOSE*100)<=ROUND(REF(CLOSE,1)*跌幅限制+1) AND CLOSE=LOW; STICKLINE(跌停,O,C,3,0),COLOR009900; STICKLINE(跌停,O,C,2,0),COLOR009900; STICKLINE(跌停,O,C,1.5,0),COLOR00BB00; STICKLINE(跌停,L,H,0.5,0),COLOR00DD00; 圣:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10; 灵:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100; 石:=SMA(灵,13,8); 仙:=CEILING(SMA(石,13,8)); 编著:=SMA(圣,21,8); AABB:=IF(L,CONST(L),DRAWNULL); AAA:=(3*C+H+L+O)/6; VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36; VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3; VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3; VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3; VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3; VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; {短线:VAR1,COLORWHITE; 中线:VAR6,COLORYELLOW;} TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1; 立桩量:=FILTER(TJ1,5); TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0))); 突破:=TJ2=1; TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0))); 三天法则:=TJ3=1; 成立:=三天法则 AND 突破; 条件成立:=FILTER(成立,3); HIGHN:=10; LOWN:=10; HIGHDISPLAY:=0; LOWDISPLAY:=0; ZGDISPLAY:=0; MADISPLAY:=0; AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1); QY:=BACKSET(AA,HIGHN+1); CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1); DDD:=BARSLAST(CC); GDTS:=IF(CC,CURRBARSCOUNT,0); DINGBU:=IF(DDD,REF(H,DDD),H);DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DINGBU1:=REF(DINGBU,DDD+1); GDCS1:=CONST(DINGBUTS); DINGBUTS1:=REF(DINGBUTS,DDD+1); GDCS2:=CONST(DINGBUTS1); DINGBU2:=REF(DINGBU1,DDD+1); MM:=IF(CURRBARSCOUNT>GDCS2,0,1); AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1); QY1:=BACKSET(AA1,LOWN+1); CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1); DD1:=BARSLAST(CC1); DDTS:=IF(CC1,CURRBARSCOUNT,0); YDB:=IF(DD1,REF(L,DD1),L); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); DDCS1:=CONST(DDTS1); ZDB:=REF(YDB,DD1+1); DDTS2:=REF(DDTS1,DD1+1); DDCS2:=CONST(DDTS2); VAR7:=0; VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100; VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100; VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0); VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3); VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3); VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3); VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3); VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3); VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3); VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3); VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3); VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150); 买1:=VAR10; 买2:=(VAR11+VAR13+VAR15+VAR17); 卖1:=(VAR12+VAR14+VAR16+VAR18); B:=IF(买1>0 OR 买2>0,LOW,DRAWNULL),COLORYELLOW; S:=IF(卖1>0,HIGH,DRAWNULL),COLORGREEN; STICKLINE(S,O,C,3,0),COLORE9E9EE; STICKLINE(S,O,C,2.5,0),COLORE5E5E5; STICKLINE(S,O,C,1.5,0),COLORF7F7F7; STICKLINE(S,O,C,0.5,0),COLORFFFFFF; DRAWTEXT(CROSS(S,卖1),S,←卖),COLORWHITE; STICKLINE(B,C,O,3,0),COLOR009999; STICKLINE(B,C,O,2.5,0),COLOR00BBBB; STICKLINE(B,C,O,1.5,0),COLOR00DDDD; STICKLINE(B,C,O,0.5,0),COLOR00FFFF; DRAWTEXT(CROSS(B,买1),B,←买),COLORRED; ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK; VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0); K:=EMA(VAR7,5)*2, , COLORFF00FF; D:=EMA(K,5), , COLORWHITE; J:=K*3-D*2, ,COLORYELLOW; VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10; HS:=VOL/CAPITAL*100, , COLORGREEN; VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW,机构进场),LINETHICK1,COLORYELLOW; VAR1A:=IF(VARE>0,VARE,0); VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60; VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100; DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW,大顶(底)) COLORWHITE; 指标王:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20; DRAWTEXT(指标王,L,主力建仓),COLORYELLOW; DRAWTEXT(VAR1,L,★短买),COLORYELLOW; DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L,★加仓),COLORYELLOW; DRAWRECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0)); 压力:=MA(REF(HHV(C,30),1),2),COLORABFF46; 支撑:=MA(REF(LLV(C,30),1),2),COLOR9DFFFF; 总额:=AMOUNT; 买888:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)); 买%:=买888/AMOUNT*100; 流入:=AMOUNT*买%/10000000000; 流出:=AMOUNT/100000000-流入; 净流:=(流入-流出); 总额3:=SUM(AMOUNT,3); 流入3:=SUM(流入,3); 流出3:=SUM(流出,3); 净流3:=SUM(流入-流出,3); 总额5:=SUM(AMOUNT,5); 流入5:=SUM(流入,5); 流出5:=SUM(流出,5); 净流5:=SUM(流入-流出,5); 总额10:=SUM(AMOUNT,10); 流入10:=SUM(流入,10); 流出10:=SUM(流出,10); 净流10:=SUM(流入-流出,10); 画:=CONST(FINDHIGH(总额10,0,190,1)); 超B:=L2_AMO(0,2)/10000.0; 大B:=L2_AMO(1,2)/10000.0; 中B:=L2_AMO(2,2)/10000.0; 小B:=L2_AMO(3,2)/10000.0; 超S:=L2_AMO(0,3)/10000.0; 大S:=L2_AMO(1,3)/10000.0; 中S:=L2_AMO(2,3)/10000.0; 小S:=L2_AMO(3,3)/10000.0; TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0); 大宗进:=(超B)+(大B),NODRAW; 大宗出:=(超S)+(大S),NODRAW; 非大宗进:=(中B)+(小B),NODRAW; 非大宗出:=(中S)+(小S),NODRAW; 大宗进限制:=IF((超B+大B)=0,0,大宗进); 大宗出限制:=IF((超S+大S)=0,0,大宗出); 非大宗进限制:=IF(中B+小B=0,0,非大宗进); 非大宗出限制:=IF(中S+小S=0,0,非大宗出); 主力净流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW; 散户净流入:=(中B+小B)-(中S+小S),COLORRED,NODRAW; 净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORRED,NODRAW; 大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW; 大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入); 大单流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW; 大单流出限制:=IF((超B+大B+超S+大S)=0,0,大单流出比); 总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW; 总流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW; 成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW; 机构参与度:=(超B+超S+大B+大S)/成交总量*100,COLORYELLOW,NODRAW; 大单强度:=(超B+大B-超S-大S)/成交总量*100,COLORYELLOW,NODRAW; 大单强度限制:=IF(大单强度=0,-100,大单强度); 大单强度比:=IF(大单强度>=0,(大单强度限制+100)/2,100-ABS((大单强度限制-100)/2)),NODRAW; 超单强度:=(超B-超S)/(超B+超S)*100,COLORYELLOW,NODRAW; 超单强度限制:=IF(超单强度=0,-100,超单强度); 超单强度比:=IF(超单强度>0,(超单强度限制+100)/2,IF(超单强度<0,100-ABS((超单强度限制-100)/2),0)),NODRAW; DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW; DRAWRECTREL(0,CONST(930-(ABS(大宗进)*250/DAZHIV)),35,950,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(37,CONST(930-(ABS(大宗出)*250/DAZHIV)),72,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0))); DRAWRECTREL(75,CONST(930-(ABS(非大宗进)*250/DAZHIV)),110,950,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(112,CONST(930-(ABS(非大宗出)*250/DAZHIV)),147,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0))); DRAWRECTREL(150,CONST(940-(ABS(净流入)*250/DAZHIV))-20,190,950,IF(CONST(净流入>0),RGB(200,0,0),RGB(0,125,50))); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT(,CON2STR(大宗进/1,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT(,CON2STR(大宗出/1,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT(,CON2STR(非大宗进/1,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT(,CON2STR(非大宗出/1,0))),COLORYELLOW; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT(,CON2STR(净流入/1,0))),COLORYELLOW; DRAWTEXT_FIX(1,0.000,0.96,0,STRCAT(STRCAT( 主力买卖 ,CON2STR(主力净流入,0)),万)),COLORMAGENTA; DRAWTEXT_FIX(1,0.078,0.96,0,STRCAT(STRCAT( 散户买卖 ,CON2STR(散户净流入,0)),万)),COLORCYAN; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.96,0, 净流入:(万)),COLORYELLOW; 主力买力度:=LARGEINTRDVOL*1000/VOL; 主力卖力度:=LARGEOUTTRDVOL*1000/VOL; AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW; DRAWRECTREL(0,515,CONST(ABS(主力买力度)*560/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0))); DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*560/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0))); DRAWTEXT_FIX(1,0,0.524,0,STRCAT(主买力度:,CON2STR(主力买力度,0))),COLORYELLOW; DRAWTEXT_FIX(1,0,0.576,0,STRCAT(主卖力度:,CON2STR(主力卖力度,0))),COLORYELLOW; DDX:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*1000/FINANCE(7); DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0); DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0); DRAWRECTREL(150,500,192,540,IF(CONST(DDX)>0,RGB(255,0,0),RGB(0,50,0))); DRAWRECTREL(150,545,192,585,IF(CONST(DDY)>0,RGB(255,0,0),RGB(0,50,0))); DRAWRECTREL(150,590,192,630,IF(CONST(DDZ)>0,RGB(255,0,0),RGB(0,50,0))); DRAWTEXT_FIX(1,0.153,0.500,0,STRCAT(DDX:,CON2STR(DDX,1))),COLORYELLOW,COLORWHITE; DRAWTEXT_FIX(1,0.153,0.548,0,STRCAT(DDY:,CON2STR(DDY,1))),COLORYELLOW,COLORWHITE; DRAWTEXT_FIX(1,0.153,0.596,0,STRCAT(DDZ:,CON2STR(DDZ,1))),COLORYELLOW,COLORWHITE; T1:=IF (DDX>0 AND REF(DDX,1)<0,1,0); T2:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)<0,2,T1); T3:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)<0,3,T2); T4:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)<0,4,T3); T5:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)<0,5,T4); T6:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)<0,6,T5); T7:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)<0,7,T6); T8:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)<0,8,T7); T9:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)>0 AND REF(DDX,9)<0,9,T8); T:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)>0 AND REF(DDX,9)>0,10,T9); DRAWTEXT_FIX(1,0.190,0.500,0,STRCAT(STRCAT( ,CON2STR(T,0)), [天] )),COLORYELLOW; T11:=IF (DDY>0 AND REF(DDY,1)<0,1,0); T21:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)<0,2,T11); T31:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)<0,3,T21); T41:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)<0,4,T31); T51:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)<0,5,T41); T61:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)<0,6,T51); T71:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)<0,7,T61); T81:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)<0,8,T71); T91:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)>0 AND REF(DDY,9)<0,9,T81); TY01:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)>0 AND REF(DDY,9)>0,10,T91); DRAWTEXT_FIX(1,0.190,0.548,0,STRCAT(STRCAT( ,CON2STR(TY01,0)), [天] )),COLORYELLOW; T1Z:=IF (DDZ>0 AND REF(DDZ,2)<0,1,0); T2Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)<0,2,T1Z); T3Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)<0,3,T2Z); T4Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)<0,4,T3Z); T5Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)<0,5,T4Z); T6Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)<0,6,T5Z); T7Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)<0,7,T6Z); T8Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)<0,8,T7Z); T9Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)>0 AND REF(DDZ,9)<0,9,T8Z); TZ:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)>0 AND REF(DDZ,9)>0,10,T9Z); DRAWTEXT_FIX(1,0.190,0.596,0,STRCAT(STRCAT( ,CON2STR(TZ,0)), [天] )),COLORYELLOW; |