#####################################################
#  LEO SuperCool BBS / LeoBBS X / 雷傲極酷超級論壇  #
#####################################################
# 基於山鷹(糊)、花無缺製作的 LB5000 XP 2.30 免費版  #
#   新版程式製作 & 版權所有: 雷傲科技 (C)(R)2004    #
#####################################################
#      主頁地址： http://www.LeoBBS.com/            #
#      論壇地址： http://bbs.LeoBBS.com/            #
#####################################################

$maxpoststr = "" if ($maxpoststr eq 0);
$maxpoststr = 100 if (($maxpoststr < 100)&&($maxpoststr ne ""));
    if ($startnewthreads eq "no")        { $startthreads = "在此論壇中新的主題和文章回覆只能由壇主、版主發表！"; }
    elsif ($startnewthreads eq "follow") { $startthreads = "在此論壇中新的主題只能由壇主、版主發表！普通會員只可以跟文章！"; }
    elsif ($startnewthreads eq "all")    { $startthreads = "任何人均可以發表和回覆主題，未註冊會員發表文章密碼請留空！"; }
    elsif ($startnewthreads eq "cert")   { $startthreads = "在此論壇中新的主題只能由壇主、版主、認證的會員發表！"; }
    else { $startthreads = "所有註冊會員均可以發表和回覆主題！"; }

    if ($emailfunctions eq "on") {
	if ($innotify eq "yes") { $requestnotify = " checked"; } else { $requestnotify = ""; }
	$requestnotify = qq~&nbsp;<input type=checkbox name="notify" value="yes"$requestnotify>有回覆時使用郵件通知您？<br>~;
    }
    if ($emoticons eq "on") {
       $emoticonslink = qq~<li><span style=cursor:hand onClick="javascript:openScript('$miscprog?action=showsmilies',300,350)">准許\<B>使用</B>表情字符轉換</span>~;
       $emoticonsbutton =qq~&nbsp;<input type=checkbox name="inshowemoticons" value="yes" checked>您是否希望<b>使用</b>表情字符轉換？<br>~;
    }
    $maxpoststr = "(文章中最多包含 <B>$maxpoststr</B> 個字符)" if ($maxpoststr ne "");
if ($canchgfont ne "no") {
    $fontpost = qq~&nbsp;<input type=checkbox name="inshowchgfont" value="yes">使用字體轉換？<br>~;
} else {
    undef $fontpost;
}

if ($idmbcodestate eq "on") {
    $idmbcodestates = qq~&nbsp;<input type=checkbox name="uselbcode" value="yes" checked>使用 LeoBBS 標籤？<BR>~;
} else {
    $idmbcodestates = "";
}

    $output .= qq~<script>
function HighlightAll(theField) {
var tempval=eval("document."+theField)
tempval.focus()
tempval.select()
therange=tempval.createTextRange()
therange.execCommand("Copy")}
function DoTitle(addTitle) { var revisedTitle;var currentTitle = document.FORM.intopictitle.value;revisedTitle = addTitle+currentTitle;document.FORM.intopictitle.value=revisedTitle;document.FORM.intopictitle.focus();return;}
</script><form action=post.cgi method=post name="FORM" enctype="multipart/form-data">
<input type=hidden name=action value=addnew>
<input type=hidden name=forum value="$inforum">
<SCRIPT>valigntop()</SCRIPT>
<table cellpadding=0 cellspacing=0 width=$tablewidth bgcolor=$tablebordercolor align=center>
<tr><td><table cellpadding=6 cellspacing=1 width=100%>
<tr><td bgcolor=$titlecolor colspan=2 $catbackpic>&nbsp;<font color=$titlefontcolor><b>快速發表新主題</b></font> -- $startthreads</td></tr>
<tr><td bgcolor=$miscbacktwo colspan=2><font color=$titlefontcolor>您目前的身份是： <B><u><font color=$fonthighlight>$inmembername</font></u></B> ，要使用其他會員身份，請輸入會員名稱和密碼。未註冊訪客請輸入網名，密碼留空。</td></tr>
<tr><td bgcolor=$miscbacktwo width=220>&nbsp;<font color=$fontcolormisc><b>輸入會員名稱和密碼:</b></font></td><td bgcolor=$miscbacktwo>　<font color=$fontcolormisc><b>會員名稱</b>: <input type=text name=membername> <span onclick="javascript:location.href='register.cgi?forum=$inforum'" style=cursor:hand>沒有註冊？</span>　<b>密碼:</b> <input type=password name=password> <a href=profile.cgi?action=lostpass style=cursor:help>忘記密碼？</a></font></td></tr>
<tr><td bgcolor=$miscbackone>&nbsp;<font color=$fontcolormisc><b>主題標題</b></font>　
<select name=font onchange=DoTitle(this.options[this.selectedIndex].value)>
<OPTION selected value="">選擇話題</OPTION> <OPTION value=[原創]>[原創]</OPTION><OPTION value=[轉貼]>[轉貼]</OPTION><OPTION value=[灌水]>[灌水]</OPTION><OPTION value=[討論]>[討論]</OPTION><OPTION value=[求助]>[求助]</OPTION><OPTION value=[推薦]>[推薦]</OPTION><OPTION value=[公告]>[公告]</OPTION><OPTION value=[注意]>[注意]</OPTION><OPTION value=[貼圖]>[貼圖]</OPTION><OPTION value=[建議]>[建議]</OPTION><OPTION value=[下載]>[下載]</OPTION><OPTION value=[分享]>[分享]</OPTION>
</SELECT></td>
<td bgcolor=$miscbackone>　<input type=text size=60 maxlength=80 name="intopictitle" value="$intopictitle">　不得超過 40 個中文字</td></tr>
<td bgcolor=$miscbacktwo valign=top>&nbsp;<font color=$fontcolormisc><b>選項</b> $maxpoststr<br><br>$idmbcodestates
&nbsp;<input type=checkbox name="inshowsignature" value="yes" checked>顯示簽名？<br>
$requestnotify$emoticonsbutton$fontpost</center>
<td bgcolor=$miscbacktwo>　<TEXTAREA cols=80 name=inpost rows=9 wrap="soft" onkeydown=ctlent()>$inpost</TEXTAREA><br></td></tr>~;

    if (($arrowupload ne "off")||($membercode eq "ad")||($membercode eq 'smo')||($inmembmod eq "yes")) {
    $uploadreqire = "" if ($uploadreqire <= 0);
    $uploadreqire = "<BR>發表文章數要大於 <B>$uploadreqire</B> 篇(認證會員不限)" if ($uploadreqire ne "");
	$output .= qq~<script language="javascript">function jsupfile(upname) {upname='[UploadFile='+upname+']';if (document.FORM.inpost.createTextRange && document.FORM.inpost.caretPos) {var caretPos = document.FORM.inpost.caretPos;caretPos.text = caretPos.text.charAt(caretPos.text.length - 1) == ' ' ? upname + ' ' : upname;document.FORM.inpost.focus();} else {document.FORM.inpost.value+=upname;document.FORM.inpost.focus();}}</script>~;
        $output .= qq~<tr><td bgcolor=$miscbackone><b>上載附件或圖片</b> (最大容量 <B>$maxupload</B>KB)$uploadreqire</td><td bgcolor=$miscbackone> <iframe id="upframe" name="upframe" src="upfile.cgi?action=uppic&forum=$inforum&topic=$intopic" width=100% height=40 marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=NO></iframe><br><font color=$fonthighlight>目前附件:(如不需要某個附件，只需刪除內容中的相應 [UploadFile ...] 標籤即可)  [<a href=upfile.cgi?action=delup&forum=$inforum target=upframe title=刪除所有未被發佈的附件臨時檔案 OnClick="return confirm('確定刪除所有未被發佈的附件臨時檔案麼？');">刪除</a>] </font><SPAN id=showupfile name=showupfile></SPAN></td></tr>~;
    }
    $output .= qq~<tr><td bgcolor=$miscbacktwo colspan=2 align=center><input type=Submit value="發 表 新 主 題" name=Submit onClick="return clckcntr();">　　<input type=button value='預 覽 內 容' name=Button onclick=gopreview()>　　<input type="reset" name="Clear" value="清 除"></td></tr></table></td></tr></table><SCRIPT>valignend()</SCRIPT></form>
<form name=preview action=preview.cgi method=post target=preview_page><input type=hidden name=body value=""><input type=hidden name=forum value="$inforum"></form>
<script>
function gopreview(){
document.preview.body.value=document.FORM.inpost.value;
var popupWin = window.open('', 'preview_page', 'scrollbars=yes,width=600,height=400');
document.preview.submit()
}
</script>~;
1;
