function zem_article_image($atts) {
		global $thisarticle,$pfr,$img_dir, $id;
      if (is_array($atts)) extract($atts);

      $break    = (empty($break))    ? "" : $break;
      $wraptag  = (empty($wraptag))  ? "" : $wraptag;
      $limit    = (empty($limit))    ? 1 : $limit;

      if (!empty($thisarticle["article_image"])) {
			$images = array_slice(split(",", $thisarticle["article_image"], $limit + 1), 0, $limit);

			foreach ($images as $id) {
				if (is_numeric($id)) {
					$rs = safe_row("*", "txp_image", "id='$id' limit 1");
					if ($rs) {
						extract($rs);
						if (empty($thumbs)) {
							$out[]= "<img src=\"{$pfr}{$img_dir}/{$id}{$ext}\"".
									  " alt=\"{$alt}\"".
									  "/>";
						}
						elseif (!empty($rs["thumbnail"])) {
							$out[]= "<a href=\"{$pfr}{$img_dir}/{$id}{$ext}\"".
" rel=\"ibox\"".">"."<img src=\"{$pfr}{$img_dir}/{$id}t{$ext}\"".
									  " alt=\"{$alt}\"".
									  " />"."</a>";
						}
					}
				}
			}
			
			if (is_array($out)) {
				if ($break == "li") {
					return ($wraptag)
					? tag("<li>".join("</li>\n<li>",$out)."</li>",$wraptag)
					: "<li>".join("</li>\n<li>",$out)."</li>";
				}
				return ($wraptag)
				? tag(join($break.n,$out),$wraptag)
				: join($break.n,$out);
			}
		}
	}

	function zem_article_thumb($atts) {
		$atts["thumbs"] = 1;
		return zem_article_image($atts);
	}