Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- BEGIN {
- abc = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 "
- mors[1] = ".-"
- mors[2] = "-..."
- mors[3] = "-.-."
- mors[4] = "-.."
- mors[5] = "."
- mors[6] = "..-."
- mors[7] = "--."
- mors[8] = "...."
- mors[9] = ".."
- mors[10] = ".---"
- mors[11] = "-.-"
- mors[12] = ".-.."
- mors[13] = "--"
- mors[14] = "-."
- mors[15] = "---"
- mors[16] = ".--."
- mors[17] = "--.-"
- mors[18] = ".-."
- mors[19] = "..."
- mors[20] = "-"
- mors[21] = "..-"
- mors[22] = "...-"
- mors[23] = ".--"
- mors[24] = "-..-"
- mors[25] = "-.--"
- mors[26] = "--.."
- mors[27] = "-----"
- mors[28] = "*----"
- mors[29] = "**---"
- mors[30] = "***--"
- mors[31] = "****-"
- mors[32] = "*****"
- mors[33] = "-****"
- mors[34] = "--***"
- mors[35] = "---**"
- mors[36] = "----*"
- mors[37] = "/"
- print "Wybierz tlumaczenie"
- print "1. z polskiego na morsa"
- print "2. z morsa na polski"
- getline wybor <"-"
- if(wybor==1){
- FS=""
- }
- else{
- FS="|"
- }
- }
- {
- if(wybor == 1){
- for(i=1; i<=NF; i++)
- {
- a=toupper($i);
- n=1
- while(a!=substr(abc, n, 1)){
- if(n>length(abc))
- {
- printf("\nNie prawidlowy znak: %s ", a)
- exit
- }
- n++
- }
- printf(mors[n])
- printf("|");
- }
- }
- else{
- for(i=1; i<=NF; i++)
- {
- a=toupper($i);
- n=1;
- m=mors[1];
- while(a!=m)
- {
- if(n>length(abc))
- {
- printf("\nNie prawidlowy znak; %s",a)
- exit
- }
- n++
- m=mors[n];
- }
- printf(substr(abc,n,1))
- }
- }
- printf("\n")
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement