Select Code to Download

$loop=5;
{
...
print "X: $x ($xp%) $xd\nY: $y ($yp%) $yd\n";
$loop-- and redo;
}

X: 49790 (49.79%) 0.210000000000001
Y: 50211 (50.211%) -0.210999999999991
...
Y: 50103 (50.103%) -0.102999999999994
X: 50033 (50.033%) -0.0330000000000084
Y: 49968 (49.968%) 0.0319999999999965