added italian translation of Messages from IT9ROT

added / and // to send
added // to talk

diff --git a/Changes b/Changes
index 1b8b9351769bab538918893b0c1b0f0be99c762e..3954030bb56011ab6bb416a4149bd822df5b8ce1 100644 (file)
--- a/Changes
+++ b/Changes
@@ -9,7 +9,12 @@ list of commands in "<cmd>") to a file.
 7. Add a new command "echo" which echos its argument to the screen (useful
 for titling in the save command above.
 8. Increase interval between logins causing for/opernam to 60 days (from 30)
-+ a random factor between 0 and 9
++ a random factor between 0 and 9.
+9. Added Italian Messages from Luca IT9ROT (thank you very much).
+10. Added the /<cmd> feature (as in talk) to execute a cmd whilst typing a 
+message, then enhanced it so that if you do //sh/dx (for instance) it will
+put the result into the message (as well as show it to you).
+11. Added the // feature to talk as well. 
 02Jan02=======================================================================
 1. updated the copyright dates
 2. modernised and extended the Windows instructions a bit.

diff --git a/cmd/Commands_en.hlp b/cmd/Commands_en.hlp
index b0b21c66824886e18efdf78a1853c2e1ca123b3a..ff8b54f10d9b659c66f28d0cd1dd24ade3e1b5cc 100644 (file)
--- a/cmd/Commands_en.hlp
+++ b/cmd/Commands_en.hlp
@@ -1153,7 +1153,9 @@ an individual callsign or to one of the 'bulletin' addresses.
 
 SEND <call> on its own acts as though you had typed SEND PRIVATE, that is
 it will mark the message as personal and send it to the cluster node that
-that callsign is connected to.
+that callsign is connected to. If the <call> you have specified is in fact
+a known bulletin category on your node (eg: ALL) then the message should
+automatically become a bulletin.
 
 You can have more than one callsign in all of the SEND commands.
 
@@ -1167,6 +1169,51 @@ receive a read receipt when they have read the message.
 SB is an alias for SEND NOPRIVATE (or send a bulletin in BBS speak)
 SP is an alias for SEND PRIVATE
 
+The system will ask you for a subject. Conventionally this should be 
+no longer than 29 characters for compatibility. Most modern cluster
+software should accept more.
+
+You will now be prompted to start entering your text. 
+
+You finish the message by entering '/EX' on a new line. For instance:
+
+  ...
+  bye then Jim
+  73 Dirk
+  /ex
+
+If you have started a message and you don't want to keep it then you
+can abandon the message with '/ABORT' on a new line, like:-
+
+  line 1
+  line 2
+  oh I just can't be bothered with this
+  /abort
+
+If you abort the message it will NOT be sent.
+
+When you are entering the text of your message, most normal output (such
+as DX announcements and so on are suppressed and stored for latter display
+(upto 20 such lines are stored, as new ones come along, so the oldest
+lines are dropped).
+
+Also, you can enter normal commands commands (and get the output 
+immediately) whilst in the middle of a message. You do this by typing
+the command preceeded by a '/' character on a new line, so:-
+
+  /dx g1tlh 144010 strong signal
+
+Will issue a dx annoucement to the rest of the cluster. 
+
+Also, you can add the output of a command to your message by preceeding 
+the command with '//', thus :-
+
+  //sh/vhftable
+
+This will show YOU the output from SH/VHFTABLE and also store it in the
+message. 
+
+You can carry on with the message until you are ready to send it. 
 === 0^SET/ADDRESS <your address>^Record your postal address
 
 === 0^SET/ANNOUNCE^Allow announce messages to come out on your terminal
@@ -2045,6 +2092,15 @@ To leave talk mode type:
    
    /EX
 
+If you are in 'Talk' mode, there is an extention to the '/' command which
+allows you to send the output to all the people you are talking to. You do 
+with the '//' command. For example:-
+
+  //sh/hftable
+
+will send the hftable as you have it to all the people you are currently 
+talking to.
+
 === 0^TYPE <filearea>/<name>^Look at the contents of a file in one of the fileareas
 Type out the contents of a file in a filearea. So, for example, in 
 filearea 'bulletins' you want to look at file 'arld051' you would 

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index d562437a6460d3ca380803db27784b3d2417ba15..cda7690415ce9f56539c009894eea3ca4c421268 100644 (file)
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -265,9 +265,24 @@ sub normal
                        }
                        $self->state('prompt');
                        delete $self->{talklist};
-               } elsif ($cmdline =~ m(^/\w+)) {
-                       $cmdline =~ s(^/)();
-                       $self->send_ans(run_cmd($self, $cmdline));
+               } elsif ($cmdline =~ m|^/+\w+|) {
+                       $cmdline =~ s|^/||;
+                       my $sendit = $cmdline =~ s|^/+||;
+                       my @in = $self->run_cmd($cmdline);
+                       $self->send_ans(@in);
+                       if ($sendit && $self->{talklist} && @{$self->{talklist}}) {
+                               foreach my $l (@in) {
+                                       my @bad;
+                                       if (@bad = BadWords::check($l)) {
+                                               $self->badcount(($self->badcount||0) + @bad);
+                                               Log('DXCommand', "$self->{call} swore: $l");
+                                       } else {
+                                               for (@{$self->{talklist}}) {
+                                                       $self->send_talks($_, $l);
+                                               }
+                                       }
+                               }
+                       }
                        $self->send($self->talk_prompt);
                } elsif ($self->{talklist} && @{$self->{talklist}}) {
                        # send what has been said to whoever is in this person's talk list

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index ff9d45aaeb57ffbafe96d22effcb6c0a697fc69c..8db35b9df78c29c1721d549084ac77f8e5b2a458 100644 (file)
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -1086,6 +1086,24 @@ sub do_send_stuff
                        delete $self->{loc};
                        $self->func(undef);
                        $self->state('prompt');
+               } elsif ($line =~ m|^/+\w+|) {
+                       # this is a command that you want display for your own reference
+                       # or if it has TWO slashes is a command 
+                       $line =~ s|^/||;
+                       my $store = $line =~ s|^/+||;
+                       my @in = $self->run_cmd($line);
+                       push @out, @in;
+                       if ($store) {
+                               foreach my $l (@in) {
+                                       if (my @ans = BadWords::check($l)) {
+                                               $self->{badcount} += @ans;
+                                               Log('msg', $self->call . " used badwords: @ans to @{$loc->{to}} subject: '$loc->{subject}' in msg") unless $loc->{reject};
+                                               Log('msg', "line: $l");
+                                               $loc->{reject}++;
+                                       } 
+                                       push @{$loc->{lines}}, length($l) > 0 ? $l : " ";
+                               }
+                       }
                } else {
                        if (my @ans = BadWords::check($line)) {
                                $self->{badcount} += @ans;

diff --git a/perl/Messages b/perl/Messages
index c0f1c06afce5efd1f785cf807f85259f4d2e5450..128415cbec630677cd5d2287d41bbd9b548266d2 100644 (file)
--- a/perl/Messages
+++ b/perl/Messages
@@ -906,4 +906,278 @@ package DXM;
                                wxs => 'WX flag gesetzt auf $_[0]',
                                wxu => 'WX flag zurueckgesetzt auf $_[0]',
                           },
-               );
+                it => {
+                               addr => 'Indirizzo impostato a: $_[0]',
+            already => '$_[0] e\' connesso',
+                               anns => 'Annunci attivati alle_[0]',
+                               annu => 'Annunci disattivati alle $_[0]',
+                               annts => 'Talk attivato alle $_[0]',
+                               anntu => 'Talk disattivato alle $_[0]',
+                               badnode1 => '$_[0] e\' un nodo disabilitato',
+                               badnode2 => '$_[0] e\' un nodo attivo',
+                               badnode3 => 'Lista dei nodi disabilitati:-',
+                               bbse1 => 'Per favore inserisci l\'indirizzo del tuo BBS con set/bbs <tuo bbs>',
+                               bbs => 'Il tuo BBS e\' ora \"$_[0]\"',
+                               beepoff => 'I beep sono disattivati',
+                               beepon => 'I beep sono attivati',
+                               call1 => 'Ricerca del nominativo via $_[0]:',
+                               conother => 'Spiacente $_[0] sei connesso già su un\'altra porta',
+                               concluster => 'Spiacente $_[0] sei connesso già alla rete cluster (su $_[1])',
+                               conscript => 'nessuno script di connessione chiamato \"$_[0]\" trovato in $main::root/connect',
+                               confail => 'connessione a $_[0] fallita ($_[1])',
+                               constart => 'connessione a $_[0] iniziata',
+                               deluser => 'L\'utente $_[0] e\' stato eliminato',
+                               db1 => 'Questo database e\' presso $_[0]',
+                               db2 => 'Spiacente, ma la chiave: $_[0] non e\' stata trovata in $_[1]',
+                               db3 => 'Spiacente, il database $_[0] non esiste qui',
+                               db4 => 'Spiacente, il database $_[0] presso $_[1] non e\' disponibile al momento',
+                               db5 => 'Sto accedendo al database remoto presso $_[0]...attendere...',
+                               db6 => 'Il database $_[0] esiste già, cancellalo prima',
+                               db7 => 'Il database $_[0] e\' stato creato per il nodo remoto $_[1]',
+                               db8 => 'Il database $_[0] e\' stato creato localmente',
+                               db9 => 'Il database $_[0] e\' stato eliminato',
+                               db10 => '$_[0] record importati in $_[1]',
+                               db11 => 'Sto inviando le tue richieste a $_[0], attendi...',
+                               dfreq1 => 'Frequenza non valida $_[0], deve essere del tipo 0/30000 o hf o hf/cw', 
+                               dir1 => 'Nessun messaggio trovato',
+                               disc1 => 'Disconnesso da $_[0]',
+                               disc2 => 'Canalew $_[0] disconnesso',
+                               disc3 => 'Nessun canale, ma la connessione $_[0] disconnessa',
+                               disc4 => 'Nessun canale o connessione ma $_[0] disconnesso',
+                               done => 'Fatto',
+                               dup => 'Spiacente, questo e\' un doppione',
+                               dx1 => 'Frequenza $_[0] non nella banda (controlla show/band); sintassi: DX [BY nominativo] freq nominativo commento',
+                               dx2 => 'Serve un nominatico; sintassi: DX [BY nominativo] freq nominativo commento',
+                               dx3 => 'Il nominativo o la frequenza sono errati',
+                               dxs => 'DX Spots attivati alle $_[0]',
+                               dxu => 'DX Spots disattivati alle $_[0]',
+                               e1 => 'Comando errato',
+                               e2 => 'Errore: $_[0]',
+                               e3 => '$_[0]: $_[1] non trovato',
+                               e4 => 'Inserire un prefisso o un nominativo',
+                               e5 => 'Non permesso',
+                               e6 => '*** Nessuna stazione specificata ***',
+                               e7 => 'il nominativo $_[0] non e\' visibile sul cluster',
+                               e8 => 'Inserire un nominativo o del testo',
+                               e9 => 'Inserire del testo',
+                               e10 => '$_[0] non connesso localmente',
+                               e11 => 'Impossibile usare $main:mycall come destinazione',
+                               e12 => 'Inserire il nominativo di un nodo',
+                               e13 => '$_[0] non e\' un nodo',
+                               e14 => 'Il primo argomento deve essere numerico e > 0',
+                               e15 => 'qualificatore non valido \"$_[0]\"',
+                               e16 => 'Il file \"$_[0]\" esiste',
+                               e17 => 'Non usare le parole: @_ qui', 
+                               e18 => 'Impossibile connettere $_[0] ($!)',
+                               e19 => 'Carattere non valido nella linea',
+                               e20 => 'separatore $_[0] non riconosciuto',
+                               e21 => '$_[0] non e\' numerico',
+                               e22 => '$_[0] non e\' un nominativo',
+                               e23 => '$_[0] non e\' un intervallo (es 0/30000)', 
+                               e24 => 'Spiacente, l\'accesso ad internet non e\' abilitato',
+                               e25 => 'Spiacente il valore deve essere tra $_[0] e $_[1]',
+                               e26 => 'Troppi errori, stai per essere disconnesso',
+                               e27 => '$_[0] non e\' un prefisso numeroco o di nominativo', 
+                               e28 => 'Spiacente, devi essere registrato  (SP $main::myalias per registrarti)',
+                               e29 => 'E\' necessaria una password',
+
+                               echoon => 'Echo abilitato',
+                               echooff => 'Echo disabilitato',
+                               echow => '*Echo e\' al momento disabilitato, usa set/echo per abilitarlo',
+                               emaile1 => 'Per favore inserisci il tuo indirizzo email con: set/email <indirizzo>',
+                               emaila => 'Il tuo indirizzo email e\' ora \"$_[0]\"',
+                               email => 'Indirizzo email impostato a: $_[0]',
+                               export1 => 'sintassi: export <num_mess> <nome_file>',
+                               export2 => '$_[3] ha problemi esportando i messaggi da $_[0] a $_[1] ($_[2])',
+                               export3 => '$_[2 ] messaggi esportati da $_[0] a $_[1]',
+                               filter1 => 'Filtro $_[0] aggiornato per $_[1]',
+                               filter2 => 'Chiave sconosciuta per il filtro $_[0]',
+                               filter3 => 'Nessun filtro definito per $_[0]',
+                               filter4 => '$_[0]$_[1] Filtro $_[2] cancellato per $_[3]',
+                               filter5 => 'necessito qualche comando per i filtri...',
+                               filter6 => '$_[0]$_[1] Filtro per $[2] non trovato',
+                               grids => 'DX Grid attivato alle $_[0]',
+                               gridu => 'DX Grid disattivato alle $_[0]',
+                               illcall => 'Spiacente, $_[0] non e\' un nominativo valido',
+                               hasha => '$_[0] già esiste $_[1]',
+                               hashb => '$_[0] aggiunto a $_[1]',
+                               hashc => '$_[0] rimosso da $_[1]',
+                               hashd => '$_[0] non in $_[1]', 
+                               hashe => '$_[0] impostato a $_[1]', 
+                               helpe1 => 'Aiuto non disponibile, contatta il sysop',
+                               helpe2 => 'Nessun aiuto per $_[0]',
+                               heres => 'Here abilitato per $_[0]',
+                               heade1 => 'Sto usando le coordinate $main::mycall, e\' preferibile impostarle con set/location o set/qra',
+                               hereu => 'Here disattivato per $_[0]',
+                               homebbs => 'Home BBS impostata a: $_[0]',
+                               homenode => 'Home Node impostato a: $_[0]',
+                               hnodee1 => 'Per piacere imposta il tuo Home Node con set/homenode <nominativo_cluster>',
+                               hnodee2 => 'Impostazione dell\'homenode fallita per $_[0]',
+                               hnode => 'Il tuo Homenode e\' adesso \"$_[0]\"',
+                               init1 => 'inizializzaione inviata a $_[0]',
+                               iso => '$_[0] Isolato',
+                               isou => '$_[0] non Isolato',
+                               isoc => '$_[0] creato ed isolato',
+                               isoari => 'c\'e\' una filtro sulla rotta in ingresso per $_[0]; eliminala con clear/route input $_[0] prima',
+                               isoaro => 'c\'e\' una filtro sulla rotta in uscita per $_[0]; eliminala con clear/route $_[0] prima',
+                               isow => '$_[0] e\' isolato; unset/isolate $_[0] prima',
+                               l1 => 'Spiacente $_[0], sei già collegato sun un altro canale',
+                               l2 => 'Benvenuto $_[0] sul Cluster $main::mycall a $main::myqth\nsoftware in uso DXSpider V$main::version build $main::build',
+                               lang => 'La lingua selezionata e\' adesso $_[0]',
+                               lange1 => 'set/language <lingua> dove <lingua> e\' una tra ($_[0])',
+                               lange2 => 'impostazione lingua fallita per $_[0]', 
+                               lh1 => '$main::data/hop_table.pl non esiste',
+                               loce1 => 'Per piacere inserisci la tua posizione, set/location <latitudine longitudine>',
+                               loce2 => 'Non riconosco \"$_[0]\" come Lat/Long (es 52 20 N 0 16 E)',
+                               loce3 => '$_[0] e\' una locatore QRA, usa: set/qra $_[0]',
+                               loc => 'I tuoi dati Lat/Long sono ora \"$_[0]\"',
+                               lockout => '$_[0] Bloccato',
+                               lockoutc => '$_[0] Creato e bloccato',
+                               lockoutun => '$_[0] Sbloccato',
+                               lockoutuse => 'sintassi: sh/lockout <nominativo>|ALL',
+                               loginu => 'L\'utente $_[0] e\' entrato nel cluster',
+                               logoutu => 'L\'utente $_[0] e\' uscito dal cluster',
+                               loginn => 'Il nodo $_[0] si e\' connesso',
+                               logoutn => 'Il nodo $_[0] si e\' disconnesso',
+                               m1 => 'Inserisci il Soggetto (30 caratteri):',
+                               m2 => 'Copia del messaggio $_[0] spedita a $_[1]',
+                               m3 => 'Spiacente, $_[0] non e\' un destinatario accettabile',
+                               m4 => 'Spiacente, non posso accedere al messaggio $_[0]',
+                               m5 => 'Spiacente, ho bisogno del numero di un messaggio', 
+                               m6 => 'Rispondi a: $_[0]',
+                               m7 => 'Soggetto : $_[0]',
+                               m8 => 'Scrivi il messaggio e batti /EX per spedirlo o /ABORT per uscire',
+                               m9 => 'Nuovi messaggi sono arrivati per te',
+                               m10 => 'Messaggio abortito',
+                               m11 => 'Il messaggio $_[0] e\' stato salvato e inviato a $_[1]',
+                               m12 => 'Il messaggio $_[0] e\' stato cancellato',
+                               m13 => 'Il messaggio $_[0] non esiste',
+                               m14 => 'Il messaggio $_[0] e\' stato marcato come spedito a $_[1]',
+                               m15 => 'Il messaggio $_[0] risolta ora non spedito a $_[1]',
+                               m16 => 'Specificare il numero del messaggio',
+                               m17 => 'Spiacente, impossibile spedire messaggi in modo $_[0]',
+            msg1 => 'Bollettino messo in coda',
+            msg2 => 'Messaggio messo in coda',
+                               msg3 => 'Msg $_[0]: $_[1] cambiato da $_[2] a $_[3]',
+                               msgu => 'sintassi: msg <comando> <num_mess> dati...',
+                               merge1 => 'Richiesta di merge per gli spot $_[1] e i WWV $_[2] spedita a $_[0]',
+                               moon => 'Localita                              gg/mm/aaaa Alba   Tramonto',
+                               moon_with_azel => 'Località 
+                                        gg/mm/aaaa Alba   Tramonto Azim   Elev',
+                               mond => 'Monitor disabilitato',
+                               mone => 'Monitor abilitato',
+                               namee1 => 'Per favore inserisci con set/name <nome>',
+                               namee2 => 'Impossibile trovare l\'utente $_[0]!',
+                               name => 'Il tuo nome ora e\' \"$_[0]\"',
+                               nodea => '$_[0] impostato come nodo stile AK1A',
+                               nodeac => '$_[0] creato come nodo stile AK1A',
+                               nodeb => '$_[0] impostato come BBS',
+                               nodebc => '$_[0] creato come BBS',
+                               nodec => '$_[0] impostato come nodo stile CLX',
+                               nodecc => '$_[0] creato come nodo stile CLX',
+                               noder => '$_[0] impostato come nodo stile AR-Cluster',
+                               noderc => '$_[0] creato come nodo stile AR-Cluster',
+                               nodes => '$_[0] impostato come nodo stile DXSpider',
+                               nodesc => '$_[0] creato come nodo stile DXSpider',
+                               nodex => '$_[0] impostato come nodo stile DXNET',
+                               nodexc => '$_[0] creato come nodo stile DXNET',
+                               nodeu => '$_[0] impostato come utente',
+                               nodee1 => 'Non puoi utilizzare questo comando mentre il destinatario ($_[0]) e\' connesso',
+                               notdone => 'Non eseguito',
+                               nothere => 'Spiacente, ma $_[0] non e\' presente al momento, prova più tardi', 
+                               obscount => 'Contatore di obsolescenza del ping per $_[0] impostato a $_[1]',
+                               ok => 'Operazione eseguita con successo',
+                               outconn => 'Connessione in corso per $_[0]',
+                               page => 'Premi Invio per continuare, A per annullare ($_[0] linee) >',
+                               pagelth => 'La lunghezza della pagina e\' adesso $_[0]',
+                               passerr => 'sintassi: SET/PASS <password> <nominativo>',
+                               password => 'Password impostata o cambiata per $_[0]',
+                               passwordu => 'Password rimossa per $_[0]',
+                               pingo => 'Ping mandato a $_[0]',
+                               pingi => 'Ping ritornato da $_[0] $_[1] (media $_[2]) secondi',
+                               pinge1 => 'Non puoi far un ping su te stesso!',
+                               pingint => 'Intervallo di ping per $_[0] impostato a $_[1] secondi',
+                               'pos' => 'Dal nominativo: $_[0] Lat: $_[1] Long: $_[2]',
+                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',
+                               pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',
+                               priv => 'Privilegi cambiati per $_[0]',
+                               prs => 'Prompt impostato a \"$_[0]\"',
+                               pru => 'Prompt reimpostato al predefinito',
+                               prx => '$main::mycall >',
+                               pw0 => 'Inserisci la vecchia password: ',
+                               pw1 => 'Inserisci la nuova password: ',
+                               pw2 => 'Reinserisci la nuova password: ',
+                               pw3 => 'Password modificata',
+                               pw4 => 'Le password sono differenti, password NON cambiata',
+                               qll => 'Per favore inserisci la tua località con set/location o set/qra',
+                               qthe1 => 'Per favore inserisci il tuo QTH con set/qth <qth>',
+                               qth => 'Il tuo QTH e\' adesso \"$_[0]\"',
+                               qrae1 => 'Per favore inserisci il tuo locatore QRA con set/qra <locatore> (es set/qra JM77GF)',
+                               qrashe1 => 'Please enter a QRA locator, eg sh/qra JO02LQ or sh/qra JO02LQ IO93NS',
+                               qrae2 => 'Non riconosco \"$_[0]\" come locatore QRA (es JM77GF)',
+                               qra => 'Il tuo locatore QRA e\' adesso \"$_[0]\"',
+                               rcmdo => 'RCMD \"$_[0]\" spedito a $_[1]',
+                               rec => '$_[0] records',
+                               read1 => 'Spiacente, non ci sono nuovi messaggi per te',
+                               read2 => 'Messaggio $_[0] non trovato',
+                               read3 => 'Messaggio $_[0] non disponibile',
+                               rec => '$_[0] records',
+                               reg => '$_[0] registrato',
+                               regc => '$_[0] creato e registrato',
+                               reginac => 'La registrazione non e\' attiva (set/var \$main::reqreg = 1 per attivarla)',
+                               regun => '$_[0] deregistrato',
+                               route => '$_[0] su $_[1] via $_[2]',
+                               sat1 => 'Tracking Table for $_[0] for the next $_[1] hours every $_[2] mins',
+                               sat2 => 'dd/mm  UTC      Lat     Lon  Alt Km      Az      El Dist Km',
+                               sat3 => 'Sintassi: SH/SAT <nome> [<ore> <intervallo>]',
+                               sat4 => 'Satelliti disponibili/Età dei Kepleriani (giorni):-',
+                               sat5 => 'serve nnnnn.AMSAT nel soggetto per caricare i kepleriani dal messaggio',
+                               satnf => 'Satellite $_[0] sconosciuto',
+                               satdisc => '-----',
+                               sethop1 => 'sintassi: set/hops <nominativo> ann|spots|wwv|wcy <num di salti>',
+                               sethop2 => '$_[0] salti impostai per $_[1]$_[2] per $_[3]', 
+                               sethop3 => 'Nessun salto impostato per $_[0]', 
+                               shutting => '$main::mycall si sta arrestando...',
+                               sloc => 'Cluster lat $_[0] long $_[1], Non scordare di camberli nel file DXVars.pm',
+                               snode1 => 'Nodo Nominativo Ordine    Versione',
+                               snode2 => '$_[0] $_[1]  $_[2]',
+                               snode3 => '$_[0] Nominativo sconosciuto',
+                               sqra => 'Locatore QRA del Cluster$_[0], NON DIMENTICARE DI CAMBIARLO NEL TUO FILE DXVars.pm',
+                               sorry => 'Spiacente',
+                               spf1 => 'spoof: sto creando il nuovo utente $_[0]',
+                               stathf => 'Statistiche HF DX Spot, ultimi 31 giorni',
+                               stathft => 'Statistiche HF DX Spot, ultimi 31 giorni per DXCC $_[0]',
+                               statvhf => 'Statistiche VHF+ DX Spot, ultimi 31 giorni',
+                               statvhft => 'Statistiche VHF+ DX Spot, ultimi 31 days per DXCC $_[0]',
+                               statdx => 'Totale DX Spots degli ultimi 31 giorni',
+                               sun => 'Località                              gg/mm/aaaa Alba   Tramonto',
+                               sun_with_azel => 'Località
+                                       gg/mm/aaaa Alba   Tramonto Azim   Elev',
+
+                               suser1 => 'sintassi: nominatio campo_utente valore',
+                               suser2 => 'Utente $_[0] non trovato',
+                               suser3 => 'Il campo utente \'$_[0]\' era \'$_[1]\' ora e\' impostao a \'$_[2]\'',
+                               suser4 => 'Il campo utente \'$_[0]\' non esiste',
+                               time1 => 'Ora locale: $_[0] $_[1], UTC $_[2]',
+                               time2 => '$_[0] Ora (standard) locale: $_[1] ($_[2] ore)',
+                               time3 => '$_[0]  $_[1]',
+                               talks => 'Talk abilitato per $_[0]',
+                               talku => 'Talk disabilitato per $_[0]',
+                               talkend => 'Chiude il la conversazione con te',
+                               talkinst => 'Stai entrando nel modo conversazione, /EX per uscire, /<cmd> per eseguire un comando',
+                               talknh => 'Spiaente $_[0] non e\' collegato al momento',
+                               talkprompt => 'Talk ($_[0])>',
+                               talkstart => 'Inizia una conversazione con te',
+                               unsethop1 => 'sintassi: unset/hops <nominativo> ann|spots|wwv|wcy',
+                               unsethop2 => 'salti eliminati su $_[1] per $_[0]',
+                               usernf => '*** Record utente per $_[0] non trovato ***',
+                               wcy1 => '$_[0] manca o e\' fuori limite',
+                               wcy2 => 'WCY duplicato',
+                               wwv1 => '$_[0] manca o e\' fuori limite',
+                               wwv2 => 'WWV duplicato',
+                               wwvs => 'WWV abilitati per $_[0]',
+                               wwvu => 'WWV disabilitati per $_[0]',
+                               wxs => 'WX abilitati per $_[0]',
+                               wxu => 'WX disabilitati per $_[0]',
+               }
+);