ArmandoCircuitos
Inicio
Electronica
Programacion
Resultado
Codigo
using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Runtime.InteropServices; using System.Threading; namespace Codigo_Morse_LPT_01 { public partial class Form1 : Form { class ControlPort { [DllImport("inpout32.dll", EntryPoint = "Out32")] public static extern void Output(int adress, int value); } public Form1() { InitializeComponent(); } string letras = "abcdefghijklmnñopqrstuvwxyz0123456789.,? "; string[] morse = { ".-","-...","-.-.","-..",".","..-.","--.","....","..","·---","-.-",".-..", "--","-.","--.--","---",".__.","--.-",".-.","...","-","..-","...-",".--", "-..-","-.--","--..", "-----",".----","..---","...--","....-", ".....","-....","--...","---..","----.", ".-.-.-","-.-.--","..--.."," " }; int size; private void button1_Click(object sender, EventArgs e) { string conversion = ""; string palabra = textBox1.Text.ToLower(); size = palabra.Length; for (int i = 0; i < size; i++ ) conversion += morse[letras.IndexOf(palabra[i])]; lblMorse.Text = conversion; salida(conversion); } private void salida(string codigo) { size = codigo.Length; for (int i = 0; i < size; i++) { switch (codigo[i]) { case '.': Console.Beep(1200, 250); ControlPort.Output(0x378, 1); Thread.Sleep(250); break; case '-': Console.Beep(1200, 650); ControlPort.Output(0x378, 1); Thread.Sleep(650); break; default: ControlPort.Output(0x378, 0); Thread.Sleep(500); break; } ControlPort.Output(0x378, 0); Thread.Sleep(100); } } private void Form1_Load(object sender, EventArgs e) { ControlPort.Output(0x378, 0); } } }
Descarga del archivo
Descargar archivo