自游代答插件TC调用方法

自由的风

1. namespace 自游代答
   
2. 答题对象, 题号, 发送时间, 答案
   
3. 主帐号, 主帐号密码
   
4. 子帐号, 子帐号密码
   
5. 答题卡, 文件路径, 超时最小值
   
6. 
   
7. function 初始化()
   
8.    
   
9.     //注册插件      
   
10.     if(help.regdll(system.getprocesspath()  & "\\zydd.dll",true)==false)
    
11.         help.messagebox("答题插件注册失败")
    
12.         help.exit()
    
13.     endif
    
14.    
    
15.     //创建对象
    
16.     答题对象 = com("zy.zydd")
    
17.    
    
18.    
    
19.     //********************
    
20.     主帐号 = "测试"        //网站注册的帐号
    
21.     主帐号密码 = "123456"
    
22.     子帐号 = "test"
    
23.     子帐号密码 = "123456"
    
24.     答题卡 = "ADDIQZOLZDRCUGCBFCHBMHSE"
    
25.     文件路径 = help.getrcpath("rc:yzm.bmp")
    
26.     超时最小值 = 60
    
27.     //********************
    
28.    
    
29.     //初始设置
    
30.     //********************
    
31.     //调用一次即可，非必要
    
32.     //参数1：请求方式 0异步（默认） 1同步
    
33.     //参数2：异步等待时间 默认10000毫秒
    
34.     //参数3：日志路径 默认插件同级目录
    
35.     ret = 答题对象.InitialSet(0, 10000, "D:\\zydd.log")
    
36.     if(ret==1)
    
37.         list.addstring("list1","初始设置成功")
    
38.     else
    
39.         list.addstring("list1","初始设置失败")
    
40.     endif
    
41.    
    
42. endfunction
    
43. 
    
44. function button1_click()//发送文件（答题卡），该函数调用最小间隔时间为1秒
    
45.     题号 = 答题对象.SendFile(主帐号, "", "", "", 答题卡, 1001, 文件路径, 超时最小值)
    
46.     if ( str.strleng(题号) == 16)
    
47.         list.addstring("list1","发送成功，题目编号：" & 题号)
    
48.         list.addstring("list1","答题卡当前剩余题分：" & 答题对象.GetCredits(题号))
    
49.     else
    
50.         list.addstring("list1","发送失败，错误信息：" & 答题对象.GetErrInfo(题号))
    
51.     endif
    
52.     发送时间 = datetime.now()      
    
53. endfunction
    
54. 
    
55. function button2_click()//发送文件（子帐号），该函数调用最小间隔时间为1秒
    
56.     题号 = 答题对象.SendFile(主帐号, "", 子帐号, 子帐号密码, "", 1001, 文件路径, 超时最小值)
    
57.     if ( str.strleng(题号) == 16)
    
58.         list.addstring("list1","发送成功，题目编号：" & 题号)
    
59.         list.addstring("list1","子帐号当前剩余题分：" & 答题对象.GetCredits(题号))
    
60.     else
    
61.         list.addstring("list1","发送失败，错误信息：" & 答题对象.GetErrInfo(题号))
    
62.     endif
    
63.     发送时间 = datetime.now()
    
64. endfunction
    
65. 
    
66. function button3_click()//发送文件（主帐号），该函数调用最小间隔时间为1秒
    
67.     题号 = 答题对象.SendFile(主帐号, 主帐号密码, "", "", "", 1001, 文件路径, 超时最小值)
    
68.     if ( str.strleng(题号) == 16)
    
69.         list.addstring("list1","发送成功，题目编号：" & 题号)
    
70.         list.addstring("list1","主帐号当前剩余题分：" & 答题对象.GetCredits(题号))
    
71.     else
    
72.         list.addstring("list1","发送失败，错误信息：" & 答题对象.GetErrInfo(题号))
    
73.     endif
    
74.     发送时间 = datetime.now()
    
75. endfunction
    
76. 
    
77. function button4_click()//获取答案
    
78.     if ( str.strleng(题号) == 16)
    
79.         答案 = "#STA001"
    
80.         循环 (答案 == "#STA001")
    
81.             答案 = 答题对象.GetAnswer(题号)
    
82.             if (datetime.diff("s", 发送时间, datetime.now()) > 超时最小值)
    
83.                 答案 = "答题超时"
    
84.             endif
    
85.             help.sleep(500)
    
86.         循环结束
    
87.         list.addstring("list1","收到答案：" & 答案)
    
88.     else
    
89.         list.addstring("list1","题号错误")
    
90.     endif
    
91. endfunction
    
92. 
    
93. function button5_click()//答案报错
    
94.     //调用Report前先须判断答案对错，只有答案错误的才能调用
    
95.     //每个项目判断方式各有不同，如：
    
96.     //有的是出现新的验证码
    
97.     //有的是角色进入监狱
    
98.     //有的是角色掉线
    
99.     //……
    
100.     //……
     
101.     ret = 答题对象.Report(题号)
     
102.     if (ret == 1)
     
103.         list.addstring("list1","报错成功")
     
104.     else
     
105.         list.addstring("list1","报错失败")
     
106.     endif
     
107. endfunction
     
108. 
     
109. function button6_click()//子帐号注册
     
110.     list.addstring("list1",答题对象.Register(主帐号, 子帐号, 子帐号密码, 答题卡))
     
111. endfunction
     
112. 
     
113. function button7_click()//子帐号充值
     
114.     list.addstring("list1",答题对象.Pay(子帐号, 答题卡))
     
115. endfunction
     
116. 
     
117. function button8_click()//子帐号改密
     
118.     list.addstring("list1",答题对象.Password(子帐号, 子帐号密码, "654321"))
     
119. endfunction
     
120. 
     
121. endnamespace

复制代码

插件下载 http://dd.zyyou.com/doc/zydd.zip