HBO Ole!
 OH> I have a frend and he have forgot his BIOS password.
 OH> I prommised him to look for a program to reset then BIOS password or
 OH> change it.
 OH> Anyone have a code?
if you have an AMI BIOS, try this:
; --- Cut Here 
--------------------------------------------------------------
; GAP - show the password from AMI BIOSes. (xxxx-1993 / 1994-????)
; to assembly (using The Netwide Assembler): NASM -f bin GAP.NSM -o GAP.COM
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
        bits 16
        org 0x100
start   mov dx,message
        mov ah,0x09
        int 0x21
        push ds
        mov ax,0xF000
        mov ds,ax
        mov si,0xFFF5
        mov cx,0x08
p_date  lodsb
        int 0x29
        loop p_date
        pop ds
        cmp al,0x34             ; year >= 1994?
        jb blw_94               ; no..
        mov word [jump],0x9090  ; yes, replace the jump.
blw_94  mov dx,pass
        mov ah,0x09
        int 0x21
        mov al,0x37
        out 0x70,al             ; first out to 70
        in al,0x71              ; then get the byte
        and al,0xF0
goforit mov ah,al
pw_ad   mov al,0x38
        cmp al,0x3F             ; the end?
        jz done
        out 0x70,al             ; out to 70
        inc byte [pw_ad+1]      ; increase address
        in al,0x71              ; get the byte
        or al,al
        jz done
        push ax
        xor cl,cl
decrypt cmp al,ah
        jz gotit
        test al,0xE1 ;FE ;1
        jp no_cf
        stc
no_cf   rcl al,0x01
        inc cl
        jnz decrypt
gotit   mov al,cl
jump    jmp short print
        mov bx,keytab
        xlatb
print   int 0x29
        pop ax
        jmp short goforit
done    mov dx,bye
        mov ah,0x09
        int 0x21
        ret
keytab  db "  1234567890    QWERTYUIOP    ASDFGHJKL     ZXCVBNM"
message db "GAP 0.0.1 by ren ho‰k",0x0D,0x0A,0x0A
        db "your BIOS date --> ","$"
pass    db 0x0D,0x0A,"your password ---> ","$"
bye     db 0x0D,0x0A,"have a nice day.",0x0D,0x0A,"$"
; --- Cut Here 
-------------------------------------------------------------
and the COM.. (nasm isn't very popular, at least not here..) :)
------- Cut Here --- X-CODE for Win32 --- by ren ho‰k -------
begin 644 gap.com 
MNJ`!M`G-(1ZX`/".V+[U_[D(`*S-*>+['SPT<@;'!EH!D)"ZS`&T"2!R96X@:&^)
M:PT*"GEO=7(@0DE/4R!D871E("TM/B`D#0IY;W5R('!A * Origin: [E.P.H.C.] the last scream of the missing neighbors. (4:900/424.6)