Install 1.14 or later version of IO::Select perl module.
Points are calculated at WinlistCalculate() function in the pts.pl. Especially the following lines calculate the normal game's points:
my $winners = scalar @{$rank[0]}; # the number of winner players my $starters = scalar @{$ch->{game}{start}}; # the number of started players my $points = round(($starters / $winners) * 0.5, SCOREDECIMAL);
For example, if you want a command `/features' that displays `features.txt',
FormatFeatures=%0%1 ExplainFeatures=Displays features
features => \&OnPlFeatures,in PlCommands() function. Secondly, add a function OnPlFeatures():
sub OnPlFeatures { my ($s, $msg, $page) = @_; my ($cmd) = split(/ +/, $msg, 2); SendFromFile($s, 'features'); }
That's all.