add a create/user command

[spider.git] / perl / Messages

diff --git a/perl/Messages b/perl/Messages
index 694d61cccb0ac10857c24321cffc1da32bf78e54..3b0db325a752cff45b74b65ccf5ecb855c317788 100644 (file)
--- a/perl/Messages
+++ b/perl/Messages
@@ -38,6 +38,7 @@ package DXM;
                                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]',
@@ -84,13 +85,13 @@ package DXM;
                                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)', 
+                               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',
@@ -104,6 +105,7 @@ 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',
 
                                echoon => 'Echoing enabled',
                                echooff => 'Echoing disabled',
@@ -779,11 +781,16 @@ package DXM;
                                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]',
@@ -867,6 +874,8 @@ package DXM;
                                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]',
@@ -911,7 +920,9 @@ package DXM;
                                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',
@@ -1067,6 +1078,7 @@ package DXM;
                                usernf => '*** Registro de usuario $_[0] no encontrado ***',
                                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 de $_[0] activado',