# THIS FILE DISPLAYS GUTS OF: Control Panel, Graemlin Intro

&FormStart("$vars_config{CGIURL}/cp.cgi", "$Hiddens");

print "<p align='center'>";

print <<IMRUNNINGOUTOFHERE;
<table border="0" width="95%">
<tr><td align="left">
<p><font SIZE="2" FACE="Verdana, Arial"> You can add another Graemlin$trademark assignment
 from within this page. You may have up to 25 custom Graemlin$trademark assignments, in
addition to the original 11 Graemlin$trademark assignments provided by default. Please
note that adding too many custom Graemlin$trademark graphics may have an adverse effect on the speed of your board.
</font></p>
<p><font face="Verdana, Arial" size="2">To review your current Graemlin$trademark assignments
<a href="$vars_config{CGIURL}/cp.cgi?ubb=graemlin_intro">click here.</a></font> <img src="$vars_config{NonCGIURL}/smile.gif" width="15" height="15"></p>
<p><font face="Verdana, Arial" size="2"><b>Please make sure that
                  the image is already uploaded to your graemlins directory in
                  binary</b>. Your graemlins directory is in your noncgi directory.
                  You need no special permissions on these files. There is no
                  need to add a colon (:) to either end of the keystroke combination,
                  that is added in for you automatically.</font></p>
</td></tr></table>
IMRUNNINGOUTOFHERE



&TBT;    #Table Border Top in cp_common.pl

&HeaderRow("Add New Custom Graemlin$trademark", "3", "#5d7790", "#FFFFFF", "center", "2");

print <<UGH;
            <tr bgcolor="#FFFFFF">
              <td align="CENTER" width="40%"><font face="Verdana, Arial" size="2">Name</font></td>
              <td align="CENTER" width="30%"><font face="Verdana, Arial" size="2">Keystroke</font></td>
              <td align="CENTER" width="30%"><font face="Verdana, Arial" size="2">&nbsp;&nbsp;&nbsp;File Name</font></td>
            </tr>
UGH


print <<THEENDOFITALL;
	<tr bgcolor="#FFFFFF">
		<td align="CENTER" width="25%">
			<input type="TEXT" name="graem||NEW||text" size="25" maxlength="25" value="$short->{'text'}">
		</td>
		<td align="CENTER" width="25%">
			<nobr> <b>:</b> <input type="TEXT" name="graem||NEW||trigger" size="20" maxlength="25"> <b>:</b> </nobr>
		</td>
		<td align="CENTER" width="25%">
			<input type="TEXT" name="graem||NEW||image" maxlength="25" size="20" value="$short->{'image'}">
		</td>
	</tr>
THEENDOFITALL

&TBB;    #Table Border Bottom in cp_common.pl

print "</p>";

&Submit("Update Graemlin Settings");

# Nothing below this line should be changed.. and there is no more code!

# This entire program is copyright Infopop Corporation.
# For more info on the Ultimate Bulletin Board and other Infopop
# Products/Services, visit: http://www.infopop.com

# You may not distribute this program in any manner, modified or otherwise.

#You make modifications, but only for your own use and within the confines of the UBB License Agreement.

# DANGER: Do not remove the following line!
1;
