<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<!--#include file="inc/plus_check.asp"-->
<%
'================================
'当前版本号：1.0
'程序作者：(21EClub)Andy
'21EClub网聚人 版权所有
'请尊重作者劳动成果，保留版权信息
'QQ:86093788 Http://Www.51Ent.Com
'================================
Dv_Plus.Name = "EC_Plus_Argue"
Dvbbs.stats = "浏览辩论主题"
Dvbbs.LoadTemplates("")
Dvbbs.nav()
	Dvbbs.Head_var 0,0,Dv_Plus.Plus_Name,"EC_Argue_Index.asp"
		Argue_Nav_Link()
%>
<!--#include file="EC_Argue_Const.asp"-->
<%
Dim EB_Rs,EB_SQL
Dim EB_ArgueID,EB_ArgueTitle,EB_ArgueText,EB_ZText,EB_FText,EB_Argue_Class,EB_ArgueVotes,EB_ArgueHits,EB_UserName,EB_AppearDate,EB_ArgueDays,EB_ArgueIsMiddle,EB_VoteUserList
Dim EB_Appear,EB_ZArgueList,EB_FArgueList,EB_MArgueList,EB_ZNum,EB_FNum,EB_MNum,EB_Action,EB_IsPorm,EB_I,EB_UserList
EB_ArgueID = Replace(Request("ArgueID"),"'","''")
EB_Action = Request("Act")
EB_IsPorm = Request("IsPorm")
	If EB_ArgueID = "" Or Not IsNumeric(EB_ArgueID) Then ShowErr(10)
		Set EB_Rs = Server.CreateObject("Adodb.RecordSet")
		EB_SQL = "Select ArgueID,Argue_Title,Argue_Text,Argue_ZText,Argue_FText,Argue_Class,Argue_Votes,Argue_Hits,UserName,Appear_Date,Argue_Days,Argue_IsMiddle,ZVoteUserList,FVoteUserList From EC_ArgueTopic Where Argue_Open =1 And ArgueID="&EB_ArgueID
		EB_Rs.Open EB_SQL,ArgueConn,3,3
			If Not(EB_Rs.BOF and EB_Rs.EOF) Then
				EB_ArgueTitle = EB_Rs("Argue_Title")
				EB_ArgueText = EB_Rs("Argue_Text")
				EB_ZText = EB_Rs("Argue_ZText")
				EB_FText = EB_Rs("Argue_FText")
				EB_Argue_Class = EB_Rs("Argue_Class")
				EB_ArgueVotes =  Split(EB_Rs("Argue_Votes"),"|")
				EB_Rs("Argue_Hits") = EB_Rs("Argue_Hits") + 1
				EB_ArgueHits = EB_Rs("Argue_Hits")
				EB_UserName = EB_Rs("UserName")
				EB_AppearDate = EB_Rs("Appear_Date")
				EB_ArgueDays = EB_Rs("Argue_Days")
				EB_ArgueIsMiddle = EB_Rs("Argue_IsMiddle")
					If EB_IsPorm = 1 Then
						If EB_Rs("ZVoteUserList") <> "" Then 
							EB_VoteUserList = Split(EB_Rs("ZVoteUserList"),"|")
							EB_UserList = 1
						Else
							EB_UserList = 0
						End if
					Elseif EB_IsPorm = 2 Then
						If EB_Rs("FVoteUserList") <> "" Then
							EB_VoteUserList = Split(EB_Rs("FVoteUserList"),"|")
							EB_UserList = 1
						Else
							EB_UserList = 0
						End if
					End if
		EB_Rs.Update
			Else
				ShowErr(10)
			End if
		EB_Rs.Close
			If Not EB_Action = 2 Then
	'--------------------------------------------
	'观点显示部分
	'--------------------------------------------
EB_ZNum = 0
EB_FNum = 0
EB_MNum = 0
		EB_ZArgueList = "<div align=""left"">"
		EB_FArgueList = "<div align=""left"">"
		EB_MArgueList = "<div align=""left"">"
'0=AppearID,1=Appear_Title,2=Appear_Text,3=UserName,4=IsPorm
Set EB_Rs = ArgueConn.Execute("Select AppearID,Appear_Title,Appear_Text,UserName,IsPorm From EC_ArgueList Where ArgueID = "&EB_ArgueID&" Order By AppearID Desc")
	If Not EB_Rs.Eof then
		EB_SQL = EB_Rs.GetRows(-1)
For EB_Appear = 0 To Ubound(EB_SQL,2)
'正方观点列表
	If EB_SQL(4,EB_Appear) = 1 Then
			EB_ZNum = EB_ZNum + 1
				EB_ZArgueList = EB_ZArgueList&"<table><tr><td height=""4""></td></tr></table>"
				EB_ZArgueList = EB_ZArgueList&"<table width=""98%"" cellpadding=""0"" cellspacing=""0"" bgcolor=""#FEFAE7"" style=""border-collapse:collapse;"">"
				EB_ZArgueList = EB_ZArgueList&"<tr><td height=""25"" style=""border-top-width:1; border-right-width:1; border-left-width:1; border-top-color:rgb(255,240,177); border-right-color:rgb(255,240,177); border-left-color:rgb(255,240,177); border-top-style:solid; border-right-style:solid; border-left-style:solid;"">"
				EB_ZArgueList = EB_ZArgueList&"<p>&nbsp;<img src=""EC_Argue/is0.gif"" width=""11"" height=""10"" align=""absmiddle""> "
				EB_ZArgueList = EB_ZArgueList&"<font color=""#BD0000""><b>"
				EB_ZArgueList = EB_ZArgueList&EB_SQL(1,EB_Appear)
				EB_ZArgueList = EB_ZArgueList&"</b></font></p></td></tr>"
				EB_ZArgueList = EB_ZArgueList&"<tr><td background=""EC_Argue/line2.gif"" height=""1"" style=""border-right-width:1; border-left-width:1; border-right-color:rgb(255,240,177); border-left-color:rgb(255,240,177); border-right-style:solid; border-left-style:solid;"">"
				EB_ZArgueList = EB_ZArgueList&"</td></tr><tr>"
				EB_ZArgueList = EB_ZArgueList&"<td style=""border-right-width:1; border-left-width:1; border-right-color:rgb(255,240,177); border-left-color:rgb(255,240,177); border-right-style:solid; border-left-style:solid;"" bgcolor=""#FFFDF3"" height=""26"">"
				EB_ZArgueList = EB_ZArgueList&"<p>"&EB_SQL(2,EB_Appear)&"</p>"
				EB_ZArgueList = EB_ZArgueList&"</td></tr><tr>"
				EB_ZArgueList = EB_ZArgueList&"<td style=""border-right-width:1; border-left-width:1; border-right-color:rgb(255,240,177); border-left-color:rgb(255,240,177); border-right-style:solid; border-left-style:solid;"" height=""1"" background=""EC_Argue/line2.gif"">"
				EB_ZArgueList = EB_ZArgueList&"</td></tr><tr>"
				EB_ZArgueList = EB_ZArgueList&"<td style=""border-right-width:1; border-bottom-width:1; border-left-width:1; border-right-color:rgb(255,240,177); border-bottom-color:rgb(255,240,177); border-left-color:rgb(255,240,177); border-right-style:solid; border-bottom-style:solid; border-left-style:solid;"" height=""23"">"
				EB_ZArgueList = EB_ZArgueList&"<p>&nbsp;<img src=""EC_Argue/is1.gif"" align=""absmiddle""> "
				EB_ZArgueList = EB_ZArgueList&"作者：<a href=""dispuser.asp?name="&EB_SQL(3,EB_Appear)&""" target=""_blank"">"
				EB_ZArgueList = EB_ZArgueList&EB_SQL(3,EB_Appear)&"</a> "
					If InStr(EB_Masterlist,"|"&Dvbbs.MemberName&"|")<0 Or Dvbbs.Master = True Then
				EB_ZArgueList = EB_ZArgueList&" [<font color=blue>管理操作：</font><a href=""EC_Argue_MasterArgue.asp?Act=5&AppearID="&EB_SQL(0,EB_Appear)&""" target=""_blank"">删除此观点</a>]"
					End if
				EB_ZArgueList = EB_ZArgueList&"</p></td></tr></table>"
'反方观点列表
	Elseif EB_SQL(4,EB_Appear) = 2 Then
			EB_FNum = EB_FNum + 1
				EB_FArgueList = EB_FArgueList&"<table><tr><td height=""4""></td></tr></table>"
				EB_FArgueList = EB_FArgueList&"<table width=""98%"" cellpadding=""0"" cellspacing=""0"" bgcolor=""#E2ECFE"" style=""border-collapse:collapse;"">"
				EB_FArgueList = EB_FArgueList&"<tr><td height=""25"" style=""border-top-width:1; border-right-width:1; border-left-width:1; border-top-color:rgb(188,223,255); border-right-color:rgb(188,223,255); border-left-color:rgb(188,223,255); border-top-style:solid; border-right-style:solid; border-left-style:solid;"">"
				EB_FArgueList = EB_FArgueList&"<p>&nbsp;<img src=""EC_Argue/is0.gif"" width=""11"" height=""10"" align=""absmiddle""> "
				EB_FArgueList = EB_FArgueList&"<font color=""#BD0000""><b>"
				EB_FArgueList = EB_FArgueList&EB_SQL(1,EB_Appear)
				EB_FArgueList = EB_FArgueList&"</b></font></p></td></tr>"
				EB_FArgueList = EB_FArgueList&"<tr><td background=""EC_Argue/line2.gif"" height=""1"" style=""border-right-width:1; border-left-width:1; border-right-color:rgb(152,184,181); border-left-color:rgb(188,223,255); border-right-style:solid; border-left-style:solid;"">"
				EB_FArgueList = EB_FArgueList&"</td></tr><tr>"
				EB_FArgueList = EB_FArgueList&"<td style=""border-right-width:1; border-left-width:1; border-right-color:rgb(188,223,255); border-left-color:rgb(188,223,255); border-right-style:solid; border-left-style:solid;"" bgcolor=""#E8F4FF"" height=""26"">"
				EB_FArgueList = EB_FArgueList&"<p>"&EB_SQL(2,EB_Appear)&"</p>"
				EB_FArgueList = EB_FArgueList&"</td></tr><tr>"
				EB_FArgueList = EB_FArgueList&"<td style=""border-right-width:1; border-left-width:1; border-right-color:rgb(188,223,255); border-left-color:rgb(188,223,255); border-right-style:solid; border-left-style:solid;"" height=""1"" background=""EC_Argue/line2.gif"">"
				EB_FArgueList = EB_FArgueList&"</td></tr><tr>"
				EB_FArgueList = EB_FArgueList&"<td style=""border-right-width:1; border-bottom-width:1; border-left-width:1; border-right-color:rgb(188,223,255); border-bottom-color:rgb(188,223,255); border-left-color:rgb(188,223,255); border-right-style:solid; border-bottom-style:solid; border-left-style:solid;"" height=""23"">"
				EB_FArgueList = EB_FArgueList&"<p>&nbsp;<img src=""EC_Argue/is1.gif"" align=""absmiddle""> "
				EB_FArgueList = EB_FArgueList&"作者：<a href=""dispuser.asp?name="&EB_SQL(3,EB_Appear)&""" target=""_blank"">"
				EB_FArgueList = EB_FArgueList&EB_SQL(3,EB_Appear)&"</a>"
					If InStr(EB_Masterlist,"|"&Dvbbs.MemberName&"|")<0 Or Dvbbs.Master = True Then
				EB_FArgueList = EB_FArgueList&" [<font color=blue>管理操作：</font><a href=""EC_Argue_MasterArgue.asp?Act=5&AppearID="&EB_SQL(0,EB_Appear)&""" target=""_blank"">删除此观点</a>]"
					End if
				EB_FArgueList = EB_FArgueList&"</p>"
				EB_FArgueList = EB_FArgueList&"</td></tr></table>"
'第三方观点
	Elseif EB_SQL(4,EB_Appear) = 3 Then
		If EB_ArgueIsMiddle = 1 Then
			EB_MNum = EB_MNum + 1
				EB_MArgueList = EB_MArgueList&"<table><tr><td height=""4""></td></tr></table>"
				EB_MArgueList = EB_MArgueList&"<table width=""100%"" cellpadding=""0"" cellspacing=""0"" bgcolor=""#EEEFE2"" style=""border-collapse:collapse;"">"
				EB_MArgueList = EB_MArgueList&"<tr><td height=""25"" style=""border-top-width:1; border-right-width:1; border-left-width:1; border-top-color:rgb(152,184,181); border-right-color:rgb(152,184,181); border-left-color:rgb(152,184,181); border-top-style:solid; border-right-style:solid; border-left-style:solid;"">"
				EB_MArgueList = EB_MArgueList&"<p>&nbsp;<img src=""EC_Argue/is0.gif"" width=""11"" height=""10"" align=""absmiddle""> "
				EB_MArgueList = EB_MArgueList&"<font color=""#BD0000""><b>"
				EB_MArgueList = EB_MArgueList&EB_SQL(1,EB_Appear)
				EB_MArgueList = EB_MArgueList&"</b></font></p></td></tr>"
				EB_MArgueList = EB_MArgueList&"<tr><td background=""EC_Argue/line2.gif"" height=""1"" style=""border-right-width:1; border-left-width:1; border-right-color:rgb(255,240,177); border-left-color:rgb(255,240,177); border-right-style:solid; border-left-style:solid;"">"
				EB_MArgueList = EB_MArgueList&"</td></tr><tr>"
				EB_MArgueList = EB_MArgueList&"<td style=""border-right-width:1; border-left-width:1; border-right-color:rgb(152,184,181); border-left-color:rgb(152,184,181); border-right-style:solid; border-left-style:solid;"" bgcolor=""#F2F4EC"" height=""26"">"
				EB_MArgueList = EB_MArgueList&"<p>"&EB_SQL(2,EB_Appear)&"</p>"
				EB_MArgueList = EB_MArgueList&"</td></tr><tr>"
				EB_MArgueList = EB_MArgueList&"<td style=""border-right-width:1; border-left-width:1; border-right-color:rgb(152,184,181); border-left-color:rgb(152,184,181); border-right-style:solid; border-left-style:solid;"" height=""1"" background=""EC_Argue/line2.gif"">"
				EB_MArgueList = EB_MArgueList&"</td></tr><tr>"
				EB_MArgueList = EB_MArgueList&"<td style=""border-right-width:1; border-bottom-width:1; border-left-width:1; border-right-color:rgb(152,184,181); border-bottom-color:rgb(152,184,181); border-left-color:rgb(152,184,181); border-right-style:solid; border-bottom-style:solid; border-left-style:solid;"" height=""23"">"
				EB_MArgueList = EB_MArgueList&"<p>&nbsp;<img src=""EC_Argue/is1.gif"" align=""absmiddle""> "
				EB_MArgueList = EB_MArgueList&"作者：<a href=""dispuser.asp?name="&EB_SQL(3,EB_Appear)&""" target=""_blank"">"
				EB_MArgueList = EB_MArgueList&EB_SQL(3,EB_Appear)&"</a>"
					If InStr(EB_Masterlist,"|"&Dvbbs.MemberName&"|")<0 Or Dvbbs.Master = True Then
				EB_MArgueList = EB_MArgueList&" [<font color=blue>管理操作：</font><a href=""EC_Argue_MasterArgue.asp?Act=5&AppearID="&EB_SQL(0,EB_Appear)&""" target=""_blank"">删除此观点</a>]"
					End if
				EB_MArgueList = EB_MArgueList&EB_SQL(3,EB_Appear)&"</p>"
				EB_MArgueList = EB_MArgueList&"</td></tr></table>"
		End if
	End if
Next
		EB_ZArgueList = EB_ZArgueList&"</div>"
		EB_FArgueList = EB_FArgueList&"</div>"
		EB_MArgueList = EB_MArgueList&"</div>"
	End if
EB_Rs.Close
				End if
%>
<table border="0" width="<%=Dvbbs.mainsetting(0)%>" cellpadding=2 cellspacing=0 align=center>    <tr>
        <td valign="top" width="156">
<%Argue_ClassList("All")%>        </td>
        <td valign="top">
<table border="0" cellpadding=3 cellspacing=1 align=center class=Tableborder1 Style="Width:100%" width="100%">
                <tr>
                    <th height=23 align=left colspan="2">
                        <p>辩论主题：<%=EB_ArgueTitle%></p>
                    </th>
                </tr>
                <tr>
                    <td width="50%" valign="top" bgcolor="#EFEFEF">
<STRONG><FONT color=#333333>论题描述：<br></FONT></STRONG><%=EB_ArgueText%>                   </td>
                    <td width="50%" valign="top" bgcolor="#EFEFEF">
                        <table cellpadding="0" cellspacing="0" width="100%">
                            <tr>
                                <td width="188" height="22"><STRONG><FONT color=#333333>发起人：</FONT></STRONG><a href="dispuser.asp?name=<%=EB_UserName%>" target="_blank"><%=EB_UserName%></a></td>
                                <td width="188" height="22"><STRONG><FONT color=#333333>浏览量：</FONT></STRONG><%=EB_ArgueHits%></td>
                            </tr>
                            <tr>
                                <td width="296" height="22" colspan="2"><STRONG><FONT color=#333333>所属类别：</FONT></STRONG><a href="EC_Argue_List.asp?ArgueClassID=<%=EB_Argue_Class%>"><%Argue_ClassList(EB_Argue_Class) - 1%></a></td>
                            </tr>
                            <tr>
                                <td width="188" height="22"><STRONG><FONT color=#333333>发起时间：</FONT></STRONG><%=EB_AppearDate%></td>
                                <td width="188" height="22"><STRONG><FONT color=#333333>结束时间：</FONT></STRONG><%=EB_AppearDate+EB_ArgueDays%></td>
                            </tr>
                            <tr>
                                <td width="296" height="22" colspan="2"> 
                        <STRONG><FONT color=#333333>论题状态：</FONT></STRONG><%
			If Date() < EB_AppearDate + EB_ArgueDays Then
				Response.Write "辩论正在进行中！欢迎参与！"
			Else
				If EB_ArgueVotes(0) > EB_ArgueVotes(1) Then
					Response.Write "辩论已结束，正方胜出！"
				Elseif EB_ArgueVotes(1) > EB_ArgueVotes(0) Then
					Response.Write "辩论已结束，反方胜出！"
				Else
					Response.Write "辩论已结束，双方持平！"
				End if
			End if
			%></td></tr></table></td></tr>
<%If EB_Action = 2 Then%>
                <tr>
                    <th height=23 align=left colspan="2">
                        <p>支持<%If EB_Isporm = 1 Then%>正<%Elseif EB_IsPorm = 2 Then%>反<%End if%>方观点的人员列表</p>
                   </th>
                </tr>
                <tr>
                    <td valign="top" class=TableBody1 colspan="2">
<a href="EC_DispArgue.asp?ArgueID=<%=EB_ArgueID%>"><img src="EC_Argue/Argue.gif" border="0" alt="显示当前论题" width="95" height="24"></a>                        <table cellpadding="1" cellspacing="1" Style="Width:100%" border="0" width="100%">
                            <tr>
                                <td bgcolor="#EFEFEF" height="24">
                                    <p align="center">用户名</p>
                                </td>
                                <td bgcolor="#EFEFEF" height="24">
                                    <p align="center">操作选项</p>
                                </td>
                            </tr>
<%
		If EB_UserList = 1 Then
	For EB_i = 0 to Ubound(EB_VoteUserList)
%>
                            <tr>
                                <td>
&nbsp;<%=EB_VoteUserList(EB_I)%>
                                </td>
                                <td>
                                    <p><a href="messanger.asp?action=new&touser=<%=EB_VoteUserList(EB_I)%>" target="_blank"><img src="EC_Argue/message.gif" width="48" height="18" border="0" alt="短消息"></a> 
                                    <a href="dispuser.asp?name=<%=EB_VoteUserList(EB_I)%>" target="_blank"><img src="EC_Argue/profile.gif" width="45" height="18" border="0" alt="个人信息"></a> 
                                    <a href="friendlist.asp?action=addF&myFriend=<%=EB_VoteUserList(EB_I)%>" target="_blank"><img src="EC_Argue/friend.gif" width="48" height="18" border="0" alt="加为好友"></a></p>
                                </td>
                            </tr>
<%Next
		Else
%>
                            <tr>
                                <td colspan="2" height="34">
                                    <p align="center"><font color="blue">暂时没有支持的人员</font>
                                </td>
                            </tr>
		<%End if%>
                        </table>
                   </td>
                </tr>
<%Else%>
                <tr>
                    <td valign="top" class=TableBody1 colspan="2">
             <table cellpadding="0" cellspacing="0" width="100%">
                <tr>
                    <td width="64" rowspan="2" bgcolor="#F9BB5C" height="52">
                        <p><img src="EC_Argue/FZ.gif" width="64" height="50" border="0"></p>
                    </td>
                    <td width="339" bgcolor="#FEFAE7" height="24">
                        <p>&nbsp;<font color="#BD0000"><b>主观点：</b><%=EB_ZText%></font></p>
                    </td>
                    <td width="20" rowspan="2" bgcolor="#83AEFC" height="52">
                        <p><img src="EC_Argue/FF.gif" width="64" height="50" border="0"></p>
                    </td>
                    <td width="383" bgcolor="#E2ECFE" height="24">
                        <p>&nbsp;<font color="#BD0000"><b>主观点：</b><%=EB_FText%></font></p>
                    </td>
                </tr>
                <tr>
                    <td width="339" bgcolor="#FFCD82" height="24">
                        <p>&nbsp;<img src="EC_Argue/icon05.gif" align="absmiddle" width="18" height="12" border="0"> 
                        观点发表数：<%=EB_ZNum%> 
                        &nbsp;正方得票：<%=EB_ArgueVotes(0)%></p>
                    </td>
                    <td width="383" bgcolor="#A4C4FD" height="24">
                        <p>&nbsp;<img src="EC_Argue/icon05.gif" align="absmiddle" width="18" height="12" border="0"> 
                        观点发表数：<%=EB_FNum%> 
                        &nbsp;反方得票：<%=EB_ArgueVotes(1)%></p>
                    </td>
                </tr>
                <tr><td width="50%" colspan="2" valign="top"><a href="EC_Argue_Appear.asp?Act=3&IsPorm=1&ArgueID=<%=EB_ArgueID%>"><img src="EC_Argue/i18.gif" border="0" alt="发表正方观点"></a> 
                                    <a href="EC_Argue_Appear.asp?Act=5&IsPorm=1&ArgueID=<%=EB_ArgueID%>" target="_blank"><img src="EC_Argue/Z_Votes.gif" border="0" alt="给正方投一票"></a> 
                                    <a href="EC_DispArgue.asp?ArgueID=<%=EB_ArgueID%>&Act=2&IsPorm=1"><img src="EC_Argue/renyuan.gif" border="0" alt="正方支持人员列表"></a><%=EB_ZArgueList%>
                    </td>
                    <td width="50%" colspan="2" valign="top"><a href="EC_Argue_Appear.asp?Act=3&IsPorm=2&ArgueID=<%=EB_ArgueID%>"><img src="EC_Argue/i18.gif" border="0" alt="发表反方观点"></a> 
                                    <a href="EC_Argue_Appear.asp?Act=5&IsPorm=2&ArgueID=<%=EB_ArgueID%>" target="_blank"><img src="EC_Argue/F_Votes.gif" border="0" alt="给反方投一票"></a> 
                                    <a href="EC_DispArgue.asp?ArgueID=<%=EB_ArgueID%>&Act=2&IsPorm=2"><img src="EC_Argue/renyuan.gif" border="0" alt="反方支持人员列表"></a><%=EB_FArgueList%>                    </td>
                </tr>
                <tr>
                    <td width="50%" colspan="2">
                        <p>&nbsp;</p>
                    </td>
                    <td width="50%" colspan="2">
                        <p>&nbsp;</p>
                    </td>
                </tr>
<%If EB_ArgueIsMiddle = 1 Then%>
                <tr>
                    <td width="792" colspan="4" bgcolor="#EEEFE2">
                        <p><img src="EC_Argue/middle.gif" width="175" height="50" border="0"><img src="EC_Argue/icon05.gif" width="18" height="12" border="0"> 
                        第三方观点发表数：<%=EB_MNum%></p>
                    </td>
                </tr>
                <tr>
                    <td colspan="4">
                                    <a href="EC_Argue_Appear.asp?Act=3&IsPorm=3&ArgueID=<%=EB_ArgueID%>"><img src="EC_Argue/i18.gif" border="0" alt="发表第三方观点"></a><%=EB_MArgueList%>                    </td>
                </tr><%End if%>
            </table>
                   </td>
                </tr>
<%End if%>
</table>
        </td>
    </tr>
</table>
<%
		Set EB_Rs = Nothing
		ArgueConn.Close : Set ArgueConn = Nothing
Argue_Copyright()
%>