倩女幽魂客户端辅助类小程序(附源码)：

山巔一寺一壺酒

使用须知：本帖贴出的任何程序（但不包括其他人共享给朋友们的，仅限于本帖下载）都不会访问游戏文件夹、获取游戏进程数据，全部都需要自己手动在程序上面输入，所以不会被拉小黑屋。
由于防止他人恶意修改源程序伪造成楼主发布的共享给他人，楼主对程序作了混淆打包
所以由于混淆打包工具限制，过期不能使用请联系楼主进行帖子更新，重新打包程序：
帖源码(仅限逻辑代码，视图排版代码不贴)是为了懂代码的朋友不放心楼主程序自己复制生成使用
（但是重新生成的程序信息与楼主生成的会有差异，因此楼主以及懂的人可以区分是否是他人恶意修改后的程序）

1.侠侣诗词复制：
程序：
侠侣1-1.zip (560.68 KB, 下载次数: 836)

2017-4-10 13:01 上传

点击文件名下载附件
最新版本下载(移除第三方加密[需要收费，有时间限制，并且增加了程序的大小]，采用微软Dotfuscated混淆[无时间限制，可永久使用]，降低程序大小)： 1_1.zip (5.77 KB, 下载次数: 689)

2017-5-22 14:21 上传

点击文件名下载附件
5-22

点击复制后，在答题框使用Ctrl+V粘贴即可
程序截图：

视频示例：

C#源码：

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.Drawing;
   
4. using System.Windows.Forms;
   
5. 
   
6. namespace _1_1
   
7. {
   
8.     public partial class Form1 : Form
   
9.     {
   
10.         private Dictionary<string, string> m_Text;
    
11.         private Dictionary<string, Button> m_btn;
    
12.         private Timer timer;
    
13.         private Dictionary<Button, DateTime> m_time;
    
14.         public Form1()
    
15.         {
    
16.             InitializeComponent();
    
17.         }
    
18. 
    
19.         private void Form1_Load(object sender, EventArgs e)
    
20.         {
    
21.             foreach (KeyValuePair<string, string> item in GetText)
    
22.             {
    
23.                 int index = panC.Controls.Find("key", false).Length;
    
24.                 int top = index * 30 + 10;
    
25.                 Label lab = new Label();
    
26.                 lab.Name = "key";
    
27.                 lab.Text = item.Key + ",";
    
28.                 lab.Left = 10;
    
29.                 lab.Top = top;
    
30.                 while (this.Height < (top + 60))
    
31.                 {
    
32.                     this.Height += 10;
    
33.                 }
    
34.                 panC.Controls.Add(lab);
    
35. 
    
36.                 Label result = new Label();
    
37.                 result.Name = "result";
    
38.                 result.Text = item.Value;
    
39.                 result.Left = lab.Left + lab.Width + 20;
    
40.                 result.Top = top;
    
41.                 panC.Controls.Add(result);
    
42. 
    
43.                 Button btn = new Button();
    
44.                 btn.Name = item.Key;
    
45.                 btn.Text = "复制";
    
46.                 btn.Click += Copy_Click;
    
47.                 btn.Left = result.Left + result.Width + 20;
    
48.                 btn.Top = top - 6;
    
49.                 panC.Controls.Add(btn);
    
50.             }
    
51.             this.Height += 30;
    
52.             Label lText = new Label();
    
53.             lText.Left = 10;
    
54.             lText.Width = 300;
    
55.             lText.Top = panC.Bottom - 30;
    
56.             panC.Controls.Add(lText);
    
57.             if (timer == null)
    
58.             {
    
59.                 timer = new Timer();
    
60.                 timer.Interval = 100;
    
61.                 timer.Tick += Timer_Sender;
    
62.                 timer.Start();
    
63.             }
    
64.         }
    
65.         private void Timer_Sender(object sender, EventArgs e)
    
66.         {
    
67.             if (ResetBtn.Count > 0)
    
68.             {
    
69.                 Dictionary<Button, DateTime> temp = new Dictionary<Button, DateTime>();
    
70.                 foreach (KeyValuePair<Button, DateTime> item in BtnTime)
    
71.                 {
    
72.                     if ((DateTime.Now - item.Value).Seconds < 3)
    
73.                     {
    
74.                         temp.Add(item.Key, item.Value);
    
75.                     }
    
76.                     else
    
77.                     {
    
78.                         item.Key.Text = "复制";
    
79.                         item.Key.ForeColor = Color.Black;
    
80.                         ResetBtn.Remove(item.Key.Name);
    
81.                     }
    
82.                 }
    
83.                 m_time = temp;
    
84.             }
    
85.         }
    
86.         private void Copy_Click(object sender, EventArgs e)
    
87.         {
    
88.             Button btn = sender as Button;
    
89.             Clipboard.SetDataObject(GetText[btn.Name]);
    
90.             btn.Text = "已复制";
    
91.             btn.ForeColor = Color.Red;
    
92.             if (!ResetBtn.ContainsKey(btn.Name))
    
93.                 ResetBtn.Add(btn.Name, btn);
    
94.             if (!BtnTime.ContainsKey(btn))
    
95.                 BtnTime.Add(btn, DateTime.Now);
    
96.             else
    
97.                 BtnTime[btn] = DateTime.Now;
    
98.         }
    
99.         private Dictionary<Button, DateTime> BtnTime
    
100.         {
     
101.             get
     
102.             {
     
103.                 if (m_time == null)
     
104.                     m_time = new Dictionary<Button, DateTime>();
     
105.                 return m_time;
     
106.             }
     
107.         }
     
108.         private Dictionary<string, Button> ResetBtn
     
109.         {
     
110.             get
     
111.             {
     
112.                 if(m_btn==null)
     
113.                 {
     
114.                     m_btn = new Dictionary<string, Button>();
     
115.                 }
     
116.                 return m_btn;
     
117.             }
     
118.         }
     
119.         private  Dictionary<string, string> GetText
     
120.         {
     
121.             get
     
122.             {
     
123.                 if (m_Text == null)
     
124.                 {
     
125.                     m_Text = new  Dictionary<string, string>();
     
126.                     m_Text.Add("七月七日长生殿", "夜半无人私语时");
     
127.                     m_Text.Add("金风雨露一相逢", "便胜却人间无数");
     
128.                     m_Text.Add("自是人间一周岁", "何妨天上只黄昏");
     
129.                     m_Text.Add("凉风吹玉露", "河汉有幽期");
     
130.                     m_Text.Add("妆成应懒织", "今夕渡河归");
     
131.                     m_Text.Add("云阶月地一相过", "未抵经年别恨多");
     
132.                     m_Text.Add("争将世上无期别", "换得年年一度来");
     
133.                     m_Text.Add("几许欢情与离恨", "年年并在此宵中");
     
134.                     m_Text.Add("仙裙玉佩空自知", "天上人间不相见");
     
135.                     m_Text.Add("河汉清且浅", "相去复几许");
     
136.                 }
     
137.                 return m_Text;
     
138.             }
     
139.         }
     
140.     }
     
141. }
     

复制代码

2.官府兵器计算器：
程序：
CopyAndComputing.zip (561.96 KB, 下载次数: 584)

2017-4-11 16:52 上传

点击文件名下载附件
最新版本下载(移除第三方加密[需要收费，有时间限制，并且增加了程序的大小]，采用微软Dotfuscated混淆[无时间限制，可永久使用]，降低程序大小)：
CopyAndComputing.zip (7.43 KB, 下载次数: 496)

2017-5-22 14:28 上传

点击文件名下载附件
5-22

程序截图：


源码：

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.ComponentModel;
   
4. using System.Data;
   
5. using System.Drawing;
   
6. using System.Text;
   
7. using System.Text.RegularExpressions;
   
8. using System.Windows.Forms;
   
9. 
   
10. namespace CopyAndComputing
    
11. {
    
12.     public partial class Computing : Form
    
13.     {
    
14.         public Computing()
    
15.         {
    
16.             InitializeComponent();
    
17.             AddStaticKeyValue();
    
18.         }
    
19.         private readonly Dictionary<byte, string> m_defaultText = new Dictionary<byte, string>();
    
20.         private readonly Dictionary<byte, Dictionary<byte, string>> m_text = new Dictionary<byte, Dictionary<byte, string>>();
    
21.         private void AddStaticKeyValue()
    
22.         {
    
23.             m_defaultText.Add(0, "第一个npc");
    
24.             m_defaultText.Add(1, "第二个npc");
    
25.             m_defaultText.Add(2, "第三个npc");
    
26.         }
    
27.         private void textbox_Enter_Click(object sender, EventArgs e)
    
28.         {
    
29.             TextBox tb = sender as TextBox;
    
30.             tb.ReadOnly = false;
    
31.             if (m_defaultText.ContainsValue(tb.Text))
    
32.                 tb.Text = "";
    
33.             else
    
34.                 tb.Select(tb.Text.Length, 0);
    
35. 
    
36.             if (m_text.Count > 0 && m_text.ContainsKey(0) && m_text[0].ContainsKey(0)
    
37.                 && m_text.ContainsKey(1) && m_text[1].ContainsKey(0)
    
38.                 && m_text.ContainsKey(2) && m_text[2].ContainsKey(0))
    
39.             {
    
40.                 panelTwo.Visible = true;
    
41.             }
    
42.             else
    
43.                 panelTwo.Visible = false;
    
44. 
    
45.             if (m_text.Count > 0 && m_text.ContainsKey(0) && m_text[0].ContainsKey(1)
    
46.                 && m_text.ContainsKey(1) && m_text[1].ContainsKey(1)
    
47.                 && m_text.ContainsKey(2) && m_text[2].ContainsKey(1))
    
48.             {
    
49.                 panelThree.Visible = true;
    
50.             }
    
51.             else
    
52.                 panelThree.Visible = false;
    
53.         }
    
54.         private bool isDouble_Click_Select = false;
    
55.         private void Double_Click(object sender, EventArgs e)
    
56.         {
    
57.             TextBox tb = sender as TextBox;
    
58.             if (!m_defaultText.ContainsValue(tb.Text))
    
59.             {
    
60.                 tb.Select(0, tb.Text.Length);
    
61.                 isDouble_Click_Select = true;
    
62.             }
    
63.         }
    
64.         private void textbox_Levae(object sender, EventArgs e)
    
65.         {
    
66.             #region
    
67.             if (string.IsNullOrEmpty((sender as TextBox).Text))
    
68.             {
    
69.                 textbox_Enter_Click(sender, e);
    
70.                 if ((sender as TextBox).Name.ToLower().EndsWith("one"))
    
71.                 {
    
72.                     (sender as TextBox).Text = m_defaultText[0];
    
73.                 }
    
74.                 else if ((sender as TextBox).Name.ToLower().EndsWith("two"))
    
75.                 {
    
76.                     (sender as TextBox).Text = m_defaultText[1];
    
77.                 }
    
78.                 else
    
79.                     (sender as TextBox).Text = m_defaultText[2];
    
80.             }
    
81.             #endregion
    
82.         }
    
83.         private int ComputResult(byte m)
    
84.         {
    
85.             if (!m_text.ContainsKey(m))
    
86.                 return 0;
    
87.             int result = 0;
    
88.             foreach (KeyValuePair<byte, string> value in m_text[m])
    
89.             {
    
90.                 int temp = 0;
    
91.                 int.TryParse(value.Value, out temp);
    
92.                 result += temp;
    
93.             }
    
94.             return result;
    
95.         }
    
96.         private void Key_Up(object sender, KeyEventArgs e)
    
97.         {
    
98.             if (!e.Control)
    
99.             {
    
100.                 if (!isDouble_Click_Select)
     
101.                 {
     
102.                     TextBox tb = sender as TextBox;
     
103.                     Regex regex = new Regex("\\d*");
     
104.                     tb.Text = regex.Match(tb.Text).Value;
     
105.                     tb.Select(tb.Text.Length, 0);
     
106.                     if (tb.Name.ToLower().StartsWith("txtweapons"))
     
107.                     {
     
108.                         Update_Texts(0, tb);
     
109.                         txtWeaponsResult.Text = ComputResult(0).ToString();
     
110.                     }
     
111.                     else if (tb.Name.ToLower().StartsWith("txtarmor"))
     
112.                     {
     
113.                         Update_Texts(1, tb);
     
114.                         txtArmorResult.Text = ComputResult(1).ToString();
     
115.                     }
     
116.                     else
     
117.                     {
     
118.                         Update_Texts(2, tb);
     
119.                         txtHorseResult.Text = ComputResult(2).ToString();
     
120.                     }
     
121.                     textbox_Enter_Click(sender, null);
     
122.                 }
     
123.                 else
     
124.                     isDouble_Click_Select = false;
     
125.             }
     
126.         }
     
127.         private void Update_Texts(byte m, TextBox tb)
     
128.         {
     
129.             if (tb.Name.ToLower().EndsWith("one"))
     
130.             {
     
131.                 Update_Text(m, 0, tb.Text);
     
132.             }
     
133.             else if (tb.Name.ToLower().EndsWith("two"))
     
134.             {
     
135.                 Update_Text(m, 1, tb.Text);
     
136.             }
     
137.             else
     
138.                 Update_Text(m, 2, tb.Text);
     
139.         }
     
140.         private void Update_Text(byte m, byte n, string value)
     
141.         {
     
142.             if (m_text.ContainsKey(m))
     
143.             {
     
144.                 if (m_text[m].ContainsKey(n))
     
145.                 {
     
146.                     if (string.IsNullOrEmpty(value))
     
147.                     {
     
148.                         m_text[m].Remove(n);
     
149.                     }
     
150.                     else
     
151.                         m_text[m][n] = value;
     
152.                 }
     
153.                 else if (!string.IsNullOrEmpty(value))
     
154.                     m_text[m].Add(n, value);
     
155.             }
     
156.             else if (!string.IsNullOrEmpty(value))
     
157.             {
     
158.                 Dictionary<byte, string> m_value = new Dictionary<byte, string>();
     
159.                 m_value.Add(n, value);
     
160.                 m_text.Add(m, m_value);
     
161.             }
     
162.         }
     
163.     }
     
164. }
     

复制代码

3.侠侣4-2计算器、提示打怪：（开发中、和朋友测怪物十位数的数据中..（有时间的朋友可以帮着测试数据的可以m我，我单独发给你们半成品程序测数据，谢谢）.）
程序：
(程序进度:可以提示接下来可以打的怪物（已经优化，按当前场景怪物的分数从高到低排序提示）不会出现混乱，目前需要大量数据测试十位数进行更正确的提示程序版本更换，界面迭代
第一版：（无打怪提示，需要切换窗口点击对应怪物以及开启怪物堆）


第二版：（取消语音输入[因兼容性不是很好]，取消怪物堆点击[需要首次点击]，增加快捷按钮[alt+1/2/3/4]   增加全局热键  比如不与游戏冲突的Ctrl+F   可以置顶窗口，不需要切换窗口，只需要使用全局热键即可）

十位数已经测试完毕，最后测试场景怪物数量上限后即可完善女方数据(男方已经测试完毕)，开始正式游戏通关视频录制，
最终版本已确定，试用中。。。。




4_2计数、推荐打怪、计算砸群：

楼主梅花小魅(符号忘记了)：秋殤淚別離景
侠侣4_2龙飞版.zip (20.34 KB, 下载次数: 577)

2017-5-22 16:17 上传

点击文件名下载附件
龙飞(可砸群)版：
侠侣4_2龙飞带砸群版.zip (21.04 KB, 下载次数: 536)

2017-6-5 13:22 上传

点击文件名下载附件
龙飞凤舞（可砸群版）： 龙飞凤舞砸群版.zip (21 KB, 下载次数: 638)

2017-6-12 17:19 上传

点击文件名下载附件

在此感谢与我一起测试数据的朋友    梅花：尘梦、花信

老司机专用

749419

虽然不知道楼猪在说什么，但是看起来好厉害的样子！

233书

111111111111111

红花丶

楼主是新学编程吧，这个动手写程序习惯不错。建议把诗词这种数据写在单独的配置文件里，这样如果内容更新用户可以自行修改，你写在代码里如果要更新只能重新编译

枯骨含血

只要不是钩子就没事。。要不然会封号

1799285709

一脸懵逼进来一脸茫然出去

山巔一寺一壺酒

靡所厎止 发表于 2018-10-15 16:24
懵逼  这小程序是干嘛用的

计数自己打了多少，该打哪个的

山巔一寺一壺酒

damo 发表于 2018-11-25 16:58
4-3可以搞个坐标控制的脚本通过视频通关记录的坐标节点。火球地方可以半自动。 ...

恩，那会被封的，，

山巔一寺一壺酒

じ☆ve尐笨蛋灬 发表于 2018-11-26 15:09

不会操作游戏，不会封号的

大二方

真的是技术贴。。。

じ☆ve尐笨蛋灬

damo

4-3可以搞个坐标控制的脚本通过视频通关记录的坐标节点。火球地方可以半自动。

靡所厎止

懵逼  这小程序是干嘛用的

影子侠

没看明白