破釜沉舟论坛 » 编程开发 » 求助高手编程

2006-4-14 15:10 北方军
求助高手编程

[size=6]各位编程高手:你们好.我刚刚用了一款3D彩票分析软件..里面有几个指标.要编程序.本人一窍不通.想请这里的高手们帮忙编一下.不知有没有人肯帮.[url]http://www.szcp01.com/bbs/list.asp?l_id=2[/url][/size]

2006-4-14 16:36 fmx
可惜我也是菜鸟.

2006-4-14 16:52 心在滴血0
不会啊

2006-4-14 23:48 祥子
请给出你详细的需求

2006-4-15 08:57 北方军
先谢谢祥子.

2006-4-15 09:12 北方军
[size=5]比如.094期开奖号码是605. 095期的开奖号码是237. 094期的百位为6,十位为0.个位为5.同理095期的百位为2.十位为3.个位为7..我要的指标是两期百个位和尾(和尾就是两个数相加取它的个位,如9+6=15.和尾为5).百十位和尾.十个位和尾.的振幅(两个数相减差的绝对值.)指标.如.094期的百个位和尾为:6+5=11和尾为1.095期百个位和尾为2+7=9,和尾为9.则094期与095期的百个位和尾振幅为11-9=2.[/size]

2006-4-15 09:21 北方军
这个指标是百位振幅.是论坛上一些编程高手编的.有个问题,就是在年与年的交结处有错误,3D彩票共开了1500多期.这个指标在新的一年就又显示为第一期.不会累记.不知能不能给修改一下.复制如下:
Public Function Bwzf(A,B,C,ISSUE)
dim na,nb,nc,myDate,Index

Index = GetIndex(Issue-1)

myDate = GetDataByIndex(Index,"ABC")

na=Left(myDate,1)
nb=Right(myDate,2)
nb=Left(nb,1)
nc=Right(myDate,1)

bwzf=abs(clng(a)-clng(na))


End Function

2006-4-15 09:27 北方军
附图

2006-4-15 13:17 北方军
[size=6][color=red][font=隶书]请求各位大侠帮忙.谢谢![/font]!![/color][/size]

2006-4-18 13:21 祥子
构造一个类型,这个类型的取值范围就是每年期数的范围

然后写一个死循环就可以了~
比如:
while True
然后在达到条件时Break就可以

2006-4-23 22:19 北方军
[quote][b]引用第9楼[i]祥子[/i]于[i]2006-04-18 13:21[/i]发表的“”[/b]:
构造一个类型,这个类型的取值范围就是每年期数的范围

然后写一个死循环就可以了~
比如:
while True
.......[/quote]
谢谢祥子,可惜我不懂啊.有时间能否帮忙编一下?

2006-4-24 11:52 祥子
首先,我不是很懂你的需求,
第二,你给的代码里,有很多是别人写的函数,没有说明,也没有函数代码,不明白是什么意思,用来干什么。

我现在的理解就是,要实现的仅仅只是一个期数转换问题:
得到本期期号,再判断下期期号是多少。如果本期期号已是当年最后一期,那么下期期就是1,否则下期期号就是本期期号加1。至于其他的运算,直接套用公式即可。

2006-4-26 22:51 北方军
谢谢祥子,下面是百个和尾振幅的指标,是我仿照其他人的和尾振幅指标编的.一切正常.只是和前面的百位振幅一样,还是有同样的问题.不会累计期数.指标里"Public Function bghwzf(a,b,c,issue)"  bghwzf是百个和尾振幅的意思 ;A,B,C,不管大小写都是代表开奖号码的百位,十位,个位;bghw1:表示上一期百个和尾;bghw2是代表本期开奖号码的百个和尾数;mod 10应该是取尾的意思,比如14取4.那么百个和尾振幅(bghwzf)就等于上一期的百个尾(bghw1)减去本期的百个和尾(bghw2).其余的应该是死公式了.不知关于开奖期数不累计该怎么更改.麻烦帮帮忙.


Public Function bghwzf(a,b,c,issue)
dim na,nb,nc,myDate,Index,nIndex,bghw1,bghw2
Index=GetIndex(Issue-1)
myDate=GetDataByIndex(Index,"ABC")
na=Left(myDate,1)
nb=Right(myDate,2)
nb=Left(nb,1)
nc=Right(myDate,1)
bghw1=(clng(na)+clng(nc)) mod 10
bghw2=(clng(a)+clng(c)) mod 10
bghwzf=abs(bghw1-bghw2)
End Function

2006-4-26 23:06 北方军
这是正常累计的软件指标,显示共开了1542期.

2006-4-26 23:11 北方军
这是百个和尾振幅指标,不累计.一年结束,从1开始.到现在是107期.

2006-4-27 20:11 祥子
你的意思是要实现所有期数的累记,也就是人为给它编号?
在新的一年的第一期要是上一年的最后一期的期人为编号+1,是不是这个意思?

2006-4-27 23:05 北方军
[quote][b]引用第15楼[i]祥子[/i]于[i]2006-04-27 20:11[/i]发表的“”[/b]:
你的意思是要实现所有期数的累记,也就是人为给它编号?
在新的一年的第一期要是上一年的最后一期的期人为编号+1,是不是这个意思?[/quote]
就是这个意思,要所有期数累计.不要一年完了又重新开始.

2006-4-27 23:38 祥子
那你的期数就直接写到数据库好了,先取到最后一条的期号,写的时候,用追加,直接对其+1不就可以了

2006-4-28 09:36 北方军
[quote][b]引用第17楼[i]祥子[/i]于[i]2006-04-27 23:38[/i]发表的“”[/b]:
那你的期数就直接写到数据库好了,先取到最后一条的期号,写的时候,用追加,直接对其+1不就可以了[/quote]
数据库的代码是不可查看的,其它的指标期数都能正常显示,只要是振幅指标(前后两期相减差的绝对值),期数就不会累计.不知是不是指标编的有问题?

2006-4-28 20:12 祥子
你的这些数据不从数据库中取,你又怎么得到?

页: [1] 2
查看完整版本: 求助高手编程


Powered by Discuz! Archiver 5.5.0  © 2001-2006 Comsenz Inc.