Bill's technique used the fact the sum of a sequence of odd numbers is always the next perfect square (For example, 1 + 3 = 4, 1 + 3 + 5 = 9, 1 + 3 + 5 + 7 = 16, etc). So he could figure out when to bump the dependent coordinate value by iterating in a loop until a threshold was exceeded. This allowed QuickDraw to draw ovals very quickly.

--- RSS.pm      2004/02/20 16:19:29     1.1
+++ RSS.pm      2004/02/20 19:00:14
@@ -16,6 +16,7 @@

 use strict vars;
 use HNS::Tools::Title;
+use Jcode;

 use vars qw(@ISA);
 @ISA = qw(HNS::Tools::Title);
@@ -26,7 +27,7 @@

 sub xml_header($) {
     my $self = shift;
-       print "<?xml version=\"1.0\" encoding=\"euc-jp\" ?>\n";
+       print "<?xml version=\"1.0\" encoding=\"UTF-8\" ?>\n";
        print "<rdf:RDF\n";
        print " xmlns=\"http://purl.org/rss/1.0/\"\n";
        print " xmlns:rdf=\"http://www.w3.org/1999/02/22-rdf-syntax-ns#\"\n";
@@ -246,11 +247,11 @@
                $content = $item{"content"};
                $high = $item{"high"};

-               my $url = $HNS::System::MyDiaryURI."?$year$month$abc#$year$month$day$mark";
+               my $url = $HNS::System::MyDiaryURI."$year/$month/$day.html#$year$month$day$mark";
                my $rssitem;
                $rssitem->{url} = $url;
-               $rssitem->{title} = $content;
-               $rssitem->{description} = $para;
+               $rssitem->{title} = jcode($content)->utf8;
+               $rssitem->{description} = jcode($para)->utf8;
                $rssitem->{created} = "$year-$month-$day";

                if ($grp eq '') {push(@rssitems, $rssitem);}