]> dxcluster.net Git - spider.git/commitdiff
edit Messages for dos escapes
authorg0vgs <g0vgs>
Fri, 18 Oct 2002 08:20:34 +0000 (08:20 +0000)
committerg0vgs <g0vgs>
Fri, 18 Oct 2002 08:20:34 +0000 (08:20 +0000)
perl/Messages

index a4ca81618af4e516c6b1339897eea9082bc86afd..4cc4a74b309dd1c0102faa14dd538a6dab18cf0b 100644 (file)
-# -*- 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 => 'Announces enabled for $_[0]',\r
-                               annu => 'Announces disabled for $_[0]',\r
-                               annts => 'AnnTalk enabled for $_[0]',\r
-                               anntu => 'AnnTalk disabled for $_[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 to me on another port',\r
-                               concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster (on $_[1])',\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
-                               deluser => 'User $_[0] has been deleted',\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
-                               dir1 => 'No messages found',\r
-                               disc1 => 'Disconnected by $_[0]',\r
-                               disc2 => 'Channel $_[0] disconnected',\r
-                               disc3 => 'No Channel, but connection $_[0] disconnected',\r
-                               disc4 => 'No Channel or connection but orphan $_[0] disconnected',\r
-                               done => 'Done',\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
-                               dx3 => 'The callsign or frequency is invalid',\r
-                               dxs => 'DX Spots enabled for $_[0]',\r
-                               dxu => 'DX Spots disabled for $_[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
-                               e26 => 'Too many concurrent errors, you are being disconnected',\r
-                               e27 => '$_[0] not a numeric or a callsign prefix', \r
-                               e28 => 'Sorry, you need to be registered (SP $main::myalias to register)',\r
-                               e29 => 'Need a password',\r
-                               e30 => 'Cannot Open $_[0] $!',\r
-                               e31 => '$_[0] is not a user', \r
-                               e32 => 'Need a passphrase',\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 => 'Unknown filter keyword $_[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 enabled for $_[0]',\r
-                               gridu => 'DX Grid disabled for $_[0]',\r
-                               illcall => 'Sorry, $_[0] is an invalid callsign',\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
-                               isoari => 'there is an input route filter for $_[0]; clear/route input $_[0] first',\r
-                               isoaro => 'there is an output route filter for $_[0]; clear/route $_[0] first',\r
-                               isow => '$_[0] is isolated; unset/isolate $_[0] first',\r
-                               l1 => 'Sorry $_[0], you are already logged on on another channel',\r
-                               l2 => 'Hello $_[0], this is $main::mycall in $main::myqth\nrunning DXSpider V$main::version build $main::build',\r
-                               lang => 'Language is now English',\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
-                               loce3 => '$_[0] is a QRA locator, please use: set/qra $_[0]',\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
-                               lockoutuse => 'usage: sh/lockout <call>|ALL',\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                              dd/mm/yyyy Rise   Set',\r
-                               moon_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',\r
-                               mond => 'Monitoring Disabled',\r
-                               mone => 'Monitoring Enabled',\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
-                               nodeb => '$_[0] set as BBS',\r
-                               nodebc => '$_[0] created as BBS',\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
-                               notdone => 'NOT Done',\r
-                               nothere => 'Sorry, but $_[0] isn\'t here at the moment, please try later', \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
-                               passphrase => 'Passphrase set or changed for $_[0]',\r
-                               passphraseu => 'Passphrase removed for $_[0]',\r
-                               password => 'Password set or changed for $_[0]',\r
-                               passwordu => 'Password removed for $_[0]',\r
-                               pc90s => 'PC90 enabled for $_[0]',\r
-                               pc90u => 'PC90 disabled $_[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
-                               prs => 'Prompt now set to \"$_[0]\"',\r
-                               pru => 'Prompt now set back to default',\r
-                               priv => 'Privilege level changed on $_[0]',\r
-                               prx => '$main::mycall >',\r
-                               pw0 => 'Enter old password: ',\r
-                               pw1 => 'Enter new password: ',\r
-                               pw2 => 'Re-enter new password: ',\r
-                               pw3 => 'Password changed',\r
-                               pw4 => 'Passwords differ, password NOT changed',\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
-                               read1 => 'Sorry, no new messages for you',\r
-                               read2 => 'Msg $_[0] not found',\r
-                               read3 => 'Msg $_[0] not available',\r
-                               rec => '$_[0] records',\r
-                               reg => '$_[0] registered',\r
-                               regc => '$_[0] created and registered',\r
-                               reginac => 'Registration is not active (set/var \$main::reqreg = 1 to activate)',\r
-                               regun => '$_[0] unregistered',\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/Age of Keps (days):-',\r
-                               sat5 => 'need nnnnn.AMSAT in subject to load keps from this message',\r
-                               satnf => 'Satellite $_[0] unknown',\r
-                               satdisc => '-----',\r
-                               set => '$_[0] enabled for $_[1]',\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
-                               shu => '\"SHU\" is not enough! you need to type at least \"SHUT\" to shutdown the node',\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
-                               stathf => 'HF DX Spot Stats, last 31 days from $_[0]',\r
-                               stathft => 'HF DX Spot Stats, last 31 days from $_[1] for DXCC $_[0]',\r
-                               statvhf => 'VHF+ DX Spot Stats, last 31 days from $_[0]',\r
-                               statvhft => 'VHF+ DX Spot Stats, last 31 days from $_[1] for DXCC $_[0]',\r
-                               statdx => 'Total DX Spots last 31 days',\r
-                               sun => 'Location                              dd/mm/yyyy Rise   Set',\r
-                               sun_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',\r
-                               susdb1 => 'usage: callsign state city',\r
-                               susdb2 => 'USDB $_[0] was $_[1], $_[2]',\r
-                               susdb3 => 'USDB $_[0] now $_[1], $_[2]',\r
-                               susdb4 => 'USDB $_[0] deleted',\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 enabled for $_[0]',\r
-                               talku => 'Talk disabled for $_[0]',\r
-                               talkend => 'Finished talking to you',\r
-                               talkinst => 'Entering Talkmode, /EX to end, /<cmd> to run a command',\r
-                               talknh => 'Sorry $_[0] is not online at the moment',\r
-                               talkprompt => 'Talk ($_[0])>',\r
-                               talkstart => 'Starting talking to you',\r
-                               unset => '$_[0] disabled for $_[1]',\r
-                               unsethop1 => 'usage: unset/hops <call> ann|spots|wwv|wcy',\r
-                               unsethop2 => 'hops unset on $_[1] for $_[0]', \r
-                               usernf => '*** User record for $_[0] not found ***',\r
-                               wcy1 => '$_[0] is missing or out of range',\r
-                               wcy2 => 'Duplicate WCY',\r
-                wcys => 'WCY enabled for $_[0]',\r
-                               wcyu => 'WCY disabled for $_[0]',\r
-                               wwv1 => '$_[0] is missing or out of range',\r
-                               wwv2 => 'Duplicate WWV',\r
-                               wwvs => 'WWV enabled for $_[0]',\r
-                               wwvu => 'WWV disabled $_[0]',\r
-                               wxs => 'WX enabled for $_[0]',\r
-                               wxu => 'WX disabled for $_[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
-                               lang => 'De taal zijn nu Nederlandse',\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
-                es => {                               \r
-                               addr => 'La dirección es ahora: $_[0]',\r
-                               already => '$_[0] ya está conectado',\r
-                               anns => 'Activada la recepción de anuncios para $_[0]',\r
-                               annu => 'Desactivada la recepción de anuncios para $_[0]',\r
-                               annts => 'Modo AnnTalk activado para $_[0]',\r
-                               anntu => 'Modo AnnTalk desactivado para $_[0]',\r
-                               badnode1 => 'No se aceptan spots generados en $_[0], se añade a la lista badnode',\r
-                               badnode2 => 'Se aceptan spots del nodo $_[0], sale de la lista badnode',\r
-                               badnode3 => 'Lista de nodos rechazados:',\r
-                               bbse1 => 'Por favor introduce tu BBS, set/bbs <tu bbs>',\r
-                               bbs => 'Tu BBS es ahora \"$_[0]\"',\r
-                               beepoff => 'Avisos sonoros desactivados',\r
-                               beepon => 'Avisos sonoros activados',\r
-                               call1 => 'Se encontró el indicativo vía $_[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 hay ningún script que se llame \"$_[0]\" en $main::root/connect',\r
-                               confail => 'La conexión con $_[0] ha fallado ($_[1])',\r
-                               constart => 'Se inicia la conexión a $_[0]',\r
-                               deluser =>'El usuario $_[0] ha sido borrado de la base de datos',\r
-                               db1 => 'Esta base de datos está en $_[0]',\r
-                               db2 => 'Lo siento, pero no se encontró $_[0] 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 => 'La base de datos $_[0] ya existe, bórrala primero',\r
-                               db7 => 'La base de datos $_[0] creada para el nodo remoto $_[1]',\r
-                               db8 => 'Base de datos $_[0] creada localmente',\r
-                               db9 => 'La base de datos $_[0] ha sido eliminada',\r
-                               db10 => '$_[0] registros importados para la base de datos $_[1]',\r
-                               db11 => 'Tu petición ha sido enviada a $_[0], por favor espera...',\r
-                               dfreq1 => 'La frecuencia no es válida $_[0] ej: 0/30000 o hf o hf/cw',\r
-                               dir1 => 'No hay mensajes nuevos',\r
-                               disc1 => 'Desconectado por $_[0]',\r
-                               disc2 => 'Canal $_[0] desconectado',\r
-                               disc3 => 'No estaba activo el canal, pero la conexión de $_[0] ha sido eliminada',\r
-                               disc4 => 'No existía el canal o la conexión, $_[0] se elimina',\r
-                               done => 'Hecho',\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
-                               dx3 => 'El indicativo o la frecuencia es incorrecta',\r
-                               dxs => 'Activada la recepción de spots de DX para $_[0]',\r
-                               dxu => 'Desactivada la recepción de spots de DX para $_[0]',\r
-                               e1 => 'Este comando no es vá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 estás autorizado',\r
-                               e6 => '*** No se ha especificado una estación ***',\r
-                               e7 => 'El indicativo $_[0] no es visible en el cluster',\r
-                               e8 => 'Se necesita un indicativo y algún texto',\r
-                               e9 => 'Se necesita al menos algún texto',\r
-                               e10 => '$_[0] no se encuentra conectado',\r
-                               e11 => 'No puedes usar tu propio $main:mycall como destino',\r
-                               e12 => 'Se necesita el indicativo del nodo',\r
-                               e13 => '$_[0] no es un nodo',\r
-                               e14 => 'El primer argumento debe de ser numérico y > 0',\r
-                               e15 => 'calificador no válido \"$_[0]\"',\r
-                               e16 => 'El fichero \"$_[0]\" ya existe',\r
-                               e17 => 'Por favor no uses la palabra: @_ aquí',\r
-                               e18 => 'No se puede conectar con $_[0] ($!)',\r
-                               e19 => 'Carácter no válido en la línea',\r
-                               e20 => 'Símbolo $_[0] no reconocido',\r
-                               e21 => '$_[0] no es 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
-                               e26 => 'Demasiados errores, serás desconectado',\r
-                               e27 => '$_[0] no es un numero o un prefijo',\r
-                               e28 => 'Lo siento, necesitas registrarte (SP $main::myalias para registrarte)',   \r
-                               e29 => 'Necesitas password', \r
-                               e30 => 'No se puede abrir $_[0] $!',\r
-                               e31 => '$_[0] no es un usuario', \r
-                               e32 => 'Se necesita una frase de contraseña',\r
-  \r
-                               echoon => 'Eco local activado',\r
-                               echooff => 'Eco local desactivado',\r
-                               echow => '*Eco local desactivado, set/echo para activarlo',\r
-                               emaile1 => 'Por favor introduce tu E-mail, set/email <tu E-mail>',\r
-                               emaila => 'Tu dirección E-Mail es ahora \"$_[0]\"',\r
-                               email => 'La dirección E-mail es ahora: $_[0]',\r
-                               export1 => 'uso: export <numero_mensaje> <nombre_fichero>',\r
-                               export2 => '$_[3] hubo un error exportando mensaje $_[0] a $_[1] ($_[2])',\r
-                               export3 => '$_[2 ] exportando mensaje $_[0] a $_[1]',\r
-                               filter1 => 'Filtro $_[0] actualizado para $_[1]',\r
-                               filter2 => 'Es necesario un valor para $_[0]',\r
-                               filter3 => 'No hay filtros definidos para $_[0]',\r
-                               filter4 => '$_[0]$_[1] Filtros $_[2] borrados para $_[3]',\r
-                               filter5 => 'Se necesitan algunos comandos para el filtro...',\r
-                               filter6 => '$_[0]$_[1] Filtro para $[2] no encontrado',\r
-                               grids => 'Activada recepción de locators en spot (DX Grid) para $_[0]',\r
-                               gridu => 'Desactivada recepción de locators en spot (DX Grid) para $_[0]',\r
-                               illcall => 'Lo siento, $_[0] no es un indicativo válido',\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 está disponible, comunícaselo al sysop',\r
-                               helpe2 => 'No hay ayuda disponible para $_[0]',\r
-                               heres => 'Se informa a la red: $_[0] está presente',\r
-                               heade1 => 'Usando las coord. de $main::mycall, se recomienda usar set/location o set/qra',\r
-                               hereu => 'Se informa a la red: $_[0] está ausente',\r
-                               homebbs => 'Tu  BBS es ahora: $_[0]',\r
-                               homenode => 'Tu cluster habitual es ahora: $_[0]',\r
-                               hnodee1 => 'Por favor introduce tu cluster habitual, set/homenode <Tu DX cluster>',\r
-                               hnodee2 => 'Error al definir homenode en $_[0]',\r
-                               hnode => 'Tu nodo habitual es ahora \"$_[0]\"',\r
-                               init1 => 'Enviado mensaje de inicialización a $_[0]',\r
-                               iso => 'El cluster $_[0] se pone en modo pasivo (Aislado)',\r
-                               isou => 'El cluster $_[0] se pone en modo activo',\r
-                               isoc => '$_[0] creado y definido como pasivo (Aislado)',\r
-                               isoari => 'Existe un filtro de entrada de rutas para $_[0]; clear/route input $_[0] primero',\r
-                               isoaro => 'Existe un filtro de rutas hacia $_[0]; clear/route $_[0] primero',   \r
-                               isow => '$_[0] está en modo aislado; unset/isolate $_[0] primero',\r
-                               l1 => 'Lo siento $_[0], ya estás conectado en otro canal',\r
-                               l2 => 'Hola $_[0], esta es $main::mycall en $main::myqth usando DXSpider V$main::version',\r
-                               lang => 'El idioma es ahora Español',\r
-                               lange1 => 'set/language <idioma> donde <idioma> es uno entre ($_[0])',\r
-                               lange2 => 'Error al seleccionar idioma 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 (ej: 52 20 N 0 16E)',\r
-                               loce3 => '$_[0] es un QRA locator, por favor usa: set/qra $_[0]',\r
-                               loc => 'Tu Lat/Long es ahora \"$_[0]\"',\r
-                               lockout => '$_[0] Excluido del sistema',\r
-                               lockoutc => '$_[0] Creado y excluido del sistema',\r
-                               lockoutun => '$_[0] autorizado para conectar',\r
-                               lockoutuse => 'Uso: sh/lockout <indicativo|prefijo>|ALL',\r
-                               loginu => '$_[0] conecta',\r
-                               logoutu => '$_[0] se desconecta',\r
-                               loginn => '$_[0] conecta',\r
-                               logoutn => '$_[0] se desconecta',\r
-                               m1 => 'Introduce el título (máx. 30 caractéres):',\r
-\r
-                               m2 => 'Copia del mensaje $_[0] enviada a $_[1]',\r
-                               m3 => 'Lo siento, $_[0] no se aceptan mensajes a ese tópico',\r
-                               m4 => 'Lo siento, no se puede 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 terminar o /ABORT para interrumpir',\r
-                               m9 => 'Hay correo nuevo para ti. Bórralo una vez leído.',\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 ser enviado a $_[1]',\r
-                               m15 => 'mensaje nr $_[0] no se enviará a $_[1]',\r
-                               m16 => 'Se necesita un número de mensaje',\r
-                               m17 => 'Lo siento, no puedo enviar el mensaje en $_[0] modo',\r
-                               msg1 => 'Cola de mensajes tipo Boletín',\r
-                               msg2 => 'Cola de mensajes tipo Privados',\r
-                               msg3 => 'Msg $_[0]: $_[1] cambiado de $_[2] a $_[3]',\r
-                               msgu => 'uso: msg <cmd> <msgno> data...',\r
-                               merge1 => 'Petición de envío de $_[1] spots y $_[2] WWV enviada a $_[0]',\r
-                               moon => 'QTH                                   dd/mm/yyyy Salida Puesta',\r
-                               moon_with_azel => 'QTH                                   dd/mm/yyyy Salida Puesta   Azim   Elev',                                 \r
-                               mond => 'Activado modo monitor',\r
-                               mone => 'Desactivado modo monitor',\r
-                               namee1 => 'Por favor, introduce tu nombre set/name <tu nombre>',\r
-                               namee2 => 'No se encuentra el usuario $_[0]!',\r
-                               name => 'Tu nombre es \"$_[0]\"',\r
-                               nodea => '$_[0] definido como nodo AK1A ',\r
-                               nodeac => '$_[0] creado como nodo AK1A ',\r
-                               nodeb => '$_[0] definido como BBS',\r
-                               nodebc => '$_[0] creado como BBS',\r
-                               nodec => '$_[0] definido como nodo CLX ',\r
-                               nodecc => '$_[0] creado como nodo CLX ',\r
-                               noder => '$_[0] definido como nodo AR-Cluster ',\r
-                               noderc => '$_[0] creado como nodo AR-Cluster ',\r
-                               nodes => '$_[0] definido como nodo DXSpider ',\r
-                               nodesc => '$_[0] creado como nodo DXSpider ',\r
-                               nodex => '$_[0] definido como nodo DXNET ',\r
-                               nodexc => '$_[0] creado como nodo DXNET ',\r
-                               nodeu => '$_[0] es ahora un usuario',\r
-                               nodee1 => 'No puedes usar este comando mientras tu objetivo ($_[0]) se encuentra',\r
-                               notdone => 'No se pudo hacer',\r
-                               nothere => 'Lo siento, pero $_[0] no está aquí ahora, inténtalo mas tarde',\r
-                               obscount => 'El parámetro Ping obsolescence count para $_[0] ajustado a $_[1]',\r
-                               ok => 'Operación realizada',\r
-                               outconn => 'Iniciando conexión con  $_[0]',\r
-                               page => 'Teclea Enter para continuar, A para abortar (Quedan $_[0] líneas) >',\r
-                               pagelth => 'La longitud de las páginas es ahora $_[0]',\r
-                               passerr => 'Por favor usa: SET/PASS <password> <indicativo>',\r
-                               passphrase => 'Passphrase definida o cambiada para $_[0]',\r
-                               passphraseu => 'Passphrase borrada para $_[0]',\r
-\r
-                               password => 'El Password ha sido definido o cambiado para $_[0]',\r
-                               passwordu => 'Contraseña borrada para $_[0]',\r
-                               pc90s => 'PC90 activado para $_[0]',\r
-                               pc90u => 'PC90 desactivado para $_[0]',\r
-                               pingo => 'Iniciado el ping a $_[0]',\r
-                               pingi => 'Ping devuelto por $_[0] $_[1] (Ave $_[2]) segundos',\r
-                               pinge1 => 'No puedes enviarte un ping a ti mismo!',\r
-                               pingint => 'Intervalo de ping para $_[0] ajustado a $_[1] segundos',\r
-                               'pos' => 'Desde el indicativo: $_[0] Lat: $_[1] Long: $_[2]',\r
-                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',\r
-                               pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',\r
-                               prs => 'El Prompt ha sido cambiado a \"$_[0]\"',\r
-                               pru => 'El Prompt vuelve a ser el normal por defecto',\r
-                               priv => 'Nivel de privilegios modificado para $_[0]',\r
-                               prx => '$main::mycall >',\r
-                               pw0 => 'Escribe el password antiguo: ',\r
-                               pw1 => 'Escribe el nuevo password: ',\r
-                               pw2 => 'Confirma el nuevo password: ',\r
-                               pw3 => 'El Password ha sido cambiado',\r
-                               pw4 => 'Los passwords no coinciden, NO se han cambiado',\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)',\r
-                               qrashe1 => 'Por favor introduce un QRA locator, ej sh/qra JO02LQ o sh/qra JO02LQ IO93NS',\r
-                               qrae2 => 'No se reconoce \"$_[0]\" como un QRA locator ( ej JO02LQ)',\r
-                               qra => 'Tu QRA Locator es ahora \"$_[0]\"',\r
-                               rcmdo => 'RCMD \"$_[0]\" enviado a $_[1]',\r
-                               read1 => 'Lo siento, no hay mensajes nuevos para ti',\r
-                               read2 => 'Mensaje $_[0] no encontrado',\r
-                               read3 => 'Mensaje $_[0] no disponible',\r
-                               rec => '$_[0] registros',\r
-                               reg => '$_[0] registrado',\r
-                               regc => '$_[0] creado y registrado',\r
-                               reginac => 'El registro no está activo (set/var \$main::regreq = 1 para activarlo)',\r
-                               regun => 'El usuario $_[0] no esta registrado',\r
-                               route => '$_[0] en $_[1] vía $_[2]',\r
-                               sat1 => 'Tabla de seguimiento $_[0] para las próximas $_[1] horas cada $_[2] minutos',\r
-                               sat2 => 'dd/mm  UTC      Lat     Lon  Alt Km      Az      El Dist Km',\r
-                               sat3 => 'Sintaxis: SH/SAT <nombre> [<horas> <intervalo>]',\r
-                               sat4 => 'Satélites disponibles:',\r
-                               sat5 => 'Es necesario el título nnnn.AMSAT para actualizar datos keps. desde un mensaje',\r
-                               satnf => 'Satélite $_[0] desconocido',\r
-                               satdisc => '-----',\r
-                               sethop1 => 'uso: set/hops <indicativo> ann|spots|wwv|wcy <nr de hops>',\r
-                               sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]',\r
-                               sethop3 => 'No hay hops definidos para $_[0]',\r
-                               shu => '\"SHU\" No es suficiente! Es necesario como mínimo escribir \"SHUT\" para apagar el cluster',\r
-                               shutting => '$main::mycall shutting down...',\r
-                               sloc => 'Cluster lat $_[0] long $_[1], NO OLVIDES CAMBIAR TU DXVars.pm',\r
-                               snode1 => 'Nodo Call   Sort    Versión',\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
-                               stathf => 'Estadísticas de spots en HF de los últimos 31 días',\r
-                               stathft => 'Estadísticas de spots en HF de los últimos 31 días para DXCC $_[0]',\r
-                               statvhf => 'VHF + DX Spot Stats, últimos 31 días',\r
-                               statvhft => 'VHF + DX Spot Stats, últimos 31 días para DXCC $_[0]',\r
-                               statdx => 'Total de Spots de DX en los últimos 31 días',\r
-                               sun => 'QTH                                   dd/mm/yyyy Salida Puesta',\r
-                               sun_with_azel => 'QTH                                   dd/mm/yyyy Salida Puesta   Azim   Elev',\r
-                               susdb1 => 'uso: indicativo estado ciudad',\r
-                               susdb2 => 'USDB $_[0] era $_[1], $_[2]',\r
-                               susdb3 => 'USDB $_[0] es ahora $_[1], $_[2]',\r
-                               susdb4 => 'USDB $_[0] borrado',\r
-                               suser1 => 'uso: indicativo user_field_name valor',\r
-                               suser2 => 'Usuario $_[0] no encontrado',\r
-                               suser3 => 'User field \'$_[0]\' era \'$_[1]\' ahora es \'$_[2]\'',\r
-                               suser4 => 'User field name \'$_[0]\' no existe',\r
-                               time1 => 'Horario local: $_[0] $_[1], UTC $_[2]',\r
-                               time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Horas)',\r
-                               time3 => '$_[0]  $_[1]',\r
-                               talks => 'Recepción de mensajes Talk activado para $_[0]',\r
-                               talku => 'Recepción de mensajes Talk desactivado para $_[0]',\r
-                               talkend => 'Finalizado modo talk contigo',\r
-                               talkinst => 'Entrando en modo talk, /EX para salir, /<cmd> para ejecutar un comando',\r
-                               talknh => 'Lo siento $_[0] no está conectado en este momento',\r
-                               talkprompt => 'Talk ($_[0])>',\r
-                               talkstart => 'Iniciando modo talk contigo',\r
-                               unset => '$_[0] deshabilitado para $_[1]',\r
-                               unsethop1 => 'uso: unset/hops <call> ann|spots|wwv|wcy',\r
-                               unsethop2 => 'Borrados los hops para $_[1] en $_[0]', \r
-                               usernf => '*** Registro de usuario $_[0] no encontrado ***',\r
-                               wcy1 => '$_[0] falta o esta fuera de rango',\r
-                               wcy2 => 'WCY Duplicado',\r
+# -*- 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 => 'Announces enabled for $_[0]',
+                               annu => 'Announces disabled for $_[0]',
+                               annts => 'AnnTalk enabled for $_[0]',
+                               anntu => 'AnnTalk disabled for $_[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 to me on another port',
+                               concluster => 'Sorry $_[0] you are already connected elsewhere on the cluster (on $_[1])',
+                               conscript => 'no connect script called \"$_[0]\" found in $main::root/connect',
+                               confail => 'connection to $_[0] failed ($_[1])',
+                               constart => 'connection to $_[0] started',
+                               deluser => 'User $_[0] has been deleted',
+                               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', 
+                               dir1 => 'No messages found',
+                               disc1 => 'Disconnected by $_[0]',
+                               disc2 => 'Channel $_[0] disconnected',
+                               disc3 => 'No Channel, but connection $_[0] disconnected',
+                               disc4 => 'No Channel or connection but orphan $_[0] disconnected',
+                               done => 'Done',
+                               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',
+                               dx3 => 'The callsign or frequency is invalid',
+                               dxs => 'DX Spots enabled for $_[0]',
+                               dxu => 'DX Spots disabled for $_[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]',
+                               e26 => 'Too many concurrent errors, you are being disconnected',
+                               e27 => '$_[0] not a numeric or a callsign prefix', 
+                               e28 => 'Sorry, you need to be registered (SP $main::myalias to register)',
+                               e29 => 'Need a password',
+                               e30 => 'Cannot Open $_[0] $!',
+                               e31 => '$_[0] is not a user', 
+                               e32 => 'Need a passphrase',
+
+                               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 => 'Unknown filter keyword $_[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 enabled for $_[0]',
+                               gridu => 'DX Grid disabled for $_[0]',
+                               illcall => 'Sorry, $_[0] is an invalid callsign',
+                               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',
+                               isoari => 'there is an input route filter for $_[0]; clear/route input $_[0] first',
+                               isoaro => 'there is an output route filter for $_[0]; clear/route $_[0] first',
+                               isow => '$_[0] is isolated; unset/isolate $_[0] first',
+                               l1 => 'Sorry $_[0], you are already logged on on another channel',
+                               l2 => 'Hello $_[0], this is $main::mycall in $main::myqth\nrunning DXSpider V$main::version build $main::build',
+                               lang => 'Language is now English',
+                               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)',
+                               loce3 => '$_[0] is a QRA locator, please use: set/qra $_[0]',
+                               loc => 'Your Lat/Long is now \"$_[0]\"',
+                               lockout => '$_[0] Locked out',
+                               lockoutc => '$_[0] Created and Locked out',
+                               lockoutun => '$_[0] Unlocked',
+                               lockoutuse => 'usage: sh/lockout <call>|ALL',
+                               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                              dd/mm/yyyy Rise   Set',
+                               moon_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',
+                               mond => 'Monitoring Disabled',
+                               mone => 'Monitoring Enabled',
+                               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',
+                               nodeb => '$_[0] set as BBS',
+                               nodebc => '$_[0] created as BBS',
+                               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',
+                               notdone => 'NOT Done',
+                               nothere => 'Sorry, but $_[0] isn\'t here at the moment, please try later', 
+                               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>',
+                               passphrase => 'Passphrase set or changed for $_[0]',
+                               passphraseu => 'Passphrase removed for $_[0]',
+                               password => 'Password set or changed for $_[0]',
+                               passwordu => 'Password removed for $_[0]',
+                               pc90s => 'PC90 enabled for $_[0]',
+                               pc90u => 'PC90 disabled $_[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] >',
+                               prs => 'Prompt now set to \"$_[0]\"',
+                               pru => 'Prompt now set back to default',
+                               priv => 'Privilege level changed on $_[0]',
+                               prx => '$main::mycall >',
+                               pw0 => 'Enter old password: ',
+                               pw1 => 'Enter new password: ',
+                               pw2 => 'Re-enter new password: ',
+                               pw3 => 'Password changed',
+                               pw4 => 'Passwords differ, password NOT changed',
+                               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]',
+                               read1 => 'Sorry, no new messages for you',
+                               read2 => 'Msg $_[0] not found',
+                               read3 => 'Msg $_[0] not available',
+                               rec => '$_[0] records',
+                               reg => '$_[0] registered',
+                               regc => '$_[0] created and registered',
+                               reginac => 'Registration is not active (set/var \$main::reqreg = 1 to activate)',
+                               regun => '$_[0] unregistered',
+                               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/Age of Keps (days):-',
+                               sat5 => 'need nnnnn.AMSAT in subject to load keps from this message',
+                               satnf => 'Satellite $_[0] unknown',
+                               satdisc => '-----',
+                               set => '$_[0] enabled for $_[1]',
+                               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]', 
+                               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',
+                               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]',
+                               stathf => 'HF DX Spot Stats, last 31 days from $_[0]',
+                               stathft => 'HF DX Spot Stats, last 31 days from $_[1] for DXCC $_[0]',
+                               statvhf => 'VHF+ DX Spot Stats, last 31 days from $_[0]',
+                               statvhft => 'VHF+ DX Spot Stats, last 31 days from $_[1] for DXCC $_[0]',
+                               statdx => 'Total DX Spots last 31 days',
+                               sun => 'Location                              dd/mm/yyyy Rise   Set',
+                               sun_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',
+                               susdb1 => 'usage: callsign state city',
+                               susdb2 => 'USDB $_[0] was $_[1], $_[2]',
+                               susdb3 => 'USDB $_[0] now $_[1], $_[2]',
+                               susdb4 => 'USDB $_[0] deleted',
+                               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 enabled for $_[0]',
+                               talku => 'Talk disabled for $_[0]',
+                               talkend => 'Finished talking to you',
+                               talkinst => 'Entering Talkmode, /EX to end, /<cmd> to run a command',
+                               talknh => 'Sorry $_[0] is not online at the moment',
+                               talkprompt => 'Talk ($_[0])>',
+                               talkstart => 'Starting talking to you',
+                               unset => '$_[0] disabled for $_[1]',
+                               unsethop1 => 'usage: unset/hops <call> ann|spots|wwv|wcy',
+                               unsethop2 => 'hops unset on $_[1] for $_[0]', 
+                               usernf => '*** User record for $_[0] not found ***',
+                               wcy1 => '$_[0] is missing or out of range',
+                               wcy2 => 'Duplicate WCY',
+                wcys => 'WCY enabled for $_[0]',
+                               wcyu => 'WCY disabled for $_[0]',
+                               wwv1 => '$_[0] is missing or out of range',
+                               wwv2 => 'Duplicate WWV',
+                               wwvs => 'WWV enabled for $_[0]',
+                               wwvu => 'WWV disabled $_[0]',
+                               wxs => 'WX enabled for $_[0]',
+                               wxu => 'WX disabled for $_[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',
+                               lang => 'De taal zijn nu Nederlandse',
+                               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 => {
+                          },
+                es => {                               
+                               addr => 'La dirección es ahora: $_[0]',
+                               already => '$_[0] ya está conectado',
+                               anns => 'Activada la recepción de anuncios para $_[0]',
+                               annu => 'Desactivada la recepción de anuncios para $_[0]',
+                               annts => 'Modo AnnTalk activado para $_[0]',
+                               anntu => 'Modo AnnTalk desactivado para $_[0]',
+                               badnode1 => 'No se aceptan spots generados en $_[0], se añade a la lista badnode',
+                               badnode2 => 'Se aceptan spots del nodo $_[0], sale de la lista badnode',
+                               badnode3 => 'Lista de nodos rechazados:',
+                               bbse1 => 'Por favor introduce tu BBS, set/bbs <tu bbs>',
+                               bbs => 'Tu BBS es ahora \"$_[0]\"',
+                               beepoff => 'Avisos sonoros desactivados',
+                               beepon => 'Avisos sonoros activados',
+                               call1 => 'Se encontró el indicativo vía $_[0]:',
+                               conother => 'Lo siento $_[0] ya estás conectado en otro puerto',
+                               concluster => 'Lo siento $_[0] ya estás conectado en otro cluster',
+                               conscript => 'No hay ningún script que se llame \"$_[0]\" en $main::root/connect',
+                               confail => 'La conexión con $_[0] ha fallado ($_[1])',
+                               constart => 'Se inicia la conexión a $_[0]',
+                               deluser =>'El usuario $_[0] ha sido borrado de la base de datos',
+                               db1 => 'Esta base de datos está en $_[0]',
+                               db2 => 'Lo siento, pero no se encontró $_[0] en $_[1]',
+                               db3 => 'Lo siento, la base de datos $_[0] no existe aquí',
+                               db4 => 'Lo siento, la base de datos $_[0] situada en $_[1] no se encuentra disponible',
+                               db5 => 'Accediendo a la base de datos remota $_[0]...espere...',
+                               db6 => 'La base de datos $_[0] ya existe, bórrala primero',
+                               db7 => 'La base de datos $_[0] creada para el nodo remoto $_[1]',
+                               db8 => 'Base de datos $_[0] creada localmente',
+                               db9 => 'La base de datos $_[0] ha sido eliminada',
+                               db10 => '$_[0] registros importados para la base de datos $_[1]',
+                               db11 => 'Tu petición ha sido enviada a $_[0], por favor espera...',
+                               dfreq1 => 'La frecuencia no es válida $_[0] ej: 0/30000 o hf o hf/cw',
+                               dir1 => 'No hay mensajes nuevos',
+                               disc1 => 'Desconectado por $_[0]',
+                               disc2 => 'Canal $_[0] desconectado',
+                               disc3 => 'No estaba activo el canal, pero la conexión de $_[0] ha sido eliminada',
+                               disc4 => 'No existía el canal o la conexión, $_[0] se elimina',
+                               done => 'Hecho',
+                               dup => 'Lo siento, esto es un duplicado',
+                               dx1 => 'Frecuencia $_[0] fuera de banda (ver show/band); usa: DX [BY indicativo] frec indic. comentario',
+                               dx2 => 'Necesita indicativo; usa: DX [BY indicativo] frec indic. comentario',
+                               dx3 => 'El indicativo o la frecuencia es incorrecta',
+                               dxs => 'Activada la recepción de spots de DX para $_[0]',
+                               dxu => 'Desactivada la recepción de spots de DX para $_[0]',
+                               e1 => 'Este comando no es válido',
+                               e2 => 'Error: $_[0]',
+                               e3 => '$_[0]: $_[1] no encontrado',
+                               e4 => 'Se necesita, por lo menos, un prefijo o indicativo',
+                               e5 => 'No estás autorizado',
+                               e6 => '*** No se ha especificado una estación ***',
+                               e7 => 'El indicativo $_[0] no es visible en el cluster',
+                               e8 => 'Se necesita un indicativo y algún texto',
+                               e9 => 'Se necesita al menos algún texto',
+                               e10 => '$_[0] no se encuentra conectado',
+                               e11 => 'No puedes usar tu propio $main:mycall como destino',
+                               e12 => 'Se necesita el indicativo del nodo',
+                               e13 => '$_[0] no es un nodo',
+                               e14 => 'El primer argumento debe de ser numérico y > 0',
+                               e15 => 'calificador no válido \"$_[0]\"',
+                               e16 => 'El fichero \"$_[0]\" ya existe',
+                               e17 => 'Por favor no uses la palabra: @_ aquí',
+                               e18 => 'No se puede conectar con $_[0] ($!)',
+                               e19 => 'Carácter no válido en la línea',
+                               e20 => 'Símbolo $_[0] no reconocido',
+                               e21 => '$_[0] no es numérico',
+                               e22 => '$_[0] no es un indicativo',
+                               e23 => '$_[0] fuera de rango (ej: 0/30000)',
+                               e24 => 'Lo siento, el acceso a internet no está habilitado',
+                               e25 => 'Lo siento el valor debe de estar entre $_[0] y $_[1]',
+                               e26 => 'Demasiados errores, serás desconectado',
+                               e27 => '$_[0] no es un numero o un prefijo',
+                               e28 => 'Lo siento, necesitas registrarte (SP $main::myalias para registrarte)',   
+                               e29 => 'Necesitas password', 
+                               e30 => 'No se puede abrir $_[0] $!',
+                               e31 => '$_[0] no es un usuario', 
+                               e32 => 'Se necesita una frase de contraseña',
+  
+                               echoon => 'Eco local activado',
+                               echooff => 'Eco local desactivado',
+                               echow => '*Eco local desactivado, set/echo para activarlo',
+                               emaile1 => 'Por favor introduce tu E-mail, set/email <tu E-mail>',
+                               emaila => 'Tu dirección E-Mail es ahora \"$_[0]\"',
+                               email => 'La dirección E-mail es ahora: $_[0]',
+                               export1 => 'uso: export <numero_mensaje> <nombre_fichero>',
+                               export2 => '$_[3] hubo un error exportando mensaje $_[0] a $_[1] ($_[2])',
+                               export3 => '$_[2 ] exportando mensaje $_[0] a $_[1]',
+                               filter1 => 'Filtro $_[0] actualizado para $_[1]',
+                               filter2 => 'Es necesario un valor para $_[0]',
+                               filter3 => 'No hay filtros definidos para $_[0]',
+                               filter4 => '$_[0]$_[1] Filtros $_[2] borrados para $_[3]',
+                               filter5 => 'Se necesitan algunos comandos para el filtro...',
+                               filter6 => '$_[0]$_[1] Filtro para $[2] no encontrado',
+                               grids => 'Activada recepción de locators en spot (DX Grid) para $_[0]',
+                               gridu => 'Desactivada recepción de locators en spot (DX Grid) para $_[0]',
+                               illcall => 'Lo siento, $_[0] no es un indicativo válido',
+                               hasha => '$_[0] ya existe en $_[1]',
+                               hashb => '$_[0] añadido a $_[1]',
+                               hashc => '$_[0] eliminado desde $_[1]',
+                               hashd => '$_[0] no en $_[1]',
+                               hashe => '$_[0] activado $_[1]',
+                               helpe1 => 'La ayuda no está disponible, comunícaselo al sysop',
+                               helpe2 => 'No hay ayuda disponible para $_[0]',
+                               heres => 'Se informa a la red: $_[0] está presente',
+                               heade1 => 'Usando las coord. de $main::mycall, se recomienda usar set/location o set/qra',
+                               hereu => 'Se informa a la red: $_[0] está ausente',
+                               homebbs => 'Tu  BBS es ahora: $_[0]',
+                               homenode => 'Tu cluster habitual es ahora: $_[0]',
+                               hnodee1 => 'Por favor introduce tu cluster habitual, set/homenode <Tu DX cluster>',
+                               hnodee2 => 'Error al definir homenode en $_[0]',
+                               hnode => 'Tu nodo habitual es ahora \"$_[0]\"',
+                               init1 => 'Enviado mensaje de inicialización a $_[0]',
+                               iso => 'El cluster $_[0] se pone en modo pasivo (Aislado)',
+                               isou => 'El cluster $_[0] se pone en modo activo',
+                               isoc => '$_[0] creado y definido como pasivo (Aislado)',
+                               isoari => 'Existe un filtro de entrada de rutas para $_[0]; clear/route input $_[0] primero',
+                               isoaro => 'Existe un filtro de rutas hacia $_[0]; clear/route $_[0] primero',   
+                               isow => '$_[0] está en modo aislado; unset/isolate $_[0] primero',
+                               l1 => 'Lo siento $_[0], ya estás conectado en otro canal',
+                               l2 => 'Hola $_[0], esta es $main::mycall en $main::myqth usando DXSpider V$main::version',
+                               lang => 'El idioma es ahora Español',
+                               lange1 => 'set/language <idioma> donde <idioma> es uno entre ($_[0])',
+                               lange2 => 'Error al seleccionar idioma en $_[0]',
+                               lh1 => '$main::data/hop_table.pl no existe',
+                               loce1 => 'Por favor introduce tu posición, set/location <latitud longitud>',
+                               loce2 => 'No reconocida \"$_[0]\" como una Lat/Long (ej: 52 20 N 0 16E)',
+                               loce3 => '$_[0] es un QRA locator, por favor usa: set/qra $_[0]',
+                               loc => 'Tu Lat/Long es ahora \"$_[0]\"',
+                               lockout => '$_[0] Excluido del sistema',
+                               lockoutc => '$_[0] Creado y excluido del sistema',
+                               lockoutun => '$_[0] autorizado para conectar',
+                               lockoutuse => 'Uso: sh/lockout <indicativo|prefijo>|ALL',
+                               loginu => '$_[0] conecta',
+                               logoutu => '$_[0] se desconecta',
+                               loginn => '$_[0] conecta',
+                               logoutn => '$_[0] se desconecta',
+                               m1 => 'Introduce el título (máx. 30 caractéres):',
+
+                               m2 => 'Copia del mensaje $_[0] enviada a $_[1]',
+                               m3 => 'Lo siento, $_[0] no se aceptan mensajes a ese tópico',
+                               m4 => 'Lo siento, no se puede acceder al mensaje $_[0]',
+                               m5 => 'Lo siento, se necesita un número de mensaje',
+                               m6 => 'Reenviado a: $_[0]',
+                               m7 => 'Título : $_[0]',
+                               m8 => 'Introduce mensaje. /EX para terminar o /ABORT para interrumpir',
+                               m9 => 'Hay correo nuevo para ti. Bórralo una vez leído.',
+                               m10 => 'mensaje interrumpido',
+                               m11 => 'mensaje nr $_[0] guardado y enviado a $_[1]',
+                               m12 => 'mensaje nr $_[0] borrado',
+                               m13 => 'mensaje nr $_[0] no encontrado',
+                               m14 => 'mensaje nr $_[0] marcado para ser enviado a $_[1]',
+                               m15 => 'mensaje nr $_[0] no se enviará a $_[1]',
+                               m16 => 'Se necesita un número de mensaje',
+                               m17 => 'Lo siento, no puedo enviar el mensaje en $_[0] modo',
+                               msg1 => 'Cola de mensajes tipo Boletín',
+                               msg2 => 'Cola de mensajes tipo Privados',
+                               msg3 => 'Msg $_[0]: $_[1] cambiado de $_[2] a $_[3]',
+                               msgu => 'uso: msg <cmd> <msgno> data...',
+                               merge1 => 'Petición de envío de $_[1] spots y $_[2] WWV enviada a $_[0]',
+                               moon => 'QTH                                   dd/mm/yyyy Salida Puesta',
+                               moon_with_azel => 'QTH                                   dd/mm/yyyy Salida Puesta   Azim   Elev',                                 
+                               mond => 'Activado modo monitor',
+                               mone => 'Desactivado modo monitor',
+                               namee1 => 'Por favor, introduce tu nombre set/name <tu nombre>',
+                               namee2 => 'No se encuentra el usuario $_[0]!',
+                               name => 'Tu nombre es \"$_[0]\"',
+                               nodea => '$_[0] definido como nodo AK1A ',
+                               nodeac => '$_[0] creado como nodo AK1A ',
+                               nodeb => '$_[0] definido como BBS',
+                               nodebc => '$_[0] creado como BBS',
+                               nodec => '$_[0] definido como nodo CLX ',
+                               nodecc => '$_[0] creado como nodo CLX ',
+                               noder => '$_[0] definido como nodo AR-Cluster ',
+                               noderc => '$_[0] creado como nodo AR-Cluster ',
+                               nodes => '$_[0] definido como nodo DXSpider ',
+                               nodesc => '$_[0] creado como nodo DXSpider ',
+                               nodex => '$_[0] definido como nodo DXNET ',
+                               nodexc => '$_[0] creado como nodo DXNET ',
+                               nodeu => '$_[0] es ahora un usuario',
+                               nodee1 => 'No puedes usar este comando mientras tu objetivo ($_[0]) se encuentra',
+                               notdone => 'No se pudo hacer',
+                               nothere => 'Lo siento, pero $_[0] no está aquí ahora, inténtalo mas tarde',
+                               obscount => 'El parámetro Ping obsolescence count para $_[0] ajustado a $_[1]',
+                               ok => 'Operación realizada',
+                               outconn => 'Iniciando conexión con  $_[0]',
+                               page => 'Teclea Enter para continuar, A para abortar (Quedan $_[0] líneas) >',
+                               pagelth => 'La longitud de las páginas es ahora $_[0]',
+                               passerr => 'Por favor usa: SET/PASS <password> <indicativo>',
+                               passphrase => 'Passphrase definida o cambiada para $_[0]',
+                               passphraseu => 'Passphrase borrada para $_[0]',
+
+                               password => 'El Password ha sido definido o cambiado para $_[0]',
+                               passwordu => 'Contraseña borrada para $_[0]',
+                               pc90s => 'PC90 activado para $_[0]',
+                               pc90u => 'PC90 desactivado para $_[0]',
+                               pingo => 'Iniciado el ping a $_[0]',
+                               pingi => 'Ping devuelto por $_[0] $_[1] (Ave $_[2]) segundos',
+                               pinge1 => 'No puedes enviarte un ping a ti mismo!',
+                               pingint => 'Intervalo de ping para $_[0] ajustado a $_[1] segundos',
+                               'pos' => 'Desde el indicativo: $_[0] Lat: $_[1] Long: $_[2]',
+                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',
+                               pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',
+                               prs => 'El Prompt ha sido cambiado a \"$_[0]\"',
+                               pru => 'El Prompt vuelve a ser el normal por defecto',
+                               priv => 'Nivel de privilegios modificado para $_[0]',
+                               prx => '$main::mycall >',
+                               pw0 => 'Escribe el password antiguo: ',
+                               pw1 => 'Escribe el nuevo password: ',
+                               pw2 => 'Confirma el nuevo password: ',
+                               pw3 => 'El Password ha sido cambiado',
+                               pw4 => 'Los passwords no coinciden, NO se han cambiado',
+                               qll => 'Por favor introduce tu locator con set/location o set/qra',
+                               qthe1 => 'Por favor introduce tu QTH, set/qth <tu qth>',
+                               qth => 'Tu QTH es ahora \"$_[0]\"',
+                               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 se reconoce \"$_[0]\" como un QRA locator ( ej JO02LQ)',
+                               qra => 'Tu QRA Locator es ahora \"$_[0]\"',
+                               rcmdo => 'RCMD \"$_[0]\" enviado a $_[1]',
+                               read1 => 'Lo siento, no hay mensajes nuevos para ti',
+                               read2 => 'Mensaje $_[0] no encontrado',
+                               read3 => 'Mensaje $_[0] no disponible',
+                               rec => '$_[0] registros',
+                               reg => '$_[0] registrado',
+                               regc => '$_[0] creado y registrado',
+                               reginac => 'El registro no está activo (set/var \$main::regreq = 1 para activarlo)',
+                               regun => 'El usuario $_[0] no esta registrado',
+                               route => '$_[0] en $_[1] vía $_[2]',
+                               sat1 => 'Tabla de seguimiento $_[0] para las próximas $_[1] horas cada $_[2] minutos',
+                               sat2 => 'dd/mm  UTC      Lat     Lon  Alt Km      Az      El Dist Km',
+                               sat3 => 'Sintaxis: SH/SAT <nombre> [<horas> <intervalo>]',
+                               sat4 => 'Satélites disponibles:',
+                               sat5 => 'Es necesario el título nnnn.AMSAT para actualizar datos keps. desde un mensaje',
+                               satnf => 'Satélite $_[0] desconocido',
+                               satdisc => '-----',
+                               sethop1 => 'uso: set/hops <indicativo> ann|spots|wwv|wcy <nr de hops>',
+                               sethop2 => '$_[0] hops set on $_[1]$_[2] for $_[3]',
+                               sethop3 => 'No hay hops definidos para $_[0]',
+                               shu => '\"SHU\" No es suficiente! Es necesario como mínimo escribir \"SHUT\" para apagar el cluster',
+                               shutting => '$main::mycall shutting down...',
+                               sloc => 'Cluster lat $_[0] long $_[1], NO OLVIDES CAMBIAR TU DXVars.pm',
+                               snode1 => 'Nodo Call   Sort    Versión',
+                               snode2 => '$_[0] $_[1]  $_[2]',
+                               snode3 => '$_[0] Indicativo desconocido',
+                               sqra => 'Cluster QRA Locator$_[0], NO OLVIDES CAMBIAR TU DXVars.pm',
+                               sorry => 'Lo siento',
+                               spf1 => 'spoof: creando nuevo usuario $_[0]',
+                               stathf => 'Estadísticas de spots en HF de los últimos 31 días',
+                               stathft => 'Estadísticas de spots en HF de los últimos 31 días para DXCC $_[0]',
+                               statvhf => 'VHF + DX Spot Stats, últimos 31 días',
+                               statvhft => 'VHF + DX Spot Stats, últimos 31 días para DXCC $_[0]',
+                               statdx => 'Total de Spots de DX en los últimos 31 días',
+                               sun => 'QTH                                   dd/mm/yyyy Salida Puesta',
+                               sun_with_azel => 'QTH                                   dd/mm/yyyy Salida Puesta   Azim   Elev',
+                               susdb1 => 'uso: indicativo estado ciudad',
+                               susdb2 => 'USDB $_[0] era $_[1], $_[2]',
+                               susdb3 => 'USDB $_[0] es ahora $_[1], $_[2]',
+                               susdb4 => 'USDB $_[0] borrado',
+                               suser1 => 'uso: indicativo user_field_name valor',
+                               suser2 => 'Usuario $_[0] no encontrado',
+                               suser3 => 'User field \'$_[0]\' era \'$_[1]\' ahora es \'$_[2]\'',
+                               suser4 => 'User field name \'$_[0]\' no existe',
+                               time1 => 'Horario local: $_[0] $_[1], UTC $_[2]',
+                               time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Horas)',
+                               time3 => '$_[0]  $_[1]',
+                               talks => 'Recepción de mensajes Talk activado para $_[0]',
+                               talku => 'Recepción de mensajes Talk desactivado para $_[0]',
+                               talkend => 'Finalizado modo talk contigo',
+                               talkinst => 'Entrando en modo talk, /EX para salir, /<cmd> para ejecutar un comando',
+                               talknh => 'Lo siento $_[0] no está conectado en este momento',
+                               talkprompt => 'Talk ($_[0])>',
+                               talkstart => 'Iniciando modo talk contigo',
+                               unset => '$_[0] deshabilitado para $_[1]',
+                               unsethop1 => 'uso: unset/hops <call> ann|spots|wwv|wcy',
+                               unsethop2 => 'Borrados los hops para $_[1] en $_[0]', 
+                               usernf => '*** Registro de usuario $_[0] no encontrado ***',
+                               wcy1 => '$_[0] falta o esta fuera de rango',
+                               wcy2 => 'WCY Duplicado',
                       wcys => 'Activada recepción de anuncios WCY para $_[0]',
                     wcyu => 'Desactivada recepción de anuncios WWV para $_[0]',
-                               wwv1 => '$_[0] falta o esta fuera de rango',\r
-                               wwv2 => 'WWV Duplicado',\r
-                               wwvs => 'Activada recepción de anuncios WWV para $_[0]',\r
-                               wwvu => 'Desactivada recepción de anuncios WWV para $_[0]',\r
-                               wxs => 'Activada recepción de anuncios WX para $_[0]',\r
-                               wxu => 'Desactivada recepción de anuncios WX para $_[0]',\r
-                          },\r
-                de => {\r
-                               addr => 'Adresse gesetzt auf: $_[0]',\r
-                               already => '$_[0] bereits connnected',\r
-                               anns => 'Announce flag gesetzt auf $_[0]',\r
-                               annu => 'Announce flag zurueckgesetzt auf $_[0]',\r
-                               annts => 'AnnTalk flag gesetzt auf $_[0]',\r
-                               anntu => 'AnnTalk flag zurueckgesetzt auf $_[0]',\r
-                               badnode1 => '$_[0] ist nun ein bad node',\r
-                               badnode2 => '$_[0] ist nun ein good node',\r
-                               badnode3 => 'Liste der Bad Nodes:-',\r
-                               bbse1 => 'Bitte die BBS Adresse eingeben,, set/bbs <your bbs address>',\r
-                               bbs => 'Deine BBS Adresse ist nun \"$_[0]\"',\r
-                               beepoff => 'Beeps sind nun aus',\r
-                               beepon => 'Beeps sind nun eingeschaltet',\r
-                               call1 => 'Callsign lookup via $_[0]:',\r
-                               conother => 'Sorry $_[0] Du bist zu mir auf einem anderen Port connected',\r
-                               concluster => 'Sorry $_[0] Du bist schon anderswo in einem Cluster connected (on $_[1])',\r
-                               conscript => 'Kein connect script mit Namen \"$_[0]\" gefunden in $main::root/connect',\r
-                               confail => 'Verbindung zu $_[0] misslungen ($_[1])',\r
-                               constart => 'Verbindung zu $_[0] gestartet',\r
-                               deluser => 'User $_[0] wurde geloescht',\r
-                               db1 => 'Diese Datenbank ist untergebracht bei $_[0]',\r
-                               db2 => 'Sorry, aber Scluesselwort: $_[0] wurde nicht gefunden in $_[1]',\r
-                               db3 => 'Sorry, Datenbank $_[0] existiert hier nicht',\r
-                               db4 => 'Sorry, Datenbank $_[0] untergebracht bei $_[1] ist nicht online',\r
-                               db5 => 'Zugriff auf remote Datenbank bei $_[0]...standby...',\r
-                               db6 => 'Datenbank $_[0] existiert bereits, bitte zuerst loeschen',\r
-                               db7 => 'Datenbank $_[0] angelegt fuer remote Cluster $_[1]',\r
-                               db8 => 'Datenbank $_[0] lokal angelegt',\r
-                               db9 => 'Datenbank $_[0] entfernt',\r
-                               db10 => '$_[0] Datensaetze importiert in $_[1]',\r
-                               db11 => 'Sende Deine Anfrage(n)an $_[0], bitte stand by...',\r
-                               dfreq1 => 'Ungueltige Freq $_[0] brauche: z.B. 0/30000 oder hf oderr hf/cw',\r
-                               dir1 => 'Keine Nachricht gefunden',\r
-                               disc1 => 'Disconnected von $_[0]',\r
-                               disc2 => 'Kanal $_[0] disconnected',\r
-                               disc3 => 'Kein Kanal, aber Verbindung $_[0] disconnected',\r
-                               disc4 => 'Kein Kanal oder Verbindung, aber Waise $_[0] disconnected',\r
-                               done => 'Done',\r
-                               dup => 'Sorry, dies ist ein Duplikat',\r
-                               dx1 => 'Frequenz $_[0] nicht im Band (siehe show/band); Gebrauch: DX [BY call] Freq Call Kommentar',\r
-                               dx2 => 'Brauche ein Rufzeichen; Gebrauch: DX [BY call] Freq Call Kommentar',\r
-                               dx3 => 'Das Rufzeichen oder Frequenz ist ungueltig',\r
-                               dxs => 'DX Spots flag gesetzt auf $_[0]',\r
-                               dxu => 'DX Spots flag zurueckgesetzt auf $_[0]',\r
-                               e1 => 'Ungueltiger Befehl',\r
-                               e2 => 'Fehler: $_[0]',\r
-                               e3 => '$_[0]: $_[1] nicht gefunden',\r
-                               e4 => 'Brauche zumindestens einen Prefix oder ein Rufzeichen',\r
-                               e5 => 'Nicht erlaubt',\r
-                               e6 => '*** Keine Station angegeben ***',\r
-                               e7 => 'Rufzeichen $_[0] nicht sichtbar im Cluster',\r
-                               e8 => 'Brauche ein Rufzeichen und etwas Text',\r
-                               e9 => 'Brauche wenigstens etwas Text',\r
-                               e10 => '$_[0] nicht lokal connected',\r
-                               e11 => 'Kann nicht $main:mein Rufzeichen als Ziel',\r
-                               e12 => 'Brauche ein Node Rufzeichen',\r
-                               e13 => '$_[0] ist kein Node',\r
-                               e14 => 'Erstes Argument muss eine Zahl und > 0 sein',\r
-                               e15 => 'Unguelitges Abfragekriterium \"$_[0]\"',\r
-                               e16 => 'Datei \"$_[0]\" existiert',\r
-                               e17 => 'Bitte gebrauche dieses Wort: @_ nicht hier',\r
-                               e18 => 'Kann nicht verbinden mit $_[0] ($!)',\r
-                               e19 => 'Ungueltiger Character in der Zeile',\r
-                               e20 => 'Kuerzel $_[0] nicht erkannt',\r
-                               e21 => '$_[0] nicht numerisch',\r
-                               e22 => '$_[0] kein Rufzeichen',\r
-                               e23 => '$_[0] kein Bereich (z.B. 0/30000)',\r
-                               e24 => 'Sorry, Internet Zugriff ist nichtfreigeschaltet',\r
-\r
-                               e25 => 'Sorry der Wert muss zwischen $_[0] und $_[1] sein',\r
-                               e26 => 'Zu viele Fehler gleichzeitig, Du wirst disconnected',\r
-                               e27 => '$_[0] kein numerisches oder Rufzeichen Prefix',\r
-                               e28 => 'Sorry, Du musst Dich registrieren (SP $main::myalias to register)',\r
-                               e29 => 'Brauche eine Passwort',\r
-                               echoon => 'Echo enabled',\r
-                               echooff => 'Echo disabled',\r
-                               echow => '*Echo ist im moment disabled, set/echo to enable',\r
-                               emaile1 => 'Bitte email Addresse eingeben, set/email <Deine e-mail Adresse>',\r
-                               emaila => 'Deine E-Mail Adresse ist nun \"$_[0]\"',\r
-                               email => 'E-mail Adresse gesetzt auf: $_[0]',\r
-                               export1 => 'Gebrauch: export <msgno> <dateiname>',\r
-                               export2 => '$_[3] has error exporting msg $_[0]to $_[1] ($_[2])',\r
-                               export3 => '$_[2 ] exportierte msg $_[0] to $_[1]',\r
-                               filter1 => 'Filter $_[0] upgedated fuer $_[1]',\r
-                               filter2 => 'Unbekanntes Filter Schluesselwort $_[0]',\r
-                               filter3 => 'Keine Filter definiert fuer $_[0]',\r
-                               filter4 => '$_[0]$_[1] Filter $_[2] geloescht fuer$_[3]',\r
-                               filter5 => 'brauche ein paar Filter Kommandos...',\r
-                               filter6 => '$_[0]$_[1] Filter fuer $[2] nicht gefunden',\r
-                               grids => 'DX Grid flag gesetzt auf $_[0]',\r
-                               gridu => 'DX Grid flag zurueckgesetzt auf $_[0]',\r
-                               illcall => 'Sorry, $_[0] ist ein ungueltiges Rufzeichen',\r
-                               hasha => '$_[0] existiert bereits in $_[1]',\r
-                               hashb => '$_[0] zugefuegt zu $_[1]',\r
-                               hashc => '$_[0] entfernt von $_[1]',\r
-                               hashd => '$_[0] nicht in $_[1]',\r
-                               hashe => '$_[0] gesetzt auf $_[1]',\r
-                               helpe1 => 'Hilfe System nicht verfuegbar, bitte Sysop benachrichtigen',\r
-                               helpe2 => 'Keine Hilfe verfuegbar auf $_[0]',\r
-                               heres => 'Hier gesetzt auf $_[0]',\r
-                               heade1 => 'Using $main::mycall Coords, entspricht einem set/location or set/qra',\r
-                               hereu => 'Here zurueckgesetzt auf $_[0]',\r
-                               homebbs => 'Heimat BBS gesetzt auf: $_[0]',\r
-                               homenode => 'Heimat Node gesetzt auf: $_[0]',\r
-                               hnodee1 => 'Bitte Heimat Node eingeben, set/homenode <dein Heimat DX Cluster>',\r
-                               hnodee2 => 'Heimat Node setzen ist misslungen $_[0]',\r
-                               hnode => 'Dein Heimat Node ist nun \"$_[0]\"',\r
-                               init1 => 'Initialisierungs Nachricht gesendet an $_[0]',\r
-                               iso => '$_[0] Isoliert',\r
-                               isou => '$_[0] UnIsoliert',\r
-                               isoc => '$_[0] erstellt und Isoliert',\r
-                               isoari => 'Es gibt einen  Eingabe Route Filter fuer $_[0]; clear/route input $_[0] zuerst',\r
-                               isoaro => 'Es gibt einen Ausgabe Route Filter fuer $_[0]; clear/route $_[0] zuerst',\r
-                               isow => '$_[0] ist isoliert; unset/isolate $_[0] zuerst',\r
-                               l1 => 'Sorry $_[0], Du bist bereit auf einem anderen Kanal eingeloggt',\r
-                               l2 => 'Moin $_[0], hier ist $main::mycall in $main::myqth\nrunning DXSpider V$main::version build $main::build',\r
-                               lang => 'Sprache ist jetzt Deutch',\r
-                               lange1 => 'set/language <lang> wobei <lang> ist eine von ($_[0])',\r
-                               lange2 => 'Fehler beim setzen der Sprache auf $_[0]',\r
-                               lh1 => '$main::data/hop_table.pl existiert nicht',\r
-                               loce1 => 'Bitte Deinen Standort eingeben,, set/location <latitude longitude>',\r
-                               loce2 => 'Nicht anerkannt \"$_[0]\" als Lat/Long (z.B. 52 20 N 0 16 E)',\r
-                               loce3 => '$_[0] ist ein QRA Locator, gebrauch: set/qra $_[0]',\r
-                               loc => 'Dein Lat/Long ist nun \"$_[0]\"',\r
-                               lockout => '$_[0] ausgesperrt',\r
-                               lockoutc => '$_[0] erstellt und ausgesperrt',\r
-                               lockoutun => '$_[0] Aussperrung aufgehoben',\r
-                               lockoutuse => 'Gebrauch: sh/lockout <Rufzeichen>|ALL',\r
-                               loginu => 'User $_[0] hat eingeloggt',\r
-                               logoutu => 'User $_[0] hat ausgeloggt',\r
-                               loginn => 'Node $_[0] hat eingeloggt',\r
-                               logoutn => 'Node $_[0] hat ausgeloggt',\r
-                               m1 => 'Subjekt eingeben (30 Zeichen):',\r
-                               m2 => 'Kopie der msg $_[0] gesendet an $_[1]',\r
-                               m3 => 'Sorry, $_[0] ist keine akzeptable TO Adresse',\r
-                               m4 => 'Sorry, kann nicht zugreifen auf Nachricht $_[0]',\r
-                               m5 => 'Sorry, ich brauche eine Nachrichten Nummer',\r
-                               m6 => 'Reply to: $_[0]',\r
-                               m7 => 'Subject : $_[0]',\r
-                               m8 => 'Nachricht eingeben, /EX zum absenden oder /ABORT zum abbrechen',\r
-                               m9 => 'Neue Nachricht(en) fuer Dich',\r
-                               m10 => 'Nachricht abgebrochen',\r
-                               m11 => 'Nachricht Nr. $_[0] gesichert und weitergeleitet an $_[1]',\r
-                               m12 => 'Nachricht Nr. $_[0] geloescht',\r
-                               m13 => 'Nachricht Nr. $_[0] fehlt',\r
-                               m14 => 'Nachricht Nr. $_[0] markiert als gesendet an $_[1]',\r
-                               m15 => 'Nachricht Nr. $_[0] unmarkiert als gesendet an $_[1]',\r
-                               m16 => 'Brauche eine Nachrichten Nummer',\r
-                               m17 => 'Sorry, kann Nachricht nicht senden im $_[0] mode',\r
-                               msg1 => 'Bulletin Nachrichten aufgeschoben',\r
-                               msg2 => 'Private Nachrichten aufgeschoben',\r
-                               msg3 => 'Msg $_[0]: $_[1] geaendert von $_[2] auf $_[3]',\r
-                               msgu => 'Gebrauch: msg <cmd> <msgno> data...',\r
-                               merge1 => 'Merge request for $_[1] spots and $_[2] WWV sent to $_[0]',\r
-                               moon => 'Standort                              dd/mm/yyyy Rise   Set',\r
-                               moon_with_azel => 'Standort                              dd/mm/yyyy Rise   Set      Azim   Elev',\r
-                               mond => 'Ueberwachung Disabled',\r
-                               mone => 'Ueberwachung Enabled',\r
-                               namee1 => 'Bitte Deinen Namen eingeben, set/name <dein name>',\r
-                               namee2 => 'Kann User $_[0]nicht finden!',\r
-                               name => 'Dein Name ist jetzt \"$_[0]\"',\r
-                               nodea => '$_[0] gesetzt als AK1A style Node',\r
-                               nodeac => '$_[0] erstellt als AK1A style Node',\r
-                               nodeb => '$_[0] gesetzt als BBS',\r
-                               nodebc => '$_[0] erstellt als BBS',\r
-                               nodec => '$_[0] gesetzt als CLX style Node',\r
-                               nodecc => '$_[0] erstellt als CLX style Node',\r
-                               noder => '$_[0] gesetzt als AR-Cluster style Node',\r
-                               noderc => '$_[0] erstellt als AR-Cluster style Node',\r
-                               nodes => '$_[0] gesetzt als DXSpider style Node',\r
-                               nodesc => '$_[0] erstellt als DXSpider style Node',\r
-                               nodex => '$_[0] gesetzt als DXNET style Node',\r
-                               nodexc => '$_[0] erstellt als DXNET style Node',\r
-                               nodeu => '$_[0] zurueckgesetzt als ein User',\r
-                               nodee1 => 'Du kannst dieses Kommando nicht waehrend Dein Ziel ($_[0]) online ist',\r
-                               notdone => 'Nicht ausgefuehrt',\r
-                               nothere => 'Sorry, aber $_[0] ist nicht hier im Moment, bitte spaeter nocheinmal Versuchen',\r
-                               obscount => 'Ping obsolescence count on $_[0] set to $_[1]',\r
-                               ok => 'Operation erfolgreich',\r
-                               outconn => 'Outstanding connect to $_[0]',\r
-                               page => 'Druecke Enter zum fortfahren, A zum abbrechen ($_[0] lines) >',\r
-                               pagelth => 'Seitenlaenge ist nun $_[0]',\r
-                               passerr => 'Gebrauch: SET/PASS <Passwort> <Rufzeichen>',\r
-                               password => 'Passwort gesetzt oder geaendert fuer $_[0]',\r
-                               passwordu => 'Passwort geloescht fuer $_[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' => 'Von Rufzeichen: $_[0] Lat: $_[1] Long: $_[2]',\r
-                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',\r
-                               pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',\r
-                               priv => 'Priviligierten Level geaendert auf $_[0]',\r
-                               prx => '$main::mycall >',\r
-                               pw0 => 'Altes Passwort eingeben: ',\r
-                               pw1 => 'Neues Passwort eingeben: ',\r
-                               pw2 => 'Wiederhole neues Passwort: ',\r
-                               pw3 => 'Passwort geaendert',\r
-                               pw4 => 'Passwoerter differieren, Passwort NICHT geaendert',\r
-                               qll => 'Bitte gib Deinen QRA Locator ein mit set/location oder set/qra',\r
-                               qthe1 => 'Bitte gib Dein QTH ein mit set/qth <dein qth>',\r
-                               qth => 'Dein QTH ist nun \"$_[0]\"',\r
-                               qrae1 => 'Bitte gib Deinen QRA Locator ein mit set/qra <qra locator> (z.B. set/qra JO44RK)',\r
-                               qrashe1 => 'Bitte einen QRA Locator eingeben, z.B. sh/qra JO02LQ oder sh/qra JO02LQ IO93NS',\r
-                               qrae2 => 'Erkenne nicht \"$_[0]\" als ein QRA Locator (z.B. JO02LQ)',\r
-                               qra => 'Dein QRA Locator ist nun \"$_[0]\"',\r
-                               rcmdo => 'RCMD \"$_[0]\" gesendet an $_[1]',\r
-                               read1 => 'Sorry, keine neuen Nachrichtenfuer Dich',\r
-                               read2 => 'Msg $_[0] nicht gefunden',\r
-                               read3 => 'Msg $_[0] nicht verfuegbar',\r
-                               rec => '$_[0] records',\r
-                               reg => '$_[0] registriert',\r
-                               regc => '$_[0] erstellt und registriert',\r
-                               reginac => 'Registrierung ist nicht aktiv (set/var \$main::reqreg = 1 to activate)',\r
-                               regun => '$_[0] unregistriert',\r
-                               route => '$_[0] auf $_[1] via $_[2]',\r
-                               sat1 => 'Tracking Tabelle fuer $_[0] fuer den naechsten $_[1] Stunden alle $_[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 => 'Satelliten verfuegbar:-',\r
-                               satnf => 'Satellit $_[0] unbekannt',\r
-                               satdisc => '-----',\r
-                               sethop1 => 'Gebrauch: set/hops <Rufzeichen> ann|spots|wwv|wcy <Anzahl der Hops>',\r
-                               sethop2 => '$_[0] hops gesetzt auf $_[1]$_[2] fuer $_[3]',\r
-                               sethop3 => 'Keine hops gesetzt fuer $_[0]',\r
-                               shutting => '$main::mycall shutting down...',\r
-                               sloc => 'Cluster lat $_[0] long $_[1], Nicht vergessen die DXVars.pm zu aendern',\r
-                               snode1 => 'Node Call   Sort    Version',\r
-                               snode2 => '$_[0] $_[1]  $_[2]',\r
-                               snode3 => '$_[0] Unbekanntes Rufzeichen',\r
-                               sqra => 'Cluster QRA Locator$_[0], Nicht vergessen die DXVars.pm zu aendern',\r
-                               sorry => 'Sorry',\r
-                               spf1 => 'spoof: erzeuge neuen User $_[0]',\r
-                               stathf => 'HF DX Spot Stats, letzte 31 Tage',\r
-                               stathft => 'HF DX Spot Stats, letzte 31 Tage fuer DXCC $_[0]',\r
-                               statvhf => 'VHF+ DX Spot Stats, letzte 31 Tage',\r
-                               statvhft => 'VHF+ DX Spot Stats, letzte 31 Tage fuer DXCC $_[0]',\r
-                               statdx => 'Total DX Spots letzte 31 Tage',\r
-                               sun => 'Location                              dd/mm/yyyy Rise   Set',\r
-                               sun_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',\r
-                               suser1 => 'Gebrauch: Rufzeichen user_field_name value',\r
-                               suser2 => 'User $_[0] nicht gefunden',\r
-                               suser3 => 'User Feld \'$_[0]\' war \'$_[1]\' nun gesetzt auf \'$_[2]\'',\r
-                               suser4 => 'User Feld name \'$_[0]\' existiert nicht',\r
-                               time1 => 'Lokala Zeit: $_[0] $_[1], UTC $_[2]',\r
-                               time2 => '$_[0] Lokale (standard) Zeit: $_[1] ($_[2] Stunden)',\r
-                               time3 => '$_[0]  $_[1]',\r
-                               talks => 'Talk flag gesetzt auf $_[0]',\r
-                               talku => 'Talk flag zurueckgesetzt auf $_[0]',\r
-                               talkend => 'Beendet Talk zu Dir',\r
-                               talkinst => 'Talkmode, /EX zum beenden, /<cmd> um ein Kommando auszufuehren',\r
-                               talknh => 'Sorry $_[0] ist im moment nicht online',\r
-                               talkprompt => 'Talk ($_[0])>',\r
-                               talkstart => 'Startet Talkmode zu Dir',\r
-                               usernf => '*** User Satz fuer $_[0] nicht gefunden ***',\r
-                               wwvs => 'WWV flag gesetzt auf $_[0]',\r
-                               wwvu => 'WWV flag zurueckgesetzt auf $_[0]',\r
-                               wxs => 'WX flag gesetzt auf $_[0]',\r
-                               wxu => 'WX flag zurueckgesetzt auf $_[0]',\r
-                          },\r
-                it => {\r
-                               addr => 'Indirizzo impostato a: $_[0]',\r
-            already => '$_[0] e\' connesso',\r
-                               anns => 'Annunci attivati alle_[0]',\r
-                               annu => 'Annunci disattivati alle $_[0]',\r
-                               annts => 'Talk attivato alle $_[0]',\r
-                               anntu => 'Talk disattivato alle $_[0]',\r
-                               badnode1 => '$_[0] e\' un nodo disabilitato',\r
-                               badnode2 => '$_[0] e\' un nodo attivo',\r
-                               badnode3 => 'Lista dei nodi disabilitati:-',\r
-                               bbse1 => 'Per favore inserisci l\'indirizzo del tuo BBS con set/bbs <tuo bbs>',\r
-                               bbs => 'Il tuo BBS e\' ora \"$_[0]\"',\r
-                               beepoff => 'I beep sono disattivati',\r
-                               beepon => 'I beep sono attivati',\r
-                               call1 => 'Ricerca del nominativo via $_[0]:',\r
-                               conother => 'Spiacente $_[0] sei connesso già su un\'altra porta',\r
-                               concluster => 'Spiacente $_[0] sei connesso già alla rete cluster (su $_[1])',\r
-                               conscript => 'nessuno script di connessione chiamato \"$_[0]\" trovato in $main::root/connect',\r
-                               confail => 'connessione a $_[0] fallita ($_[1])',\r
-                               constart => 'connessione a $_[0] iniziata',\r
-                               deluser => 'L\'utente $_[0] e\' stato eliminato',\r
-                               db1 => 'Questo database e\' presso $_[0]',\r
-                               db2 => 'Spiacente, ma la chiave: $_[0] non e\' stata trovata in $_[1]',\r
-                               db3 => 'Spiacente, il database $_[0] non esiste qui',\r
-                               db4 => 'Spiacente, il database $_[0] presso $_[1] non e\' disponibile al momento',\r
-                               db5 => 'Sto accedendo al database remoto presso $_[0]...attendere...',\r
-                               db6 => 'Il database $_[0] esiste già, cancellalo prima',\r
-                               db7 => 'Il database $_[0] e\' stato creato per il nodo remoto $_[1]',\r
-                               db8 => 'Il database $_[0] e\' stato creato localmente',\r
-                               db9 => 'Il database $_[0] e\' stato eliminato',\r
-                               db10 => '$_[0] record importati in $_[1]',\r
-                               db11 => 'Sto inviando le tue richieste a $_[0], attendi...',\r
-                               dfreq1 => 'Frequenza non valida $_[0], deve essere del tipo 0/30000 o hf o hf/cw', \r
-                               dir1 => 'Nessun messaggio trovato',\r
-                               disc1 => 'Disconnesso da $_[0]',\r
-                               disc2 => 'Canalew $_[0] disconnesso',\r
-                               disc3 => 'Nessun canale, ma la connessione $_[0] disconnessa',\r
-                               disc4 => 'Nessun canale o connessione ma $_[0] disconnesso',\r
-                               done => 'Fatto',\r
-                               dup => 'Spiacente, questo e\' un doppione',\r
-                               dx1 => 'Frequenza $_[0] non nella banda (controlla show/band); sintassi: DX [BY nominativo] freq nominativo commento',\r
-                               dx2 => 'Serve un nominatico; sintassi: DX [BY nominativo] freq nominativo commento',\r
-                               dx3 => 'Il nominativo o la frequenza sono errati',\r
-                               dxs => 'DX Spots attivati alle $_[0]',\r
-                               dxu => 'DX Spots disattivati alle $_[0]',\r
-                               e1 => 'Comando errato',\r
-                               e2 => 'Errore: $_[0]',\r
-                               e3 => '$_[0]: $_[1] non trovato',\r
-                               e4 => 'Inserire un prefisso o un nominativo',\r
-                               e5 => 'Non permesso',\r
-                               e6 => '*** Nessuna stazione specificata ***',\r
-                               e7 => 'il nominativo $_[0] non e\' visibile sul cluster',\r
-                               e8 => 'Inserire un nominativo o del testo',\r
-                               e9 => 'Inserire del testo',\r
-                               e10 => '$_[0] non connesso localmente',\r
-                               e11 => 'Impossibile usare $main:mycall come destinazione',\r
-                               e12 => 'Inserire il nominativo di un nodo',\r
-                               e13 => '$_[0] non e\' un nodo',\r
-                               e14 => 'Il primo argomento deve essere numerico e > 0',\r
-                               e15 => 'qualificatore non valido \"$_[0]\"',\r
-                               e16 => 'Il file \"$_[0]\" esiste',\r
-                               e17 => 'Non usare le parole: @_ qui', \r
-                               e18 => 'Impossibile connettere $_[0] ($!)',\r
-                               e19 => 'Carattere non valido nella linea',\r
-                               e20 => 'separatore $_[0] non riconosciuto',\r
-                               e21 => '$_[0] non e\' numerico',\r
-                               e22 => '$_[0] non e\' un nominativo',\r
-                               e23 => '$_[0] non e\' un intervallo (es 0/30000)', \r
-                               e24 => 'Spiacente, l\'accesso ad internet non e\' abilitato',\r
-                               e25 => 'Spiacente il valore deve essere tra $_[0] e $_[1]',\r
-                               e26 => 'Troppi errori, stai per essere disconnesso',\r
-                               e27 => '$_[0] non e\' un prefisso numeroco o di nominativo', \r
-                               e28 => 'Spiacente, devi essere registrato  (SP $main::myalias per registrarti)',\r
-                               e29 => 'E\' necessaria una password',\r
-\r
-                               echoon => 'Echo abilitato',\r
-                               echooff => 'Echo disabilitato',\r
-                               echow => '*Echo e\' al momento disabilitato, usa set/echo per abilitarlo',\r
-                               emaile1 => 'Per favore inserisci il tuo indirizzo email con: set/email <indirizzo>',\r
-                               emaila => 'Il tuo indirizzo email e\' ora \"$_[0]\"',\r
-                               email => 'Indirizzo email impostato a: $_[0]',\r
-                               export1 => 'sintassi: export <num_mess> <nome_file>',\r
-                               export2 => '$_[3] ha problemi esportando i messaggi da $_[0] a $_[1] ($_[2])',\r
-                               export3 => '$_[2 ] messaggi esportati da $_[0] a $_[1]',\r
-                               filter1 => 'Filtro $_[0] aggiornato per $_[1]',\r
-                               filter2 => 'Chiave sconosciuta per il filtro $_[0]',\r
-                               filter3 => 'Nessun filtro definito per $_[0]',\r
-                               filter4 => '$_[0]$_[1] Filtro $_[2] cancellato per $_[3]',\r
-                               filter5 => 'necessito qualche comando per i filtri...',\r
-                               filter6 => '$_[0]$_[1] Filtro per $[2] non trovato',\r
-                               grids => 'DX Grid attivato alle $_[0]',\r
-                               gridu => 'DX Grid disattivato alle $_[0]',\r
-                               illcall => 'Spiacente, $_[0] non e\' un nominativo valido',\r
-                               hasha => '$_[0] già esiste $_[1]',\r
-                               hashb => '$_[0] aggiunto a $_[1]',\r
-                               hashc => '$_[0] rimosso da $_[1]',\r
-                               hashd => '$_[0] non in $_[1]', \r
-                               hashe => '$_[0] impostato a $_[1]', \r
-                               helpe1 => 'Aiuto non disponibile, contatta il sysop',\r
-                               helpe2 => 'Nessun aiuto per $_[0]',\r
-                               heres => 'Here abilitato per $_[0]',\r
-                               heade1 => 'Sto usando le coordinate $main::mycall, e\' preferibile impostarle con set/location o set/qra',\r
-                               hereu => 'Here disattivato per $_[0]',\r
-                               homebbs => 'Home BBS impostata a: $_[0]',\r
-                               homenode => 'Home Node impostato a: $_[0]',\r
-                               hnodee1 => 'Per piacere imposta il tuo Home Node con set/homenode <nominativo_cluster>',\r
-                               hnodee2 => 'Impostazione dell\'homenode fallita per $_[0]',\r
-                               hnode => 'Il tuo Homenode e\' adesso \"$_[0]\"',\r
-                               init1 => 'inizializzaione inviata a $_[0]',\r
-                               iso => '$_[0] Isolato',\r
-                               isou => '$_[0] non Isolato',\r
-                               isoc => '$_[0] creato ed isolato',\r
-                               isoari => 'c\'e\' una filtro sulla rotta in ingresso per $_[0]; eliminala con clear/route input $_[0] prima',\r
-                               isoaro => 'c\'e\' una filtro sulla rotta in uscita per $_[0]; eliminala con clear/route $_[0] prima',\r
-                               isow => '$_[0] e\' isolato; unset/isolate $_[0] prima',\r
-                               l1 => 'Spiacente $_[0], sei già collegato sun un altro canale',\r
-                               l2 => 'Benvenuto $_[0] sul Cluster $main::mycall a $main::myqth\nsoftware in uso DXSpider V$main::version build $main::build',\r
-                               lang => 'La lingua selezionata e\' adesso Italiano',\r
-                               lange1 => 'set/language <lingua> dove <lingua> e\' una tra ($_[0])',\r
-                               lange2 => 'impostazione lingua fallita per $_[0]', \r
-                               lh1 => '$main::data/hop_table.pl non esiste',\r
-                               loce1 => 'Per piacere inserisci la tua posizione, set/location <latitudine longitudine>',\r
-                               loce2 => 'Non riconosco \"$_[0]\" come Lat/Long (es 52 20 N 0 16 E)',\r
-                               loce3 => '$_[0] e\' una locatore QRA, usa: set/qra $_[0]',\r
-                               loc => 'I tuoi dati Lat/Long sono ora \"$_[0]\"',\r
-                               lockout => '$_[0] Bloccato',\r
-                               lockoutc => '$_[0] Creato e bloccato',\r
-                               lockoutun => '$_[0] Sbloccato',\r
-                               lockoutuse => 'sintassi: sh/lockout <nominativo>|ALL',\r
-                               loginu => 'L\'utente $_[0] e\' entrato nel cluster',\r
-                               logoutu => 'L\'utente $_[0] e\' uscito dal cluster',\r
-                               loginn => 'Il nodo $_[0] si e\' connesso',\r
-                               logoutn => 'Il nodo $_[0] si e\' disconnesso',\r
-                               m1 => 'Inserisci il Soggetto (30 caratteri):',\r
-                               m2 => 'Copia del messaggio $_[0] spedita a $_[1]',\r
-                               m3 => 'Spiacente, $_[0] non e\' un destinatario accettabile',\r
-                               m4 => 'Spiacente, non posso accedere al messaggio $_[0]',\r
-                               m5 => 'Spiacente, ho bisogno del numero di un messaggio', \r
-                               m6 => 'Rispondi a: $_[0]',\r
-                               m7 => 'Soggetto : $_[0]',\r
-                               m8 => 'Scrivi il messaggio e batti /EX per spedirlo o /ABORT per uscire',\r
-                               m9 => 'Nuovi messaggi sono arrivati per te',\r
-                               m10 => 'Messaggio abortito',\r
-                               m11 => 'Il messaggio $_[0] e\' stato salvato e inviato a $_[1]',\r
-                               m12 => 'Il messaggio $_[0] e\' stato cancellato',\r
-                               m13 => 'Il messaggio $_[0] non esiste',\r
-                               m14 => 'Il messaggio $_[0] e\' stato marcato come spedito a $_[1]',\r
-                               m15 => 'Il messaggio $_[0] risolta ora non spedito a $_[1]',\r
-                               m16 => 'Specificare il numero del messaggio',\r
-                               m17 => 'Spiacente, impossibile spedire messaggi in modo $_[0]',\r
-            msg1 => 'Bollettino messo in coda',\r
-            msg2 => 'Messaggio messo in coda',\r
-                               msg3 => 'Msg $_[0]: $_[1] cambiato da $_[2] a $_[3]',\r
-                               msgu => 'sintassi: msg <comando> <num_mess> dati...',\r
-                               merge1 => 'Richiesta di merge per gli spot $_[1] e i WWV $_[2] spedita a $_[0]',\r
-                               moon => 'Localita                              gg/mm/aaaa Alba   Tramonto',\r
-                               moon_with_azel => 'Località \r
-                                        gg/mm/aaaa Alba   Tramonto Azim   Elev',\r
-                               mond => 'Monitor disabilitato',\r
-                               mone => 'Monitor abilitato',\r
-                               namee1 => 'Per favore inserisci con set/name <nome>',\r
-                               namee2 => 'Impossibile trovare l\'utente $_[0]!',\r
-                               name => 'Il tuo nome ora e\' \"$_[0]\"',\r
-                               nodea => '$_[0] impostato come nodo stile AK1A',\r
-                               nodeac => '$_[0] creato come nodo stile AK1A',\r
-                               nodeb => '$_[0] impostato come BBS',\r
-                               nodebc => '$_[0] creato come BBS',\r
-                               nodec => '$_[0] impostato come nodo stile CLX',\r
-                               nodecc => '$_[0] creato come nodo stile CLX',\r
-                               noder => '$_[0] impostato come nodo stile AR-Cluster',\r
-                               noderc => '$_[0] creato come nodo stile AR-Cluster',\r
-                               nodes => '$_[0] impostato come nodo stile DXSpider',\r
-                               nodesc => '$_[0] creato come nodo stile DXSpider',\r
-                               nodex => '$_[0] impostato come nodo stile DXNET',\r
-                               nodexc => '$_[0] creato come nodo stile DXNET',\r
-                               nodeu => '$_[0] impostato come utente',\r
-                               nodee1 => 'Non puoi utilizzare questo comando mentre il destinatario ($_[0]) e\' connesso',\r
-                               notdone => 'Non eseguito',\r
-                               nothere => 'Spiacente, ma $_[0] non e\' presente al momento, prova più tardi', \r
-                               obscount => 'Contatore di obsolescenza del ping per $_[0] impostato a $_[1]',\r
-                               ok => 'Operazione eseguita con successo',\r
-                               outconn => 'Connessione in corso per $_[0]',\r
-                               page => 'Premi Invio per continuare, A per annullare ($_[0] linee) >',\r
-                               pagelth => 'La lunghezza della pagina e\' adesso $_[0]',\r
-                               passerr => 'sintassi: SET/PASS <password> <nominativo>',\r
-                               password => 'Password impostata o cambiata per $_[0]',\r
-                               passwordu => 'Password rimossa per $_[0]',\r
-                               pingo => 'Ping mandato a $_[0]',\r
-                               pingi => 'Ping ritornato da $_[0] $_[1] (media $_[2]) secondi',\r
-                               pinge1 => 'Non puoi far un ping su te stesso!',\r
-                               pingint => 'Intervallo di ping per $_[0] impostato a $_[1] secondi',\r
-                               'pos' => 'Dal nominativo: $_[0] Lat: $_[1] Long: $_[2]',\r
-                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',\r
-                               pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',\r
-                               priv => 'Privilegi cambiati per $_[0]',\r
-                               prs => 'Prompt impostato a \"$_[0]\"',\r
-                               pru => 'Prompt reimpostato al predefinito',\r
-                               prx => '$main::mycall >',\r
-                               pw0 => 'Inserisci la vecchia password: ',\r
-                               pw1 => 'Inserisci la nuova password: ',\r
-                               pw2 => 'Reinserisci la nuova password: ',\r
-                               pw3 => 'Password modificata',\r
-                               pw4 => 'Le password sono differenti, password NON cambiata',\r
-                               qll => 'Per favore inserisci la tua località con set/location o set/qra',\r
-                               qthe1 => 'Per favore inserisci il tuo QTH con set/qth <qth>',\r
-                               qth => 'Il tuo QTH e\' adesso \"$_[0]\"',\r
-                               qrae1 => 'Per favore inserisci il tuo locatore QRA con set/qra <locatore> (es set/qra JM77GF)',\r
-                               qrashe1 => 'Please enter a QRA locator, eg sh/qra JO02LQ or sh/qra JO02LQ IO93NS',\r
-                               qrae2 => 'Non riconosco \"$_[0]\" come locatore QRA (es JM77GF)',\r
-                               qra => 'Il tuo locatore QRA e\' adesso \"$_[0]\"',\r
-                               rcmdo => 'RCMD \"$_[0]\" spedito a $_[1]',\r
-                               rec => '$_[0] records',\r
-                               read1 => 'Spiacente, non ci sono nuovi messaggi per te',\r
-                               read2 => 'Messaggio $_[0] non trovato',\r
-                               read3 => 'Messaggio $_[0] non disponibile',\r
-                               rec => '$_[0] records',\r
-                               reg => '$_[0] registrato',\r
-                               regc => '$_[0] creato e registrato',\r
-                               reginac => 'La registrazione non e\' attiva (set/var \$main::reqreg = 1 per attivarla)',\r
-                               regun => '$_[0] deregistrato',\r
-                               route => '$_[0] su $_[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 => 'Sintassi: SH/SAT <nome> [<ore> <intervallo>]',\r
-                               sat4 => 'Satelliti disponibili/Età dei Kepleriani (giorni):-',\r
-                               sat5 => 'serve nnnnn.AMSAT nel soggetto per caricare i kepleriani dal messaggio',\r
-                               satnf => 'Satellite $_[0] sconosciuto',\r
-                               satdisc => '-----',\r
-                               sethop1 => 'sintassi: set/hops <nominativo> ann|spots|wwv|wcy <num di salti>',\r
-                               sethop2 => '$_[0] salti impostai per $_[1]$_[2] per $_[3]', \r
-                               sethop3 => 'Nessun salto impostato per $_[0]', \r
-                               shutting => '$main::mycall si sta arrestando...',\r
-                               sloc => 'Cluster lat $_[0] long $_[1], Non scordare di camberli nel file DXVars.pm',\r
-                               snode1 => 'Nodo Nominativo Ordine    Versione',\r
-                               snode2 => '$_[0] $_[1]  $_[2]',\r
-                               snode3 => '$_[0] Nominativo sconosciuto',\r
-                               sqra => 'Locatore QRA del Cluster$_[0], NON DIMENTICARE DI CAMBIARLO NEL TUO FILE DXVars.pm',\r
-                               sorry => 'Spiacente',\r
-                               spf1 => 'spoof: sto creando il nuovo utente $_[0]',\r
-                               stathf => 'Statistiche HF DX Spot, ultimi 31 giorni',\r
-                               stathft => 'Statistiche HF DX Spot, ultimi 31 giorni per DXCC $_[0]',\r
-                               statvhf => 'Statistiche VHF+ DX Spot, ultimi 31 giorni',\r
-                               statvhft => 'Statistiche VHF+ DX Spot, ultimi 31 days per DXCC $_[0]',\r
-                               statdx => 'Totale DX Spots degli ultimi 31 giorni',\r
-                               sun => 'Località                              gg/mm/aaaa Alba   Tramonto',\r
-                               sun_with_azel => 'Località\r
-                                       gg/mm/aaaa Alba   Tramonto Azim   Elev',\r
-\r
-                               suser1 => 'sintassi: nominatio campo_utente valore',\r
-                               suser2 => 'Utente $_[0] non trovato',\r
-                               suser3 => 'Il campo utente \'$_[0]\' era \'$_[1]\' ora e\' impostao a \'$_[2]\'',\r
-                               suser4 => 'Il campo utente \'$_[0]\' non esiste',\r
-                               time1 => 'Ora locale: $_[0] $_[1], UTC $_[2]',\r
-                               time2 => '$_[0] Ora (standard) locale: $_[1] ($_[2] ore)',\r
-                               time3 => '$_[0]  $_[1]',\r
-                               talks => 'Talk abilitato per $_[0]',\r
-                               talku => 'Talk disabilitato per $_[0]',\r
-                               talkend => 'Chiude il la conversazione con te',\r
-                               talkinst => 'Stai entrando nel modo conversazione, /EX per uscire, /<cmd> per eseguire un comando',\r
-                               talknh => 'Spiaente $_[0] non e\' collegato al momento',\r
-                               talkprompt => 'Talk ($_[0])>',\r
-                               talkstart => 'Inizia una conversazione con te',\r
-                               unsethop1 => 'sintassi: unset/hops <nominativo> ann|spots|wwv|wcy',\r
-                               unsethop2 => 'salti eliminati su $_[1] per $_[0]',\r
-                               usernf => '*** Record utente per $_[0] non trovato ***',\r
-                               wcy1 => '$_[0] manca o e\' fuori limite',\r
-                               wcy2 => 'WCY duplicato',\r
-                               wwv1 => '$_[0] manca o e\' fuori limite',\r
-                               wwv2 => 'WWV duplicato',\r
-                               wwvs => 'WWV abilitati per $_[0]',\r
-                               wwvu => 'WWV disabilitati per $_[0]',\r
-                               wxs => 'WX abilitati per $_[0]',\r
-                               wxu => 'WX disabilitati per $_[0]',\r
-               }\r
-);\r
-\r
+                               wwv1 => '$_[0] falta o esta fuera de rango',
+                               wwv2 => 'WWV Duplicado',
+                               wwvs => 'Activada recepción de anuncios WWV para $_[0]',
+                               wwvu => 'Desactivada recepción de anuncios WWV para $_[0]',
+                               wxs => 'Activada recepción de anuncios WX para $_[0]',
+                               wxu => 'Desactivada recepción de anuncios WX para $_[0]',
+                          },
+                de => {
+                               addr => 'Adresse gesetzt auf: $_[0]',
+                               already => '$_[0] bereits connnected',
+                               anns => 'Announce flag gesetzt auf $_[0]',
+                               annu => 'Announce flag zurueckgesetzt auf $_[0]',
+                               annts => 'AnnTalk flag gesetzt auf $_[0]',
+                               anntu => 'AnnTalk flag zurueckgesetzt auf $_[0]',
+                               badnode1 => '$_[0] ist nun ein bad node',
+                               badnode2 => '$_[0] ist nun ein good node',
+                               badnode3 => 'Liste der Bad Nodes:-',
+                               bbse1 => 'Bitte die BBS Adresse eingeben,, set/bbs <your bbs address>',
+                               bbs => 'Deine BBS Adresse ist nun \"$_[0]\"',
+                               beepoff => 'Beeps sind nun aus',
+                               beepon => 'Beeps sind nun eingeschaltet',
+                               call1 => 'Callsign lookup via $_[0]:',
+                               conother => 'Sorry $_[0] Du bist zu mir auf einem anderen Port connected',
+                               concluster => 'Sorry $_[0] Du bist schon anderswo in einem Cluster connected (on $_[1])',
+                               conscript => 'Kein connect script mit Namen \"$_[0]\" gefunden in $main::root/connect',
+                               confail => 'Verbindung zu $_[0] misslungen ($_[1])',
+                               constart => 'Verbindung zu $_[0] gestartet',
+                               deluser => 'User $_[0] wurde geloescht',
+                               db1 => 'Diese Datenbank ist untergebracht bei $_[0]',
+                               db2 => 'Sorry, aber Scluesselwort: $_[0] wurde nicht gefunden in $_[1]',
+                               db3 => 'Sorry, Datenbank $_[0] existiert hier nicht',
+                               db4 => 'Sorry, Datenbank $_[0] untergebracht bei $_[1] ist nicht online',
+                               db5 => 'Zugriff auf remote Datenbank bei $_[0]...standby...',
+                               db6 => 'Datenbank $_[0] existiert bereits, bitte zuerst loeschen',
+                               db7 => 'Datenbank $_[0] angelegt fuer remote Cluster $_[1]',
+                               db8 => 'Datenbank $_[0] lokal angelegt',
+                               db9 => 'Datenbank $_[0] entfernt',
+                               db10 => '$_[0] Datensaetze importiert in $_[1]',
+                               db11 => 'Sende Deine Anfrage(n)an $_[0], bitte stand by...',
+                               dfreq1 => 'Ungueltige Freq $_[0] brauche: z.B. 0/30000 oder hf oderr hf/cw',
+                               dir1 => 'Keine Nachricht gefunden',
+                               disc1 => 'Disconnected von $_[0]',
+                               disc2 => 'Kanal $_[0] disconnected',
+                               disc3 => 'Kein Kanal, aber Verbindung $_[0] disconnected',
+                               disc4 => 'Kein Kanal oder Verbindung, aber Waise $_[0] disconnected',
+                               done => 'Done',
+                               dup => 'Sorry, dies ist ein Duplikat',
+                               dx1 => 'Frequenz $_[0] nicht im Band (siehe show/band); Gebrauch: DX [BY call] Freq Call Kommentar',
+                               dx2 => 'Brauche ein Rufzeichen; Gebrauch: DX [BY call] Freq Call Kommentar',
+                               dx3 => 'Das Rufzeichen oder Frequenz ist ungueltig',
+                               dxs => 'DX Spots flag gesetzt auf $_[0]',
+                               dxu => 'DX Spots flag zurueckgesetzt auf $_[0]',
+                               e1 => 'Ungueltiger Befehl',
+                               e2 => 'Fehler: $_[0]',
+                               e3 => '$_[0]: $_[1] nicht gefunden',
+                               e4 => 'Brauche zumindestens einen Prefix oder ein Rufzeichen',
+                               e5 => 'Nicht erlaubt',
+                               e6 => '*** Keine Station angegeben ***',
+                               e7 => 'Rufzeichen $_[0] nicht sichtbar im Cluster',
+                               e8 => 'Brauche ein Rufzeichen und etwas Text',
+                               e9 => 'Brauche wenigstens etwas Text',
+                               e10 => '$_[0] nicht lokal connected',
+                               e11 => 'Kann nicht $main:mein Rufzeichen als Ziel',
+                               e12 => 'Brauche ein Node Rufzeichen',
+                               e13 => '$_[0] ist kein Node',
+                               e14 => 'Erstes Argument muss eine Zahl und > 0 sein',
+                               e15 => 'Unguelitges Abfragekriterium \"$_[0]\"',
+                               e16 => 'Datei \"$_[0]\" existiert',
+                               e17 => 'Bitte gebrauche dieses Wort: @_ nicht hier',
+                               e18 => 'Kann nicht verbinden mit $_[0] ($!)',
+                               e19 => 'Ungueltiger Character in der Zeile',
+                               e20 => 'Kuerzel $_[0] nicht erkannt',
+                               e21 => '$_[0] nicht numerisch',
+                               e22 => '$_[0] kein Rufzeichen',
+                               e23 => '$_[0] kein Bereich (z.B. 0/30000)',
+                               e24 => 'Sorry, Internet Zugriff ist nichtfreigeschaltet',
+
+                               e25 => 'Sorry der Wert muss zwischen $_[0] und $_[1] sein',
+                               e26 => 'Zu viele Fehler gleichzeitig, Du wirst disconnected',
+                               e27 => '$_[0] kein numerisches oder Rufzeichen Prefix',
+                               e28 => 'Sorry, Du musst Dich registrieren (SP $main::myalias to register)',
+                               e29 => 'Brauche eine Passwort',
+                               echoon => 'Echo enabled',
+                               echooff => 'Echo disabled',
+                               echow => '*Echo ist im moment disabled, set/echo to enable',
+                               emaile1 => 'Bitte email Addresse eingeben, set/email <Deine e-mail Adresse>',
+                               emaila => 'Deine E-Mail Adresse ist nun \"$_[0]\"',
+                               email => 'E-mail Adresse gesetzt auf: $_[0]',
+                               export1 => 'Gebrauch: export <msgno> <dateiname>',
+                               export2 => '$_[3] has error exporting msg $_[0]to $_[1] ($_[2])',
+                               export3 => '$_[2 ] exportierte msg $_[0] to $_[1]',
+                               filter1 => 'Filter $_[0] upgedated fuer $_[1]',
+                               filter2 => 'Unbekanntes Filter Schluesselwort $_[0]',
+                               filter3 => 'Keine Filter definiert fuer $_[0]',
+                               filter4 => '$_[0]$_[1] Filter $_[2] geloescht fuer$_[3]',
+                               filter5 => 'brauche ein paar Filter Kommandos...',
+                               filter6 => '$_[0]$_[1] Filter fuer $[2] nicht gefunden',
+                               grids => 'DX Grid flag gesetzt auf $_[0]',
+                               gridu => 'DX Grid flag zurueckgesetzt auf $_[0]',
+                               illcall => 'Sorry, $_[0] ist ein ungueltiges Rufzeichen',
+                               hasha => '$_[0] existiert bereits in $_[1]',
+                               hashb => '$_[0] zugefuegt zu $_[1]',
+                               hashc => '$_[0] entfernt von $_[1]',
+                               hashd => '$_[0] nicht in $_[1]',
+                               hashe => '$_[0] gesetzt auf $_[1]',
+                               helpe1 => 'Hilfe System nicht verfuegbar, bitte Sysop benachrichtigen',
+                               helpe2 => 'Keine Hilfe verfuegbar auf $_[0]',
+                               heres => 'Hier gesetzt auf $_[0]',
+                               heade1 => 'Using $main::mycall Coords, entspricht einem set/location or set/qra',
+                               hereu => 'Here zurueckgesetzt auf $_[0]',
+                               homebbs => 'Heimat BBS gesetzt auf: $_[0]',
+                               homenode => 'Heimat Node gesetzt auf: $_[0]',
+                               hnodee1 => 'Bitte Heimat Node eingeben, set/homenode <dein Heimat DX Cluster>',
+                               hnodee2 => 'Heimat Node setzen ist misslungen $_[0]',
+                               hnode => 'Dein Heimat Node ist nun \"$_[0]\"',
+                               init1 => 'Initialisierungs Nachricht gesendet an $_[0]',
+                               iso => '$_[0] Isoliert',
+                               isou => '$_[0] UnIsoliert',
+                               isoc => '$_[0] erstellt und Isoliert',
+                               isoari => 'Es gibt einen  Eingabe Route Filter fuer $_[0]; clear/route input $_[0] zuerst',
+                               isoaro => 'Es gibt einen Ausgabe Route Filter fuer $_[0]; clear/route $_[0] zuerst',
+                               isow => '$_[0] ist isoliert; unset/isolate $_[0] zuerst',
+                               l1 => 'Sorry $_[0], Du bist bereit auf einem anderen Kanal eingeloggt',
+                               l2 => 'Moin $_[0], hier ist $main::mycall in $main::myqth\nrunning DXSpider V$main::version build $main::build',
+                               lang => 'Sprache ist jetzt Deutch',
+                               lange1 => 'set/language <lang> wobei <lang> ist eine von ($_[0])',
+                               lange2 => 'Fehler beim setzen der Sprache auf $_[0]',
+                               lh1 => '$main::data/hop_table.pl existiert nicht',
+                               loce1 => 'Bitte Deinen Standort eingeben,, set/location <latitude longitude>',
+                               loce2 => 'Nicht anerkannt \"$_[0]\" als Lat/Long (z.B. 52 20 N 0 16 E)',
+                               loce3 => '$_[0] ist ein QRA Locator, gebrauch: set/qra $_[0]',
+                               loc => 'Dein Lat/Long ist nun \"$_[0]\"',
+                               lockout => '$_[0] ausgesperrt',
+                               lockoutc => '$_[0] erstellt und ausgesperrt',
+                               lockoutun => '$_[0] Aussperrung aufgehoben',
+                               lockoutuse => 'Gebrauch: sh/lockout <Rufzeichen>|ALL',
+                               loginu => 'User $_[0] hat eingeloggt',
+                               logoutu => 'User $_[0] hat ausgeloggt',
+                               loginn => 'Node $_[0] hat eingeloggt',
+                               logoutn => 'Node $_[0] hat ausgeloggt',
+                               m1 => 'Subjekt eingeben (30 Zeichen):',
+                               m2 => 'Kopie der msg $_[0] gesendet an $_[1]',
+                               m3 => 'Sorry, $_[0] ist keine akzeptable TO Adresse',
+                               m4 => 'Sorry, kann nicht zugreifen auf Nachricht $_[0]',
+                               m5 => 'Sorry, ich brauche eine Nachrichten Nummer',
+                               m6 => 'Reply to: $_[0]',
+                               m7 => 'Subject : $_[0]',
+                               m8 => 'Nachricht eingeben, /EX zum absenden oder /ABORT zum abbrechen',
+                               m9 => 'Neue Nachricht(en) fuer Dich',
+                               m10 => 'Nachricht abgebrochen',
+                               m11 => 'Nachricht Nr. $_[0] gesichert und weitergeleitet an $_[1]',
+                               m12 => 'Nachricht Nr. $_[0] geloescht',
+                               m13 => 'Nachricht Nr. $_[0] fehlt',
+                               m14 => 'Nachricht Nr. $_[0] markiert als gesendet an $_[1]',
+                               m15 => 'Nachricht Nr. $_[0] unmarkiert als gesendet an $_[1]',
+                               m16 => 'Brauche eine Nachrichten Nummer',
+                               m17 => 'Sorry, kann Nachricht nicht senden im $_[0] mode',
+                               msg1 => 'Bulletin Nachrichten aufgeschoben',
+                               msg2 => 'Private Nachrichten aufgeschoben',
+                               msg3 => 'Msg $_[0]: $_[1] geaendert von $_[2] auf $_[3]',
+                               msgu => 'Gebrauch: msg <cmd> <msgno> data...',
+                               merge1 => 'Merge request for $_[1] spots and $_[2] WWV sent to $_[0]',
+                               moon => 'Standort                              dd/mm/yyyy Rise   Set',
+                               moon_with_azel => 'Standort                              dd/mm/yyyy Rise   Set      Azim   Elev',
+                               mond => 'Ueberwachung Disabled',
+                               mone => 'Ueberwachung Enabled',
+                               namee1 => 'Bitte Deinen Namen eingeben, set/name <dein name>',
+                               namee2 => 'Kann User $_[0]nicht finden!',
+                               name => 'Dein Name ist jetzt \"$_[0]\"',
+                               nodea => '$_[0] gesetzt als AK1A style Node',
+                               nodeac => '$_[0] erstellt als AK1A style Node',
+                               nodeb => '$_[0] gesetzt als BBS',
+                               nodebc => '$_[0] erstellt als BBS',
+                               nodec => '$_[0] gesetzt als CLX style Node',
+                               nodecc => '$_[0] erstellt als CLX style Node',
+                               noder => '$_[0] gesetzt als AR-Cluster style Node',
+                               noderc => '$_[0] erstellt als AR-Cluster style Node',
+                               nodes => '$_[0] gesetzt als DXSpider style Node',
+                               nodesc => '$_[0] erstellt als DXSpider style Node',
+                               nodex => '$_[0] gesetzt als DXNET style Node',
+                               nodexc => '$_[0] erstellt als DXNET style Node',
+                               nodeu => '$_[0] zurueckgesetzt als ein User',
+                               nodee1 => 'Du kannst dieses Kommando nicht waehrend Dein Ziel ($_[0]) online ist',
+                               notdone => 'Nicht ausgefuehrt',
+                               nothere => 'Sorry, aber $_[0] ist nicht hier im Moment, bitte spaeter nocheinmal Versuchen',
+                               obscount => 'Ping obsolescence count on $_[0] set to $_[1]',
+                               ok => 'Operation erfolgreich',
+                               outconn => 'Outstanding connect to $_[0]',
+                               page => 'Druecke Enter zum fortfahren, A zum abbrechen ($_[0] lines) >',
+                               pagelth => 'Seitenlaenge ist nun $_[0]',
+                               passerr => 'Gebrauch: SET/PASS <Passwort> <Rufzeichen>',
+                               password => 'Passwort gesetzt oder geaendert fuer $_[0]',
+                               passwordu => 'Passwort geloescht fuer $_[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' => 'Von Rufzeichen: $_[0] Lat: $_[1] Long: $_[2]',
+                               pr => '$_[0] de $main::mycall $_[1] $_[2] >',
+                               pr2 => '($_[0]) de $main::mycall $_[1] $_[2] >',
+                               priv => 'Priviligierten Level geaendert auf $_[0]',
+                               prx => '$main::mycall >',
+                               pw0 => 'Altes Passwort eingeben: ',
+                               pw1 => 'Neues Passwort eingeben: ',
+                               pw2 => 'Wiederhole neues Passwort: ',
+                               pw3 => 'Passwort geaendert',
+                               pw4 => 'Passwoerter differieren, Passwort NICHT geaendert',
+                               qll => 'Bitte gib Deinen QRA Locator ein mit set/location oder set/qra',
+                               qthe1 => 'Bitte gib Dein QTH ein mit set/qth <dein qth>',
+                               qth => 'Dein QTH ist nun \"$_[0]\"',
+                               qrae1 => 'Bitte gib Deinen QRA Locator ein mit set/qra <qra locator> (z.B. set/qra JO44RK)',
+                               qrashe1 => 'Bitte einen QRA Locator eingeben, z.B. sh/qra JO02LQ oder sh/qra JO02LQ IO93NS',
+                               qrae2 => 'Erkenne nicht \"$_[0]\" als ein QRA Locator (z.B. JO02LQ)',
+                               qra => 'Dein QRA Locator ist nun \"$_[0]\"',
+                               rcmdo => 'RCMD \"$_[0]\" gesendet an $_[1]',
+                               read1 => 'Sorry, keine neuen Nachrichtenfuer Dich',
+                               read2 => 'Msg $_[0] nicht gefunden',
+                               read3 => 'Msg $_[0] nicht verfuegbar',
+                               rec => '$_[0] records',
+                               reg => '$_[0] registriert',
+                               regc => '$_[0] erstellt und registriert',
+                               reginac => 'Registrierung ist nicht aktiv (set/var \$main::reqreg = 1 to activate)',
+                               regun => '$_[0] unregistriert',
+                               route => '$_[0] auf $_[1] via $_[2]',
+                               sat1 => 'Tracking Tabelle fuer $_[0] fuer den naechsten $_[1] Stunden alle $_[2] mins',
+                               sat2 => 'dd/mm  UTC      Lat     Lon  Alt Km      Az      El Dist Km',
+                               sat3 => 'Syntax: SH/SAT <name> [<hours> <interval>]',
+                               sat4 => 'Satelliten verfuegbar:-',
+                               satnf => 'Satellit $_[0] unbekannt',
+                               satdisc => '-----',
+                               sethop1 => 'Gebrauch: set/hops <Rufzeichen> ann|spots|wwv|wcy <Anzahl der Hops>',
+                               sethop2 => '$_[0] hops gesetzt auf $_[1]$_[2] fuer $_[3]',
+                               sethop3 => 'Keine hops gesetzt fuer $_[0]',
+                               shutting => '$main::mycall shutting down...',
+                               sloc => 'Cluster lat $_[0] long $_[1], Nicht vergessen die DXVars.pm zu aendern',
+                               snode1 => 'Node Call   Sort    Version',
+                               snode2 => '$_[0] $_[1]  $_[2]',
+                               snode3 => '$_[0] Unbekanntes Rufzeichen',
+                               sqra => 'Cluster QRA Locator$_[0], Nicht vergessen die DXVars.pm zu aendern',
+                               sorry => 'Sorry',
+                               spf1 => 'spoof: erzeuge neuen User $_[0]',
+                               stathf => 'HF DX Spot Stats, letzte 31 Tage',
+                               stathft => 'HF DX Spot Stats, letzte 31 Tage fuer DXCC $_[0]',
+                               statvhf => 'VHF+ DX Spot Stats, letzte 31 Tage',
+                               statvhft => 'VHF+ DX Spot Stats, letzte 31 Tage fuer DXCC $_[0]',
+                               statdx => 'Total DX Spots letzte 31 Tage',
+                               sun => 'Location                              dd/mm/yyyy Rise   Set',
+                               sun_with_azel => 'Location                              dd/mm/yyyy Rise   Set      Azim   Elev',
+                               suser1 => 'Gebrauch: Rufzeichen user_field_name value',
+                               suser2 => 'User $_[0] nicht gefunden',
+                               suser3 => 'User Feld \'$_[0]\' war \'$_[1]\' nun gesetzt auf \'$_[2]\'',
+                               suser4 => 'User Feld name \'$_[0]\' existiert nicht',
+                               time1 => 'Lokala Zeit: $_[0] $_[1], UTC $_[2]',
+                               time2 => '$_[0] Lokale (standard) Zeit: $_[1] ($_[2] Stunden)',
+                               time3 => '$_[0]  $_[1]',
+                               talks => 'Talk flag gesetzt auf $_[0]',
+                               talku => 'Talk flag zurueckgesetzt auf $_[0]',
+                               talkend => 'Beendet Talk zu Dir',
+                               talkinst => 'Talkmode, /EX zum beenden, /<cmd> um ein Kommando auszufuehren',
+                               talknh => 'Sorry $_[0] ist im moment nicht online',
+                               talkprompt => 'Talk ($_[0])>',
+                               talkstart => 'Startet Talkmode zu Dir',
+                               usernf => '*** User Satz fuer $_[0] nicht gefunden ***',
+                               wwvs => 'WWV flag gesetzt auf $_[0]',
+                               wwvu => 'WWV flag zurueckgesetzt auf $_[0]',
+                               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 Italiano',
+                               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]',
+               }
+);
+