-#!/usr/bin/perl
-#
-# this file contains the system messages. Don't forget to reload them
-# if you change them (load/messages)
-#
-# $Id$
-#
-
-package DXM;
-
-%msgs = (
- en => {
- addr => 'Address set to: $_[0]',
- already => '$_[0] already connnected',
- anns => 'Announce flag set on $_[0]',
- annu => 'Announce flag unset on $_[0]',
- badnode1 => '$_[0] is now a bad node',
- badnode2 => '$_[0] is now a good node',
- badnode3 => 'List of Bad Nodes:-',
- bbse1 => 'Please enter your BBS address,, set/bbs <your bbs address>',
- bbs => 'Your BBS Address is now \"$_[0]\"',
- beepoff => 'Beeps are now off',
- beepon => 'Beeps are now on',
- call1 => 'Callsign lookup via $_[0]:',
- conother => 'Sorry $_[0] you are connected on another port here',
- concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster ($_[1])',
- conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',
- confail => 'connection to $_[0] failed ($_[1])',
- constart => 'connection to $_[0] started',
- disc1 => 'Disconnected by $_[0]',
- disc2 => '$_[0] disconnected',
- db1 => 'This database is hosted at $_[0]',
- db2 => 'Sorry, but key: $_[0] was not found in $_[1]',
- db3 => 'Sorry, database $_[0] doesn\'t exist here',
- db4 => 'Sorry, database $_[0] located at $_[1] isn\'t currently online',
- db5 => 'Accessing remote database on $_[0]...standby...',
- db6 => 'Database $_[0] already exists, delete it first',
- db7 => 'Database $_[0] created for remote node $_[1]',
- db8 => 'Database $_[0] created locally',
- db9 => 'Database $_[0] removed',
- db10 => '$_[0] records imported into $_[1]',
- db11 => 'Sending your request(s) to $_[0], please stand by...',
- dfreq1 => 'Invalid freq $_[0] need: eg 0/30000 or hf or hf/cw',
- dup => 'Sorry, this is a duplicate',
- 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',
- dxs => 'DX Spots flag set on $_[0]',
- dxu => 'DX Spots flag unset on $_[0]',
- e1 => 'Invalid command',
- e2 => 'Error: $_[0]',
- e3 => '$_[0]: $_[1] not found',
- e4 => 'Need at least a prefix or callsign',
- e5 => 'Not Allowed',
- e6 => '*** No station specified ***',
- e7 => 'callsign $_[0] not visible on the cluster',
- 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',
- 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',
- 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)',
- e24 => 'Sorry, Internet access is not enabled',
- e25 => 'Sorry the value must be between $_[0] and $_[1]',
-
- echoon => 'Echoing enabled',
- echooff => 'Echoing disabled',
- echow => '*Echoing is currently disabled, set/echo to enable',
- emaile1 => 'Please enter your email address, set/email <your e-mail address>',
- emaila => 'Your E-Mail Address is now \"$_[0]\"',
- email => 'E-mail address set to: $_[0]',
- export1 => 'usage: export <msgno> <filename>',
- export2 => '$_[3] has error exporting msg $_[0] to $_[1] ($_[2])',
- export3 => '$_[2 ] exported msg $_[0] to $_[1]',
- filter1 => 'Filter $_[0] updated for $_[1]',
- filter2 => 'Need a value for $_[0]',
- filter3 => 'No filters defined for $_[0]',
- filter4 => '$_[0]$_[1] Filter $_[2] deleted for $_[3]',
- filter5 => 'need some filter commands...',
- filter6 => '$_[0]$_[1] Filter for $[2] not found',
- grids => 'DX Grid flag set on $_[0]',
- gridu => 'DX Grid flag unset on $_[0]',
- hasha => '$_[0] already exists in $_[1]',
- hashb => '$_[0] added to $_[1]',
- hashc => '$_[0] removed from $_[1]',
- hashd => '$_[0] not in $_[1]',
- hashe => '$_[0] set on $_[1]',
- helpe1 => 'Help system unavailable, tell sysop',
- helpe2 => 'No help available on $_[0]',
- heres => 'Here set on $_[0]',
- heade1 => 'Using $main::mycall Coords, consider doing a set/location or set/qra',
- hereu => 'Here unset on $_[0]',
- homebbs => 'Home BBS set to: $_[0]',
- homenode => 'Home Node set to: $_[0]',
- 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]\"',
- init1 => 'sent initialisation message to $_[0]',
- iso => '$_[0] Isolated',
- isou => '$_[0] UnIsolated',
- isoc => '$_[0] created and Isolated',
- l1 => 'Sorry $_[0], you are already logged on on another channel',
- l2 => 'Hello $_[0], this is $main::mycall in $main::myqth running DXSpider V$main::version',
- lang => 'Language is now $_[0]',
- lange1 => 'set/language <lang> where <lang> is one of ($_[0])',
- lange2 => 'failed to set language on $_[0]',
- lh1 => '$main::data/hop_table.pl doesn\'t exist',
- 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)',
- loc => 'Your Lat/Long is now \"$_[0]\"',
- lockout => '$_[0] Locked out',
- lockoutc => '$_[0] Created and Locked out',
- lockoutun => '$_[0] Unlocked',
- loginu => 'User $_[0] has logged in',
- logoutu => 'User $_[0] has logged out',
- loginn => 'Node $_[0] has logged in',
- logoutn => 'Node $_[0] has logged out',
- m1 => 'Enter Subject (30 characters):',
- m2 => 'Copy of msg $_[0] sent to $_[1]',
- m3 => 'Sorry, $_[0] is an unacceptable TO address',
- m4 => 'Sorry, can\'t access message $_[0]',
- m5 => 'Sorry, I need a message number',
- m6 => 'Reply to: $_[0]',
- m7 => 'Subject : $_[0]',
- m8 => 'Enter Message /EX to send or /ABORT to exit',
- m9 => 'New mail has arrived for you',
- m10 => 'Message Aborted',
- m11 => 'Message no $_[0] saved and directed to $_[1]',
- m12 => 'Message no $_[0] deleted',
- m13 => 'Message no $_[0] missing',
- m14 => 'Message no $_[0] marked as sent to $_[1]',
- m15 => 'Message no $_[0] unmarked as sent to $_[1]',
- m16 => 'Need a Message number',
- m17 => 'Sorry, cannot send messages in $_[0] mode',
- msg1 => 'Bulletin Messages Queued',
- msg2 => 'Private Messages Queued',
- msg3 => 'Msg $_[0]: $_[1] changed from $_[2] to $_[3]',
- msgu => 'usage: msg <cmd> <msgno> data...',
- merge1 => 'Merge request for $_[1] spots and $_[2] WWV sent to $_[0]',
- moon => 'Location Rise Set Azim Elev RGain dB',
- namee1 => 'Please enter your name, set/name <your name>',
- namee2 => 'Can\'t find user $_[0]!',
- name => 'Your name is now \"$_[0]\"',
- nodea => '$_[0] set as AK1A style Node',
- nodeac => '$_[0] created as AK1A style Node',
- nodec => '$_[0] set as CLX style Node',
- nodecc => '$_[0] created as CLX style Node',
- noder => '$_[0] set as AR-Cluster style Node',
- noderc => '$_[0] created as AR-Cluster style Node',
- nodes => '$_[0] set as DXSpider style Node',
- nodesc => '$_[0] created as DXSpider style Node',
- nodex => '$_[0] set as DXNET style Node',
- nodexc => '$_[0] created as DXNET style Node',
- nodeu => '$_[0] set back as a User',
- nodee1 => 'You cannot use this command whilst your target ($_[0]) is on-line',
- obscount => 'Ping obsolescence count on $_[0] set to $_[1]',
- ok => 'Operation successful',
- outconn => 'Outstanding connect to $_[0]',
- page => 'Press Enter to continue, A to abort ($_[0] lines) >',
- pagelth => 'Page Length is now $_[0]',
- passerr => 'Please use: SET/PASS <password> <callsign>',
- password => 'Password set or changed for $_[0]',
- pingo => 'Ping Started to $_[0]',
- pingi => 'Ping Returned from $_[0] $_[1] (Ave $_[2]) secs',
- pinge1 => 'Cannot ping yourself!',
- pingint => 'Ping interval on $_[0] set to $_[1] secs',
- 'pos' => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]',
- pr => '$_[0] de $main::mycall $_[1] $_[2] >',
- pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',
- priv => 'Privilege level changed on $_[0]',
- prx => '$main::mycall >',
- qll => 'Please enter your location with set/location or set/qra',
- qthe1 => 'Please enter your QTH, set/qth <your qth>',
- qth => 'Your QTH is now \"$_[0]\"',
- qrae1 => 'Please enter your QRA locator, set/qra <qra locator> (eg set/qra JO02LQ)',
- 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]\"',
- rcmdo => 'RCMD \"$_[0]\" sent to $_[1]',
- rec => '$_[0] records',
- read1 => 'Sorry, no new messages for you',
- read2 => 'Msg $_[0] not found',
- read3 => 'Msg $_[0] not available',
- route => '$_[0] on $_[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 => 'Syntax: SH/SAT <name> [<hours> <interval>]',
- sat4 => 'Satellites available:-',
- satnf => 'Satellite $_[0] unknown',
- satdisc => '-----',
- 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]',
- shutting => '$main::mycall shutting down...',
- sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
- snode1 => 'Node Call Sort Version',
- snode2 => '$_[0] $_[1] $_[2]',
- snode3 => '$_[0] Unknown Call',
- sqra => 'Cluster QRA Locator$_[0], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
- sorry => 'Sorry',
- spf1 => 'spoof: creating new user $_[0]',
- sun => 'Location Rise Set Azim Elev',
- suser1 => 'usage: callsign user_field_name value',
- suser2 => 'User $_[0] not found',
- suser3 => 'User field \'$_[0]\' was \'$_[1]\' now set to \'$_[2]\'',
- suser4 => 'User field name \'$_[0]\' doesn\'t exist',
- time1 => 'Local Time: $_[0] $_[1], UTC $_[2]',
- time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Hours)',
- time3 => '$_[0] $_[1]',
- talks => 'Talk flag set on $_[0]',
- talku => 'Talk flag unset on $_[0]',
- talkend => 'Finished talking to you',
- talkinst => 'Entering Talkmode, /EX to end, /<cmd> to run a command',
- talkprompt => 'Talk ($_[0])>',
- talkstart => 'Starting talking to you',
- usernf => '*** User record for $_[0] not found ***',
- wcys => 'WCY flag set on $_[0]',
- wcyu => 'WCY flag unset on $_[0]',
- wwvs => 'WWV flag set on $_[0]',
- wwvu => 'WWV flag unset on $_[0]',
- wxs => 'WX flag set on $_[0]',
- wxu => 'WX flag unset on $_[0]',
- },
- nl => {
- addr => 'Addres gezet op: $_[0]',
- already => '$_[0] reeds geconnect',
- anns => 'Announce berichten AAN gezet voor $_[0]',
- annu => 'Announce berichten UIT gezet voor $_[0]',
- bbse1 => 'Geef je home bbs (mailbox),, set/bbs <home mailbox>',
- bbs => 'Je home bbs (mailbox) is nu \"$_[0]\"',
- beepoff => 'De beep staat nu UIT',
- beepon => 'De beep staat nu AAN',
- conother => 'Sorry $_[0] je bent reeds geconnect op een andere poort',
- concluster => 'Sorry $_[0] je bent reeds op een ander cluster geconnect',
- conscript => 'Geen connectscript aangeroepen \"$_[0]\" gevonden in $main::root/connect',
- confail => 'Verbinding met $_[0] mislukt ($_[1])',
- constart => 'Verbinding met $_[0] gestart',
- disc1 => 'Gedisconnect door $_[0]',
- disc2 => '$_[0] gedisconnect',
- dx1 => 'Frequentie $_[0] valt niet binnen een band [Opdracht: DX freq call commentaar](Zie sh/band)',
- dx2 => 'Ik heb een call nodig! [Opdracht: DX freq call commentaar]',
- dxs => 'DX Spots worden WEL doorgegeven aan $_[0]',
- dxu => 'DX Spots worden NIET doorgegeven aan $_[0]',
- e1 => 'Ongeldige opdracht',
- e2 => 'Fout: $_[0]',
- e3 => '$_[0]: $_[1] niet gevonden',
- e4 => 'Minimaal een prefix of een call nodig',
- e5 => 'Niet toegestaan',
- e6 => '*** Geen station gespecifiseerd ***',
- e7 => 'Callsign $_[0] is niet zichtbaar op het cluster',
- e8 => 'Ik heb een call en tekst nodig',
- e9 => 'Ik heb wel tekst nodig voor een announce!',
- e10 => '$_[0] is niet lokaal verbonden',
- e12 => 'Ik heb een node call nodig',
- e13 => '$_[0] is geen node',
- emaile1 => 'Geef uw E-mail addres, set/email <uw e-mail addres>',
- emaila => 'Uw E-Mail addres is nu \"$_[0]\"',
- email => 'E-mail addres gezet op: $_[0]',
- helpe1 => 'Help systeem niet beschikbaar, meld dit aan de sysop',
- helpe2 => 'Geen help beschikbaar over \"$_[0]\"',
- heres => 'Aanwezigheid AAN gezet voor $_[0]',
- heade1 => 'Gebruik gemaakt van de $main::mycall coordinaten, overweeg een set/location of set/qra',
- hereu => 'Aanwezigheid UIT gezet voor $_[0]',
- homebbs => 'Uw Home mailbox is nu $_[0]',
- homenode => 'Uw (Home) DX-Cluster is : $_[0]',
- hnodee1 => 'Geef mij uw lokale (home) DX-cluster, set/homenode <DX-cluster>',
- hnode => 'Uw (home) DX-cluster is nu \"$_[0]\"',
- iso => '$_[0] is geisoleerd (Isolated)',
- isou => '$_[0] is niet meer geisoleerd (UnIsolated)',
- isoc => '$_[0] gecreerd en geisoleerd (Isolated)',
- l1 => 'Sorry $_[0], u bent reeds op een ander kanaal ingelogt',
- l2 => 'Hallo $_[0], dit is $main::mycall in $main::myqth met DXSpider V$main::version',
- lh1 => '$main::data/hop_table.pl bestaat niet',
- loce1 => 'Geef uw coordinaten met, set/location <latitude longitude>',
- loce2 => 'Herken \"$_[0]\" niet als Lat/Long (vb 52 20 N 0 16 E)',
- loc => 'Uw Latitude en Longitude zijn nu \"$_[0]\"',
- lockout => '$_[0] heeft geen toegang meer (Locked out)',
- lockoutun => '$_[0] heeft wederom toegang (Unlocked)',
- m2 => '$_[0] Informatie: $_[1]',
- merge1 => 'Merge verzoek voor $_[1] spots en $_[2] WWV verzonden naar $_[0]',
- msgnew => 'Er is nieuwe post gearriveerd voor u',
- namee1 => 'Geef aub uw naam met, set/name <uw naam>',
- namee2 => 'Gebruiker $_[0] niet te vinden!',
- name => 'Uw naam is gezet op \"$_[0]\"',
- node => '$_[0] gezet als een AK1A stijl DX-cluster',
- nodeu => '$_[0] teruggezet naar gebruiker status',
- nodec => '$_[0] gecreeerd als AK1A stijl DX-cluster',
- nodee1 => 'U kunt deze opdracht niet uitvoeren zolang ($_[0]) on-line is',
- ok => 'Opdracht succesvol uitgevoerd',
- page => 'Druk op Enter om door te gaan, A om af te breken (nog $_[0] regels) >',
- pagelth => 'Paginalengte gezet op ($_[0]) regels',
- passerr => 'Gebruik: SET/PASS <wachtwoord> <call>',
- password => 'Wachtwoord gezet of gewijzigd voor $_[0]',
- pingo => 'Ping gestart naar $_[0]',
- pingi => 'Ping ontvangen van $_[0] $_[1] (Ave $_[2]) secs',
- pr => '$_[0] de $main::mycall $_[1] $_[2] >',
- pr2 => '($_[0]) de $main::mycall $_[1] $[2] >',
- priv => 'Privilege level gewijzigd op $_[0]',
- prx => '$main::mycall >',
- qll => 'Geef uw locator met set/location of set/qra',
- qthe1 => 'Geef uw woonplaats met, set/qth <woonplaats>',
- qth => 'Uw QTH is nu \"$_[0]\"',
- qrae1 => 'Geef uw QRA locator, set/qra <qra locator> (vb set/qra JO33FD)',
- qrashe1 => 'Geef uw QRA locator, vbg sh/qra JO33FD of sh/qra JO33FD IO93NS',
- qrae2 => 'Ik herken \"$_[0]\" niet als een QRA locator (vb JO33FD)',
- qra => 'Uw QRA Locator is nu \"$_[0]\"',
- rcmdo => 'RCMD \"$_[0]\" verzonden naar $_[1]',
- read1 => 'Sorry, geen berichten voor u',
- read2 => 'Bericht $_[0] niet gevonden',
- read3 => 'Bericht $_[0] niet beschikbaar',
- shutting => '$main::mycall gaat QRT...',
- sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
- sqra => 'Cluster QRA Locator$_[0], DON\'T FORGET TO CHANGE YOUR DXVars.pm',
- talks => 'Talk berichten AAN gezet voor $_[0]',
- talku => 'Talk berichten UIT gezet voor $_[0]',
- usernf => '*** Gebruiker info van $_[0] niet gevonden ***',
- wwvs => 'WWV berichten AAN gezet voor $_[0]',
- wwvu => 'WWV berichten UIT gezet voor $_[0]',
- wxs => 'WX berichten AAN gezet voor $_[0]',
- wxu => 'WX berichten UIT gezet voor $_[0]',
- },
- fr => {
- },
- de => {
- },
-);
+#!/usr/bin/perl\r
+# \r
+# this file contains the system messages. Don't forget to reload them\r
+# if you change them (load/messages)\r
+#\r
+# $Id$\r
+#\r
+\r
+package DXM;\r
+\r
+%msgs = (\r
+ en => {\r
+ addr => 'Address set to: $_[0]',\r
+ already => '$_[0] already connnected',\r
+ anns => 'Announce flag set on $_[0]',\r
+ annu => 'Announce flag unset on $_[0]',\r
+ badnode1 => '$_[0] is now a bad node',\r
+ badnode2 => '$_[0] is now a good node',\r
+ badnode3 => 'List of Bad Nodes:-',\r
+ bbse1 => 'Please enter your BBS address,, set/bbs <your bbs address>',\r
+ bbs => 'Your BBS Address is now \"$_[0]\"',\r
+ beepoff => 'Beeps are now off',\r
+ beepon => 'Beeps are now on',\r
+ call1 => 'Callsign lookup via $_[0]:',\r
+ conother => 'Sorry $_[0] you are connected on another port',\r
+ concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster',\r
+ conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',\r
+ confail => 'connection to $_[0] failed ($_[1])',\r
+ constart => 'connection to $_[0] started',\r
+ disc1 => 'Disconnected by $_[0]',\r
+ disc2 => '$_[0] disconnected',\r
+ db1 => 'This database is hosted at $_[0]',\r
+ db2 => 'Sorry, but key: $_[0] was not found in $_[1]',\r
+ db3 => 'Sorry, database $_[0] doesn\'t exist here',\r
+ db4 => 'Sorry, database $_[0] located at $_[1] isn\'t currently online',\r
+ db5 => 'Accessing remote database on $_[0]...standby...',\r
+ db6 => 'Database $_[0] already exists, delete it first',\r
+ db7 => 'Database $_[0] created for remote node $_[1]',\r
+ db8 => 'Database $_[0] created locally',\r
+ db9 => 'Database $_[0] removed',\r
+ db10 => '$_[0] records imported into $_[1]',\r
+ db11 => 'Sending your request(s) to $_[0], please stand by...',\r
+ dfreq1 => 'Invalid freq $_[0] need: eg 0/30000 or hf or hf/cw', \r
+ dup => 'Sorry, this is a duplicate',\r
+ dx1 => 'Frequency $_[0] not in band (see show/band); usage: DX [BY call] freq call comments',\r
+ dx2 => 'Need a callsign; usage: DX [BY call] freq call comments',\r
+ dxs => 'DX Spots flag set on $_[0]',\r
+ dxu => 'DX Spots flag unset on $_[0]',\r
+ e1 => 'Invalid command',\r
+ e2 => 'Error: $_[0]',\r
+ e3 => '$_[0]: $_[1] not found',\r
+ e4 => 'Need at least a prefix or callsign',\r
+ e5 => 'Not Allowed',\r
+ e6 => '*** No station specified ***',\r
+ e7 => 'callsign $_[0] not visible on the cluster',\r
+ e8 => 'Need a callsign and some text',\r
+ e9 => 'Need at least some text',\r
+ e10 => '$_[0] not connected locally',\r
+ e11 => 'Can\'t use $main:mycall as target',\r
+ e12 => 'Need a node callsign',\r
+ e13 => '$_[0] is not a node',\r
+ e14 => 'First argument must be numeric and > 0',\r
+ e15 => 'invalid qualifier \"$_[0]\"',\r
+ e16 => 'File \"$_[0]\" exists',\r
+ e17 => 'Please don\'t use the words: @_ on here', \r
+ e18 => 'Cannot connect to $_[0] ($!)',\r
+ e19 => 'Invalid character in line',\r
+ e20 => 'token $_[0] not recognised',\r
+ e21 => '$_[0] not numeric',\r
+ e22 => '$_[0] not a callsign',\r
+ e23 => '$_[0] not a range (eg 0/30000)', \r
+ e24 => 'Sorry, Internet access is not enabled',\r
+ e25 => 'Sorry the value must be between $_[0] and $_[1]',\r
+\r
+ echoon => 'Echoing enabled',\r
+ echooff => 'Echoing disabled',\r
+ echow => '*Echoing is currently disabled, set/echo to enable',\r
+ emaile1 => 'Please enter your email address, set/email <your e-mail address>',\r
+ emaila => 'Your E-Mail Address is now \"$_[0]\"',\r
+ email => 'E-mail address set to: $_[0]',\r
+ export1 => 'usage: export <msgno> <filename>',\r
+ export2 => '$_[3] has error exporting msg $_[0] to $_[1] ($_[2])',\r
+ export3 => '$_[2 ] exported msg $_[0] to $_[1]',\r
+ filter1 => 'Filter $_[0] updated for $_[1]',\r
+ filter2 => 'Need a value for $_[0]',\r
+ filter3 => 'No filters defined for $_[0]',\r
+ filter4 => '$_[0]$_[1] Filter $_[2] deleted for $_[3]',\r
+ filter5 => 'need some filter commands...',\r
+ filter6 => '$_[0]$_[1] Filter for $[2] not found',\r
+ grids => 'DX Grid flag set on $_[0]',\r
+ gridu => 'DX Grid flag unset on $_[0]',\r
+ hasha => '$_[0] already exists in $_[1]',\r
+ hashb => '$_[0] added to $_[1]',\r
+ hashc => '$_[0] removed from $_[1]',\r
+ hashd => '$_[0] not in $_[1]', \r
+ hashe => '$_[0] set on $_[1]', \r
+ helpe1 => 'Help system unavailable, tell sysop',\r
+ helpe2 => 'No help available on $_[0]',\r
+ heres => 'Here set on $_[0]',\r
+ heade1 => 'Using $main::mycall Coords, consider doing a set/location or set/qra',\r
+ hereu => 'Here unset on $_[0]',\r
+ homebbs => 'Home BBS set to: $_[0]',\r
+ homenode => 'Home Node set to: $_[0]',\r
+ hnodee1 => 'Please enter your Home Node, set/homenode <your home DX Cluster>',\r
+ hnodee2 => 'Failed to set homenode on $_[0]',\r
+ hnode => 'Your Homenode is now \"$_[0]\"',\r
+ init1 => 'sent initialisation message to $_[0]',\r
+ iso => '$_[0] Isolated',\r
+ isou => '$_[0] UnIsolated',\r
+ isoc => '$_[0] created and Isolated',\r
+ l1 => 'Sorry $_[0], you are already logged on on another channel',\r
+ l2 => 'Hello $_[0], this is $main::mycall in $main::myqth running DXSpider V$main::version',\r
+ lang => 'Language is now $_[0]',\r
+ lange1 => 'set/language <lang> where <lang> is one of ($_[0])',\r
+ lange2 => 'failed to set language on $_[0]', \r
+ lh1 => '$main::data/hop_table.pl doesn\'t exist',\r
+ loce1 => 'Please enter your location,, set/location <latitude longitude>',\r
+ loce2 => 'Don\'t recognise \"$_[0]\" as a Lat/Long (eg 52 20 N 0 16 E)',\r
+ loc => 'Your Lat/Long is now \"$_[0]\"',\r
+ lockout => '$_[0] Locked out',\r
+ lockoutc => '$_[0] Created and Locked out',\r
+ lockoutun => '$_[0] Unlocked',\r
+ loginu => 'User $_[0] has logged in',\r
+ logoutu => 'User $_[0] has logged out',\r
+ loginn => 'Node $_[0] has logged in',\r
+ logoutn => 'Node $_[0] has logged out',\r
+ m1 => 'Enter Subject (30 characters):',\r
+ m2 => 'Copy of msg $_[0] sent to $_[1]',\r
+ m3 => 'Sorry, $_[0] is an unacceptable TO address',\r
+ m4 => 'Sorry, can\'t access message $_[0]',\r
+ m5 => 'Sorry, I need a message number', \r
+ m6 => 'Reply to: $_[0]',\r
+ m7 => 'Subject : $_[0]',\r
+ m8 => 'Enter Message /EX to send or /ABORT to exit',\r
+ m9 => 'New mail has arrived for you',\r
+ m10 => 'Message Aborted',\r
+ m11 => 'Message no $_[0] saved and directed to $_[1]',\r
+ m12 => 'Message no $_[0] deleted',\r
+ m13 => 'Message no $_[0] missing',\r
+ m14 => 'Message no $_[0] marked as sent to $_[1]',\r
+ m15 => 'Message no $_[0] unmarked as sent to $_[1]',\r
+ m16 => 'Need a Message number',\r
+ m17 => 'Sorry, cannot send messages in $_[0] mode',\r
+ msg1 => 'Bulletin Messages Queued',\r
+ msg2 => 'Private Messages Queued',\r
+ msg3 => 'Msg $_[0]: $_[1] changed from $_[2] to $_[3]',\r
+ msgu => 'usage: msg <cmd> <msgno> data...',\r
+ merge1 => 'Merge request for $_[1] spots and $_[2] WWV sent to $_[0]',\r
+ moon => 'Location Rise Set Azim Elev RGain dB',\r
+ namee1 => 'Please enter your name, set/name <your name>',\r
+ namee2 => 'Can\'t find user $_[0]!',\r
+ name => 'Your name is now \"$_[0]\"',\r
+ nodea => '$_[0] set as AK1A style Node',\r
+ nodeac => '$_[0] created as AK1A style Node',\r
+ nodec => '$_[0] set as CLX style Node',\r
+ nodecc => '$_[0] created as CLX style Node',\r
+ noder => '$_[0] set as AR-Cluster style Node',\r
+ noderc => '$_[0] created as AR-Cluster style Node',\r
+ nodes => '$_[0] set as DXSpider style Node',\r
+ nodesc => '$_[0] created as DXSpider style Node',\r
+ nodex => '$_[0] set as DXNET style Node',\r
+ nodexc => '$_[0] created as DXNET style Node',\r
+ nodeu => '$_[0] set back as a User',\r
+ nodee1 => 'You cannot use this command whilst your target ($_[0]) is on-line',\r
+ obscount => 'Ping obsolescence count on $_[0] set to $_[1]',\r
+ ok => 'Operation successful',\r
+ outconn => 'Outstanding connect to $_[0]',\r
+ page => 'Press Enter to continue, A to abort ($_[0] lines) >',\r
+ pagelth => 'Page Length is now $_[0]',\r
+ passerr => 'Please use: SET/PASS <password> <callsign>',\r
+ password => 'Password set or changed for $_[0]',\r
+ pingo => 'Ping Started to $_[0]',\r
+ pingi => 'Ping Returned from $_[0] $_[1] (Ave $_[2]) secs',\r
+ pinge1 => 'Cannot ping yourself!',\r
+ pingint => 'Ping interval on $_[0] set to $_[1] secs',\r
+ 'pos' => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]',\r
+ pr => '$_[0] de $main::mycall $_[1] $_[2] >',\r
+ pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',\r
+ priv => 'Privilege level changed on $_[0]',\r
+ prx => '$main::mycall >',\r
+ qll => 'Please enter your location with set/location or set/qra',\r
+ qthe1 => 'Please enter your QTH, set/qth <your qth>',\r
+ qth => 'Your QTH is now \"$_[0]\"',\r
+ qrae1 => 'Please enter your QRA locator, set/qra <qra locator> (eg set/qra JO02LQ)',\r
+ qrashe1 => 'Please enter a QRA locator, eg sh/qra JO02LQ or sh/qra JO02LQ IO93NS',\r
+ qrae2 => 'Don\'t recognise \"$_[0]\" as a QRA locator (eg JO02LQ)',\r
+ qra => 'Your QRA Locator is now \"$_[0]\"',\r
+ rcmdo => 'RCMD \"$_[0]\" sent to $_[1]',\r
+ rec => '$_[0] records',\r
+ read1 => 'Sorry, no new messages for you',\r
+ read2 => 'Msg $_[0] not found',\r
+ read3 => 'Msg $_[0] not available',\r
+ route => '$_[0] on $_[1] via $_[2]',\r
+ sat1 => 'Tracking Table for $_[0] for the next $_[1] hours every $_[2] mins',\r
+ sat2 => 'dd/mm UTC Lat Lon Alt Km Az El Dist Km',\r
+ sat3 => 'Syntax: SH/SAT <name> [<hours> <interval>]',\r
+ sat4 => 'Satellites available:-',\r
+ satnf => 'Satellite $_[0] unknown',\r
+ satdisc => '-----',\r
+ sethop1 => 'usage: set/hops <call> ann|spots|wwv|wcy <no of hops>',\r
+ sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]', \r
+ sethop3 => 'No hops set for $_[0]', \r
+ shutting => '$main::mycall shutting down...',\r
+ sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',\r
+ snode1 => 'Node Call Sort Version',\r
+ snode2 => '$_[0] $_[1] $_[2]',\r
+ snode3 => '$_[0] Unknown Call',\r
+ sqra => 'Cluster QRA Locator$_[0], DON\'T FORGET TO CHANGE YOUR DXVars.pm',\r
+ sorry => 'Sorry',\r
+ spf1 => 'spoof: creating new user $_[0]',\r
+ sun => 'Location Rise Set Azim Elev',\r
+ suser1 => 'usage: callsign user_field_name value',\r
+ suser2 => 'User $_[0] not found',\r
+ suser3 => 'User field \'$_[0]\' was \'$_[1]\' now set to \'$_[2]\'',\r
+ suser4 => 'User field name \'$_[0]\' doesn\'t exist',\r
+ time1 => 'Local Time: $_[0] $_[1], UTC $_[2]',\r
+ time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Hours)',\r
+ time3 => '$_[0] $_[1]',\r
+ talks => 'Talk flag set on $_[0]',\r
+ talku => 'Talk flag unset on $_[0]',\r
+ talkend => 'Finished talking to you',\r
+ talkinst => 'Entering Talkmode, /EX to end, /<cmd> to run a command',\r
+ talkprompt => 'Talk ($_[0])>',\r
+ talkstart => 'Starting talking to you',\r
+ usernf => '*** User record for $_[0] not found ***',\r
+ wwvs => 'WWV flag set on $_[0]',\r
+ wwvu => 'WWV flag unset on $_[0]',\r
+ wxs => 'WX flag set on $_[0]',\r
+ wxu => 'WX flag unset on $_[0]',\r
+ },\r
+ nl => {\r
+ addr => 'Addres gezet op: $_[0]',\r
+ already => '$_[0] reeds geconnect',\r
+ anns => 'Announce berichten AAN gezet voor $_[0]',\r
+ annu => 'Announce berichten UIT gezet voor $_[0]',\r
+ bbse1 => 'Geef je home bbs (mailbox),, set/bbs <home mailbox>',\r
+ bbs => 'Je home bbs (mailbox) is nu \"$_[0]\"',\r
+ beepoff => 'De beep staat nu UIT',\r
+ beepon => 'De beep staat nu AAN',\r
+ conother => 'Sorry $_[0] je bent reeds geconnect op een andere poort',\r
+ concluster => 'Sorry $_[0] je bent reeds op een ander cluster geconnect',\r
+ conscript => 'Geen connectscript aangeroepen \"$_[0]\" gevonden in $main::root/connect',\r
+ confail => 'Verbinding met $_[0] mislukt ($_[1])',\r
+ constart => 'Verbinding met $_[0] gestart',\r
+ disc1 => 'Gedisconnect door $_[0]',\r
+ disc2 => '$_[0] gedisconnect',\r
+ dx1 => 'Frequentie $_[0] valt niet binnen een band [Opdracht: DX freq call commentaar](Zie sh/band)',\r
+ dx2 => 'Ik heb een call nodig! [Opdracht: DX freq call commentaar]',\r
+ dxs => 'DX Spots worden WEL doorgegeven aan $_[0]',\r
+ dxu => 'DX Spots worden NIET doorgegeven aan $_[0]',\r
+ e1 => 'Ongeldige opdracht',\r
+ e2 => 'Fout: $_[0]',\r
+ e3 => '$_[0]: $_[1] niet gevonden',\r
+ e4 => 'Minimaal een prefix of een call nodig',\r
+ e5 => 'Niet toegestaan',\r
+ e6 => '*** Geen station gespecifiseerd ***',\r
+ e7 => 'Callsign $_[0] is niet zichtbaar op het cluster',\r
+ e8 => 'Ik heb een call en tekst nodig',\r
+ e9 => 'Ik heb wel tekst nodig voor een announce!',\r
+ e10 => '$_[0] is niet lokaal verbonden',\r
+ e12 => 'Ik heb een node call nodig',\r
+ e13 => '$_[0] is geen node',\r
+ emaile1 => 'Geef uw E-mail addres, set/email <uw e-mail addres>',\r
+ emaila => 'Uw E-Mail addres is nu \"$_[0]\"',\r
+ email => 'E-mail addres gezet op: $_[0]',\r
+ helpe1 => 'Help systeem niet beschikbaar, meld dit aan de sysop',\r
+ helpe2 => 'Geen help beschikbaar over \"$_[0]\"',\r
+ heres => 'Aanwezigheid AAN gezet voor $_[0]',\r
+ heade1 => 'Gebruik gemaakt van de $main::mycall coordinaten, overweeg een set/location of set/qra',\r
+ hereu => 'Aanwezigheid UIT gezet voor $_[0]',\r
+ homebbs => 'Uw Home mailbox is nu $_[0]',\r
+ homenode => 'Uw (Home) DX-Cluster is : $_[0]',\r
+ hnodee1 => 'Geef mij uw lokale (home) DX-cluster, set/homenode <DX-cluster>',\r
+ hnode => 'Uw (home) DX-cluster is nu \"$_[0]\"',\r
+ iso => '$_[0] is geisoleerd (Isolated)',\r
+ isou => '$_[0] is niet meer geisoleerd (UnIsolated)',\r
+ isoc => '$_[0] gecreerd en geisoleerd (Isolated)',\r
+ l1 => 'Sorry $_[0], u bent reeds op een ander kanaal ingelogt',\r
+ l2 => 'Hallo $_[0], dit is $main::mycall in $main::myqth met DXSpider V$main::version',\r
+ lh1 => '$main::data/hop_table.pl bestaat niet',\r
+ loce1 => 'Geef uw coordinaten met, set/location <latitude longitude>',\r
+ loce2 => 'Herken \"$_[0]\" niet als Lat/Long (vb 52 20 N 0 16 E)',\r
+ loc => 'Uw Latitude en Longitude zijn nu \"$_[0]\"',\r
+ lockout => '$_[0] heeft geen toegang meer (Locked out)',\r
+ lockoutun => '$_[0] heeft wederom toegang (Unlocked)',\r
+ m2 => '$_[0] Informatie: $_[1]',\r
+ merge1 => 'Merge verzoek voor $_[1] spots en $_[2] WWV verzonden naar $_[0]',\r
+ msgnew => 'Er is nieuwe post gearriveerd voor u',\r
+ namee1 => 'Geef aub uw naam met, set/name <uw naam>',\r
+ namee2 => 'Gebruiker $_[0] niet te vinden!',\r
+ name => 'Uw naam is gezet op \"$_[0]\"',\r
+ node => '$_[0] gezet als een AK1A stijl DX-cluster',\r
+ nodeu => '$_[0] teruggezet naar gebruiker status',\r
+ nodec => '$_[0] gecreeerd als AK1A stijl DX-cluster',\r
+ nodee1 => 'U kunt deze opdracht niet uitvoeren zolang ($_[0]) on-line is',\r
+ ok => 'Opdracht succesvol uitgevoerd',\r
+ page => 'Druk op Enter om door te gaan, A om af te breken (nog $_[0] regels) >',\r
+ pagelth => 'Paginalengte gezet op ($_[0]) regels',\r
+ passerr => 'Gebruik: SET/PASS <wachtwoord> <call>',\r
+ password => 'Wachtwoord gezet of gewijzigd voor $_[0]',\r
+ pingo => 'Ping gestart naar $_[0]',\r
+ pingi => 'Ping ontvangen van $_[0] $_[1] (Ave $_[2]) secs',\r
+ pr => '$_[0] de $main::mycall $_[1] $_[2] >',\r
+ pr2 => '($_[0]) de $main::mycall $_[1] $[2] >',\r
+ priv => 'Privilege level gewijzigd op $_[0]',\r
+ prx => '$main::mycall >',\r
+ qll => 'Geef uw locator met set/location of set/qra',\r
+ qthe1 => 'Geef uw woonplaats met, set/qth <woonplaats>',\r
+ qth => 'Uw QTH is nu \"$_[0]\"',\r
+ qrae1 => 'Geef uw QRA locator, set/qra <qra locator> (vb set/qra JO33FD)',\r
+ qrashe1 => 'Geef uw QRA locator, vbg sh/qra JO33FD of sh/qra JO33FD IO93NS',\r
+ qrae2 => 'Ik herken \"$_[0]\" niet als een QRA locator (vb JO33FD)',\r
+ qra => 'Uw QRA Locator is nu \"$_[0]\"',\r
+ rcmdo => 'RCMD \"$_[0]\" verzonden naar $_[1]',\r
+ read1 => 'Sorry, geen berichten voor u',\r
+ read2 => 'Bericht $_[0] niet gevonden',\r
+ read3 => 'Bericht $_[0] niet beschikbaar',\r
+ shutting => '$main::mycall gaat QRT...',\r
+ sloc => 'Cluster lat $_[0] long $_[1], DON\'T FORGET TO CHANGE YOUR DXVars.pm',\r
+ sqra => 'Cluster QRA Locator$_[0], DON\'T FORGET TO CHANGE YOUR DXVars.pm',\r
+ talks => 'Talk berichten AAN gezet voor $_[0]',\r
+ talku => 'Talk berichten UIT gezet voor $_[0]',\r
+ usernf => '*** Gebruiker info van $_[0] niet gevonden ***',\r
+ wwvs => 'WWV berichten AAN gezet voor $_[0]',\r
+ wwvu => 'WWV berichten UIT gezet voor $_[0]',\r
+ wxs => 'WX berichten AAN gezet voor $_[0]',\r
+ wxu => 'WX berichten UIT gezet voor $_[0]',\r
+ },\r
+ fr => {\r
+ },\r
+ de => {\r
+ },\r
+ sp => { \r
+ addr => 'Dirección es ahora: $_[0]',\r
+ already => '$_[0] ya esta conctado',\r
+ anns => 'Anuncios activados $_[0]',\r
+ annu => 'Anuncios desactivados $_[0]',\r
+ badnode1 => '$_[0] es ahora un nodo malo',\r
+ badnode2 => '$_[0] es ahora un nodo bueno',\r
+ badnode3 => 'Lista de nodos malos:-',\r
+ bbse1 => 'Por favor introduce la dirección de tu BBS,, set/bbs <tu bbs>',\r
+ bbs => 'Tu BBS es ahora \"$_[0]\"',\r
+ beepoff => 'Beeps desactivados',\r
+ beepon => 'Beeps activados',\r
+ call1 => 'Callsign lookup via $_[0]:',\r
+ conother => 'Lo siento $_[0] ya estás conectado en otro puerto',\r
+ concluster => 'Lo siento $_[0] ya estás conectado en otro cluster',\r
+ conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',\r
+ confail => 'conexión con $_[0] fallida ($_[1])',\r
+ constart => 'conexión con $_[0] ha comenzado',\r
+\r
+ disc1 => 'Desconectado por $_[0]',\r
+ disc2 => '$_[0] desconectado',\r
+ db1 => 'Esta base de datos está en $_[0]',\r
+ db2 => 'Lo siento, pero la palabra: $_[0] no se encontró en $_[1]',\r
+ db3 => 'Lo siento, la base de datos $_[0] no existe aquí',\r
+ db4 => 'Lo siento, la base de datos $_[0] situada en $_[1] no se encuentra disponible',\r
+ db5 => 'Accediendo a la base de datos remota $_[0]...espere...',\r
+ db6 => 'Base de datos $_[0] ya existe, bórrala primero',\r
+ db7 => 'Base de datos $_[0] creada para el nodo remoto $_[1]',\r
+ db8 => 'Base de datos $_[0] creada localmente',\r
+ db9 => 'Base de datos $_[0] borrada',\r
+ db10 => '$_[0] records imported into $_[1]',\r
+ db11 => 'Petición enviada a $_[0], por favor espera...',\r
+ dfreq1 => 'Invalid freq $_[0] need: eg 0/30000 or hf or hf/cw',\r
+ dup => 'Lo siento, esto es un duplicado',\r
+ dx1 => 'Frecuencia $_[0] fuera de banda (ver show/band); usa: DX [BY indicativo] frec indic. comentario',\r
+ dx2 => 'Necesita indicativo; usa: DX [BY indicativo] frec indic. comentario',\r
+ dxs => 'DX Spots activado $_[0]',\r
+ dxu => 'DX Spots desactivado $_[0]',\r
+ e1 => 'Comando inválido',\r
+ e2 => 'Error: $_[0]',\r
+ e3 => '$_[0]: $_[1] no encontrado',\r
+ e4 => 'Se necesita, por lo menos, un prefijo o indicativo',\r
+ e5 => 'No permitido',\r
+ e6 => '*** No se ha especificado una estación ***',\r
+ e7 => 'indicativo $_[0] no visible en el cluster',\r
+ e8 => 'Se necesita un indicativo y algo de texto',\r
+ e9 => 'Se necesita al menos algo de texto',\r
+ e10 => '$_[0] no conectado en local',\r
+ e11 => 'Can\'t use $main:mycall as target',\r
+ e12 => 'Se necesita el indicativo del nodo',\r
+ e13 => '$_[0] no es un nodo',\r
+ e14 => 'El primer argumento debe de ser mumérico y > 0',\r
+ e15 => 'cualificador no válido \"$_[0]\"',\r
+ e16 => 'El fichero \"$_[0]\" ya existe',\r
+ e17 => 'Por favor no uses la palabra: @_ aqui',\r
+ e18 => 'No se puede conectar con $_[0] ($!)',\r
+ e19 => 'Caracter inválido en la linea',\r
+ e20 => 'señal $_[0] no reconocido',\r
+ e21 => '$_[0] no numérico',\r
+ e22 => '$_[0] no es un indicativo',\r
+ e23 => '$_[0] fuera de rango (ej: 0/30000)',\r
+ e24 => 'Lo siento, el acceso a internet no está habilitado',\r
+ e25 => 'Lo siento el valor debe de estar entre $_[0] y $_[1]',\r
+\r
+ echoon => 'Habilitado eco',\r
+ echooff => 'Deshabilitado eco',\r
+ echow => '*Eco está ahora deshabilitado, set/echo para habilitar',\r
+ emaile1 => 'Por favor introduce tu E-mail, set/email <tu e-mail>',\r
+ emaila => 'Tu dirección de E-Mail es ahora \"$_[0]\"',\r
+ email => 'E-mail es ahora: $_[0]',\r
+ export1 => 'usa: export <msgno> <filename>',\r
+ export2 => '$_[3] hubo un error exportando msg $_[0] to $_[1] ($_[2])',\r
+ export3 => '$_[2 ] exportando msg $_[0] to $_[1]',\r
+ filter1 => 'Filtro $_[0] actualizado para $_[1]',\r
+ filter2 => 'Necesito un valor para $_[0]',\r
+ filter3 => 'No hay filtros definidos para $_[0]',\r
+ filter4 => '$_[0]$_[1] Filtros $_[2] borrados para $_[3]',\r
+ filter5 => 'necesito algunos camandos para el filtro...',\r
+ filter6 => '$_[0]$_[1] Filtro para $[2] no encontrado',\r
+ grids => 'DX Grid está activado $_[0]',\r
+ gridu => 'DX Grid está desavtivado $_[0]',\r
+\r
+ hasha => '$_[0] ya existe en $_[1]',\r
+ hashb => '$_[0] añadido a $_[1]',\r
+ hashc => '$_[0] eliminado desde $_[1]',\r
+ hashd => '$_[0] no en $_[1]',\r
+ hashe => '$_[0] activado $_[1]',\r
+ helpe1 => 'La ayuda no esta disponible, avisa al sysop',\r
+ helpe2 => 'No hay ayuda disponible en $_[0]',\r
+ heres => 'Here activado $_[0]',\r
+ heade1 => 'Usando $main::mycall Coords, se recomienda usar set/location o set/qra',\r
+ hereu => 'Here desactivado $_[0]',\r
+ homebbs => 'Tu BBS es ahora: $_[0]',\r
+ homenode => 'Tu Nodo habitual es ahora: $_[0]',\r
+ hnodee1 => 'Por favor introduce tu nodo local, set/homenode <tu DXCluster local>',\r
+ hnodee2 => 'Fallo al poner homenode on $_[0]',\r
+ hnode => 'Tu nodo habitual es ahora \"$_[0]\"',\r
+ init1 => 'enviando mensaje de inicialización a $_[0]',\r
+ iso => '$_[0] Aislado',\r
+ isou => '$_[0] Desaislado',\r
+ isoc => '$_[0] creado y aislado',\r
+ l1 => 'Lo siento $_[0], ya estás conectado en otro canal',\r
+ l2 => 'Hola $_[0], este es $main::mycall en $main::myqth usando DXSpider V$main::version',\r
+ lang => 'Language ahora es $_[0]',\r
+ lange1 => 'set/language <lang> cuando <lang> es uno de ($_[0])',\r
+ lange2 => 'fallo al poner lenguage en $_[0]',\r
+ lh1 => '$main::data/hop_table.pl no existe',\r
+ loce1 => 'Por favor introduce tu posición, set/location <latitud longitud>',\r
+ loce2 => 'No reconocida \"$_[0]\" como una Lat/Long (eg 52 20 N 0 16E)',\r
+ loc => 'Tu Lat/Long es ahora \"$_[0]\"',\r
+ lockout => '$_[0] Boloqueado',\r
+ lockoutc => '$_[0] Creado y bloqueado',\r
+ lockoutun => '$_[0] Desbloqueado',\r
+ loginu => 'Usuario $_[0] conectado',\r
+ logoutu => 'Usuario $_[0] desconectado',\r
+ loginn => 'Nodo $_[0] conectado',\r
+ logoutn => 'Nodo $_[0] desconectado',\r
+ m1 => 'Introduce título (30 caracteres):',\r
+ m2 => 'Copia del mensaje $_[0] enviada a $_[1]',\r
+ m3 => 'Lo siento, $_[0] no se puede enviar TO dirección',\r
+ m4 => 'Lo siento, no puedo acceder al mensaje $_[0]',\r
+ m5 => 'Lo siento, se necesita un número de mensaje',\r
+ m6 => 'Reenviado a: $_[0]',\r
+ m7 => 'Título : $_[0]',\r
+ m8 => 'Introduce mensaje /EX para enviar o /ABORT para salir',\r
+ m9 => 'Hay correo nuevo para ti',\r
+ m10 => 'mensaje interrumpido',\r
+ m11 => 'mensaje nr $_[0] guardado y enviado a $_[1]',\r
+ m12 => 'mensaje nr $_[0] borrado',\r
+ m13 => 'mensaje nr $_[0] no encontrado',\r
+ m14 => 'mensaje nr $_[0] marcado para enviar a $_[1]',\r
+ m15 => 'mensaje nr $_[0] desmarcado para ser enviado a $_[1]',\r
+ m16 => 'Necesito un número de mensaje',\r
+ m17 => 'Lo siento, no puedo enviar el mensaje en $_[0] modo',\r
+ msg1 => 'Bulletin Messages Queued',\r
+ msg2 => 'Private Messages Queued',\r
+ msg3 => 'Msg $_[0]: $_[1] cambiado en $_[2] to $_[3]',\r
+ msgu => 'usa: msg <cmd> <msgno> data...',\r
+ merge1 => 'Petición de envío desde $_[1] spots y $_[2] WWV enviados a $_[0]',\r
+ moon => 'Localidad Salida Puesta Azim Elev RGain dB',\r
+ namee1 => 'Por favor, introduce tu nombre set/name <tu nombre>',\r
+ namee2 => 'No se encuentra el usuario $_[0]!',\r
+ name => 'Tu nombre es ahora \"$_[0]\"',\r
+ nodea => '$_[0] set as AK1A style Node',\r
+ nodeac => '$_[0] created as AK1A style Node',\r
+ nodec => '$_[0] set as CLX style Node',\r
+ nodecc => '$_[0] created as CLX style Node',\r
+ noder => '$_[0] set as AR-Cluster style Node',\r
+ noderc => '$_[0] created as AR-Cluster style Node',\r
+ nodes => '$_[0] set as DXSpider style Node',\r
+ nodesc => '$_[0] created as DXSpider style Node',\r
+ nodex => '$_[0] set as DXNET style Node',\r
+ nodexc => '$_[0] created as DXNET style Node',\r
+ nodeu => '$_[0] es ahora un usuario',\r
+ nodee1 => 'You cannot use this command whilst your target ($_[0]) is on-line',\r
+ obscount => 'Ping obsolescence count on $_[0] set to $_[1]',\r
+ ok => 'Operación realizada',\r
+ outconn => 'Conexión externa con $_[0]',\r
+ page => 'Teclea Enter para continuar, A para parar ($_[0] lineas) >',\r
+ pagelth => 'La longitud de las páginas es ahora $_[0]',\r
+ passerr => 'Por favor usa: SET/PASS <password> <indicativo>',\r
+ password => 'Password ajustado o cambiado para $_[0]',\r
+ pingo => 'Iniciado el ping a $_[0]',\r
+ pingi => 'Retorno del ping desde $_[0] $_[1] (Ave $_[2]) secs',\r
+ pinge1 => 'No puedes enviarte un ping a ti mismo!',\r
+ pingint => 'Intervalo de ping en $_[0] ajustado para $_[1] segundos',\r
+ 'pos' => 'From Callsign: $_[0] Lat: $_[1] Long: $_[2]',\r
+ pr => '$_[0] de $main::mycall $_[1] $_[2] >',\r
+ pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',\r
+ priv => 'Nivel de privilegios en $_[0]',\r
+ prx => '$main::mycall >',\r
+ qll => 'Por favor introduce tu locator con set/location o set/qra',\r
+ qthe1 => 'Por favor introduce tu QTH, set/qth <tu qth>',\r
+ qth => 'Tu QTH es ahora \"$_[0]\"',\r
+ qrae1 => 'Por favor introduce tu QRA locator, set/qra <qra locator> (ej: set/qra JO02LQ)', qrashe1 => 'Por favor introduce un QRA locator, ej sh/qra JO02LQ o sh/qra JO02LQ IO93NS', qrae2 => 'No reconocido \"$_[0]\" como un QRA locator (ej JO02LQ)',\r
+ qra => 'Tu QRA Locator es ahora \"$_[0]\"',\r
+ rcmdo => 'RCMD \"$_[0]\" enviado a $_[1]',\r
+ rec => '$_[0] records',\r
+ read1 => 'Lo siento, no hay mensajes nuevos para ti',\r
+ read2 => 'Msg $_[0] no encontrado',\r
+ read3 => 'Msg $_[0] no disponible',\r
+ route => '$_[0] en $_[1] via $_[2]',\r
+ sat1 => 'Tabla de seguimiento $_[0] para las proximas $_[1] horas cada $_[2] mins',\r
+ sat2 => 'dd/mm UTC Lat Lon Alt Km Az El Dist Km',\r
+ sat3 => 'Syntax: SH/SAT <nombre> [<horas> <intervalo>]',\r
+ sat4 => 'Satélites disponibles:-',\r
+ satnf => 'Satélite $_[0] desconocido',\r
+ satdisc => '-----',\r
+ sethop1 => 'usa: set/hops <call> ann|spots|wwv|wcy <nr de hops>',\r
+ sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]',\r
+ sethop3 => 'No hops set for $_[0]',\r
+ shutting => '$main::mycall shutting down...',\r
+ sloc => 'Cluster lat $_[0] long $_[1], NO OLVIDES CAMBIAR TU DXVars.pm',\r
+ snode1 => 'Nodo Call Sort Version',\r
+ snode2 => '$_[0] $_[1] $_[2]',\r
+ snode3 => '$_[0] Indicativo desconocido',\r
+ sqra => 'Cluster QRA Locator$_[0], NO OLVIDES CAMBIAR TU DXVars.pm',\r
+ sorry => 'Lo siento',\r
+ spf1 => 'spoof: creando nuevo usuario $_[0]',\r
+ sun => 'Posición Salida Puesta Azim Elev',\r
+ suser1 => 'usa: indicativo user_field_name value',\r
+ suser2 => 'Usuario $_[0] no encontrado',\r
+ suser3 => 'User field \'$_[0]\' was \'$_[1]\' now set to \'$_[2]\'',\r
+ suser4 => 'User field name \'$_[0]\' doesn\'t exist',\r
+ time1 => 'Horario local: $_[0] $_[1], UTC $_[2]',\r
+ time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Horas)',\r
+ time3 => '$_[0] $_[1]',\r
+ talks => 'Talk activado $_[0]',\r
+ talku => 'Talk desactivado $_[0]',\r
+ talkend => 'Finalizado modo talk contigo',\r
+ talkinst => 'Entrando en modo talk, /EX para salir, /<cmd> para ejecutar un comando',\r
+ talkprompt => 'Talk ($_[0])>',\r
+ talkstart => 'Iniciando modo talk contigo',\r
+ usernf => '*** User record for $_[0] no encontrado ***',\r
+ wwvs => 'WWV activado $_[0]',\r
+ wwvu => 'WWV desactivado $_[0]',\r
+ wxs => 'WX activado $_[0]',\r
+ wxu => 'WX desactivado $_[0]',\r
+ },\r
+);\r