这种表单用哪些代码才做的出来？

<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>请选择...</title>
</head>
<script language=javascript>
function insert()
{
    for (i=0; i<sjrform.source.options.length; i++)
{
                        if (sjrform.source.options[i].selected){
                        var sjrmc_now=new Array();            
var name2 = sjrform.source.options[i].text;
                        var ID2 = sjrform.source.options[i].value;
var len_sjrmc=sjrform.sjrmc.options.length;
        for (j=len_sjrmc-1; j>=0; j--)
            {
if(sjrform.sjrmc.options[j].value==ID2)
   {
sjrmc_now[j]=true;
break;
   }
    } 
if(!sjrmc_now[j])
   {
sjrform.sjrmc.options[sjrform.sjrmc.options.length]=new Option (name2,ID2);
   }
 }
                       }
}function del()
{
if(sjrform.sjrmc.selectedIndex!=-1)
          {
           sjrform.sjrmc.options[sjrform.sjrmc.selectedIndex] = null;
           }
else       
           {
   alert("请选择要删除的项！");
   }
}
function insert_all()
{
    for (i=0; i<sjrform.source.options.length; i++)
{
                        var sjrmc_now=new Array();            
var name2 = sjrform.source.options[i].text;
                        var ID2 = sjrform.source.options[i].value;
var len_sjrmc=sjrform.sjrmc.options.length;
        for (j=len_sjrmc-1; j>=0; j--)
            {
if(sjrform.sjrmc.options[j].value==ID2)
   {
sjrmc_now[j]=true;
break;
   }
    } 
if(!sjrmc_now[j])
   {
sjrform.sjrmc.options[sjrform.sjrmc.options.length]=new Option (name2,ID2);
   }
}
}
function del_all()
{
var len_sjrmc=sjrform.sjrmc.options.length;
for (i=len_sjrmc-1; i>=0; i--)
          {
           sjrform.sjrmc.options[i] = null;
           }
}
function ClickCancel()
{
    window.returnValue="";
    window.close();
}
function ClickOk()
{
var sjrtext="";
    var sjrbmh ="";
for (i=0; i<sjrform.sjrmc.options.length; i++)
{
  var ID  = sjrform.sjrmc.options[i].text;
      var ID2 = sjrform.sjrmc.options[i].value;
  sjrtext+=ID +";";
  sjrbmh +=ID2+";";
}
window.returnValue = sjrtext+"|"+sjrbmh;
window.close();
}
</script>
<body bgcolor="#F6F6F6" leftmargin="0" topmargin="0">
<table width="380" border="0" cellspacing="1" bgcolor="#CCCCCC">
<form method="POST" name="sjrform" action="" style="Margin:0">
  <tr bgcolor="#E9F0F6">
      <td>请选择</td>
  </tr>
  <tr>
    <td bgcolor="#FFFFFF"><table border="0" width="100%">
    <tr> 
            <td width="100%">已定义...</td>
      <td width="100%">　</td>
            <td width="100%">选中...</td>
    </tr>
    <tr> 
      <td width="100%"> 
   <select size="7" name="source" multiple  style="width: 126; height: 168">
    {source_list}
        </select> </td>
      <td width="100%" valign="top" align=center><input name="button" type="button" onClick="insert()" value="添加>>"> 
        <p> 
          <input name="button2" type="button" onClick="insert_all()" value="全部添加">
        </p>
        <p> 
          <input name="button3" type="button" onClick="del()" value="<<删除">
        </p>
        <p> 
          <input name="button4" type="button" onClick="del_all()" value="全部删除">
        </p></td>
      <td width="100%"><select size="7" name="sjrmc" multiple  style="width: 126; height: 168"  class=f1>
        </select></td>
    </tr>
  </table></td>
  </tr>
  <tr bgcolor="#E9F0F6">
      <td align="right">
<input type="button" value="确　定" onclick="ClickOk()">
        　 <input type="button" value="取 消" onclick="ClickCancel()">
      </td>
  </tr>
  </form>
</table>
  </body>
</html>