🚀 go-pugleaf

On Tue, 29 Dec 1998, Kowal wrote:

>   asm
>     mov bx, 11931
[...]

A żeby przywrócić "normalną" szybkość, należy ustawić 0 (co odpowiada
wartości 10000h - to jest "długość okresu", im mniej tym szybciej).

> Wywolywaniem starej procedury ja sie nie zajmuje. Inni grupowicze robili
> sporo szumu, zeby to robic, ale mnie to nie obchodzi. Zegar i tak sie nie
> rozjedzie, pod warunkiem, ze konczac program zsynchronizujesz liczbe
> tykniec.

O wiele prościej jest synchronizować na bieżąco, a i nie spowoduje to
anomalii przy pracy dyskietek (przerwanie zegarowe to nie tylko zegar!)
ani nie zablokuje programów siedzących na zegarowym.

var
  Licznik : Word;

...
  asm
    add Licznik,tyle_na_ile_ustawiliśmy_okres_(bx_powyżej)
    jc @Oryginalne
    mov al,20h; out 20h,al
    jmp @Juz
  @Oryginalne:
    pushf; call Oryginalne8
  @Juz:
  end;

I to musi być przerwanie 8, a nie 1Ch. 1Ch jest tylko wywoływane przez 8,
a nam chodzi o kontrolę nad częstością wykonywania oryginalnego 8.
A w przerwaniu 1Ch nigdy nie ma po co wykonywać mov al,20h; out 20h,al,
bo to już jest załatwiane przez 8.

Taka zmiana częstotliwości zegara nie działa w sesji DOSa pod Win95.

-- 
 __("<    Marcin Kowalczyk * qrczak@knm.org.pl http://kki.net.pl/qrczak/
 \__/       GCS/M d- s+:-- a21 C+++>+++$ UL++>++++$ P+++ L++>++++$ E->++
  ^^                W++ N+++ o? K? w(---) O? M- V? PS-- PE++ Y? PGP->+ t
QRCZAK                  5? X- R tv-- b+>++ DI D- G+ e>++++ h! r--%>++ y-