Number word mod
1.01 SP1.1
Insteatt of "You have 1 messages", "You have 3 messages" ... you see "You have one message", "You have three messages" ...,
Moreover insteatt:
1 Guests, 1 Users
Uwe
you get:
Uwe, one guest
Pyrrhon
http://www.philtalk.de/
english.lng
1;
@numberwords = ('no','one','two','three','four','five','six','seven','eight','nine','ten','eleven','twelve');
$numberword0 = "None members";
$numberword1 = "one";
$numberword2 = "none guests";
1;
sources/BoardIndex.pl
$ims = qq~
$txt{'796'} $ims~;
# number word mod
if($ims == 0) { $ims = qq~
$txt{'152'} @numberwords[$ims] $txt{'471'}.~; }
elsif ($ims == 1) { $ims = qq~
$txt{'152'} @numberwords[$ims] $txt{'471'}.~;}
elsif ($ims < 13) { $ims = qq~
$txt{'152'} @numberwords[$ims] $txt{'153'}.~;}
else { $ims = qq~
$txt{'152'} $mnum $txt{'153'}.~;}
# end number word mod
$guests $txt{'141'}, $numusers $txt{'142'}
$users
|
~;
# number word mod
if ($numusers == 1) {$yymain .= qq~$users~;}
elsif ($numusers > 1) {$yymain .= qq~$users~;}
else {$yymain .= qq~$numberword0~;}
if ($guests == 1) {$yymain .=qq~, $numberword1 $txt{'28'}
~;}
elsif ($guests == 0) {$yymain .=qq~, $numberword2
~;}
elsif ($guests < 13) {$yymain .=qq~, @numberwords[$guests] $txt{'141'}
~;}
else {$yymain .= qq~, $guests $txt{'141'}
~;}
# end number word mod
$yymain .= qq~ |
sources/Load.pl
if($mnum eq "1") { $yyim = qq~$txt{'152'} $mnum $txt{'471'}.~; }
else { $yyim = qq~$txt{'152'} $mnum $txt{'153'}.~; }
#number word mod
if($mnum == 0) { $yyim = qq~$txt{'152'} @numberwords[$mnum] $txt{'471'}.~; }
elsif ($mnum == 1) { $yyim = qq~$txt{'152'} @numberwords[$mnum] $txt{'471'}.~;}
elsif ($mnum < 13) { $yyim = qq~$txt{'152'} @numberwords[$mnum] $txt{'153'}.~;}
else { $yyim = qq~$txt{'152'} $mnum $txt{'153'}.~; }
#number word mod