X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FMessages;h=c32cd934e353fba9684e60e2a54b3d961fc6a481;hb=1006337e105ab06a0e468bc483332fd385dd5240;hp=6a2b4fb5722507abcb75b53ab4a3314f16c2663e;hpb=517695ec47b0ab768da54c7b0830de9ed0dd4914;p=spider.git diff --git a/perl/Messages b/perl/Messages index 6a2b4fb5..c32cd934 100644 --- a/perl/Messages +++ b/perl/Messages @@ -1,4 +1,4 @@ -#!/usr/bin/perl +# -*- perl -*- # # this file contains the system messages. Don't forget to reload them # if you change them (load/messages) @@ -12,10 +12,10 @@ package DXM; en => { addr => 'Address set to: $_[0]', already => '$_[0] already connnected', - anns => 'Announce flag set on $_[0]', - annu => 'Announce flag unset on $_[0]', - annts => 'AnnTalk flag set on $_[0]', - anntu => 'AnnTalk flag unset on $_[0]', + 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:-', @@ -49,11 +49,12 @@ package DXM; disc4 => 'No Channel or connection but orphan $_[0] disconnected', done => 'Done', dup => 'Sorry, this is a duplicate', + dupspot => 'Sorry, this is a duplicate (wait a minute and try again)', 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 flag set on $_[0]', - dxu => 'DX Spots flag unset on $_[0]', + dxs => 'DX Spots enabled for $_[0]', + dxu => 'DX Spots disabled for $_[0]', e1 => 'Invalid command', e2 => 'Error: $_[0]', e3 => '$_[0]: $_[1] not found', @@ -84,6 +85,8 @@ package DXM; 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', @@ -100,8 +103,8 @@ package DXM; filter4 => '$_[0]$_[1] Filter $_[2] deleted for $_[3]', filter5 => 'need some filter commands...', filter6 => '$_[0]$_[1] Filter for $[2] not found', - grids => 'DX Grid flag set on $_[0]', - gridu => 'DX Grid flag unset on $_[0]', + 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]', @@ -194,8 +197,12 @@ package DXM; page => 'Press Enter to continue, A to abort ($_[0] lines) >', pagelth => 'Page Length is now $_[0]', passerr => 'Please use: SET/PASS ', + 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!', @@ -236,9 +243,11 @@ package DXM; 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 ann|spots|wwv|wcy ', 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', @@ -247,13 +256,17 @@ package DXM; 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', - stathft => 'HF DX Spot Stats, last 31 days for DXCC $_[0]', - statvhf => 'VHF+ DX Spot Stats, last 31 days', - statvhft => 'VHF+ DX Spot Stats, last 31 days for DXCC $_[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]\'', @@ -261,24 +274,31 @@ package DXM; time1 => 'Local Time: $_[0] $_[1], UTC $_[2]', time2 => '$_[0] Local (standard) time: $_[1] ($_[2] Hours)', time3 => '$_[0] $_[1]', - talks => 'Talk flag set on $_[0]', - talku => 'Talk flag unset on $_[0]', + talks => 'Talk enabled for $_[0]', + talku => 'Talk disabled for $_[0]', talkend => 'Finished talking to you', talkinst => 'Entering Talkmode, /EX to end, / 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 ann|spots|wwv|wcy', unsethop2 => 'hops unset on $_[1] for $_[0]', usernf => '*** User record for $_[0] not found ***', + wpc16s => 'Want PC16 enabled for $_[0]', + wpc16u => 'Want PC16 disabled for $_[0]', + wspc16s => 'Send PC16 enabled for $_[0]', + wspc16u => 'Send PC16 disabled for $_[0]', 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 flag set on $_[0]', - wwvu => 'WWV flag unset on $_[0]', - wxs => 'WX flag set on $_[0]', - wxu => 'WX flag unset on $_[0]', + 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]',