added french changes

This commit is contained in:
minima 2003-05-24 17:46:49 +00:00
parent b6fd93ded2
commit 097f2329b2
8 changed files with 2686 additions and 22 deletions

View File

@ -1,3 +1,6 @@
24May03=======================================================================
1. Added more french translations from Robert (HB9BZA) and we now have some
french help as well (also from Robert). A splendid effort. Thank you.
16May03=======================================================================
1. Correct Windows section of the Addendum file! (g0vgs)
06May03=======================================================================

2637
cmd/Commands_fr.hlp Normal file

File diff suppressed because it is too large Load Diff

View File

@ -10,7 +10,7 @@ my @out;
my $f;
foreach $f (values %DXDb::avail) {
push @out, "DB Name Location Cmd Chain" unless @out;
push @out, sprintf "%-15s %-10s %-15s %s", $f->name, $f->remote ? $f->remote : "Local", ($f->localcmd || ""), $f->chain ? parray($f->chain) : "";
push @out, $self->msg('db12') unless @out;
push @out, sprintf "%-15s %-10s %-15s %s", $f->name, $f->remote ? $f->remote : $self->msg('local1'), ($f->localcmd || ""), $f->chain ? parray($f->chain) : "";
}
return (1, @out);

View File

@ -14,7 +14,7 @@ my $node;
my @l;
my @val;
push @out, "Node Callsigns";
push @out, $self->msg('showconf');
if ($list[0] && $list[0] =~ /^NOD/) {
my @ch = sort {$a->call cmp $b->call} DXChannel::get_all_nodes();
my $dxchan;

View File

@ -73,16 +73,16 @@ if (@f <= 2 && uc $f[0] eq 'ALL') {
my $seek = $cref->isa('Route::Node') ? $call : join(',', $cref->parents) if $cref;
if ($seek) {
push @out, "User : $call (at $seek)";
push @out, sprintf("%-13s: %s (%s %s)", $self->msg('user'), $call, $self->msg('at'), $seek);
} else {
push @out, "User : $call";
push @out, sprintf("%-13s: %s", $self->msg('user'), $call);
}
push @out, "Name : $name" if $name;
push @out, "Last Connect : $last" if $last;
push @out, "QTH : $qth" if $qth;
push @out, "Location : $latlong ($qra)" if $latlong || $qra ;
push @out, sprintf("Heading : %.0f Deg %.0f Mi. %.0f Km.", $bearing, $miles, $dx) if $latlong;
push @out, "Home Node : $homenode" if $homenode;
push @out, sprintf("%-13s: %s", $self->msg('name1'), $name) if $name;
push @out, sprintf("%-13s: %s", $self->msg('lastconn'), $last) if $last;
push @out, sprintf("%-13s: %s", 'QTH', $qth) if $qth;
push @out, sprintf("%-13s: %s", $self->msg('location'), "$latlong ($qra)") if $latlong || $qra ;
push @out, sprintf("%-13s: %.0f Deg. %.0f Mi. %.0f Km.", $self->msg('heading'), $bearing, $miles, $dx) if $latlong;
push @out, sprintf("%-13s: %s", $self->msg('homenode2'), $homenode) if $homenode;
} else {
push @out, $self->msg('usernf', $call);
}

View File

@ -28,7 +28,7 @@ if (@list) {
}
} else {
my $node = $main::routeroot;
push @out, "Callsigns connected to $main::mycall";
push @out, join(' ', $self->msg('userconn'), $main::mycall);
my $call;
my $i = 0;
my @l;

View File

@ -29,7 +29,7 @@ while ($f = shift @f) { # next field
$from = 1 unless $from;
$to = 10 unless $to;
push @out, "Date Hour SFI A K Exp.K R SA GMF Aurora Logger";
push @out, $self->msg('wcy3');
my @in = WCY::search($from, $to, $main::systime);
for (@in) {
push @out, WCY::print_item($_);

View File

@ -16,6 +16,7 @@ package DXM;
annu => 'Announces disabled for $_[0]',
annts => 'AnnTalk enabled for $_[0]',
anntu => 'AnnTalk disabled for $_[0]',
at => 'at',
badnode1 => '$_[0] is now a bad node',
badnode2 => '$_[0] is now a good node',
badnode3 => 'List of Bad Nodes:-',
@ -41,6 +42,7 @@ package DXM;
db9 => 'Database $_[0] removed',
db10 => '$_[0] records imported into $_[1]',
db11 => 'Sending your request(s) to $_[0], please stand by...',
db12 => 'DB Name Location Cmd Chain',
dfreq1 => 'Invalid freq $_[0] need: eg 0/30000 or hf or hf/cw',
dir1 => 'No messages found',
disc1 => 'Disconnected by $_[0]',
@ -117,6 +119,7 @@ package DXM;
hashc => '$_[0] removed from $_[1]',
hashd => '$_[0] not in $_[1]',
hashe => '$_[0] set on $_[1]',
heading => 'Heading',
helpe1 => 'Help system unavailable, tell sysop',
helpe2 => 'No help available on $_[0]',
heres => 'Here set on $_[0]',
@ -124,6 +127,7 @@ package DXM;
hereu => 'Here unset on $_[0]',
homebbs => 'Home BBS set to: $_[0]',
homenode => 'Home Node set to: $_[0]',
homenode2 => 'Home Node',
hnodee1 => 'Please enter your Home Node, set/homenode <your home DX Cluster>',
hnodee2 => 'Failed to set homenode on $_[0]',
hnode => 'Your Homenode is now \"$_[0]\"',
@ -140,12 +144,15 @@ package DXM;
lang => 'Language is now English',
lange1 => 'set/language <lang> where <lang> is one of ($_[0])',
lange2 => 'failed to set language on $_[0]',
lastconn => 'Last connect',
leave => 'leaving group $_[0]',
lh1 => '$main::data/hop_table.pl doesn\'t exist',
local1 => 'Local',
loce1 => 'Please enter your location,, set/location <latitude longitude>',
loce2 => 'Don\'t recognise \"$_[0]\" as a Lat/Long (eg 52 20 N 0 16 E)',
loce3 => '$_[0] is a QRA locator, please use: set/qra $_[0]',
loc => 'Your Lat/Long is now \"$_[0]\"',
location => 'Location',
lockout => '$_[0] Locked out',
lockoutc => '$_[0] Created and Locked out',
lockoutun => '$_[0] Unlocked',
@ -181,6 +188,7 @@ package DXM;
moon_with_azel => 'Location dd/mm/yyyy Rise Set Azim Elev',
mond => 'Monitoring Disabled',
mone => 'Monitoring Enabled',
name1 => 'Name',
namee1 => 'Please enter your name, set/name <your name>',
namee2 => 'Can\'t find user $_[0]!',
name => 'Your name is now \"$_[0]\"',
@ -257,6 +265,7 @@ package DXM;
sethop1 => 'usage: set/hops <call> ann|spots|wwv|wcy <no of hops>',
sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]',
sethop3 => 'No hops set for $_[0]',
showconf => 'Node Callsigns',
shu => '\"SHU\" is not enough! you need to type at least \"SHUT\" to shutdown the node',
shutting => '$main::mycall shutting down...',
sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
@ -295,11 +304,14 @@ package DXM;
unset => '$_[0] disabled for $_[1]',
unsethop1 => 'usage: unset/hops <call> ann|spots|wwv|wcy',
unsethop2 => 'hops unset on $_[1] for $_[0]',
user => 'User',
userconn => 'Callsigns connected to',
usernf => '*** User record for $_[0] not found ***',
usstates => 'US State display enabled for $_[0]',
usstateu => 'US State display disabled for $_[0]',
wcy1 => '$_[0] is missing or out of range',
wcy2 => 'Duplicate WCY',
wcy3 => 'Date Hour SFI A K Exp.K R SA GMF Aurora Logger',
wcys => 'WCY enabled for $_[0]',
wcyu => 'WCY disabled for $_[0]',
wpc16s => 'Allow PC16 from $_[0] enabled',
@ -420,6 +432,7 @@ package DXM;
annu => 'Annonces désactivées pour $_[0]',
annts => 'AnnTalk activé pour $_[0]',
anntu => 'AnnTalk désactivé pour $_[0]',
at => 'connecté en ce moment sur',
badnode1 => 'Le serveur $_[0] est maintenant en rejet',
badnode2 => 'Le serveur $_[0] n\'est maintenant plus en rejet',
badnode3 => 'Liste des serveurs en rejet :-',
@ -430,9 +443,9 @@ package DXM;
call1 => 'Recherche de l\'indicatif via $_[0]:',
conother => 'Désolé $_[0], vous êtes déjà connecté sur un autre port',
concluster => 'Désolé $_[0], vous êtes déjà connecté ailleurs au cluster (sur $_[1])',
conscript => 'Pas de script de connexion nommé \"$_[0]\" trouvé dans $main::root/connect',
conscript => 'Pas de script de connexion \"$_[0]\" dans $main::root/connect !',
confail => 'Echec de la connexion avec $_[0] ($_[1])',
constart => 'Début de la connexion avec $_[0]',
constart => 'Etablissement de la connexion avec $_[0]',
deluser => 'L\'utilisateur $_[0] a été supprimé',
db1 => 'Cette base de données est hébergée sur $_[0]',
db2 => 'Désolé, mais la clé: $_[0] est introuvable dans $_[1]',
@ -445,6 +458,7 @@ package DXM;
db9 => 'Base de données $_[0] supprimée',
db10 => '$_[0] enregistrements importés dans $_[1]',
db11 => 'Envoi de votre requête à $_[0], veuillez patienter...',
db12 => 'Base de données Serveur Commande Chaînage',
dfreq1 => 'Fréquence $_[0] non valable. Il faut par exemple: 0/30000 ou hf ou hf/cw',
dir1 => 'Aucun message trouvé !',
disc1 => 'Déconnecté par $_[0]',
@ -521,13 +535,15 @@ package DXM;
hashc => '$_[0] retiré de $_[1]',
hashd => '$_[0] n\'est pas dans $_[1]',
hashe => '$_[0] ajouté le $_[1]',
heading => 'Azimut',
helpe1 => 'Système d\'aide non disponible, prière de prévenir le sysop',
helpe2 => 'Pas d\'aide disponible sur $_[0]',
heres => '$_[0] indiqué comme présent',
heade1 => 'Les coordonnées de $main::mycall sont utilisées; pensez à faire un set/location ou set/qra !',
hereu => '$_[0] indiqué comme absent',
heres => '$_[0] est présent',
heade1 => 'Calcul avec les coordonnées de $main::mycall; pensez à faire un set/location ou set/qra !',
hereu => '$_[0] est absent',
homebbs => 'BBS usuelle définie comme étant $_[0]',
homenode => 'Serveur cluster usuel défini comme étant $_[0]',
homenode2 => 'Utilise',
hnodee1 => 'Veuillez entrer votre serveur cluster usuel (set/homenode <votre_serveur>)',
hnodee2 => 'Impossible de définir votre serveur usuel comme étant $_[0]',
hnode => 'Votre serveur cluster usuel est défini comme étant \"$_[0]\"',
@ -544,12 +560,15 @@ package DXM;
lang => 'Je parle maintenant français',
lange1 => 'Syntaxe : set/language <langue>, où <langue> est à choisir parmi ($_[0])',
lange2 => 'Impossible de fixer la langue à $_[0]',
lastconn => 'Dernière conn',
leave => 'Départ du groupe $_[0]',
lh1 => '$main::data/hop_table.pl n\'existe pas',
local1 => 'Local',
loce1 => 'Veuillez entrer vos coordonnées avec : set/location <latitude longitude>',
loce2 => '\"$_[0]\" n\'est visiblement pas une latitude/longitude (ex: 46 20 N 6 12 E)',
loce3 => '$_[0] est un QTH locator, veuillez utiliser : set/qra $_[0]',
loc => 'Votre latitude/longitude est enregistrée comme étant \"$_[0]\"',
location => 'Coordonnées',
lockout => '$_[0] exclus',
lockoutc => '$_[0] créé et exclus',
lockoutun => '$_[0] n\'est plus exclus',
@ -585,6 +604,7 @@ package DXM;
moon_with_azel => 'Emplacement jj/mm/aaaa Lever Coucher Azim Elev',
mond => 'Monitoring désactivé',
mone => 'Monitoring activé',
name1 => 'Nom',
namee1 => 'Veuillez entrer votre nom avec : set/name <votre_nom>',
namee2 => 'Utilisateur $_[0] introuvable.',
name => 'Votre nom est enregistré comme étant \"$_[0]\"',
@ -639,7 +659,7 @@ package DXM;
qrashe1 => 'Veuillez entrer un QRA locator, par exemple: sh/qra JN36BE or sh/qra JN36BE JO31NS',
qrae2 => '\"$_[0]\" n\'est pas un QRA locator (exemple: JN36BE)',
qra => 'Votre QRA Locator est enregistré comme étant \"$_[0]\"',
qsl1 => 'Indicatif Manager Fois Dernière fois De',
qsl1 => 'Indicatif Manager Fois Dernière annonce Par',
rcmdo => 'RCMD \"$_[0]\" envoyé à $_[1]',
read1 => 'Désolé, pas de nouveaux messages pour vous.',
read2 => 'Message $_[0] introuvable',
@ -661,6 +681,7 @@ package DXM;
sethop1 => 'Syntaxe: set/hops <indicatif> ann|spots|route|wwv|wcy <nombre_de_hops>',
sethop2 => '$_[0] hops définis pour $_[1]$_[2] vers $_[3]',
sethop3 => 'Pas de nombre de hops défini vers $_[0]',
showconf => 'Serveur Utilisateurs',
shu => '\"SHU\" ne suffit pas. Vous devez taper au moins \"SHUT\" pour arrêter le serveur !',
shutting => '$main::mycall en cours d\'arrêt...',
sloc => 'Latitude du serveur $_[0], longitude $_[1]. N\'OUBLIEZ PAS D\'ADAPTER VOTRE DXVars.pm',
@ -698,11 +719,14 @@ package DXM;
unset => '$_[0] désactivé pour $_[1]',
unsethop1 => 'Syntaxe: unset/hops <indicatif> ann|spots|route|wwv|wcy',
unsethop2 => 'Nombre de hops supprimé vers $_[1] pour $_[0]',
user => 'Utilisateur',
userconn => 'Utilisateurs connectés sur',
usernf => '*** Pas d\'enregistrement utilisateur trouvé pour $_[0] ***',
usstates => 'Affichage des états US activé pour $_[0]',
usstateu => 'Affichage des états US désactivé pour $_[0]',
wcy1 => '$_[0] manque ou est une valeur hors limites',
wcy2 => 'Annonce WCY double',
wcy3 => ' Date Heure SFI A K Kprévu R SA GMF Aurora Source',
wcys => 'WCY activé pour $_[0]',
wcyu => 'WCY désactivé pour $_[0]',
wpc16s => 'PC16 provenant de $_[0] autorisés',
@ -711,7 +735,7 @@ package DXM;
wpc19u => 'Routage des PC19 pour $_[0] désactivé',
wwv1 => '$_[0] manque ou est une valeur hors limites',
wwv2 => 'Annonce WWV double',
wwv3 => 'Date Heure SFI A K Prévision Expéditeur',
wwv3 => ' Date Heure SFI A K Prévision Source',
wwvs => 'WWV activé pour $_[0]',
wwvu => 'WWV désactivé pour $_[0]',
wxs => 'WX activé pour $_[0]',