العربية
<!-- http://www.downcodes.com --> <!-- bbs http://www.downcodes.com/bbs--> <!--وصف البرنامج النصي: الخطوة 1: أضف الكود التالي <!-- http://www.downcodes.com --> منطقة الجسم>--> <SCRIPT language=VBScript> dim c,numgc c=-100000 numgc=document.body.sourceIndex sub SF c=c+2 Document.all(numgc).style.BackgroundPosition="0 " &c id =SetTimeOut("SF",64,"VBScript") end sub SF </SCRIPT> <!--الخطوة 2: استبدل <body> بـ --> <bodybackground=/u/info_img/2009- 06/20/ logo.gif onLoad="ob(),setNum(),setInterval('timer()',100);setInterval('runClock()',100)">