咨詢內容：
老師您好，幫忙把文華改成博弈的
E5:=EMA(C,5);
E13:=EMA(C,13);
DRAWKLINE1(H,O,L,C);
平衡:EMA(C,20),COLORYELLOW;
上軌:平衡 + 2*STD(C,20),LINETHICK2,COLORMAGENTA;
下軌:平衡 - 2*STD(C,20),LINETHICK3,COLORGREEN;
上:=EMA(C,3),COLORBLUE,LINETHICK1;
中:=EMA(C,5),COLORWHITE,LINETHICK1;
下:=EMA(中,5),COLOR00FF00,LINETHICK1;
IF(上>中 AND 上>REF(上,1), 上,NULL),LINETHICK2,COLORRED;
IF(中>下 AND 中>REF(中,1), 中,NULL),LINETHICK2,COLORRED;
QQ:= C<中;
MM:=上>REF(上,1) AND REF(上,1)<REF(上,2) ;
VAR1W:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2W:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3W:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWTEXT(CROSS(VAR2W,MA(VAR3W,6)),LOW -0.6,'(買)'),COLORFF99FF;
DRAWTEXT(CROSS(MA(VAR3W,6),VAR1W),HIGH +0.9,'(賣)'),COLORCCFF13;
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
STICKLINE(VAR3P>90,L,L*0.92,1,1),COLORFF00FF;
DRAWTEXT(VAR3P>90,LOW*0.92,'追漲'),COLORFF00FF;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);?
V2:=(1-7/100)*(DMA(CLOSE,V1));
V3:=(1+7/100)*(DMA(CLOSE,V1));
V5:=MA((LOW+HIGH+CLOSE)/3,5);
MA1:=EMA(CLOSE,5);
MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
MA3:=IF(MA2>0,MA2,MA2);
MA5:MA(C,5);
MA25:=MA(C,25),COLORGREEN,LINETHICK2;
VAR1:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3))?
OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND?
REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND?
C>=REF(C,1) AND C>=REF(C,2);
//收盤價=4日內收盤價的最高值 AND 昨收>=2日前的收盤價
VAR2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
//收盤價=4日內收盤價的最高值 AND 昨收=4日內收盤價的最低值
VAR3:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR?
REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND?
REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND?
C<REF(C,1) AND C<REF(C,2);
//收盤價=4日內收盤價的最低值 AND (昨收<2日前的收盤價
VAR4:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND?
REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);
STICKLINE1(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
STICKLINE1(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
STICKLINE1(OPEN>=CLOSE,CLOSE,OPEN,3.3,0),COLORFF6600;
STICKLINE1(OPEN>=CLOSE,CLOSE,OPEN,2.4,0),COLORFF8800;
STICKLINE1(OPEN>=CLOSE,CLOSE,OPEN,1.3,0),COLORFFAA00;
STICKLINE1(OPEN>=CLOSE,CLOSE,OPEN,0.6,0),COLORFFCC00;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,3.3,0),COLOR000099;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,2.4,0),COLOR0000BB;
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,1.3,0),COLOR0000DD;?
STICKLINE1(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLOR0000FF;
??
STICKLINE1(VAR3,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR009900;?
STICKLINE1(VAR3,OPEN,(OPEN+CLOSE)/2,2.4,0),COLOR00BB00; ?
STICKLINE1(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
STICKLINE1(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR999999;
STICKLINE1(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB; ? ? ??
STICKLINE1(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,1.3,0),COLORDDDDDD; ? ??
STICKLINE1(VAR4 AND MM,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
AA10:=MA(CLOSE,8),COLOR0000FF;
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
均線３０:=MA(CLOSE,30);
均線８９:=MA(CLOSE,89);
均線:=MA(CLOSE,16);
DRAWTEXT((((((OPEN <= 均線) AND ((均線３０ - REF(均線３０,1)) > 0))?
AND (CLOSE > 均線８９)) AND (BB10 > 1)) AND ((CLOSE / OPEN) > 1.04)),
LOW,'←天馬過橋'),COLORCC99FF;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;//收盤價與N周期最低值做差，N周期最高值與N周期最低值做差，兩差之間做比值。
K1:=SMA(RSV,3,1);//RSV的移動平均值
D1:=SMA(K1,3,1);//K的移動平均值
J1:=3*K1-2*D1;
角線:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);
角線MA:=MA(角線,5);
ANA:=VALUEWHEN(CROSS(角線,角線MA),角線MA),COLORRED;
ANB:=VALUEWHEN(CROSS(角線MA,角線),角線MA),COLORFF00FF ;
角買點:=CROSS(角線,角線MA) AND ((ANB>REF(ANB,1) AND ANB>ANA AND 角線MA<=0) OR ((角線MA<=-45 OR CROSS(角線MA,-45)) AND (ANB<-60 OR LLV(J1,3)<=-49) AND ANB>0)),COLORGREEN;
角起漲:=COUNT(CROSS(角線,角線MA),ANA<REF(ANA,5) AND ANB>REF(ANB,5));
角賣點:=(CROSS(角線MA,角線) AND (ANB>REF(ANB,1) OR ANA<REF(ANA,1)) AND ANB>ANA{AND ANB>0} AND 角線MA>0)*1;
角始跌:=COUNT(CROSS(角線MA,角線),ANA<REF(ANA,5) AND ANB>REF(ANB,5));
DRAWTEXT(角買點,L,'━━角買'),COLOR00FFFF;
//2、
A1:=ABS((EMA(CLOSE, 5) - EMA(CLOSE, 10))) * 628;
A2:=A1 / CLOSE;
超短線1:IF((A1<A2),1,0),LINETHICK2,COLORRED;
A3:=REF(CLOSE,1);
A4:=SMA(MAX((CLOSE - A3),0), 8, 1) / SMA(ABS((CLOSE - A3)), 8.000, 1) * 100;
A5:=SMA(MAX((CLOSE - A3),0), 55, 1) / SMA(ABS((CLOSE - A3)), 55.000, 1) * 100;
超短線2:(((A4<= 20) AND (A5 <= 49)) * 1),LINETHICK2,COLORYELLOW;
超賣1: IF(SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(ABS(CLOSE- REF(CLOSE,2))
,7,1)*100<12,0.5,0),LINETHICK2,COLOR00FF00;
超賣2: IF(SMA(MAX(CLOSE-REF(CLOSE,1),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,1))
,7,1)*100 <12,0.5,0),LINETHICK2,COLORF00FF0;
//3、
DFO:=(C-REF(C,1))/REF(C,1)*100<-5;
AAO:=BARSLAST(DFO); ? ? ? ? ? ? ??
突破箱體:=CROSS(C,REF(O,AAO));
抄底買點: 突破箱體,LINETHICK4,COLORRED;
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);//短周期與長周期的收盤價的指數平滑移動平均值做差。
DEA ?:= EMA(DIFF,9);//DIFF的M個周期指數平滑移動平均
XXX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(XXX,3,1);
D:=SMA(K,3,1);
叉1:=CROSS(K,D);
AA:=DIFF;
AB:=DEA;
叉2:=CROSS(AA,AB);
金塔叉:叉1 AND 叉2;
STICKLINE(金塔叉,0,1.3,1,0),COLOR00FFFF;
DRAWTEXT(金塔叉,1,'金塔'),COLOR00FFFF;
?
?來源:程序化99網（ www.kzuj.com.cn ）
博易技術人員：
這個公式分三段，應該不能疊加在一起，數值相差比較大。
E5:=EMA(C,5);
E13:=EMA(C,13);
DRAWKLINE(H,O,L,C);
平衡:EMA(C,20),COLORYELLOW;
上軌:平衡+2*STD(C,20),LINETHICK2,COLORMAGENTA;
下軌:平衡-2*STD(C,20),LINETHICK3,COLORGREEN;
上:=EMA(C,3),COLORBLUE,LINETHICK1;
中:=EMA(C,5),COLORWHITE,LINETHICK1;
下:=EMA(中,5),COLOR00FF00,LINETHICK1;
IF(上>中AND上>REF(上,1),上,DRAWNULL),LINETHICK2,COLORRED;
IF(中>下AND中>REF(中,1),中,DRAWNULL),LINETHICK2,COLORRED;
QQ:=C<中;
MM:=上>REF(上,1)ANDREF(上,1)<REF(上,2);
VAR1W:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));
VAR2W:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));
VAR3W:=(100-MA(((100*(HHV(HIGH,6)-CLOSE))/(HHV(HIGH,6)-LLV(LOW,6))),34));
DRAWTEXT(CROSS(VAR2W,MA(VAR3W,6)),LOW-0.6,'(買)'),COLORFF99FF;
DRAWTEXT(CROSS(MA(VAR3W,6),VAR1W),HIGH+0.9,'(賣)'),COLORCCFF13;
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050ANDHIGH/CLOSE<1.010ANDIF(CLOSE>REF(CLOSE,1),88,0)>0,91,0);
STICKLINE(VAR3P>90,L,L*0.92,1,1),COLORFF00FF;
DRAWTEXT(VAR3P>90,LOW*0.92,'追漲'),COLORFF00FF;
V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);?
V2:=(1-7/100)*(DMA(CLOSE,V1));
V3:=(1+7/100)*(DMA(CLOSE,V1));
V5:=MA((LOW+HIGH+CLOSE)/3,5);
MA1:=EMA(CLOSE,5);
MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
MA3:=IF(MA2>0,MA2,MA2);
MA5:MA(C,5);
MA25:=MA(C,25),COLORGREEN,LINETHICK2;
VAR1:=CLOSE=HHV(C,4)AND(REF(C,1)>=REF(C,2)ORREF(C,1)>=REF(C,3))?
ORREF(C,1)=HHV(C,4)ANDCLOSE>=REF(C,2)ORREF(C,2)=HHV(C,4)AND?
REF(C,3)=LLV(C,4)ANDC>=REF(C,1)ORREF(C,3)=HHV(C,4)AND?
C>=REF(C,1)ANDC>=REF(C,2);
//收盤價=4日內收盤價的最高值AND昨收>=2日前的收盤價
VAR2:=CLOSE=HHV(C,4)ANDREF(C,1)=LLV(C,4);
//收盤價=4日內收盤價的最高值AND昨收=4日內收盤價的最低值
VAR3:=CLOSE=LLV(C,4)AND(REF(C,1)<REF(C,2)ORREF(C,1)<REF(C,3))OR?
REF(C,1)=LLV(C,4)ANDC<REF(C,2)ORREF(C,2)=LLV(C,4)AND?
REF(C,1)=HHV(C,4)ANDC<REF(C,1)ORREF(C,3)=LLV(C,4)AND?
C<REF(C,1)ANDC<REF(C,2);
//收盤價=4日內收盤價的最低值AND(昨收<2日前的收盤價
VAR4:=REF(C,1)=LLV(C,4)ANDC>=REF(C,2)ORREF(C,2)=LLV(C,4)AND?
REF(C,1)<=REF(C,3)ANDREF(C,2)<REF(C,4)ANDC>=REF(C,1);
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985ANDCLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015ANDCLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.3,0),COLORFF6600;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.4,0),COLORFF8800;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.3,0),COLORFFAA00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.6,0),COLORFFCC00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.3,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4,0),COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.3,0),COLOR0000DD;?
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLOR0000FF;
??
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR009900;?
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,2.4,0),COLOR00BB00;?
STICKLINE(VAR3,OPEN,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
STICKLINE(VAR4ANDMM,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR999999;
STICKLINE(VAR4ANDMM,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;????
STICKLINE(VAR4ANDMM,OPEN,(OPEN+CLOSE)/2,1.3,0),COLORDDDDDD;???
STICKLINE(VAR4ANDMM,OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
AA10:=MA(CLOSE,8),COLOR0000FF;
BB10:=((ATAN((AA10-REF(AA10,1)))*3.1416)*10);
均線３０:=MA(CLOSE,30);
均線８９:=MA(CLOSE,89);
均線:=MA(CLOSE,16);
DRAWTEXT((((((OPEN<=均線)AND((均線３０-REF(均線３０,1))>0))?
AND(CLOSE>均線８９))AND(BB10>1))AND((CLOSE/OPEN)>1.04)),
LOW,'←天馬過橋'),COLORCC99FF;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;//收盤價與N周期最低值做差，N周期最高值與N周期最低值做差，兩差之間做比值。
K1:=SMA(RSV,3,1);//RSV的移動平均值
D1:=SMA(K1,3,1);//K的移動平均值
J1:=3*K1-2*D1;
角線:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);
角線MA:=MA(角線,5);
ANA:=VALUEWHEN(CROSS(角線,角線MA),角線MA),COLORRED;
ANB:=VALUEWHEN(CROSS(角線MA,角線),角線MA),COLORFF00FF;
角買點:=CROSS(角線,角線MA)AND((ANB>REF(ANB,1)ANDANB>ANAAND角線MA<=0)OR((角線MA<=-45ORCROSS(角線MA,-45))AND(ANB<-60ORLLV(J1,3)<=-49)ANDANB>0)),COLORGREEN;
角起漲:=COUNT(CROSS(角線,角線MA),ANA<REF(ANA,5)ANDANB>REF(ANB,5));
角賣點:=(CROSS(角線MA,角線)AND(ANB>REF(ANB,1)ORANA<REF(ANA,1))ANDANB>ANA{ANDANB>0}AND角線MA>0)*1;
角始跌:=COUNT(CROSS(角線MA,角線),ANA<REF(ANA,5)ANDANB>REF(ANB,5));
DRAWTEXT(角買點,L,'━━角買'),COLOR00FFFF;
//2、
A1:=ABS((EMA(CLOSE,5)-EMA(CLOSE,10)))*628;
A2:=A1/CLOSE;
超短線1:IF((A1<A2),1,0),LINETHICK2,COLORRED;
A3:=REF(CLOSE,1);
A4:=SMA(MAX((CLOSE-A3),0),8,1)/SMA(ABS((CLOSE-A3)),8.000,1)*100;
A5:=SMA(MAX((CLOSE-A3),0),55,1)/SMA(ABS((CLOSE-A3)),55.000,1)*100;
超短線2:(((A4<=20)AND(A5<=49))*1),LINETHICK2,COLORYELLOW;
超賣1:IF(SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,2))
,7,1)*100<12,0.5,0),LINETHICK2,COLOR00FF00;
超賣2:IF(SMA(MAX(CLOSE-REF(CLOSE,1),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,1))
,7,1)*100<12,0.5,0),LINETHICK2,COLORF00FF0;
//3、
DFO:=(C-REF(C,1))/REF(C,1)*100<-5;
AAO:=BARSLAST(DFO);????????
突破箱體:=CROSS(C,REF(O,AAO));
抄底買點:突破箱體,LINETHICK4,COLORRED;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);//短周期與長周期的收盤價的指數平滑移動平均值做差。
DEA?:=EMA(DIFF,9);//DIFF的M個周期指數平滑移動平均
XXX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(XXX,3,1);
D:=SMA(K,3,1);
叉1:=CROSS(K,D);
AA:=DIFF;
AB:=DEA;
叉2:=CROSS(AA,AB);
金塔叉:叉1AND叉2;
STICKLINE(金塔叉,0,1.3,1,0),COLOR00FFFF;
DRAWTEXT(金塔叉,1,'金塔'),COLOR00FFFF;
來源 程序化久久網
打印本文
關閉窗口