%> 战神系列之★踏上征途★_
战神系列之★踏上征途★ 3038

{n,7,1,300,1}

RSV:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

j:=3*k-2*d;

Vr2:=LLV(LOW,5);

Vr3:=HHV(HIGH,5);

K1:=EMA((CLOSE-Vr2)/(Vr3-Vr2)*100,4)*2;

D1:=EMA(0.667*REF(K1,1)+0.333*K1,2);

j1:=3*k1-2*d1;

Var2:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);

Var3:=POW(MA(LOW,5),2)+MA(LOW,5);

Var4:=POW(MA(HIGH,5),2)+MA(HIGH,5);

Var5:=(Var2-LLV(Var3,64))/(HHV(Var4,64)-LLV(Var3,64))*150+65-10;

QSZ:= SMA(Var5,3,1)*1.5-100;

QSC:= SMA(QSZ,3,1);

QSD:= 3*QSZ-2*QSC;

ar3:=(HIGH+LOW+CLOSE*2)/4;

ar4:=EMA(ar3,13);

ar5:=STD(ar3,13);

ar6:=(ar3-ar4)*100/ar5;

ar7:=EMA(ar6,5);

ar8:=EMA(ar7,13);

ar9:=(c-llv(l,38))/(hhv(h,38)-llv(l,38))*100;

QSK:=EMA(ar7,13)+200-100;

QSM:=EMA(QSK,10);

jj:=3*qsk-2*qsm;

m:=((k+k1+qsz+qsk));

m1:=((d+d1+qsc+qsm));

m2:=((j+j1+qsd+jj));

y:=(m+m1+m2*30)/32/5-15;

战神:y,linethick0;

VERTLINE(if(CROSS(160,战神),90,0),1),colorred,linethick3;

DRAWTEXT((if(CROSS(160,战神),90,0)),138, '危'),ALIGN1,color0055ff;

DRAWTEXT((if(CROSS(160,战神),90,0)),108, '险'),ALIGN1,color0055ff;

fillrgn(0,战神,战神<0,rgb(0,250,0));

DRAWTEXT((if(CROSS(战神,0),90,0)),8, '踏上征途'),ALIGN1,colorf00ff0;

yy:=战神;

ttt:=yy-MA(CLOSE,N/2)<0;

rrr:=yy-MA(CLOSE,N/2)>0;

eee:=BARSLAST(ttt);

www:=0-BARSLAST(ttt);

www: IF(ttt<=0,eee,www),colorred, COLORSTICK;

DRAWGBKLAST(c>0,STRIP(RGB(10,60,0),RGB(50,10,0),0));

DRAWTEXT((if(cross((3*sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1)-2*sma(sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1),3,1)),10)

AND (sma((sma(ar9,5,1)),10,1))<50,100,0)),138, '∝╬══→'),ALIGN1,coloryellow;

VERTLINE((if(cross((3*sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1)-2*sma(sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1),3,1)),10)

AND (sma((sma(ar9,5,1)),10,1))<50,100,0)),3),coloryellow,linethick3;

DRAWTEXT((if(cross((3*sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1)-2*sma(sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1),3,1)),10)

AND (sma((sma(ar9,5,1)),10,1))<50,100,0)),88, '出'),ALIGN1,coloryellow;

DRAWTEXT((if(cross((3*sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1)-2*sma(sma((c-llv(l,13))/(hhv(h,13)-llv(l,13))*100,5,1),3,1)),10)

AND (sma((sma(ar9,5,1)),10,1))<50,100,0)),58, '招'),ALIGN1,coloryellow;

出招:0;



 

{股票教程网-承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}