楼主这么热心
我也就不怕麻烦
找个网盘方便一下大家
等会贴出来
原帖由 belong 于 2008-1-30 23:24 发表 http://bbs.macd.cn/static/image/common/back.gif
麻烦你帮助大家一下，贴一个连接！！！ 大智慧新一代伴侣http://www.congl.com/1/list.asp?id=3329这个版本的能用吗
http://www1./forestor
要密码的话123456
原帖由 forestor 于 2008-1-31 00:06 发表 http://bbs.macd.cn/static/image/common/back.gif
楼主这么热心
我也就不怕麻烦
找个网盘方便一下大家
等会贴出来
谢谢了:*19*:
发不了网址
原帖由 forestor 于 2008-1-31 00:29 发表 http://bbs.macd.cn/static/image/common/back.gif
http://www1./forestor
要密码的话123456
Not Found:*27*: :*27*: :*27*:
在的人试下，看行不
原帖由 forestor 于 2008-1-31 00:06 发表 http://bbs.macd.cn/static/image/common/back.gif
楼主这么热心
我也就不怕麻烦
找个网盘方便一下大家
等会贴出来
forestor:您好!能给贴个"主力资金进出"的源码吗?谢谢您!
我准备睡睡去了
http://www./filedown-803949025.html
原帖由 六九驷一 于 2008-1-31 00:36 发表 http://bbs.macd.cn/static/image/common/back.gif
Not Found:*27*: :*27*: :*27*:
可以的：http://www1./forestor你没有加
直接贴不出去:*27*:
看上面的图吧
走了
不行
明早再看
机构博弈源码：
VAR1:=IF((CLOSE > OPEN),((CLOSE - OPEN) * VOL),IF((CLOSE < OPEN),((CLOSE - OPEN) * VOL),0));
VAR2:=IF((CLOSE > REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),IF((CLOSE < REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),0));
VAR3:=IF((OPEN > REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),IF((OPEN < REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),0));
VAR4:=IF((CLOSE < OPEN),((OPEN - CLOSE) * VOL),IF((CLOSE > OPEN),((OPEN - CLOSE) * VOL),0));
VAR5:=IF((CLOSE < REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),IF((CLOSE > REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),0));
VAR6:=IF((OPEN < REF(CLOSE,1)),((REF(CLOSE,1)-OPEN) * VOL),IF((OPEN > REF(CLOSE,1)),((REF(CLOSE,1) - OPEN) * VOL),0));
VAR7:=(CLOSE > OPEN);
VAR8:=(CLOSE > REF(CLOSE,1));
VAR9:=(OPEN > REF(CLOSE,1));
VARA:=((VAR7 OR VAR8) OR VAR9);
机构:(SUM(((((VAR1 + VAR2) + VAR3) / 3) / CAPITAL),5) * 1000);
散户:(SUM(((((VAR4 + VAR5) + VAR6) / 3) / CAPITAL),10) * 1000);
系数:EMA((((((((COUNT(VAR8,12) / 12) + (COUNT(VAR7,12) / 12)) + (COUNT(VAR9,12) / 12)) / 3) * MA(机构,5)) * 2) * 1.1),2),colorFF0000;
平衡:0,POINTDOT,colorFF00FF;
主力资金进出：
var2:=REF(LOW,1);
Var3:=SMA(ABS(LOW-Var2),13,1)/SMA(MAX(LOW-Var2,0),13,1)*100;
Var4:=EMA(IF(CLOSE*1.2,Var3*13,Var3/13),13);
Var5:=LLV(LOW,34);
Var6:=HHV(Var4,34);
Var7:=IF(LLV(LOW,56),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,5);
Var10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(10);
Var11:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7*(-1);
Var12:=EMA(CLOSE,5)*(-1);
STICKLINE(Var8>REF(Var8,1),0,Var8,4,1),color10FFFF,linethick0;
主力进场:IF(Var8>REF(Var8,1),Var8*8,0),color10FFFF,linethick0;
STICKLINE(Var11>REF(Var11,1),0,Var11,4,1),colorFFF810;
洗盘:IF(Var11>REF(Var11,1),Var11*8,0),colorFFF810,linethick0;
主力持仓:LOW,colorFF10FF,linethick0;
5,colorwhite;
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1),,,,Color006EFF;
DRAWTEXT(XL3,Var8*2,'买'),Color006EFF;
(34),colorred;
:*19*:
超级庄筹散筹：
庄筹线:EMA(WINNER(C)*70,5), colorred ,linethick2;
散筹线:EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5),colorgreen ,linethick2;
{5;20;40;60;}
海底捞活鱼:FILTER( (CROSS(5,庄筹线) and 散筹线< 20 )*40,10 ),COLORYELLOW;
DRAWTEXT(海底捞活鱼 ,30 ,'海底捞活鱼(抄底)' ),COLORYELLOW;
aa:= ref(庄筹线,30)> 40 or ref(庄筹线,20)> 40;
bb:=CROSS(28,庄筹线) and 散筹线> 40 and aa=1;
DRAWTEXT(bb ,60 ,'决战诱空(洗盘)' ),COLORblue;
决战诱空:IF(bb ,50 ,80 ),COLORblue;
CC:=REF(散筹线,1)> 散筹线 AND REF(庄筹线,1)< 庄筹线 AND 庄筹线> 30 AND 散筹线> 30 AND REF(庄筹线,1)-REF(庄筹线,2)> 3.535;
DD:=COUNT(REF(散筹线,1)> REF(庄筹线,1),5);
鸡雀升天:IF(CROSS(庄筹线,散筹线) AND CC=1 AND DD>=5 ,10,30),COLORF00FF0;
DRAWTEXT(鸡雀升天=10 ,13 ,'追庄升天'),COLORF00FF0;
原帖由 belong 于 2008-1-31 00:45 发表 http://bbs.macd.cn/static/image/common/back.gif
可以的：http://www1./forestor 你没有加
谢谢。看到了:*19*: :*19*: