搜索
查看: 20475|回复: 19

[大盘交流] 随机选股实验

[复制链接]
发表于 2010-8-1 14:34 | 显示全部楼层

随机选股实验

来自:MACD论坛(bbs.shudaoyoufang.com) 作者:lipton398 浏览:20475 回复:19

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
做一个实验,只看深圳指数的五周线与20周线进行操作的可行性。


入选的范围所有的深圳股票不包括停牌,ST,创业板。


运行代码随机选5只深圳股票

002309
中利科技
000710
天兴仪表
002030
达安基因
002265
西仪股份
000936
西

72日如果深圳指数收红则以市价买入
因为只是实验所以用同化顺的模拟盘,20万平均每股4万元。
卖出条件,击穿20周线3%

随机选股的Excel VBA代码:

Sub test()


Dim i As Integer, h As Integer

Dim iRow As Integer

Dim dic As New Scripting.Dictionary

Dim arr

Dim s As String



dic.RemoveAll

iRow = Sheet1.Range("a1").End(xlDown).Row - 1 '取工作表1 股票数量

arr = Sheet1.Range("a2").Resize(iRow, 2)

h= 0



Do While h <= 5 '5个随机数

Randomize
' 随机数生成器初始化。

i = Int((iRow * Rnd) + 1)
' 生成的随机数值。

s = arr(i, 1) '取股票代码

If Not dic.Exists(s) Then

dic.Add arr(i, 1), arr(i, 2) '存放在字典,确保不重复

End If

h = h + 1

Loop

'选择的5只股票放在工作表2

Sheet2.Range("a2").Resize(5, 1) =WorksheetFunction.Transpose(dic.Keys) '股票代码

Sheet2.Range("b2").Resize(5, 1) =WorksheetFunction.Transpose(dic.Items) '股票名称

End Sub
金币:
奖励:
热心:
注册时间:
2007-8-19

回复 使用道具 举报

 楼主| 发表于 2010-8-1 14:34 | 显示全部楼层
按计划买入,其中中利科技与天兴仪表填错单照成股价不平衡,只能将错就错。

[ 本帖最后由 lipton398 于 2010-8-2 11:40 编辑 ]
20100802.JPG
金币:
奖励:
热心:
注册时间:
2007-8-19

回复 使用道具 举报

发表于 2010-8-1 14:36 | 显示全部楼层
回贴支持,灌水升级。
金币:
奖励:
热心:
注册时间:
2007-6-21

回复 使用道具 举报

发表于 2010-8-1 14:46 | 显示全部楼层
难得来个搞实事的,不错#*d1*# ,搬凳子看。楼主继续
金币:
奖励:
热心:
注册时间:
2005-11-14

回复 使用道具 举报

发表于 2010-8-2 01:32 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
金币:
奖励:
热心:
注册时间:
2010-7-26

回复 使用道具 举报

发表于 2010-8-5 15:12 | 显示全部楼层
顶一个,支持楼主。
金币:
奖励:
热心:
注册时间:
2010-5-22

回复 使用道具 举报

签到天数: 1 天

发表于 2010-8-5 15:15 | 显示全部楼层
看一下下 支持个
金币:
奖励:
热心:
注册时间:
2010-7-4

回复 使用道具 举报

 楼主| 发表于 2010-8-6 16:29 | 显示全部楼层
本周随机选股模拟账户盈利6%,下周的警戒位深圳指数10370。
20100806.JPG
金币:
奖励:
热心:
注册时间:
2007-8-19

回复 使用道具 举报

加Q号81857407 该用户已被删除
发表于 2010-8-7 04:18 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
金币:
奖励:
热心:
注册时间:

回复 使用道具 举报

 楼主| 发表于 2010-8-7 11:43 | 显示全部楼层
对随机选股试验思路的补充:
何时人市
    知道何时买卖是非常重要的,而见你必须有某种规则或信号,作为你设置买卖单的时间依据。当你认为市场正在接近底部或顶部,那么你会发现在百分之七十的情况下自已是错的。重要的并不是市场今天会怎么走,或者你认为市场该怎么走:而恰恰是日后你期待获利时市场趋势的迹象是什么。
    当—个股票到达低位或高位时,如果你想建仓,就应等到趋势已经向上或向下的信号出现。有时,你会因等待而错过底部或顶部,但观望可以使你保存资金,直至你有理由相信你是顺势而为,而非逆水行舟。
你必须牢记的重要事情之一是,你不是要获得多大的利润,或造成多大的损失。你必须撇开钱的问题。你的目标必须是与市场保持—致。顺应市场的趋势。花全部的时间研究市场的正确趋势。不要考虑利润。如果你与市场保持—致,利润自会滚滚而来。如果你看错了趋势,那么就得使用古老而可靠的保护伞——份止蚀单。-江恩


上面三段话是江恩45年的一段摘录。论述了顺势而为的重要性和方法。当市场的趋势向上时持股才是重要的,此时选股反而在第二位。借用江恩的话“你不是要获得多大的利润,或造成多大的损失。你必须撇开钱的问题。你的目标必须是与市场保持—致。”
从观察历史数据看当指数从低位向上突破20周线常常有一波盈利走势,虽然可统计历史数据,但少了突发的事件,突发消息的影响,日间波动的影响。等等的因素要在短时间内做出正确的判断是统计历史数据做不到的。
此次试验的时间定为一年或买卖三次,全进全出,每次均为选定的5个股票。

[ 本帖最后由 lipton398 于 2010-8-7 13:28 编辑 ]
金币:
奖励:
热心:
注册时间:
2007-8-19

回复 使用道具 举报

发表于 2010-8-7 16:22 | 显示全部楼层
先顶起来,有空慢慢看。
金币:
奖励:
热心:
注册时间:
2007-6-21

回复 使用道具 举报

 楼主| 发表于 2010-8-13 15:50 | 显示全部楼层
结贴了。
感觉这个帖子没有什么意义,不知道自己要试验什么?如果是大盘的捕捉波动盈利许多前辈已经有结论,只需从实战中领悟就可以了。如果真是随机试验,光是取样的数量和对比组,用几个股说明不了什么问题。还不如研究什么是跌无可跌,如何界定低点,什么是活跃股性什么是强势股更实际一点。呵呵。

对深圳指数的看法,上周的监视点10370附近不变。
卖点1有效击破深圳指数60日线
卖点2如果往后几天冲高不能突破前期高位



共持股10个交易日盈利7.65%
谢谢各位的支持鼓励
20100813.JPG
金币:
奖励:
热心:
注册时间:
2007-8-19

回复 使用道具 举报

签到天数: 1687 天

发表于 2010-8-14 13:08 | 显示全部楼层
强!!!!!!!
金币:
奖励:
热心:
注册时间:
2008-5-12

回复 使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

本站声明:MACD仅提供交流平台,请交流人员遵守法律法规。
值班电话:18209240771   微信:35550268

举报|意见反馈|手机版|MACD俱乐部

GMT+8, 2025-5-21 16:45 , Processed in 0.032241 second(s), 11 queries , MemCached On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表