Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 11.446 RSS

←   Февраль 2008   →
				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

За последние 60 дней ни разу не выходила

Сайт рассылки: http://rusfaq.ru
Открыта: 28-06-2000

Автор

Калашников О.А.

Статистика

11.446 подписчиков
0 за неделю

• Выпуски
• Статистика

←   Все выпуски   →

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

Новое направление Портала RusFAQ.ru: MosHoster.ru - Профессиональный хостинг РАССЫЛКИ ПОРТАЛА RUSFAQ.RU / КОМПЬЮТЕРЫ И ПО / Языки программирования / Assembler (Ассемблер) Выпуск № 973 от 09.02.2008, 21:05 Администратор: Калашников О.А. В рассылке: Подписчиков: 367, Экспертов: 16 В номере: Вопросов: 1, Ответов: 1 Нам важно Ваше мнение об этой рассылке. Оценить этот выпуск рассылки >> Вопрос № 121582: Здравствуйте! Надо на ассемблере написать программу: двигаем курсором по экрану и получаем координаты курсора в данный момент. (примерно как в Paint). Есть код программы, но она написана на emu8086 4.00b7, а надо выполнить на TASM. Спаси... Вопрос № 121.582 Здравствуйте! Надо на ассемблере написать программу: двигаем курсором по экрану и получаем координаты курсора в данный момент. (примерно как в Paint). Есть код программы, но она написана на emu8086 4.00b7, а надо выполнить на TASM. Спасибо. Приложение: ; mouse test name "mouse" org 100h print macro x, y, attrib, sdat LOCAL s_dcl, skip_dcl, s_dcl_end pusha mov dx, cs mov es, dx mov ah, 13h mov al, 1 mov bh, 0 mov bl, attrib mov cx, offset s_dcl_end - offset s_dcl mov dl, x mov dh, y mov bp, offset s_dcl int 10h popa jmp skip_dcl s_dcl DB sdat s_dcl_end DB 0 skip_dcl: endm clear_screen macro pusha mov ax, 0600h mov bh, 0000_1111b mov cx, 0 mov dh, 24 mov dl, 79 int 10h popa endm print_space macro num pusha mov ah, 9 mov al, ' ' mov bl, 0000_1111b mov cx, num int 10h popa endm jmp start curX dw 0 curY dw 0 curB dw 0 start: mov ax, 1003h ; disable blinking. mov bx, 0 int 10h ; hide text cursor: mov ch, 32 mov ah,1 int 10h ; reset mouse and get its status: mov ax, 0 int 33h cmp ax, 0 jne ok print 1,1,0010_1111b, " mouse not found :-( " jmp stop ok: clear_screen print 7,7,0010_1011b," note: in the emulator you may need to press and hold mouse buttons " print 7,8,0010_1011b," because mouse interrupts are not processed in real time. " print 7,9,0010_1011b," for a real test, click external->run from the menu." print 10,11,0010_1111b," click/hold both buttons to exit... " ; display mouse cursor: mov ax, 1 int 33h check_mouse_buttons: mov ax, 3 int 33h cmp bx, 3 ; both buttons je hide cmp cx, curX jne print_xy cmp dx, curY jne print_xy cmp bx, curB jne print_buttons print_xy: print 0,0,0000_1111b,"x=" mov ax, cx call print_ax print_space 4 print 0,1,0000_1111b,"y=" mov ax, dx call print_ax print_space 4 mov curX,cx mov curY, dx jmp check_mouse_buttons print_buttons: print 0,2,0000_1111b,"btn=" mov ax, bx call print_ax print_space 4 mov curB, bx jmp check_mouse_buttons hide: mov ax, 2 ; hide mouse cursor. int 33h clear_screen print 1,1,1010_0000b," harware must be free! free the mouse! " stop: ; show box-shaped blinking text cursor: mov ah, 1 mov ch, 0 mov cl, 8 int 10h print 4,7,0000_1010b," press any key...." mov ah, 0 int 16h ret print_ax proc cmp ax, 0 jne print_ax_r push ax mov al, '0' mov ah, 0eh int 10h pop ax ret print_ax_r: pusha mov dx, 0 cmp ax, 0 je pn_done mov bx, 10 div bx call print_ax_r mov ax, dx add al, 30h mov ah, 0eh int 10h jmp pn_done pn_done: popa ret endp Отправлен: 04.02.2008, 13:45 Вопрос задал: Draconit (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 3) Отвечает: Boriss Здравствуйте, Draconit! Ну, тогда можно так, как в приложении. На всякий случай исходник прикрепил также Ваш код не стал анализировать (в лом) - написал свой с использованием процедуры-обработчика событий от мыши Есть небольшие комментарии - если что не понятно будет - где спросить, знаете :)) Приложение: .model tiny LOCALS @@ .386 ; разрешены push < цифра > .code org 100h start: CALL Init cmp btnCount, 0 je @@noMouse @1: cmp mouFlag, 0 je @@2 push mouX push mouY CALL SetCurs CALL MouPos mov mouFlag, 0 @2: mov ah, 0Bh int 21h or al, al jz @@1 mov ax, 0Ch ; Убрать обработчик xor cx, cx ; рекомендуется lea dx, MouEvnt ; использую ds = es int 33h jmp @@end @nomouse: @end: int 20h Init proc mov ax, 1003h int 10h ; очистка через прокрутку mov ax, 0600h xor cx, cx mov dx, 184Fh mov bh, 1bh int 10h push 0 push 0 CALL SetCurs lea dx, msHello mov ah, 9 int 21h push 0 push 24 CALL SetCurs lea dx, msPressAny mov ah, 9 int 21h CALL MouInit or bx, bx jz @@ret push 15 push 1 CALL SetCurs lea dx, msIsMouse mov ah, 9 int 21h CALL MouShow mov ax, 0Ch ; установка обработчика mov cx, 010100b ; отпускание кнопок мыши lea dx, MouEvnt int 33h @ret: ret Init endp MouInit proc xor ax, ax int 33h cmp ax, -1 jne @@1 mov btnCount, bl @1: ret MouInit endp MouShow proc push ax mov ax, 1 int 33h pop ax ret MouShow endp MouHide proc push ax mov ax, 2 int 33h pop ax ret MouHide endp ; установка положения курсора ; координаты черер стек ; ВЫЗОВ: ; push column ; push row ; CALL SetCurs SetCurs proc push bp mov bp, sp push ax push bx push dx mov ah, 2 xor bh, bh ; видеостраница mov dh, BYTE PTR [bp + 4] mov dl, BYTE PTR [bp + 6] int 10h pop dx pop cx pop ax pop bp ret 4 SetCurs endp ; обработчик событий от мыши MouEvnt proc push cs pop ds shr cx, 3 ; делить на 8 shr dx, 3 mov mouFlag, 1 mov mouX, CX mov mouY, DX retf MouEvnt endp MouPos proc ; отображение положения мыши push ax push bx push cs push dx cld lea di, msPos add di, 2 mov cx, 4 mov bx, 10 mov ax, mouX @1: xor dx, dx div bx push dx LOOP @@1 mov cx, 4 @2: pop ax add al, '0' stosb LOOP @@2 mov ax, mouY add di, 3 mov cx, 4 @3: xor dx, dx div bx push dx LOOP @@3 mov cx, 4 @4: pop ax add al, '0' stosb LOOP @@4 push MouMsgX push MouMsgY CALL SetCurs CALL MouHide ; иначе под курсором мыши пропадет lea dx, msPos mov ah, 9 int 21h CALL MouShow pop dx pop cx pop bx pop ax ret MouPos endp BtnCount db 0 mouFlag db 0 mouX dw 0 mouY dw 0 mouMsgX dw 0 mouMsgY dw 23 msHello db 'Работа начинается',13,10,'$' msIsMouse db 'Мышь обнаружена. Работайте в полноэкранном режиме',13,10,'$' msPressAny db 'Нажмите любую клавишу...$' msPos db 'X:xxxx Y:xxxx$' end start Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- Вывод - то место в тексте, где вы устали думать Ответ отправил: Boriss (статус: Профессор) Россия, Саранск Организация: Мордовский госуниверситет, Саранск Факультет Электронной Техники WWW: Программирование на Паскале ---- Ответ отправлен: 05.02.2008, 13:04 Оценка за ответ: 5 Комментарий оценки: Спасибо! Выручили. Вы имеете возможность оценить этот выпуск рассылки. Нам очень важно Ваше мнение! Оценить этот выпуск рассылки >> Отправить вопрос экспертам этой рассылки Приложение (если необходимо): * Код программы, выдержки из закона и т.п. дополнение к вопросу. Эта информация будет отображена в аналогичном окне как есть. Обратите внимание! Вопрос будет отправлен всем экспертам данной рассылки! Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru. Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)! Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru. © 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.70 от 17.01.2008 RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

---

В избранное

{#template MAIN} <div id="loginForm" style="display:none;" class="subscriberu_popup"> <div class="popup_register"> {#include js_tmpl_auth_reg_tab} {#if $P.login_register_tab == 1} <form class="authentication-form" method="post" action="/MEMBERLOGIN_authen_cred"> <dl class="rg_block_options"> <dt id="js_tap_panel_auth"> <h1>Войти на сайт</h1> {* {#include js_tmpl_auth_reg_button} *} {#include js_tmpl_auth_reg_action} <hr class="logreg_line noPhones"> <div class="logreg_descr noPhones"><p>{#include js_tmpl_auth_reg_descr} </p></div> <div class="logreg_advice noPhones"> Если вы еще не с нами, то начните с <a href="#" onclick="rgNav('js_tab_reg');return false;" class="dashed" data-func="registr">регистрации</a> </div> <br><br> <a class="dashed auth-enter" href="/manage/author/"><b>Вход для авторов</b></a> </dt> </dl> </form> {#/if} {#if $P.login_register_tab == 2} <div class="rg_block_options"> <div id="js_tap_panel_auth"> <h1>Регистрация</h1> <div class="social_reg"> {* <div class="rg_description">{#include js_tmpl_soc_auth_reg_descr}</div> *} {#include js_tmpl_auth_reg_soc} <div class="rg_soc_auth_agree">{#include js_tmpl_auth_reg_agree}</div> </div> <div class="subscribe_reg"> {* <div class="rg_description"> #include js_tmpl_auth_reg_descr </div> *} {#include js_tmpl_auth_reg_action} </div> {* {#include js_tmpl_auth_reg_button} *} <div class="clr"> </div> <hr class="logreg_line noPhones"> <div class="logreg_descr noPhones">{#include js_tmpl_auth_reg_descr} {#include js_tmpl_soc_auth_reg_descr} </div> </div> </div> {#/if} </div> {* <div class="gray_bg register_shadow"></div> *} </div> {#/template MAIN} {#template js_tmpl_auth_reg_tab} <ul class="rg_nav"> <li id="js_tab_auth" class="{#if $P.login_register_tab == 1} rg_active_nav {#/if} rg_first_nav"><a onclick="rgNav('js_tab_auth');return false;" href="">Вход на сайт</a></li> <li id="js_tab_reg" class="{#if $P.login_register_tab == 2} rg_active_nav {#/if}"><a onclick="rgNav('js_tab_reg');return false;" href="">Регистрация </a></li> </ul> <span onclick="hidebo();" class="rg_closed"> </span> {#/template js_tmpl_auth_reg_tab} {#template js_tmpl_auth_reg_action} {#if $P.login_register_tab == 1} {#include js_tmpl_auth_reg_soc} {#/if} <div class="rg_forms"> <input type="hidden" id="login_register_destination" value="{$P.login_register_destination}"/> {#if $P.login_register_tab == 1} <div class="rg_for_input"> <span class="rg_text_inner">E-mail или код подписчика</span> <input id="credential_0" class="js_keydown_selector rg_input_text" data-js_submit="no" data-js_next_input_name="credential_1" name="" type="text" /> </div> <div class="rg_for_input"> <span class="rg_text_inner">Пароль</span> <input id="credential_1" class="js_keydown_selector rg_input_text" data-js_submit="yes" data-js_action="js_loginFormBut" name="" type="password" onkeyup="showAttention(this,!!window.event.shiftKey)" /> <span class="pswd_attention" id="attention_pswd"> <span class="icon_attention"></span> <span class="pswd_attention-text" id="attention-text_pswd1">Русская раскладка клавиатуры!</span> <span class="pswd_attention-text" id="attention-text_pswd2">У вас включен Caps Lock!</span> <span class="pswd_attention-text" id="attention-text_pswd3">У вас включен Caps Lock и русская раскладка клавиатуры!</span> </span> </div> <div class="rg_for_input input-alien"> <span class="chk noPhones"><input id="chk_alien" name="" type="checkbox" /></span><label for="chk_alien" class="noPhones"> Чужой компьютер</label> <a class="forgot_pass" href="/member/totalrecall">Забыли пароль?</a> </div> <div class="rg_for_input"> <em id="auth_msg" class="reg_error"></em> <input id="lf_typeauthid" value="email" type="hidden"> <input type="submit" class="button button-red logreg_submit" id="js_loginFormBut" value="Войти"> <!--</a>--> <div class="loading loading-cover" style="display: none;"><div class="loader"></div></div> </div> {#/if} {#if $P.login_register_tab == 2} <div class="rg_for_input"> <span class="rg_text_inner">E-mail</span> <input id="arfemail" class="js_keydown_selector rg_input_text" name="" type="text" data-js_submit="yes" data-js_action="js_regFormBut"/> </div> <div class="rg_for_input rg_set_lineh rg_for_input_wide"> <label class="js_tap_panel_checkbox"> <span class="chk"><input name="" id='js_tap_panel_checkbox_terms' type="checkbox" data-js_submit="yes" /></span> Я ознакомился и согласен с <a class="link_txd logreg_accLink" href="/faq/vereinbarung.html">условиями сервиса Subscribe.ru</a> </label> <br /> <label class="js_tap_panel_checkbox"> <span class="chk"><input name="" id='js_tap_panel_checkbox_personal' type="checkbox" data-js_submit="yes" /></span> Нажимая на кнопку "Готово!", я даю <a class="link_txd logreg_accLink" href="/faq/persverordnung.html">согласие на обработку персональных данных</a> </label> </div> {* <div style="float: left;position: absolute;left: 11em;"> <img src="http://www.kupivip.ru/images/vip/logo.png?1604" style="width: 86px; vertical-align: middle;display: block;"> </div> <div class="rg_for_input rg_set_lineh"> <label class="js_tap_panel_checkbox"><input name="" id="js_tap_panel_checkbox_kupivip" type="checkbox" data-js_submit="yes"> Я хочу получать новости о скидках на одежду</label> </div> *} <div class="rg_for_input"> <em id="reg_msg" class="reg_error rg_for_input_wide"></em> <em id="reg_msg2" class="reg_error rg_for_input_wide"></em> <input id="rf_typeauthid" value="email" type="hidden"> <a class="button button-red logreg_submit" id="js_regFormBut" href="#">Готово!</a> <div class="loading loading-cover" style="display: none;"><div class="loader"></div></div> </div> {#/if} </div> {#/template js_tmpl_auth_reg_action} {#template js_tmpl_auth_reg_agree} <div class="rg_for_input rg_set_lineh rg_for_input_wide"> <label class="js_tap_panel_checkbox"> <span class="chk"><input name="" id='js_tap_panel_checkbox_terms_reg' type="checkbox" data-js_submit="yes" /></span> Я ознакомился и согласен с <a class="link_txd logreg_accLink" href="/faq/vereinbarung.html">условиями сервиса Subscribe.ru</a></label> <em id="reg_msg_soc" class="reg_error rg_for_input_wide"></em> </div> {#/template js_tmpl_auth_reg_agree} {#template js_tmpl_auth_reg_button} <div class="rg_butons_socials"> {#if $P.login_register_tab == 1} <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="auth_email" href="#"><span><i></i>Email</span></a> <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="auth_openid" href="#"><span><i></i>OpenID</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="auth_vkontakte" href="#"><span><i></i>Вконтакте</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="auth_mailru" href="#"><span><i></i>Mail.Ru</span></a> {#/if} {#if $P.login_register_tab == 2} <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="reg_email" href="#"><span><i></i>Email</span></a> <a class="rg_btn_soc rg_bs_01 js_tap_panel_selector" action="reg_openid" href="#"><span><i></i>OpenID</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="reg_vkontakte" href="#"><span><i></i>Вконтакте</span></a> <a class="rg_btn_soc rg_bs_02 js_tap_panel_selector" action="reg_mailru" href="#"><span><i></i>Mail.Ru</span></a> {#/if} </div> {#/template js_tmpl_auth_reg_button} {#template js_tmpl_auth_reg_descr} {#if $P.login_register_tab == 1} Для оформления подписки на выбранную рассылку, работы с интересующей вас группой или доступа в нужный вам раздел, просим авторизоваться на Subscribe.ru {#/if} {#if $P.login_register_tab == 2} Для регистрации укажите ваш e-mail адрес. Адрес должен быть действующим, на него сразу после регистрации будет отправлено письмо с инструкциями и кодом подтверждения. {#/if} {#/template js_tmpl_auth_reg_descr} {#template js_tmpl_soc_auth_reg_descr} Или зарегистрируйтесь через социальную сеть. {#/template js_tmpl_soc_auth_reg_descr} {#template js_tmpl_auth_reg_soc} <div class="rg_soc"> {#if $P.login_register_tab == 1} <a onclick="return _checkSocConfirm(event)" href="https://oauth.vk.com/authorize?client_id=3954260&scope=wall,offline,photos,groups,video,audio,email&redirect_uri={location.protocol+'//'+location.host}/member/login/vk/&response_type=code&v=5.15" class="login_register_vk_button"> <span class="login_register_vk_icon"></span> </a> {#/if} {#if $P.login_register_tab == 2} <a onclick="return _checkSocConfirm(event)" href="https://oauth.vk.com/authorize?client_id=3954260&scope=wall,offline,photos,groups,video,audio,email&redirect_uri={location.protocol+'//'+location.host}/member/join/vk&response_type=code&v=5.15" class="login_register_vk_button"> <span class="login_register_vk_icon"></span> </a> {#/if} </div> {#/template js_tmpl_auth_reg_soc}

{#template MAIN} <div id="loginForm" style="display:none;" class="subscriberu_popup"> <div class="popup_register"> {#include js_tmpl_auth_reg_tab} <dl class="rg_block_options"> <dt id="js_tap_panel_auth"> <p class="rg_description">{#include js_tmpl_auth_reg_descr}</p> <div class="clr"> </div> {#include js_tmpl_auth_reg_action} <div class="clr"> </div> </dt> </dl> </div> <!-- <div class="gray_bg register_shadow"></div> --> </div> {#/template MAIN} {#template js_tmpl_auth_reg_tab} <ul class="rg_nav"> <li id="js_tab_reg" class="rg_active_nav rg_first_nav"><a href="" onclick="return false;" >Регистрация</a></li> </ul> <span onclick="hidebo();" class="rg_closed"> </span> {#/template js_tmpl_auth_reg_tab} {#template js_tmpl_auth_reg_descr} <strong>Пожалуйста, подтвердите ваш адрес.</strong><br><br>Вам отправлено письмо для подтверждения вашего адреса {$P.register_confirm_mail}.<br>Для подтверждения адреса перейдите по ссылке из этого письма. {#/template js_tmpl_auth_reg_descr} {#template js_tmpl_auth_reg_action} <div class="rg_forms confirm_code_from_letter"> <div class="rg_for_input"> <span class="rg_inp_descr" style="width:15em;">Или введите код из письма:</span> <input type="text" value="" id="confirm_code" name="" data-js_submit="yes" data-js_action="js_confirmFormBut" class="js_keydown_selector rg_input_text_conf" > </div> <div class="rg_for_input"><label>Не пришло письмо? <b>Пожалуйста, проверьте папку Спам</b><br /> (папку для нежелательной почты).</label><br />  <a href="" onclick="ajax_recall_code();return false" >Вышлите мне письмо еще раз!</a></div> <div class="rg_for_input"> <em class="reg_error" id="confirm_msg"></em> <a href="#" class="button button-red" id="js_confirmFormBut">Готово</a> <div class="loading loading-cover" style="display: none;"><div class="loader"></div></div> <br> </div> </div> {#/template js_tmpl_auth_reg_action}