Help for this page

Select Code to Download


  1. or download this
    
        my $max = 10_000;
    ...
            if $distance < 0;
        $distance *= $max/($max-$radius)