设为首页收藏本站

开启辅助访问切换到宽版

热搜: 手游棋牌素材小程序 92game 视频图片下载商业两性电影游戏娱乐自适应网址帝国CMS 织梦模板插件

源码网,源码论坛,源码之家,商业源码,游戏源码下载,discuz插件,棋牌源码下载,精品源码论坛»首页 › 教程专区 › 网络编程 › 对联广告 flash版

发新帖

查看: 287|回复: 29

[JavaScript] 对联广告 flash版

7万主题	861 回帖	32万积分

Rank: 8 Rank: 8

积分: 329525

发消息

发表于 2006-8-8 00:00:00 | 显示全部楼层 |阅读模式

<html><head></head><body>
<script>

<P>   var delta=0.15 
    var collection; 
    function floaters() { 
        this.items    = []; 
        this.addItem    = function(id,x,y,content) 
                  { 
                    document.write(''+content+''); 
                     
                    var newItem                = {}; 
                    newItem.object            = document.getElementById(id); 
                    newItem.x                = x; 
                    newItem.y                = y; </P>
<P>                    this.items[this.items.length]        = newItem; 
                  } 
        this.play    = function() 
                  { 
                    collection                = this.items 
                    setInterval('play()',10); 
                  } 
        } 
        function play() 
        { </P>
<P>            for(var i=0;i<collection.length;i++) 
            { 
                var followObj        = collection[i].object; 
                var followObj_x        = (typeof(collection[i].x)=='string'?eval(collection[i].x):collection[i].x); 
                var followObj_y        = (typeof(collection[i].y)=='string'?eval(collection[i].y):collection[i].y); </P>
<P>                if(followObj.offsetLeft!=(document.body.scrollLeft+followObj_x)) { 
                    var dx=(document.body.scrollLeft+followObj_x-followObj.offsetLeft)*delta; 
                    dx=(dx>0?1:-1)*Math.ceil(Math.abs(dx)); 
                    followObj.style.left=followObj.offsetLeft+dx; 
                    } </P>
<P>                if(followObj.offsetTop!=(document.body.scrollTop+followObj_y)) { 
                    var dy=(document.body.scrollTop+followObj_y-followObj.offsetTop)*delta; 
                    dy=(dy>0?1:-1)*Math.ceil(Math.abs(dy)); 
                    followObj.style.top=followObj.offsetTop+dy; 
                    } 
                followObj.style.display    = ''; 
            } 
        }     
         
    var theFloaters        = new floaters(); 
    theFloaters.addItem('followDiv1','document.body.clientWidth-105',20,'<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="100" height="250"><param name="movie" value="http://pcqc.86516.com/huodong/0718/yingpin.swf" /><param name="quality" value="high" /><embed src="file:///E|/webroot/pcqc/huodong/0718/vip.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="100" height="250"></embed></object>'); 
    theFloaters.addItem('followDiv2',10,20,'<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="100" height="250"><param name="movie" value="http://pcqc.86516.com/huodong/0718/vip.swf" /><param name="quality" value="high" /><embed src="file:///E|/webroot/pcqc/huodong/0718/vip.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="100" height="250"></embed></object>'); 
    theFloaters.play(); 
</P>
</script>
</body></html>

[Ctrl+A 全选注:如需引入外部Js需刷新才能执行]

对联, 广告, flash

相关帖子

回复

使用道具举报

0 主题	1万回帖	0 积分

Rank: 3 Rank: 3

积分: 0

发消息

发表于 2022-8-13 17:24:08 | 显示全部楼层

我找了挺久终于找到了

回复支持反对

使用道具举报

0 主题	1万回帖	68 积分

Rank: 2

积分: 68

发消息

发表于 2022-12-25 06:51:17 | 显示全部楼层

额UI废物iuhfujewfiewnnfen

回复支持反对

使用道具举报

0 主题	1万回帖	0 积分

Rank: 3 Rank: 3

积分: 0

发消息

发表于 2023-8-21 12:06:28 | 显示全部楼层

天天源码社区论坛

回复支持反对

使用道具举报

4 主题	2万回帖	262 积分

Rank: 3 Rank: 3

积分: 262

发消息

发表于 2023-8-26 20:49:56 | 显示全部楼层

dfdsafdsfdsfdsf

回复支持反对

使用道具举报

0 主题	2万回帖	0 积分

Rank: 3 Rank: 3

积分: 0

发消息

发表于 2023-10-21 01:53:01 | 显示全部楼层

儿飞飞微风DVD谁vdsvd

回复支持反对

使用道具举报

0 主题	1万回帖	68 积分

Rank: 2

积分: 68

发消息

发表于 2023-10-28 13:24:07 | 显示全部楼层

天天源码论坛

回复支持反对

使用道具举报

12 主题	2万回帖	431 积分

Rank: 3 Rank: 3

积分: 431

发消息

发表于 2023-11-19 07:38:24 | 显示全部楼层

很不错的玩意

回复支持反对

使用道具举报

0 主题	2万回帖	0 积分

Rank: 3 Rank: 3

积分: 0

发消息

发表于 2023-12-6 20:24:58 | 显示全部楼层

挺不错的东西

回复支持反对

使用道具举报

0 主题	1万回帖	0 积分

Rank: 3 Rank: 3

积分: 0

发消息

发表于 2024-3-13 09:32:55 | 显示全部楼层

的vgdsvsdvdsvdsvds

回复支持反对

使用道具举报

发新帖

手机版|小黑屋|网站地图|源码论坛 ( 海外版 )

GMT+8, 2025-1-31 21:51 , Processed in 0.219292 second(s), 43 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表