Just answer the F*#king question

function findPosY(obj)
{
  var curtop = 0;
  if(obj.offsetParent)
    while(1)
    {
        curtop += obj.offsetTop;
        if(!obj.offsetParent)break;
        obj = obj.offsetParent;
    }
  else if(obj.y)
    curtop += obj.y;
  return curtop;
}
 
 
function scroll(element){
  p = findPosY(document.getElementById(element));
  window.scrollBy(0,p);
}

package com.magnetmobile.tools.rim;
 
/**
 *
 * @author Sime when drunk ... yay drunk code
 */
import java.io.*;
import java.util.*;
import java.util.jar.*;
import java.io.UnsupportedEncodingException;
import java.security.MessageDigest;
import java.security.NoSuchAlgorithmException;
import java.util.logging.Level;
import java.util.logging.Logger;
import java.util.zip.ZipEntry;
import java.util.zip.ZipInputStream;
 
public class Cod2Jad {
 
    public static void main(String args[])throws NoSuchAlgorithmException {
 
        FileInputStream fis = null;
        try {
            int count = 0;
            if (args.length != 2) {
                System.out.println("usage: {path to COD} {Module name}");
                System.exit(-1);
            }
            Hashtable htSizes = new Hashtable();
            Hashtable htJarContents = new Hashtable();
            fis = new FileInputStream(args[0]);
 
 
            BufferedInputStream bis = new BufferedInputStream(fis);
            ZipInputStream zis = new ZipInputStream(bis);
            ZipEntry ze = null;
            while ((ze = zis.getNextEntry()) != null) {
                if (ze.isDirectory()) {
                    continue;
                }
 
                int size = (int) ze.getSize();
                // -1 means unknown size.
                if (size == -1) {
                    size = ((Integer) htSizes.get(ze.getName())).intValue();
                }
                byte[] b = new byte[(int) size];
                int rb = 0;
                int chunk = 0;
                while (((int) size - rb) > 0) {
                    chunk = zis.read(b, rb, (int) size - rb);
                    if (chunk == -1) {
                        break;
                    }
                    rb += chunk;
                }
                htJarContents.put(ze.getName(), b);
                process(ze, count, b);
                count++;
            }
 
            System.out.println("RIM-COD-Module-Name:" + args[1]);
            System.out.println("RIM-COD-Module-Dependencies: net_rim_cldc");
            System.out.println("RIM-COD-Creation-Time: 1202924527");
 
            zis.close();
            bis.close();
            fis.close();
        } catch (IOException ex) {
            System.out.println("Could not access file "+args[0]);
            System.exit(-1);
        } finally {
            try {
                fis.close();
            } catch (IOException ex) {
                Logger.getLogger(Cod2Jad.class.getName()).log(Level.SEVERE, null, ex);
            }
        }
    }
 
    private static void process(Object obj, int count,byte[] data) throws NoSuchAlgorithmException,
UnsupportedEncodingException {
        ZipEntry entry = (ZipEntry) obj;
        String name = entry.getName();
        long size = entry.getSize();
        long compressedSize = entry.getCompressedSize();
 
        String output = "RIM-COD-URL" + (count > 0 ? ("-" + count) : "") + ": " + name;
        System.out.println(output);
 
        output = "RIM-COD-Size" + (count > 0 ? ("-" + count) : "") + ": " + compressedSize;
        System.out.println(output);
 
        output = "RIM-COD-SHA1" + (count > 0 ? ("-" + count) : "") + ": ";
        output +=  SHA1(data, true);
        System.out.println(output);
    }
 
    private static String convertToHex(byte[] data, boolean spaced) {
        StringBuffer buf = new StringBuffer();
        for (int i = 0; i <
                data.length; i++) {
            int halfbyte = (data[i] >>> 4) & 0x0F;
            int two_halfs = 0;
            do {
                if ((0 <= halfbyte) && (halfbyte <= 9)) {
                    buf.append((char) ('0' + halfbyte));
                } else {
                    buf.append((char) ('a' + (halfbyte - 10)));
                }
 
                halfbyte = data[i] & 0x0F;
            } while (two_halfs++ < 1);
 
            if (spaced) {
                buf.append(' ');
            }
        }
 
        return buf.toString();
    }
 
    public static String SHA1(byte[] data, boolean spaced)
            throws NoSuchAlgorithmException, UnsupportedEncodingException {
        MessageDigest md;
        md =
                MessageDigest.getInstance("SHA-1");
        byte[] sha1hash = new byte[40];
        md.update(data, 0, data.length);
        sha1hash =
                md.digest();
        return convertToHex(sha1hash, spaced);
    }
}

' Visual Basic Script program to reset the DMA status of all ATA drives
 
' Copyright © 2006 Hans-Georg Michna
 
' Version 2007-04-04
 
' Works in Windows XP, probably also in Windows 2000 and NT.
' Does no harm if Windows version is incompatible.
 
If MsgBox("This program will now reset the DMA"_
  & " status of all ATA drives with Windows drivers." _
  & vbNewline & "Windows will redetect the status after "_
  & "the next reboot, therefore this procedure" _
  & vbNewline & "should be harmless.", _
    vbOkCancel, "Program start message") _
  = vbOk Then
 
RegPath = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\"_
  & "Control\Class\{4D36E96A-E325-11CE-BFC1-08002BE10318}\"
ValueName1Master = "MasterIdDataChecksum"
ValueName1Slave = "SlaveIdDataChecksum"
ValueName2Master = "UserMasterDeviceTimingModeAllowed"
ValueName2Slave = "UserSlaveDeviceTimingModeAllowed"
ValueName3 = "ResetErrorCountersOnSuccess"
MessageText = "The following ATA channels have been reset:"
MessageTextLen0 = Len(MessageText)
ConsecutiveMisses = 0
Set WshShell = WScript.CreateObject("WScript.Shell")
 
For i = 0 to 999
  RegSubPath = Right("000" & i, 4) & "\"
 
  ' Master
 
  Err.Clear
  On Error Resume Next
  WshShell.RegRead RegPath & RegSubPath & ValueName1Master
  errMaster = Err.Number
  On Error Goto 0
  If errMaster = 0 Then
    On Error Resume Next
    WshShell.RegDelete RegPath & RegSubPath & ValueName1Master
    WshShell.RegDelete RegPath & RegSubPath & ValueName2Master
    On Error Goto 0
    MessageText = MessageText & vbNewLine & "Master"
  End If
 
  ' Slave
 
  Err.Clear
  On Error Resume Next
  WshShell.RegRead RegPath & RegSubPath & ValueName1Slave
  errSlave = Err.Number
  On Error Goto 0
  If errSlave = 0 Then
    On Error Resume Next
    WshShell.RegDelete RegPath & RegSubPath & ValueName1Slave
    WshShell.RegDelete RegPath & RegSubPath & ValueName2Slave
    On Error Goto 0
    If errMaster = 0 Then
      MessageText = MessageText & " and "
    Else
      MessageText = MessageText & vbNewLine
    End If
    MessageText = MessageText & "Slave"
  End If
 
  If errMaster = 0 Or errSlave = 0 Then
    On Error Resume Next
    WshShell.RegWrite RegPath & RegSubPath & ValueName3, 1, "REG_DWORD"
    On Error Goto 0
    ChannelName = "unnamed channel " & Left(RegSubPath, 4)
    On Error Resume Next
    ChannelName = WshShell.RegRead(RegPath & RegSubPath & "DriverDesc")
    On Error Goto 0
    MessageText = MessageText & " of " & ChannelName & ";"
    ConsecutiveMisses = 0
  Else
    ConsecutiveMisses = ConsecutiveMisses + 1
    If ConsecutiveMisses >= 32 Then Exit For ' Don't search unnecessarily long.
  End If
Next ' i
 
If Len(MessageText) <= MessageTextLen0 Then
  MessageText = "No resettable ATA channels with "_
     & "Windows drivers found. Nothing changed."
Else
  MessageText = MessageText & vbNewline _
    & "Please reboot now to reset and redetect the DMA status."
End If
 
MsgBox MessageText, vbOkOnly, "Program finished normally"
 
End If ' MsgBox(...) = vbOk
 
' End of Visual Basic Script program