%%comment-view-writer-scene%%
hiphopclown.org
2002-12-27 13:39

%%preprocess%%
// FRAME CONTROLLER
// get info on number of frames here (frameTotal)
$this->frameQuery= "SELECT obj.* FROM comment AS obj WHERE obj.flavor='Frame' AND obj.parentobjtype='$object->objtype' AND obj.parentid='$object->id' $session->statuswhere $session->publicwhere ORDER BY rank DESC, created ASC ";
$firstframe= new Comment;
berror("FrameControl: <b>looking up frame list here</b>",1);
$frameArray= $firstframe->selectObject($this->frameQuery);
berror("FrameControl: <b>found $firstframe->listsize frames</b>.",1);
$this->total= $firstframe->listsize;

// which frame is being displayed? (frameOffset)
$this->frameArrayKey= -1;
foreach ($frameArray AS $key=>$myFrame) {
	berror("FrameControl looking at frameArray[$key], with id $myFrame[id], for match on $this->id.",1);
	if ($myFrame['id']==$this->id) {
		berror("FrameControl <b>MATCH</b> on $key.",1);
		$this->frameArrayKey= "$key";
		break;
		}
	}

// find last, first, previous and next frame names
$this->offset= $this->frameArrayKey + 1;

// OBJECT FORMATTING
// format the object for display
$cleanbody= $this->body;
$this->beryliumToHtml();
$this->getRuntimeVars();
$this->applyPolicy();

// convert generic flavor to objtype:
if ($this->flavor=="Generic") $this->flavor= "Frame";

// title fixing
if ($this->title=="") $this->title= "Frame #$this->id";


// ROOM SETTINGS
berror("Getting imagesize on $folder->p_background now...",1);
if ($background= getimagesize($folder->p_background)) {
	$width= $background[0];
	$height= $background[1];
	berror("Got it: $width x $height",1);

	$targetwidth= 630;
	$targetheight= 430;

	if ($width>$targetwidth) {
		//$height= $height * ($targetwidth/$width);
		$width= $targetwidth;
		}
	if ($height>$targetheight) {
		//$width= $width * ($targetheight/$height);
		$height= $targetheight;
		}

	$this->backgroundwidth= $width."px";
	$this->bgnumericwidth= $width;
	$this->backgroundheight= $height."px";
	$this->bgnumericheight= $height;
	}


// SCENE PARSE $this->body into characters, props, whathaveya
// record looks like objtype=document^id=67^position_x=200^position_y=200^position_z=5^dialogue=Ooooohh!^imageUrl=http://galactron/berylium/members/image-woodstock.671d.gif^^
berror("<b>Frame Render: STARTING</b> with $cleanbody.",1);
$myObjectArray= explode("^^",$cleanbody);
$objectindex=0;
foreach ($myObjectArray AS $key=>$myObjectRef) {
	
	// PREPROCESS and cleanup
	$myObjectRef= trim($myObjectRef);
	if ($myObjectRef=="") {
		berror("Frame Render: found NULL objectref, continuing.",1);
		$objectindex++;
		continue;
		}

	// break out the object vars
	$myObjectVars= bunpack($myObjectRef);
	if ($myObjectVars['objtype']=="" || $myObjectVars['id']=="") {
		berror("Frame Render: found NULL objectref on bunpack, continuing: $myObjectRef.",1);
		$objectindex++;
		continue;
		}
	berror("<b>Frame Render: FOUND</b> $myObjectVars[objtype] #$myObjectVars[id], will attempt to render it. ($session->wherestatus)",1);

	// create a berylium object and do a database lookup
	if ($myObjectVars['objtype']=="label") {
		$myObject= new Document;
		$myObject->flavor= "Label";
		$myObject->label= $myObjectVars['label'];
		$label= bHtml($myObjectVars['label']);
		}
	else {
		$command= "\$myObject= new ".ucfirst($myObjectVars['objtype']).";";
		eval($command);
		$query= "SELECT obj.* FROM $myObjectVars[objtype] AS obj WHERE obj.siteid='$site->id' AND obj.id='$myObjectVars[id]' $session->wherestatus $session->wherepublic ";
		$myObject->selectObject($query);
		if ($myObject->id=="") {
			berror("Frame Render: found no matching object in the database. Or at least none available to this user.",1);
			$objectindex++;
			continue;
			}
		// format the object for display
		berror("Frame Render: preprocessing $myObject->flavor$myObject->id ($myObject->title).",1);
		$myObject->beryliumToHtml();
		$myObject->getRuntimeVars();
		}

	// alternating rows
	if ($myRow=="" || $myRow=="odd") {
		$myObject->rowclass="oddrow";
		$myRow= "even";
		}
	else {
		$myObject->rowclass="evenrow";
		$myRow= "odd";
		}

	// divid for javascript
	$myObject->divId= "object$objectindex";

	// positioning and size info
	$myObject->position_x= $myObjectVars['position_x'];
	$myObject->position_y= $myObjectVars['position_y'];
	$myObject->position_z= $myObjectVars['position_z'];
	$myObject->size_w= $myObjectVars['size_w'];
	$myObject->size_h= $myObjectVars['size_h'];

	$myObject->left= $myObject->position_x."px";
	$myObject->top= $myObject->position_y."px";
	$myObject->zindex= $myObject->position_z;

	// special processing if this is a Character
	$myObject->isCharacter= $myObjectVars['isCharacter'];
	$myObject->poseid= $myObjectVars['poseid'];
	if ($myObject->poseid!="") {
		// find pose
		berror("Frame Render: pose is image:$myObject->poseid.",1);

		// POSE SELECT MENU
		if ($myObject->isCharacter==1 && ($this->itemOwner || $this->itemEditor)) {
   			$query2= "SELECT obj.* FROM image AS obj WHERE obj.parentobjtype='document' AND obj.parentid='$myObject->id' AND obj.flavor='Pose' $session->statuswhere $session->publicwhere ORDER BY obj.rank DESC, obj.created ASC";
			if ($result2= @mysql_query($query2)) {
				$myObject->poseSelect= "<br />
					Pose:<select name='$myObject->divId-poseid'>\n";
				while ($array2= @mysql_fetch_array($result2)) {
					$id= $array2['id'];
					$title= htmlentities($array2['title']);
					if ($id==$myObject->poseid) {
						$selected= "selected";
						}
					else $selected= "";
					$myObject->poseSelect.= "<option value='$id' $selected>$title</option>\n";
					}
				$myObject->poseSelect.= "</select><br />";
				}
			}
			
		// POSE RENDER
  		$myObject->poseObj= new Image;
		$query2= "SELECT obj.* FROM image AS obj WHERE obj.id='$myObject->poseid' AND obj.siteid='$site->id' $session->statuswhere $session->publicwhere";
		$myObject->poseObj->selectObject($query2);
		if ($myObject->poseObj->id!="") {
			if ($myObject->size_w>0 && $myObject->size_h>0) {
				$myObject->poseObj->proportion($myObject->size_w,$myObject->size_h);
				}
			$myObject->poseObj->getBaseUrl();
			$myObject->imageUrl= $myObject->poseObj->uri;
			$width= $myObject->poseObj->width;
			$height= $myObject->poseObj->height;
			$myObject->width= $width."px";
			$myObject->numericwidth= $width;
			$myObject->height= $height."px";
			$myObject->numericheight= $height;

			// imagetag
			$imageTag="<img src=\"$myObject->imageUrl\" width=\"$myObject->numericwidth\" height=\"$myObject->numericheight\" border=0>";
			}

		if ($myObject->isCharacter==1) {
			// dialog direction
			$myObject->dialogAlign= $myObjectVars['dialogAlign'];
			$dAdialogAlign= "dA".$myObject->dialogAlign;
			$myObject->{$dAdialogAlign}= "checked=1";

			// dialog balloon
			if (trim($myObjectVars['dialog'])!="") {
				$myObject->dialogOffset= $myObjectVars['dialogOffset'];
				$dialogOffset= $myObject->numericheight + $myObject->dialogOffset;
				$myObject->dialog= $myObjectVars['dialog'];
				$dialog= bHtml($myObject->dialog);
				if ($myObject->dialogAlign=="left" || $myObject->dialogAlign=="") {
					// left
					$myObject->dialogTag= "
					<div id='dialog-$myObject->divId'
						style='position: absolute; width: 200px; z-index: ".($myObject->zindex+1)."; left: -30px; bottom: $dialogOffset; border: 0px; padding: 0px;' >
						<table width=200 border='0' cellpadding='0' cellspacing='0'>
							<tr>
								<td><img src='/bicons/dialog/nw.gif' width=15 height=15></td>
								<td><img src='/bicons/dialog/n-l.gif' width=27 height=15></td>
								<td style='background-image: url(/bicons/dialog/n.gif);'><img src='/bicons/dialog/spacer.gif' width=141 height=15></td>
								<td><img src='/bicons/dialog/ne.gif' width=17 height=15></td>

							</tr>
							<tr>
								<td style='background-image: url(/bicons/dialog/w.gif);'><img src='/bicons/dialog/spacer.gif' width=15 height=5></td>
								<td COLSPAN=2 align=center valign=middle  bgcolor='#ffffff'><div class='dialog'>$dialog</div></td>
								<td style='background-image: url(/bicons/dialog/e.gif);'><img src='/bicons/dialog/spacer.gif' width=15 height=5></td>
							</tr>
							<tr>

								<td><img src='/bicons/dialog/sw.gif' width=15 height=41></td>
								<td><img src='/bicons/dialog/s-l.gif' width=27 height=41></td>
								<td style='background-image: url(/bicons/dialog/s.gif);'><img src='/bicons/dialog/spacer.gif' width=141 height=41></td>
								<td><img src='/bicons/dialog/se.gif' width=17 height=41></td>
							</tr>
						</table>
					</div>";
					}
				elseif ($myObject->dialogAlign=="add") {
					// add
					$myObject->dialogTag= "
						<div id='dialog-$myObject->divId'
							style='position: absolute; width: 150px; z-index: ".($myObject->zindex+1)."; left: -30px; bottom: $dialogOffset; border: 0px; padding: 0px;' >
							<table width=150 border='0' cellpadding='0' cellspacing='0'>
								<tr>
									<td><img src='/bicons/dialog/nw.gif' width=15 height=15></td>
									<td style='background-image: url(/bicons/dialog/n.gif);'><img src='/bicons/dialog/spacer.gif' width=30 height=15></td>
									<td style='background-image: url(/bicons/dialog/n.gif);'><img src='/bicons/dialog/spacer.gif' width=91 height=15></td>
									<td><img src='/bicons/dialog/ne.gif' width=17 height=15></td>

								</tr>
								<tr>
									<td style='background-image: url(/bicons/dialog/w.gif);'><img src='/bicons/dialog/spacer.gif' width=15 height=5></td>
									<td COLSPAN=2 align=center valign=middle  bgcolor='#ffffff'><div class='dialog'>$dialog</div></td>
									<td style='background-image: url(/bicons/dialog/e.gif);'><img src='/bicons/dialog/spacer.gif' width=15 height=5></td>
								</tr>
								<tr>

									<td><img src='/bicons/dialog/sw.gif' width=15 height=41></td>
									<td style='background-image: url(/bicons/dialog/s.gif);'><img src='/bicons/dialog/spacer.gif' width=30 height=41></td>
									<td style='background-image: url(/bicons/dialog/s.gif);'><img src='/bicons/dialog/spacer.gif' width=91 height=41></td>
									<td><img src='/bicons/dialog/se.gif' width=17 height=41></td>
								</tr>
							</table>
						</div>";
						}
				else {
					// right
					$myObject->dialogTag= "
					<div id='dialog-$myObject->divId'
						style='position: absolute; width: 200px; z-index: ".($myObject->zindex+1)."; right: -30px; bottom: $dialogOffset; border: 0px; padding: 0px;' >
						<table width=200 border='0' cellpadding='0' cellspacing='0'>
							<tr>
								<td><img src='/bicons/dialog/nw.gif' width=15 height=15></td>
								<td style='background-image: url(/bicons/dialog/n.gif);'><img src='/bicons/dialog/spacer.gif' width=141 height=15></td>
								<td><img src='/bicons/dialog/n-r.gif' width=27 height=15></td>
								<td><img src='/bicons/dialog/ne.gif' width=17 height=15></td>

							</tr>
							<tr>
								<td style='background-image: url(/bicons/dialog/w.gif);'><img src='/bicons/dialog/spacer.gif' width=15 height=5></td>
								<td COLSPAN=2 align=center valign=middle  bgcolor='#ffffff'><div class='dialog'>$dialog</div></td>
								<td style='background-image: url(/bicons/dialog/e.gif);'><img src='/bicons/dialog/spacer.gif' width=15 height=5></td>
							</tr>
							<tr>

								<td><img src='/bicons/dialog/sw.gif' width=15 height=41></td>
								<td style='background-image: url(/bicons/dialog/s.gif);'><img src='/bicons/dialog/spacer.gif' width=141 height=41></td>
								<td><img src='/bicons/dialog/s-r.gif' width=27 height=41></td>
								<td><img src='/bicons/dialog/se.gif' width=17 height=41></td>
							</tr>
						</table>
					</div>";
					}
				$dialogOffset= "";
				} // end if dialog
			} // end if character
		} // end if poseid

	// OBJECT RENDER
	if ($this->itemOwner || $this->itemEditor) {
		$this->dblClickControls= "onDblClick=\"window.location='#controls';\"";
		$this->objects.= "
				<div id=\"$myObject->divId\" title=\"Click and drag to move; Double-click for controls.\"
					style=\"position: absolute; left: $myObject->left; top: $myObject->top; z-index: $myObject->zindex; width: $myObject->width; height: $myObject->height; border: 1px; border-style: none; \"
					onDblClick=\"window.location='#form-$myObject->divId';\"
					onMouseOver=\"MM_dragLayer('$myObject->divId','',0,0,$myObject->numericwidth,$myObject->numericheight,false,false,-1,-1,-1,-1,false,false,0,'',false,'');\">
					<a name=\"anchor-$myObject->divId\"> </a>
					$imageTag
					$myObject->dialogTag
					$label
				</div>
				";

		// OBJECT CONTROLS
		$this->objectControls.= "
		<tr class='$myObject->rowclass'>
			<td colspan=\"3\"><a name=\"form-$myObject->divId\"> </a>
				<span class='objFlavor'>$myObject->flavor:<br></span>
				<span class='objTitle'>$myObject->title</span> ( <a href='$myObject->uri' target='_top'>Original $myObject->flavor</a> ) ( <a href='$folder->baseUrl/comment-$this->id.scene?method=removeObject&remove=$objectindex'>Remove from Frame</a> )
			</td>
		</tr>
		<tr class='$myObject->rowclass'>
			<td align=\"center\" valign=\"middle\" rowspan=\"4\">
				<input type='hidden' name='object[$objectindex]' value='1'>
				<input type='hidden' name='$myObject->divId-objtype' value='$myObject->objtype'>
				<input type='hidden' name='$myObject->divId-id' value='$myObject->id'>
				<input type='hidden' name='$myObject->divId-isCharacter' value='$myObject->isCharacter'>
				<img src=\"$myObject->imageUrl\"><br />
				$myObject->poseSelect
				<br />
				<input type=\"submit\" name=\"submit\" value=\"Save Settings\" class='buttonstyle'/>
			</td>
			<td align=\"right\" valign=\"top\">Position:</td>
			<td valign=\"top\">
				<input name=\"$myObject->divId-position_x\" type=\"text\" size=\"3\" onchange=\"myUpdater('$myObject->divId','$myObject->divId-position_x','left');\" value=\"$myObject->position_x\" /> px right by
				<input name=\"$myObject->divId-position_y\" type=\"text\" size=\"3\" onchange=\"myUpdater('$myObject->divId','$myObject->divId-position_y','top');\" value=\"$myObject->position_y\" /> px down<br />
				 layer order: 
				 <input name=\"$myObject->divId-position_z\" type=\"text\" size=\"3\" onchange=\"myUpdater('$myObject->divId','$myObject->divId-position_z','zIndex');\" value=\"$myObject->position_z\" /> (0 is bottom)
			</td>
		</tr>";
		
		if ($myObject->isCharacter==1) {
			$this->objectControls.= "
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">Dialog:</td>
					<td valign=\"top\"><textarea name=\"$myObject->divId-dialog\" cols=\"20\" rows=\"4\" class='dialogTextArea'>$myObject->dialog</textarea></td>
				</tr>
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">Dialog offset:</td>
					<td valign=\"top\"><input name=\"$myObject->divId-dialogOffset\" type=\"text\" size=\"3\" value=\"$myObject->dialogOffset\" /> pixels up</td>
				</tr>
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">Dialog type:</td>
					<td valign=\"top\">
						<input name=\"$myObject->divId-dialogAlign\" type=\"radio\" class='radiostyle' value='left' $myObject->dAleft> left &nbsp;
						<input name=\"$myObject->divId-dialogAlign\" type=\"radio\" class='radiostyle' value='right' $myObject->dAright> right &nbsp;
						<input name=\"$myObject->divId-dialogAlign\" type=\"radio\" class='radiostyle' value='add' $myObject->dAadd> addendum
					</td>
				</tr>";
			}
		elseif ($myObject->flavor=="Label") {
			$this->objectControls.= "
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">Label:</td>
					<td valign=\"top\"><textarea name=\"$myObject->divId-label\" cols=\"20\" rows=\"4\" class='dialogTextArea'>$myObject->label</textarea></td>
				</tr>
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">&nbsp;</td>
					<td valign=\"top\">&nbsp;</td>
				</tr>
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">&nbsp;</td>
					<td valign=\"top\">&nbsp;</td>
				</tr
				";
			}
		else {
			$this->objectControls.= "
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">Max. Size:</td>
					<td valign=\"top\">
						<input name=\"$myObject->divId-size_w\" type=\"text\" size=\"3\" value=\"$myObject->size_w\" /> px wide by
						<input name=\"$myObject->divId-size_h\" type=\"text\" size=\"3\" value=\"$myObject->size_h\" /> px high<br />
						&nbsp; Set to 0 for normal size.
					</td>
				</tr>
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">imageid:</td>
					<td valign=\"top\"><input name=\"$myObject->divId-poseid\" type=\"text\" size=\"4\" value=\"$myObject->poseid\" /></td>
				</tr>
				<tr class='$myObject->rowclass'>
					<td align=\"right\" valign=\"top\">&nbsp;</td>
					<td valign=\"top\">&nbsp;</td>
				</tr
				";
			}
		}
	else {
		// next link
		if ($this->offset<$this->total && $this->foundOnOffset) {
			$this->singleClickAdvance= "onClick=\"window.location='".$folder->baseUrl."document-.frame?offset=$this->offset&total=$this->total';\" title='Click to advance frame.'";
			}
		elseif ($this->offset==$this->total && $this->foundOnOffset) {
			$this->singleClickAdvance= "onClick=\"window.location='".$folder->baseUrl."document-.frame?offset=0&total=$this->total';\"  title='Click to loop back to first frame.'";
			}
		$this->objects.= "
				<div id=\"$myObject->divId\" title=\"$myObject->title\"
					style=\"position: absolute; left: $myObject->left; top: $myObject->top; z-index: $myObject->zindex; width: $myObject->width; height: $myObject->height; border: 1px; border-style: none; \">
					<a name=\"anchor-$myObject->divId\"> </a>
					$imageTag
					$myObject->dialogTag
					$label
				</div>
				";
		}

	unset($myObject, $myObjectVars, $query, $query2, $label, $imageTag);
	$objectindex++;
	}

// SCENE CONTROL PART II
// first is 0
$previous= $this->frameArrayKey - 1;
$next= $this->frameArrayKey + 1;
$last= $this->total - 1;

// prevtag / nexttag logic
if ($this->offset!=1) {
	$this->prevtag= "<a href='$object->baseUrl?frameid=".$frameArray[$previous]['id']."'>&laquo; Prev</a>&nbsp;&nbsp;";
	}
if ($this->offset==1) {
	// not showing jump-to-last
	//$this->prevtag= "<a href='$object->baseUrl?frameid=".$frameArray[$last]['id']."'>Last &raquo</a>&nbsp;&nbsp;";
	$this->prevtag= "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;";
	}
if ($this->offset<$this->total) {
	$this->nexttag= "&nbsp;&nbsp;<a href='$object->baseUrl?frameid=".$frameArray[$next]['id']."'>Next &raquo;</a>";
	}
if ($this->offset==$this->total) {
	$this->nexttag= "&nbsp;&nbsp;<a href='$object->baseUrl?frameid=".$frameArray[0]['id']."'>&laquo; Restart &raquo;</a>";
	}
	
// SCENEINFO COLOR
if ($folder->p_infoColor!="") $this->infoColor= $folder->p_infoColor;
else $this->infoColor= "white";

// INFO POSITION
$bgcenter= $this->bgnumericwidth / 2;
$this->infoLeft= ($bgcenter - 90)."px";
$this->infoTop= ($this->bgnumericheight-20)."px";

berror("<b>Frame Render: FINISHED</b>.",1);
//if ($this->itemEditor || $this->itemOwner) $this->showNull= 1;

%%header%%


%%css%%


%%template%%
<!-- frame:$this->id (editor or null) -->
<div id='frame$this->id'>
	<div id='frameInfo' class='frameInfo' style='position: absolute; width: 180px; z-index: 1; left: $this->infoLeft; top: $this->infoTop; border: 1px; padding: 0px; border-style: none;' >
		$this->notFound
		$this->prevtag $this->offset of $this->total $this->nexttag
	</div>
	$this->objects
	<br /><a name="controls">&nbsp;</a>
	<br />
	<table class="boothtable"  cellpadding="8">
		<tr>
			<td valign='top'>
				<span class='objTitle'>Players/Props Controls:</span> 
				( <a href="$folder->baseUrl/comment-$this->id.scene?method=edit">Edit this Frame</a> )
				( <a href="$folder->baseUrl/comment-$this->id.scene?method=duplicate">Duplicate this Frame</a> )
				<p class='objInfo'><a href="#top">Return to the frame.</a> 
					You can also double-click to switch between frame and controls.</p>
				{list:SELECT obj.* FROM document AS obj WHERE obj.flavor='Character';characterSelect}
				<form name="objectControls" action="$folder->baseUrl/comment-$this->id.scene?method=save$session->cgi" method="POST" onDblClick="window.location='#top';">
				<input type="hidden" name="id" value="$this->id">
				<input type="hidden" name="parentobjtype" value="$this->parentobjtype">
				<input type="hidden" name="parentid" value="$this->parentid">
				<table class="edittable">
				$this->objectControls
				</table>
				</form>
				<br />
				<form method='post' action='$folder->baseUrl/comment-.scene?method=save$session->cgi'>
					<input type=hidden name='parentobjtype' value='$object->objtype'>
					<input type=hidden name='parentid' value='$object->id'>
					<input type=hidden name='author' value=''>
					<input type="hidden" name="rank" value="100">
					<input type="hidden" name="status" value="posted">
					<input type="hidden" name="public" value="1">
					<table border='0' align='center' class='editTable'>
						<tr>
							<td align='right'>Add a new frame to this $object->flavor: <input type='submit' name='submit' value='add new frame' class='buttonstyle'></td>
						</tr>
					</table>
				</form>
				<p class='info'>End of Controls. <a href="#controls">Top of Controls</a> or <a href="#top">Return to the frame.</a></p>
				<img src="/bicons/spacer.gif" width=430 height=1>
			</td>
		</tr>
	</table>
</div>

%%listrow%%


%%nullobject%%
	<div id='frameInfo' class='frameInfo' style='position: absolute; width: 180px; z-index: 1; left: $this->infoLeft; top: $this->infoTop; border: 1px; padding: 0px; border-style: none;' >
		No frames found. <a href='#' onClick='document.myForm.submit.click();'>Add one</a>
	</div>
<br />
<table class='boothTable'>
<tr>
<td><a name='newframe'>
No frames found.
<br />
<form name='myForm' method='post' action='$folder->baseUrl/comment-.scene?method=save$session->cgi'>
	<input type=hidden name='parentobjtype' value='$object->objtype'>
	<input type=hidden name='parentid' value='$object->id'>
	<input type=hidden name='author' value=''>
	<input type="hidden" name="rank" value="100">
	<input type="hidden" name="status" value="posted">
	<input type="hidden" name="public" value="1">
	<table border='0' align='center' class='editTable'>
		<tr>
			<td colspan='2'>Add a new frame to this $object->flavor:</td>
		</tr>
		<tr>
			<td>&nbsp;</td>
			<td><input type='submit' name='submit' value='add' class='buttonstyle'></td>
		</tr>
	</table>
</form>
</td>
</tr>
</table>

%%footer%%


%%postprocess%%


%%end of context%%
