搜索
下半年翻五倍的标的查询只要觉得你的资源有价值,找我超长线翻倍股6个,299元想知识变现,点这里
广东线下聚会即将开始帮你配置仓位领五倍以上大牛不做制度的牺牲品
楼主: 张溪溪

各位朋友,各位同仁,各位老师,同志们,请教如何处理数据才贴近市场,

[复制链接]
 楼主| 发表于 2006-8-8 12:04 | 显示全部楼层

回复:

现将源代码传上,作者:梦闲阁主,)input:p1(1,0,1),p2(1,0,1);//P1=0,按常规K线开收定阴阳爻,P1=1,按张东生-常秉义方法定阴阳爻;P2=0,按K线顺序排卦,左为初爻,右为上爻,P2=1,按K线逆序排卦
//在副图上显示证卷代码与证卷名称
DRAWTEXT(sysparam(2)=BARSCOUNT(CLOSE),h*1.10,'证卷代码:'+STKLABEL+';'+'证卷名称:'+STKNAME),COLORGREEN,ALIGN4;
//副图指标,绘K线
STICKLINE(C>O,H,L,0.4,0),COLORRED;
STICKLINE(C>O,O,C,8,1),COLORRED;
STICKLINE(C<=O,H,L,0.4,0),COLORCYAN;
STICKLINE(C<=O,O,C,8,0),COLORCYAN;
//按不同方法定阴阳爻
aa:=AMOUNT/VOL/100;//均价
ai:=if(c=o,aa-ref(aa,1),c-o);//P1=0,按常规K线开收定阴阳爻
aj:=if(c=ref(c,1),aa-ref(aa,1),c-ref(c,1));//P1=1,按张东生-常秉义方法定阴阳爻
a:=if(p1=0,ai,aj);
//对特殊阴阳爻作出标记
DRAWICON((p1=0 and C=O and ai>0) or (p1=1 and C=ref(c,1) and aj>0),L,1),ALIGN5;
DRAWICON((p1=0 and C=O and ai<0) or (p1=1 and C=ref(c,1) and aj<0),L,2),ALIGN5;
//选定6爻,P2=0,按K线顺序排卦,P2=1,按K线逆序排卦
a1:=if(p2=0,ref(a,5),a);
a2:=if(p2=0,ref(a,4),ref(a,1));
a3:=if(p2=0,ref(a,3),ref(a,2));
a4:=if(p2=0,ref(a,2),ref(a,3));
a5:=if(p2=0,ref(a,1),ref(a,4));
a6:=if(p2=0,a,ref(a,5));
//下卦
x1:=a1>0 and a2>0 and a3>0;//下卦乾-阳阳阳
x2:=a1>0 and a2>0 and a3<0;//下卦兑-阳阳阴
x3:=a1>0 and a2<0 and a3>0;//下卦离-阳阴阳
x4:=a1>0 and a2<0 and a3<0;//下卦震-阳阴阴
x5:=a1<0 and a2>0 and a3>0;//下卦巽-阴阳阳
x6:=a1<0 and a2>0 and a3<0;//下卦坎-阴阳阴
x7:=a1<0 and a2<0 and a3>0;//下卦艮-阴阴阳
x8:=a1<0 and a2<0 and a3<0;//下卦坤-阴阴阴
//上卦
s1:=a4>0 and a5>0 and a6>0;//上卦乾-阳阳阳
s2:=a4>0 and a5>0 and a6<0;//上卦兑-阳阳阴
s3:=a4>0 and a5<0 and a6>0;//上卦离-阳阴阳
s4:=a4>0 and a5<0 and a6<0;//上卦震-阳阴阴
s5:=a4<0 and a5>0 and a6>0;//上卦巽-阴阳阳
s6:=a4<0 and a5>0 and a6<0;//上卦坎-阴阳阴
s7:=a4<0 and a5<0 and a6>0;//上卦艮-阴阴阳
s8:=a4<0 and a5<0 and a6<0;//上卦坤-阴阴阴
//乾宫八卦,红色系
DRAWTEXT(x1 and s1,HIGH*1.04,'乾'),ALIGN0,COLOR0000BE;{11乾为天-阳阳阳阳阳阳}
DRAWTEXT(x1 and s2,HIGH*1.04,'夬'),ALIGN0,COLOR0000E4;{21泽天夬-阳阳阳阳阳阴}
DRAWTEXT(x1 and s3,HIGH*1.08,'大\n有'),ALIGN0,COLOR0000EA;{31火天大有-阳阳阳阳阴阳}
DRAWTEXT(x1 and s4,HIGH*1.08,'大\n壮'),ALIGN0,COLOR0000FF;{41雷天大壮-阳阳阳阳阴阴}
DRAWTEXT(x1 and s5,HIGH*1.08,'小\n畜'),ALIGN0,COLOR4441FF;{51风天小畜-阳阳阳阴阳阳}
DRAWTEXT(x1 and s6,HIGH*1.04,'需'),ALIGN0,COLOR436FFF;{61水天需-阳阳阳阴阳阴}
DRAWTEXT(x1 and s7,HIGH*1.08,'大\n畜'),ALIGN0,COLOR7A7DFF;{71山天大畜-阳阳阳阴阴阳}
DRAWTEXT(x1 and s8,HIGH*1.04,'泰'),ALIGN0,COLOR7A91FF;{81地天泰-阳阳阳阴阴阴}
//兑宫八卦,绿色系
DRAWTEXT(x2 and s1,HIGH*1.04,'履'),ALIGN0,COLOR00A300;{12天泽履-阳阳阴阳阳阳}
DRAWTEXT(x2 and s2,HIGH*1.04,'兑'),ALIGN0,COLOR00FF00;{22兑为泽-阳阳阴阳阳阴}
DRAWTEXT(x2 and s3,HIGH*1.04,'睽'),ALIGN0,COLOR00FF00;{32火泽睽-阳阳阴阳阴阳}
DRAWTEXT(x2 and s4,HIGH*1.08,'归\n妹'),ALIGN0,COLOR00FF00;{42雷泽归妹-阳阳阴阳阴阴}
DRAWTEXT(x2 and s5,HIGH*1.08,'中\n孚'),ALIGN0,COLOR00FF00;{52风泽中孚-阳阳阴阴阳阳}
DRAWTEXT(x2 and s6,HIGH*1.04,'节'),ALIGN0,COLOR00FF00;{62水泽节-阳阳阴阴阳阴}
DRAWTEXT(x2 and s7,HIGH*1.04,'损'),ALIGN0,COLOR00FF00;{72山泽损-阳阳阴阴阴阳}
DRAWTEXT(x2 and s8,HIGH*1.04,'临'),ALIGN0,COLOR00FF00;{82地泽临-阳阳阴阴阴阴}
//离宫八卦,黄色系
DRAWTEXT(x3 and s1,HIGH*1.08,'同\n人'),ALIGN0,COLOR00FFFF;{13天火同人-阳阴阳阳阳阳}
DRAWTEXT(x3 and s2,HIGH*1.04,'革'),ALIGN0,COLOR00FFFF;{23泽火革-阳阴阳阳阳阴}
DRAWTEXT(x3 and s3,HIGH*1.04,'离'),ALIGN0,COLOR00FFFF;{33离为火-阳阴阳阳阴阳}
DRAWTEXT(x3 and s4,HIGH*1.04,'丰'),ALIGN0,COLOR00FFFF;{43雷火丰-阳阴阳阳阴阴}
DRAWTEXT(x3 and s5,HIGH*1.08,'家\n人'),ALIGN0,COLOR00FFFF;{53风火家人-阳阴阳阴阳阳}
DRAWTEXT(x3 and s6,HIGH*1.08,'既\n济'),ALIGN0,COLOR00FFFF;{63水火既济-阳阴阳阴阳阴}
DRAWTEXT(x3 and s7,HIGH*1.04,'贲'),ALIGN0,COLOR00FFFF;{73火山贲-阳阴阳阴阴阳}
DRAWTEXT(x3 and s8,HIGH*1.08,'明\n夷'),ALIGN0,COLOR00FFFF;{83地火明夷-阳阴阳阴阴阴}
//震宫八卦,肉粉色系
DRAWTEXT(x4 and s1,HIGH*1.08,'无\n妄'),ALIGN0,COLORCCCCFF;{14天雷无妄-阳阴阴阳阳阳}
DRAWTEXT(x4 and s2,HIGH*1.04,'随'),ALIGN0,COLORCCCCFF;{24泽雷随-阳阴阴阳阳阴}
DRAWTEXT(x4 and s3,HIGH*1.08,'噬\n嗑'),ALIGN0,COLORCCCCFF;{34火雷噬嗑-阳阴阴阳阴阳}
DRAWTEXT(x4 and s4,HIGH*1.04,'震'),ALIGN0,COLORCCCCFF;{44震为雷-阳阴阴阳阴阴}
DRAWTEXT(x4 and s5,HIGH*1.04,'益'),ALIGN0,COLORCCCCFF;{54风雷益-阳阴阴阴阳阳}
DRAWTEXT(x4 and s6,HIGH*1.04,'屯'),ALIGN0,COLORCCCCFF;{64水雷屯-阳阴阴阴阳阴}
DRAWTEXT(x4 and s7,HIGH*1.04,'颐'),ALIGN0,COLORCCCCFF;{74山雷颐-阳阴阴阴阴阳}
DRAWTEXT(x4 and s8,HIGH*1.04,'复'),ALIGN0,COLORCCCCFF;{84地雷复-阳阴阴阴阴阴}
//巽宫八卦,紫色系
DRAWTEXT(x5 and s1,HIGH*1.04,'姤'),ALIGN0,COLORFF00FF;{15天风姤-阴阳阳阳阳阳}
DRAWTEXT(x5 and s2,HIGH*1.08,'大\n过'),ALIGN0,COLORFF00FF;{25泽风大过-阴阳阳阳阳阴}
DRAWTEXT(x5 and s3,HIGH*1.04,'鼎'),ALIGN0,COLORFF00FF;{35火风鼎-阴阳阳阳阴阳}
DRAWTEXT(x5 and s4,HIGH*1.04,'恒'),ALIGN0,COLORFF00FF;{45雷风恒-阴阳阳阳阴阴}
DRAWTEXT(x5 and s5,HIGH*1.04,'巽'),ALIGN0,COLORFF00FF;{55巽为风-阴阳阳阴阳阳}
DRAWTEXT(x5 and s6,HIGH*1.04,'井'),ALIGN0,COLORFF00FF;{65水风井-阴阳阳阴阳阴}
DRAWTEXT(x5 and s7,HIGH*1.04,'蛊'),ALIGN0,COLORFF00FF;{75山风蛊-阴阳阳阴阴阳}
DRAWTEXT(x5 and s8,HIGH*1.04,'升'),ALIGN0,COLORFF00FF;{85地风升-阴阳阳阴阴阴}
//坎宫八卦,浅灰色系
DRAWTEXT(x6 and s1,HIGH*1.04,'讼'),ALIGN0,COLORFFEADD;{16天水讼-阴阳阴阳阳阳}
DRAWTEXT(x6 and s2,HIGH*1.04,'困'),ALIGN0,COLORFFEADD;{26泽水困-阴阳阴阳阳阴}
DRAWTEXT(x6 and s3,HIGH*1.08,'末\n济'),ALIGN0,COLORFFEADD;{36火水末济-阴阳阴阳阴阳}
DRAWTEXT(x6 and s4,HIGH*1.04,'解'),ALIGN0,COLORFFEADD;{46雷水解-阴阳阴阳阴阴}
DRAWTEXT(x6 and s5,HIGH*1.04,'涣'),ALIGN0,COLORFFEADD;{56风水涣-阴阳阴阴阳阳}
DRAWTEXT(x6 and s6,HIGH*1.04,'坎'),ALIGN0,COLORFFEADD;{66坎为水-阴阳阴阴阳阴}
DRAWTEXT(x6 and s7,HIGH*1.04,'蒙'),ALIGN0,COLORFFEADD;{76山水蒙-阴阳阴阴阴阳}
DRAWTEXT(x6 and s8,HIGH*1.04,'师'),ALIGN0,COLORFFEADD;{86地水师-阴阳阴阴阴阴}
//艮宫八卦,浅兰色系
DRAWTEXT(x7 and s1,HIGH*1.04,'遯'),ALIGN0,COLORFFFF00;{17天山遯-阴阴阳阳阳阳}
DRAWTEXT(x7 and s2,HIGH*1.04,'咸'),ALIGN0,COLORFFF300;{27泽山咸-阴阴阳阳阳阴}
DRAWTEXT(x7 and s3,HIGH*1.04,'旅'),ALIGN0,COLORFFE500;{37火山旅-阴阴阳阳阴阳}
DRAWTEXT(x7 and s4,HIGH*1.08,'小\n过'),ALIGN0,COLORFFDB00;{47雷山小过-阴阴阳阳阴阴}
DRAWTEXT(x7 and s5,HIGH*1.04,'渐'),ALIGN0,COLORFFAB00;{57风山渐-阴阴阳阴阳阳}
DRAWTEXT(x7 and s6,HIGH*1.04,'蹇'),ALIGN0,COLORFF9800;{67水山蹇-阴阴阳阴阳阴}
DRAWTEXT(x7 and s7,HIGH*1.04,'艮'),ALIGN0,COLOREE9800;{77艮为山-阴阴阳阴阴阳}
DRAWTEXT(x7 and s8,HIGH*1.04,'谦'),ALIGN0,COLORCC9800;{87地山谦-阴阴阳阴阴阴}
//坤宫八卦,浅咖啡色系
DRAWTEXT(x8 and s1,HIGH*1.04,'否'),ALIGN0,COLOR90A9C1;{18天地否-阴阴阴阳阳阳}
DRAWTEXT(x8 and s2,HIGH*1.04,'萃'),ALIGN0,COLOR90A9C1;{28泽地萃-阴阴阴阳阳阴}
DRAWTEXT(x8 and s3,HIGH*1.04,'晋'),ALIGN0,COLOR90A9C1;{38火地晋-阴阴阴阳阴阳}
DRAWTEXT(x8 and s4,HIGH*1.04,'豫'),ALIGN0,COLOR90A9C1;{48雷地豫-阴阴阴阳阴阴}
DRAWTEXT(x8 and s5,HIGH*1.04,'观'),ALIGN0,COLOR90A9C1;{58风地观-阴阴阴阴阳阳}
DRAWTEXT(x8 and s6,HIGH*1.04,'比'),ALIGN0,COLOR90A9C1;{68水地比-阴阴阴阴阳阴}
DRAWTEXT(x8 and s7,HIGH*1.04,'剥'),ALIGN0,COLOR90A9C1;{78山地剥-阴阴阴阴阴阴阳}
DRAWTEXT(x8 and s8,HIGH*1.04,'坤'),ALIGN0,COLOR90A9C1;{88坤为地-阴阴阴阴阴阴}















学易杂谈──易经六十四卦卦序初探

有关易经六十四卦之卦序,粗看起来应是早已有权威性定论的课题。在易传十翼中就有一篇<序卦传>专门论述六十四卦的排列顺序及意义,应是不容置疑的。但是,仔细分析,事情不是这么简单。因为,众所周知,易传部分的出现要比易经部份晚了数百年,跨越了一个不容忽略的历史时代。事实上,现在的通行本易经是一本“捆绑式”的著作,它是由“易经”和“易传”两个不同的部份捆绑而成。后者是数百年后的后人对前者的批注、诠释和演绎。研究时两者是不能等同看待的。譬如今人为<红楼梦>写的许多论文未必符合曹雪芹的原意一样。
通行本的卦序来自<序卦传>,乾、坤、屯、蒙、需、讼……是春秋时期仁义道德礼教兴起时的产物,偏重于哲理。这未必符合西周时期生成的<易经>的原意。1973年马王堆汉墓出土的帛书<周易>就着不同的顺序:键(乾)、妇(否)、掾(遯)、礼(履)、讼、同人……这是一个以不同的宫排在一起的比较接近原本思想的序列。
其实根据二进制数原理,六十四卦的阴阳爻组合本身就明确指定了自身固有的序列,而这一序列才是真正表示出易经排序的含义。下面仅以阴爻为0,阳爻为1,由下而上,由右而左,即构成二进制数序,通常称为伏羲卦数。对这一卦数作上天下地、上阳下阴重新排出序列,与其它通行本、帛书和纳甲法序列对比列表如下(蓝的是消息卦)。作为占筮的依据,此序列对理解卦象卦义,或会更合原意一些。这样一个序列内中有些甚么奥妙呢?是值得探讨的问题。

          二进制    八进制  汉墓帛书  通行本  纳甲法   邵雍易数
─────────────────────────────────────────
1.        乾为天  111111   77    1     1    1     1
2.        天风姤  111110   76    8    44    2    33
3.        天火同人 111101   75    6    13   48    17
4.        天山遯  111100   74    3    33    3    49
5.        天泽履  111011   73    4    10   22     9
6.        天水讼  111010   72    5     6   47    41
7.        天雷无妄 111001   71    7    25   37    25
8.        天地否  111000   70    2    12    4    57
9.        风天小畜 110111   67   58     9   34     5
10.        巽为风  110110   66   57    57   33    37
11.        风火家人 110101   65   63    37   35    21
12.        风山渐  110100   64   60    53   24    53
13.        风泽中孚 110011   63   61    61   23    13
14.        风水涣  110010   62   62    59   46    45
15.        风雷益  110001   61   64    42   36    29
16.        风地观  110000   60   59    20    5    61
17.        火天大有 101111   57   50    14    8     3
18.        火风鼎  101110   56   56    50   43    35
19.        离为火  101101   55   49    30    41    19
20.        火山旅  101100   54   52    56    42    51
21.        火泽睽  101011   53   53    38    21    11
22.        火水未济 101010   52   54    64    44    43
23.        火雷噬嗑 101001   51   55    21    38    27
24.        火地晋  101000   50   51    35     7    59
25.        山天大畜 100111   47   10    26    19     7
26.        山风蛊  100110   46   16    18    40    39
27.        山火贲  100101   45   14    22    18    23
28.        艮为山  100100   44    9    52    17    55
29.        山泽损  100011   43   12    41    20    15
30.        山水蒙  100010   42   13     4    45    47
31.        山雷颐  100001   41   15    27    39    31
32.        山地剥  100000   40   11    23     6    63
33.        泽天夬  011111   37   42    43    54     2
34.        泽风大过 011110   36   48    28    31    34
35.        泽火革  011101   35   46    49    13    18
36.        泽山咸  011100   34   44    31    60    50
37.        兑为泽  011011   33   41    51    57    10
38.        泽水困  011010   32   45    47    58    42
39.        泽雷随  011001   31   47    17    32    26
40.        泽地萃  011000   30   43    45    59    58
41.        水天需  010111   27   18     5    55     6
42.        水风井  010110   26   24    48    30    38
43.        水火既济 010101   25   22    63    12    22
44.        水山蹇  010100   24   20    39    61    54
45.        水泽节  010011   23   21    60    10    14
46.        坎为水  010010   22   17    29     9    46
47.        水雷屯  010001   21   23     3    11    30
48.        水地比  010000   20   19     8    56    62
49.        雷天大壮 001111   17   26    34    53     4
50.        雷风恒  001110   16   32    32    28    36
51.        雷火丰  001101   15   31    55    14    20
52.        雷山小过 001100   14   28    62    64    52
53.        雷泽归妹 001011   13   29    54    63    12
54.        雷水解  001010   12   30    40    27    44
55.        震为雷  001001   11   25    51    25    28
56.        雷地豫  001000   10   27    16    26    60
57.        地天泰  000111   07   34    11    52     8
58.        地风升  000110   06   40    46    29    40
59.        地火明夷 000101   05   38    36    15    24
60.        地山谦  000100   04   35    15    62    56
61.        地泽临  000011   03   36    19    51    16
62.        地水师  000010   02   37     7    16    48
63.        地雷复  000001   01   39    24    50    32
64.        坤为地  000000   00   33     2    49    64
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

发表于 2006-8-8 22:50 | 显示全部楼层
实际你将日线数据进行了概率排序分类,共64种可能,实际上如果光日线这么一个量,预测不会太好,一般55-60%正确吧,我用的数学方法叫MCMC方法,比较复杂,简单的说如果光用一个量,如你的日线数据,相当于无穷种可能(你是64种),不过应该差别不大,因为许多都是小概率,主要的就10来种,所以如果你改变一些数据,对结果影响不大。
建议你把成交量加入进去,和日线数据一起排序,不过如果还是按照你现在排,需要64*64,太大了,建议你将日线减少到8-12种,成交量为6-8种,这样整个也就64种左右。





原帖由 张溪溪 于 2006-8-8 12:04 发表
现将源代码传上,作者:梦闲阁主,)input:p1(1,0,1),p2(1,0,1);//P1=0,按常规K线开收定阴阳爻,P1=1,按张东生-常秉义方法定阴阳爻;P2=0,按K线顺序排卦,左为初爻,右为上爻,P2=1,按K线逆序排卦
//在副图上显 ...
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

 楼主| 发表于 2006-8-8 23:46 | 显示全部楼层

我这里系统程序跟成交量没有任何关系,

金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

 楼主| 发表于 2006-8-9 00:03 | 显示全部楼层

因为涨,跌不变定律是一种必然规律,所以没有必要再特意研究成交量,

它的组合级数是2的n次方,yaosongshen 你所讲的:如你的日线数据,相当于无穷种可能,是如何判断的

有何根据,另:你所讲:因为许多都是小概率是指什么?在国际金融市场,外汇是没有成交量的,

如果只用一个编码来判断,它的概律确实只有50-60%,我在前些帖子里已谈及:信息和信息位,它们的

信息位是不同的,还有,你的mcm方法的宗旨是什么??
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

 楼主| 发表于 2006-8-9 14:32 | 显示全部楼层

计算机分析,预测系统应该有通用规则和特殊规则

也许以上帖子语言表达的不够准确,以下作综合陈述:

1:数据处理:计算机分析,预测系统根据数据挖掘原理,把历史数据进行归纳,整理和总结,找出其内

在的,关联的变化规律,由于数据本身就存在一定的误差,(有界随机偏差,

数据缺失,)所以用概律统计的方法剔除其中的错误,这样生成的结果是一种理想状态和实际是有距离

的,:mad:

2:当股票,期货,外汇,由于一些特定的原因产生一定的偏差时(当然这种偏差市场会自

动修正),计算机分析,预测系统的预测结果和实际不吻合,谁对,谁错?而且会持续一段时间,所以如

果不能有效判断正常规律和有界随机偏差,就会对自己的预测系统产生怀疑:mad:

如何区分仍是不可小视的很重要问题否则正确率上不去,

所以计算机分析,预测系统必需要有通用规则和特殊规则,请大家讨论和赐教,
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

发表于 2006-8-9 23:00 | 显示全部楼层
mcmc是 markov chain monte carlo方法,在你的方法是用6个交易日,每个交易日2种可能(涨为1,跌为0),共有64种可能,其实如果把你这种办法扩大为N个交易日,每个交易日m种可能,总的可能为p1=m^n,这是对一个量,即日线所为,但是如果有其他的量也对涨跌有贡献,那么就有P2,P3,P4....等等,如果总共有L个量,总的可能有P=P1*p2*p3...*PL,这么多的可能当然不可能每种都列出来,就只好用markov chain monte carlo方法来模拟了,具体这个方法有点复杂,如果你有兴趣,你可以找点参考文献看看,或者我可以发几篇文献给你。

许多都是小概率是指比如连涨6日,或者连跌6日等,大概几千天也就一,二个把。


原帖由 张溪溪 于 2006-8-9 00:03 发表
它的组合级数是2的n次方,yaosongshen 你所讲的:如你的日线数据,相当于无穷种可能,是如何判断的

有何根据,另:你所讲:因为许多都是小概率是指什么?在国际金融市场,外汇是没有成交量的,

如果只用一个编码来判 ...
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

 楼主| 发表于 2006-8-10 08:48 | 显示全部楼层

许多都是小概率是指比如连涨6日,或者连跌6日等,大概几千天也就一,二个把

我已理解你讲的小概律,出现的概律很小,我想是认识思唯的问题,如连涨6日,或者连跌6日等决不是小概律

它是一种正常的涨,跌摸式,你千万别觉得可以忽略它,一般连涨6日,或者连跌6日并不是特例最多可到连涨

连跌13日,因为:111111或000000本身就具备自我复制的特性,而其它编码是不具备自我复制的特性的,
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

 楼主| 发表于 2006-8-10 19:47 | 显示全部楼层

yaosongshen :

mcmc是 markov chain monte carlo方法,能扼要讲一下其基本方法,另:输入什么,输出什么,
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

发表于 2006-8-10 21:16 | 显示全部楼层
这个方法有许多数学书有,简单说就是用monte carlo在一定模式下找所有的可能,你在Google下找一下,我这有些文献,不过需要一些数学知识才能看,最基本只能看书了。


原帖由 张溪溪 于 2006-8-10 19:47 发表
mcmc是 markov chain monte carlo方法,能扼要讲一下其基本方法,另:输入什么,输出什么,
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

 楼主| 发表于 2006-8-10 21:31 | 显示全部楼层

又找到一个更新的原码,不知哪位朋友要的大家看看吧,也许会有用的

EXPLAIN(c<>0,'*******************************************');
KBZ:=INTPART(OPEN);{取得开盘整数部分}
KBX:=INTPART(FRACPART(OPEN)*100+0.5);{取得开盘小数部分}
KBZA:=NUMBERSUM(KBZ,0);{开盘价整数部分各数字之和}
KBXA:=NUMBERSUM(KBX,0);{开盘价小数部分各数字之和}
KBZB:=IF(KBZA>16,KBZA-16,KBZA);
KBXB:=IF(KBXA>16,KBXA-16,KBXA);
KBZC:=IF(KBZB>8,KBZB-8,KBZB);{主卦上卦数}
KBXC:=IF(KBXB>8,KBXB-8,KBXB);{主卦下卦数}
KBXC:=IF(KBXC=0,8,KBXC);{主卦下卦数}
SBZ:=INTPART(CLOSE);{取得收盘整数部分}
SBX:=INTPART(FRACPART(CLOSE)*100+0.5);{取得收盘小数部分}
SBZA:=NUMBERSUM(SBZ,0);{收盘价整数部分各数字之和}
SBXA:=NUMBERSUM(SBX,0);{收盘价小数部分各数字之和}
SBZB:=IF(SBZA>16,SBZA-16,SBZA);
SBXB:=IF(SBXA>16,SBXA-16,SBXA);
SBZC:=IF(SBZB>8,SBZB-8,SBZB);{变卦上卦数}
SBXC:=IF(SBXB>8,SBXB-8,SBXB);{变卦下卦数}
SBXC:=IF(SBXC=0,8,SBXC);{变卦下卦数}
GA1:='乾';
GA2:='兑';
GA3:='离';
GA4:='震';
GA5:='巽';
GA6:='坎';
GA7:='艮';
GA8:='坤';
t1:='';
tt1:='';
t2:='';
tt2:='';
t3:='';
tt3:='';
t4:='';
tt4:='';
t5:='';
tt5:='';
t6:='';
tt6:='';
t7:='';
tt7:='';
t8:='';
tt8:='';
t3:=IF(KBZC=1 ,GA1,t3);{求主卦上卦}
t3:=IF(KBZC=2 ,GA2,t3);
t3:=IF(KBZC=3 ,GA3,t3);
t3:=IF(KBZC=4 ,GA4,t3);
t3:=IF(KBZC=5 ,GA5,t3);
t3:=IF(KBZC=6 ,GA6,t3);
t3:=IF(KBZC=7 ,GA7,t3);
t3:=IF(KBZC=8 ,GA8,t3);
tt3:=if(t3='乾','111',tt3);{求主卦上卦二进制代码}
tt3:=if(t3='兑','110',tt3);
tt3:=if(t3='离','101',tt3);
tt3:=if(t3='震','100',tt3);
tt3:=if(t3='巽','011',tt3);
tt3:=if(t3='坎','010',tt3);
tt3:=if(t3='艮','001',tt3);
tt3:=if(t3='坤','000',tt3);
t6:=IF(KBXC=1 ,GA1,t6);{求主卦下卦}
t6:=IF(KBXC=2 ,GA2,t6);
t6:=IF(KBXC=3 ,GA3,t6);
t6:=IF(KBXC=4 ,GA4,t6);
t6:=IF(KBXC=5 ,GA5,t6);
t6:=IF(KBXC=6 ,GA6,t6);
t6:=IF(KBXC=7 ,GA7,t6);
t6:=IF(KBXC=8 ,GA8,t6);
tt6:=if(t6='乾','111',tt6);{求主卦下卦二进制代码}
tt6:=if(t6='兑','110',tt6);
tt6:=if(t6='离','101',tt6);
tt6:=if(t6='震','100',tt6);
tt6:=if(t6='巽','011',tt6);
tt6:=if(t6='坎','010',tt6);
tt6:=if(t6='艮','001',tt6);
tt6:=if(t6='坤','000',tt6);
t4:=IF(SBZC=1 ,GA1,t4);{求变卦上卦}
t4:=IF(SBZC=2 ,GA2,t4);
t4:=IF(SBZC=3 ,GA3,t4);
t4:=IF(SBZC=4 ,GA4,t4);
t4:=IF(SBZC=5 ,GA5,t4);
t4:=IF(SBZC=6 ,GA6,t4);
t4:=IF(SBZC=7 ,GA7,t4);
t4:=IF(SBZC=8 ,GA8,t4);
tt4:=if(t4='乾','111',tt4);
tt4:=if(t4='兑','110',tt4);
tt4:=if(t4='离','101',tt4);
tt4:=if(t4='震','100',tt4);
tt4:=if(t4='巽','011',tt4);
tt4:=if(t4='坎','010',tt4);
tt4:=if(t4='艮','001',tt4);
tt4:=if(t4='坤','000',tt4);
t2:=IF(SBXC=1 ,GA1,t2);{求变卦下卦}
t2:=IF(SBXC=2 ,GA2,t2);
t2:=IF(SBXC=3 ,GA3,t2);
t2:=IF(SBXC=4 ,GA4,t2);
t2:=IF(SBXC=5 ,GA5,t2);
t2:=IF(SBXC=6 ,GA6,t2);
t2:=IF(SBXC=7 ,GA7,t2);
t2:=IF(SBXC=8 ,GA8,t2);
tt2:=if(t2='乾','111',tt2);
tt2:=if(t2='兑','110',tt2);
tt2:=if(t2='离','101',tt2);
tt2:=if(t2='震','100',tt2);
tt2:=if(t2='巽','011',tt2);
tt2:=if(t2='坎','010',tt2);
tt2:=if(t2='艮','001',tt2);
tt2:=if(t2='坤','000',tt2);
t5:=STRRIGHT(tt6,1)+STRLEFT(tt3,2);{求主卦的互上卦}
tt5:=if(t5='111','乾',tt5);
tt5:=if(t5='110','兑',tt5);
tt5:=if(t5='101','离',tt5);
tt5:=if(t5='100','震',tt5);
tt5:=if(t5='011','巽',tt5);
tt5:=if(t5='010','坎',tt5);
tt5:=if(t5='001','艮',tt5);
tt5:=if(t5='000','坤',tt5);
t8:=STRRIGHT(tt6,2)+STRLEFT(tt3,1);{求主卦的互下卦}
tt8:=if(t8='111','乾',tt8);
tt8:=if(t8='110','兑',tt8);
tt8:=if(t8='101','离',tt8);
tt8:=if(t8='100','震',tt8);
tt8:=if(t8='011','巽',tt8);
tt8:=if(t8='010','坎',tt8);
tt8:=if(t8='001','艮',tt8);
tt8:=if(t8='000','坤',tt8);
t7:=STRRIGHT(tt2,1)+STRLEFT(tt4,2);{求变卦的互上卦}
tt7:=if(t7='111','乾',tt7);
tt7:=if(t7='110','兑',tt7);
tt7:=if(t7='101','离',tt7);
tt7:=if(t7='100','震',tt7);
tt7:=if(t7='011','巽',tt7);
tt7:=if(t7='010','坎',tt7);
tt7:=if(t7='001','艮',tt7);
tt7:=if(t7='000','坤',tt7);
t1:=STRRIGHT(tt2,2)+STRLEFT(tt4,1);{求变卦的互下卦}
tt1:=if(t1='111','乾',tt1);
tt1:=if(t1='110','兑',tt1);
tt1:=if(t1='101','离',tt1);
tt1:=if(t1='100','震',tt1);
tt1:=if(t1='011','巽',tt1);
tt1:=if(t1='010','坎',tt1);
tt1:=if(t1='001','艮',tt1);
tt1:=if(t1='000','坤',tt1);
tanb:='天盘:'+tt1+' '+t2+' '+t3+' '+t4+' '+tt5+' '+t6+' '+tt7+' '+tt8;
EXPLAIN(c,tanb);
d1:='乾';
d2:='兑';
d3:='离';
d4:='震';
d5:='巽';
d6:='坎';
d7:='艮';
d8:='坤';
d:='地盘:'+d1+' '+d2+' '+d3+' '+d4+' '+d5+' '+d6+' '+d7+' '+d8;
EXPLAIN(c,d);
EXPLAIN(c<>0,'-------------------------------------------');
kxgx:='';
kxgx:=if(h-c=0 and l-o=0 and (c>o or (c=o and ref(c,1)<=c)) ,'乾',kxgx);
kxgx:=if(h-c<>0 and l-o=0 and (c>o or (c=o and ref(c,1)<=c)),'兑',kxgx);
kxgx:=if(h-c<>0 and l-o<>0 and (c>o or (c=o and ref(c,1)<=c)),'离',kxgx);
kxgx:=if(h-o=0 and l-c<>0 and (c<o or (c=o and ref(c,1)>=c)),'震',kxgx);
kxgx:=if(h-c=0 and l-o<>0 and (c>o or (c=o and ref(c,1)<=c)),'巽',kxgx);
kxgx:=if(h-o<>0 and l-c<>0 and (c<o or (c=o and ref(c,1)>=c)),'坎',kxgx);
kxgx:=if(h-o<>0 and l-c=0 and (c<o or (c=o and ref(c,1)>=c)),'艮',kxgx);
kxgx:=if(h-o=0 and l-c=0 and (c<o or (c=o and ref(c,1)>=c)),'坤',kxgx);
gong:='';
gong:=if(kxgx='乾',d1,gong);
gong:=if(kxgx='兑',d2,gong);
gong:=if(kxgx='离',d3,gong);
gong:=if(kxgx='震',d4,gong);
gong:=if(kxgx='巽',d5,gong);
gong:=if(kxgx='坎',d6,gong);
gong:=if(kxgx='艮',d7,gong);
gong:=if(kxgx='坤',d8,gong);
gonga:='用宫:'+gong+'宫';
EXPLAIN(c,gonga);
EXPLAIN(c<>0,'-------------------------------------------');
tg1:=gong;
tg1:=if(gong=d1 and tt1<>gong,tt1,tg1);
tg1:=if(d1=tt1 and tg1='',tt1,tg1);
tg1:=if(gong=d2 and t2<>gong,t2,tg1);
tg1:=if(d2=t2 and tg1='',t2,tg1);
tg1:=if(gong=d3 and t3<>gong,t3,tg1);
tg1:=if(d3=t3 and tg1='',t3,tg1);
tg1:=if(gong=d4 and t4<>gong,t4,tg1);
tg1:=if(d4=t4 and tg1='',t4,tg1);
tg1:=if(gong=d5 and tt5<>gong,tt5,tg1);
tg1:=if(d5=tt5 and tg1='',tt5,tg1);
tg1:=if(gong=d6 and t6<>gong,t6,tg1);
tg1:=if(d6=t6 and tg1='',t6,tg1);
tg1:=if(gong=d7 and tt7<>gong,tt7,tg1);
tg1:=if(d7=tt7 and tg1='',tt7,tg1);
tg1:=if(gong=d8 and tt8<>gong,tt8,tg1);
tg1:=if(d8=tt8 and tg1='',tt8,tg1);
dp1:=gong;
tg:=if(tg1=dp1,'旁推法推宫结果:','正推法推宫结果:');
ttg1:='';
ttg1:=if(tg1=dp1 and tg1='震','巽',ttg1);  
ttg1:=if(tg1=dp1 and tg1='艮','兑',ttg1);
ttg1:=if(tg1=dp1 and tg1='离','坎',ttg1);
ttg1:=if(tg1=dp1 and tg1='乾','坤',ttg1);
ttg1:=if(tg1=dp1 and tg1='坤' and ttg1='','乾',ttg1);  
ttg1:=if(tg1=dp1 and tg1='坎' and ttg1='','离',ttg1);
ttg1:=if(tg1=dp1 and tg1='兑' and ttg1='','艮',ttg1);
ttg1:=if(tg1=dp1 and tg1='巽' and ttg1='','震',ttg1);
tg1:=if(tg1=dp1,ttg1,tg1);
EXPLAIN(c,tg);
tg2:=tg1;
tg2:=if(d1=tg1 and tt1<>tg1,tt1,tg2);
tg2:=if(d2=tg1 and t2<>tg1,t2,tg2);
tg2:=if(d3=tg1 and t3<>tg1,t3,tg2);
tg2:=if(d4=tg1 and t4<>tg1,t4,tg2);
tg2:=if(d5=tg1 and t5<>tg1,tt5,tg2);
tg2:=if(d6=tg1 and t6<>tg1,t6,tg2);
tg2:=if(d7=tg1 and t7<>tg1,tt7,tg2);
tg2:=if(d8=tg1 and t8<>tg1,tt8,tg2);
dp2:=if(tg2<>tg1,tg1,dp1);
dp2:=if(dp2=tg2,dp1,dp2);
tg2:=if(tg2=dp1 and dp2=tg1,tg1,tg2);
dp2:=if(tg2=tg1 and dp2=tg1,dp1,dp2);
tg3:=tg2;
tg3:=if(d1=tg2 and tt1<>tg1 and tt1<>tg2,tt1,tg3);
tg3:=if(d2=tg2 and t2<>tg1 and t2<>tg2,t2,tg3);
tg3:=if(d3=tg2 and t3<>tg1 and t3<>tg2,t3,tg3);
tg3:=if(d4=tg2 and t4<>tg1 and t4<>tg2,t4,tg3);
tg3:=if(d5=tg2 and tt5<>tg1 and tt5<>tg2,tt5,tg3);
tg3:=if(d6=tg2 and t6<>tg1 and t6<>tg2,t6,tg3);
tg3:=if(d7=tg2 and tt7<>tg1 and tt7<>tg2,tt7,tg3);
tg3:=if(d8=tg2 and tt8<>tg1 and tt8<>tg2,tt8,tg3);
dp3:=if(tg3<>tg2 and tg3<>tg1,tg2,dp2);
dp3:=if(dp3=tg3,dp2,dp3);
tg3:=if(tg3=dp2 and dp3=tg2,tg2,tg3);
dp3:=if(tg3=tg2 and dp3=tg2,dp2,dp3);
tg3:=if(tg='旁推法推宫结果:',tg2,tg3);
dp3:=if(tg='旁推法推宫结果:',dp2,dp3);
tg4:=tg3;
tg4:=if(d1=tg3 and tt1<>tg1 and tt1<>tg2 and tt1<>tg3,tt1,tg4);
tg4:=if(d2=tg3 and t2<>tg1 and t2<>tg2 and t2<>tg3,t2,tg4);
tg4:=if(d3=tg3 and t3<>tg1 and t3<>tg2 and t3<>tg3,t3,tg4);
tg4:=if(d4=tg3 and t4<>tg1 and t4<>tg2 and t4<>tg3,t4,tg4);
tg4:=if(d5=tg3 and tt5<>tg1 and tt5<>tg2 and tt5<>tg3,tt5,tg4);
tg4:=if(d6=tg3 and t6<>tg1 and t6<>tg2 and t6<>tg3,t6,tg4);
tg4:=if(d7=tg3 and tt7<>tg1 and tt7<>tg2 and tt7<>tg3,tt7,tg4);
tg4:=if(d8=tg3 and tt8<>tg1 and tt8<>tg2 and tt8<>tg3,tt8,tg4);
dp4:=if(tg4<>tg3 and tg4<>tg2 and tg4<>tg1,tg3,dp3);
dp4:=if(dp4=tg4,dp3,dp4);
tg4:=if(tg4=dp3 and dp4=tg3,tg3,tg4);
dp4:=if(tg4=tg3 and dp4=tg3,dp3,dp4);
tg4:=if(tg='旁推法推宫结果:',tg2,tg4);
dp4:=if(tg='旁推法推宫结果:',dp2,dp4);
tg5:=tg4;
tg5:=if(d1=tg4 and tt1<>tg1 and tt1<>tg2 and tt1<>tg3 and tt1<>tg4,tt1,tg5);
tg5:=if(d2=tg4 and t2<>tg1 and t2<>tg2 and t2<>tg3 and t2<>tg4,t2,tg5);
tg5:=if(d3=tg4 and t3<>tg1 and t3<>tg2 and t3<>tg3 and t3<>tg4,t3,tg5);
tg5:=if(d4=tg4 and t4<>tg1 and t4<>tg2 and t4<>tg3 and t4<>tg4,t4,tg5);
tg5:=if(d5=tg4 and tt5<>tg1 and tt5<>tg2 and tt5<>tg3 and tt5<>tg4,tt5,tg5);
tg5:=if(d6=tg4 and t6<>tg1 and t6<>tg2 and t6<>tg3 and t6<>tg4,t6,tg5);
tg5:=if(d7=tg4 and tt7<>tg1 and tt7<>tg2 and tt7<>tg3 and tt7<>tg4,tt7,tg5);
tg5:=if(d8=tg4 and tt8<>tg1 and tt8<>tg2 and tt8<>tg3 and tt8<>tg4,tt8,tg5);
dp5:=if(tg5<>tg4 and tg5<>tg3 and tg5<>tg2 and tg5<>tg1,tg4,dp4);
dp5:=if(dp5=tg5,dp4,dp5);
tg5:=if(tg5=dp4 and dp5=tg4,tg4,tg5);
dp5:=if(tg5=tg4 and dp5=tg4,dp4,dp5);
tg5:=if(tg='旁推法推宫结果:',tg2,tg5);
dp5:=if(tg='旁推法推宫结果:',dp2,dp5);
tg6:=tg5;
tg6:=if(d1=tg5 and tt1<>tg1 and tt1<>tg2 and tt1<>tg3 and tt1<>tg4 and tt1<>tg5,tt1,tg6);
tg6:=if(d2=tg5 and t2<>tg1 and t2<>tg2 and t2<>tg3 and t2<>tg4 and t2<>tg5,t2,tg6);
tg6:=if(d3=tg5 and t3<>tg1 and t3<>tg2 and t3<>tg3 and t3<>tg4 and t3<>tg5,t3,tg6);
tg6:=if(d4=tg5 and t4<>tg1 and t4<>tg2 and t4<>tg3 and t4<>tg4 and t4<>tg5,t4,tg6);
tg6:=if(d5=tg5 and tt5<>tg1 and tt5<>tg2 and tt5<>tg3 and tt5<>tg4 and tt5<>tg5,tt5,tg6);
tg6:=if(d6=tg5 and t6<>tg1 and t6<>tg2 and t6<>tg3 and t6<>tg4 and t6<>tg5,t6,tg6);
tg6:=if(d7=tg5 and tt7<>tg1 and tt7<>tg2 and tt7<>tg3 and tt7<>tg4 and tt7<>tg5,tt7,tg6);
tg6:=if(d8=tg5 and tt8<>tg1 and tt8<>tg2 and tt8<>tg3 and tt8<>tg4 and tt8<>tg5,tt8,tg6);
dp6:=if(tg6<>tg5 and tg6<>tg4 and tg6<>tg3 and tg6<>tg2 and tg6<>tg1,tg5,dp5);
dp6:=if(dp6=tg6,dp5,dp6);
tg6:=if(tg6=dp5 and dp6=tg5,tg5,tg6);
dp6:=if(tg6=tg5 and dp6=tg5,dp5,dp6);
tg6:=if(tg='旁推法推宫结果:',tg2,tg6);
dp6:=if(tg='旁推法推宫结果:',dp2,dp6);
tg7:=tg6;
tg7:=if(d1=tg6 and tt1<>tg1 and tt1<>tg2 and tt1<>tg3 and tt1<>tg4 and tt1<>tg5 and tt1<>tg6,tt1,tg7);
tg7:=if(d2=tg6 and t2<>tg1 and t2<>tg2 and t2<>tg3 and t2<>tg4 and t2<>tg5 and t2<>tg6,t2,tg7);
tg7:=if(d3=tg6 and t3<>tg1 and t3<>tg2 and t3<>tg3 and t3<>tg4 and t3<>tg5 and t3<>tg6,t3,tg7);
tg7:=if(d4=tg6 and t4<>tg1 and t4<>tg2 and t4<>tg3 and t4<>tg4 and t4<>tg5 and t4<>tg6,t4,tg7);
tg7:=if(d5=tg6 and tt5<>tg1 and tt5<>tg2 and tt5<>tg3 and tt5<>tg4 and tt5<>tg5 and tt5<>tg6,tt5,tg7);
tg7:=if(d6=tg6 and t6<>tg1 and t6<>tg2 and t6<>tg3 and t6<>tg4 and t6<>tg5 and t6<>tg6,t6,tg7);
tg7:=if(d7=tg6 and tt7<>tg1 and tt7<>tg2 and tt7<>tg3 and tt7<>tg4 and tt7<>tg5 and tt7<>tg6,tt7,tg7);
tg7:=if(d8=tg6 and tt8<>tg1 and tt8<>tg2 and tt8<>tg3 and tt8<>tg4 and tt8<>tg5 and tt8<>tg6,tt8,tg7);
dp7:=if(tg7<>tg6 and tg7<>tg5 and tg7<>tg4 and tg7<>tg3 and tg7<>tg2 and tg7<>tg1,tg6,dp6);
dp7:=if(dp7=tg7,dp6,dp7);
tg7:=if(tg7=dp6 and dp7=tg6,tg6,tg7);
dp7:=if(tg7=tg6 and dp7=tg6,dp6,dp7);
tg7:=if(tg='旁推法推宫结果:',tg2,tg7);
dp7:=if(tg='旁推法推宫结果:',dp2,dp7);
tg8:=tg7;
tg8:=if(d1=tg7 and tt1<>tg1 and tt1<>tg2 and tt1<>tg3 and tt1<>tg4 and tt1<>tg5 and tt1<>tg6 and tt1<>tg7,tt1,tg8);
tg8:=if(d2=tg7 and t2<>tg1 and t2<>tg2 and t2<>tg3 and t2<>tg4 and t2<>tg5 and t2<>tg6 and t2<>tg7,t2,tg8);
tg8:=if(d3=tg7 and t3<>tg1 and t3<>tg2 and t3<>tg3 and t3<>tg4 and t3<>tg5 and t3<>tg6 and t3<>tg7,t3,tg8);
tg8:=if(d4=tg7 and t4<>tg1 and t4<>tg2 and t4<>tg3 and t4<>tg4 and t4<>tg5 and t4<>tg6 and t4<>tg7,t4,tg8);
tg8:=if(d5=tg7 and tt5<>tg1 and tt5<>tg2 and tt5<>tg3 and tt5<>tg4 and tt5<>tg5 and tt5<>tg6 and tt5<>tg7,tt5,tg8);
tg8:=if(d6=tg7 and t6<>tg1 and t6<>tg2 and t6<>tg3 and t6<>tg4 and t6<>tg5 and t6<>tg6 and t6<>tg7,t6,tg8);
tg8:=if(d7=tg7 and tt7<>tg1 and tt7<>tg2 and tt7<>tg3 and tt7<>tg4 and tt7<>tg5 and tt7<>tg6 and tt7<>tg7,tt7,tg8);
tg8:=if(d8=tg7 and tt8<>tg1 and tt8<>tg2 and tt8<>tg3 and tt8<>tg4 and tt8<>tg5 and tt8<>tg6 and tt8<>tg7,tt8,tg8);
dp8:=if(tg8<>tg7 and tg8<>tg6 and tg8<>tg5 and tg8<>tg4 and tg8<>tg3 and tg8<>tg2 and tg8<>tg1,tg7,dp7);
dp8:=if(dp8=tg8,dp7,dp8);
tg8:=if(tg8=dp7 and dp8=tg7,tg7,tg8);
dp8:=if(tg8=tg7 and dp8=tg7,dp7,dp8);
tg8:=if(tg='旁推法推宫结果:',tg2,tg8);
dp8:=if(tg='旁推法推宫结果:',dp2,dp8);
tg8:=if(tg8='乾','乾↑',tg8);
tg8:=if(tg8='艮','艮↑',tg8);
tg8:=if(tg8='离','离↑',tg8);
tg8:=if(tg8='震','震↑',tg8);
tg8:=if(tg8='坤','坤↓',tg8);
tg8:=if(tg8='巽','巽↓',tg8);
tg8:=if(tg8='坎','坎↓',tg8);
tg8:=if(tg8='兑','兑↓',tg8);
dp8:=if(dp8='乾','乾↑',dp8);
dp8:=if(dp8='艮','艮↑',dp8);
dp8:=if(dp8='离','离↑',dp8);
dp8:=if(dp8='震','震↑',dp8);
dp8:=if(dp8='坤','坤↓',dp8);
dp8:=if(dp8='巽','巽↓',dp8);
dp8:=if(dp8='坎','坎↓',dp8);
dp8:=if(dp8='兑','兑↓',dp8);
tgg8:='天盘:'+tg8;
dpp8:='地盘:'+dp8;
EXPLAIN(c,tgg8);
EXPLAIN(c,dpp8);
EXPLAIN(c<>0,'-------------------------------------------');
zd:='';
zd:=if(tg8='艮↑' and dp8='乾↑','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘艮卦也为阳为大幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为大幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='乾↑','根据涨跌两分法:天盘离卦为阴为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘离卦为阴为中幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为中到大幅上涨!',zd);
zd:=if(tg8='震↑' and dp8='乾↑','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘震卦为阳为小幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='乾↑' and dp8='艮↑','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘乾卦也为阳为大幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为大幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='艮↑','根据涨跌两分法:天盘离卦为阴为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘离卦为阴为中幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为中到大幅上涨!',zd);
zd:=if(dp8='艮↑','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘震卦为阳为小幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='乾↑' and dp8='震↑','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘乾卦为阳为大幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为大幅上涨!',zd);
zd:=if(tg8='艮↑' and dp8='震↑','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘艮卦为阳为大幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为大幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='震↑','根据涨跌两分法:天盘离卦为阴为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘离卦为阴为中幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为小到中幅上涨!',zd);
zd:=if(tg8='乾↑' and dp8='离↑','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘乾卦为阳为大幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为中到大幅上涨!',zd);
zd:=if(tg8='艮↑' and dp8='离↑','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘艮卦为阳为大幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为中到大幅上涨!',zd);
zd:=if(tg8='震↑' and dp8='离↑','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘震卦为阳为小幅,且力量向上方集中,为外引象。综合各方力量判断下一个交易周期为小到中幅上涨!',zd);
zd:=if(tg8='巽↓' and dp8='乾↑','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘巽卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='乾↑','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘兑卦为阴为大幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为大幅下跌!',zd);
zd:=if(tg8='坎↓' and dp8='乾↑','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘坎卦为阳为中幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);
zd:=if(tg8='坤↓' and dp8='乾↑','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘乾卦为阳为大幅、天盘坤卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='巽↓' and dp8='艮↑','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘巽卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为小到中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='艮↑','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘兑卦为阴为大幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为大幅下跌!',zd);
zd:=if( tg8='坎↓' and dp8='艮↑','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘坎卦为阳为中幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);


zd:=if(tg8='坤↓' and dp8='艮↑','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘艮卦为阳为大幅、天盘坤卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);
zd:=if(tg8='巽↓' and dp8='离↑','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘巽卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为小到中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='离↑','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘兑卦为阴为大幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为大幅下跌!',zd);
zd:=if(tg8='坎↓' and dp8='离↑','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘坎卦为阳为中幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);
zd:=if(tg8='坤↓' and dp8='离↑','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘离卦为阴为中幅、天盘坤卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='巽↓' and dp8='震↑','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘巽卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='震↑','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘兑卦为阴为大幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);
zd:=if(tg8='坎↓' and dp8='震↑','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘坎卦为阳为中幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='坤↓' and dp8='震↑','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘震卦为阳为小幅、天盘坤卦为阴为小幅,且力量向中心集中,为向心象,力量集中。综合各方力量判断下一个交易周期为中幅下跌!',zd);

zd:=if(tg8='巽↓' and dp8='兑↓','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘巽卦为阴为小幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='坎↓' and dp8='兑↓','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘坎卦为阳为中幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);
zd:=if(tg8='坤↓' and dp8='兑↓','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘坤卦为阴为小幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为小到中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='巽↓','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘兑卦为阴为大幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为大幅下跌!',zd);
zd:=if(tg8='坎↓' and dp8='巽↓','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘坎卦为阳为中幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为中到大幅下跌!',zd);
zd:=if(tg8='坤↓' and dp8='巽↓','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘坤卦为阴为小幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='巽↓' and dp8='坎↓','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘巽卦为阴为小幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='坎↓','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘兑卦为阴为大幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为大幅下跌!',zd);
zd:=if(tg8='坤↓' and dp8='坎↓','根据涨跌两分法:天盘坤卦为阴为下跌卦;而根据幅度三分法:天盘坤卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘坤卦为阴为小幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为小到中幅下跌!',zd);
zd:=if(tg8='巽↓' and dp8='坤↓','根据涨跌两分法:天盘巽卦为阴为下跌卦;而根据幅度三分法:天盘巽卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘巽卦为阴为小幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为中幅下跌!',zd);
zd:=if(tg8='兑↓' and dp8='坤↓','根据涨跌两分法:天盘兑卦为阴为下跌卦;而根据幅度三分法:天盘兑卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘兑卦为阴为大幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为大幅下跌!',zd);
zd:=if(tg8='坎↓' and dp8='坤↓','根据涨跌两分法:天盘坎卦为阳为下跌卦;而根据幅度三分法:天盘坎卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘坎卦为阴为中幅,且力量向下方集中,为内引象。综合各方力量判断下一个交易周期为大幅下跌!',zd);

zd:=if(tg8='乾↑' and dp8='巽↓','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘乾卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='巽↓','根据涨跌两分法:天盘离卦为阳为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘离卦为阴为中幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为小幅上涨!',zd);
zd:=if(tg8='艮↑' and dp8='巽↓','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘艮卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='震↑' and dp8='巽↓','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘巽卦为阴为小幅、天盘震卦为阳为小幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为微幅上涨!',zd);
zd:=if(tg8='乾↑' and dp8='兑↓','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘乾卦为阳为大幅,且力量向外分散,为离心象,力量不能集中,但地盘兑卦有喜悦之象,天盘乾卦又为阳为大幅。综合各方力量判断下一个交易周期为大幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='兑↓','根据涨跌两分法:天盘离卦为阳为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘离卦为阴为中幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为小幅上涨!',zd);
zd:=if(tg8='艮↑' and dp8='兑↓','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘艮卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='震↑' and dp8='兑↓','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘兑卦为阴为大幅、天盘震卦为阳为小幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为微幅上涨!',zd);
zd:=if(tg8='乾↑' and dp8='坎↓','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘乾卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='坎↓','根据涨跌两分法:天盘离卦为阳为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘离卦为阴为中幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为小幅上涨!',zd);


zd:=if(tg8='艮↑' and dp8='坎↓','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘艮卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。且坎为险,艮为止,上涨中途遇到险阻。综合各方力量判断下一个交易周期为小到中幅下跌!',zd);
zd:=if(tg8='震↑' and dp8='坎↓','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坎卦为阳为中幅、天盘震卦为阳为小幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为微幅上涨!',zd);
zd:=if(tg8='乾↑' and dp8='坤↓','根据涨跌两分法:天盘乾卦为阳为上涨卦;而根据幅度三分法:天盘乾卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘乾卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='离↑' and dp8='坤↓','根据涨跌两分法:天盘离卦为阳为上涨卦;而根据幅度三分法:天盘离卦涨跌幅度为中幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘离卦为阴为中幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为小幅上涨!',zd);
zd:=if(tg8='艮↑' and dp8='坤↓','根据涨跌两分法:天盘艮卦为阳为上涨卦;而根据幅度三分法:天盘艮卦涨跌幅度为大幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘艮卦为阳为大幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为中幅上涨!',zd);
zd:=if(tg8='震↑' and dp8='坤↓','根据涨跌两分法:天盘震卦为阳为上涨卦;而根据幅度三分法:天盘震卦涨跌幅度为小幅,但具体涨跌幅度还要结合地盘用和顺四象法判断;根据和顺四象法:地盘坤卦为阴为小幅、天盘震卦为阳为小幅,且力量向外分散,为离心象,力量不能集中。综合各方力量判断下一个交易周期为微幅下跌!',zd);
EXPLAIN(c,'小成图分析结果:');
EXPLAIN(c,zd);
EXPLAIN(c<>0,'*******************************************');
k:=sysparam(1)=barpos;{光标}
drawyitext(k and date,6,ganzhi(date,0,0),0)colorred align1;{年干支=5}
drawyitext(k and date,5,ganzhi(date,0,1),0)colorred align1;{月干支=5}
drawyitext(k and date,4,ganzhi(date,0,2),0)colorred align1;{日干支=5}
n:=3;{节气=n=3}
j1:=date-lsolartermdate(1)>=0;
jj1:=j1>ref(j1,1);
j2:=date-lsolartermdate(2)>=0;
jj2:=j2>ref(j2,1);
j3:=date-lsolartermdate(3)>=0;
jj3:=j3>ref(j3,1);
j4:=date-lsolartermdate(4)>=0;
jj4:=j4>ref(j4,1);
j5:=date-lsolartermdate(5)>=0;
jj5:=j5>ref(j5,1);
j6:=date-lsolartermdate(6)>=0;
jj6:=j6>ref(j6,1);
j7:=date-lsolartermdate(7)>=0;
jj7:=j7>ref(j7,1);
j8:=date-lsolartermdate(8)>=0;
jj8:=j8>ref(j8,1);
j9:=date-lsolartermdate(9)>=0;
jj9:=j9>ref(j9,1);
j10:=date-lsolartermdate(10)>=0;
jj10:=j10>ref(j10,1);
j11:=date-lsolartermdate(11)>=0;
jj11:=j11>ref(j11,1);
j12:=date-lsolartermdate(12)>=0;
jj12:=j12>ref(j12,1);
j13:=date-lsolartermdate(13)>=0;
jj13:=j13>ref(j13,1);
j14:=date-lsolartermdate(14)>=0;
jj14:=j14>ref(j14,1);
j15:=date-lsolartermdate(15)>=0;
jj15:=j15>ref(j15,1);
j16:=date-lsolartermdate(16)>=0;
jj16:=j16>ref(j16,1);
j17:=date-lsolartermdate(17)>=0;
jj17:=j17>ref(j17,1);
j18:=date-lsolartermdate(18)>=0;
jj18:=j18>ref(j18,1);
j19:=date-lsolartermdate(19)>=0;
jj19:=j19>ref(j19,1);
j20:=date-lsolartermdate(20)>=0;
jj20:=j20>ref(j20,1);
j21:=date-lsolartermdate(21)>=0;
jj21:=j21>ref(j21,1);
j22:=date-lsolartermdate(22)>=0;
jj22:=j22>ref(j22,1);
j23:=date-lsolartermdate(23)>=0;
jj23:=j23>ref(j23,1);
j24:=date-lsolartermdate(24)>=0;
jj24:=j24>ref(j24,1);
drawtext(jj1,n,'●小寒') coloryellow;
drawtext(jj2,n,'●大寒') coloryellow;
drawtext(jj3,n,'●立春') color71b255;
drawtext(jj4,n,'●雨水') color71b255;
drawtext(jj5,n,'●惊蛰') color71b255;
drawtext(jj6,n,'●春分') color71b255;
drawtext(jj7,n,'●清明') coloryellow;
drawtext(jj8,n,'●谷雨') coloryellow;
drawtext(jj9,n,'●立夏') colorred;
drawtext(jj10,n,'●小满') colorred;
drawtext(jj11,n,'●芒种') colorred;
drawtext(jj12,n,'●夏至') colorred;
drawtext(jj13,n,'●小暑') coloryellow;
drawtext(jj14,n,'●大暑') coloryellow;
drawtext(jj15,n,'●立秋') colorbbbbbb;
drawtext(jj16,n,'●处暑') colorbbbbbb;
drawtext(jj17,n,'●白露') colorbbbbbb;
drawtext(jj18,n,'●秋分') colorbbbbbb;
drawtext(jj19,n,'●寒露') coloryellow;
drawtext(jj20,n,'●霜降') coloryellow;
drawtext(jj21,n,'●立冬') colorcyan;
drawtext(jj22,n,'●小雪') colorcyan;
drawtext(jj23,n,'●大雪') colorcyan;
drawtext(jj24,n,'●冬至') colorcyan;
drawtext(lday=1,2,'●新月') coloryellow;
drawtext(lday=8,2,'●上弦') coloryellow;
drawtext(lday=15,2,'●满月') coloryellow;
drawtext(lday=23,2,'●下弦') coloryellow;
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

 楼主| 发表于 2006-8-10 21:36 | 显示全部楼层

这个原码只能用在飞狐交易师,

金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

 楼主| 发表于 2006-8-10 21:45 | 显示全部楼层

yaosongshen :

你在上帖中讲到:(不过如果还是按照你现在排,需要64*64,太大了),64*64在我这里是最小的组合级数,


如果,64*64就可以解决问题的话,那夜里作梦都会笑出声来了
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

发表于 2006-8-10 22:28 | 显示全部楼层
如果你有30年数据,大概6000多天吧,64*64大概4000多,也就是每种可能平均1-2个数据,所以许多可能只能为零,实际上可能并不是取得越多,结果越准确,现在主要问题是找到物理量,这个物理量对股票价格涨跌有主要影响,显然前几天的价格,成交量会起作用,但是也有其他量起作用,我现在在找,由于没有可参考的文献,只能一个个摸索。

你上面的程序没啥新东西,类似你以前的,方法都差不多,实际上八卦就是一个概率分配和排序的问题,很简单的。

原帖由 张溪溪 于 2006-8-10 21:45 发表
你在上帖中讲到:(不过如果还是按照你现在排,需要64*64,太大了),64*64在我这里是最小的组合级数,


如果,64*64就可以解决问题的话,那夜里作梦都会笑出声来了
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

 楼主| 发表于 2006-8-11 00:08 | 显示全部楼层

实际上八卦就是一个概率分配和排序的问题

二个问题讲的很好,概率分配和排序是问题的根本,如果排序能解决,涨,跌的模式就解决了,

除了周期和幅度还有什么需要解决呢??不清楚你是如何谈到的很简单的。
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

发表于 2006-8-11 01:29 | 显示全部楼层
如果股票涨跌类似是随机行走的,只要概率分配和排序就可以了,预测也解决了,是个Gaussian分布吧。
问题是股票的涨跌已经被数学证明不完全是随机行走的,这样的话,有些量(类似物理上的“力”)对这个过程起作用。
如果光用日线量来预测,正确率大概在55-65%左右;如果使用日线和成交量组合,大概在60-75%,个别股票能够达到80%,这说明影响股票走势确实有很多原因,某些“力”没有被我们所发现。
我现在一般使用日线和成交量组合,光日线效果不会好,我劝你不必在这上面浪费时间,MCMC方法搜索的概率排序比你的排序要全面的多,不信你可以用你的64排序法找几个股票试试,预测其下一交易日的涨跌,然后比较,你会发现无论你如何组合,正确率不会超过70%的。


原帖由 张溪溪 于 2006-8-11 00:08 发表
二个问题讲的很好,概率分配和排序是问题的根本,如果排序能解决,涨,跌的模式就解决了,

除了周期和幅度还有什么需要解决呢??不清楚你是如何谈到的很简单的。
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

签到天数: 1 天

发表于 2006-8-11 03:41 | 显示全部楼层
原帖由 yaosongshen 于 2006-8-2 22:54 发表
我现在主要用均价和平均成交量这2个量,5年数据,发现大盘股涨跌正确率在70%左右,小的不行,约为55-65%,最好的个股约为75%

你是说,你的马可夫链用当日的两个量,均价和平均成交量,作为输入序列,来统计明天涨或不涨的概率?

也许你是在讲用均价和平均成交量的变化百分比作为输入序列?

[ 本帖最后由 野狐禅 于 2006-8-11 04:19 编辑 ]
金币:
奖励:
热心:
注册时间:
2003-11-6

回复 使用道具 举报

 楼主| 发表于 2006-8-11 09:48 | 显示全部楼层

成交量组合

国际金融市场如外汇和外汇期货是没有成交量的,影响股市走势的因素是天干,地支和阴,阳五行,我在前几个

帖子里反复强调的,是天体物理作用的结果,成交量只是股价上升和下降的表象,
金币:
奖励:
热心:
注册时间:
2005-11-15

回复 使用道具 举报

发表于 2006-8-11 21:39 | 显示全部楼层
不是,一般用前几日的,成交量用3日平均的,均价和平均成交量的变化率取自然对数作为输入序列,也可以直接输入。
还可以加入一些非线性项,如乘积,平方,指数项等,不过不是对每个股票管用。

现在做的有些预测结果,最好涨跌正确率
600102, 79%
600231, 72%
600900,65%
600270,69%
000932, 73%
600019,69%
最小的误差(元)
600019  0.05
600900  0.10
000932  0.06
600231  0.06
600102  0.11
600900  0.10
买入点和卖出点计算,分别取环手率(100%,200%,300%)
你有兴趣再谈吧

原帖由 野狐禅 于 2006-8-11 03:41 发表

你是说,你的马可夫链用当日的两个量,均价和平均成交量,作为输入序列,来统计明天涨或不涨的概率?

也许你是在讲用均价和平均成交量的变化百分比作为输入序列?
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

发表于 2006-8-11 22:09 | 显示全部楼层
天体运行会影响地球气候,导致某些东西,如农作物的丰产或者减产,从而间接影响有关股票的走势,当然对期货影响更大,但是这个东西需要放到几百年的时间框架内,适合超长期的研究,但需要一个前提,就是经济环境基本保持。
天体运行对金融的影响是有人做,也是用的统计的方法,一般有好几百年的数据,我看到过对大豆产量的一些文章,用的是Bayesian网络方法。
你最好把你的天干地支变成一些更通俗的语言,如每10年,每20年一个周期,现在搞数学物理的那帮人特别讨厌古代的东西。

原帖由 张溪溪 于 2006-8-11 09:48 发表
国际金融市场如外汇和外汇期货是没有成交量的,影响股市走势的因素是天干,地支和阴,阳五行,我在前几个

帖子里反复强调的,是天体物理作用的结果,成交量只是股价上升和下降的表象,
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

发表于 2006-8-11 22:11 | 显示全部楼层
天体运行会影响地球气候,导致某些东西,如农作物的丰产或者减产,从而间接影响有关股票的走势,当然对期货影响更大,但是这个东西需要放到几百年的时间框架内,适合超长期的研究,但需要一个前提,就是经济环境基本保持。
天体运行对金融的影响是有人做,也是用的统计的方法,一般有好几百年的数据,我看到过对大豆产量的一些文章,用的是Bayesian网络方法。
你最好把你的天干地支变成一些更通俗的语言,如每10年,每20年一个周期,现在搞数学物理的那帮人特别讨厌古代的东西。

原帖由 张溪溪 于 2006-8-11 09:48 发表
国际金融市场如外汇和外汇期货是没有成交量的,影响股市走势的因素是天干,地支和阴,阳五行,我在前几个

帖子里反复强调的,是天体物理作用的结果,成交量只是股价上升和下降的表象,
金币:
奖励:
热心:
注册时间:
2006-7-27

回复 使用道具 举报

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

本版积分规则

本站声明:1、本站所有广告均与MACD无关;2、MACD仅提供交流平台,网友发布信息非MACD观点与意思表达,因网友发布的信息造成任何后果,均与MACD无关。
MACD俱乐部(1997-2019)官方域名:macd.cn   MACD网校(2006-2019)官方域名:macdwx.com
值班热线[9:00—17:30]:18292674919   24小时网站应急电话:18292674919
找回密码、投诉QQ:89918815 友情链接QQ:95008905 广告商务联系QQ:17017506 电话:18292674919
增值电信业务经营许可证: 陕ICP19026207号—2  陕ICP备20004035号

举报|意见反馈|Archiver|手机版|小黑屋|MACD俱乐部 ( 陕ICP备20004035号 )

GMT+8, 2024-6-3 21:53 , Processed in 0.070137 second(s), 8 queries , Redis On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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