Balancer: Все сообщения за 20 Июля 2004 года

 
ПнВтСрЧтПтСбВс
1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 31

Balancer

администратор
★★★★★
Если просто, то так. Сперва строчки из исходников (считай, что они сами по себе - документация :D )

src\win\spf_win_io.f:
: OPEN-FILE ( c-addr u fam — fileid ior ) \ 94 FILE
\ Открыть файл с именем, заданным строкой c-addr u, с методом доступа fam.
\ Смысл значения fam определен реализацией.
\ Если файл успешно открыт, ior ноль, fileid его идентификатор, и файл
\ позиционирован на начало.
\ Иначе ior - определенный реализацией код результата ввода/вывода,
\ и fileid неопределен.

: READ-FILE ( c-addr u1 fileid — u2 ior ) \ 94 FILE
\ Прочесть u1 символов в c-addr из текущей позиции файла,
\ идентифицируемого fileid.
\ Если u1 символов прочитано без исключений, ior ноль и u2 равен u1.
\ Если конец файла достигнут до прочтения u1 символов, ior ноль
\ и u2 - количество реально прочитанных символов.
\ Если операция производится когда значение, возвращаемое
\ FILE-POSITION равно значению, возвращаемому FILE-SIZE для файла
\ идентифицируемого fileid, ior и u2 нули.
\ Если возникла исключительная ситуация, то ior - определенный реализацией
\ код результата ввода/вывода, и u2 - количество нормально переданных в
\ c-addr символов.
\ Неопределенная ситуация возникает, если операция выполняется, когда
\ значение, возвращаемое FILE-POSITION больше чем значение, возвращаемое
\ FILE-SIZE для файла, идентифицируемого fileid, или требуемая операция
\ пытается прочесть незаписанную часть файла.
\ После завершения операции FILE-POSITION возвратит следующую позицию
\ в файле после последнего прочитанного символа.


: READ-LINE ( c-addr u1 fileid — u2 flag ior ) \ 94 FILE
\ Прочесть следующую строку из файла, заданного fileid, в память
\ по адресу c-addr. Читается не больше u1 символов. До двух
\ определенных реализацией символов "конец строки" могут быть
\ прочитаны в память за концом строки, но не включены в счетчик u2.
\ Буфер строки c-addr должен иметь размер как минимум u1+2 символа.
\ Если операция успешна, flag "истина" и ior ноль. Если конец строки
\ получен до того как прочитаны u1 символов, то u2 - число реально
\ прочитанных символов (0<=u2<=u1), не считая символов "конец строки".
\ Когда u1=u2 конец строки уже получен.
\ Если операция производится, когда значение, возвращаемое
\ FILE-POSITION равно значению, возвращаемому FILE-SIZE для файла,
\ идентифицируемого fileid, flag "ложь", ior ноль, и u2 ноль.
\ Если ior не ноль, то произошла исключительная ситуация и ior -
\ определенный реализацией код результата ввода-вывода.
\ Неопределенная ситуация возникает, если операция выполняется, когда
\ значение, возвращаемое FILE-POSITION больше чем значение, возвращаемое
\ FILE-SIZE для файла, идентифицируемого fileid, или требуемая операция
\ пытается прочесть незаписанную часть файла.
\ После завершения операции FILE-POSITION возвратит следующую позицию
\ в файле после последнего прочитанного символа.

и т.д. В общем, детально всё расписано :)

Примеры:
code forth
  1. : TEST ( - )
  2.     S" test.txt" \ имя файла. В переменную не заношу, будем работать через стек
  3.     2DUP R/W CREATE-FILE THROW
  4.     \ создали файл, в стеке - хендл. Для простоты все ненудевые коды возврата выбарсываем исключением
  5.     DUP S" 123456" ROT WRITE-FILE THROW
  6.     CLOSE-FILE THROW
  7.  
  8.     \ Теперь тот же файл прочитаем и распечатаем. Напомню, что в стеке до сих пор - имя файла
  9.     R/O OPEN-FILE THROW
  10.     \ читаем по адресу HERE не более 1кБ
  11.     DUP HERE 1024 ROT \ преобразовали из ( fid ) в ( fid addr-here 1024 fid )
  12.     READ-FILE THROW \ получили число реально считанныйх байт
  13.     HERE SWAP TYPE \ распечатаем их с адреса HERE
  14.     CLOSE-FILE THROW \ всё, закончили
  15. ;
  16.  
  17. TEST BYE


Если же надо сделать include внешнего файла, то по стандарту, это делается так:
S" test.f" INCLUDED
Или же по FILE-ID:
S" test.f" R/O OPEN-FILE THROW INCLUDE-FILE

В SP-Forth есть упрощение. Если введённое слово не опознаётся как словарное слово, как число и т.п., то в пследнюю очередь тренслятор пытается его рассмотреть как имя включаемого файла. Т.е., если имя файла не содержит пробелов, то достаточно просто набрать его в своей программе - файл будет подключён. Кстати, именно так и выполняется запуск программ SP-Forth через командную строку. SP-Forth принимает во входных параметрах не имя программы, а саму программу - см.
code text
  1. spf4.exe 2 2 * . BYE
  2. -> 4

Но если указать в параметрах имя файла, не похожее на число или команду - то этот файл будет выполнен:
spf4.exe myfile.f
на самом деле соответствует
spf4.exe S" myfile.f" INCLUDED
(с поправкой на то, конечно, что кавычки в DOS-строке так просто не передать :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  
Это сообщение редактировалось 21.07.2004 в 15:57

Balancer

администратор
★★★★★
WD в любые времена может брать только очень рисковый человек :D Хуже них только Fujitsu.

Если верить ремонтникам, то на сегодня самые надёжные - Samsung. Кроме того, они и из самых быстрых, серия SpinRate. Правда, шумные.

Потом уже идут IBM, Seagate (диски с 8Мб подкачали. А вот упомянутые выше 40Г - из самых надёжных). Toshiba/Hitachi - середнячки. Maxtor - тормоза в реальной работе.

А гарантию WD даёт - это понятно. Без гарантии после многолетних их проколов их просто брать никто не будет. До сих пор бывают партии, где до трети винтов возвращают битыми.

В общем, беру сегодня Samsung'и и доволен :) Когда их нет - с некоторой осторожностью беру Seagate 80Г с двухметровым буфером.
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
В 1993-м году, в эпоху противостояния Руцкого-Хасбулатова "антинародному ельцинскому режиму", резидент ЦРУ в Москве ежеднeвно клал Ельцину и команде нa стол распечатку переговоров Руцкого с командующими округов и флотов, по совершенно закрытым, лучшей на то время аппаратурой ЗАС, каналам
 


Сказки венского леса :D
Будь у США возможность так легко прослушивать именно линии связи (а, не, скажем, поставив элементарно жучка Руцкому), они б это не афишировали так :)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
- Давай Журко спросим? Как он полагает, - если завтра Путин со Шрёдером порешили провести в Калининградской области референдум: "Вернуть городу название Кенигсберг, области - имя "Восточная Пруссия" и статус одной из земeль ФРГ. Всем жителям - статус граждан ФРГ, разумеется."
Как они проголосуют?
ИМХО - 95% - "ЗА". :D :lol:
[»]
 


ИМХО, "за" будет процентов 20..30.

- ЧТО понимают?? :o
Я в этом месте ничего не понял, поясни?
[»]
 


Нормальные жители, которых большинство, понимают, что Германии мы нахрен не сдались. И если и будет присоединение, то с выселением русского населения. А без выселения - те, кто в Германию ездят, понимают, что присоединять полтора миллиона человек немцы сейчас в страшном сне не увидят :D

Кстати, вот:
Интересно, что абсолютное большинство респондентов считают себя патриотами России, причем наиболее высок это показатель среди жителей самой западной Калининградской области (63-68%). Лишь 13-18% респондентов указали, что не считают себя патриотами, и доля таковых во всех регионах несколько выше среди молодых людей, чем среди респондентов старше 40 лет.
Среди главных признаков патриотизма россияне выделяют любовь к Родине, веру в будущее России и готовность защищать Россию с оружием в руках. 16-24% опрошенных считают признаком патриотизма гордость тем, что ты являешься гражданином великой страны.

...

Отвечая на вопрос о том, что должна делать Россия в связи в проблемой Калининградской области, во всех трех регионах респонденты чаще всего высказывали пожелание, чтобы Россия заняла жёсткую позицию, причем далёкие от границ кировчане были даже более радикальны чем сами калининградцы (соответственно 35,7-40,9% и 26-30,6% опрошенных). Второй по популярности вариант — создание транспортного коридора (7-33%); самый непривлекательный для россиян — предоставление Калининграду особого статуса (0-5,9%)
 

// http://www.rosbalt.ru/2003/01/12/79998.html

Как видишь, до трети калининградцев не просто за неприсоединение к Германии, а, вообще, за жёсткую позицию России в этом вопросе.

Говорю же, уверен, что за присоединение к Германии выступит менее трети. И, в основном, это будет поколение примерно нашего возраста, те, кто "натерпелся от СССР" и до сих пор не "хлебнул свободы". Лузеры всякие и т.п. :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
ну раз ты повторяешься, то я опять отдам свой голос за WD :-)
конкретно WD1200JB
[»]
 


Вот именно такой у меня сгорел полтора года назад :D
С ~100Гб ценной инфы, которую восстановить не удалось (что делать, напарник - балбес, без меня сделал :) - винт проработал около недели)

Так что просто голоса ничего не значат. Важна статистика. Сходи в мастерскую по восстановлению инфы и порасспрашивай их :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
А, вообще, вот тут кучка полезных обзоров :)
http://fcenter.ru/articles.shtml?hdd
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
флеймогонный топик, мои 5 копеек - ibm/hitachi середнячки во всем но при этом получаются приятные девайсы, не шумят не греются, скорсть ты только в тестах определишь что она ниже чем у кого то, в реале для твоих задач - за глаза хватит
[»]
 


На счёт середнячков и приятности - подпишусь. На счёт скорости - нет. Разница в скорости современных винтов может быть просто ошарашивающей :D Особенно, когда, скажем, Maxtor на Samsung сменишь :) И цена почти одна, а скорость работы субъективно просто не сравнить. Там, где в одном случае долгий стрёкот винтом, в другом - мгновенное открытие приложений :)

Или, играешь в Ultima Online. На IBM подгрузка карты - лёгая подтормозка, на Samsung - её нет.

А вот, кстати, и мой нынешний фаворит. Оказывается, не я один его хвалю :) http://www.fcenter.ru/articles.shtml?hdd/9542 (сейчас SP80 стоит на трёх моих рабочих компах, и на новые его уже несколько месяцев ставлю)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
А вот переносной карманный USB 20Г винт формата 2.5" у меня Hitachi :) Нареканий особых нет, USB2 оно грузит по максимуму, всё летает (для внешнего винта - скорость с теми же флешками не сравнить)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
А у меня этих Фуджиков MPG на столе сейчас около дюжины лежит :D треть совершенно мёртвых, 2/3 - сильно сбоящих. Ещё один умирающий фуджик стоит сейчас на рабочей машине, заменить пока нечем, начальство денег не даёт :D Итак за последний месяц четыре новых компа собрали, что по нашим меркам несколько расточительно :)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
я на своем ibm/hitachi емкостью 120 гб в уо уже не играл, но извини подвинься - в фар край у меня торможения идут не от винта, а видюхи
[»]
 


Ага, а в Киеве - дядько :D
Ну при чём тут видюха? Речь о серии случайных неоптимизированных чтений без предварительной выборки, на лету. Ну, не оптимизирована в этом плане игра. Когда её писали больше проблем было с памятью, вот и минимизировали её использование как могли. Теперь памяти дофига, и при быстром беге в местности, где ещё не был - каждый тайл грузится с винта прямо в область видимости. И на винтах с плохой оптимизацией предвыборки начинаются тормоза.

Ну, на крайняк, LockOn возьми, если из современных - он тоже много с винта в реальном времени берёт.

и потом последние винты со скоростью шпинделя на 7200 и емкостью от 60 и выше принципиальной разницы в скорости не увидишь
[»]
 


Порой, реальный прирост скорости, прекрасно заметный глазом, получают даже простой заменой firmware. Если ты считаешь, что скорость винта лимитируется одним только линейным трансфером или временем перемещения головки, то ты сугубо не прав :D Там и взаимное расположение секторов, и алгоритмы буферизации, и алгоритмы выборки - очень много всего сказывается. Для высокой скорости реального чтения, например, тебе мало просто знать, куда головку переместить. Тебе надо знать и когда это сделать. А зависимость эта чрезвычайно многофакторная.

Даже то же самое линейное чтение может при схожих абсолютных числах давать весьма отличные результаты при реальных чтениях, особенно - в многозадачке.
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Ну, я пока версию Age of Shadow не докачал. Т.е. приду на работу - погляжу, сколько скачалось :)

Вот докачаю - и на Ривенделл. В теории (и по следам обсуждений на форумах) он мне больше всего понравился. А на практике - посмотрим :)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
То, что топиков таких много-вижу)) просто, когда постил, ВООБЩЕ ничего не видно было)
[»]
 


Все топики, написанные после 12-го, были всегда видны сразу после написания. Были недоступны некоторое время только более старые. А вышеуказанные ссылки - все из "нового времени" :)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
2. Шум
[...]
Если Самсунг действительно шумный, то не хочу :( IBM многие слышали, можете сравнить?
[»]
 


С IBM сопоставим. По крайней мере SP80 и IBM DTL-как-его-там-30Г :)
Samsung, м.б., чуть шумнее, но не в смысле грохота, а эдакое шуршание.

Вот до Seagate'ов на 40Гб (Barracuda ATA IV / ATA V) им обоим очень далеко :D
Его не слышно ВООБЩЕ :)
(по крайней мере на фоне шума кулеров и т.п.)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Если бы Израилю путём отдачи не одной трети, а одной трёхтысячной (!) своей территории было бы можно решить какой-то жизненно важный вопрос - кто бы хоть секунду колебался??[/color] [/b]
[»]
 


Что-то мне подсказывает, что и проблема этих островов для России в 1000 раз менее жизненно важна, чем Израилю его территории :D

Я уж не говорю про то, что собрать разово упоминаемый тобой $1млрд - это разово под какой-нить налог изъять у каждого жителя России меньше, чем по $10 :)

Вопрос: Вы, лично, злостный демагог, или просто - дурак? Потому, что не понимать (или делать вид) разницу между отдачей 30% собственной территории (с риском не получить ничего, кроме новой войны) и отдавать 0.03% своей территории (с безусловной пользой) - тут надо относиться к одной из двух этих категорий. Так Вы к какой из них относитесь?
[»]
 


Вуду, ты "злостный демагог или просто дурак" (тебя цитирую), что приравниваешь проблему Курилл для России к проблеме территорий для Израиля? :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
- А хитрых азиатов рядом с вами почти полтора миллиарда сидит...
[»]
 


Предлагаешь Куриллы китайцам передать? :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Ром, "рыба и тунец" это конечно не синонимы, но это "целое и часть".
[»]
 


Я, ведь, ниже и более адекватный пример привёл. Эзотерика и оккультизм - это автомобиль и самолёт.

"Эзотерика" это не шарлатанство, это хуже шарлатанства.
[»]
 


Ну-ка, ну-ка, чем, к примеру, Дзэн "хуже шарлатанства"?

Налетит море шизы, начитавшихся "откровений" разных "гуру" нынешних и прошедших времен.... Сектанты, просветленные, контактеры, рерихнутые, астральщики. Потом глюки сервера... Это игра с огнем.
В данном случае "эзотерика" — это как лампочка, для притягивания мотыльков.
Оставим переживания и опыт диши психологии. А эзотерику — "эзотерикам".
[»]
 


В общем, ты используешь лишь одно и очень узкое определение понятия "эзотерика". Впрочем, я не удивлён :)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
- Во, блин! В этой же теме говорят чуть ли ни о продолжении войны с Японией за 0.03% территории России, а тупорылые немцы, значить, от "приварка" в 15,100 кв км (+4.2% к территории), где живёт всего 950 тысяч человек - откажется??
[»]
 


"Такой большой, а в сказки веришь" ©.

- Никто никого никуда выселять не стал бы. Прибавка 1% населения - не проблема.
[»]
 


Угу, плюс территория с инфраструктурой. Всё в ажуре. Всем хорошо. "Такой большой, а в сказки веришь" ©.

- Не полтора, а 950 тысяч, я же ссылку привёл.
[»]
 


Ага. И в Москве живёт 8..10млн человек. Как же, как же.
Знаешь, сколько сейчас в Калининградской области незарегистрированных беженцев с того же Кавказа? Только в нашей деревне с десяток семей. И отнюдь не все из них зарегистрированы. Занимают брошенные немецкие хутора, властям до этого и дела нет.

- Давай, у Журко спросим: натрёт ли там кому-нибудь карман паспорт гражднина ФРГ? Он ведь не лузер... :lol:
[»]
 


Он не лузер, он из другой категории :) Но, если ты будешь утверждать, что он - типичный представитель общества, то пора тебе переставать верить в сказки :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Дзен — субъективный идеализм, как впрочем и все, порожденное буддизмом. Одним словом — пустота.
[»]
 


Не помню, типировали тебя или нет :D
Но высказывание такого рода очень характерно для сенсориков.
Сенсорикам же эзотерика в духовном плане - чужда :)

Отсюда и возможно однобокое восприятие термина.
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Кстати, ещё раз повторюсь. Даже по определению эзотерики из БЭС, упоминаемый тут оккультизм не имеет к нему ни малейшего отношения. Что это за сокровенное знание для избранных, о котором кричат на каждом углу? :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Я ведь совершенно спокойно спросил - про то: дурак или не дурак человек, не понимающий разницы между 30% и 0.03%? Это совершенно закономерный и естественный вопрос.
[»]
 


Вуду, я тоже два раза спрашивал тебя - считаешь ли ты, что проблема Курилл для России столь же актуальна и горяча, как для Израиля - проблема спорных территоий?
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Гуляли, вот, и когда ехали вниз на фуникулёре, начался салют непонятного назначения :D
IMG_1243_filtered.jpg (скачать) [2272x1704, 1,04 МБ]
 
 
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
И дальше.
IMG_1244_filtered.jpg (скачать) [2272x1704, 1,17 МБ]
 
IMG_1256_filtered.jpg (скачать) [2272x1704, 990 кБ]
 
 
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Обрезанная в 1024x768
 
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Вечером - вверх, ночью - вниз :)
 
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Выложил немножко позавчерашних фоток.
Москва вечерняя и салют :)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Вуду, я тоже два раза спрашивал тебя - считаешь ли ты, что проблема Курилл для России столь же актуальна и горяча, как для Израиля - проблема спорных территоий?
 

- Да. Считаю.
[»]
 


Надо же, а я считал, что проблема территория для Израиля весьма актуальна. Но если это как для России Курилы - всё с вами понятно :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
- Это просто лично ты глубоко недооцениваешь перспективы, связанные с союзом с Японией, поэтому и оцениваешь так небрежно этот вопрос...
[»]
 


Уж, естественно, из Израиля проблемы отношения России с Японией видны на три порядка (в 1000 раз) лучше, чем изнутри России. Не спорю, не спорю :D
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Попробуй в http://forums.airbase.ru/?showforum=11
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
А ещё можно SP-Forth использовать. Всего [70кБ, а полноценная система программирования с вызовом любых Win32-функций, хоть прямо из командной строки :)

spf4.exe WINAPI: CreateProcessA KERNEL32.DLL .... CreateProcessA ... BYE

:)

Или можно готовые модули подключать.
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
Так что просто голоса ничего не значат. Важна статистика.
 

так не пойдет, Роман.
1. поломка единственного экземпляра не значит ничего
[»]
 


Ты это мне отвечаешь или сам с собой разговариваешь? :D
Потому что, вроде бы, я то же самое сказал :)

А на статистику, вот, ссылку только чуть выше дали.
http://www.almer.ru/?/news&newser=0000001079528630.txt

Если тупо подсчитать средний процент возвратов (знаю, что статистически неверно, но для оценок на глаз всё равно ничего больше нет), то будет так:

Seagate - 0.9%
Maxtor - 2.5%
WD - 3.0%
IBM/Hitachi - 3.4%
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

Balancer

администратор
★★★★★
А почему у меня QUOTE не работает. Краснеет и все.
[»]
 


Ответ на текущий постинг с цитированием - это

А с помощью ты помечаешь постинги, как требующие ответа, чтобы потом по нажатию на ответить разом на всё (т.е. сразу на насколько постингов)
… чтобы понять рекурсию, нужно сперва понять рекурсию …  

в начало страницы | новое
 
Поиск
Настройки
Твиттер сайта
Статистика
Рейтинг@Mail.ru