Ｎ速Ｂｅポイント実装を話し合うスレ2

[143 動け動けウゴウゴ２ちゃんねる 2006/07/26(水) 08:52:40 ID:Y/LFFynM0]

sub GetBELucky
{
my ($GB) = @_;

if (rand(10800) < $GB->{BEpoints}) { return 1; }

return 0;
}