通达信四季变天主图源码

阴观望:RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,NODRAW,COLOR999999;
急速超跌关注:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14,COLORBBBBBB,NODRAW;
离场:=IF(红持股,JRL,DRAWNULL);
明离场价:=离场,COLORFF99FF,NODRAW;
今离场价:=REF(离场,1)COLOR0000FF,NODRAW;
进:=IF(阴观望,JRH,DRAWNULL);
明进场价:=进,COLOR33AACC,NODRAW;
今进场价:=REF(明进场价,1),COLOR00FF00,NODRAW;
大雪:=MA((((HIGH + LOW) + CLOSE) / 3),8);
无痕:=MA((((HIGH + LOW) + CLOSE) / 3),21);
VAR111:=EMA(((OPEN + CLOSE) / 2),26);
VAR222:=IF(C<200 , MA(COST(30),3),2300),NODRAW;
天下有雪:=IF(C<200 ,MA(COST(50),3),2300);
严冬:=ISLASTBAR AND (VAR4 > 0.1),COLORFFFFFF,NODRAW;
早春:=ISLASTBAR AND (((((VAR4 < 天下有雪) AND (VAR4 > 无痕))
OR ((VAR4 < VAR5) AND (VAR4 > 无痕))) OR ((VAR4 > 无痕)
AND (VAR111 > 无痕)))),COLOR00FF00,NODRAW;
初夏:=ISLASTBAR AND ((((((VAR4 > 天下有雪) AND (VAR4 > VAR111))
AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1))) OR ((((VAR4 > VAR222)
AND (VAR4 > VAR111)) AND (VAR4 > VAR5)) AND (VAR222 > REF(VAR222,1))))),
COLOR0000FF,NODRAW;
深秋:=ISLASTBAR AND (((((VAR4 > VAR6) AND (VAR4 > VAR3)) AND (大雪 > 无痕))
AND (VAR111 > REF(VAR111,1)))),COLOR00FFFF,NODRAW;
SAAA:=(3*C+H+L+O)/6;
SVAR1:=(8*SAAA+7*REF(SAAA,1)+6*REF(SAAA,2)
+5*REF(SAAA,3)+4*REF(SAAA,4)+3*REF(SAAA,5)+2*REF(SAAA,6)+REF(SAAA,8))/36;
SVAR2:=(HHV(SVAR1,5)+HHV(SVAR1,10)+HHV(SVAR1,20))/3;
SVAR3:=(LLV(SVAR1,5)+LLV(SVAR1,10)+LLV(SVAR1,20))/3;
SVAR4:=(HHV(SVAR2,5)+HHV(SVAR2,10)+HHV(SVAR2,20))/3;
SVAR5:=(LLV(SVAR3,5)+LLV(SVAR3,10)+LLV(SVAR3,20))/3;
SVAR6:=(LLV(SVAR1,2)+LLV(SVAR1,4)+LLV(SVAR1,6))/3;
Q1:=CONST(IF(短买春,0,IF(秋离场,180,IF(红持股,220,IF(急速超跌关注,150,100))))),NODRAW;
Q2:=CONST(IF(短买春,150,IF(秋离场,100,IF(红持股,0,IF(急速超跌关注,150,100))))),NODRAW;
Q3:=CONST(IF(短买春,0,IF(秋离场,50,IF(红持股,50,IF(急速超跌关注,150,100))))),NODRAW;
DRAWGBK(C>0,RGB(Q1,Q2,Q3),RGB(0,50,50),0,' ',0);

DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130);
DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/30);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1>=(HI/POW(GZ,9)) AND C1<(HI/POW(GZ,8)),V,0),DA);
LH10:=SUM(IF(C1>=(HI/POW(GZ,10)) AND C1<(HI/POW(GZ,9)),V,0),DA);
LH11:=SUM(IF(C1>=(HI/POW(GZ,11)) AND C1<(HI/POW(GZ,10)),V,0),DA);
LH12:=SUM(IF(C1>=(HI/POW(GZ,12)) AND C1<(HI/POW(GZ,11)),V,0),DA);
LH13:=SUM(IF(C1>=(HI/POW(GZ,13)) AND C1<(HI/POW(GZ,12)),V,0),DA);
LH14:=SUM(IF(C1>=(HI/POW(GZ,14)) AND C1<(HI/POW(GZ,13)),V,0),DA);
LH15:=SUM(IF(C1>=(HI/POW(GZ,15)) AND C1<(HI/POW(GZ,14)),V,0),DA);
LH16:=SUM(IF(C1>=(HI/POW(GZ,16)) AND C1<(HI/POW(GZ,15)),V,0),DA);
LH17:=SUM(IF(C1>=(HI/POW(GZ,17)) AND C1<(HI/POW(GZ,16)),V,0),DA);
LH18:=SUM(IF(C1>=(HI/POW(GZ,18)) AND C1<(HI/POW(GZ,17)),V,0),DA);
LH19:=SUM(IF(C1>=(HI/POW(GZ,19)) AND C1<(HI/POW(GZ,18)),V,0),DA);
LH20:=SUM(IF(C1>=(HI/POW(GZ,20)) AND C1<(HI/POW(GZ,19)),V,0),DA);
LH21:=SUM(IF(C1>=(HI/POW(GZ,21)) AND C1<(HI/POW(GZ,20)),V,0),DA);
LH22:=SUM(IF(C1>=(HI/POW(GZ,22)) AND C1<(HI/POW(GZ,21)),V,0),DA);
LH23:=SUM(IF(C1>=(HI/POW(GZ,23)) AND C1<(HI/POW(GZ,22)),V,0),DA);
LH24:=SUM(IF(C1>=(HI/POW(GZ,24)) AND C1<(HI/POW(GZ,23)),V,0),DA);
LH25:=SUM(IF(C1>=(HI/POW(GZ,25)) AND C1<(HI/POW(GZ,24)),V,0),DA);
LH26:=SUM(IF(C1>=(HI/POW(GZ,26)) AND C1<(HI/POW(GZ,25)),V,0),DA);
LH27:=SUM(IF(C1>=(HI/POW(GZ,27)) AND C1<(HI/POW(GZ,26)),V,0),DA);
LH28:=SUM(IF(C1>=(HI/POW(GZ,28)) AND C1<(HI/POW(GZ,27)),V,0),DA);
LH29:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);
LH30:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
L11:=REFDATE(HHV(LH11,DA),DATE),LINETHICK0;
L12:=REFDATE(HHV(LH12,DA),DATE),LINETHICK0;
L13:=REFDATE(HHV(LH13,DA),DATE),LINETHICK0;

上一页  [1] [2] [3] [4] [5]  下一页