![]() |
|
Модераторы: volvo877, Snowy, MetalFan |
![]()
|
|
| rthsobakas |
|
||||
|
Опытный ![]() ![]() Профиль Группа: Awaiting Authorisation Сообщений: 562 Регистрация: 20.9.2007 Репутация: нет Всего: -1 |
помогите разобраться! есть прога на паскале (головная) и на асме процедура
вообщем смотрите
;prg14_12.asm ;Процедура на ассемблере, которую вызывает ;программа на Pascal. ;Для вывода на экран используются службы BIOS: ;02h - позиционирование курсора. ;09h - вывод символа заданное количество раз. MASM MODEL small STACK 256 .code asmproc proc near PUBLIC asmproc ;объявлена как внешняя push bp ;пролог mov bp,sp mov dh,[bp+6] ;номер строки для вывода ;символа y - в dh mov dl,[bp+8] ;номер столбца для вывода ;символа x - в dl mov ah,02h ;номер службы BIOS int 10h ;вызов прерывания BIOS ;вызов функции 09h прерывания BIOS 10h: ;вывод символа из al на экран mov ah,09h ;номер службы BIOS mov al,[bp+10] ;символ ch в al mov bl,07h ;атрибут символа - в bl xor bh,bh mov cx,[bp+4] ;количество "выводов" ;символа - в cx int 10h ;вызов прерывания BIOS pop bp ;восстановление bp ;очистка стека и возврат из процедуры ret 8 asmproc endp ;конец процедуры end в паскале я запускаю прогу... нажимая Ф7 он переходит в ассемблеровское окошко , а как открыть TD(turbo debugger) ?там надо открыть ЦПУ и посмотреть как параметры переходят)) спасибо за внимание
|
||||
|
|||||
| ILyAHA |
|
|||
![]() Гламурный хакер ![]() Профиль Группа: Участник Сообщений: 193 Регистрация: 30.3.2007 Где: Ярославская обл. г.Рыбинск Репутация: нет Всего: 3 |
ЦПУ можно посмотреть и в самом паскале.(меню Debug->Register).
Чтоб запустить долбаггер зайди в Tools -> Turbo Debugger. Но к нему надо указывать путь(если не указан). --------------------
<sсriрt>alert('xss')</sсriрt> |
|||
|
||||
| volvo877 |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 2073 Регистрация: 15.11.2004 Репутация: 2 Всего: 116 |
||||
|
||||
| ILyAHA |
|
|||
![]() Гламурный хакер ![]() Профиль Группа: Участник Сообщений: 193 Регистрация: 30.3.2007 Где: Ярославская обл. г.Рыбинск Репутация: нет Всего: 3 |
Да точно про это я забыл сказать... --------------------
<sсriрt>alert('xss')</sсriрt> |
|||
|
||||
![]()
|
| Правила форума "Delphi" | |
|
|
Запрещается! 1. Обсуждать и делится взломанными компонентами или программным обеспечением 2. Публиковать ссылки на варез 3. Оффтопить
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, THandle, Rrader, volvo877. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Object Pascal: кроссплатформенные технологии | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |