七行プログラミング part6

七行プログラミング part6at TECH

七行プログラミング part6 - 暇つぶし2ch■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

200:デフォルトの名無しさん
 09/01/10 14:36:19 .net
行儀無視 420 bytes 
javascript:scroll(H='//hamachiya.com/g',G='.gif',D=document,R=Math.random,a=[], 
D.title=0,setInterval(function(){if(R(B=D.body)<.05)a.push(B.appendChild(o= 
new Image)),o.src=H+1+G,i=o.style,i.position='absolute',i.left=R(o.s=R(o.b=99)* 
3+1)*90+'%';for(i=0;o=a[i++];)with(o)b-=s,b<0&&setTimeout(function(){src=H+3+G; 
onclick=function(){D.title++;B.removeChild(this)}},550,src=H+2+G,a.splice(--i,b 
=1)),style.bottom=b+'%'},40)) 
 
まともなカウンター 499 bytes 
javascript:scroll(H='//hamachiya.com/g',D=document,B=D.body,R=Math.random,a=[], 
S=B.appendChild(C=D.createElement('b')).style,S[P='position']=A='absolute',S. 
top=0,S.fontSize='9em',setInterval(function(){if(R(G='.gif')<.05)a.push(B. 
appendChild(o=new Image)),o.src=H+1+G,S=o.style,S[P]=A,S.left=R(o.s=R(o.b=99)*3 
+1)*90+'%';for(i=0;o=a[i++];)with(o)b-=s,b<0&&setTimeout(function(){src=H+3+G; 
onclick=function(){C.innerHTML++;B.removeChild(this)}},550,src=H+2+G,a.splice( 
--i,b=1)),style.bottom=b+'%'},40))

次ページ