Contents of /archive/adfssector/WriteSecto

DIM B% 512

INPUT "Filename: "f$
INPUT "Sector: "s$
s% = EVAL(s$)
OSCLI"Load "+f$+" "+STR$~B%

SYS"ADFS_SectorDiscOp",, 2, 4<<29 OR s%, B%, 512
1	DIM B% 512
2
3	INPUT "Filename: "f$
4	INPUT "Sector: "s$
5	s% = EVAL(s$)
6	OSCLI"Load "+f$+" "+STR$~B%
7
8	SYS"ADFS_SectorDiscOp",, 2, 4<<29 OR s%, B%, 512