TShopping

標題: 超炫變色捲軸 [打印本頁]

作者: woff    時間: 2008-6-1 16:25
標題: 超炫變色捲軸

  1. <HEAD></HEAD>區內 。
  2. <!------------ 插入控制碼區段開始 ------------>
  3. <SCRIPT language="JScript">
  4. <!--

  5. var scrollPct, prevStep, nextStep, interStep

  6. steps = new Array();
  7. steps[0] = new Array(128,128,128);
  8. steps[1] = new Array(255,0,0);
  9. steps[2] = new Array(255,255,0);
  10. steps[3] = new Array(0,255,0);
  11. steps[4] = new Array(0,255,255);
  12. steps[5] = new Array(0,0,255);
  13. steps[6] = new Array(255,0,255);
  14. steps[7] = new Array(255,0,0);
  15. steps[8] = new Array(255,255,255);

  16. function newColor(chan) {
  17. var i=Math.floor(steps[prevStep][chan]+interStep*(steps[nextStep][chan]-steps[prevStep][chan]));
  18. return i;
  19. }

  20. function scrollFunk() {
  21. scrollPct=(steps.length-1)*document.body.scrollTop/(document.body.scrollHeight-document.body.clientHeight);
  22. prevStep=Math.floor(scrollPct);
  23. nextStep=Math.ceil(scrollPct);
  24. interStep=scrollPct-prevStep;
  25. var newRGB="rgb("+newColor(0)+","+newColor(1)+","+newColor(2)+")";
  26. var invRGB="rgb("+(255-newColor(0))+","+(255-newColor(1))+","+(255-newColor(2))+")";
  27. if (document.body.style.scrollbarTrackColor != null) {
  28. document.body.style.scrollbarFaceColor=newRGB;
  29. document.body.style.scrollbarTrackColor=invRGB;
  30. }
  31. }

  32. window.onscroll=scrollFunk;
  33. //-->
  34. </SCRIPT>
  35. <!------------ 插入控制碼區段結束 ------------>
複製代碼





歡迎光臨 TShopping (http://www.tshopping.com.tw/) Powered by Discuz! X3.2