老刘1号

回复 22# bbaa


    晕，早说啊
算了，就酱紫吧～
懒得动手了～

bbaa

回复 19# 老刘1号


    添加tokens具体看 1#

老刘1号

回复 20# happy886rr


    嗯，猜20多次是因为服务端数字变更了(正常最多7次)
下标越界是服务器没返回JSON，导致无法分割得到符号
尴尬的是，0和100不在范围里面(失误，已修正)……
总之就是递归然后除2取整
当时一脑抽就用的递归而不是循环╮(╯_╰)╭
算是自己研发的变种了吧
感谢大佬鼓励<v<

happy886rr

回复 19# 老刘1号
不过偶尔还会出现下标越界。而且有几次计算了20多次才猜中正确的数，你的算法还不是标准二分，比较费内存。如果是猜测1到10000之内的数，你的程序就非常缓慢。 把那个递归取消了，有递归的都不是标准二分。

老刘1号

回复 1# bbaa
回复 18# codegay
回复 15# happy886rr
取平均数递归法，最多计算6次就可得出结果
欢迎测试～（存Bat）

'&cls&@echo off&cscript -nologo -e:vbscript "%~0"&pause&exit
With CreateObject("MSXML2.XMLHTTP")
	.Open "POST", "http://bbaass.tk/math/", False
	.setRequestHeader "CONTENT-TYPE","application/x-www-form-urlencoded"
	.Send "send=reg&username=老刘"
End With

Do
	Bisection -1,101,0
Loop

Sub Bisection(low,high,s)
	Mid_=(High+Low)\2
	if s<=7 then
		Select Case Cstr(Math(Mid_))
			Case "="
				wscript.echo "Win!The number is "&Mid_
			Case ">"
				WScript.Echo ">,so try "&Low&","&Mid_
				Bisection Low,Mid_,s+1
			Case "<"
				WScript.Echo "<,so try "&Mid_&","&High
				Bisection Mid_,High,s+1
		End Select
	end if
End Sub

Function Math(num)
	With CreateObject("MSXML2.XMLHTTP")
		.Open "POST","http://bbaass.tk/math/", False
		.setRequestHeader "CONTENT-TYPE","application/x-www-form-urlencoded"
		.send "send=Answer&math=" & num & "&username=老刘"
		Math = Split(Split(.responseText,",")(2),"""")(3)
	End With
End Function
复制代码

codegay

回复 17# bbaa


    举手，我干过。

bbaa

回复 14# 老刘1号


    之前崩的原因是有个空用户名的家伙........

unset($json["Username"][""]);
复制代码

bbaa

回复 15# happy886rr


    排查完毕

happy886rr

回复 11# codegay
在你的requests.Session()基础上改的。（外链效果图）

import requests

# 用户信息
userNAMZE='Psaa'

# 主机地址
hostURL='http://bbaass.tk/math/'

# 提交数据
postDATA={'send':'Answer', 'username':userNAMZE, 'math':50}

# 注册用户名
requests.Session().post(hostURL, {'send':'reg', 'username':userNAMZE})

# 辗转移位
def GuessFun(mathMIN, mathMAX):
	# 搜索次数
	searchTIMES=0
	while mathMAX-mathMIN >1:
		postDATA['math'] = (mathMAX+mathMIN)>>1
		searchTIMES +=1
		print("The %d times"%(searchTIMES))
		r = requests.Session().post(hostURL, postDATA).json()
		ret = r['re']
		if ret == '=':
			break
		elif ret == '<':
			mathMIN=postDATA['math']
		else:
			mathMAX=postDATA['math']
	return searchTIMES

# 打印结果
if __name__ == "__main__":
	searchTIMES = GuessFun(-1, 101)
	print("Search times: %d\nGuess the number: %d"%(searchTIMES, postDATA['math']))
复制代码

老刘1号

回复 13# codegay


    确实崩了，楼主说的……
vbs表示下标越界

codegay

程序是不是崩了。一直返回500

老刘1号

回复 10# happy886rr


    改进了下，欢迎测试

codegay

回复 10# happy886rr


   有空来写一个看看。我不会写呢。

happy886rr

回复 9# 老刘1号
算法有问题，这不是正宗的二分，是递归。

老刘1号

取平均数递归法
在19楼是最新的防溢出与更改的版本：http://www.bathome.net/redirect.php?goto=findpost&ptid=44616&pid=200845