&check_cookie;
&check_login;
&get_fonts;
open(TL,"$path_to_lang/$thislang/buttonwizard.txt");
while(<TL>){push(@LaNg,$_)}
&exec_lang;
@buttons=split(/\|/,$buttons);
for (@buttons){
if($_ eq "upload"){$upload_button=qq~<input type=button value="$ini_button1" class=WRX_BUTTON style="width:$button1Width" onclick=onclick=uploader()>~}
	}
	$attr="inline";
	$apply="none";
if($buttons =~ /create_popup/){$Create_Pop_Ups="yes"}else{$Create_Pop_Ups="no"}	
print "Content-type: text/html\n\n";
open(I,"$htm/buttonwizard.txt");
while(<I>){
s/\$(\w+)/${$1}/eg;
print
}
1;