2014年10月23日 星期四

擲骰子賽車程式
========================================================================

========================================================================
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.Threading;

namespace _1
{
    public partial class Form1 : Form
    {
        int ssum1 = 0, i = 0, ssum2 = 0;
        public Form1()
        {
            InitializeComponent();
        }

        private void button1_Click(object sender, EventArgs e)
        {
            int d1, d2,dsum1,dsum2;
            i++;                    
            if (i % 2 == 1)
            {
                Random ian = new Random();
                d1 = ian.Next(1, 7);
                d2 = ian.Next(1, 7);
                label1.Text = Convert.ToString(d1);
                label2.Text = Convert.ToString(d2);
                dsum1 = d1 + d2;
                textBox1.Text = Convert.ToString(dsum1);
                for (int k = 1; k <= dsum1; k++)
                {
                    Thread.Sleep(500);
                    Application.DoEvents();
                    button2.Left = (k+ssum1)*10;
                }
                ssum1 = ssum1 + dsum1;
               
            }
            else
            {
                Random ian = new Random();
                d1 = ian.Next(1, 7);
                d2 = ian.Next(1, 7);
                label1.Text = Convert.ToString(d1);
                label2.Text = Convert.ToString(d2);
                dsum2 = d1 + d2;
                textBox1.Text = Convert.ToString(dsum2);
                for (int h = 1; h <= dsum2; h++)
                {
                    Thread.Sleep(500);
                    Application.DoEvents();
                    button3.Left = (h+ssum2)*10;
                }
                ssum2 = ssum2 + dsum2;
               
            }
            if (button2.Left >= 250)
            {
                MessageBox.Show("甲車贏");
            }
            else if (button3.Left >= 250)
            {
                MessageBox.Show("乙車贏");
            }
        }
    }
}

沒有留言:

張貼留言