[求助]怎么添加 DIV层缩放功能？？它的移动问题已经解决了！

<script language="javascript" type="text/javascript">
var mouseObj=null;
var pX
var pY
document.onmousemove=divMove;
document.onmouseup=divUp;
function m(c_Obj)
{
mouseObj=document.all(c_Obj);
pX=mouseObj.style.pixelLeft-event.x;
pY=mouseObj.style.pixelTop-event.y;
}
function divMove()
{
if(mouseObj)
{
mouseObj.style.left=pX+event.x;
mouseObj.style.top=pY+event.y;
event.returnValue=false;
}
}
function divUp()
{
if(mouseObj)
{
mouseObj=null;
}
}
</script>



<div style="width: 160px; height: 30px;cursor:move; position:absolute ;left: 580px; top: 200px;" id="div1" onmousedown='m("div1")'>
<asp:Label ID="Label1" runat="server" Font-Size="XX-Large" Text="第一人民医院" Width="197px"></asp:Label></div>

这个方法适合所有的DIV，它的动能是使div自由移动，现在我想在此基础上加上个能自由缩放的功能，怎么实现啊？