note
hossman
one other things you should change now that the
size is a couple of orders of magnitude bigger...
<code>
# Calculate screen
for my $yi (0..$ROWS-1) {
my $y = $yi * $yfact;
for my $xi (0..$COLS-1) {
...
}
}
</code>
<p>
Should be something like...
<code>
# Calculate screen
for (my $yi = 0; $yi < $ROWS; $yi++) {
my $y = $yi * $yfact;
for (my $xi = 0; $xi < $COLS; $xi++) {
...
}
}
</code>
189941
190245