Просмотр полной версии : программа для теста beta-disk
Нужна простенькая программа на басике, создает файл на дискете. Файл с какими нибудь значениями - например 111111111111111. Нужно для проверки на ошибки чтения с флопа. Ощущение что данные считываются битые.
Нужна простенькая программа на басике, создает файл на дискете. Файл с какими нибудь значениями - например 111111111111111. Нужно для проверки на ошибки чтения с флопа. Ощущение что данные считываются битые.
SAVE "TEST" CODE 0, 16384
VERIFY "TEST" CODE 0, 16384
10 PRINT "1111111111111111111111111"
SAVE "TEST" CODE 0, 16384
VERIFY "TEST" CODE 0, 16384
:)
[bETA]mEN
05.06.2006, 16:24
10 FOR N=1 TO 6911
20 POKE 16384+N,1
30 NEXT N
40 RANDOMIZE USR 15619:REM: SAVE "TEST" CODE 16384,6912
50 RANDOMIZE USR 15619:REM: VERIFY "TEST" CODE 16384,6912
а чтобы файл был размером 128 кб - т.е. всю оперативку тестануть.
а чтобы файл был размером 128 кб - т.е. всю оперативку тестануть.
Засланец! Вот он засланец! Афтар жошь! Пей йад! Засланцы не пройдут!
+1
Вы чего. А что я такого спросил.
а чтобы файл был размером 128 кб - т.е. всю оперативку тестануть.
SAVE "TEST" CODE 16384, 131072
:-))))
А что я такого спросил.
спецификации TR-DOS почитай, про число секторов на диске, число секторов на файл, узнаешь много нового и интересного :)
Имхо смеяться не здесь %)
Чувак, определись че те надо- протестить диск или протестить память.
А то получается "дайте попить, а то есть так хочется, аж переночевать негде" %)
а чтобы файл был размером 128 кб - т.е. всю оперативку тестануть.
Блин... я даже и не сразу понял, что за тема... ((((-; тут надо не +1 а сразу +5 делать ((((((-;
Alexander Bondarenko (500:3432/3)
02.07.2006, 21:51
*Здравствуй, Kirill!*
Лови мои идеи по поводу сабжа "программа для теста beta-disk", о котором трещала в 05 Jun 2006 твоя портянка к тов. All.
Засланец! Вот он засланец! Афтар жошь! Пей йад! Засланцы не
пройдут!
Спасибо вам, pебятки. Я давно так не pжал. %)
п.ц. И мыло не читал тоже. ;))))))
/Вот и всё, Kirill, можешь листать дальше.../
... Альтруизм невыгоден, но вознаграждается в полной мере.
Powered by vBulletin® Version 4.2.5 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved. Перевод: zCarot