指标功能：[B]国产软件[/B]
指标类型：简体中文
所需积分：0
推荐星级：
授权方式：共享版
公式大小：0 Bytes
更新时间：2011-02-06 09:43:00
公式简介:

看了一发千钧老师的指标千钧指点江山，实际就是个黄金分割线，但可是随光标移动，闲来无事，把无用代码去掉，直接可用，如有不当，请一发千钧老师见谅。

修改过的代码：
STICKLINE(c=o and c>ref(c,1),c,o,6,0),COLOR0000ee;
STICKLINE(C>O,h,l,0,0),COLOR0000ee;
STICKLINE(C>O,O,C,8,0),COLOR0000aa;STICKLINE(C>O,O,C,5,0),COLOR0000cc;
STICKLINE(C>O,O,C,3,0),COLOR0000ee;STICKLINE(C>O,O,C,1,0),COLOR0000ff;
STICKLINE(C=O and c<ref(c,1),c,o,6,0),COLORFFEE00;
STICKLINE(C<O,h,l,0,0),COLORFFEE00;
STICKLINE(C<O,O,C,8,0),COLORFF4400;STICKLINE(C<O,O,C,5,0),COLORFF8800;
STICKLINE(C<O,O,C,3,0),COLORFFAA00;STICKLINE(C<O,O,C,1,0),COLORFFCC00;
/////////////////////////////////////////////////////////////////////////
sjj:=STKTYPE=1 or STKTYPE=2 or STKTYPE=3 or STKTYPE=5 or STKTYPE=11;
P:=SYSPARAM(1);
bc:=barslast(p=barpos)+1;
金h:=if(NOT(sjj),sum(h*vol,bc)/sum(vol,bc),sum(amount,bc)/sum(v,bc)/100*sum(h,bc)/sum(c,bc));
金l:=if(NOT(sjj),sum(l*vol,bc)/sum(vol,bc),sum(amount,bc)/sum(v,bc)/100*sum(l,bc)/sum(c,bc));
点石成金:if(ref(h,bc-1)>ref(h,bc) and ref(h,bc-1)>ref(h,bc-2),金h,金l),color00BBff,LINETHICK2;
成本线:DMA(C,IF(CAPITAL=0,vol/ESTDATA(12)/20,vol/FINANCE(7)/50)),COLORff00ff;
决策线:WMA(成本线,IF(CAPITAL=0,74,21)),COLOR00ee00;
///////////////////////////////////////////////////////////////////////////////////
SS:=55;HhC:=HHV(h,SS);LLc:=LLV(L,SS);
PARTLINE(BARPOS>=p-SS,hHC[p]),COLOR00EE00;
DRAWNUMBER(BARPOS=p-SS,hHC[p],hHC[p],2),COLOREEEEEE,PXUP25;
PARTLINE(BARPOS>=p-SS,LLc[p]),COLOR0000FF;
DRAWNUMBER(BARPOS=p-SS,LLc[p],LLc[p],2),COLOREEEEEE,PXUP25;
PARTLINE(BARPOS>=p-SS,(hHC[p]+LLc[p])/2),COLOR00EEFF;
DRAWNUMBER(BARPOS=p-SS,(hHC[p]+LLc[p])/2,(hHC[p]+LLc[p])/2,2),COLOREEEEEE,PXUP25;
PARTLINE(BARPOS>=p-55,(hHC[p]*3+LLc[p])/4),COLORDDDDDD,POINTDOT;
DRAWNUMBER(BARPOS=p-55,(hHC[p]*3+LLc[p])/4,(hHC[p]*3+LLc[p])/4,2),COLOREEEEEE,PXUP25;
PARTLINE(BARPOS>=p-55,(hHC[p]+LLc[p]*3)/4),COLORDDDDDD,POINTDOT;
DRAWNUMBER(BARPOS=p-55,(hHC[p]+LLc[p]*3)/4,(hHC[p]+LLc[p]*3)/4,2),COLOREEEEEE,PXUP25;
/////////////////////////////////////////////////////////////////////////////////
A:=BLKNAME;BKG:=STRLEFT(A,STRFIND(A,',',1)-1);
BKSG:=STKCOUNT(BKG);BK:='板块指数';BKS:=STKCOUNT(BK);
DRAWTEXTEX(c,1,0,0,''+STKLABEL+' '+STKNAME+' 隶属'+MARKETNAME+'，所属板块：'+BKG+'，'+'共含证券：'+NUMTOSTR(BKSG,0)+' 家'),COLOR00ddff;
//////////////////////////////////////////////////////////////////////////////////
A1:=COST(0.37);A2:=COST(6);A3:=COST(15);A4:=COST(55);A5:=COST(95);
【90%成本】:=COST(90);【70%成本】:=COST(12);获利:=WINNER(C)*100;
套牢:=100-WINNER(C)*100;底出击★:=a1;稳建仓:=a2;快刀手:=a3;预测★:=a5;升浪:=a4;
DRAWTEXTEX(c,1,0,45,' \n获利盘：'+NUMTOSTR(获利,2)+' %'),align4,Colorff00ff;
DRAWTEXTEX(c,1,0,45,' \n \n套牢盘：'+NUMTOSTR(套牢,2)+' %'),align4,Colorffbb00;
DRAWTEXTEX(c,1,0,45,' \n \n \n■底击：'+NUMTOSTR(底出击★[sysparam(1)],2)+' 元'),align4,Colorred;
DRAWTEXTEX(c,1,0,45,' \n \n \n \n■稳仓：'+NUMTOSTR(稳建仓[sysparam(1)],2)+' 元')PXDN0,align4,Coloryellow;
DRAWTEXTEX(c,1,0,45,' \n \n \n \n \n■快刀：'+NUMTOSTR(快刀手[SYSPARAM(1)],2)+' 元')PXDN0,align4,COLORgreen;
DRAWTEXTEX(c,1,0,45,' \n \n \n \n \n \n■升浪：'+NUMTOSTR(升浪[sysparam(1)],2)+' 元')PXDN0,align4,Colorffffff;
DRAWTEXTEX(c,1,0,45,' \n \n \n 、\n \n \n \n■预测：'+NUMTOSTR(预测★[sysparam(1)],2)+' 元')PXDN0,align4,Colorffbbff;
DRAWTEXTEX(c,1,0,45,' \n \n \n \n 、\n \n \n \n90成本：'+NUMTOSTR(【90%成本】[sysparam(1)],2)+' 元')PXDN0,align4,Colorffeeff;
DRAWTEXTEX(c,1,0,45,' \n \n \n \n 、\n \n \n \n \n70成本：'+NUMTOSTR(【70%成本】[sysparam(1)],2)+' 元')PXDN0,align4,Colorffccff;
 

 

 

[url=http://www.goodgupiao.com/gupiaogongshi/12078.html][B]发千钧老师的指标千钧指点江山[/B][/url]