Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- namespace Morse
- {
- public partial class Form1 : Form
- {
- int dit;
- int rest;
- int dah;
- string batch;
- string key;
- int A;
- int len;
- int dah2;
- bool xmit = false;
- //public ushort freq = 1500;
- SerialPort myport = new System.IO.Ports.SerialPort("COM4", 9600, System.IO.Ports.Parity.None, 8, System.IO.Ports.StopBits.One);
- public Form1()
- {
- InitializeComponent();
- }
- public void button1_Click(object sender, EventArgs e)
- {
- dit = Convert.ToInt32(50000 / Convert.ToInt32(numericUpDown1.Value * 50));
- rest = Convert.ToInt32(dit);
- dah = Convert.ToInt32(3 * dit);
- dah2 = Convert.ToInt32(dit);
- Code();
- }
- private void Code()
- {
- batch = textBox1.Text.ToUpper();
- len = batch.Length;
- for (A = 1; (A <= len); A++)
- {
- key = batch.Substring((A - 1), 0);
- if ((key == " "))
- {
- Thread.Sleep(dit * 8);
- }
- if ((key == "A"))
- {
- myport.Open();
- myport.RtsEnable = true;
- Thread.Sleep(dit);
- myport.RtsEnable = false;
- Thread.Sleep(rest);
- myport.RtsEnable = true;
- Thread.Sleep(dah);
- myport.RtsEnable = false;
- Thread.Sleep(dah2);
- myport.Close();
- }
- else if ((key == "B"))
- {
- myport.Open();
- myport.RtsEnable = true;
- Thread.Sleep(dah);
- myport.RtsEnable = false;
- Thread.Sleep(rest);
- myport.RtsEnable = true;
- Thread.Sleep(dit);
- myport.RtsEnable = false;
- Thread.Sleep(rest);
- myport.RtsEnable = true;
- Thread.Sleep(dit);
- myport.RtsEnable = false;
- Thread.Sleep(rest);
- myport.RtsEnable = true;
- Thread.Sleep(dit);
- myport.RtsEnable = false;
- Thread.Sleep(dah2);
- myport.Close();
- }
Add Comment
Please, Sign In to add comment