Редактор физических секторов диска...

← →
ArtemESC © (2006-02-22 16:25) [0]

Доброго времени суток...
Посоветуйте сабж, таких редакторов много, но мне нужен
с поддержкой флоппиков и с возможность "влить" туда файл...

← →
Джо © (2006-02-22 16:27) [1]

Nortod disk editor

← →
Джо © (2006-02-22 16:27) [2]

> [1] Джо © (22.02.06 16:27)
> Nortod

Norton, sorry.

← →
oldman © (2006-02-22 16:28) [3]

непонятна причина...
а просто скопировать файл?
вирус пишем???

← →
TUser © (2006-02-22 16:32) [4]

> с поддержкой флоппиков

rawrite, dd

← →
ArtemESC © (2006-02-22 16:34) [5]

>>Джо © (22.02.06 16:27) [1]
Norton... - хорошая программа, но я ленивый чтобы набивать Hexы в ручную...

>>oldman © (22.02.06 16:28) [3]

>>а просто скопировать файл?
Переодически, конечно, придется повторять эту операцию - отладка
дело не легкое

>>вирус пишем???

Нет, boot...

← →
Джо © (2006-02-22 16:36) [6]

> [5] ArtemESC © (22.02.06 16:34)
> >>Джо © (22.02.06 16:27) [1]
> Norton... - хорошая программа, но я ленивый чтобы набивать
> Hexы в ручную...

Она позволяет выбрать файл и указать куда скопировать его содержимое (нужный сектор).

← →
ArtemESC © (2006-02-22 16:38) [7]

>>Джо © (22.02.06 16:36) [6]
Скажи как...

← →
Джо © (2006-02-22 16:38) [8]

А вообще, кажется, Modular Hex Editor by Kerk тоже неплохо справляется.

Я вот вручную пытался что-то наскрябать... Не работает что-то оно...

program Disc; {$APPTYPE CONSOLE} uses SysUtils, Classes; var FS : TFileStream; Handle: THandle; FB, EB: Integer; arr : array of byte; i : integer; begin Writeln(" "Disc" - is utility to write file in sectors of a disc"); Writeln; Writeln(" 1st parameter - name of the file"); Writeln(" 2nd - Disc(For example - A:)"); Writeln(" 3d - BootDisk? (y - make boot disc, n - don""t make boot)"); Writeln("Next parametrs may don""t write..."); Writeln(" 4 - First byte of the file..."); Writeln(" 5 - End byte of the file..."); If ParamCount < 3 then Writeln("Error. {Count of param}") else begin If FileExists(ParamStr(1)) then begin try FS := TFileStream.Create(ParamStr(1), fmOpenReadWrite); Handle := FileOpen("\\.\"+ParamStr(2), fmOpenReadWrite); If (Handle = -1) then Writeln("Error of access to disc...") else begin If ParamCount > 3 then FB := StrToInt(ParamStr(4)) else FB := 1; If ParamCount > 4 then EB := StrToInt(ParamStr(4)) else EB := FS.Size; SetLength(arr, EB - FB + 1); FS.Position := FB - 1; FS.Read(arr, EB - FB); FileWrite(Handle, arr, EB - FB); FileClose(Handle); end; except end; end else Writeln("Error. File was not found..."); end; Readln; end.

Пункт
Writeln(" 3d - BootDisk? (y - make boot disc, n - don""t make boot)");
можны вычеркнуть

> А вообще, кажется, Modular Hex Editor by Kerk тоже неплохо
> справляется.

Нехватает записи сразу в несколько секторов. Все та же моя проблема: образ биоса весит 2 кб, а это 512 секторов => 512 раз придется писать :(

Редактор физических секторов диска... Найти похожие ветки