From: minima Date: Sun, 6 Jan 2002 20:19:40 +0000 (+0000) Subject: added italian translation of Messages from IT9ROT X-Git-Tag: R_1_50~110 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=e18c9b8b9a003bfb56416ab1d2aee0f232146d25;p=spider.git added italian translation of Messages from IT9ROT added / and // to send added // to talk --- diff --git a/Changes b/Changes index 1b8b9351..3954030b 100644 --- a/Changes +++ b/Changes @@ -9,7 +9,12 @@ list of commands in "") 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 / 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 b0b21c66..ff8b54f1 100644 --- 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 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 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 ^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 /^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 d562437a..cda76904 100644 --- 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 ff9d45aa..8db35b9d 100644 --- 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 c0f1c06a..128415cb 100644 --- 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 ', + 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 ', + emaila => 'Il tuo indirizzo email e\' ora \"$_[0]\"', + email => 'Indirizzo email impostato a: $_[0]', + export1 => 'sintassi: export ', + 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 ', + 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 dove 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 ', + 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 |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 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 ', + 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 => '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 => 'Il tuo QTH e\' adesso \"$_[0]\"', + qrae1 => 'Per favore inserisci il tuo locatore QRA con set/qra (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 [ ]', + 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 ann|spots|wwv|wcy ', + 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, / 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 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]', + } +);