Tommy, would it be OK with you to publish this code as a public domain?

Why only GPL?

Since this code in its current state is our common work, we have to agree both on how to release it.

/**
 * Syntax highlighting for fasm code by Tommy Lillehagen
 * Fixed and improved by Tomasz Grysztar
 */
function showasm($src)
{
 $code = explode("\n",$src);
 $result = "";
 $chars = ".,()[]{}=|\\#&!:+-*/<>~`\t ";
 $q = ""; $inq = false;
 $colors = array("#000000","#808080","#880000","#0000FF","#008800");
 foreach($code as $line)
  {
   $lastcolor = 3;
   $nextcolor = 0;
   $part = "";
   $inq = false;
   $column = 0;

   for ($i=0;$i<strlen($line);$i++)
    {
     if ($nextcolor == 1)
      {
       $lastcolor = 3;
       $nextcolor = 0;
      }
     if (substr($line,$i,1) == ";" & $lastcolor != 2)
      {
       $lastcolor = 1;
      }
     elseif ((strstr("0123456789",substr($line,$i,1)) | (substr($line,$i,1) == "$")) & $lastcolor == 3)
      {
       $lastcolor = 4;
       if (substr($line,$i,1) == "$" & stristr("0123456789ABCDEF",substr($line,$i+1,1)) === false)
        {
         $lastcolor = 0;
        }
      }
     elseif ((substr($line,$i,1) == "'" | substr($line,$i,1) == "\"") & ($lastcolor == 3 | $lastcolor == 2))
      {
       if ($inq === false)
        {
         $q = substr($line,$i,1);
        }
       if (substr($line,$i,1) == $q)
        {
         if ($lastcolor == 2)
          { $lastcolor = 2; $nextcolor = 1; $inq = false; }
         else
          { $lastcolor = 2; $inq = true; }
        }
      }
     elseif ((strpos($chars,substr($line,$i,1)) != false) & ($lastcolor != 1) & ($inq === false))
      {
       $lastcolor = 3;
       $nextcolor = 1;
      }
     elseif ($lastcolor == 3)
      {
       $lastcolor = 0;
      }
     $part .= $lastcolor;
    }

   $isStarted = false;

   for ($i=0;$i<strlen($line);$i++)
    {
     if ($isStarted === false)
      {
       $result .= "{A\n}span{S\n}style={Q\n}color:{S\n}".$colors[substr($part,$i,1)]."{Q\n}{B\n}";
       $isStarted = true;
      }
     $c=substr($line,$i,1);
     if ($c != "\t")
      $result .= $c;
     else
      {
       $spacecount = 8 - $column % 8;
       $result .= str_repeat(" ",$spacecount);
       $column += $spacecount-1;
      }
     if (substr($part,$i+1,1) != substr($part,$i,1))
      {
       $result .= "{A\n}/span{B\n}";
       $isStarted = false;
      }
     $column++;
    }

   if ($isStarted) $result .= "{A\n}/span{B\n}";

   $result .= "{A\n}br{B\n}";

  }

 $result = htmlspecialchars($result) ;

 $result = str_replace(" ", "&nbsp;", $result);

 $result = preg_replace("/{A\n}/i", "<", $result);
 $result = preg_replace("/{B\n}/i", ">", $result);
 $result = preg_replace("/{Q\n}/i", "\"", $result);
 $result = preg_replace("/{S\n}/i", " ", $result);

 return($result);
}    

OK, this is the routine used by this message board: