Ассемблер? Это просто! Учимся программировать (FAQ)

Вопросы, которые поступили от подписчиков рассылки
"Ассемблер? Это просто! Учимся программировать"

Дата выхода: 2001-12-20

Начинается тестирование новых экспертных групп!

Абсолютно ВСЕ желающие (эксперты и подписчики) могут принять участие в тестировании и посмотреть, что представляет собой новая система. Затем будет проведено голосование.

______________

Указания по тестированию:

1. Если Вы уже являетесь экспертом, то придется зарегистрироваться вновь, т.к. новая система имеет отдельную базу данных. Регистрация проводится здесь: http://www.Kalashnikoff.ru/cgi-bin/Expert.cgi. Вопросы задаются здесь: http://www.Kalashnikoff.ru/cgi-bin/Message.cgi. В дальнейшем, если система не потерпит фиаско, старая база с экспертами (включая кол-во набранных баллов и отправленных ответов) будет конвертирована в новую. Статусы будут назначаться в соответствии с кол-вом уже набранных баллов / 2.

2. По умолчанию всем экспертам при регистрации будет назначен статус "НАЧАЛЬНЫЙ". Ответы, естественно, попадать подписчику (эксперту), отправившему "вопрос", не будут! Здесь есть два варианта: я периодически буду выставлять статусы экспертам случайным образом. Кто-то может оказаться "Профессиональным", кто-то - "Привилегированным" и т.д. Либо эксперт, участвующий в тестировании, отправит 10 "ответов".

3. В вопросе / ответе можно писать все, что душе угодно. Эта информация в рассылку НЕ попадает (отдельная база). Скажу честно: рассылка вообще выходить не будет. Чем большее сообщений будет отправлено, тем больше система будет протестирована на надежность и жизнеспособность.

4. В процессе тестирования система будет доводиться до совершенства, согласно вашим пожеланиям, которые можно направлять по адресу Experts@Kalashnikoff.ru.

5. Из тестирования можно выйти в любой момент, удалив себя из базы данных.

______________

Дополнительная информация.

Система еще до конца не дописана (осталась самая малость), хотя код уже составляет порядка 100Кб. Полагаю, что до конца текущей недели все будет доделано.

Теги теперь вставлять нельзя. Они просто не будут приниматься. Это связано с защитой против "умельцев" вставлять в формы скрипты, который делают разные пакости (запускают браузеры с каким-нибудь сайтом, вирусоподобные механизмы и пр.).

HTML-код всех писем и страниц разработан и отлажен для IE (у меня стоит 6.0, но уверен, что работать должно и на 4.0). Если Opera, NetScape и пр. будут "глючить" - это их проблемы. Хотя, возможно, я и исправлю ошибки со временем (если таковые обнаружатся).

______________

Огромная просьба:

Если вы заметите ошибки, то пишите мне по адресу Experts@Kalashnikoff.ru.

______________

За чем нужно следить в процессе тестирования:

Обращайте внимание на количество набираемых баллов и ответов и правильность их подсчета (это можно наблюдать в вашей регистрационной карте).

______________

Что недоделано:

В ответе, высылаемом подписчику, не вставляется приложение, если таковое было введено экспертом. Скоро сделаю...

Буду очень благодарен всем, принявшим участие в тестировании. Этим вы мне безгранично поможете!

Спасибо за внимание!

Управлящий рассылкой,
Калашников Олег.

НОВОСТЬ

На сайте http://rusproject.narod.ru (Русский проект: Visual Basic на русском) выложены многие выпуски основной рассылки "Ассемблер? Это просто! Учимся программировать" в формате справки Windows. Очень наглядно и удобно!

Выражаю благодарность Александру Климову!

Вопрос №1893

Здравствуйте.
Я уже задавал этот вопрос (1806), но повторюсь.
---------------------------------------------------
Имеется Shareware версия универсального DOS-овского просмотрщика/проигрывателя QuickView Pro Ver. 2.46 (тянет даже DivX). (Если кому интересно можно скачать здесь: http://multimediaware.com/qv/). Может у кого есть кряк или кейген к нему или хоть к версии 2.45?
----------------------------------------------------
Эксперт x-gn ответил:
Сходи на CRACK.RU
Там есть все
----------------------------------------------------
Да был я там и ещЈ много где лазил - всего там как раз и нету.
Тут есть небольшая путаница, существуют 2 вида софта с одинаковым названием "QuickView".
Одно - HEX-гляделка/редактор.
Другое - это просморщик (под DOS) графических файлов, видео (в том числе DivX) и аудио (WAV, MP3).
Меня интересует, как раз, взлом последнего.
Михаил

Ответ

Здравствуйте, Михаил!

На днях запустили в меня этой вешью.

Как только разберусь с делами, буду крякать.

Вопрос №1893

Здравствуйте.
Я уже задавал этот вопрос (1806), но повторюсь.
---------------------------------------------------
Имеется Shareware версия универсального DOS-овского просмотрщика/проигрывателя QuickView Pro Ver. 2.46 (тянет даже DivX). (Если кому интересно можно скачать здесь: http://multimediaware.com/qv/). Может у кого есть кряк или кейген к нему или хоть к версии 2.45?
----------------------------------------------------
Эксперт x-gn ответил:
Сходи на CRACK.RU
Там есть все
----------------------------------------------------
Да был я там и ещЈ много где лазил - всего там как раз и нету.
Тут есть небольшая путаница, существуют 2 вида софта с одинаковым названием "QuickView".
Одно - HEX-гляделка/редактор.
Другое - это просморщик (под DOS) графических файлов, видео (в том числе DivX) и аудио (WAV, MP3).
Меня интересует, как раз, взлом последнего.
Михаил

Ответ

Здравствуйте, Михаил!

На днях запустили в меня этой вешью.

Как только разберусь с делами, буду крякать.

С уважением, root.

Вопрос №1901

Винчестер разбит на два логических диска.На c:Win98SE (поверх установлен WinBeOS98 III), а на d:Win2000-установлена позже.При загрузке 98SE, после появления фона
рабочего стола, выскакивает "синий экран" с сообщением:
32-разрядный драйвер устройства CDROWD(01)+0000AD23
попытался обратиться к незагруженной системной службе.
Возможно нормальное продолжение работы.
После троекратного нажатия любой клавиши продолжается нормальная загрузка. При запуске "Мастера установки
оборудования" - опять "синий экран".После однократного
нажатия клавиши - нормальное продолжение работы.
При запуске Win2000 нет никаких проблем.
Прошу ответить: limonnik@km.ru

Ответ

Здравствуйте, anat!
Скорее всего, данная ситуация происходит из-за того, что в реестре Виндов прописан какой-то статистический драйвер или наоборот, чего-то там не хватает (что в Вашем случае больше похоже на правду). Так что если нет резервной копии реестра, то посоветовать что-либо сложно. Можно, конечно, попробовать найти записи реестра в ручную, но это холопотно. Тем более, если Вы с реестром никогда не имели дело, то это практически нереально. :(
Я бы посоветовал переустановить Винды, но и тут загвоздка: ведь 98-е затрут бут-сектор и загрузить 2000-е будет невозможно, так что придется и их переставлять.

ЗЫ: Насколько мне известно, все статические драйвера, которые должны быть загружены и ссылки на которые имеются находятся в реестре по этому адресу HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\VxD , так что можете попробовать, но если что, то я Вам ничего не говорил. :)))

Вопрос №1903

Уважаемые Мэтры!
Есть внешнее программируемое устройство с по байтной арифметикой
Задача:
Регистр R1 - младший байт числа формата 0FFF (т.е. 4095)
R2 - старший
Нужно получить в регистрах A1,A2,A3,A4
числа 4, 0, 9, 5

Команды ассемблеровские (синтактически), только байтовые а не целые. В этом все и дело!

Ответ

Здравствуйте, Juris!
Вот пожалуйста! Писал минут сорок, не меньше!! Но все равно остались вопросы кой какие.. (см. после листинга программы)
Листинг программы:
mov A1,4
xor A2,A2
mov A3,9
mov A4,5

компиль ТАСМ-ом с ключом /9 (девять проходов)

ТО,что после листинга программы:
1. "по байтная арифметика"? what's this?
2. Что это за "формат" 0FFFh ???? Может, вы имели ввиду формат mp3 ?
2. и причем здесь R1 вообще?
3. Что такое "синтактически"? Может, "симпатически"? Тогда при чем здесь чернила?
4. Да, и объясните разницу между "байтовой" и "целой" командой. Ведь В ЭТОМ ВСЕ ДЕЛО!!! А я почему-то упустил этот ВАЖНЫЙ момент... ;(

P.S. Специально не смотрел, скока ответов отправлено на этот вопрос. Поэтому боюсь опазориться. :)Надеюсь, не будет ответов, типа: "Да. У меня была такая же проблема в восемьдесят девятом году... Я решил ее вот так... (и пошел код на 30 страниц)" ато позор мне обеспечен навеки! :)
Но скорее волноваться нечего. Это просто шифровка кому то из экспертов... скоро начнется революция! Интересно, кто будет Лениным на этот раз? Пиво - страшная штука! )) Пиши еще.
(закосил под конец под бухого чегото... чтобы позор был не так страшен?) :) пил пил. но днем еще.

Вопрос №1905

Здравствуйте эксперты!
2Dron, я не совсем то просил, что вы сделали. Я просил посмотреть на мою программу и сказать, что там лишнее и как можно исправить, а не представлять
свое виденье проблемы.:-) Ну да ладно, не важно сам не уточнил, что хочу, сам и виноват, а вот за прогу спасибо, я в нее еще не до конца воткнул, но сейчас добью.:-)
2Painbringer & Broken Sword Спасибо за критику.:-) Вот посидел еще чуть-чуть, меньше получилось и call-ов меньше, правда пришлось несколько идей у Dron-a свиснуть(что ж поделать раз сам не догнал).:-) Вот, посмотрите, только уже скажите относительно моей программы, что можно изменить, а не свои пишите. Пожалуйста! Ну хоть чуть, чуть! Да, еще я не понял, что ради быстродействия в не которой степени можно пожертвовать размером?
ЗЫ: Уважаемый эксперт Dron уже высказал желание позаниматься оптимизацией программы и уважаемый эксперт Broken Sword сказал, что он напишет программу с первого раза меньше чем 300кб. Очень хотелось бы посмотреть, чем все это закончится!;-)
ЗЫЫ: Вот такой я подстрекатель.:-)
ЗЫЫЫ:2Broken Sword - а я и не обижаюсь, я еще не волшебник, а только учусь...:-)

Ответ

Здравствуйте, ILYA D.!
Конечно, Спасиба тебе огромное (я насчет 300кб)!!! Ты мне льстишь однозначно. Тут нада конечно сильно постараться, но я думаю, если убрать музычку и видео в начале, то думаю влезть :)
Теперь о проге...

Чето call-ов маловато как то.. всего то их у тебя три! ну куда это годится? щас без call-ов - никуда! call-ы всему голова!!! я считаю программа без call-ов - и не смеет называться программой вовсе. Call-ов их ведь чем больше, тем круче и солиднее прога!! :)

Ладна, по делу я б сократил в месте, де ты выводишь на экран через 2 ф-цию 21h прерывания. Там на самом деле нада все операции производить в ah, а выводить al (!) посредством ОДНОЙ команды int 29h. И вообще у тебя по всей проге сплошная вторая функция 21h прерывания! просто ужас какой-то! позаменяй все на int 29h и оставь ты этот несчатсный dl в покое!!! у тебя ж al все время без дела болтается!!! и слабо разве input_key
mov bl,al
mov dl,'=' ; тут исправишь
mov ah,2 ; сам знаешь
int 21h ; на что!!!!
call bincode в процедуру замутить??? чего его лепить два раза одно и то ж самое?
Не, вообще я просто не люблю чужой код. :) так что не трогай call-ы, пусть себе покояться с миром...

p.s. где делся Вал.Ик??? неужто "забрали" уже? )

Вопрос №1903

Уважаемые Мэтры!
Есть внешнее программируемое устройство с по байтной арифметикой
Задача:
Регистр R1 - младший байт числа формата 0FFF (т.е. 4095)
R2 - старший
Нужно получить в регистрах A1,A2,A3,A4
числа 4, 0, 9, 5

Команды ассемблеровские (синтактически), только байтовые а не целые. В этом все и дело!

Ответ

Здравствуйте, Juris!

С байтами довольно сложно. Думать особо некогда, да и на асм переписывать лень. Алгоритм простой, но не эффективный, да и перенести на устройство будет сложновато.

Алгоритм:

Проходим по всем битам и для каждого установленного бита добавляем в сумматор количество единиц, соответствующее порядку бита:

Биты	7     6   5  4   3 2 1 0
Числа	128 64 32 16 8 4 2 1
Единицы	8     4   2  6   8 4 2 1

Остаток от деления сумматора на 10 есть крайняя правая цифра.
Делим сумматор нацело на 10 ( x/=10 ), фактически, AL после деления.
Повторяем то же для десятков, получаем вторую цифру справа и т. д.

С уважением, root.

Приложение:
program R1R2toA1_4; const ed : array [0..15] of byte = ( 1, 2, 4, 8, 6, 2, 4, 8, 6, 2, 4, 8, 6, 2, 4, 8 ); const des : array [0..15] of byte = ( 0, 0, 0, 0, 1, 3, 6, 2, 5, 1, 2, 4, 9, 9, 8, 6 ); const sot : array [0..15] of byte = ( 0, 0, 0, 0, 0, 0, 0, 1, 2, 5, 0, 0, 0, 1, 3, 7 ); const tis : array [0..15] of byte = ( 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 4, 8, 6, 2 ); var r1, r2 :byte; chislo : integer; i : byte; x : byte; a1, a2, a3, a4 : byte; begin chislo := 4077; r1 := $ff; r2 := $0F; x := 0; for i:= 0 to 7 do if ( ((r1 shr i) and 1)=1 ) then inc(x, ed[i]); for i:= 0 to 7 do if ( ((r2 shr i) and 1)=1 ) then inc(x, ed[i+8]); a4 := x mod 10; x := x div 10; for i:= 0 to 7 do if ( ((r1 shr i) and 1)=1 ) then inc(x, des[i]); for i:= 0 to 7 do if ( ((r2 shr i) and 1)=1 ) then inc(x, des[i+8]); a3 := x mod 10; x := x div 10; for i:= 0 to 7 do if ( ((r1 shr i) and 1)=1 ) then inc(x, sot[i]); for i:= 0 to 7 do if ( ((r2 shr i) and 1)=1 ) then inc(x, sot[i+8]); a2 := x mod 10; x := x div 10; for i:= 0 to 7 do if ( ((r1 shr i) and 1)=1 ) then inc(x, tis[i]); for i:= 0 to 7 do if ( ((r2 shr i) and 1)=1 ) then inc(x, tis[i+8]); a1 := x mod 10; Writeln(chislo, ':'); writeln( a1, '; ', a2,'; ', a3,'; ', a4 ); end.

Вопрос №1907

Уважаемые эксперты!

У меня был IE5.0, в нем я щёлкал по ссылке мышкой и держал shift
и открывалось новое окно, в Outlookе тоже самое.
А теперь (после того как в проводнике и моём компьютере перестала
ставиться галочка как веб-страница (там переключение происходило
и в этом состоянии ничего видно небыло)) поставил IE5.5 и новое окно
не появляется даже посе правого клика мышкой открыть в новом окне.
ЧТО ДЕЛАТЬ?
PS: переутановить винду и IE не предлагать.

Ответ

Здравствуйте, WE!
Попробуй зайти в "Свойства обозревателя" и все там посбрасывать - в закладке "Программы" нажать "Сброс веб-настроек", а в закладке "Дополнительно" - "Восстановить значения по умолчанию".

Вопрос №1901

Винчестер разбит на два логических диска.На c:Win98SE (поверх установлен WinBeOS98 III), а на d:Win2000-установлена позже.При загрузке 98SE, после появления фона
рабочего стола, выскакивает "синий экран" с сообщением:
32-разрядный драйвер устройства CDROWD(01)+0000AD23
попытался обратиться к незагруженной системной службе.
Возможно нормальное продолжение работы.
После троекратного нажатия любой клавиши продолжается нормальная загрузка. При запуске "Мастера установки
оборудования" - опять "синий экран".После однократного
нажатия клавиши - нормальное продолжение работы.
При запуске Win2000 нет никаких проблем.
Прошу ответить: limonnik@km.ru

Ответ

Здравствуйте, anat!
Удали из системы лишние девайсы ну типа контролер удаленного доступа или Dial-up adapter(если есть) и переставь винду..

Вопрос №1907

Уважаемые эксперты!

У меня был IE5.0, в нем я щёлкал по ссылке мышкой и держал shift
и открывалось новое окно, в Outlookе тоже самое.
А теперь (после того как в проводнике и моём компьютере перестала
ставиться галочка как веб-страница (там переключение происходило
и в этом состоянии ничего видно небыло)) поставил IE5.5 и новое окно
не появляется даже посе правого клика мышкой открыть в новом окне.
ЧТО ДЕЛАТЬ?
PS: переутановить винду и IE не предлагать.

Ответ

Здравствуйте, WE!
посмотри в свойствах обозревателя
там будет вигня такая типа:
загружать окна обозревателя в отдельном процессе
поставь туды галку...

Вопрос №1902

Здравствуйте !
Подскажите, плз, реально ли найти где-нибудь в интернете исходники принтерных драйверов (желательно матричных, ну или струйных).

Ответ

Здравствуйте, Maratych!
На сайтах производителей, да и просто по поисковикам полазай...

Вопрос №1905

Здравствуйте эксперты!
2Dron, я не совсем то просил, что вы сделали. Я просил посмотреть на мою программу и сказать, что там лишнее и как можно исправить, а не представлять
свое виденье проблемы.:-) Ну да ладно, не важно сам не уточнил, что хочу, сам и виноват, а вот за прогу спасибо, я в нее еще не до конца воткнул, но сейчас добью.:-)
2Painbringer & Broken Sword Спасибо за критику.:-) Вот посидел еще чуть-чуть, меньше получилось и call-ов меньше, правда пришлось несколько идей у Dron-a свиснуть(что ж поделать раз сам не догнал).:-) Вот, посмотрите, только уже скажите относительно моей программы, что можно изменить, а не свои пишите. Пожалуйста! Ну хоть чуть, чуть! Да, еще я не понял, что ради быстродействия в не которой степени можно пожертвовать размером?
ЗЫ: Уважаемый эксперт Dron уже высказал желание позаниматься оптимизацией программы и уважаемый эксперт Broken Sword сказал, что он напишет программу с первого раза меньше чем 300кб. Очень хотелось бы посмотреть, чем все это закончится!;-)
ЗЫЫ: Вот такой я подстрекатель.:-)
ЗЫЫЫ:2Broken Sword - а я и не обижаюсь, я еще не волшебник, а только учусь...:-)

Ответ

Здравствуйте, ILYA D.!

Ну уже лучше конечно. :))
Заместо ah=2 int 21h лучше использовать int 29h
Короче на 2 байта... и на одну команду собственно. :)

Почему на choose не используешь write???
Ну а в остальном - уже не плохо. :) только зачем столько ветвлений? :)) (все то нам не так? :))

Вопрос №1913

Здравствуйте, Эксперты!!!
У меня такой вопрос:
Можно ли создать *.res (файл ресурсов) на C Bilder, а потом его прикрепить его к асму т.к. я плохо знаком со структурой *.RC ......

p.s./ Если несложно вышлите примерчик "регистрации класа" и создания окна из ассемблера т.е. хотелось бы увидеть часть до
....
call ShowWindow,[main_win_handle],SW_NORMAL

msg_loop:
call PeekMessageA,offset message,0,0,0,PM_REMOVE
or ax,ax
jz no_message
call IsDialogMessageA,[child_dlg_handle],offset message
....

Ответ

Здравствуйте, Dmitriy!
RES - Да можно.

Вопрос №1910

Здравствуйте.
У мня вопрос следующего содержания.
Во многих книгах описано прерывание 13h
но максимальное пространство, к которому я могу обращаться при помощи этого прерывания = 1024*255*63 = 8 Gb
тобишь, dh=255, cx=FFFEh
А что делать, если мне надо обратиться к сектору, у которого номер Цилиндра больше, чем 1024?
Алексей.

Ответ

Здравствуйте, Алексей!

Есть INT 13h extension.
Это функции 41h-4fh

Они позволяют обращаться по линейному адресу сектора до сектора, номер которого умещается в 8 байт. (long long) сколько это будет гига или терра или вообще пета байт не могу точно сказать, но много. :)

Вопрос №1914

Расскажите зачем нужна эта опция
пуск->панель управления->мультимедия->аудио->
->воспроизведение->дополнительно->установка динамиков

Здесь можно выбрать (наушники, настольные стерео динамики,
квадрофонические динамики .....)

Но при изменении этого параметра ничего не меняеться:(

Ответ

Здравствуйте, Dmitriy!
Для того, чтобы выбрать звучание(почти как в эквалайзере) (но это смотря для какой у тебя саунд)

Вопрос №1906

Привет Kgm !!!
Как не крутил твою прогу по выводу разноцветными буквами собсвенного листинга на экран, ничего так и не получилось - прога как мертвая проскакивает в командной строке, хотя и без ошибок. ( пользуюсь TASM 5.0).
Подкажите, Что не так ?

Ответ

Здравствуйте, Shurik!
Причина в том, что я написал болванку и не проверял ее - извини, надеялся, что ты сам доделаешь мелочевку. Ну да ладно...
В ней нашлась простая плюшка (ты бы сам ее нашел, если бы прогнал под TD) - при вызове BIOS int 10h ф-ции 1303h регистр CX был равен 0, а должен указывать кол-во выводимых символов. Еще, как оказалось, для спец. символов (0dh, 0ah, 09h и т.п.) не следует указывать атрибуты, иначе эти атрибуты выводятся как символы (и часто пищат).
Увеличил объем буфера под файл до 4К. И, так на всякий случай, добавил очистку экрана (кстати эта ф-ция почему-то не исполняется под DOS-сессией в NT).
Там есть два варианта инициализации атрибутов выводимых символов - один из них заремирован - они взаимоисключающие.

Приложение:
PAGE 60,80 code segment assume cs:code, ds:code, es:code, ss:code org 100h start: ;---------- Открытие ----------- mov ah, 3Dh lea dx, file mov al, 2 int 21h jnc lab_noerr1 jmp open_error lab_noerr1: mov hFile, ax ;-------- Чтение блока ----------- v5: lea dx, buf mov bx, ax mov cx, rLen mov ah, 3fh int 21h jc read_error mov cx, ax mov rLen, cx ;------ подготовка к выводу на экран ----- mov ax, ds mov es, ax xor bp, bp lea si, buf lea di, buf2 lab_loop1: lodsb stosb cmp al, 0dh jz lab_next cmp al, 0ah jz lab_next ;------ Вариант N 1 -------------- ; ; inc di ; ;------ Вариант N 2 -------------- mov ax, ds:[bp] xor ax, ds:[bp+100h] add bp, 2 xor al, ah ; and al, 07fh ; чтобы не моргало and al, 00fh ; чтобы не моргало и было на черном фоне stosb ;------ Окончание варианта N 2 -------------- lab_next: loop lab_loop1 ;------ Set current video page -- mov ah, 05h mov al, nVP int 10h ;------ очистим экран ----------- mov ax, 0600h mov bx, 0700h mov dx, 0 push es mov es, dx mov cl, byte ptr es:[044ah] mov ch, byte ptr es:[0484h] dec cl pop es int 10h ;------ vivod bloka na ekran ---- vivod: mov ax, 1303h mov bh, nVP mov dl, nCol ; стартовый номер столбца mov dh, nRow ; стартовый номер строки mov cx, rLen lea bp, buf2 int 10h ;------ Закрытие файла --------- read_error: v4: mov bx, hFile mov ah, 3eh int 21h open_error: ;--- Завершение програмы ------ int 20h ;------------------------------- file db 'lr8.lst',0 rLen dw 1000h hFile dw 0 nVP db 0 ; номер используемой видеостраницы nRow db 10 ; стартовый номер столбца nCol db 0 ; стартовый номер строки buf db 1000h dup (?) ; буфер для чтения файла buf2 dw 1000h dup (?) ; буфер для симолов из файла на вывод экрана в виде пары символ/атрибут. ; надеюсь найдешь инфо про сервисную ф-цию 1303h прерывания 10h BIOS. ; Для этого сервиса и предназначен этот буфер ; Символ в младшем байте, атрибут (цвет) - в старшем. code ends end start

Вопрос №1915

Здравствуйте, Эксперты!!!
Расскажите алгоритм добавления к файлу записи т.е. был файл
at.txt
-----
sell
seyd
er
-----


А после выполнения проги будет
-----
sell 1,23
seyd
er
-----

Интересно как это сделать с помошью WinAPI

Ответ

Здравствуйте, Serega!
Алгоритм таков:
1. Ищешь файл at.txt
2. Открываетшь его для чтения/записи
3. Устанавливаешь указатель в начало
4. Ищешь слово sell (по шаблону или как хочешь)
5. Пишишь после найденного слова 1,23
6. Заркываешь файл.
7. Все.

Вопрос №1920

Привет!
Хочу поинтересоваться, что такое WatchDog.

Ответ

Здравствуйте, Василий!

сторожевая собака. :)

Вопрос №1914

Расскажите зачем нужна эта опция
пуск->панель управления->мультимедия->аудио->
->воспроизведение->дополнительно->установка динамиков

Здесь можно выбрать (наушники, настольные стерео динамики,
квадрофонические динамики .....)

Но при изменении этого параметра ничего не меняеться:(

Ответ

Здравствуйте, Dmitriy!
Это нужно для выбора типа колонок, например если у тебя наушники, то выбери наушники, если колонки с сабвуфером для 4 канально карты, выбери квадрофанические колонки.
Насчет разницы в качестве звука не знаю, у меня нет квадрофонических колонок :)

Вопрос №1920

Привет!
Хочу поинтересоваться, что такое WatchDog.

Ответ

Здравствуйте, Василий!
WatchDog("сторожевая собака")-специальная микросхема, часто встроенная в микроконтроллер, которая сбрасывает процессор при ненаступлении какого-либо события.
То есть(теоретически) она проверяет, не зависла ли система.
Например, в устройстве, что я на днях программировал, ВатчДог надо сбрасывать(посылать ему сигнал сброса) каждые 500 мс. Если он этот сигнал не получил, он сбрасывает центральный процессор.
ЗЫ Посылай в следующий раз вопрос ОДНОЙ подгруппе, пожалуйста!

Вопрос №1919

Привет!
Хочу поинтересоваться, что такое WatchDog.

Ответ

Здравствуйте, Василий!

В общем случае - система контроля работоспособности объекта (по русски - "сторожевой пёс"). В частном - устройство (как правило, со своим источником питания и часами), имеющее право "сброса" системы - что приводит её в рабочее состояние. Чтобы эта "собака" не укусила, её саму необходимо переодически сбрасывать - обычно каждые 100-2000 мс.
Кроме того, WatchDog'ом называют программные (или программно/аппаратные) комплексы по защите данных. Последний такой видел лет десять назад.

Вопрос №1912

Здравствуте!!!!!
у меня такой вопрос: когда в запароленом документе msoffice
word'овом вводишь неправильный пароль вылетает сообщение
похожее на MessageBoxA()?, но я ставил в SoftIce
bpx MessageBoxA нифига неполучается, также и непомогло
GetDlgItemTextA. Скажите, что за функция рисует это сообщение??

Ответ

Здравствуйте, Змей!

Вместо GetDlgItemTextA попробуй hmemcpy.

А насчет что MessageBoxA неработает то скорее всего окно создано
диалоговыми функциями.

Вопрос №1902

Здравствуйте !
Подскажите, плз, реально ли найти где-нибудь в интернете исходники принтерных драйверов (желательно матричных, ну или струйных).

Ответ

Здравствуйте, Maratych!
Ну вот к примеру драйвер_руссификации_принтера_из журнала "Монитор" - был раньше такой в Белоруссии_выпускался. Смотри приложение

Приложение:
О. Шарапов ПРОГРАММНАЯ РУСИФИКАЦИЯ МАТРИЧНЫХ ПРИНТЕРОВ ЛИСТИНГ 1. Пpогpамма pусификации пpинтеpа STAR LC-10 title star_lc.asm command segment assume cs: command, ds:command ; jmp Beg rem_17_off dw ? ; смещение стандаpтного обpаботчика rem_17_seg dw ? ; сегмент стандаpтного обpаботчика ; ; ================== Секция обработки INT 17h ==================== ; new_int17 proc far cmp ah, 0h ; функция 0 пpеpывания INT17h? jnz work1 ; нет, пеpеход на *work1 cmp al, 127 ; код символа больше 127 jng en ; нет - пеpеход на *en cmp al, 176 ; код символа меньше 176 jb trans ; да - пеpеход на *trans cmp al, 224 ; код символа меньше 224 jb en ; да - пеpеход на *en cmp al, 239 ; нет, код символа больше 239 jg en ; да - пеpеход на *en sub al, 114 ; уменьшить код символа на 114 jmp work2 ; пеpеход на *work2 trans: sub al, 66 ; уменьшить код символа на 66 jmp work2 ; пеpеход на *work2 en: push ax call rom ; пеpеключение на pаботу с ПЗУ jmp nowork1 work2: push ax call ram ; пеpеключение на pаботу с ОЗУ nowork1: pop ax work1: mov dx, 0h jmp dword ptr rem_17_off ; вызов стаpого вектоpа INT17h new_int17 endp ; ram proc near ; пpоцедуpа пеpеключения на mov al, 1bh ; pаботу с ОЗУ call print mov al, 25h call print mov al, 31h call print ret ram endp ; rom proc near ; пpоцедуpа пеpеключения на mov al, 1bh ; pаботу с ПЗУ call print mov al, 25h call print mov al, 30h call print ret rom endp ; print proc near ; процедура вывода символа mov dx, 378h ; на принтер out dx, al inc dx waitp: in al, dx test al, 80h jz waitp inc dx mov al, 0dh out dx, al mov al, 0ch out dx, al ret print endp ; load proc near ; пpоцедуpа загpузки черновой xor dx, dx ; конфигурации кириллицы met: push dx lea si, cs:cod inc byte ptr cs:[si+3] inc byte ptr cs:[si+4] mov cx, 05h in0: mov al, byte ptr cs:[si] call print inc si loop in0 pop dx push dx lea si, cs:cod mov ax, 12 mul dx add si, 5 add si, ax mov cl, 12 in1: mov al, byte ptr cs:[si] call print inc si loop in1 pop dx inc dx cmp dx, 64 jnz met ret load endp cod db 1bh,26h,00h,61,61 ; STAR-LC 10 db 8ah,00h,06h,18h,60h,88h,00h,88h,00h,0feh,00h,00h ; символ А * db 8ah,00h,0feh,00h,92h,00h,92h,00h,92h,0ch,00h,00h ; символ Б * db 8ah,00h,0feh,00h,92h,00h,92h,00h,92h,6ch,00h,00h ; символ В * db 8ah,00h,0feh,00h,80h,00h,80h,00h,80h,40h,00h,00h ; символ Г * db 8ah,00h,03h,3ch,42h,00h,82h,00h,0fch,03h,00h,00h ; символ Д * db 8ah,00h,0feh,00h,92h,00h,92h,00h,82h,44h,00h,00h ; символ Е * db 8ah,00h,00h,0c6h,28h,10h,0eeh,10h,28h,0c6h,00h,00h ; символ Ж * db 8ah,00h,00h,44h,82h,00h,92h,00h,92h,6ch,00h,00h ; символ З * db 8ah,00h,00h,0fah,04h,08h,10h,20h,40h,0beh,00h,00h ; символ И * db 8ah,00h,00h,0fah,04h,08h,90h,20h,40h,0beh,00h,00h ; символ Й * db 8bh,00h,00h,0feh,00h,10h,00h,28h,44h,82h,00h,00h ; символ К * db 8bh,00h,02h,3ch,40h,80h,00h,80h,00h,0feh,00h,00h ; символ Л * db 8ah,00h,00h,0beh,40h,20h,10h,20h,40h,0beh,00h,00h ; символ М * db 8ah,00h,00h,0feh,00h,10h,00h,10h,00h,0feh,00h,00h ; символ Н * db 8ah,00h,00h,7ch,82h,00h,82h,00h,82h,7ch,00h,00h ; символ О * db 8ah,00h,00h,0feh,00h,80h,00h,80h,00h,0feh,00h,00h ; символ П * db 8ah,00h,00h,0feh,00h,90h,00h,90h,00h,60h,00h,00h ; символ Р * db 8ah,00h,7ch,82h,00h,82h,00h,82h,00h,44h,00h,00h ; символ С * db 8ah,00h,00h,80h,00h,80h,7eh,80h,00h,80h,00h,00h ; символ Т * db 8ah,00h,0e2h,10h,02h,10h,02h,10h,02h,0fch,00h,00h ; символ У * db 8ah,00h,00h,70h,88h,00h,0feh,00h,88h,70h,00h,00h ; символ Ф * db 8bh,00h,00h,82h,44h,28h,10h,28h,44h,82h,00h,00h ; символ Х * db 8ah,00h,00h,0feh,00h,02h,00h,02h,0fch,03h,00h,00h ; символ Ц * db 8ah,00h,00h,0e0h,10h,00h,10h,00h,10h,0eeh,00h,00h ; символ Ч * db 8ah,00h,00h,0feh,00h,02h,0fch,02h,00h,0feh,00h,00h ; символ Ш * db 8ah,00h,0feh,00h,02h,0fch,02h,00h,0feh,03h,00h,00h ; символ Щ * db 8ah,00h,80h,00h,0feh,00h,12h,00h,12h,0ch,00h,00h ; символ Ъ * db 8ah,00h,0feh,00h,12h,00h,12h,0ch,00h,0feh,00h,00h ; символ Ы * db 8ah,00h,0feh,00h,12h,00h,12h,00h,12h,0ch,00h,00h ; символ Ь * db 8ah,00h,00h,44h,82h,10h,82h,10h,82h,7ch,00h,00h ; символ Э * db 8ah,00h,0feh,00h,10h,6ch,82h,00h,82h,7ch,00h,00h ; символ Ю * db 8ah,00h,62h,94h,08h,90h,00h,90h,00h,0feh,00h,00h ; символ Я * db 8ah,00h,04h,2ah,00h,2ah,00h,2ah,14h,02h,00h,00h ; символ а * db 8ah,00h,3eh,00h,2ah,00h,2ah,00h,2ah,04h,00h,00h ; символ б * db 8ah,00h,3eh,00h,2ah,00h,2ah,00h,2ah,14h,00h,00h ; символ в * db 8ah,00h,3eh,00h,20h,00h,20h,00h,20h,10h,00h,00h ; символ г * db 0ah,00h,00h,38h,45h,00h,45h,00h,45h,3ah,00h,00h ; символ д * db 8ah,00h,1ch,00h,2ah,00h,2ah,00h,2ah,10h,00h,00h ; символ е * db 8ah,00h,00h,22h,14h,08h,36h,08h,14h,22h,00h,00h ; символ ж * db 8ah,00h,00h,14h,22h,08h,22h,08h,22h,14h,00h,00h ; символ з * db 8ah,00h,3ch,02h,04h,08h,10h,20h,00h,3eh,00h,00h ; символ и * db 8ah,00h,3ch,02h,84h,08h,90h,20h,00h,3eh,00h,00h ; символ й * db 8ah,00h,3eh,00h,08h,00h,08h,04h,10h,22h,00h,00h ; символ к * db 8ah,00h,02h,0ch,10h,20h,00h,20h,00h,3eh,00h,00h ; символ л * db 8ah,00h,00h,1eh,20h,10h,08h,10h,20h,1eh,00h,00h ; символ м * db 8ah,00h,00h,3eh,00h,08h,00h,08h,00h,3eh,00h,00h ; символ н * db 8ah,00h,00h,1ch,22h,00h,22h,00h,22h,1ch,00h,00h ; символ о * db 8ah,00h,00h,3eh,00h,20h,00h,20h,00h,3eh,00h,00h ; символ п * db 0ah,00h,00h,7fh,00h,44h,00h,44h,00h,38h,00h,00h ; символ p * db 8ah,00h,1ch,22h,00h,22h,00h,22h,00h,22h,00h,00h ; символ с * db 8ah,00h,20h,00h,20h,1eh,20h,00h,20h,00h,00h,00h ; символ т * db 0ah,00h,79h,04h,01h,04h,01h,04h,01h,7eh,00h,00h ; символ у * db 0ah,00h,00h,38h,44h,00h,7fh,00h,44h,38h,00h,00h ; символ ф * db 8ah,00h,00h,22h,14h,08h,00h,08h,14h,22h,00h,00h ; символ х * db 8ah,00h,00h,3eh,00h,02h,00h,02h,3ch,03h,00h,00h ; символ ц * db 8ah,00h,30h,08h,00h,08h,00h,08h,00h,3eh,00h,00h ; символ ч * db 8ah,00h,00h,3eh,00h,02h,3eh,02h,00h,3eh,00h,00h ; символ ш * db 8ah,00h,3eh,00h,02h,3ch,02h,00h,3ch,03h,00h,00h ; символ щ * db 8ah,00h,20h,00h,3eh,00h,0ah,00h,0ah,04h,00h,00h ; символ ъ * db 8ah,00h,3eh,00h,0ah,00h,0ah,04h,00h,3eh,00h,00h ; символ ы * db 8ah,00h,00h,3eh,00h,0ah,00h,0ah,00h,04h,00h,00h ; символ ь * db 8ah,00h,22h,00h,22h,08h,22h,08h,22h,1ch,00h,00h ; символ э * db 8ah,00h,3eh,00h,08h,14h,22h,00h,22h,1ch,00h,00h ; символ ю * db 9ah,00h,10h,2ah,04h,28h,00h,28h,00h,3eh,00h,00h ; символ я * ; ; ====================== Стартовый блок ======================= Begin: push cs pop ds lea dx, cs:table ; вывод на дисплей mov ah, 09h ; заголовка int 21h ; пpогpаммы xor bx, bx mov es, bx mov ax, es:[5ch] ; получение и сохранение mov dx, es:[5eh] ; адреса входа в mov cs:rem_17_off, ax ; стандартный обра- mov cs:rem_17_seg, dx ; ботчик прерывания INT17h lea dx, cs:new_int17 mov es:[5ch], dx mov es:[5eh], cs call load ; загрузка конфигурации ; кириллицы в ОЗУ принтера lea dx, cs:Begin ; выход с сохpанением int 27h ; в памяти ; table db 'Driver for printer Star LC-10',0ah,0dh db '(by Sharapov & Br.) Rostov/Don',0ah,0dh,'$' ; command ends end ЛИСТИНГ 2: Пользовательский обработчик прерывания INT 17h для принтера EPSON LQ-500 ; ; ================== Секция обработки INT 17h ==================== ; new_int17 proc far push bx cmp ah, 0h jnz nowork cmp al, 80h ; символ из пpавой части ? jb en ; нет - пеpеход на *en cmp al, 0b0h ; код символа меньше 176 jb cont ; да - пеpеход на *cont cmp al, 0e0h ; код символа меньше 224 jb en ; да - пеpеход на *en cmp al, 0f1h ; нет, код символа больше 241 jg en ; да - пеpеход на *en sub al, 176 ; уменьшить код символа на 176 jmp Russian ; пеpеход на *Russian cont: sub al, 128 ; уменьшить код символа на 128 jmp Russian ; пеpеход на *Russian en: push ax call rom ; пеpеключение на pаботу с ПЗУ pop ax jmp nowork Russian:mov bx, ax ; в BX - преобразованный код ; кириллицы mov al, byte ptr cs:[Decod+bx] test al, 0ffh ; символ-аналог существует? jnz en ; да, переход на *en mov bx, ax ; нет, получаем номер со- mov al, byte ptr cs:[TabRam+bx] ; ответствующей ячейки ОЗУ push ax call ram ; пеpеключение на paботу с ОЗУ pop ax nowork: pop bx xor dx, dx jmp dword ptr cs:int17_off ; вызов стаpого вектоpа INT17h new_int17 endp ; Decod db 41h,00h,42h,00h,00h,45h,00h,33h,00h,00h,4Bh,00h db 4Dh,48h,4Fh,00h,50h,43h,54h,00h,00h,58h,00h,00h db 00h,00h,00h,00h,00h,00h,00h,00h db 61h,00h,00h,00h,00h,65h,00h,00h,75h,75h,00h,00h db 00h,00h,6Fh,6Eh,70h,63h,6Dh,79h,00h,78h,00h,00h db 00h,00h,00h,00h,00h,00h,00h,00h ; TabRam db 00h,3Eh,00h,3Fh,40h,00h,41h,00h,42h,42h,00h,43h db 00h,00h,00h,44h,00h,00h,00h,45h,46h,00h,47h,48h db 49h,4Ah,4Bh,4Ch,4Dh,4Eh,4Fh,50h db 00h,51h,52h,53h,54h,00h,55h,56h,00h,00h,57h,58h db 59h,5Ah,00h,00h,00h,00h,00h,00h,5Bh,00h,5Ch,5Dh db 5Eh,5Fh,60h,61h,62h,63h,64h,65h ; db 'Sharapov & Br' message db 0dh,0ah,'Cyrillic for EPSON LQ-500',0dh,0ah,'$' int17_off dw ? ; смещение стаpого обpаботчика INT 17h int17_seg dw ? ; сегмент стаpого обpаботчика INT 17h ; ESC последовательность загpузки опpеделяемых пользователем символов cod: db 1bh,26h,00h,61,61,00h,07h,02h ; байты конфигуpации символов киpиллицы cod1: db 17h,0efh,0d0h,08h,10h,20h,10h,20h,10h,08h,10h,20h db 10h,20h,10h,08h,18h,60h,10h,07h,80h ; <- Б db 17h,0ffh,0f0h,08h,00h,00h,10h,00h,00h,08h,00h,00h db 10h,00h,00h,08h,00h,00h,10h,00h,00h ; <- Г db 00h,00h,1ch,03h,0ffh,0e0h,0ch,00h,10h,10h,00h,20h db 08h,00h,10h,17h,0ffh,0e0h,00h,00h,1ch ; <- Д db 1fh,01h,0f0h,00h,0eeh,00h,00h,10h,00h,1fh,0efh,0f0h db 00h,10h,00h,00h,0eeh,00h,1fh,01h,0f0h ; <- Ж db 1fh,0ffh,0d0h,00h,00h,20h,00h,00h,0c0h,00h,03h,00h db 00h,0ch,00h,00h,10h,00h,1fh,0efh,0f0h ; <- И db 00h,00h,10h,00h,0ffh,0e0h,03h,00h,00h,06h,00h,00h db 08h,00h,00h,10h,00h,00h,0fh,0ffh,0f0h ; <- Л db 17h,0ffh,0f0h,08h,00h,00h,10h,00h,00h,08h,00h,00h db 10h,00h,00h,08h,00h,00h,17h,0ffh,0f0h ; <- П db 1fh,0e0h,00h,00h,10h,10h,00h,08h,20h,00h,10h,10h db 00h,08h,60h,00h,11h,80h,1fh,0eeh,00h ; <- У db 03h,0feh,00h,04h,01h,00h,02h,02h,00h,1dh,0fdh,0f0h db 02h,02h,00h,04h,01h,00h,03h,0feh,00h ; <- Ф db 1fh,0ffh,0d0h,00h,00h,20h,00h,00h,10h,00h,00h,20h db 00h,00h,10h,1fh,0ffh,0e0h,00h,00h,1ch ; <- Ц db 1fh,0e0h,00h,00h,10h,00h,00h,08h,00h,00h,10h,00h db 00h,08h,00h,00h,10h,00h,1fh,0efh,0f0h ; <- Ч db 1fh,0ffh,0d0h,00h,00h,20h,00h,00h,10h,1fh,0ffh,0e0h db 00h,00h,10h,00h,00h,20h,1fh,0ffh,0d0h ; <- Ш db 1fh,0ffh,0d0h,00h,00h,20h,00h,00h,10h,1fh,0ffh,0e0h db 00h,00h,10h,00h,00h,20h,1fh,0ffh,0dch ; <- Щ db 10h,00h,00h,08h,00h,00h,17h,0efh,0d0h,00h,10h,20h db 00h,20h,10h,00h,10h,20h,00h,0fh,0c0h ; <- Ъ db 1fh,0efh,0d0h,00h,10h,20h,00h,20h,10h,00h,10h,20h db 00h,0fh,0c0h,00h,00h,00h,1fh,0ffh,0f0h ; <- Ы db 1fh,0efh,0d0h,00h,10h,20h,00h,20h,10h,00h,10h,20h db 00h,20h,10h,00h,10h,20h,00h,0fh,0c0h ; <- Ь db 04h,00h,40h,08h,00h,20h,10h,10h,10h,08h,20h,20h db 10h,10h,10h,08h,20h,20h,07h,0dfh,0c0h ; <- Э db 1fh,0efh,0f0h,00h,10h,00h,07h,0efh,0c0h,08h,00h,20h db 10h,00h,10h,08h,00h,20h,07h,0ffh,0c0h ; <- Ю db 07h,0e0h,10h,08h,10h,60h,10h,09h,80h,08h,16h,00h db 10h,08h,00h,08h,10h,00h,17h,0efh,0f0h ; <- Я db 10h,7ch,0c0h,28h,80h,20h,25h,00h,40h,22h,80h,20h db 11h,00h,40h,20h,80h,20h,10h,7fh,0c0h ; <- б db 00h,0fbh,0d0h,01h,04h,20h,00h,88h,10h,01h,04h,20h db 00h,88h,10h,00h,74h,20h,00h,03h,0c0h ; <- в db 01h,7fh,0f0h,00h,80h,00h,01h,00h,00h,00h,80h,00h db 01h,00h,00h,00h,80h,00h,01h,00h,00h ; <- г db 00h,00h,1ch,00h,7fh,0e0h,00h,80h,10h,01h,00h,20h db 00h,80h,10h,01h,0ffh,0e0h,00h,00h,1ch ; <- д db 01h,0c0h,70h,00h,31h,80h,00h,0a0h,00h,01h,0f5h,0f0h db 00h,0a0h,00h,00h,31h,80h,01h,0c0h,70h ; <- ж db 00h,00h,40h,00h,80h,20h,01h,04h,10h,00h,88h,20h db 01h,04h,10h,00h,8ah,20h,00h,71h,0c0h ; <- з db 01h,0ffh,0f0h,00h,04h,00h,00h,08h,00h,00h,04h,00h db 00h,1bh,00h,00h,60h,0c0h,01h,80h,30h ; <- к db 00h,00h,10h,00h,00h,20h,00h,3fh,0c0h,00h,40h,00h db 00h,80h,00h,01h,00h,00h,00h,0ffh,0f0h ; <- л db 01h,7fh,0f0h,00h,80h,00h,00h,60h,00h,00h,18h,00h db 00h,60h,00h,00h,80h,00h,01h,7fh,0f0h ; <- м db 01h,0fbh,0f0h,00h,04h,00h,00h,08h,00h,00h,04h,00h db 00h,08h,00h,00h,04h,00h,01h,0fbh,0f0h ; <- н db 00h,0ffh,0e0h,01h,00h,10h,00h,80h,20h,01h,7fh,0dfh db 00h,80h,20h,01h,00h,10h,00h,0ffh,0e0h ; <- ф db 01h,0ffh,0d0h,00h,00h,20h,00h,00h,10h,00h,00h,20h db 00h,00h,10h,01h,0ffh,0e0h,00h,00h,1ch ; <- ц db 01h,0f8h,00h,00h,04h,00h,00h,02h,00h,00h,04h,00h db 00h,02h,00h,00h,04h,00h,01h,0fbh,0f0h ; <- ч db 01h,0ffh,0d0h,00h,00h,20h,00h,00h,10h,01h,0ffh,0e0h db 00h,00h,10h,00h,00h,20h,01h,0ffh,0d0h ; <- ш db 01h,0ffh,0d0h,00h,00h,20h,00h,00h,10h,01h,0ffh,0e0h db 00h,00h,10h,00h,00h,20h,01h,0ffh,0dch ; <- щ db 01h,00h,00h,00h,80h,00h,01h,7bh,0d0h,00h,04h,20h db 00h,08h,10h,00h,04h,20h,00h,03h,0c0h ; <- ъ db 01h,0fbh,0d0h,00h,04h,20h,00h,08h,10h,00h,04h,20h db 00h,03h,0c0h,00h,00h,00h,01h,0ffh,0f0h ; <- ы db 01h,0fbh,0d0h,00h,04h,20h,00h,08h,10h,00h,04h,20h db 00h,08h,10h,00h,04h,20h,00h,03h,0c0h ; <- ь db 00h,40h,40h,00h,80h,20h,01h,08h,10h,00h,84h,20h db 01h,08h,10h,00h,84h,20h,00h,7bh,0c0h ; <- э db 01h,0fbh,0f0h,00h,04h,00h,00h,7bh,0c0h,00h,80h,20h db 01h,00h,10h,00h,80h,0c0h,00h,7bh,0c0h ; <- ю db 00h,78h,10h,00h,84h,60h,01h,02h,80h,00h,85h,00h db 01h,02h,00h,00h,84h,00h,01h,7bh,0f0h ; <- я;

Вопрос №1902

Здравствуйте !
Подскажите, плз, реально ли найти где-нибудь в интернете исходники принтерных драйверов (желательно матричных, ну или струйных).

Ответ

Здравствуйте, Maratych!
Вот еще нашел_см_там_же

Приложение:
; Драйвер-русификатор для принтера CPF-136H ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ; .MODEL TINY .CODE ;------ Макрокоманда для вывода ESC-последовательности ---------- .OUTSEQ MACRO sequence mov si,OFFSET sequence lodsw mov cx,ax call ESC_output ENDM ; Buffer_Size EQU 132 ; Размер вспомогательного буфера CR EQU 0Dh LF EQU 0Ah EOM EQU '$' ORG 100h start: jmp Init ; ; Резидентная часть драйвера ; ~~~~~~~~~~~~~~~~~~~~~~~~~~ ; Int_17h_proc dd ? Print: sti cmp ah,0 ; Печать символа? je @@Lets_more jmp Print_quit ; Нет - завершение обработки. @@Lets_more: cld push bx cx si di ds es mov bx,cs mov ds,bx mov es,bx ;------ Выделение переключения в другой режим печати ------------ cmp word ptr Last_chars,1B78h jne Select_graph mov Last_chars,0 mov al,0 ; Draft в любом случае. jmp Restore_registers ;------ Выделение заголовка графической последовательности ------ Select_graph: cmp word ptr Last_chars,1B5Ah jne @@Loc_1 jmp Mode_Select @@Loc_1: cmp word ptr Last_chars,1B59h jne @@Loc_2 jmp Mode_Select @@Loc_2: cmp word ptr Last_chars,1B4Ch jne @@Loc_3 jmp Mode_Select @@Loc_3: cmp word ptr Last_chars,1B4Bh jne @@Loc_4 jmp Mode_Select @@Loc_4: cmp word ptr Last_chars,1B2Ah jne @@Loc_5 jmp Mode_Select @@Loc_5: cmp word ptr Counter,0 ; Печать графической je Simple_byte ; последовательности? dec word ptr Counter ; Да. Уменьшаем счетчик. jmp Restore_Registers ; Выход. Simple_byte: ;------ Печать в текстовом режиме ------------------------------- mov bx,Last_chars mov bh,al ; Сохраняем последний xchg bh,bl ; и предпоследний mov Last_chars,bx ; выводимые символы. cmp al,lf ; Перевод строки? je LF_emulation cmp al,cr jne @@Let_more ; Возврат каретки? mov Indicator,OFFSET Buffer ; Да. jmp Restore_Registers ;------ Выводимый символ - обычный символ ----------------------- @@Let_more: mov di,Indicator test al,80h ; Латинская буква? je Print_continue xor al,80h ; Нет. Готовим mov bx,offset Table_ ; перекодировку. xlatb test al,80h ; Символ из ПЗУ? jne Print_continue mov Char,al xor al,70h mov [di],al ; Сохраняем код "хвостика" .OUTSEQ Print_from_RAM ; Печатаем тело из ОЗУ. mov ah,2 Print_continue: inc di ; Перемещаем указатель mov word ptr Indicator,di ; и сохраняем его. Restore_Registers: pop es ds di si cx bx Print_quit: pushf call cs: [Int_17h_proc] ; Вызов оригинального 17h. iret LF_emulation: ;------ Эмуляция перевода строки -------------------------------- .OUTSEQ lf_8_pin ; Переводим на 8 иголок. mov di,OFFSET Buffer mov cx,Buffer_Size mov al,' ' repe scasb ; Есть "хвостики"? jcxz Pass_exit mov si,OFFSET Print_from_buf mov cx,Buffer_Size+8 call ESC_output ; Допечатываем "хвостики". mov di,OFFSET Buffer mov al,' ' mov cx,Buffer_Size rep stosb ; Очищаем буфер. Pass_exit: .OUTSEQ lf_4_pin ; Переводим на 4 иголки. mov ah,2 jmp Restore_Registers ;------ Оформление счетчика для графической последовательности -- Mode_Select: cmp byte ptr Counter,0 jne Second_byte mov byte ptr Counter,al ; Младший байт счетчика. jmp Restore_Registers Second_byte: mov bx,1 mov byte ptr Counter[bx],al ; Старший байт счетчика. mov word ptr Last_Chars,0 jmp Restore_Registers ; ; Вспомогательные переменные для графических последовательностей ; Last_chars dw 0 ; Последние два символа Counter dw 0 ; Счетчик ; ; Таблица перекодировки ; Table_ LABEL BYTE db 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 db 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159 db 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175 db 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63 db 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207 db 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223 db 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191 db 133,165,242,243,244,245,246,247,248,249,250,251,252,253,254,255 ; ; ESC-последовательности ; Print_from_RAM dw Switching_length db 1Bh,'%',1,0 Char db ? db 1Bh,'%',0,0 Switching_length = $ - Print_from_RAM - 1 ; lf_8_pin dw lf_8_pin_length db 1Bh,'A',8 db cr db 1Bh,'2' db lf lf_8_pin_length = $ - lf_8_pin - 1 ; lf_4_pin dw lf_4_pin_length db 1Bh,'A',4 db cr db 1Bh,'2' db lf db 1Bh,'0' db 1Bh,'2' lf_4_pin_length = $ - lf_4_pin - 1 ; Print_from_buf db 1Bh,'%',1,0 Buffer db Buffer_Size dup (' ') db 1Bh,'%',0,0 ; Indicator dw Buffer ; Указатель на текущую ; позицию в буфере. ; ; Подпрограмма вывода ESC-последовательности ; ; На входе: DS:SI - указатель на последовательность, ; CX - количество байтов в последовательности. ; Изменяемые регистры: AX, CX, SI. ; ESC_output proc near ESC_output1: lodsb ; Вывод байта. mov ah,0 pushf call cs:[Int_17h_proc] test ah,00001000b ; Ошибка? jz ESC_output2 dec si ; Да. Выводим снова. jmp ESC_output1 ESC_output2: loop ESC_output1 ret ESC_output endp ; ; Инсталляционная часть драйвера ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ; Init: mov ah,9 mov dx,OFFSET Myname int 21h ; Вывод идентификатора программы. mov ax,3517h int 21h ; Получить адрес обработчика 17h mov word ptr [Int_17h_proc+0],bx mov word ptr [Int_17h_proc+2],es mov ah,2 mov dx,0 int 17h ; Получить состояние принтера. test ah,00100000b ; Загрузка возможна? jz Load_font mov ah,9 mov dx,OFFSET Warning int 21h jmp short Tst_resident Load_font: .OUTSEQ Image_font Tst_resident: cmp word ptr es:[bx-6],OFFSET Init - 103h ; Драйвер установлен? je Escape mov dx,OFFSET Print mov ax,2517h ; Переставить на себя вектор 17h int 21h mov dx,OFFSET Init int 27h ; Оставить в памяти резидентную Escape: ; часть. mov ax,4C00h int 21h ; Обычный выход. Myname db cr,lf,lf,9 db 'Русификатор для CPF-136H',cr,lf,lf db 'Драйвер разработанн Д.Правиковым, 1990 г.',cr,lf,eom Warning db cr,lf,lf db 'Загрузка дополнительных символов НЕ производится.' db cr,lf,eom ; Используемые ESC-последовательности Image_font dw Image_length db 1Bh,'x',0 ; Режим draft db 1Bh,'U',1 ; Однонаправленная печать. db 1Bh,'&',00h,48,79 ; Образы загружаемых символов псевдографики db 86h, 0AAh, 000h, 0AAh, 000h, 0AAh, 6 dup (0) db 86h, 0AAh, 055h, 0AAh, 055h, 0AAh, 55h, 5 dup (0) db 86h, 0BBh, 077h, 0EEh, 0DDh, 0BBh, 77h, 5 dup (0) db 86h, 000h, 000h, 000h, 000h, 0FFh, 6 dup (0) db 86h, 004h, 004h, 004h, 004h, 0FFh, 6 dup (0) db 86h, 00Ah, 00Ah, 00Ah, 00Ah, 0FFh, 6 dup (0) db 86h, 004h, 004h, 0FFh, 000h, 000h, 000h, 0FFh, 4 dup (0) db 86h, 004h, 004h, 007h, 004h, 004h, 004h, 007h, 4 dup (0) db 86h, 00Ah, 00Ah, 00Ah, 00Ah, 007h, 6 dup (0) db 86h, 00Ah, 00Ah, 0FBh, 000h, 000h, 000h, 0FFh, 4 dup (0) db 86h, 000h, 000h, 0FFh, 000h, 000h, 000h, 0FFh, 4 dup (0) db 86h, 00Ah, 00Ah, 00Bh, 008h, 008h, 008h, 00Fh, 4 dup (0) db 86h, 00Ah, 00Ah, 0FAh, 002h, 002h, 002h, 0FEh, 4 dup (0) db 86h, 004h, 004h, 0FCh, 004h, 004h, 004h, 0FCh, 4 dup (0) db 86h, 00Ah, 00Ah, 00Ah, 00Ah, 0FEh, 6 dup (0) db 86h, 004h, 004h, 004h, 004h, 007h, 6 dup (0) ; Образы "хвостиков" символов псевдографики db 86h, 11 dup (0) db 86h, 11 dup (0) db 86h, 11 dup (0) db 86h, 000h, 000h, 000h, 000h, 0F0h, 6 dup (0) db 86h, 000h, 000h, 000h, 000h, 0F0h, 6 dup (0) db 86h, 000h, 000h, 000h, 000h, 0F0h, 6 dup (0) db 86h, 000h, 000h, 0F0h, 000h, 000h, 000h, 0F0h, 4 dup (0) db 86h, 000h, 000h, 0F0h, 000h, 000h, 000h, 0F0h, 4 dup (0) db 86h, 000h, 000h, 000h, 000h, 0F0h, 6 dup (0) db 86h, 000h, 000h, 0F0h, 000h, 000h, 000h, 0F0h, 4 dup (0) db 86h, 000h, 000h, 0F0h, 000h, 000h, 000h, 0F0h, 4 dup (0) db 86h, 000h, 000h, 0F0h, 000h, 000h, 000h, 0F0h, 4 dup (0) db 86h, 11 dup (0) db 86h, 11 dup (0) db 86h, 11 dup (0) db 86h, 000h, 000h, 000h, 000h, 0F0h, 6 dup (0) Image_length = $ - lf_4_pin - 1 END start

Вопрос №1920

Привет!
Хочу поинтересоваться, что такое WatchDog.

Ответ

Здравствуйте, Василий!
Зайди сюда посмотри
http://team.mit8.ru/watchdog/doc/faq.php

Вопрос №1913

Здравствуйте, Эксперты!!!
У меня такой вопрос:
Можно ли создать *.res (файл ресурсов) на C Bilder, а потом его прикрепить его к асму т.к. я плохо знаком со структурой *.RC ......

p.s./ Если несложно вышлите примерчик "регистрации класа" и создания окна из ассемблера т.е. хотелось бы увидеть часть до
....
call ShowWindow,[main_win_handle],SW_NORMAL

msg_loop:
call PeekMessageA,offset message,0,0,0,PM_REMOVE
or ax,ax
jz no_message
call IsDialogMessageA,[child_dlg_handle],offset message
....

Ответ

Здравствуйте, Dmitriy!

Здравствуйте, Dmitriy!

>>Можно ли создать *.res.....
Можно.

.data
wc windclassex


.code
start:

xor ebx,ebx
push ebx
call GetModuleHandleA
mov esi,eax
mov wc.hInstance,eax

push FrameIcon
push esi
call LoadIconA

mov wc.hIcon,eax
push IDC_ARROW
push ebx
call LoadCursorA

mov wc.hCursor,eax
push offset wc
call RegisterClassExA

mov eax,CW_USEDEFAULT
push ebx
push esi
push ebx
push ebx
push eax
push eax
push eax
push eax
push WS_OVERLAPPEDWINDOW or WS_CLIPCHILDREN
push offset FrameName
push offset FrameClass
push WS_EX_DLGMODALFRAME
call CreateWindowExA

Вопрос №1915

Здравствуйте, Эксперты!!!
Расскажите алгоритм добавления к файлу записи т.е. был файл
at.txt
-----
sell
seyd
er
-----


А после выполнения проги будет
-----
sell 1,23
seyd
er
-----

Интересно как это сделать с помошью WinAPI

Ответ

Здравствуйте, Serega!

А в чем трудности ?
Открываеш файл ,добавляеш что нужно,закрываеш.

Если незнаком с функциями для работы с файлами то
начни изучение с CreateFile.

Вопрос №1917

Чем отличаются кодировки_Windows_1251_и_Windows_1252?
Спасибо за внимание_к моей проблеме.
С уважением, Андриянов П.А.

Ответ

Здравствуйте, Петр!
Хорошой вопрос. :))) Для того, чтобы немного в этом понять, попробуйте в системном реестре открыть следующую ветвь HKEY_LOCAL_MACHINE\Software\CLASSES\MIME\Database\Codepage и там посмотреть не только про эти кодировки, но и про остальные. :)))

ЗЫ: Чтобы в некоторых прогах (типа Фотошопа) отражался русский, создайте файл реестра, например в блокноте и назовите codepage.reg и скопируйте туда фрагмент из приложения, а потом просто запустите этот файл, перзеагрузитесь и все должно заработать. (пустая строка в конце файла - обязательна!!!!!)

Приложение:
REGEDIT4 [HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\Nls\Codepage] "1252"="cp_1251.nls"

Вопрос №1914

Расскажите зачем нужна эта опция
пуск->панель управления->мультимедия->аудио->
->воспроизведение->дополнительно->установка динамиков

Здесь можно выбрать (наушники, настольные стерео динамики,
квадрофонические динамики .....)

Но при изменении этого параметра ничего не меняеться:(

Ответ

Здравствуйте, Dmitriy!
Ну, насколько я понимаю, смысл здесь что-либо менять, есть только в том случае, если Винда сама не установила все правильно.

ЗЫ: Если у Вас звуковая карточка баксов за 8-10, то менять что-либо смысла вообще нет, т.к. никакой разницы Вы не заметите, даже если Вы подключите не 2 и не 4 колонки, а все 6. :)))

Вопрос №1915

Здравствуйте, Эксперты!!!
Расскажите алгоритм добавления к файлу записи т.е. был файл
at.txt
-----
sell
seyd
er
-----


А после выполнения проги будет
-----
sell 1,23
seyd
er
-----

Интересно как это сделать с помошью WinAPI

Ответ

Здравствуйте, Serega!
1. Открыть существующий файл в режиме чтение-запись - CreateFile();
2. Прочесть файл в буфер памяти - ReadFile().
3. Занятся поиском нужной строки и позиции в этой строке ( StrStr() )с учетом того, что CreateFile() работает в бинарном режиме - не производится замена пары '\x00d\x00a' на одиночный символ '\x00a' ('\n'). Не забыть эту позицию в байтах относительно начала буфера хранения данных файла.
4. Установить указателя файла в позицию что была найдена в п.3. - SetFilePointer();
5. Записать в файл требуемые данные - WriteFile();
6. Записать остальное содержимое буфера памяти - WiteFile();
7. Закрыть файл (дескриптор файла) - CloseHandle();
Если есть сложности с чтением всего файла за один прием (мало памяти, файл большой или др.), то алгоритм чуточьку усложнится - придется повторять п.1 и п.2 и запоминать реальное местоположение относительно начала файла.

Вопрос №1917

Чем отличаются кодировки_Windows_1251_и_Windows_1252?
Спасибо за внимание_к моей проблеме.
С уважением, Андриянов П.А.

Ответ

Здравствуйте, Петр!
Последний не "дружит" с кирилицей, т.е. выводит всякую абракадабру вместо русских букв.

Форма подачи вопроса

Регистрация в качестве эксперта

Архив выпусков

Управляющий рассылкой,