{资金仓位}
ZDZ:=MAX(MAX(MA(C,60),MA(C,30)),MAX(MAX(MA(C,20),MA(C,10)),MA(C,5)));
ZXZ:=MIN(MIN(MA(C,60),MA(C,30)),MIN(MIN(MA(C,20),MA(C,10)),MA(C,5)));
MA60:=MA(C,60);
MA30:=MA(C,30);
MA20:=MA(C,20);
MA10:=MA(C,10);
MA5:=MA(C,5);
{布林通道条件}
中轨:=MA(CLOSE,26);
上轨:=中轨+2*STD(CLOSE,26);
下轨:=中轨-2*STD(CLOSE,26);
DPZG:(BARSLAST(CROSS(中轨,CLOSE))>=0 AND (中轨<REF(中轨,1) OR MA5<REF(MA5,1)) AND (CLOSE<中轨 OR CLOSE<MA5)) OR HHV(BARSLASTCOUNT(CLOSE>=中轨 AND 中轨>=REF(中轨,1)),BARSLAST(CROSS(中轨,CLOSE)))<3,COLORLIGRAY,NODRAW;
{ZJFZ}
VAR1:=REF(LOW,1);
VAR2:=SMA(ABS(LOW-VAR1),3,1)/SMA(MAX(LOW-VAR1,0),3,1)*100;
VAR3:=EMA(VAR2*10,3);
VAR4:=LLV(LOW,13);
VAR5:=HHV(VAR3,13);
VAR6:=EMA(IF(LOW<=VAR4,(VAR3+VAR5*2)/2,0),3)/618;
VAR7:=IF(VAR6>500,500,VAR6);
FZTJ:VAR7>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),COLORYELLOW,NODRAW;
{RSI}
LC:=REF(CLOSE,1);
RSI6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RS6TJ:RSI6<18,COLORFF8000,NODRAW;
{对应大盘}
ZSTJ:BARSLASTCOUNT(INDEXC<REF(INDEXC,1))>=3,COLORGREEN,NODRAW;
{资金与仓位}
CDZ1:=IF(ZDZ=MA60,MAX(MAX(MA(C,30),MA(C,20)),MAX(MA(C,10),MA(C,5))),0);
CDZ2:=IF(ZDZ=MA30,MAX(MAX(MA(C,60),MA(C,20)),MAX(MA(C,10),MA(C,5))),0);
CDZ3:=IF(ZDZ=MA20,MAX(MAX(MA(C,30),MA(C,60)),MAX(MA(C,10),MA(C,5))),0);
CDZ4:=IF(ZDZ=MA10,MAX(MAX(MA(C,30),MA(C,20)),MAX(MA(C,60),MA(C,5))),0);
CDZ5:=IF(ZDZ=MA5,MAX(MAX(MA(C,30),MA(C,20)),MAX(MA(C,60),MA(C,10))),0);
CDZ:=MAX(MAX(MAX(CDZ1,CDZ2),MAX(CDZ3,CDZ4)),CDZ5);
CXZ1:=IF(ZXZ=MA60,MIN(MIN(MA(C,30),MA(C,20)),MIN(MA(C,10),MA(C,5))),10000);
CXZ2:=IF(ZXZ=MA30,MIN(MIN(MA(C,60),MA(C,20)),MIN(MA(C,10),MA(C,5))),10000);
CXZ3:=IF(ZXZ=MA20,MIN(MIN(MA(C,30),MA(C,60)),MIN(MA(C,10),MA(C,5))),10000);
CXZ4:=IF(ZXZ=MA10,MIN(MIN(MA(C,30),MA(C,20)),MIN(MA(C,60),MA(C,5))),10000);
CXZ5:=IF(ZXZ=MA5,MIN(MIN(MA(C,30),MA(C,20)),MIN(MA(C,60),MA(C,10))),10000);
CXZ:=MIN(MIN(MIN(CXZ1,CXZ2),MIN(CXZ3,CXZ4)),CXZ5),COLORRED;
ZJZ:=MA(C,60)+MA(C,30)+MA(C,20)+MA(C,10)+MA(C,5)-ZDZ-ZXZ-CDZ-CXZ,COLORMAGENTA;
STICKLINE(C>=ZDZ AND NOT(DPZG),0,100,3,1),COLORRED;
STICKLINE(C>=CDZ AND C<ZDZ AND C>MA(C,60) AND C>=MA(C,10) AND NOT(DPZG),0,80,3,1),COLORRED;
STICKLINE(C>=CDZ AND C<ZDZ AND C>MA(C,60) AND C<MA(C,10) AND NOT(DPZG),0,70,3,1),COLORRED;
STICKLINE(C>=CDZ AND C<ZDZ AND C<MA(C,60) AND MA(C,5)>=MA(C,10) AND NOT(DPZG),0,60,3,1),COLORRED;
STICKLINE(C>=CDZ AND C<ZDZ AND C<MA(C,60) AND MA(C,5)<MA(C,10) AND MA(C,5)>MA(C,30) AND NOT(DPZG),0,60,3,1),COLORRED; {特别红柱1}
STICKLINE(C>=CDZ AND C<ZDZ AND C<MA(C,60) AND MA(C,5)<MA(C,10) AND MA(C,5)<=MA(C,30),0,40,3,1),COLORGREEN;
STICKLINE(C>=ZJZ AND C<CDZ AND C>MA(C,60) AND NOT(DPZG),0,60,3,1),COLORRED;
STICKLINE(C>=ZJZ AND C<CDZ AND C<=MA(C,60) AND C>=MA(C,10),0,40,3,1),COLORGREEN;
STICKLINE(C>=CXZ AND C<ZJZ AND C>=MA(C,5),0,25,3,1),COLORGREEN;
STICKLINE(C>=ZXZ AND C<CXZ AND C>MA(C,5),0,10,3,1),COLORGREEN;
冰:EXIST(FZTJ,3) AND RS6TJ AND ZSTJ,COLORGREEN,NODRAW;
STICKLINE(EXIST(FZTJ,3) AND RS6TJ AND ZSTJ,0,33,3,0),COLORGREEN;
DRAWTEXT(CROSS(EXIST(FZTJ,3) AND RS6TJ AND ZSTJ,0.5),48,'冰'),COLORGREEN;
|