git-svn-id: https://spexeah.com:8443/svn/Asuro@61 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
parent
1bb690b250
commit
7e5597df8c
14
src/irq.pas
14
src/irq.pas
@ -16,15 +16,13 @@ procedure init();
|
||||
implementation
|
||||
|
||||
procedure init();
|
||||
|
||||
outb($0020, $11);
|
||||
outb($00A0, $11);
|
||||
outb($0021, 32);
|
||||
outb($00A1, 40);
|
||||
outb($0021, 4);
|
||||
outb($00A1, 2);
|
||||
begin
|
||||
|
||||
outb($0020, $11);
|
||||
outb($00A0, $11);
|
||||
outb($0021, 32);
|
||||
outb($00A1, 40);
|
||||
outb($0021, 4);
|
||||
outb($00A1, 2);
|
||||
end;
|
||||
|
||||
end.
|
Loading…
x
Reference in New Issue
Block a user