Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- :: the comment ":: code belongs here" indicates that one or more lines of code are needed to make this section of the program work.
- |= raw=tape
- =< (convert raw)
- |%
- ++ convert
- %+ turn tape
- |= letter=@t
- ^- @t
- (~(got by table) letter)
- ++ table
- %- my
- :~ :- 'A' '.-'
- :- 'B' '-...'
- :- 'C' '-.-.'
- :- 'D' '-..'
- :- 'E' '.'
- :- 'F' '..-.'
- :- 'G' '--.'
- :- 'H' '....'
- :- 'I' '..'
- :- 'J' '.---'
- :- 'K' '-.-'
- :- 'L' '.-..'
- :- 'M' '--'
- :- 'N' '-.'
- :- 'O' '---'
- :- 'P' '.--.'
- :- 'Q' '--.-'
- :- 'R' '.-.'
- :- 'S' '...'
- :- 'T' '-'
- :- 'U' '..-'
- :- 'V' '...-'
- :- 'W' '.--'
- :- 'X' '-..-'
- :- 'Y' '-.--'
- :- 'Z' '--..'
- :- '0' '-----'
- :- '1' '.----'
- :- '2' '..---'
- :- '3' '...--'
- :- '4' '....-'
- :- '5' '.....'
- :- '6' '-....'
- :- '7' '--...'
- :- '8' '---..'
- :- '9' '----.'
- ==
- --
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement