恳请版主和高手把飞狐改成大智慧L2
MA1:MA(CLOSE,P1);
MA2:MA(CLOSE,P2);
MA3:MA(CLOSE,P3);
x:=20;
y:=2;
MID:=MA(CLOSE,x);
上:MID + y*STD(CLOSE,x),LINEDOT;
下:MID - y*STD(CLOSE,x),LINEDOT;
A1:=BARSLAST(ref(cross("macd.diff","macd.dea"),1));
B1:=ref(c,A1+1)>c and ref("macd.diff",A1+1)<"macd.diff"and cross("macd.diff","macd.dea");
DRAWTEXT(FILTER(B1>0,5),l-0.1,'M '),COLORGREEN;
A2:=BARSLAST(ref(cross("kdj.k","kdj.d"),1));
B2:=ref(c,A2+1)>c and ref("kdj.k",A2+1)<"kdj.k"and cross("kdj.k","kdj.d");
DRAWTEXT(FILTER(B2>0,5),l-0.25,'K '),COLORYELLOW;
A3:=BARSLAST(ref(cross("RSI.RSI1","RSI.RSI2"),1));
B3:=ref(c,A3+1)>c and ref("RSI.RSI1",A3+1)<"RSI.RSI1" and
cross("RSI.RSI1","RSI.RSI2");
DRAWTEXT(FILTER(B3>0,5),l-0.4,'R '),COLORCYAN;
C1:=BARSLAST(ref(cross("macd.dea","macd.diff"),1));
D1:=ref(c,C1+1)<c and ref("macd.diff",C1+1)>"macd.diff"and cross("macd.dea","macd.diff");
DRAWTEXT(FILTER(D1>0,5),h+0.1,'M '),COLORRED;
C2:=BARSLAST(ref(cross("kdj.d","kdj.k"),1));
D2:=ref(c,C2+1)<c and ref("kdj.k",C2+1)>"kdj.k"and cross("kdj.d","kdj.k");
DRAWTEXT(FILTER(D2>0,5),h+0.25,'K '),COLOR0066FF;
C3:=BARSLAST(ref(cross("RSI.RSI2","RSI.RSI1"),1));
D3:=ref(c,C3+1)<c and ref("RSI.RSI1",C3+1)>"RSI.RSI1"and cross("RSI.RSI2","RSI.RSI1");
DRAWTEXT(FILTER(D3>0,5),h+0.4,'R '),COLORMAGENTA;
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
LL:=REF(CLOSE,2);
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
DB:=IF(((MM < REF(MM,1)) AND (MM > 79)),MM,0);
DRAWTEXT(DB,(HIGH * 1.02),'○'),LINETHICK2,color00ff00;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
DD:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);
VAR3:=LLV(LOW,55);
VAR4:=HHV(HIGH,34);
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
VAR6:=((AK + VAR5) / 2);
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
VAR8:=EMA(VAR6,5);
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
AB:=CROSS(AK1,AK);
BB1:=(CROSS(AK1,BB) AND (BB < 30));
CD:=(BB1 * 0.6);
DRAWTEXT((CD = 0.6),(LOW * 0.99),'□'),LINETHICK2,color33CC99;
DRAWTEXT((AB = 1),(LOW * 0.99),'□'),LINETHICK2,colorwhite;
STICKLINE(CLOSE<OPEN and ref(CLOSE,1)>ref(OPEN,1),ref(close,1),ref(close,1),20,0),COLORFFFFFF;
A1:=BARSLAST(REF(CROSS("MACD.DIFF"(m,n,k),"MACD.DEA"(m,n,k)),1));
B1:=REF(C,A1+1)> C AND REF("MACD.DIFF"(m,n,k),A1+1)<"MACD.DIFF"(m,n,k)
AND CROSS("MACD.DIFF"(m,n,k),"MACD.DEA"(m,n,k));
C1:=BARSLAST(REF(CROSS("MACD.DEA"(m,n,k),"MACD.DIFF"(m,n,k)),1));
D1:=REF(C,C1+1)<C AND REF("MACD.DIFF"(m,n,9),C1+1)>"MACD.DIFF"(m,n,k) AND CROSS("MACD.DEA"(m,n,k),
"MACD.DIFF"(m,n,k));
Jm:=CROSS("Macd.DIFF"(m,n,k),"Macd.DEA"(m,n,k));
Jma:=CROSS("Macd.DEA"(m,n,k),"Macd.DIFF"(m,n,k));
Drawtext (Jm,l,'金叉'),colorwhite;{金叉}
Drawtext (Jma,h,'死叉'),coloryellow;{死叉}
JmCOUNT:=COUNT(Jm,BARSLAST("Macd.DEA"(m,n,k)>=0));
Jmtj:1*("Macd.DEA"(m,n,k)<0 and Count(JmCount=2,21)=1);
JmaCOUNT:=COUNT(Jma,BARSLAST("Macd.DEA"(m,n,k)>=0));
Jmatj:1*("Macd.DEA"(m,n,k)>0 and Count(JmaCount=2,21)=1);
Drawtext (Jmtj,l,'金叉金叉'),colorwhite;{macd二次金叉}
Drawtext (Jmatj,h,'死叉死叉'),colorwhite;{macd二次死叉}