文华亦步已趋源码
<p>以下是文华亦步已趋源码(无源码的请下载附件导入)</p><div class="con" id="rjsmad1"></div>
<p>X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);<br>
Y:=EMA(CLOSE,10);<br>
LL:=REF(CLOSE,2);<br>
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);<br>
DB:=IFELSE(((MM < REF(MM,1))&& (MM > 80)),MM,0);<br>
DRAWTEXT(CROSS(Y,X),L,'加'),COLORYELLOW;<br>
DRAWTEXT(DB,H+5,'卖'),COLORGREEN;<br>
VAR1:=LLV(LOW,21);<br>
VAR2:=HHV(HIGH,21);<br>
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);<br>
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);<br>
DD:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);<br>
VAR3:=LLV(LOW,55);<br>
VAR4:=HHV(HIGH,34);<br>
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);<br>
VAR6:=((AK + VAR5) / 2);<br>
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);<br>
VAR8:=EMA(VAR6,5);<br>
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);<br>
AB:=CROSS(AK1,AK);<br>
BB1:=(CROSS(AK1,BB) && (BB < 30));<br>
CD:=(BB1 * 0.6);<br>
DRAWTEXT((CD = 0.6),L,'买'),COLORLIGHTRED;</p>
<p>TMP:=OPEN-CLOSE;<br>
DRAWLINE(TMP>0.00001,HIGH,TMP>0.00001,OPEN,COLORCYAN);<br>
DRAWLINE(TMP>0.00001,LOW,TMP>0.00001,CLOSE,COLORCYAN);<br>
DRAWLINE(TMP<-0.00001,HIGH,TMP<-0.00001,CLOSE,COLORRED);<br>
DRAWLINE(TMP<-0.00001,LOW,TMP<-0.00001,OPEN,COLORRED);<br>
DRAWLINE(ABS(TMP)<0.00001,LOW,ABS(TMP)<0.00001,OPEN,COLORWHITE);<br>
DRAWLINE(ABS(TMP)<0.00001,HIGH,ABS(TMP)<0.00001,OPEN,COLORWHITE);<br>
STICKLINE(TMP>0,OPEN,CLOSE,COLORCYAN,0);<br>
STICKLINE(TMP<=0,OPEN,CLOSE,COLORRED,1);</p>
<p> </p>
页:
[1]