[原][C#][winForm]分级基金折溢价WinForm网络计算器

分级基金折溢价WinForm网络计算器：实时计算与套利策略

最新推荐文章于 2023-07-22 12:16:52 发布

weixin_30420305

最新推荐文章于 2023-07-22 12:16:52 发布

阅读量222

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/wangxinsheng/p/4540230.html

本博客介绍了一个分级基金折溢价WinForm网络计算器，该工具能从东方财富网、天天基金网、新浪网抓取数据，计算子基金和母基金的溢价率与折价率，辅助投资者进行套利操作。数据更新通常在晚间完成，适用于非实时计算。

分级基金折溢价WinForm网络计算器

通过子/母基金代码，从 [ 东方财富网，天天基金网，新浪 ] 抓取分级基金的子母基金数据（代码，名称，净值，价格），

并计算出子基金（A基金，B基金）以及母基金的溢价率与折价率，

便于投资/投机客从中套利。

数据通过网站获取，使用基金净值，非估值，一般晚间网站会更新当天基金净值，不可用于实时计算。

------

效果图：

----

代码：

1.窗体如效果图

2.常用变量与数据抓取代码：

 1 namespace fundGetAndCal
 2 {
 3     public static class CONST
 4     {
 5         //获取母子基金代码
 6         public static string fundF10Url = "http://fund.eastmoney.com/f10/jbgk_{%fundCode%}.html";
 7         //获取净值
 8         public static string fundValUrl = "http://fund.eastmoney.com/{%fundCode%}.html";
 9         //获取价格
10         public static string fundPriceUrl = "http://hq.sinajs.cn/?list={%fundAllCode%}";
11         //母子基金列表
12         public static List<string[]> allFunCodeLst;
13         //读取完了
14         public static bool okFlg = false;
15         //状态显示文字
16         public static string show = "就绪";
17         public static int barMax = 100;
18         public static int barNow = 100;
19 
20         public static string GetHtml(string url, Encoding encode)
21         {
22             string strBuff = "";//定义文本字符串，用来保存下载的html
23             try
24             {
25                 HttpWebRequest webRequest = (HttpWebRequest)WebRequest.Create(url);
26                 HttpWebResponse webResponse = (HttpWebResponse)webRequest.GetResponse();
27                 //若成功取得网页的内容，则以System.IO.Stream形式返回，若失败则产生ProtoclViolationException错 误。在此正确的做法应将以下的代码放到一个try块中处理。这里简单处理
28                 Stream reader = webResponse.GetResponseStream();
29                 ///返回的内容是Stream形式的，所以可以利用StreamReader类获取GetResponseStream的内容，并以StreamReader类的Read方法依次读取网页源程序代码每一行的内容，直至行尾（读取的编码格式：UTF8）
30                 StreamReader respStreamReader = new StreamReader(reader,/*Encoding.UTF8*/encode);
31 
32                 strBuff = respStreamReader.ReadToEnd();
33             }
34             catch (Exception e)
35             {
36                 Console.Write(url+"\n"+e.Message);
37             }
38             return strBuff;
39         }
40     }
41 }

3.窗体按钮等事件代码：

  1 namespace fundGetAndCal
  2 {
  3     public partial class Form1 : Form
  4     {
  5         public Form1()
  6         {
  7             InitializeComponent();
  8         }
  9 
 10         private void Form1_Load(object sender, EventArgs e)
 11         {
 12             getFundCode();
 13         }
 14         private void btnFundCodeRead_Click(object sender, EventArgs e)
 15         {
 16             getFundCode();
 17         }
 18         private void getFundCode()
 19         {
 20             string waitFuncCodes = ConfigurationManager.AppSettings.Get("fundCode");
 21             waitFuncCodes = waitFuncCodes.Replace(",", "\r\n");
 22             fundCodeLst.Text = waitFuncCodes;
 23         }
 24         private string delStr(string org, string other)
 25         {
 26             if (!other.Equals(""))
 27                 org = org.Replace(other, "");
 28             return Regex.Replace(org, @"<.*?>", "");
 29         }
 30         private void btnStart_Click(object sender, EventArgs e)
 31         {
 32             Thread thread = new Thread(getData);
 33             thread.IsBackground = true;
 34             CONST.barMax = 100;
 35             CONST.barNow = 0;
 36 
 37             btnStart.Enabled = false;
 38             btnStop.Enabled = true;
 39             CONST.okFlg = false;
 40 
 41             thread.Start();
 42             timer1.Start();
 43         }
 44 
 45         private void getData()
 46         {
 47             /// 提取母子基金代码
 48 
 49             // 提取母基金正则
 50             Regex regMJJ = new Regex(@"母子基金.*?<\/td>");
 51             // 提取基金净值正则
 52             Regex regJZ = new Regex(@"<span class=\'left12\'>.*?<\/span>");
 53             // 提取基金名称正则
 54             Regex regMC = new Regex(@"<title.*?<\/title>");
 55             string[] fcl = fundCodeLst.Text.Replace("\r\n", ",").Split(',');
 56             List<string[]> allFCLst = new List<string[]>();
 57             List<string> geted = new List<string>();
 58 
 59             foreach (string fc in fcl)
 60             {
 61                 CONST.show = "开始获取[" + fc + "]子母基金代码";
 62                 if (geted.Contains(fc.Substring(2, fc.Length - 2)))
 63                     continue;
 64                 string html = CONST.GetHtml(CONST.fundF10Url.Replace("{%fundCode%}", fc.Substring(2, fc.Length - 2)), Encoding.GetEncoding("gb2312"));
 65 
 66                 var result = regMJJ.Match(html).Groups;
 67                 if (result.Count > 0)
 68                 {
 69                     // 1-3 代码,4-6 净值 7-9 价格 10 sz/ss 11-13 名称
 70                     string[] allFC = new string[13] { "", "", "", "", "", "", "", "", "", "", "", "", "" };
 71                     var r = delStr(result[0].Value, "母子基金");
 72                     string[] t1 = Regex.Split(r, "（母）", RegexOptions.IgnoreCase);
 73                     geted.Add(t1[0]);
 74                     allFC[0] = t1[0];
 75                     if (t1.Length > 1)
 76                     {
 77                         string[] t2 = t1[1].Split(' ');
 78                         for (int i = 0; i < t2.Length; i++)
 79                         {
 80                             geted.Add(t2[i].Replace("（子）", ""));
 81                             allFC[i + 1] = t2[i].Replace("（子）", "");
 82                         }
 83                         if (t2.Length == 2)
 84                         {
 85                             allFC[9] = fc.Substring(0, 2);
 86                             allFCLst.Add(allFC);
 87                         }
 88                     }
 89                 }
 90                 //Thread.Sleep(1000);
 91             }
 92             CONST.barNow = CONST.barNow + (int)Math.Floor((decimal)CONST.barMax / 3);
 93             CONST.allFunCodeLst = allFCLst;
 94 
 95             // 获取净值，名称
 96             foreach (string[] allFC in CONST.allFunCodeLst)
 97             {
 98                 for (int i = 0; i < 3; i++)
 99                 {
100                     CONST.show = "开始获取[" + allFC[i] + "]净值与名称";
101                     string html = CONST.GetHtml(CONST.fundValUrl.Replace("{%fundCode%}", allFC[i]), Encoding.GetEncoding("gb2312"));
102 
103                     var result = regJZ.Match(html).Groups;
104                     if (result.Count > 0)
105                     {
106                         allFC[3 + i] = delStr(result[0].Value, "");
107                     }
108                     result = regMC.Match(html).Groups;
109                     string[] a = delStr(result[0].Value, "").Split('(');
110                     if (a.Length > 0)
111                     {
112                         allFC[10 + i] = a[0];
113                     }
114 
115                     //Thread.Sleep(1000);
116                 }
117             }
118             CONST.barNow = CONST.barNow + (int)Math.Floor((decimal)CONST.barMax / 3);
119 
120             // 获取价格
121             foreach (string[] allFC in CONST.allFunCodeLst)
122             {
123                 for (int i = 1; i < 3; i++)
124                 {
125                     CONST.show = "开始获取[" + allFC[i] + "]价格";
126                     string html = CONST.GetHtml(CONST.fundPriceUrl.Replace("{%fundAllCode%}", allFC[9] + allFC[i]), Encoding.GetEncoding("gb2312"));
127 
128                     string[] result = html.Split(',');
129                     if (result.Length > 4)
130                     {
131                         allFC[6 + i] = result[3];
132                     }
133                     //Thread.Sleep(1000);
134                 }
135             }
136             CONST.barNow = CONST.barNow + (int)Math.Floor((decimal)CONST.barMax / 3);
137             CONST.okFlg = true;
138 
139         }
140 
141         private void timer1_Tick(object sender, EventArgs e)
142         {
143             if (CONST.okFlg)
144             {
145                 CONST.show = "开始获取计算溢折价，并输出";
146                 // 计算A，B基金溢折价，母基金溢折价
147                 dataGridView1.Rows.Clear();
148                 dataGridView1.Columns.Clear();
149                 dataGridView1.Columns.Add("code1", "母代码");
150                 dataGridView1.Columns.Add("name1", "母名称");
151                 dataGridView1.Columns.Add("val1", "母净值");
152                 dataGridView1.Columns.Add("yzj1", "母溢折价");
153                 dataGridView1.Columns.Add("code2", "A代码");
154                 dataGridView1.Columns.Add("name2", "A名称");
155                 dataGridView1.Columns.Add("val2", "A净值");
156                 dataGridView1.Columns.Add("price2", "A价格");
157                 dataGridView1.Columns.Add("yzj2", "A溢折价");
158                 dataGridView1.Columns.Add("code3", "B代码");
159                 dataGridView1.Columns.Add("name3", "B名称");
160                 dataGridView1.Columns.Add("val3", "B净值");
161                 dataGridView1.Columns.Add("price3", "B价格");
162                 dataGridView1.Columns.Add("yzj3", "B溢折价");
163                 foreach (string[] allFC in CONST.allFunCodeLst)
164                 {
165                     DataGridViewRow dgvr = new DataGridViewRow();
166                     dataGridView1.Rows.Add(dgvr);
167                     dgvr = dataGridView1.Rows[dataGridView1.Rows.Count - 1];
168                     dgvr.Cells["code1"].Value = allFC[0];
169                     dgvr.Cells["code2"].Value = allFC[1];
170                     dgvr.Cells["code3"].Value = allFC[2];
171                     dgvr.Cells["name1"].Value = allFC[10];
172                     dgvr.Cells["name2"].Value = allFC[11];
173                     dgvr.Cells["name3"].Value = allFC[12];
174                     dgvr.Cells["val1"].Value = allFC[3];
175                     dgvr.Cells["val2"].Value = allFC[4];
176                     dgvr.Cells["val3"].Value = allFC[5];
177                     dgvr.Cells["price2"].Value = allFC[7];
178                     dgvr.Cells["price3"].Value = allFC[8];
179                     if (allFC[7] != "" && allFC[8] != "")
180                     {
181                         dgvr.Cells["yzj1"].Value = Math.Round((
182                             (double.Parse(allFC[7]) + double.Parse(allFC[8])) * 0.5 - double.Parse(allFC[3])) / double.Parse(allFC[3]) * 100, 2) + "%"; ;
183                         dgvr.Cells["yzj2"].Value = Math.Round((double.Parse(allFC[7]) - double.Parse(allFC[4])) / double.Parse(allFC[4]) * 100, 2) + "%";
184                         dgvr.Cells["yzj3"].Value = Math.Round((double.Parse(allFC[8]) - double.Parse(allFC[5])) / double.Parse(allFC[5]) * 100, 2) + "%";
185 
186                         if (dgvr.Cells["yzj1"].Value.ToString().StartsWith("-"))
187                         {
188                             dgvr.Cells["yzj1"].Style.ForeColor = Color.Green;
189                         }
190                         else
191                         {
192                             dgvr.Cells["yzj1"].Style.ForeColor = Color.Red;
193                         }
194                         if (dgvr.Cells["yzj2"].Value.ToString().StartsWith("-"))
195                         {
196                             dgvr.Cells["yzj2"].Style.ForeColor = Color.Green;
197                         }
198                         else
199                         {
200                             dgvr.Cells["yzj2"].Style.ForeColor = Color.Red;
201                         }
202                         if (dgvr.Cells["yzj3"].Value.ToString().StartsWith("-"))
203                         {
204                             dgvr.Cells["yzj3"].Style.ForeColor = Color.Green;
205                         }
206                         else
207                         {
208                             dgvr.Cells["yzj3"].Style.ForeColor = Color.Red;
209                         }
210                     }
211                 }
212                 StatusLabel.Text = "就绪";
213                 ProgressBar.Value = CONST.barMax;
214                 CONST.okFlg = false;
215                 timer1.Stop();
216                 btnStart.Enabled = true;
217                 btnStop.Enabled = false;
218             }
219             else
220             {
221                 StatusLabel.Text = CONST.show;
222                 ProgressBar.Maximum = CONST.barMax;
223                 ProgressBar.Value = CONST.barNow > CONST.barMax ? CONST.barMax : CONST.barNow;
224             }
225         }
226 
227         private void btnFundCodeSave_Click(object sender, EventArgs e)
228         {
229             // 写入参数设置
230             string fundCode = fundCodeLst.Text.Replace("\r\n", ",");
231             Configuration configuration = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None);
232             configuration.AppSettings.Settings["fundCode"].Value = fundCode;
233             configuration.Save(ConfigurationSaveMode.Modified);
234             ConfigurationManager.RefreshSection("appSettings");
235             MessageBox.Show("保存成功");
236         }
237 
238         private void dataGridView1_SortCompare(object sender, DataGridViewSortCompareEventArgs e)
239         {
240             if (e.Column.HeaderText.EndsWith("溢折价"))
241             {
242                 // 按数字排序
243                 if (e.CellValue1 == null || "".equals(e.CellValue1))//附件此处有错
244                 {
245                     e.SortResult = -1;//附件此处有错
246                 }
247                 else if (e.CellValue2 == null || "".equals(e.CellValue2))//附件此处有错
248                 {
249                     e.SortResult = 1;//附件此处有错
250                 }
251                 else
252                 {
253                     e.SortResult = double.Parse(e.CellValue1.ToString().Replace("%", "")) - double.Parse(e.CellValue1.ToString().Replace("%", "")) > 0 ? 1 : double.Parse(e.CellValue1.ToString().Replace("%", "")) - double.Parse(e.CellValue1.ToString().Replace("%", "")) < 0 ? -1 : 0;//附件此处有错
254                 }
255             }
256             else
257             {
258                 // 按字符串排序
259                 e.SortResult = String.Compare(Convert.ToString(e.CellValue1), Convert.ToString(e.CellValue2));
260             }e.Handled = true;//附件此处有错，如此才能反映到winform上去
261         }
262     }
263 }