中国股市现状

野狐禅

原帖由 无聊嘛 于 2008-1-12 09:20 发表
嗯。其实我们可以把这两个合并成一个。就是某A有个随机的起点，然后在每个起点后每日又有N％的加量，然后统计总分布。而JJ们按假设，是信息优势方，因此不需要随机起点，就以实际业绩代替。

开放基金就拉倒了吧。去年平均回报 30%, 就是上证的 1/3。还信息优势呢。

无聊嘛

:*22*: :*22*: :*22*: 这帮家伙是挺可爱的....
不过，按照那样的规则算下来，我在图上毛估估了一下，应该20多。:*26*:

野狐禅

这刮民党大胜冥近党，中国股市是不是要多一个有利因素啊？

liza012

原帖由 股市画家 于 2008-1-9 09:09 发表

交流一下:
你是看成4浪跌?
好多人是看成A,C浪跌.
还有好多人看N涨浪
经典数浪是要求走出来才去数的...也就是后面有更高的峰/更低的谷才能定性
在没有比4700点更低点前,应该设想是涨浪吧?
当然,在没有比 ...

从和上的图看, 目前的高点已经高过10月的那个高点了. 看上去似乎是N涨浪了.
不过这个庙里不大喜欢数浪的. 但好象还允许小声说说的.....:*29*:
(那浪我很喜欢, 主要它比较容易知道自己所在的相对位置, 但大浪套中浪又套小浪
的很容易弄乱掉:*18*: )

[ 本帖最后由 liza012 于 2008-1-13 09:56 编辑 ]

liza012

原帖由 野狐禅 于 2008-1-13 08:44 发表
这刮民党大胜冥近党，中国股市是不是要多一个有利因素啊？

和上在米国视角显然不同. 看到电视里他们打的天昏地黑的, 感慨在那里
的人们活的多累啊....

[ 本帖最后由 liza012 于 2008-1-13 10:22 编辑 ]

野狐禅

原帖由 liza012 于 2008-1-13 10:06 发表
看到电视里他们打的天昏地黑的, 感慨在那里的人们活的多累啊....

恰好相反。这里的电视都感慨米国的政客太没劲，不敢对决。:*22*:

liza012

原帖由 野狐禅 于 2008-1-13 12:51 发表

恰好相反。这里的电视都感慨米国的政客太没劲，不敢对决。:*22*:

:*22*:

[ 本帖最后由 liza012 于 2008-1-13 15:57 编辑 ]

liza012

听上去, 和上今年的操作在策略上好象与去年没有什么不同?

iloveinru

原帖由 野狐禅 于 2008-1-13 08:44 发表
这刮民党大胜冥近党，中国股市是不是要多一个有利因素啊？

这利好兑现了，会怎么样啊:*18*:

cnywj

这两天写了个程序模拟了一下，思考一个问题，大家探讨一下
    假设一个封闭市场 100人，每人拥有10000块钱，和1000股股票，初始股票价格为10元
每个人随机买卖，只要有钱买的时候，就将钱全部挂单买股票，只要有股票在卖出的时候就全部挂单卖出所有股票， 在单子挂完后统计所有的卖出资金和买入资金 if 卖出资金总量>买入资金总量 股价下跌0.01元，反之股价上涨0.01元，在循环许多次后，资金和股票程序显示是否会集中

野狐禅

原帖由 liza012 于 2008-1-13 15:38 发表
听上去, 和上今年的操作在策略上好象与去年没有什么不同?

袈裟常在换，和尚还是那一个。:*22*:

野狐禅

原帖由 cnywj 于 2008-1-14 02:10 发表
假设一个封闭市场 100人，每人拥有10000块钱，和1000股股票，初始股票价格为10元
每个人随机买卖，只要有钱买的时候，就将钱全部挂单买股票，只要有股票在卖出的时候就全部挂单卖出所有股票， 在单子挂完后统计所有的卖出资金和买入资金 if 卖出资金总量>买入资金总量 股价下跌0.01元，反之股价上涨0.01元，在循环许多次后，资金和股票程序显示是否会集中

你要买的时候，别人在卖。而按你的条件，看到有人在卖，你就得卖，那怎么买啊？

cnywj

程序编写时为了偷懒没有具体琢磨撮合成交的代码段，我 按照自己冠名的一个 叫做 吃蛋糕法则的方法写的，这个原则，如果买入资金>卖出资金 蛋糕为卖出的所有股票,买入资金分蛋糕,一部分人分到了,一部份人没有分到, 反之也是.  可是程序运行结果 市场的一部份资金蒸发掉了,不得其解,老和尚有空帮着看一下,

cnywj

原帖由 野狐禅 于 2008-1-14 02:16 发表

你要买的时候，别人在卖。而按你的条件，看到有人在卖，你就得卖，那怎么买啊？

   是一个统计值.所有人的买卖状态都是随机生成的 一个=random(2) 的函数  这100个人都是随机状态的

cnywj

struct person
   {
    float money;
    float stock;
    int option;
    int permite;
   };
person mktpeople[100];

野狐禅

原帖由 cnywj 于 2008-1-14 02:18 发表
程序运行结果 市场的一部份资金蒸发掉了,不得其解

这很自然啊。

cnywj

int i;
int upordown=1;
int j; //-----市场的循环次数
float price=10; //----------股票初始价格
float tempstock=0;
float tempmoney=0;
int temppeople=0;
//-------市场参与者的信息定义在头文件中 全局变量
int peoplenumber=100;   //-------参与者的数量 必须与上面的参与者信息的人数相等
float buymoney=0;
float sellstock=0;
//----------------市场股票资金初始化 begin
  for (i=0;i<peoplenumber;i++)
    {
       mktpeople.money=10000;
       mktpeople.stock=1000;
       mktpeople.option=random(2);
    }
//----------------市场股票资金初始化 end
//-------输出市场测试的每个人的帐户 begin
for (i=0;i<peoplenumber;i++)
   {
     Memo1->Lines->Add(IntToStr(i)+" "+FloatToStr(mktpeople.money)+" M   S "+FloatToStr(mktpeople.stock));
   }
//-------输出市场测试的每个人的帐户 end
//----------市场的循环次数 begin
for (j=0;j<StrToInt(Edit1->Text);j++)
{
  //------统计市场的当前状态买卖资金股数清零 begin
  buymoney=0;
  sellstock=0;
  //------统计市场的当前状态买卖资金股数清零 end
//-----------随即产生市场的参与人的买卖状态 begin
  for (i=0;i<peoplenumber;i++)
    {
       mktpeople.option=random(2);
           //----------查询资金或股票是否足额 begin
               if (mktpeople.option==0&&mktpeople.money/price>=1)  //---买入状态 begin
                    mktpeople.permite=1;
               else ;
               if (mktpeople.option==0&&mktpeople.money/price<1)
                    mktpeople.permite=0;
               else ;                                            //---买入状态 end
               if (mktpeople.option==1&&mktpeople.stock>0) //----卖出状态 begin
                    mktpeople.permite=1;
               else ;
               if (mktpeople.option==1&&mktpeople.stock<=0)
                    mktpeople.permite=0;
               else ;                                           //-------卖出状态 end
             //  Memo1->Lines->Add(IntToStr(mktpeople.option)+IntToStr(mktpeople.permite)+" "+FloatToStr(mktpeople.money/price));
           //----------查询资金或股票是否足额 end
    }
//-----------随即产生市场的参与人的买卖状态 end
//-------------计算市场中买入数量和卖出数量 begin
   for (i=0;i<peoplenumber;i++)
       {
       if (mktpeople.option==0&&mktpeople.permite==1)   //----有效买入统计
            buymoney=buymoney+mktpeople.money;
       else ;
       if (mktpeople.option==1&&mktpeople.permite==1)   //----有效卖出统计
            sellstock=sellstock+mktpeople.stock;
       else ;
       }
       //--------输出买入卖出数量 begin
    /*   Memo1->Lines->Add("买入股数"+FloatToStr(buymoney/price));
       Memo1->Lines->Add("买入资金"+FloatToStr(buymoney));
       Memo1->Lines->Add("卖出股数"+FloatToStr(sellstock));
       Memo1->Lines->Add("卖出资金"+FloatToStr(sellstock*price));     */
       //--------输出买入卖出数量 end
//-------------计算市场中买入数量和卖出数量 end
//--------确定价格是上涨还是下跌 begin
   if(buymoney>sellstock*price)
          upordown=1;
   else if (buymoney<sellstock*price)
         upordown=-1;
   else
          upordown=0;
//--------确定价格是上涨还是下跌 end
//---------吃蛋糕法则之取走蛋糕 begin
    if (buymoney>=sellstock*price)  //------买方资金足够买入所有的卖掉的股票
          for (i=0;i<peoplenumber;i++)
               {
             if (mktpeople.option==1&&mktpeople.permite==1) //--满足所有要卖的人
                          {
                     mktpeople.money=mktpeople.money+mktpeople.stock*price;
                     mktpeople.stock=0;
                          }
             else ;
               }
    else ;
    if (buymoney<sellstock*price)  //------卖方股票足够卖给所有的买入资金
          for (i=0;i<peoplenumber;i++)
               {
             if (mktpeople.option==0&&mktpeople.permite==1) //--满足所有要买的人
                          {
                      mktpeople.stock=mktpeople.stock+mktpeople.money/price;
                      mktpeople.money=0;
                          }
             else ;
               }
    else ;
//---------吃蛋糕法则之取走蛋糕 end
//---------吃蛋糕法则之分蛋糕 begin
    if (buymoney>=sellstock*price)  //------买方资金足够买入所有的卖掉的股票
       {
          for (i=0;i<peoplenumber;i++)
               {
             if (mktpeople.option==0&&mktpeople.permite==1)  //--要买的人分蛋糕b
                 {
                   if (sellstock>=mktpeople.money/price)
                      {
                       mktpeople.stock=mktpeople.stock+mktpeople.money/price;
                       mktpeople.money=0;
                       sellstock=sellstock-mktpeople.money/price;
                      }
                   else if (sellstock<mktpeople.money/price&&sellstock>0)
                         {
                         mktpeople.stock=mktpeople.stock+sellstock;
                         mktpeople.money=mktpeople.money-sellstock*price;
                         sellstock=0;
                         }
                   else ;
                }
             else ;                                     //--要买的人分蛋糕 e
               }
       //------------价格变动 begin
       price=price+0.01*upordown;
       //------------价格变动 end
       }
    else ;
    if (buymoney<sellstock*price)  //------卖方股票足够卖给所有的买入资金
        {
          for (i=0;i<peoplenumber;i++)
               {
             if (mktpeople.option==1&&mktpeople.permite==1) //--要卖的人分蛋糕b
                  {
                    if(buymoney>=mktpeople.stock*price)
                       {
                      mktpeople.money=mktpeople.money+mktpeople.stock*price;
                      mktpeople.stock=0;
                      buymoney=buymoney-mktpeople.stock*price;
                       }
                    else if (buymoney<mktpeople.stock*price&&buymoney>0)
                       {
                       mktpeople.money=mktpeople.money+buymoney;
                       mktpeople.stock=mktpeople.stock-buymoney/price;
                       buymoney=0;
                       }
                    else ;
                  }
             else ;                                         //--要卖的人分蛋糕e
               }
        //------------价格变动 begin
        price=price+0.01*upordown;
        //------------价格变动 end
        }
    else ;
//---------吃蛋糕法则之分蛋糕 end
//--------交换先吃蛋糕的人的优先级 begin
for(i=0;i<peoplenumber;i++)
{
temppeople=random(peoplenumber);
tempmoney=mktpeople.money;
tempstock=mktpeople.stock;
mktpeople.money=mktpeople[temppeople].money;
mktpeople.stock=mktpeople[temppeople].stock;
mktpeople[temppeople].money=tempmoney;
mktpeople[temppeople].stock=tempstock;
}
//--------交换先吃蛋糕的人的优先级 end
//-------绘制价格变动图 begin
Series1->AddY(price);
//-------绘制价格变动图 end
}
//----------市场的循环次数 end
//-------输出市场测试的每个人的帐户 begin
for (i=0;i<peoplenumber;i++)
   {
     Memo1->Lines->Add(IntToStr(i)+" "+FloatToStr(mktpeople.money)+" M   S "+FloatToStr(mktpeople.stock));
   }
//-------输出市场测试的每个人的帐户 end

cnywj

现在假设市场中只有5个人参与 程序运行结果是这样显示的
0 10000 M   S 1000
1 10000 M   S 1000
2 10000 M   S 1000
3 10000 M   S 1000
4 10000 M   S 1000
0 1.51165366172791 M   S 0
1 21735.931640625 M   S 5004.87841796875
2 1.51006412506104 M   S 0
3 1.51263070106506 M   S 0
4 1.5218585729599 M   S 0

程序有 BUG 慢慢再找找,但是好像其中某人占有了所有的股票,和部分资金,但是部分资金蒸发了

野狐禅

原帖由 cnywj 于 2008-1-14 02:21 发表
是一个统计值.所有人的买卖状态都是随机生成的 一个=random(2) 的函数  这100个人都是随机状态的

你是说每个人都在随鸡油走。如果乱蹬说买，有钱，就买。如果说卖，又有股票，就卖？你是不是还该加点利润率或亏损率什么的才好啊？

cnywj

原帖由 野狐禅 于 2008-1-14 02:28 发表

加点利润率或亏损率什么的

  :*22*:  是要准备加上的,但是程序写到这里觉得有点问题,怎么会循环100000次后资金和股票集中了呢,不知道是程序的问题,还是一个潜在规律