战神系列之★踏上征途★(大智慧)

战神系列之★踏上征途★(大智慧)

源码正文：

RSV:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200{XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
j:=3*k-2*d{XG51};
VR2:=LLV(LOW,5){XG51};
Vr3:=HHV(HIGH,5){XG51};
K1:=ema((CLOSE-Vr2)/(Vr3-Vr2)*100,4)*2{XG51};
D1:=EMA(0.667*REF(K1,1)+0.333*K1,2){XG51};
j1:=3*k1-2*d1{XG51};
Var2:=POW(MA(CLOSE,5),2)+MA(CLOSE,5){XG51};
Var3:=POW(MA(LOW,5),2)+MA(LOW,5){XG51};
Var4:=POW(MA(HIGH,5),2)+MA(HIGH,5){XG51};
Var5:=(Var2-LLV(Var3,64))/(HHV(Var4,64)-LLV(Var3,64))*150+65-10{XG51};
QSZ:= SMA(Var5,3,1)*1.5-100{XG51};
QSC:= SMA(QSZ,3,1){XG51};
QSD:= 3*QSZ-2*QSC{XG51};
ar3:=(HIGH+LOW+CLOSE*2)/4{XG51};
ar4:=EMA(ar3,13){XG51};
ar5:=stD(ar3,13){XG51};
ar6:=(ar3-ar4)*100/ar5{XG51};
ar7:=EMA(ar6,5){XG51};
ar8:=EMA(ar7,13){XG51};
ar9:=(c-llv(l,38))/(hhv(h,38)-llv(l,38))*100{XG51};
QSK:=EMA(ar7,13)+200-100{XG51};
QSM:=EMA(QSK,10){XG51};
jj:=3*qsk-2*qsm{XG51};
m:=((k+k1+qsz+qsk)){XG51};
m1:=((d+d1+qsc+qsm)){XG51};
m2:=((j+j1+qsd+jj)){XG51};
y:=(m+m1+m2*30)/32/5-15{XG51};
战神:y,linethick0{XG51};
VERTLINE(if(crOSS(160,战神),90,0),1),colorred,linethick3{XG51};
DRAWTEXT((if(CROSS(160,战神),90,0)),138, '危'),ALIGN1,color0055ff{XG51};
DRAWTEXT((if(CROSS(160,战神),90,0)),108, '险'),ALIGN1,color0055ff{XG51};
fillrgn(0,战神,战神<0,rgb(0,250,0)){XG51};
DRAWTEXT((if(CROSS(战神,0),90,0)),8, '踏上征途'),ALIGN1,colorf00ff0{XG51};
yy:=战神{XG51};
ttt:=yy-MA(CLOSE,N/2)<0{XG51};
rrr:=yy-MA(CLOSE,N/2)>0{XG51};
eee:=BArslAST(ttt){XG51};
www:=0-BARSLAST(ttt){XG51};
www: IF(ttt<=0,eee,www),colorred, COLORSTICK{XG51};
DRAWGBKLAST(c>0,STRIP(RGB(10,60,0),RGB(50,10,0),0)){XG51};
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{XG51};
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{XG51};
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{XG51};
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{XG51};
出招:0{X-G^5+1-C-N-{};

潜龙勿用公式(大智慧)(飞狐用)

源码正文：

input:N1(21,1,100),N2(34,1,100),M1(25,1,100),N(20,0,999){XG51};
底部:5,LINETHICK0,COLOR00FFFF{XG51};
趋势:5*SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-3*Sma(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),2,1){XG51};
抄底:crOSS(趋势,底部){XG51};
A1:=C/MA(C,40)*100{XG51};
A2:=C/MA(C,60)*100{XG51};
A3:=H>L*1.051{XG51};
A4:=A3 AND COUNT(A3,5)>1{XG51};
A5:=A4 AND (A1<76 OR A2<74) AND Abs(C-O)>0.1*0.1*REF(C,1){XG51};
伏击:-76,COLOR00FFFF,LINETHICK0{XG51};
铁底:-74,COLORWHITE,LINETHICK0{XG51};
A6:=IF(A1>90,90,A1){XG51};
A7:=IF(A2>90,90,A2){XG51};
VAR1:=(((CLOSE - MA(CLOSE,N1)) / stD(CLOSE,N1)) * 100){XG51};
VAR2:=ema(VAR1,5){XG51};
VAR3:=EMA(VAR2,5){XG51};
VAR4:=(((MA(CLOSE,N2) - CLOSE) / MA(CLOSE,N2)) * 100){XG51};
龙:=IF(CROSS(VAR2,VAR3) AND REF(VAR4,1) > M1 AND CLOSE > REF(CLOSE,1),100,0){XG51};
APP:=vol/((HIGH-LOW)*2-(ABS(CLOSE-OPEN))){XG51};
ASUPLY:=IF(CLOSE>OPEN,APP*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,APP*(HIGH-LOW),VOL/2)){XG51};
ADEMAND:=IF(CLOSE>OPEN,APP*(HIGH-LOW),IF(CLOSE<OPEN,APP*(HIGH-OPEN+CLOSE-LOW),VOL/2)){XG51};
RDEMAND:=IF(CLOSE>OPEN,APP*(CLOSE-OPEN),0){XG51};
RSUPLY:=IF(CLOSE<OPEN,APP*(OPEN-CLOSE),0){XG51};
RSDC:SUM(RDEMAND,N)/(SUM(RSUPLY,N)+SUM(RDEMAND,N))*100,POINTDOT,LINETHICK3,colorred{XG51};
ASDC:SUM(ADEMAND,N)/(SUM(ASUPLY,N)+SUM(ADEMAND,N))*100,POINTDOT,LINETHICK0{XG51};
80,POINTDOT,LINETHICK2{XG51};
20,POINTDOT,LINETHICK2{XG51};
STICKLINE(CROSS(rsdc,20),0,120,22,1),colorred{XG51};
DRAWICON(A5 and 趋势<底部 and rsdc<=22 or 龙=100,底部,7),ALIGN1;

input:N1(21,1,100),N2(34,1,100),M1(25,1,100),N(20,0,999){XG51};
底部:5,LINETHICK0,COLOR00FFFF{XG51};
趋势:5*SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),2,1){XG51};
抄底:CROSS(趋势,底部){XG51};
DRAWTEXTEX(趋势<底部,1,500,900,'勿用乃用，是小心谨慎，无不利。')colorred{XG51};
A1:=C/MA(C,40)*100,LINETHICK0{XG51};
A2:=C/MA(C,60)*100,LINETHICK0{XG51};
A3:=H>L*1.051{XG51};
A4:=A3 AND COUNT(A3,5)>1{XG51};
A5:=A4 AND (A1<76 OR A2<74) AND ABS(C-O)>0.1*0.1*REF(C,1){XG51};
伏击:-76,COLOR00FFFF,PRECISION0,LINETHICK0{XG51};
铁底:-74,COLORWHITE,PRECISION0,LINETHICK0{XG51};
A6:=IF(A1>90,90,A1){XG51};
A7:=IF(A2>90,90,A2){XG51};
VAR1:=(((CLOSE - MA(CLOSE,N1)) / STD(CLOSE,N1)) * 100){XG51};
VAR2:=EMA(VAR1,5){XG51};
VAR3:=EMA(VAR2,5){XG51};
VAR4:=(((MA(CLOSE,N2) - CLOSE) / MA(CLOSE,N2)) * 100){XG51};
龙:=IF(CROSS(VAR2,VAR3) AND REF(VAR4,1) > M1 AND CLOSE > REF(CLOSE,1),100,0){XG51};
APP:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN))){XG51};
ASUPLY:=IF(CLOSE>OPEN,APP*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,APP*(HIGH-LOW),VOL/2)){XG51};
ADEMAND:=IF(CLOSE>OPEN,APP*(HIGH-LOW),IF(CLOSE<OPEN,APP*(HIGH-OPEN+CLOSE-LOW),VOL/2)){XG51};
RDEMAND:=IF(CLOSE>OPEN,APP*(CLOSE-OPEN),0){XG51};
RSUPLY:=IF(CLOSE<OPEN,APP*(OPEN-CLOSE),0){XG51};
RSDC:SUM(RDEMAND,N)/(SUM(RSUPLY,N)+SUM(RDEMAND,N))*100,POINTDOT,LINETHICK3,coloryellow{XG51};
ASDC:SUM(ADEMAND,N)/(SUM(ASUPLY,N)+SUM(ADEMAND,N))*100,POINTDOT,LINETHICK0{XG51};
80,POINTDOT,LINETHICK1{XG51};
20,POINTDOT,LINETHICK1{XG51};
STICKLINE(CROSS(rsdc,20),0,60,8,1)colorred{XG51};
DRAWICON(A5 and 趋势<底部 and rsdc<=22 or 龙=100,底部,4),PXDN9{X-G?5.1-C-N-{};