各位高手、我有幾個在飛狐里面的指標(biāo)、覺得挺好用.但是飛狐軟件又不太想用.想用通達(dá)信、可以幫我把這三個指標(biāo)轉(zhuǎn)過來不?
萬分感謝~不好意思、要求還挺多
第一個
DRAWGBK(1, COLORRGB(0,0,30),COLORRGB(0,0,100),1);
//MACD金叉
DIFF:=EMA(CLOSE,N3) - EMA(CLOSE,N4);
DEA:=EMA(DIFF,N2);
DRAWICON(DIFF>DEA,1,4);
DRAWICON(DIFF<DEA,1,5);
DRAWTEXTEX(1,1,980,950,'MACD');
A1:=DIFF>DEA;
//KDJ金叉
RSV:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100;
K:=SMA(RSV,N1,1);
D:=SMA(K,N1,1);
DRAWICON(K>D,2,4);
DRAWICON(K<D,2,5);
DRAWTEXTEX(1,1,980,770,'KDJ');
A2:=K>D;
//RSI金叉
LC:= REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),N4,1)/SMA(ABS(CLOSE-LC),N4,1)*100;
DRAWICON(RSI1>RSI2,3,4);
DRAWICON(RSI1<RSI2,3,5);
DRAWTEXTEX(1,1,980,560,'RSI');
A3:=RSI1>RSI2;
//LW&R金叉
RSV:=-(HHV(HIGH,N4)-CLOSE)/(HHV(HIGH,N4)-LLV(LOW,N4))*100;
LWR1:=SMA(RSV,N1,1);
LWR2:=SMA(LWR1,N1,1);
DRAWICON(LWR1>LWR2,4,4);
DRAWICON(LWR1<LWR2,4,5);
DRAWTEXTEX(1,1,980,370,'LW&R');
A4:=LWR1>LWR2;
//BBI金叉
BBI:=(MA(CLOSE,N1)+MA(CLOSE,N2)+MA(CLOSE,N3)+MA(CLOSE,N4))/4;
DRAWICON(C>BBI,5,4);
DRAWICON(C<BBI,5,5);
DRAWTEXTEX(1,1,980,170,'BBI');
A5:=C>BBI;
//ZLMM金叉
mtm:=c-ref(c,1);
mmS:=100*ema(ema(mtm,n2),n1)/ema(ema(abs(mtm),n2),n1);
mmM:=100*ema(ema(mtm,n4),n3)/ema(ema(abs(mtm),n4),n3);
DRAWICON(MMS>MMM,6,4);
DRAWICON(MMS<MMM,6,5);
DRAWTEXTEX(1,1,980,-15,'ZLMM');
A6:=MMS>MMM;
//
//買點
TOTAL:=A1 AND A2 AND A3 AND A4 AND A5 AND A6;
VERTLINE(TOTAL),COLORYELLOW;
持股:TOTAL,COLORCYAN;
買入:((TOTAL)=1 and REF(TOTAL,1)=0)*2,COLORRED,LINETHICK1;
DRAWICON(DIFF>DEA,1,4);
DRAWICON(DIFF<DEA,1,5);
DRAWICON(K>D,2,4);
DRAWICON(K<D,2,5);
DRAWICON(RSI1>RSI2,3,4);
DRAWICON(RSI1<RSI2,3,5);
DRAWICON(LWR1>LWR2,4,4);
DRAWICON(LWR1<LWR2,4,5);
DRAWICON(C>BBI,5,4);
DRAWICON(C<BBI,5,5);
DRAWICON(MMS>MMM,6,4);
DRAWICON(MMS<MMM,6,5);
第二個
流通:=(AMOUNT / VOL);
PJJ:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH - LOW)),IF((CLOSE < OPEN),(QJJ * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))) + IF((CLOSE > OPEN),(0 - (QJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (QJJ * (HIGH - LOW))),(0 - (VOL / 2)))));
ZLL:=(VOL / CAPITAL);
HSL1:=IF((ZLL > 10),10,ZLL);
HSL:=((XVL / 20) / 1.15);
攻擊流量:=(((HSL * 0.55) + (REF(HSL,1) * 0.33)) + (REF(HSL,2) * 0.22));
STICKLINE(((HSL * 0.4) >= 0),((HSL * 0.4) * 1.5),0,1,0),color808080;
STICKLINE(((HSL * 0.4) < 0),((HSL * 0.4) * 1.5),0,1,0),color808080;
GJJ:=EMA(攻擊流量,8);
LLJX:=EMA(攻擊流量,3);
資金流量:LLJX,LINETHICK0;
STICKLINE((資金流量 > 0),資金流量,0,7,0),colorFFff00;
STICKLINE((資金流量 < 0),資金流量,0,7,0),colorFF0000;
流量基線:GJJ;
wz:=if(流量基線>=0,-50,流量基線-800);
ZJLL:=REF(LLJX,1);
QZJJ:=(((LLJX - ZJLL) / ZJLL) * 100);
流量增幅:IF(((LLJX > 0) AND (ZJLL < 0)),ABS(QZJJ),IF((((LLJX < 0) AND (ZJLL < 0)) AND (LLJX < ZJLL)),(0 - QZJJ),QZJJ)),LINETHICK0;
力度:(HSL / 1000),LINETHICK0 ;
周流量:SUM(LLJX,5),LINETHICK0 ;
BB:=REF(周流量,1);
ZQZJJ:=(((周流量 - BB) / BB) * 100);
周增幅:IF(((周流量 > 0) AND (BB < 0)),ABS(ZQZJJ),IF((((周流量 < 0) AND (BB < 0)) AND (周流量 < BB)),(0 - ZQZJJ),ZQZJJ)),LINETHICK0 ;
0,color808080;
周增幅11:周增幅>REF(周增幅,1);
DRAWICON(周增幅11,wz,1);
tj:=資金流量<0 and 周增幅11;
scsj:=ref(BARSLAST(tj),1);
tjsj:=sum(資金流量>0,scsj+1)>=1;
var31:=BARSLAST(tj=1 and tjsj=1);
stickline(var31=2,0,3,8,0),color0000ff;
drawtext(var31=2,3,'3天'),coloryellow;
stickline(var31=4,0,3,8,0),color0000ff;
drawtext(var31=4,3,'5天'),coloryellow;
stickline(var31=7,0,3,8,0),color0000ff;
drawtext(var31=7,3,'8天'),coloryellow;
stickline(var31=12,0,3,8,0),color0000ff;
drawtext(var31=12,3,'13天'),coloryellow;
stickline(var31=20,0,3,8,0),color0000ff;
drawtext(var31=20,3,'21天'),coloryellow;
stickline(var31=33,0,3,8,0),color0000ff;
drawtext(var31=33,3,'34天'),coloryellow;
stickline(var31=54,0,3,8,0),color0000ff;
drawtext(var31=54,3,'55天'),coloryellow;
stickline(var31=88,0,3,8,0),color0000ff;
drawtext(var31=88,3,'89天'),coloryellow;
stickline(var31=143,0,3,8,0),color0000ff;
drawtext(var31=143,3,'144天'),coloryellow;
stickline(var31=232,0,3,8,0),color0000ff;
drawtext(var31=232,3,'233天'),coloryellow;
stickline(var31=376,0,3,8,0),color0000ff;
drawtext(var31=376,3,'377天'),coloryellow;
第三個
S:=('股票代碼:' + STKLABEL);
DRAWTEXT((SYSPARAM(2) = BARPOS),CLOSE,S),ALIGN4,Color0000FF;
DRAWTEXT((BARPOS = SYSPARAM(2)),HIGH,(((((((((((((((((((((((((((((((((' 所屬板塊:' + BLKNAME) + '\n※\n') + '發(fā)行價') + NUMTOSTR(FINANCE(51),2)) + '元') + ' 發(fā)行量') + NUMTOSTR(FINANCE(52),2)) + '萬股') + ' 總股本') + NUMTOSTR(FINANCE(1),0)) + '萬股')
+ ' 流通A股') + NUMTOSTR(FINANCE(7),0)) + '萬股') + ' 凈資產(chǎn)') + NUMTOSTR(FINANCE(35),2)) + '億元') + ' 每股收益') + NUMTOSTR(FINANCE(33),2)) + '元') + ' 每股未分配') + NUMTOSTR(FINANCE(32),2)) + '元')
+ '\n※\n') + '市盈率') + NUMTOSTR(DYNAINFO(39),2)) + '%') + ' 投資收益') + NUMTOSTR(FINANCE(24),2)) + '元') + ' 股東總數(shù)') + NUMTOSTR(FINANCE(50),0)) + '戶')),ALIGN4,color009999;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,9,0),colorFF5B00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8,0),colorFF6C00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,0),colorFF7B00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,6,0),colorFF9C00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,5,0),colorFFBE00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,3.5,0),colorFFCC00;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1.5,0),colorFFFF00;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,9,0),color070084;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,8,0),color0000A3;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,7,0),color0000B7;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,6,0),color0000CD;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,5,0),color0000E9;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,3,0),color0754E9;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1.5,0),color076EF3;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),color077BF3;
STICKLINE((CLOSE > OPEN),OPEN,LOW,1,0),color0726CA;
STICKLINE((CLOSE > OPEN),CLOSE,HIGH,1,0),color0726CA;
STICKLINE((OPEN > CLOSE),CLOSE,LOW,1,0),colorDE9100;
STICKLINE((OPEN > CLOSE),OPEN,HIGH,1,0),colorDE9100;
D:=EMA((C*3+H+L+O)/6,5);
買賣:D,color00ff00;
A線:HHV(D,13),color0000ff ,linethick2;
B線:LLV(D,13),colorff0000 ,linethick2;
VAR1:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR2:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR1>0),91,0);
DRAWTEXT(FILTER((VAR2>90),34),(LOW)*(0.99),'←※強(qiáng)攻'),Color00FFFF;
S1:=SMA(CLOSE,3,1);
S2:=SMA(CLOSE,21,1);
S3:=CROSS(S1,S2);
DRAWTEXT(S3,(LOW)*(0.99),'←※關(guān)注'),Color0000FF;
var3:=(c-ma(c,24))/ma(c,24)*100;
反轉(zhuǎn)點:=FILTER(CROSS(var3,-20),10); ;
DRAWTEXT(反轉(zhuǎn)點,(LOW)*(0.99),'←※反轉(zhuǎn)'),Color00FF00;
x1:=(C+L+H)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),(LOW)*(0.99),'←∠45°'),color009999;
sj:=datacount-sysparam(1);
fc:=v;
for i=sj to datacount do
begin
XL:=0;
for j=0 to sj do XL:=XL+fc[i-j];
man := XL;
end;
hs:=100*XL/CAPITAL;
DRAWTEXTEX(c,1,1,200,'■倒算累加換手:'+NUMTOSTR(hs,2)+'(%)'),align4,Color0000FF;
bj:=c/indexc*1000;
qs:=bj>ref(bj,1);
rs:=bj<=ref(bj,1);
explain(qs,'解盤:個股走勢:強(qiáng)于大盤'),colorff;
explain(rs,'解盤:個股走勢:弱于大盤'),colorff00;
explainicon(c>0,'ggjszt'),align1;
日k:="KDJ.K#day"(20,5,5);
日d:="KDJ.D#day"(20,5,5);
周k:="KDJ.K#week"(9,3,3);
周d:="KDJ.D#week"(9,3,3);
explainex(日k>0,'解盤:日K=',日k,2,0),colorff0000;
explain(日k<=20,'解盤:日線KD指標(biāo)位置:低位'),colorff;
explain(日k>20 and 日k<50,'解盤:日線KD指標(biāo)位置:中低'),colorff;
explain(日k>50 and 日k<80,'解盤:日線KD指標(biāo)位置:中高'),colorff00;
explain(日k>=80,'解盤:日線KD指標(biāo)位置:高位'),colorff00;
explainex(周k>0,'解盤:周K=',周k,2,0),colorff;
explain(周k<=20,'解盤:周線KD指標(biāo)位置:低位'),colorff;
explain(周k>20 and 周k<50,'解盤:周線KD指標(biāo)位置:中低'),colorff;
explain(周k>50 and 周k<80,'解盤:周線KD指標(biāo)位置:中高'),colorff00;
explain(周k>=80,'解盤:周線KD指標(biāo)位置:高位');
explain(cross(日k,日d),'解盤:日K與日D今日金叉'),colorff;
explain(cross(日d,日k),'解盤:日K與日D今日死叉'),colorff00;
explain(cross(周k,周d),'解盤:周K與周D今日金叉'),colorff;
explain(cross(周d,周k),'解盤:周K與周D今日死叉'),colorff00;
explainicon(c>0,'szczzy'),align1;
r:=ref(c,1)/c;
qy:=v;
qtt:=qy*r;
tl:=filter(v=hhv(v,20),20);
dl:=filter(v=llv(v,20),20);
xd:=filter(l=llv(l,20),20);
xg:=filter(h=hhv(h,20),20);
aq標(biāo)準(zhǔn)攻擊量:=qtt*1.15;
hq危險成交量:=qtt*1.5;
lq防守量:=qtt*0.75;
ahq平均高量:=(aq標(biāo)準(zhǔn)攻擊量+hq危險成交量)/2;
alq平均低量:=(aq標(biāo)準(zhǔn)攻擊量+lq防守量)/2;
市場實際量能:=qy;
explainex(hq危險成交量,'解盤:次日攻擊危險量=',hq危險成交量,0,0),colorff;
explainex(aq標(biāo)準(zhǔn)攻擊量,'解盤:次日攻擊標(biāo)準(zhǔn)量=',aq標(biāo)準(zhǔn)攻擊量,0,0),colorff0000;
explainex(lq防守量,'解盤:次日攻擊防守量=',lq防守量,0,0),colorff00;
explainex(tl,'解盤:今日為20日最大量=',v,0,0),colorff;
explainex(dl,'解盤:今日為20日最小量=',v,0,0),colorff00;
explainex(xd,'解盤:今日為20日最低價格=',l,2,0),colorff00;
explainex(xg,'解盤:今日為20日最高價格=',l,2,0),colorff;
pt:=ref(h,1)-ref(l,1);
cdp:=(h+l+2*c)/4;
ah:=cdp+pt;
al:=cdp-pt;
nh敏感阻力:=2*cdp-l;
nl:=2*cdp-h;
explainex(ah,'解盤:次日重大阻力價位=',ah,2,0),colorff00;
explainex(nh敏感阻力,'解盤:次日敏感阻力區(qū)域=',nh敏感阻力,2,0),colorffff;
explainex(cdp,'解盤:次日關(guān)鍵均衡價位=',cdp,2,0),colorffffff;
explainex(nl,'解盤:次日重要支撐區(qū)域=',nl,2,0),colorff0000;
explainex(al,'解盤:次日關(guān)鍵支撐價位=',al,2,0),colorff;
explainicon(c>0,'szczxh'),align1;
var0:=ref(c,1)-ref(o,1);
var1:=ref(o,1);
var2:=c>=var1*1.05;
var3:=c>=2*var0/3*var1 and c<=var1*1.05;
var4:=c<var0*2/3*var1;
explainex(var2,'解盤:個股目前態(tài)勢:超級強(qiáng)勢。漲幅 %f %',(c-ref(c,1))/ref(c,1)*100,1,0),colorff00ff;
explainex(var3,'解盤:個股目前態(tài)勢:強(qiáng)勢。漲幅 %f %',(c-ref(c,1))/ref(c,1)*100,1,0),colorff;
explainex(var4,'解盤:個股目前態(tài)勢:弱勢。漲幅 %f %',(c-ref(c,1))/ref(c,1)*100,1,0),colorff00;
b1:=(c-ma(c,30))/ma(c,30)*100<-12;
b3:=(c-ma(c,30))/ma(c,30)*100>15;
b:=(c-ma(c,30))/ma(c,30)*100;
explainex(b<-18 and c/o>1.06,'解盤:搶反彈!負(fù)乖離偏大,小單進(jìn)場。此刻30日乖離率=',b,2,1),colorff;
explainex(b>40 and c/ref(c,1)<1.08,'解盤:高拋!正乖離偏大,按照短線技術(shù)系統(tǒng)高拋:',b,2,0),colorff00;
explainex(not(b<-18 and c/o>1.06) or not(b>40 and c/ref(c,1)<1.08),'解盤:此刻30日乖離率=',b,2,0),colorffff;
DRAWTEXT((SYSPARAM(1) = BARPOS),CLOSE,'提示:點位作參考 買賣看變線'),ALIGN5,color0000FF;
var31:=hhvbars(zig(3, 19)>ref(zig(3,19),1)
and ref(zig(3,19), 1)<ref(zig(3,19), 2),0);
stickline(var31=2,l*0.95,l*0.98,8,0),color0000ff;
drawtext(var31=2,l*0.95,'3天'),coloryellow;
stickline(var31=4,h*1.05,h*1.02,8,0),color9966ff;
drawtext(var31=4,h*1.06,'5天'),coloryellow;
stickline(var31=7,l*0.95,l*0.98,8,0),color00ffff;
drawtext(var31=7,l*0.95,'8天'),coloryellow;
stickline(var31=12,h*1.05,h*1.02,8,0),colorff33ff;
drawtext(var31=12,h*1.06,'13天'),coloryellow;
stickline(var31=20,l*0.95,l*0.98,8,0),color0066ff;
drawtext(var31=20,l*0.95,'21天'),coloryellow;
stickline(var31=33,h*1.05,h*1.02,8,0),colorffff00;
drawtext(var31=33,h*1.06,'34天'),coloryellow;
stickline(var31=54,l*0.95,l*0.98,8,0),color006600;
drawtext(var31=54,l*0.95,'55天'),coloryellow;
stickline(var31=88,h*1.05,h*1.02,8,0),color00ff00;
drawtext(var31=88,h*1.06,'89天'),coloryellow;
stickline(var31=143,l*0.95,l*0.98,8,0),colorccffff;
drawtext(var31=143,l*0.95,'144天'),coloryellow;
stickline(var31=232 ,h*1.05,h*1.02,8,0),colorff0033;
drawtext(var31=232,h*1.06,'233天'),coloryellow;
stickline(var31=376,l*0.95,l*0.98,8,0),colorff9966;
drawtext(var31=376,l*0.95,'377天'),coloryellow;
QH:=REF(H,2);
QL:=REF(L,2);
QO:=REF(O,2);
QC:=REF(C,2);
ZO:=REF(O,1);
ZC:=REF(C,1);
ma30:ma(c,30);
JYZHK:= ABS(QO-QC)/QO<0.02 AND ZO/ZC>1.02 AND ABS(O-C)/O<0.02 AND C>MA30;
JYZHV:=V<REF(V,1) ;
JYZH:=JYZHK AND JYZHV;
DRAWTEXT(JYZH,L,'金印');
input: N(21,13,89);
雷達(dá)壓力線:DRAWLINE(h=hhv(H,n),H,barpos=sysparam(1),H,1),COLORYELLOW;
雷達(dá)支撐線:DRAWLINE(l=llv(l,n),l,barpos=sysparam(1),l,1),COLORYELLOW;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
Var3:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
Var4:=SMA(VARF,3,1);
Var5:=(REF(Var3,1)>=5) AND CROSS(VARJ,VARE) AND (Var4>79);
DRAWTEXT(FILTER((REF(Var3,1)>=5) AND CROSS(VARJ,VARE) AND (Var4>Var5),5),h*1.02,'☆'),colorgreen;
均價:=(3*C+H+L+O)/6;
VAR11:=(8*均價+7*REF(均價,1)+6*REF(均價,2)+5*REF(均價,3)+4*REF(均價,4)+3*REF(均價,5)+2*REF(均價,6)+REF(均價,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR11;
立樁量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(立樁量)),REF(HIGH,BARSLAST(立樁量)),6,0),COLORCYAN;
STICKLINE(CLOSE,REF(LOW,BARSLAST(立樁量)),REF(LOW,BARSLAST(立樁量)),6,0),COLORGREEN;
TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法則:=TJ3=1;
成立:=三天法則 AND 突破;
條件成立:=FILTER(成立,3);
DRAWTEXT(條件成立,L*0.99,'成立'),COLORYELLOW;
此主題相關(guān)圖片如下snap1.jpg: