[Delphi] Jak ustawić godzine włączenia komputera? BIOS

Witam, chcę za pomocą programu zmieniać zawartość CMOS BIOSu dotyczącą o której komputer ma się włączyć.

Niestety mam problem bo nawet nie potrafię odczytać godziny włączania która jest aktualnie ustawiona.

Tu mam napisany przeze mnie program odczytujący godzinę

Function Bcd2Dec8 (n: byte) : byte;
begin
Bcd2Dec8 := (N shr 4)*10 +N and 15;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
case ZlIOStarted of
  true: StatusBar1.SimpleText :=  'Sterownik portów załadowany';
  false: StatusBar1.SimpleText :=  'Problem ze sterownikiem portów!';
  end;
end;

procedure TForm1.bCzytajClick(Sender: TObject);
begin
try
  portwriteb($70, $04);
  sleep(50);
  eData1.Text := IntToStr(Bcd2Dec8(portreadb($71)));
  portwriteb($70, $02);
  sleep(50);
  eData2.Text := IntToStr(Bcd2Dec8(portreadb($71)));
  portwriteb($70, $00);
  sleep(50);
  eData3.Text := IntToStr(Bcd2Dec8(portreadb($71)));
except
  eData1.Text := '##';
  eData2.Text := '##';
  eData3.Text := '##';
  end;

end;

Całe źródło
Mapa biosu - http://www.bioscentral.com/misc/cmosmap.htm

Według mapy jak zmienię odpowiednio $04 $02 $00 na $05 $03 $01 Powinno już odczytywać godzinę włączenia komputera automatycznie z biosu, lecz odczytuje jakieś wartości które są niezależne od godziny w biosie(zmieniam w biosie godzinę a wartości te same zostają)

1. probowales odczytac inne rzeczy?
2. czy ta mapa biosu jest w 100% uniwersalna?

Tak, np date.

Chyba tak, występują pola - Reserved które raczej dotyczą poszczególnych firm. Mój program ma działać tylko na jednym komputerze jak coś