Advertisement
HappySunChild

Morse-OpenComputers

Aug 7th, 2022
972
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.29 KB | None | 0 0
  1. local computer = require("computer")
  2. local args = {...}
  3.  
  4. local translate = ""
  5.  
  6. for i,string in pairs(args) do
  7.   translate = translate .. " " ..  string
  8. end
  9.  
  10. local morse = {
  11.     A = ".-",
  12.     B = "-...",
  13.     C = "-.-.",
  14.     D = "-..",
  15.     E = ".",
  16.     F = "..-.",
  17.     G = "--.",
  18.     H = "....",
  19.     I = "..",
  20.     J = ".---",
  21.     K = "-.-",
  22.     L = ".-..",
  23.     M = "--",
  24.     N = "-.",
  25.     O = "---",
  26.     P = ".--.",
  27.     Q = "--.-",
  28.     R = ".-.",
  29.     S = "...",
  30.     T = "-",
  31.     U = "..-",
  32.     V = "...-",
  33.     W = ".--",
  34.     X = "-..-",
  35.     Y = "-.--",
  36.     Z = "--..",
  37.     ["0"] = "-----",
  38.     ["1"] = ".----",
  39.     ["2"] = "..---",
  40.     ["3"] = "...--",
  41.     ["4"] = "....-",
  42.     ["5"] = ".....",
  43.     ["6"] = "-....",
  44.     ["7"] = "--...",
  45.     ["8"] = "---..",
  46.     ["9"] = "----.",
  47.     [" "] = "/"
  48. }
  49.  
  50. local translated = ""
  51.  
  52. for i = 1,string.len(translate) do
  53.   local letter = string.upper(string.sub(translate,i,i))
  54.  
  55.   translated = translated .. " " .. morse[letter]
  56. end
  57.  
  58. print(translated)
  59.  
  60. for i = 1,string.len(translated) do
  61.   local letter = string.sub(translated,i,i)
  62.  
  63.   if letter == "." then
  64.     computer.beep(1000,0.1)
  65.   elseif letter == "-" then
  66.     computer.beep(1000,0.3)
  67.   elseif letter == "/" then
  68.     os.sleep(0.7)
  69.   else
  70.     os.sleep(0.2)
  71.   end
  72. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement