Drupal Community Portal

I have built a module that creates an image based on data that a user inputs into a cck field. Basically the module queries the drupal database, gets the data, then it uses imagecreate and imagepng to build an image based on that data.
The .module code I have so far is below. As you can see, I call "dangerrose.png" to generate the image and use session variables to pass the nid so that I tie the node to the image. I would like to make a more permanent attachment to the node so that I could use views to display several nodes and their associated images as a table. I really want to save the image created as a file attached to the node whose data created the image.
I am relatively new to module development in drupal so any ideas/help would be greatly appreciated.
<?phpfunction dangerrose_menu() {$items['dangerrose.png'] = array('type' => MENU_CALLBACK,'page callback' => 'dangerrose_image','access arguments' => array('access content'), );return $items;}function dangerrose_image() {drupal_set_header("Content-type: image/png");$nodeid = $_SESSION['nodeid'];$query = "SELECT node.nid AS nid, node_data_field_abeast.field_abeast_value AS abeast, node.type AS node_type, node.vid AS node_vid, node_data_field_abeast.field_abnorth_value AS abnorth, node_data_field_abeast.field_abnortheast_value AS abnortheast, node_data_field_abeast.field_abnorthwest_value AS abnorthwest, node_data_field_abeast.field_absouth_value AS absouth, node_data_field_abeast.field_absoutheast_value AS absoutheast, node_data_field_abeast.field_absouthwest_value AS absouthwest, node_data_field_abeast.field_abwest_value AS abwest, node_data_field_abeast.field_bnorthwest_value AS bnorthwest, node_data_field_abeast.field_bnorth_value AS bnorth, node_data_field_abeast.field_bnortheast_value AS bnortheast, node_data_field_abeast.field_beast_value AS beast, node_data_field_abeast.field_bsoutheast_value AS bsoutheast, node_data_field_abeast.field_bsouth_value AS bsouth, node_data_field_abeast.field_bsouthwest_value AS bsouthwest, node_data_field_abeast.field_bwest_value AS bwest, DATE_FORMAT((FROM_UNIXTIME(node.created) + INTERVAL -28800 SECOND), '%Y%m%d%H%i') AS node_created_minute FROM node node LEFT JOIN content_type_forecast node_data_field_abeast ON node.vid = node_data_field_abeast.vid WHERE (node.status = 1) AND (node.type in ('forecast')) AND (node.nid = $nodeid)";$avyforecast = db_query($query);$avyinfo = db_fetch_array($avyforecast);// create a blank image$image = imagecreate(275, 171);// fill the background color$bg = imagecolorallocate($image, 244, 239, 220);// allocate some solors$white      = imagecolorallocate($image, 0xFF, 0xFF, 0xFF);$green      = imagecolorallocate($image, 0, 255, 0);$yellow     = imagecolorallocate($image, 255, 255, 0);$orange     = imagecolorallocate($image, 255, 163, 25);$red        = imagecolorallocate($image, 255, 25, 0);$black        = imagecolorallocate($image, 0x00, 0x00, 0x00);$gray       = imagecolorallocate($image, 178, 178, 178);$darkgreen  = imagecolorallocate($image, 72, 173, 5);$darkyellow = imagecolorallocate($image, 235, 230, 20);$darkorange = imagecolorallocate($image, 227, 139, 17);$darkred    = imagecolorallocate($image, 178, 34, 34);// insert letters for the various directionsimagestring($image, 5, 76, -2, "N", $black);imagestring($image, 5, 4, 72, "W", $black);imagestring($image, 5, 150, 72, "E", $black);imagestring($image, 5, 76, 142, "S", $black);imagestring($image, 3, 127, 21, "NE", $gray);imagestring($image, 3, 20, 21, "NW", $gray);imagestring($image, 3, 127, 120, "SE", $gray);imagestring($image, 3, 20, 120, "SW", $gray);//insert text for the to point ot help linkimagestring($image, 2, 160, 35, "(What's this?)", $gray);// puts the "danger ratings" info into the $avyinfo array$hn = $avyinfo[abnorth];$hne = $avyinfo[abnortheast];$he = $avyinfo[abeast];$hse = $avyinfo[absoutheast];$hs = $avyinfo[absouth];$hsw = $avyinfo[absouthwest];$hw = $avyinfo[abwest];$hnw = $avyinfo[abnorthwest];$ln = $avyinfo[bnorth];$lne = $avyinfo[bnortheast];$le = $avyinfo[beast];$lse = $avyinfo[bsoutheast];$ls = $avyinfo[bsouth];$lsw = $avyinfo[bsouthwest];$lw = $avyinfo[bwest];$lnw = $avyinfo[bnorthwest];$A=1.0;$B=1.5;$C=2.0;$D=2.5;$E=3.0;$F=3.5;$G=4.0;$H=4.5;$I=5.0;// array positions:  0    1   2   3    4   5    6   7    8    9  10   11  12   13  14   15$ColorArray = array($ln,$lne,$le,$lse,$ls,$lsw,$lw,$lnw,$hn,$hne,$he,$hse,$hs,$hsw,$hw,$hnw);$PktArray = array();$PieArray = array();//$ShdwArray = array();// Make arrays for pies and pockets$CB = 0;while ($CB < 16) {        $J = $ColorArray[$CB];    if ($J==$A) {$Pie="$green";$Pkt="$green";}     elseif ($J==$B) {$Pie="$green";$Pkt="$yellow";}    elseif ($J==$C) {$Pie="$yellow";$Pkt="$yellow";}    elseif ($J==$D) {$Pie="$yellow";$Pkt="$orange";}     elseif ($J==$E) {$Pie="$orange";$Pkt="$orange";}        elseif ($J==$F) {$Pie="$orange";$Pkt="$red";}        elseif ($J==$G) {$Pie="$red";$Pkt="$red";}        elseif ($J==$H) {$Pie="$red";$Pkt="$black";}        elseif ($J==$I) {$Pie="$black";$Pkt="$black";}    array_push($PieArray,$Pie);    array_push($PktArray,$Pkt);$CB=$CB+1;}// make the pie for the Low tierimagefilledarc($image, 80, 77, 130, 130, 247, 292, $PieArray[0], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 292, 337, $PieArray[1], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 337, 22, $PieArray[2], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 22, 67, $PieArray[3], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 67, 112, $PieArray[4], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 112, 157, $PieArray[5], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 157, 202, $PieArray[6], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 130, 130, 202, 247, $PieArray[7], IMG_ARC_PIE);// insert pockets on Low tierimagefilledellipse($image, 80, 22, 12, 12, $PktArray[0]);imagefilledellipse($image, 120, 39, 12, 12, $PktArray[1]);imagefilledellipse($image, 135, 77, 12, 12, $PktArray[2]);imagefilledellipse($image, 120, 115, 12, 12, $PktArray[3]);imagefilledellipse($image, 80, 132, 12, 12, $PktArray[4]);imagefilledellipse($image, 40, 115, 12, 12, $PktArray[5]);imagefilledellipse($image, 25, 77, 12, 12, $PktArray[6]);imagefilledellipse($image, 40, 39, 12, 12, $PktArray[7]);// make the pie for the High tierimagefilledarc($image, 80, 77, 90, 90, 247, 292, $PieArray[8], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 292, 337, $PieArray[9], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 337, 22, $PieArray[10], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 22, 67, $PieArray[11], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 67, 112, $PieArray[12], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 112, 157, $PieArray[13], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 157, 202, $PieArray[14], IMG_ARC_PIE);imagefilledarc($image, 80, 77, 90, 90, 202, 247, $PieArray[15], IMG_ARC_PIE);// insert pockets on High tierimagefilledellipse($image, 80, 50, 12, 12, $PktArray[8]);imagefilledellipse($image, 99, 58, 12, 12, $PktArray[9]);imagefilledellipse($image, 107, 77, 12, 12, $PktArray[10]);imagefilledellipse($image, 99, 96, 12, 12, $PktArray[11]);imagefilledellipse($image, 80, 104, 12, 12, $PktArray[12]);imagefilledellipse($image, 61, 96, 12, 12, $PktArray[13]);imagefilledellipse($image, 53, 77, 12, 12, $PktArray[14]);imagefilledellipse($image, 61, 58, 12, 12, $PktArray[15]);// draw the ellipse around edge of each tierimageellipse($image, 80, 77, 130, 130, $black);imageellipse($image, 80, 77, 90, 90, $black);// draw lines that divide up the roseimageline($image, 55, 17, 105, 137, $black);imageline($image, 56, 137, 104, 17, $black);imageline($image, 20, 102, 140, 52, $black);imageline($image, 20, 53, 140, 101, $black);// draw lines to indicate elevationsimageline($image, 85, 122, 110, 147, $black);imageline($image, 90, 142, 110, 162, $black);// insert letters to indicate elevationimagestring($image, 3, 112, 142, "Near and above treeline", $black);imagestring($image, 3, 112, 158, "Below treeline", $black);/*// draw rectangles for the danger rating keyimagefilledrectangle($image, 0, 110, 30, 160, $green);imagefilledrectangle($image, 0, 60, 30, 110, $yellow);imagefilledrectangle($image, 0, 35, 30, 60, $orange);imagefilledrectangle($image, 0, 15, 30, 35, $red);imagefilledrectangle($image, 0, 0, 30, 15, $black);imagerectangle($image, 0, 0, 30, 159, $black);//insert danger ratings into keyimagestring($image, 3, 5, 130, "LOW", $black);imagestring($image, 3, 5, 80, "MOD", $black);imagestring($image, 3, 2, 41, "CONS", $black);imagestring($image, 3, 2, 19, "HIGH", $black);imagestring($image, 3, 5, 2, "EXT", $red);*/// flush imageheader('Content-type: image/png');imagepng($image);imagedestroy($image);//Stop executing of the scripts to disable sending Drupal’s outputs at the end of the image.exit();}?>