量学论坛 › 股票公式 › 关于本人发的“再发“盘中选股(动态买卖)”指标、选股双公式源码”的修改说明

疯狂石头 发表于 2011-3-31 23:31

选股双公式源码

天涯数码 发表于 2011-3-31 23:37

谢谢，看看再说了。

金大车 发表于 2011-4-5 17:45

VAR0:=VOL/CLOSE/2;
VAR1:=SUM(IF(VAR0>100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR2:=SUM(IF(VAR0>100 AND CLOSE<REF(CLOSE,1),VAR0,0),0);
VAR3:=SUM(IF(VAR0<100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR4:=SUM(IF(VAR0<100 AND CLOSE<REF(CLOSE,1),VAR0,0),0);
VAR5:=VAR1+VAR2+VAR3+VAR4;
VAR6:=IF(BARSTATUS=2,100*VAR1/VAR5,0);
VAR7:=IF(BARSTATUS=2,100*VAR2/VAR5,0);
VAR8:=IF(BARSTATUS=2,100*VAR3/VAR5,0);
VAR9:=IF(BARSTATUS=2,100*VAR4/VAR5,0);
机构买盘:VAR1,LINETHICK3,COLORFF55FF;
机构卖盘:VAR2,LINETHICK3,COLORFFFF55;
散户买盘:VAR3,COLOR5555FF;
散户卖盘:VAR4,COLOR55FF55;
DRAWTEXTREL(1003,870,'机构买盘'),LINETHICK2,COLORFF55FF;
DRAWTEXTREL(1003,570,'机构卖盘'),LINETHICK2,COLORFFFF55;
DRAWTEXTREL(1003,320,'散户买盘'),LINETHICK2,COLOR5555FF;
DRAWTEXTREL(1003,50,'散户卖盘'),LINETHICK2,COLOR55FF55;
IF BARSTATUS=2 THEN BEGIN
DRAWTEXTREL(1020,750,''+FLOOR(VAR6)+'%'),LINETHICK2,COLORFF55FF;
END
IF BARSTATUS=2 THEN BEGIN
LOOP0:=FLOOR(VAR7);
VAR10:=''+LOOP0;
VAR11:=VAR10 + '%';
DRAWTEXTREL(1020,460,VAR11),LINETHICK2,COLORFFFF55;
END
IF BARSTATUS=2 THEN BEGIN
LOOP1:=FLOOR(VAR8);
VAR12:=''+LOOP1;
VAR13:=VAR12+'%';
DRAWTEXTREL(1020,200,VAR13),LINETHICK2,COLOR5555FF;
END
IF BARSTATUS=2 THEN BEGIN
LOOP2:=FLOOR(VAR9);
VAR14:=''+LOOP2;
VAR15:=VAR14+'%';
DRAWTEXTREL(1020,-50,VAR15),LINETHICK2,COLOR55FF55;
END

:@

小良 发表于 2011-4-5 19:48

修改好了吗？辛苦了，谢谢！！！

岩茶人 发表于 2011-4-5 19:50

盘中选股(动态买卖)”指标

岩茶人 发表于 2011-4-5 19:55

先看一下，呵呵

看看不说 发表于 2011-4-5 19:58

向楼主学习学习

倚天十年 发表于 2011-4-5 20:06

关于本人发的“再发“盘中选股(动态买卖)”指标、选股双公式源码”的修改说明

崔泰豪 发表于 2011-4-5 20:27

谢谢仙人:handshake:handshake

卤水点豆腐 发表于 2011-4-5 20:29

谢谢分享 慢慢体会

龙出海 发表于 2011-4-5 21:16

谢谢分享谢谢分享

沉默是金金 发表于 2011-4-5 22:10

向楼主学习学习

东方金阳 发表于 2011-4-5 22:15

修改好了吗？辛苦了，谢谢！！！

韩爱兰 发表于 2011-4-5 22:18

ggggggggggggggggggggggggggggggg

东方金阳 发表于 2011-4-5 22:23

直接在原帖上改正不更好？

查看完整版本: 关于本人发的“再发“盘中选股(动态买卖)”指标、选股双公式源码”的修改说明