【Warning:此贴已经过气】【挑战】用任何语言在猜数游戏作弊

codegay

回复 30# 523066680


    感觉是没有用，高频率请求对双方都有影响。
我不知道服务器是不是防火墙之类会检查高频率请求会封IP什么的。所以主动加了0.3秒的睡眠。
只要火力全开的应该都超过我。

codegay

回复 27# happy886rr


    主要还是懒。
但是只是能请求成功，对我来说不存在会拒绝这种事情。

happy886rr

回复 32# codegay
主要是网络质量会影响得分。

bbaa

回复 32# codegay

到时后可以做个题目TOKEN 的其他游戏 用：[http://bbaass.tk/Answer.php] [题库来源 https://aoaoao.me/]
反正API都做好了- -
最多数据库一下下

523066680

老刘不是发了个 图灵123 API 用来对接这里的问题不知道可否

好了，不赛跑了。代码：

1. use JSON;
   
2. use Encode;
   
3. use Try::Tiny;
   
4. use Data::Dumper;
   
5. use IO::Handle;
   
6. STDOUT->autoflush(1);
   
7. 
   
8. use LWP::Simple;
   
9. use LWP::UserAgent;
   
10. 
    
11. our $user = "vic2";
    
12. our $website = 'http://bbaass.tk/math/';
    
13. our $ua = LWP::UserAgent->new(  agent => 'Mozilla/5.0', timeout => 3 );
    
14. our $res;
    
15. 
    
16. BEGIN:
    
17. $res = $ua->post( $website, [ username => $user, send => 'reg' ] );
    
18. $res = $ua->post( $website, [ username => $user, send => 'user' ] );
    
19. 
    
20. my $min = 0;
    
21. my $max = 100;
    
22. my $test = int(($max + $min) / 2);
    
23. my $data;
    
24. 
    
25. $data = check($test);
    
26. my $tokens = $data->{'tokens'};
    
27. 
    
28. while ( $data->{re} ne "=" )
    
29. {
    
30.     $min = $test + 1 if ($data->{re} eq "<");
    
31.     $max = $test - 1 if ($data->{re} eq ">");
    
32. 
    
33.     $test = int(($max + $min) / 2);
    
34.     $data = check( $test );
    
35. 
    
36.     printf "min: %d max: %d, test: %d  %s, token: %s\n",
    
37.         $min, $max, $test, $data->{re}, $data->{tokens};
    
38. 
    
39.     if ( ($data->{tokens} ne $tokens) and $data->{re} ne "=" )
    
40.     {
    
41.         print "Tokens different, go back\n";
    
42.         goto BEGIN;
    
43.     }
    
44. }
    
45. 
    
46. print "Again\n";
    
47. goto BEGIN;
    
48. 
    
49. sub check
    
50. {
    
51.     my $data;
    
52.     my $res;
    
53. 
    
54.     while (1)
    
55.     {
    
56.         $res = $ua->post(
    
57.             $website,
    
58.             [ username => $user, send => 'Answer', math => $_[0] ],
    
59.         );
    
60. 
    
61.         try   { $data = decode_json( $res->content() ); last; }
    
62.         catch { sleep 3.0; print "Content error, try again.\n" }
    
63.     }
    
64. 
    
65.     return $data;
    
66. }
    

复制代码

codegay

网站挂了，快修。
我我我还要测试我的程序。

codegay

前几天网络出奇的好。忘记关程序，跑一晚上就有四千了。

codegay

我发现我网络差，经常超时的情况下，似乎数据经常重置啊。

可能和服务器处理超时的异常有关？
能不能改进一下？
或者改用sqlite数据库？

codegay

又重置。

bbaa

回复 39# codegay

    现在改成sql储存
现在在调试

happy886rr

回复 40# bbaa
你用的pdo还是mysqli，目前数据库没反应。

bbaa

回复 41# happy886rr


    之前有点急事出去....
    现在已经修复完成
    数据库存储
    以前太懒用.... 文件.....

bbaa

真是....
另外

1. {"Math":319137,"Tokens":"24893b1792fb4112cbc13856b42a13ce7a3bd264","Username":{"codegay":{"Count":2078,"stat":{"zt":"playing","Timestamp":1500374817}},"bbaa":{"Count":0,"stat":{"zt":"played","Timestamp":1500371612}}},"winer":"codegay"}

复制代码

谁来猜猜Math是原数字*多少得到的

codegay

回复 43# bbaa


    nim代码：

1. for r in 1..319137:
   
2.     for s in 1..319137:
   
3.         if r * s == 319137:
   
4.             echo r,"   ",s

复制代码

1. 1   319137
   
2. 3   106379
   
3. 7   45591
   
4. 13   24549
   
5. 21   15197
   
6. 39   8183
   
7. 49   6513
   
8. 91   3507
   
9. 147   2171
   
10. 167   1911
    
11. 273   1169
    
12. 501   637
    
13. 637   501
    
14. 1169   273
    
15. 1911   167
    
16. 2171   147
    
17. 3507   91
    
18. 6513   49
    
19. 8183   39
    
20. 15197   21
    
21. 24549   13
    
22. 45591   7
    
23. 106379   3

复制代码

我不理解，这个数字有什么意义吗？

codegay

哦，理解了，这个才是真正的作弊之道啊。