AGAMES 討論區

標題: 滑鼠帶彈性圖 [打印本頁]

作者: dlalden    時間: 2008-11-8 18:21:31     標題: 滑鼠帶彈性圖

第 5 行 stringcolor="white" 是線之顏色
第 6 行 ballsrc="圖片網址" 是圖片網址位置


  1. <STYLE>
  2. v\:* {BEHAVIOR: url(#default#VML)}
  3. </STYLE>
  4. <SCRIPT language="JavaScript1.2">
  5. var stringcolor="white"
  6. var ballsrc="圖片網址"
  7. if (document.all&&window.print){
  8. document.write('<IMG id=Om style="LEFT: -10px; POSITION: absolute" src="'+ballsrc+'">')
  9. ddx=0;ddy=0;PX=0;PY=0;xm=0;ym=0
  10. OmW=Om.width/2;OmH=Om.height/2
  11. }function Ouille(){
  12. x=Math.round(PX+=(ddx+=((xm-PX-ddx)*3)/100))
  13. y=Math.round(PY+=(ddy+=((ym-PY-ddy)*3-300)/100))
  14. Om.style.left=x-OmW
  15. Om.style.top=y-OmH
  16. elastoc.to=x+","+y
  17. elastoc.strokecolor=stringcolor
  18. setTimeout("Ouille()",1)   
  19. }function momouse(){
  20. xm=window.event.x+5
  21. ym=window.event.y+document.body.scrollTop+15
  22. elastoc.from=xm+","+ym
  23. }if(document.all&&window.print){
  24. code="<v:line id=elastoc style='LEFT:0;POSITION:absolute;TOP:0' strokeweight='1.5pt'></v:line>"} else {
  25. code="<v:group style='LEFT:-10;WIDTH:100pt;POSITION:absolute;TOP:0;HEIGHT:100pt' coordsize='21600,21600'><v:line id=elastoc style='LEFT:0;WIDTH:100pt;POSITION:absolute;TOP:0;HEIGHT:100pt' strokeweight='1.5pt'></v:line></v:group>"}
  26. if(document.all&&window.print){
  27. document.body.insertAdjacentHTML("afterBegin",code)
  28. document.onmousemove=momouse
  29. Ouille()}
  30. </SCRIPT>
複製代碼





歡迎光臨 AGAMES 討論區 (http://61.244.113.49/) Powered by Discuz! X2