[第一期]你求助，我悬赏-网上读书园地

capricorn_ye 发表于 2010-8-21 17:41:29

[第一期]你求助，我悬赏

3威望悬赏以下内容，若一周内无人解答，悬赏额增长为4威望，逐周上涨，最高7威望封顶。

http://www.readfree.net/bbs/read.php?tid=4938596&fpage=1&toread=&page=8
第150楼

A1:=DATE <= 13181231;
DRAWTEXTREL(4,5,'流通A股:'+NUMTOSTRN(FINANCE2(7),0)+'万'+' 市净率:'+NUMTOSTRN((DYNAINFO(7) / FINANCE2(34)),2)+' 昨:'+NUMTOSTRN(DYNAINFO(3),2)+' 开:'+NUMTOSTRN(DYNAINFO(4),2)+' 高:'+NUMTOSTRN(DYNAINFO(5),2)+' 低:'+NUMTOSTRN(DYNAINFO(6),2)+' 收:'+NUMTOSTRN(DYNAINFO(7),2)+' 涨幅:'+NUMTOSTRN((DYNAINFO(14) * 100),2)+'%'+' 振幅:'+NUMTOSTRN((DYNAINFO(13) * 100),2)+'%'+' 换手率:'+NUMTOSTRN((DYNAINFO(37) * 100),2)+'%'),linethick1,colorWhite;
DRAWTEXTREL(22,40,'凯恩斯双线'),linethick5,colorRed;
DRAWTEXTREL(180,50,'黄点工作线'),linethick1,colorYellow;
DRAWTEXTREL(260,50,'多空停损点'),linethick1,colorMagenta;
DRAWTEXTREL(340,50,'线上工作|线下休息'),linethick1,colorWhite;
DRAWTEXTREL(470,50,'最低点靠近工作线低吸'),linethick1,colorYellow;
DRAWTEXTREL(210,100,STKLABEL+' '+STKNAME),linethick5,ColorFFFF80;
DRAWTEXTREL(6,150,'空心:阳线|实体:阴线'),linethick2,colorWhite;
DRAWTEXTREL(10,200,'线上阴线买|买错也要买'),linethick1,colorRed;
DRAWTEXTREL(10,240,'线下阳线卖|卖错也要卖'),linethick1,colorGreen;
七天线:MA(C,7),colorgray;
工作线:(EMA(C,14)) * A1,POINTDOT,linethick4,colorYellow;
生命线:(MA(C,25)) * A1,linethick2,colorMagenta;
不惑线:(MA(C,40)) * A1,colorCyan;
姊妹线:(EMA(C,56)) * A1,CIRCLEDOT,colorWhite;
长线启动点:(MA(C,99)) * A1,linethick1,Color0099FF;
{卖线:EMA(SLOPE(C,21)*21+C,42),COLORRED,LINETHICK2;}
A2:=\"cpzb@cp\";
STICKLINE((A2 >= 8),H,L,0.8,1),colorGreen;
STICKLINE(((A2 >= 8) AND (C > O)),O,C,8,1),colorGreen;
STICKLINE(((A2 >= 8) AND (C < O)),C,O,8,0),colorGreen;
STICKLINE(((A2 > 0) AND (A2 <= 2)),H,L,0.8,1),colorRed;
STICKLINE((((A2 > 0) AND (A2 <= 2)) AND (C > O)),O,C,8,1),colorRed;
STICKLINE((((A2 > 0) AND (A2 <= 2)) AND (C < O)),C,O,8,0),colorRed;
STICKLINE(((C >= 工作线) AND (C >= O)),H,L,0.5,1),colorRed;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,8,1),colorRed;
STICKLINE(((C >= 工作线) AND (C <= O)),H,L,0.5,0),colorRed;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,8,0),colorRed;
STICKLINE(((C < 工作线) AND (C >= O)),H,L,0.5,1),colorGreen;
STICKLINE(((C < 工作线) AND (C >= O)),O,C,8,1),colorGreen;
STICKLINE(((C < 工作线) AND (C <= O)),H,L,0.5,0),colorGreen;
STICKLINE(((C < 工作线) AND (C <= O)),O,C,8,0),colorGreen;
DRAWTEXT((A2 = 1),L,'￣'),linethick2,ALIGN1,Color208FFF;
DRAWTEXT((A2 = 1),L,'B'),linethick5,ALIGN1,colorYellow;
DRAWTEXT((A2 = 9),H,'￣'),linethick2,ALIGN1,colorCyan;
DRAWTEXT((A2 = 9),H+0.38,'S'),linethick5,colorCyan;
STICKLINE((A2 = 9),C,O,0,0),colorWhite;
STICKLINE((A2 = 9),C,O,8,0),colorWhite;
STICKLINE((A2 = 9),C,O,7,0),ColorDDDDDD;
STICKLINE((A2 = 9),C,O,6,0),ColorCCCCCC;
STICKLINE((A2 = 9),C,O,5,0),colorWhite;
STICKLINE((A2 = 9),C,O,4,0),ColorEEEEEE;
STICKLINE((A2 = 9),C,O,3,0),ColorDDDDDD;
STICKLINE((A2 = 9),C,O,2,0),ColorCCCCCC;
STICKLINE((A2 = 9),C,O,1,0),colorWhite;
STICKLINE((A2 = 1),C,O,0,0),ColorFFBBFF;
STICKLINE((A2 = 1),C,O,8,0),colorMagenta;
STICKLINE((A2 = 1),C,O,7,0),ColorFF22FF;
STICKLINE((A2 = 1),C,O,6,0),ColorFF44FF;
STICKLINE((A2 = 1),C,O,5,0),ColorFF66FF;
STICKLINE((A2 = 1),C,O,4,0),ColorFF88FF;
STICKLINE((A2 = 1),C,O,3,0),ColorFF99FF;
STICKLINE((A2 = 1),C,O,2,0),ColorFFAAFF;
STICKLINE((A2 = 1),C,O,1,0),ColorFFBBFF;
A3:=EMA((((SLOPE(C,21)) * 20) + C),68);
A4:=EMA(C,10);
A5:=REF(C,2);
A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;
A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);
DRAWTEXT((CROSS(A4,A3)),L,'△'),linethick2,ALIGN1,colorYellow;
DRAWTEXT(A7,H,'○'),linethick3,colorGreen;
A8:=LLV(L,21);
A9:=HHV(H,21);
A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);
A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);
A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);
A13:=LLV(L,55);
A14:=HHV(H,34);
A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);
A16:=(A11 + A15) / 2;
A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);
A18:=EMA(A16,5);
A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);
A20:=CROSS(A10,A11);
A21:=(CROSS(A10,A19)) AND (A19 < 30);
A22:=A21 * 0.6;
DRAWTEXT((A22 = 0.6),L,'◇'),linethick4,ALIGN1,colorYellow;
DRAWTEXT((A20 = 1),L,'◇'),linethick4,ALIGN1,colorWhite;
A23:=((C + L) + H) / 3;
A24:=EMA(A23,6);
A25:=EMA(A24,5);
A26:=CROSS(A24,A25);
DRAWicon(A26,(LOW / 1.005),3),linethick2,ALIGN1,colorMagenta;
STICKLINE(((C >= 工作线) AND (C >= O)),H,L,0.5,1),colorRed;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,8,1),colorRed;
STICKLINE(((C >= 工作线) AND (C <= O)),H,L,0.5,0),colorRed;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,8,0),colorRed;
STICKLINE(((C < 工作线) AND (C >= O)),H,L,0.5,1),colorGreen;
STICKLINE(((C < 工作线) AND (C >= O)),O,C,8,1),colorGreen;
STICKLINE(((C < 工作线) AND (C <= O)),H,L,0.5,0),colorGreen;
STICKLINE(((C < 工作线) AND (C <= O)),O,C,8,0),colorGreen;

这个公式哪位大侠能修改转换下，普通的大智慧用不了。

要求：将上述内容能够在普通大智慧上能够使用

snowtulip 发表于 2010-8-21 19:29:25

这个公式要在大智慧L2上才能正常显示。现在找不到合适的破解版大智慧L2,希望高人能转换一下，达到可以在普通版大智慧上使用的目的。谢谢。

拉拉发表于 2010-8-21 21:55:36

使用免费的经典版本; 这个地址 http://www.gw.com.cn/download/level1/index.htm

导入下面公式,主图显示;

你可以试下

柳长街 发表于 2010-8-21 22:44:59

试试这个看看

凯恩斯双线制胜大智慧1的指标公式
网上不少双线制胜指标只能在LEVEL2下使用，在老版本大智慧下测试公式不能通过。
此公式在大智慧1下测试通过，可正常使用，并已做了优化。

X0:=IF(C>=REF(C,1),AMOUNT/10000,0);
X1:=IF(C<REF(C,1),AMOUNT/10000,0);
DD:=(X0-X1);
EE:=vol/sum(vol,55);
LC:=REF(CLOSE,1);
JH:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
cp:FILTER(CROSS(75,JH),11);
zp:FILTER(CROSS(JH,25),22);
DP:IF(C>1000,(DD/10000000000)/EE,DD/(FINANCE(7)*c))*100;
七日线:MA(C,7),Color55ff55,linethick5,;
工作线:(EMA(C,14)),POINTDOT,linethick5,coloryellow;
生命线:(MA(C,25)),linethick5,colorFF00FF;
长线启动点:(MA(C,99)),CIRCLEDOT,ColorEEBBEE;
A0:="cpzb01.zp";
A1:="cpzb01.cp";
A2:="cpzb01.DP";
STICKLINE((A2>=2.1),H,L,0.8,1),color55ff55;
STICKLINE(((A2>=2.1) AND (C>REF(C,1))),O,C,8,1),colorGreen;
STICKLINE(((A2>=2.1) AND (C<REF(C,1))),C,O,8,0),colorGreen;
STICKLINE(((A2>0) AND (A2<5)),H,L,0.8,1),colorRed;
STICKLINE((((A2>0) AND (A2<5)) AND (C>REF
(C,1))),O,C,8,0),colorRed;
STICKLINE((((A2>0) AND (A2<5)) AND (C<REF
(C,1))),C,O,8,1),colorRed;
STICKLINE(((C>=工作线) AND (C>REF
(C,1))),H,L,0.5,1),colorRed;
STICKLINE(((C>=工作线) AND (C>REF(C,1))),O,C,8,1),colorRed;
STICKLINE(((C>=工作线) AND (C<REF
(C,1))),H,L,0.5,0),colorRed;
STICKLINE(((C>=工作线) AND (C<REF(C,1))),O,C,8,0),colorRed;
STICKLINE(((C<工作线) AND (C>REF
(C,1))),H,L,0.5,1),colorGreen;
STICKLINE(((C<工作线) AND (C>REF
(C,1))),O,C,8,1),colorGreen;
STICKLINE(((C<工作线) AND (C<REF
(C,1))),H,L,0.5,0),colorGreen;
STICKLINE(((C<工作线) AND (C<REF
(C,1))),O,C,8,0),colorGreen;
DRAWTEXT(A0,L,'￣￣'),linethick2,ColorFFFFFF;
DRAWTEXT(A0,L*0.98,' B-B'),linethick5,colorFFFFFF;
DRAWTEXT(A1,H,'￣￣'),linethick2,colorFFFF00;
DRAWTEXT(A1,H*1.03,' S-S'),linethick5,colorFFFF00;
STICKLINE(A1,C,O,8,0),colorFFFF00;
STICKLINE(A1,H,L,1,0),colorFFFF00;
STICKLINE(A0,C,O,8,0),ColorFFFFFF;
STICKLINE(A0,H,L,1,0),ColorFFFFFF;
STICKLINE((A2>=10 and A2<30),C,O,0,0),ColorFFBBFF;
STICKLINE((A2>=10 and A2<30),C,O,8,0),colorFF00FF;
STICKLINE((A2>=10 and A2<30),C,O,7,0),ColorFF22FF;
STICKLINE((A2>=10 and A2<30),C,O,6,0),ColorFF44FF;
STICKLINE((A2>=10 and A2<30),C,O,5,0),ColorFF66FF;
STICKLINE((A2>=10 and A2<30),C,O,4,0),ColorFF88FF;
STICKLINE((A2>=10 and A2<30),C,O,3,0),ColorFF99FF;
STICKLINE((A2>=10 and A2<30),C,O,2,0),ColorFFAAFF;
STICKLINE((A2>=10 and A2<30),C,O,1,0),ColorFFBBFF;
A3:=EMA((((SLOPE(C,21)) * 20) + C),68);
A4:=EMA(C,10);
A5:=REF(C,2);
A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C -
A5)),6,1))) * 100;
A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);
DRAWTEXT((CROSS(A4,A3)),L,'△'),linethick2,colorYellow;
DRAWTEXT(A7,H,'○'),linethick3,colorGreen;
A8:=LLV(L,21);
A9:=HHV(H,21);
A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);
A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);
A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);
A13:=LLV(L,55);
A14:=HHV(H,34);
A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);
A16:=(A11 + A15) / 2;
A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);
A18:=EMA(A16,5);
A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);
A20:=CROSS(A10,A11);
A21:=(CROSS(A10,A19)) AND (A19 < 30);
A22:=A21 * 0.6;
DRAWTEXT((A22 = 0.6),L,'◇'),colorYellow;
DRAWTEXT((A20 = 1),L,'◇'),colorWhite;

snowtulip 发表于 2010-8-23 08:22:55

引用第2楼拉拉于2010-08-21 21:55发表的

页: [1]

网上读书园地's Archiver

[第一期]你求助，我悬赏