|
马上注册,结交更多好友,享用更多功能,让你轻松玩转新倩女幽魂社区。
您需要 登录 才可以下载或查看,没有帐号?创建论坛帐号
x
本帖最后由 山巔一寺一壺酒 于 2017-6-12 17:19 编辑
使用须知:本帖贴出的任何程序(但不包括其他人共享给朋友们的,仅限于本帖下载)都不会访问游戏文件夹、获取游戏进程数据,全部都需要自己手动在程序上面输入,所以不会被拉小黑屋。
由于防止他人恶意修改源程序伪造成楼主发布的共享给他人,楼主对程序作了混淆打包
所以由于混淆打包工具限制,过期不能使用请联系楼主进行帖子更新,重新打包程序:
帖源码(仅限逻辑代码,视图排版代码不贴)是为了懂代码的朋友不放心楼主程序自己复制生成使用
(但是重新生成的程序信息与楼主生成的会有差异,因此楼主以及懂的人可以区分是否是他人恶意修改后的程序)
1.侠侣诗词复制:
程序:
侠侣1-1.zip
(560.68 KB, 下载次数: 879)
最新版本下载(移除第三方加密[需要收费,有时间限制,并且增加了程序的大小],采用微软Dotfuscated混淆[无时间限制,可永久使用],降低程序大小):
1_1.zip
(5.77 KB, 下载次数: 723)
点击复制后,在答题框使用Ctrl+V粘贴即可
程序截图:
视频示例:
C#源码:
- using System;
- using System.Collections.Generic;
- using System.Drawing;
- using System.Windows.Forms;
- namespace _1_1
- {
- public partial class Form1 : Form
- {
- private Dictionary<string, string> m_Text;
- private Dictionary<string, Button> m_btn;
- private Timer timer;
- private Dictionary<Button, DateTime> m_time;
- public Form1()
- {
- InitializeComponent();
- }
- private void Form1_Load(object sender, EventArgs e)
- {
- foreach (KeyValuePair<string, string> item in GetText)
- {
- int index = panC.Controls.Find("key", false).Length;
- int top = index * 30 + 10;
- Label lab = new Label();
- lab.Name = "key";
- lab.Text = item.Key + ",";
- lab.Left = 10;
- lab.Top = top;
- while (this.Height < (top + 60))
- {
- this.Height += 10;
- }
- panC.Controls.Add(lab);
- Label result = new Label();
- result.Name = "result";
- result.Text = item.Value;
- result.Left = lab.Left + lab.Width + 20;
- result.Top = top;
- panC.Controls.Add(result);
- Button btn = new Button();
- btn.Name = item.Key;
- btn.Text = "复制";
- btn.Click += Copy_Click;
- btn.Left = result.Left + result.Width + 20;
- btn.Top = top - 6;
- panC.Controls.Add(btn);
- }
- this.Height += 30;
- Label lText = new Label();
- lText.Left = 10;
- lText.Width = 300;
- lText.Top = panC.Bottom - 30;
- panC.Controls.Add(lText);
- if (timer == null)
- {
- timer = new Timer();
- timer.Interval = 100;
- timer.Tick += Timer_Sender;
- timer.Start();
- }
- }
- private void Timer_Sender(object sender, EventArgs e)
- {
- if (ResetBtn.Count > 0)
- {
- Dictionary<Button, DateTime> temp = new Dictionary<Button, DateTime>();
- foreach (KeyValuePair<Button, DateTime> item in BtnTime)
- {
- if ((DateTime.Now - item.Value).Seconds < 3)
- {
- temp.Add(item.Key, item.Value);
- }
- else
- {
- item.Key.Text = "复制";
- item.Key.ForeColor = Color.Black;
- ResetBtn.Remove(item.Key.Name);
- }
- }
- m_time = temp;
- }
- }
- private void Copy_Click(object sender, EventArgs e)
- {
- Button btn = sender as Button;
- Clipboard.SetDataObject(GetText[btn.Name]);
- btn.Text = "已复制";
- btn.ForeColor = Color.Red;
- if (!ResetBtn.ContainsKey(btn.Name))
- ResetBtn.Add(btn.Name, btn);
- if (!BtnTime.ContainsKey(btn))
- BtnTime.Add(btn, DateTime.Now);
- else
- BtnTime[btn] = DateTime.Now;
- }
- private Dictionary<Button, DateTime> BtnTime
- {
- get
- {
- if (m_time == null)
- m_time = new Dictionary<Button, DateTime>();
- return m_time;
- }
- }
- private Dictionary<string, Button> ResetBtn
- {
- get
- {
- if(m_btn==null)
- {
- m_btn = new Dictionary<string, Button>();
- }
- return m_btn;
- }
- }
- private Dictionary<string, string> GetText
- {
- get
- {
- if (m_Text == null)
- {
- m_Text = new Dictionary<string, string>();
- m_Text.Add("七月七日长生殿", "夜半无人私语时");
- m_Text.Add("金风雨露一相逢", "便胜却人间无数");
- m_Text.Add("自是人间一周岁", "何妨天上只黄昏");
- m_Text.Add("凉风吹玉露", "河汉有幽期");
- m_Text.Add("妆成应懒织", "今夕渡河归");
- m_Text.Add("云阶月地一相过", "未抵经年别恨多");
- m_Text.Add("争将世上无期别", "换得年年一度来");
- m_Text.Add("几许欢情与离恨", "年年并在此宵中");
- m_Text.Add("仙裙玉佩空自知", "天上人间不相见");
- m_Text.Add("河汉清且浅", "相去复几许");
- }
- return m_Text;
- }
- }
- }
- }
复制代码 2.官府兵器计算器:
程序:
CopyAndComputing.zip
(561.96 KB, 下载次数: 633)
最新版本下载(移除第三方加密[需要收费,有时间限制,并且增加了程序的大小],采用微软Dotfuscated混淆[无时间限制,可永久使用],降低程序大小):
CopyAndComputing.zip
(7.43 KB, 下载次数: 531)
程序截图:
源码:
- using System;
- using System.Collections.Generic;
- using System.ComponentModel;
- using System.Data;
- using System.Drawing;
- using System.Text;
- using System.Text.RegularExpressions;
- using System.Windows.Forms;
- namespace CopyAndComputing
- {
- public partial class Computing : Form
- {
- public Computing()
- {
- InitializeComponent();
- AddStaticKeyValue();
- }
- private readonly Dictionary<byte, string> m_defaultText = new Dictionary<byte, string>();
- private readonly Dictionary<byte, Dictionary<byte, string>> m_text = new Dictionary<byte, Dictionary<byte, string>>();
- private void AddStaticKeyValue()
- {
- m_defaultText.Add(0, "第一个npc");
- m_defaultText.Add(1, "第二个npc");
- m_defaultText.Add(2, "第三个npc");
- }
- private void textbox_Enter_Click(object sender, EventArgs e)
- {
- TextBox tb = sender as TextBox;
- tb.ReadOnly = false;
- if (m_defaultText.ContainsValue(tb.Text))
- tb.Text = "";
- else
- tb.Select(tb.Text.Length, 0);
- if (m_text.Count > 0 && m_text.ContainsKey(0) && m_text[0].ContainsKey(0)
- && m_text.ContainsKey(1) && m_text[1].ContainsKey(0)
- && m_text.ContainsKey(2) && m_text[2].ContainsKey(0))
- {
- panelTwo.Visible = true;
- }
- else
- panelTwo.Visible = false;
- if (m_text.Count > 0 && m_text.ContainsKey(0) && m_text[0].ContainsKey(1)
- && m_text.ContainsKey(1) && m_text[1].ContainsKey(1)
- && m_text.ContainsKey(2) && m_text[2].ContainsKey(1))
- {
- panelThree.Visible = true;
- }
- else
- panelThree.Visible = false;
- }
- private bool isDouble_Click_Select = false;
- private void Double_Click(object sender, EventArgs e)
- {
- TextBox tb = sender as TextBox;
- if (!m_defaultText.ContainsValue(tb.Text))
- {
- tb.Select(0, tb.Text.Length);
- isDouble_Click_Select = true;
- }
- }
- private void textbox_Levae(object sender, EventArgs e)
- {
- #region
- if (string.IsNullOrEmpty((sender as TextBox).Text))
- {
- textbox_Enter_Click(sender, e);
- if ((sender as TextBox).Name.ToLower().EndsWith("one"))
- {
- (sender as TextBox).Text = m_defaultText[0];
- }
- else if ((sender as TextBox).Name.ToLower().EndsWith("two"))
- {
- (sender as TextBox).Text = m_defaultText[1];
- }
- else
- (sender as TextBox).Text = m_defaultText[2];
- }
- #endregion
- }
- private int ComputResult(byte m)
- {
- if (!m_text.ContainsKey(m))
- return 0;
- int result = 0;
- foreach (KeyValuePair<byte, string> value in m_text[m])
- {
- int temp = 0;
- int.TryParse(value.Value, out temp);
- result += temp;
- }
- return result;
- }
- private void Key_Up(object sender, KeyEventArgs e)
- {
- if (!e.Control)
- {
- if (!isDouble_Click_Select)
- {
- TextBox tb = sender as TextBox;
- Regex regex = new Regex("\\d*");
- tb.Text = regex.Match(tb.Text).Value;
- tb.Select(tb.Text.Length, 0);
- if (tb.Name.ToLower().StartsWith("txtweapons"))
- {
- Update_Texts(0, tb);
- txtWeaponsResult.Text = ComputResult(0).ToString();
- }
- else if (tb.Name.ToLower().StartsWith("txtarmor"))
- {
- Update_Texts(1, tb);
- txtArmorResult.Text = ComputResult(1).ToString();
- }
- else
- {
- Update_Texts(2, tb);
- txtHorseResult.Text = ComputResult(2).ToString();
- }
- textbox_Enter_Click(sender, null);
- }
- else
- isDouble_Click_Select = false;
- }
- }
- private void Update_Texts(byte m, TextBox tb)
- {
- if (tb.Name.ToLower().EndsWith("one"))
- {
- Update_Text(m, 0, tb.Text);
- }
- else if (tb.Name.ToLower().EndsWith("two"))
- {
- Update_Text(m, 1, tb.Text);
- }
- else
- Update_Text(m, 2, tb.Text);
- }
- private void Update_Text(byte m, byte n, string value)
- {
- if (m_text.ContainsKey(m))
- {
- if (m_text[m].ContainsKey(n))
- {
- if (string.IsNullOrEmpty(value))
- {
- m_text[m].Remove(n);
- }
- else
- m_text[m][n] = value;
- }
- else if (!string.IsNullOrEmpty(value))
- m_text[m].Add(n, value);
- }
- else if (!string.IsNullOrEmpty(value))
- {
- Dictionary<byte, string> m_value = new Dictionary<byte, string>();
- m_value.Add(n, value);
- m_text.Add(m, m_value);
- }
- }
- }
- }
复制代码
3.侠侣4-2计算器、提示打怪:(开发中、和朋友测怪物十位数的数据中..(有时间的朋友可以帮着测试数据的可以m我,我单独发给你们半成品程序测数据,谢谢).)
程序:
(程序进度:可以提示接下来可以打的怪物(已经优化,按当前场景怪物的分数从高到低排序提示)不会出现混乱,目前需要大量数据测试十位数进行更正确的提示程序版本更换,界面迭代
第一版:(无打怪提示,需要切换窗口点击对应怪物以及开启怪物堆)
第二版:(取消语音输入[因兼容性不是很好],取消怪物堆点击[需要首次点击],增加快捷按钮[alt+1/2/3/4] 增加全局热键 比如不与游戏冲突的Ctrl+F 可以置顶窗口,不需要切换窗口,只需要使用全局热键即可)
十位数已经测试完毕,最后测试场景怪物数量上限后即可完善女方数据(男方已经测试完毕),开始正式游戏通关视频录制,
最终版本已确定,试用中。。。。
4_2计数、推荐打怪、计算砸群:
楼主梅花小魅(符号忘记了):秋殤淚別離景
侠侣4_2龙飞版.zip
(20.34 KB, 下载次数: 609)
龙飞(可砸群)版:
侠侣4_2龙飞带砸群版.zip
(21.04 KB, 下载次数: 566)
龙飞凤舞(可砸群版):
龙飞凤舞砸群版.zip
(21 KB, 下载次数: 671)
在此感谢与我一起测试数据的朋友 梅花:尘梦、花信
|
|