mega-merge of major parts of mojo
[spider.git] / perl / Messages
index 2d00b0465f98de6d7fd76e437b0479f1d3d58652..2554d2701d0486c9695be620929e39b1694804fb 100644 (file)
@@ -3,7 +3,6 @@
 # this file contains the system messages. Don't forget to reload them
 # if you change them (load/messages)
 #
-# $Id$
 #
 
 package DXM;
@@ -11,7 +10,9 @@ package DXM;
 %msgs = (
                 en => {
                                addr => 'Address set to: $_[0]',
-                               already => '$_[0] already connected',
+                               agwe => 'AGW Engine enabled',
+                               agwu => 'AGW Engine disabled',
+                               already => '$_[0] already connected',
                                anns => 'Announces enabled for $_[0]',
                                annu => 'Announces disabled for $_[0]',
                                annts => 'AnnTalk enabled for $_[0]',
@@ -26,13 +27,22 @@ package DXM;
                                beepon => 'Beeps are now on',
                                believes => 'Believe node $_[0] via $_[1]',
                                believeu => 'Don\'t believe node $_[0] via $_[1]', 
+                               buddya => '$_[0] has been added to your buddies',
+                               buddyu => '$_[0] has been removed from your buddies',
                                call1 => 'Callsign lookup via $_[0]:',
+                               chatend => 'Finished chatting on $_[0]',
+                               chatinst => 'Entering Chatmode on $_[0], /EX to end, /<cmd> to run a command',
+                               chatprompt => 'Chat ($_[0])>',
+                               chattoomany => 'Not allowed, already in $_[1], use /chat $_[0]',
+                               cluster => 'Nodes: $_[0]/$_[1] Users [Loc/Clr]: $_[2]/$_[3] Max: $_[4]/$_[5] - Uptime: $_[6]',
                                conother => 'Sorry $_[0] you are connected to me on another port',
                                concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster (on $_[1])',
+                               contomany => 'Sorry $_[0] but you are already connected to $_[1] other nodes (on $_[2])',
                                conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',
                                confail => 'connection to $_[0] failed ($_[1])',
                                constart => 'connection to $_[0] started',
                                conbump => 'Reconnected as $_[0] at $_[1], this instance is disconnected',
+                               creuser => 'User $_[0] has been created',
                                deluser => 'User $_[0] has been deleted',
                                db1 => 'This database is hosted at $_[0]',
                                db2 => 'Sorry, but key: $_[0] was not found in $_[1]',
@@ -43,9 +53,10 @@ package DXM;
                                db7 => 'Database $_[0] created for remote node $_[1]',
                                db8 => 'Database $_[0] created locally',
                                db9 => 'Database $_[0] removed',
-                               db10 => '$_[0] records imported into $_[1]',
+                               db10 => '$_[0] records imported from $_[1] to $_[2]',
                                db11 => 'Sending your request(s) to $_[0], please stand by...',
                                db12 => 'DB Name          Location   Cmd             Chain',
+                               db13 => '$_[0] records exported from $_[1] to $_[2]',
                                dfreq1 => 'Invalid freq $_[0] need: eg 0/30000 or hf or hf/cw', 
                                dir1 => 'No messages found',
                                disc1 => 'Disconnected by $_[0]',
@@ -57,6 +68,7 @@ package DXM;
                                dx1 => 'Frequency $_[0] not in band (see show/band); usage: DX [BY call] freq call comments',
                                dx2 => 'Need a callsign; usage: DX [BY call] freq call comments',
                                dx3 => 'The callsign or frequency is invalid',
+                               dx4 => 'The ip address ($_[0]) is invalid',
                                dxcqs => 'DX CQ Zones enabled for $_[0]',
                                dxcqu => 'DX CQ Zones disabled for $_[0]',
                                dxitus => 'DX ITU Zones enabled for $_[0]',
@@ -73,19 +85,19 @@ package DXM;
                                e8 => 'Need a callsign and some text',
                                e9 => 'Need at least some text',
                                e10 => '$_[0] not connected locally',
-                               e11 => 'Can\'t use $main:mycall as target',
+                               e11 => 'Can\'t use $_[0] as target',
                                e12 => 'Need a node callsign',
                                e13 => '$_[0] is not a node',
                                e14 => 'First argument must be numeric and > 0',
                                e15 => 'invalid qualifier \"$_[0]\"',
                                e16 => 'File \"$_[0]\" exists',
-                               e17 => 'Please don\'t use the words: @_ on here', 
+                               e17 => 'Please don\'t use the words: @_ on here',
                                e18 => 'Cannot connect to $_[0] ($!)',
-                               e19 => 'Invalid character in line',
-                               e20 => 'token $_[0] not recognised',
-                               e21 => '$_[0] not numeric',
-                               e22 => '$_[0] not a callsign',
-                               e23 => '$_[0] not a range (eg 0/30000)', 
+                               e19 => 'Invalid character(s) in line $_[0]',
+                               e20 => qq{token '$_[0]' not recognised},
+                               e21 => '$_[0] is not numeric',
+                               e22 => '$_[0] is not a callsign',
+                               e23 => '$_[0] is not a range (eg 0/30000)',
                                e24 => 'Sorry, Internet access is not enabled',
                                e25 => 'Sorry the value must be between $_[0] and $_[1]',
                                e26 => 'Too many concurrent errors, you are being disconnected',
@@ -99,6 +111,9 @@ package DXM;
                                e34 => 'Need a GROUP and some text',
                                e35 => 'You are not a member of $_[0], join $_[0]',
                                e36 => 'You can only do this in normal user prompt state',
+                               e37 => 'Need at least a callsign',
+                               e38 => 'This is not a valid regex',
+                               e39 => 'Sorry $_[0] is not a valid argument',
 
                                echoon => 'Echoing enabled',
                                echooff => 'Echoing disabled',
@@ -115,8 +130,13 @@ package DXM;
                                filter4 => '$_[0]$_[1] Filter $_[2] deleted for $_[3]',
                                filter5 => 'need some filter commands...',
                                filter6 => '$_[0]$_[1] Filter for $[2] not found',
+                               filter7 => '$_[0] parse error $_[1] on $_[2]', 
+                               grayline1 => '                                                 Beg of               End of',
+                               grayline2 => 'Location                              dd/mm/yyyy Dawn   Rise   Set    Dusk',
                                grids => 'DX Grid enabled for $_[0]',
                                gridu => 'DX Grid disabled for $_[0]',
+                               gtks => 'GTK output enabled for $_[0]',
+                               gtku => 'GTK output disabled for $_[0]',
                                illcall => 'Sorry, $_[0] is an invalid callsign',
                                hasha => '$_[0] already exists in $_[1]',
                                hashb => '$_[0] added to $_[1]',
@@ -150,6 +170,8 @@ package DXM;
                                lange2 => 'failed to set language on $_[0]', 
                                lastconn => 'Last connect',
                                leave => 'leaving group $_[0]',
+                               lgset => 'Added $_[0] to the local node group',
+                               lgunset => 'Removed $_[0] from the local node group',
                                lh1 => '$main::data/hop_table.pl doesn\'t exist',
                                local1 => 'Local',
                                loce1 => 'Please enter your location,, set/location <latitude longitude>',
@@ -161,6 +183,10 @@ package DXM;
                                lockoutc => '$_[0] Created and Locked out',
                                lockoutun => '$_[0] Unlocked',
                                lockoutuse => 'usage: sh/lockout <call>|ALL',
+                               loginb => 'Buddy $_[0] has logged in',
+                               loginbn => 'Buddy $_[0] has logged in at $_[1]',
+                               logoutb => 'Buddy $_[0] has logged out',
+                               logoutbn => 'Buddy $_[0] has logged out from $_[1]',
                                loginu => 'User $_[0] has logged in',
                                logoutu => 'User $_[0] has logged out',
                                loginn => 'Node $_[0] has logged in',
@@ -184,7 +210,10 @@ package DXM;
                                m17 => 'Sorry, cannot send messages in $_[0] mode',
                                m18 => 'Sorry, message $_[0] is currently set to KEEP',
                                m19 => 'Startup Script for $_[0] saved, $_[1] lines',
-                               m20 => 'Empty Startup Script for $_[0] deleted',
+                               m20 => 'Startup Script for $_[0] deleted',
+                               m21 => '$_[0] Working...',
+                               m22 => 'Startup Script for $_[0] not found/error $!',
+                               maxconnect => 'Max connections on $_[0] set to $_[1]',
                                msg1 => 'Bulletin Messages Queued',
                                msg2 => 'Private Messages Queued',
                                msg3 => 'Msg $_[0]: $_[1] changed from $_[2] to $_[3]',
@@ -208,6 +237,8 @@ package DXM;
                                noderc => '$_[0] created as AR-Cluster style Node',
                                nodes => '$_[0] set as DXSpider style Node',
                                nodesc => '$_[0] created as DXSpider style Node',
+                               noden => '$_[0] set as RBN Feed ',
+                               nodenc => '$_[0] created as RBN Feed',
                                nodex => '$_[0] set as DXNET style Node',
                                nodexc => '$_[0] created as DXNET style Node',
                                nodeu => '$_[0] set back as a User',
@@ -218,7 +249,8 @@ package DXM;
                                ok => 'Operation successful',
                                outconn => 'Outstanding connect to $_[0]',
                                page => 'Press Enter to continue, A to abort ($_[0] lines) >',
-                               pagelth => 'Page Length is now $_[0]',
+                               pagelth => 'Page Length is now $_[0] lines',
+                               pagewidth => 'Page width is now $_[0] columns',
                                passerr => 'Please use: SET/PASS <password> <callsign>',
                                passphrase => 'Passphrase set or changed for $_[0]',
                                passphraseu => 'Passphrase removed for $_[0]',
@@ -231,7 +263,7 @@ package DXM;
                                pinge1 => 'Cannot ping yourself!',
                                pingint => 'Ping interval on $_[0] set to $_[1] secs',
                                'pos' => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]',
-                               pr => '%C de %M %D %T dxspider >',
+                                pr => '%C de %M %D %T dxspider >',
                                prs => 'Prompt is changed',
                                pru => 'Prompt now set back to default',
                                priv => 'Privilege level changed on $_[0]',
@@ -248,6 +280,7 @@ package DXM;
                                qrashe1 => 'Please enter a QRA locator, eg sh/qra JO02LQ or sh/qra JO02LQ IO93NS',
                                qrae2 => 'Don\'t recognise \"$_[0]\" as a QRA locator (eg JO02LQ)',
                                qra => 'Your QRA Locator is now \"$_[0]\"',
+                               rbnusers => qq{RBN User List},
                                qsl1 => 'Call           Manager   Times  Last Time Seen      De',
                                rcmdo => 'RCMD \"$_[0]\" sent to $_[1]',
                                read1 => 'Sorry, no new messages for you',
@@ -273,6 +306,7 @@ package DXM;
                                showconf => 'Node         Callsigns',
                                shu => '\"SHU\" is not enough! you need to type at least \"SHUT\" to shutdown the node',
                                shutting => '$main::mycall shutting down...',
+                               skims => 'RBN/Skimming set to $_[1] for $_[0]',
                                sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
                                snode1 => 'Node Call   Sort    Version',
                                snode2 => '$_[0] $_[1]  $_[2]',
@@ -314,6 +348,8 @@ package DXM;
                                usernf => '*** User record for $_[0] not found ***',
                                usstates => 'US State display enabled for $_[0]',
                                usstateu => 'US State display disabled for $_[0]',
+                               wante => 'Want $_[0] enabled for $_[1]',
+                               wantd => 'Want $_[0] disabled for $_[1]',
                                wcy1 => '$_[0] is missing or out of range',
                                wcy2 => 'Duplicate WCY',
                                wcy3 => 'Date        Hour   SFI   A   K Exp.K   R SA    GMF   Aurora   Logger',
@@ -323,11 +359,11 @@ package DXM;
                                wpc16u => 'Allow PC16 from $_[0] disabled',
                                wpc19s => 'Route PC19 for $_[0] enabled',
                                wpc19u => 'Route PC19 for $_[0] disabled',
-                               wpc90s => 'PC90 for $_[0] enabled',
-                               wpc90u => 'PC90 for $_[0] disabled',
+                               wpc9xs => 'PC9X for $_[0] enabled',
+                               wpc9xu => 'PC9X for $_[0] disabled',
                                wwv1 => '$_[0] is missing or out of range',
                                wwv2 => 'Duplicate WWV',
-                               wwv3 => 'Date        Hour   SFI   A   K Forecast                               Logger',
+                               wwv3 => 'Date        Hour   SFI   A   K Forecast                              Logger',
                                wwvs => 'WWV enabled for $_[0]',
                                wwvu => 'WWV disabled $_[0]',
                                wxs => 'WX enabled for $_[0]',
@@ -499,7 +535,7 @@ package DXM;
                                e16 => 'Le fichier \"$_[0]\" existe déjà',
                                e17 => 'Prière de ne pas utiliser les mots : @_ ici !', 
                                e18 => 'Connexion impossible avec $_[0] ($!)',
-                               e19 => 'Caractère non valide dans la ligne',
+                               e19 => 'Caractère non valide dans la ligne $_[0]',
                                e20 => 'Symbole $_[0] non reconnu',
                                e21 => '$_[0] n\'est pas une valeur numérique',
                                e22 => '$_[0] n\'est pas un indicatif',
@@ -752,7 +788,7 @@ package DXM;
                                annts => 'Modo AnnTalk activado para $_[0]',
                                anntu => 'Modo AnnTalk desactivado para $_[0]',
                                at => 'at',
-                               badnode1 => 'No se aceptan spots generados en $_[0], se añade a la lista badnode',
+                               badnode1 => 'No se aceptan spots con origen en $_[0], se añade a la lista badnode',
                                badnode2 => 'Se aceptan spots del nodo $_[0], sale de la lista badnode',
                                badnode3 => 'Lista de nodos rechazados:',
                                bbse1 => 'Por favor introduce tu BBS, set/bbs <tu bbs>',
@@ -761,12 +797,19 @@ package DXM;
                                beepon => 'Avisos sonoros activados',
                                believes => 'Creo en el nodo $_[0] via $_[1]',
                                believeu => 'No creo en el nodo $_[0] via $_[1]',
+                               buddya => '$_[0] se añade a tu lista de indicativos amigos',
+                               buddyu => '$_[0] se elimina de tu lista de indicativos amigos',
                                call1 => 'Se encontró el indicativo vía $_[0]:',
+                               chatend => 'Finalizado el modo chat en el canal $_[0]',
+                               chatinst => 'Entrando en modo Chat en el canal $_[0], /EX para salir, /<cmd> para ejecutar un comando',
+                               chatprompt => 'Chat ($_[0])>',
+                               chattoomany => 'Operación no permitida, actualmente estas en el canal $_[1], usa /chat $_[0]',
                                conother => 'Lo siento $_[0] ya estás conectado en otro puerto',
                                concluster => 'Lo siento $_[0] ya estás conectado en otro cluster',
                                conscript => 'No hay ningún script que se llame \"$_[0]\" en $main::root/connect',
                                confail => 'La conexión con $_[0] ha fallado ($_[1])',
                                constart => 'Se inicia la conexión a $_[0]',
+                               conbump => 'Reconectado como $_[0] en $_[1], Esta sesión termina y se te desconecta',
                                deluser =>'El usuario $_[0] ha sido borrado de la base de datos',
                                db1 => 'Esta base de datos está en $_[0]',
                                db2 => 'Lo siento, pero no se encontró $_[0] en $_[1]',
@@ -781,11 +824,11 @@ package DXM;
                                db11 => 'Tu petición ha sido enviada a $_[0], por favor espera...',
                                dfreq1 => 'La frecuencia no es válida $_[0] ej: 0/30000 o hf o hf/cw',
                                dir1 => 'No hay mensajes nuevos',
-                               disc1 => 'Desconectado por $_[0]',
+                               disc1 => '.',
                                disc2 => 'Canal $_[0] desconectado',
                                disc3 => 'No estaba activo el canal, pero la conexión de $_[0] ha sido eliminada',
                                disc4 => 'No existía el canal o la conexión, $_[0] se elimina',
-                               done => 'Hecho',
+                               done => 'Comando ejecutado con Ã©xito.',
                                dup => 'Lo siento, esto es un duplicado',
                                dx1 => 'Frecuencia $_[0] fuera de banda (ver show/band); usa: DX [BY indicativo] frec indic. comentario',
                                dx2 => 'Necesita indicativo; usa: DX [BY indicativo] frec indic. comentario',
@@ -802,7 +845,7 @@ package DXM;
                                e4 => 'Se necesita, por lo menos, un prefijo o indicativo',
                                e5 => 'No estás autorizado',
                                e6 => '*** No se ha especificado una estación ***',
-                               e7 => 'El indicativo $_[0] no está visible en el cluster',
+                               e7 => '$_[0] no está visible en la red actualmente',
                                e8 => 'Se necesita un indicativo y algún texto',
                                e9 => 'Se necesita al menos algún texto',
                                e10 => '$_[0] no se encuentra conectado',
@@ -814,7 +857,7 @@ package DXM;
                                e16 => 'El fichero \"$_[0]\" ya existe',
                                e17 => 'Por favor no uses la palabra: @_ aquí',
                                e18 => 'No se puede conectar con $_[0] ($!)',
-                               e19 => 'Carácter no válido en la línea',
+                               e19 => 'Carácter no válido en la línea $_[0]',
                                e20 => 'Símbolo $_[0] no reconocido',
                                e21 => '$_[0] no es numérico',
                                e22 => '$_[0] no es un indicativo',
@@ -822,39 +865,41 @@ package DXM;
                                e24 => 'Lo siento, el acceso a internet no está habilitado',
                                e25 => 'Lo siento el valor debe de estar entre $_[0] y $_[1]',
                                e26 => 'Demasiados errores, serás desconectado',
-                               e27 => '$_[0] no es un numero o un prefijo',
+                               e27 => '$_[0] no es un número o un prefijo',
                                e28 => 'Lo siento, necesitas registrarte (SP $main::myalias para registrarte)',   
                                e29 => 'Necesitas password', 
                                e30 => 'No se puede abrir $_[0] $!',
                                e31 => '$_[0] no es un usuario', 
                                e32 => 'Se necesita una frase de contraseña',
-                               e33 => '$_[0] No es un número de días o una fecha valida',
+                               e33 => '$_[0] No es un número de días o una fecha válida',
                                e34 => 'Se necesita un grupo y algún texto',
-                               e35 => 'No eres un miembro de $_[0], join $_[0]',
+                               e35 => 'No eres un miembro del grupo $_[0], usa join $_[0] para entrar en este grupo',
                                e36 => 'Solo puedes hacer esto desde el prompt de usuario',
   
                                echoon => 'Eco local activado',
                                echooff => 'Eco local desactivado',
                                echow => '*Eco local desactivado, set/echo para activarlo',
                                emaile1 => 'Por favor introduce tu E-mail, set/email <tu E-mail>',
-                               emaila => 'Tu dirección E-Mail es ahora \"$_[0]\"',
+                               emaila => 'Tu dirección E-mail es ahora \"$_[0]\"',
                                email => 'La dirección E-mail es ahora: $_[0]',
-                               export1 => 'uso: export <numero_mensaje> <nombre_fichero>',
+                               export1 => 'uso: export <número_mensaje> <nombre_fichero>',
                                export2 => '$_[3] hubo un error exportando mensaje $_[0] a $_[1] ($_[2])',
                                export3 => '$_[2 ] exportando mensaje $_[0] a $_[1]',
                                filter1 => 'Filtro $_[0] actualizado con el nombre $_[1]',
                                filter2 => 'Es necesario un valor para $_[0]',
                                filter3 => 'No hay filtros definidos para $_[0]',
-                               filter4 => 'Filtro numero $_[2] de rutas del tipo: $_[0]$_[1]  borrado para $_[3]',
+                               filter4 => 'Filtro número $_[2] del tipo: $_[0]$_[1]  borrado para $_[3]',
                                filter5 => 'Se necesitan algunos comandos para el filtro...',
                                filter6 => '$_[0]$_[1] Filtro para $[2] no encontrado',
                                grids => 'Activada recepción de locators en spot (DX Grid) para $_[0]',
                                gridu => 'Desactivada recepción de locators en spot (DX Grid) para $_[0]',
+                               gtks => 'Terminal GTK activado para $_[0]',
+                               gtku => 'Terminal GTK desactivado para $_[0]',
                                illcall => 'Lo siento, $_[0] no es un indicativo válido',
                                hasha => '$_[0] ya existe en $_[1]',
                                hashb => '$_[0] añadido a $_[1]',
-                               hashc => '$_[0] eliminado desde $_[1]',
-                               hashd => '$_[0] no en $_[1]',
+                               hashc => '$_[0] eliminado de $_[1]',
+                               hashd => '$_[0] no se encuentra en $_[1]',
                                hashe => '$_[0] activado $_[1]',
                                heading => 'Rumbo',
                                helpe1 => 'La ayuda no está disponible, comunícaselo al sysop',
@@ -885,20 +930,23 @@ package DXM;
                                lh1 => '$main::data/hop_table.pl no existe',
                                local1 => 'Local',
                                loce1 => 'Por favor introduce tu posición, set/location <latitud longitud>',
-                               loce2 => 'No reconocida \"$_[0]\" como una Lat/Long (ej: 52 20 N 0 16E)',
+                               loce2 => 'No se reconoce \"$_[0]\" como una Lat/Long (ej: 52 20 N 0 16E)',
                                loce3 => '$_[0] es un QRA locator, por favor usa: set/qra $_[0]',
                                loc => 'Tu Lat/Long es ahora \"$_[0]\"',
                                location => 'Location',
                                lockout => '$_[0] Excluido del sistema',
                                lockoutc => '$_[0] Creado y excluido del sistema',
-                               lockoutun => '$_[0] autorizado para conectar',
+                               lockoutun => '$_[0] Autorizado para conectar',
                                lockoutuse => 'Uso: sh/lockout <indicativo|prefijo>|ALL',
+                               loginb => 'El colega $_[0] ha conectado',
+                               loginbn => 'El colega $_[0] ha conectado en $_[1]',
+                               logoutb => 'El colega $_[0] se ha desconectado',
+                               logoutbn => 'El colega $_[0] se ha desconectado de $_[1]',
                                loginu => '$_[0] conecta',
                                logoutu => '$_[0] se desconecta',
                                loginn => '$_[0] conecta',
                                logoutn => '$_[0] se desconecta',
                                m1 => 'Introduce el título (máx. 30 caractéres):',
-
                                m2 => 'Copia del mensaje $_[0] enviada a $_[1]',
                                m3 => 'Lo siento, $_[0] no se aceptan mensajes a ese tópico',
                                m4 => 'Lo siento, no se puede acceder al mensaje $_[0]',
@@ -907,28 +955,28 @@ package DXM;
                                m7 => 'Título : $_[0]',
                                m8 => 'Introduce mensaje. /EX para terminar o /ABORT para interrumpir',
                                m9 => 'Hay correo nuevo para ti. Bórralo una vez leído.',
-                               m10 => 'mensaje interrumpido',
-                               m11 => 'mensaje nr $_[0] guardado y enviado a $_[1]',
-                               m12 => 'mensaje nr $_[0] borrado',
-                               m13 => 'mensaje nr $_[0] no encontrado',
-                               m14 => 'mensaje nr $_[0] marcado para ser enviado a $_[1]',
-                               m15 => 'mensaje nr $_[0] no se enviará a $_[1]',
+                               m10 => 'Mensaje interrumpido',
+                               m11 => 'Mensaje nr $_[0] guardado y enviado a $_[1]',
+                               m12 => 'Mensaje nr $_[0] borrado',
+                               m13 => 'Mensaje nr $_[0] no encontrado',
+                               m14 => 'Mensaje nr $_[0] marcado para ser enviado a $_[1]',
+                               m15 => 'El mensaje nr $_[0] no se enviará a $_[1]',
                                m16 => 'Se necesita un número de mensaje',
                                m17 => 'Lo siento, no puedo enviar el mensaje en $_[0] modo',
                                m18 => 'Lo siento, el mensaje $_[0] está actualmente marcado como KEEP (Guardarlo)',
-                               m19 => 'Fichero de inicio de conexión de $_[0] guardado, $_[1] líneas',
+                               m19 => 'Fichero de inicio de conexión de $_[0] guardado, contiene $_[1] línea(s)',
                                m20 => 'Fichero de inicio de conexión vacio de  $_[0] borrado',
-
                                msg1 => 'Cola de mensajes tipo Boletín',
                                msg2 => 'Cola de mensajes tipo Privados',
                                msg3 => 'Msg $_[0]: $_[1] cambiado de $_[2] a $_[3]',
-                               msgu => 'uso: msg <cmd> <msgno> data...',
+                               msgu => 'Uso: msg <cmd> <msgno> data...',
                                merge1 => 'Petición de envío de $_[1] spots y $_[2] WWV enviada a $_[0]',
                                moon => 'QTH                                   dd/mm/yyyy Salida Puesta',
                                moon_with_azel => 'QTH                                   dd/mm/yyyy Salida Puesta   Azim   Elev',                                 
                                mond => 'Activado modo monitor',
                                mone => 'Desactivado modo monitor',
-                               namee1 => 'Por favor, introduce tu nombre set/name <tu nombre>',
+                               name1 => 'Nombre',
+                               namee1 => 'Por favor, introduce tu nombre con set/name <tu nombre>',
                                namee2 => 'No se encuentra el usuario $_[0]!',
                                name => 'Tu nombre es \"$_[0]\"',
                                nodea => '$_[0] definido como nodo AK1A ',
@@ -944,28 +992,26 @@ package DXM;
                                nodex => '$_[0] definido como nodo DXNET ',
                                nodexc => '$_[0] creado como nodo DXNET ',
                                nodeu => '$_[0] es ahora un usuario',
-                               nodee1 => 'No puedes usar este comando mientras tu objetivo ($_[0]) se encuentra',
-                               notdone => 'No se pudo hacer',
+                               nodee1 => 'No puedes usar este comando mientras $_[0] se encuentre conectado',
+                               notdone => 'No se ha podido realizar la operación',
                                nothere => 'Lo siento, pero $_[0] no está aquí ahora, inténtalo mas tarde',
-                               obscount => 'El parámetro Ping obsolescence count para $_[0] ajustado a $_[1]',
+                               obscount => 'El parámetro Ping obsolescence count para $_[0] se ajusta a $_[1]',
                                ok => 'Operación realizada',
                                outconn => 'Iniciando conexión con  $_[0]',
                                page => 'Teclea Enter para continuar, A para abortar (Quedan $_[0] líneas) >',
-                               pagelth => 'La longitud de las páginas es ahora $_[0]',
+                               pagelth => 'La longitud de las páginas es ahora de $_[0] línea(s)',
                                passerr => 'Por favor usa: SET/PASS <password> <indicativo>',
                                passphrase => 'Passphrase definida o cambiada para $_[0]',
                                passphraseu => 'Passphrase borrada para $_[0]',
-
                                password => 'El Password ha sido definido o cambiado para $_[0]',
                                passwordu => 'Contraseña borrada para $_[0]',
                                pc90s => 'PC90 activado para $_[0]',
                                pc90u => 'PC90 desactivado para $_[0]',
                                pingo => 'Iniciado el ping a $_[0]',
-                               pingi => 'Ping devuelto por $_[0] $_[1] (Ave $_[2]) segundos',
+                               pingi => 'Ping devuelto por $_[0] en $_[1] (Ave $_[2]) segundos',
                                pinge1 => 'No puedes enviarte un ping a ti mismo!',
                                pingint => 'Intervalo de ping para $_[0] ajustado a $_[1] segundos',
                                'pos' => 'Desde el indicativo: $_[0] Lat: $_[1] Long: $_[2]',
-                               pr => '%C de %M %D %T dxspider >',
                                prs => 'El Prompt ha sido cambiado',
                                pru => 'El Prompt vuelve a ser el normal por defecto',
                                priv => 'Nivel de privilegios modificado para $_[0]',
@@ -983,12 +1029,11 @@ package DXM;
                                qrae2 => 'No se reconoce \"$_[0]\" como un QRA locator ( ej JO02LQ)',
                                qra => 'Tu QRA Locator es ahora \"$_[0]\"',
                                qsl1 => 'Indicativo     Manager   Nº veces  Ãšltimo Spot      De',
-
                                rcmdo => 'RCMD \"$_[0]\" enviado a $_[1]',
                                read1 => 'Lo siento, no hay mensajes nuevos para ti',
                                read2 => 'Mensaje $_[0] no encontrado',
                                read3 => 'Mensaje $_[0] no disponible',
-                               rec => '$_[0] registros',
+                               rec => '$_[0] registro(s)',
                                reg => '$_[0] registrado',
                                regc => '$_[0] creado y registrado',
                                reginac => 'El registro no está activo (set/var \$main::regreq = 1 para activarlo)',
@@ -1002,8 +1047,8 @@ package DXM;
                                satnf => 'Satélite $_[0] desconocido',
                                satdisc => '-----',
                                set => '$_[0] habilitado para $_[1]',
-                               sethop1 => 'uso: set/hops <indicativo> ann|spots|wwv|wcy <nr de hops>',
-                               sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]',
+                               sethop1 => 'Uso: set/hops <indicativo> ann|spots|wwv|wcy <nr de hops>',
+                               sethop2 => '$_[0] hops set on $_[1]$_[2] para $_[3]',
                                sethop3 => 'No hay hops definidos para $_[0]',
                                showconf => 'Nodo         Indicativos',
                                shu => '\"SHU\" No es suficiente! Es necesario como mínimo escribir \"SHUT\" para apagar el cluster',
@@ -1015,19 +1060,19 @@ package DXM;
                                sqra => 'Cluster QRA Locator$_[0], NO OLVIDES CAMBIAR TU DXVars.pm',
                                sorry => 'Lo siento',
                                spf1 => 'spoof: creando nuevo usuario $_[0]',
-                               stathf => 'Estadísticas de spots en HF de los Ãºltimos 31 días',
-                               stathft => 'Estadísticas de spots en HF de los Ãºltimos 31 días para DXCC $_[0]',
-                               statvhf => 'VHF + DX Spot Stats, Ãºltimos 31 días',
-                               statvhft => 'VHF + DX Spot Stats, Ãºltimos 31 días para DXCC $_[0]',
-                               statdx => 'Total de Spots de DX en los Ãºltimos 31 días',
+                               stathf => 'Estadísticas de spots en HF de los Ãºltimos $_[1] días desde el $_[0]',
+                               stathft => 'Estadísticas de spots en HF de los Ãºltimos $_[2] días desde el $_[1] para DXCC $_[0]',
+                               statvhf => 'VHF + DX Spot Stats, Ãºltimos $_[1] días desde el $_[0]',
+                               statvhft => 'VHF + DX Spot Stats, Ãºltimos $_[2] días desde el $_[1] para DXCC $_[0]',
+                               statdx => 'Total de Spots de DX en los Ãºltimos $_[1] días desde el $_[0]',
                                storable => 'Por favor, instale el módulo Storable de CPAN', 
                                sun => 'QTH                                   dd/mm/yyyy Salida Puesta',
                                sun_with_azel => 'QTH                                   dd/mm/yyyy Salida Puesta   Azim   Elev',
-                               susdb1 => 'uso: indicativo estado ciudad',
+                               susdb1 => 'Uso: indicativo estado ciudad',
                                susdb2 => 'USDB $_[0] era $_[1], $_[2]',
                                susdb3 => 'USDB $_[0] es ahora $_[1], $_[2]',
                                susdb4 => 'USDB $_[0] borrado',
-                               suser1 => 'uso: indicativo user_field_name valor',
+                               suser1 => 'Uso: indicativo user_field_name valor',
                                suser2 => 'Usuario $_[0] no encontrado',
                                suser3 => 'User field \'$_[0]\' era \'$_[1]\' ahora es \'$_[2]\'',
                                suser4 => 'User field name \'$_[0]\' no existe',
@@ -1042,25 +1087,28 @@ package DXM;
                                talkprompt => 'Talk ($_[0])>',
                                talkstart => 'Iniciando modo talk contigo',
                                unset => '$_[0] desactivado para $_[1]',
-                               unsethop1 => 'uso: unset/hops <call> ann|spots|wwv|wcy',
+                               unsethop1 => 'Uso: unset/hops <indicativo> ann|spots|wwv|wcy',
                                unsethop2 => 'Borrados los hops para $_[1] en $_[0]', 
-                       user => 'Usuario',
+                               user => 'Usuario',
                                userconn => 'Indicativos conectados a',
+                               usernf => '*** No se encuentra el registro de usuario de $_[0] ***',
                                usstates => 'Activada vista del estado USA en spots para $_[0]',
                                usstateu => 'Desactivada vista del estado USA en spots para $_[0]',
                                usernf => '*** Registro de usuario $_[0] no encontrado ***',
-                               wcy1 => '$_[0] falta o esta fuera de rango',
+                               wcy1 => '$_[0] falta o está fuera de rango',
                                wcy2 => 'WCY Duplicado',
+                               wcy3 => 'Fecha       Hora   SFI   A   K Exp.K   R SA    GMF   Aurora   Logger',
                                wcys => 'Activada recepción de anuncios WCY para $_[0]',
                                wcyu => 'Desactivada recepción de anuncios WWV para $_[0]',
-                               wpc16s => 'Admitir PC16 desde $_[0] activado',
-                               wpc16u => 'Admitir PC16 desde $_[0] desactivado',
+                               wpc16s => 'Admitir PC16 de $_[0] activado',
+                               wpc16u => 'Admitir PC16 de $_[0] desactivado',
                                wpc19s => 'Activada ruta PC19 para $_[0]',
                                wpc19u => 'Desactivada ruta PC19 para $_[0]',
                                wpc90s => 'PC90 para $_[0] activado',
                                wpc90u => 'PC90 para $_[0] descativado',
                                wwv1 => '$_[0] falta o está fuera de rango',
                                wwv2 => 'WWV Duplicado',
+                               wwv3 => 'Fecha       Hora   SFI   A   K Previsión                              Logger',
                                wwvs => 'Activada recepción de anuncios WWV para $_[0]',
                                wwvu => 'Desactivada recepción de anuncios WWV para $_[0]',
                                wxs => 'Activada recepción de anuncios WX para $_[0]',
@@ -1068,7 +1116,7 @@ package DXM;
                           },
                 de => {
                                addr => 'Adresse gesetzt auf: $_[0]',
-                               already => '$_[0] bereits verbunden',\r
+                               already => '$_[0] bereits verbunden',
                                anns => 'Announce flag gesetzt auf $_[0]',
                                annu => 'Announce flag zurueckgesetzt auf $_[0]',
                                annts => 'AnnTalk flag gesetzt auf $_[0]',
@@ -1079,19 +1127,19 @@ package DXM;
                                bbse1 => 'Bitte die BBS Adresse eingeben,, set/bbs <your bbs address>',
                                bbs => 'Deine BBS Adresse ist nun \"$_[0]\"',
                                beepoff => 'Beeps sind nun aus',
-                               beepon => 'Beeps sind jetzt eingeschaltet',\r
+                               beepon => 'Beeps sind jetzt eingeschaltet',
                                call1 => 'Callsign lookup via $_[0]:',
-                               conother => 'Sorry $_[0] Du bist zu diesem Cluster auf einem anderen Port connected',\r
-                               concluster => 'Sorry $_[0] Du bist schon anderswo mit einem Cluster verbunden (on $_[1])',\r
+                               conother => 'Sorry $_[0] Du bist zu diesem Cluster auf einem anderen Port connected',
+                               concluster => 'Sorry $_[0] Du bist schon anderswo mit einem Cluster verbunden (on $_[1])',
                                conscript => 'Kein connect script mit Namen \"$_[0]\" gefunden in $main::root/connect',
-                               confail => 'Verbindungsaufbau zu $_[0] misslungen ($_[1])',\r
-                               constart => 'Verbindungsaufbau zu $_[0] gestartet',\r
+                               confail => 'Verbindungsaufbau zu $_[0] misslungen ($_[1])',
+                               constart => 'Verbindungsaufbau zu $_[0] gestartet',
                                deluser => 'User $_[0] wurde geloescht',
                                db1 => 'Diese Datenbank ist untergebracht bei $_[0]',
-                               db2 => 'Sorry, aber Schluesselwort: $_[0] wurde nicht gefunden in $_[1]',\r
+                               db2 => 'Sorry, aber Schluesselwort: $_[0] wurde nicht gefunden in $_[1]',
                                db3 => 'Sorry, Datenbank $_[0] existiert hier nicht',
                                db4 => 'Sorry, Datenbank $_[0] untergebracht bei $_[1] ist nicht online',
-                               db5 => 'Zugriff auf fremde Datenbank bei $_[0]...standby...',\r
+                               db5 => 'Zugriff auf fremde Datenbank bei $_[0]...standby...',
                                db6 => 'Datenbank $_[0] existiert bereits, bitte zuerst loeschen',
                                db7 => 'Datenbank $_[0] angelegt fuer remote Cluster $_[1]',
                                db8 => 'Datenbank $_[0] lokal angelegt',
@@ -1099,7 +1147,7 @@ package DXM;
                                db10 => '$_[0] Datensaetze importiert in $_[1]',
                                db11 => 'Sende Deine Anfrage(n)an $_[0], bitte stand by...',
                                db12 => 'DB Name          Location   Cmd             Chain',
-                               dfreq1 => 'Ungueltige Freq $_[0] brauche: z.B. 0/30000 oder hf oder hf/cw',\r
+                               dfreq1 => 'Ungueltige Freq $_[0] brauche: z.B. 0/30000 oder hf oder hf/cw',
                                dir1 => 'Keine Nachricht gefunden',
                                disc1 => 'Disconnected von $_[0]',
                                disc2 => 'Kanal $_[0] disconnected',
@@ -1134,12 +1182,12 @@ package DXM;
                                e16 => 'Datei \"$_[0]\" existiert',
                                e17 => 'Bitte gebrauche dieses Wort: @_ nicht hier',
                                e18 => 'Kann nicht verbinden mit $_[0] ($!)',
-                               e19 => 'Ungueltiger Character in der Zeile',
+                               e19 => 'Ungueltiger Character in der Zeile $_[0]',
                                e20 => 'Kuerzel $_[0] nicht erkannt',
                                e21 => '$_[0] nicht numerisch',
                                e22 => '$_[0] kein Rufzeichen',
                                e23 => '$_[0] kein Bereich (z.B. 0/30000)',
-                               e24 => 'Sorry, Internet Zugriff ist nicht freigeschaltet',\r
+                               e24 => 'Sorry, Internet Zugriff ist nicht freigeschaltet',
                                e25 => 'Sorry der Wert muss zwischen $_[0] und $_[1] sein',
                                e26 => 'Zu viele Fehler gleichzeitig, Du wirst disconnected',
                                e27 => '$_[0] kein numerisches oder Rufzeichen Prefix',
@@ -1153,8 +1201,8 @@ package DXM;
                                e35 => 'Du bist kein Mitglied von $_[0], trete $_[0] bei',
                                echoon => 'Echo enabled',
                                echooff => 'Echo disabled',
-                               echow => '*Echo ist momentan disabled, set/echo zum aktivieren',\r
-                               emaile1 => 'Bitte E-Mail Addresse eingeben, set/email <Deine e-mail Adresse>',\r
+                               echow => '*Echo ist momentan disabled, set/echo zum aktivieren',
+                               emaile1 => 'Bitte E-Mail Addresse eingeben, set/email <Deine e-mail Adresse>',
                                emaila => 'Deine E-Mail Adresse ist nun \"$_[0]\"',
                                email => 'E-mail Adresse gesetzt auf: $_[0]',
                                export1 => 'Gebrauch: export <msgno> <dateiname>',
@@ -1178,13 +1226,13 @@ package DXM;
                                helpe2 => 'Keine Hilfe verfuegbar auf $_[0]',
                                heres => 'Hier gesetzt auf $_[0]',
                                heade1 => 'Using $main::mycall Coords, entspricht einem set/location or set/qra',
-                               hereu => 'HERE zurueckgesetzt auf $_[0]',\r
-                               homebbs => 'Heimat-BBS gesetzt auf: $_[0]',\r
-                               homenode => 'Heimat-Node gesetzt auf: $_[0]',\r
-                               hnodee1 => 'Bitte Heimat-Node eingeben, set/homenode <Dein Heimat DX Cluster>',\r
-                               hnodee2 => 'Heimat-Node setzen ist misslungen $_[0]',\r
-                               hnode => 'Dein Heimat-Node ist nun \"$_[0]\"',\r
-                               init1 => 'Initialisierungs-Nachricht gesendet an $_[0]',\r
+                               hereu => 'HERE zurueckgesetzt auf $_[0]',
+                               homebbs => 'Heimat-BBS gesetzt auf: $_[0]',
+                               homenode => 'Heimat-Node gesetzt auf: $_[0]',
+                               hnodee1 => 'Bitte Heimat-Node eingeben, set/homenode <Dein Heimat DX Cluster>',
+                               hnodee2 => 'Heimat-Node setzen ist misslungen $_[0]',
+                               hnode => 'Dein Heimat-Node ist nun \"$_[0]\"',
+                               init1 => 'Initialisierungs-Nachricht gesendet an $_[0]',
                                iso => '$_[0] Isoliert',
                                isou => '$_[0] UnIsoliert',
                                isoc => '$_[0] erstellt und Isoliert',
@@ -1192,15 +1240,15 @@ package DXM;
                                isoaro => 'Es gibt einen Ausgabe Route Filter fuer $_[0]; clear/route $_[0] zuerst',
                                isow => '$_[0] ist isoliert; unset/isolate $_[0] zuerst',
                                join => 'Trete Gespraechsgruppe $_[0] bei',
-                               l1 => 'Sorry $_[0], Du bist bereits auf einem anderen Kanal eingeloggt',\r
+                               l1 => 'Sorry $_[0], Du bist bereits auf einem anderen Kanal eingeloggt',
                                l2 => 'Moin $_[0], hier ist $main::mycall in $main::myqth\nrunning DXSpider V$main::version build $main::build',
-                               lang => 'Sprache ist jetzt Deutsch',\r
+                               lang => 'Sprache ist jetzt Deutsch',
                                lange1 => 'set/language <lang> wobei <lang> ist eine von ($_[0])',
-                               lange2 => 'Fehler beim Setzen der Sprache auf $_[0]',\r
+                               lange2 => 'Fehler beim Setzen der Sprache auf $_[0]',
                                lh1 => '$main::data/hop_table.pl existiert nicht',
-                               loce1 => 'Bitte Deinen Standort eingeben, set/location <latitude longitude>',\r
+                               loce1 => 'Bitte Deinen Standort eingeben, set/location <latitude longitude>',
                                loce2 => 'Nicht anerkannt \"$_[0]\" als Lat/Long (z.B. 52 20 N 0 16 E)',
-                               loce3 => '$_[0] ist ein QRA Locator, Gebrauch: set/qra $_[0]',\r
+                               loce3 => '$_[0] ist ein QRA Locator, Gebrauch: set/qra $_[0]',
                                loc => 'Dein Lat/Long ist nun \"$_[0]\"',
                                lockout => '$_[0] ausgesperrt',
                                lockoutc => '$_[0] erstellt und ausgesperrt',
@@ -1210,14 +1258,14 @@ package DXM;
                                logoutu => 'User $_[0] hat ausgeloggt',
                                loginn => 'Node $_[0] hat eingeloggt',
                                logoutn => 'Node $_[0] hat ausgeloggt',
-                               m1 => 'Betreff eingeben (max. 30 Zeichen):',\r
+                               m1 => 'Betreff eingeben (max. 30 Zeichen):',
                                m2 => 'Kopie der msg $_[0] gesendet an $_[1]',
                                m3 => 'Sorry, $_[0] ist keine akzeptable TO Adresse',
                                m4 => 'Sorry, kann nicht zugreifen auf Nachricht $_[0]',
                                m5 => 'Sorry, ich brauche eine Nachrichten Nummer',
                                m6 => 'Reply to: $_[0]',
-                               m7 => 'Betreff : $_[0]',\r
-                               m8 => 'Nachricht eingeben, /EX zum Absenden oder /ABORT zum Abbrechen',\r
+                               m7 => 'Betreff : $_[0]',
+                               m8 => 'Nachricht eingeben, /EX zum Absenden oder /ABORT zum Abbrechen',
                                m9 => 'Neue Nachricht(en) fuer Dich',
                                m10 => 'Nachricht abgebrochen',
                                m11 => 'Nachricht Nr. $_[0] gesichert und weitergeleitet an $_[1]',
@@ -1225,20 +1273,20 @@ package DXM;
                                m13 => 'Nachricht Nr. $_[0] fehlt',
                                m14 => 'Nachricht Nr. $_[0] markiert als gesendet an $_[1]',
                                m15 => 'Nachricht Nr. $_[0] unmarkiert als gesendet an $_[1]',
-                               m16 => 'Brauche eine Nachrichten-Nummer',\r
-                               m17 => 'Sorry, kann Nachricht nicht senden im $_[0] Mode',\r
+                               m16 => 'Brauche eine Nachrichten-Nummer',
+                               m17 => 'Sorry, kann Nachricht nicht senden im $_[0] Mode',
                                m18 => 'Sorry, Status von Nachricht Nr. $_[0] ist momentan KEEP',
                                msg1 => 'Bulletin Nachrichten aufgeschoben',
                                msg2 => 'Private Nachrichten aufgeschoben',
                                msg3 => 'Msg $_[0]: $_[1] geaendert von $_[2] auf $_[3]',
                                msgu => 'Gebrauch: msg <cmd> <msgno> data...',
-                               merge1 => 'Merge request fuer $_[1] Spots und $_[2] WWV gesendet an $_[0]',\r
+                               merge1 => 'Merge request fuer $_[1] Spots und $_[2] WWV gesendet an $_[0]',
                                moon => 'Standort                              dd/mm/yyyy Rise   Set',
                                moon_with_azel => 'Standort                              dd/mm/yyyy Rise   Set      Azim   Elev',
                                mond => 'Ueberwachung Disabled',
                                mone => 'Ueberwachung Enabled',
-                               namee1 => 'Bitte Deinen Namen eingeben, set/name <Dein Name>',\r
-                               namee2 => 'Kann User $_[0] nicht finden!',\r
+                               namee1 => 'Bitte Deinen Namen eingeben, set/name <Dein Name>',
+                               namee2 => 'Kann User $_[0] nicht finden!',
                                name => 'Dein Name ist jetzt \"$_[0]\"',
                                nodea => '$_[0] gesetzt als AK1A style Node',
                                nodeac => '$_[0] erstellt als AK1A style Node',
@@ -1253,9 +1301,9 @@ package DXM;
                                nodex => '$_[0] gesetzt als DXNET style Node',
                                nodexc => '$_[0] erstellt als DXNET style Node',
                                nodeu => '$_[0] zurueckgesetzt als ein User',
-                               nodee1 => 'Du kannst dieses Kommando nicht ausfuehren waehrend Dein Ziel ($_[0]) online ist',\r
+                               nodee1 => 'Du kannst dieses Kommando nicht ausfuehren waehrend Dein Ziel ($_[0]) online ist',
                                notdone => 'Nicht ausgefuehrt',
-                               nothere => 'Sorry, aber $_[0] ist nicht hier im Moment, bitte spaeter noch einmal Versuchen',\r
+                               nothere => 'Sorry, aber $_[0] ist nicht hier im Moment, bitte spaeter noch einmal Versuchen',
                                obscount => 'Ping obsolescence count on $_[0] set to $_[1]',
                                ok => 'Operation erfolgreich',
                                outconn => 'Outstanding connect to $_[0]',
@@ -1264,11 +1312,11 @@ package DXM;
                                passerr => 'Gebrauch: SET/PASS <Passwort> <Rufzeichen>',
                                password => 'Passwort gesetzt oder geaendert fuer $_[0]',
                                passwordu => 'Passwort geloescht fuer $_[0]',
-                               pingo => 'Ping gestartet nach $_[0]',\r
-                               pingi => 'Ping erfolgreich zu $_[0] $_[1] (durchschn. $_[2]) Sekunden',\r
-                               pinge1 => 'Du kannst Dich nicht selber pingen!',\r
-                               pingint => 'Ping-Intervall zu $_[0] gesetzt auf $_[1] Sekunden',\r
-                               'pos' => 'Von Rufzeichen: $_[0] Breite: $_[1] Laenge: $_[2]',\r
+                               pingo => 'Ping gestartet nach $_[0]',
+                               pingi => 'Ping erfolgreich zu $_[0] $_[1] (durchschn. $_[2]) Sekunden',
+                               pinge1 => 'Du kannst Dich nicht selber pingen!',
+                               pingint => 'Ping-Intervall zu $_[0] gesetzt auf $_[1] Sekunden',
+                               'pos' => 'Von Rufzeichen: $_[0] Breite: $_[1] Laenge: $_[2]',
                                prs => 'Prompt gesetzt auf \"$_[0]\"',
                                pru => 'Prompt jetzt zurueckgesetzt auf Default-Einstellung',
                                priv => 'Priviligierten Level geaendert auf $_[0]',
@@ -1278,15 +1326,15 @@ package DXM;
                                pw2 => 'Wiederhole neues Passwort: ',
                                pw3 => 'Passwort geaendert',
                                pw4 => 'Passwoerter differieren, Passwort NICHT geaendert',
-                               qll => 'Bitte gib Deinen Standort als geograph. Koordinaten mit set/location oder als Maidenhead-Kenner mit set/qra ein',\r
-                               qthe1 => 'Bitte gib Dein QTH ein mit set/qth <Dein qth>',\r
+                               qll => 'Bitte gib Deinen Standort als geograph. Koordinaten mit set/location oder als Maidenhead-Kenner mit set/qra ein',
+                               qthe1 => 'Bitte gib Dein QTH ein mit set/qth <Dein qth>',
                                qth => 'Dein QTH ist nun \"$_[0]\"',
                                qrae1 => 'Bitte gib Deinen QRA Locator ein mit set/qra <qra locator> (z.B. set/qra JO44RK)',
                                qrashe1 => 'Bitte einen QRA Locator eingeben, z.B. sh/qra JO02LQ oder sh/qra JO02LQ IO93NS',
-                               qrae2 => 'Erkenne nicht \"$_[0]\" als einen QRA Locator (z.B. JO02LQ)',\r
+                               qrae2 => 'Erkenne nicht \"$_[0]\" als einen QRA Locator (z.B. JO02LQ)',
                                qra => 'Dein QRA Locator ist nun \"$_[0]\"',
                                rcmdo => 'RCMD \"$_[0]\" gesendet an $_[1]',
-                               read1 => 'Sorry, keine neuen Nachrichten fuer Dich',\r
+                               read1 => 'Sorry, keine neuen Nachrichten fuer Dich',
                                read2 => 'Msg $_[0] nicht gefunden',
                                read3 => 'Msg $_[0] nicht verfuegbar',
                                rec => '$_[0] records',
@@ -1295,7 +1343,7 @@ package DXM;
                                reginac => 'Registrierung ist nicht aktiv (set/var \$main::reqreg = 1 to activate)',
                                regun => '$_[0] unregistriert',
                                route => '$_[0] auf $_[1] via $_[2]',
-                               sat1 => 'Tracking Tabelle fuer $_[0] fuer die naechsten $_[1] Stunden alle $_[2] mins',\r
+                               sat1 => 'Tracking Tabelle fuer $_[0] fuer die naechsten $_[1] Stunden alle $_[2] mins',
                                sat2 => 'dd/mm  UTC      Lat     Lon  Alt Km      Az      El Dist Km',
                                sat3 => 'Syntax: SH/SAT <name> [<hours> <interval>]',
                                sat4 => 'Satelliten verfuegbar:-',
@@ -1319,19 +1367,19 @@ package DXM;
                                statvhf => 'VHF+ DX Spot Stats, letzte 31 Tage',
                                statvhft => 'VHF+ DX Spot Stats, letzte 31 Tage fuer DXCC $_[0]',
                                statdx => 'Total DX Spots letzte 31 Tage',
-                               sun => 'Location                              dd/mm/jjjj Rise   Set',\r
-                               sun_with_azel => 'Location                              dd/mm/jjjj Rise   Set      Azim   Elev',\r
+                               sun => 'Location                              dd/mm/jjjj Rise   Set',
+                               sun_with_azel => 'Location                              dd/mm/jjjj Rise   Set      Azim   Elev',
                                suser1 => 'Gebrauch: Rufzeichen user_field_name value',
                                suser2 => 'User $_[0] nicht gefunden',
                                suser3 => 'User Feld \'$_[0]\' war \'$_[1]\' nun gesetzt auf \'$_[2]\'',
-                               suser4 => 'User Feld Name \'$_[0]\' existiert nicht',\r
+                               suser4 => 'User Feld Name \'$_[0]\' existiert nicht',
                                time1 => 'Lokala Zeit: $_[0] $_[1], UTC $_[2]',
                                time2 => '$_[0] Lokale (standard) Zeit: $_[1] ($_[2] Stunden)',
                                time3 => '$_[0]  $_[1]',
                                talks => 'Talk flag gesetzt auf $_[0]',
                                talku => 'Talk flag zurueckgesetzt auf $_[0]',
                                talkend => 'Beendet Talk zu Dir',
-                               talkinst => 'Talkmode, /EX zum Beenden, /<cmd> um ein Kommando auszufuehren',\r
+                               talkinst => 'Talkmode, /EX zum Beenden, /<cmd> um ein Kommando auszufuehren',
                                talknh => 'Sorry $_[0] ist im moment nicht online',
                                talkprompt => 'Talk ($_[0])>',
                                talkstart => 'Startet Talkmode zu Dir',
@@ -1408,7 +1456,7 @@ package DXM;
                                e16 => 'Il file \"$_[0]\" esiste',
                                e17 => 'Non usare le parole: @_ qui', 
                                e18 => 'Impossibile connettere $_[0] ($!)',
-                               e19 => 'Carattere non valido nella linea',
+                               e19 => 'Carattere non valido nella linea  $_[0]',
                                e20 => 'separatore $_[0] non riconosciuto',
                                e21 => '$_[0] non e\' numerico',
                                e22 => '$_[0] non e\' un nominativo',
@@ -1681,7 +1729,7 @@ package DXM;
                                e16 => 'Soubor \"$_[0]\" uz existuje',
                                e17 => 'Prosim nepouzivej zde toto slovo: @_', 
                                e18 => 'Nemohu se pripojit na $_[0] ($!)',
-                               e19 => 'neplatny znak v radku',
+                               e19 => 'neplatny znak v radku  $_[0]',
                                e20 => 'retezec $_0] nebyl rozpoznan',
                                e21 => '$_[0] neni cislo',
                                e22 => '$_[0] neni znacka',
@@ -1818,7 +1866,6 @@ package DXM;
                                pinge1 => 'Nemuzu pingnout sam sebe!',
                                pingint => 'Ping interval na $_[0] byl nastaven na $_[1] sekundy',
                                'pos' => 'Od znacky: $_[0] Sirka: $_[1] Delka: $_[2]',
-                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',
                                pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',
                                prs => 'Prompt byl nastaven na \"$_[0]\"',
                                pru => 'Prompt byl vracen na default',
@@ -1974,7 +2021,7 @@ package DXM;
                                e16 => 'O ficheiro \"$_[0]\" existe',
                                e17 => 'Por favor no use as palavras: @_ aqui', 
                                e18 => 'No posso ligar a $_[0] ($!)',
-                               e19 => 'Caracter invlido na linha',
+                               e19 => 'Caracter invlido na linha $_[0]',
                                e20 => 'sinal $_[0] no reconhecido',
                                e21 => '$_[0] no  numrico',
                                e22 => '$_[0] no  um indicativo',