Студопедия
Новини освіти і науки:
МАРК РЕГНЕРУС ДОСЛІДЖЕННЯ: Наскільки відрізняються діти, які виросли в одностатевих союзах


РЕЗОЛЮЦІЯ: Громадського обговорення навчальної програми статевого виховання


ЧОМУ ФОНД ОЛЕНИ ПІНЧУК І МОЗ УКРАЇНИ ПРОПАГУЮТЬ "СЕКСУАЛЬНІ УРОКИ"


ЕКЗИСТЕНЦІЙНО-ПСИХОЛОГІЧНІ ОСНОВИ ПОРУШЕННЯ СТАТЕВОЇ ІДЕНТИЧНОСТІ ПІДЛІТКІВ


Батьківський, громадянський рух в Україні закликає МОН зупинити тотальну сексуалізацію дітей і підлітків


Відкрите звернення Міністру освіти й науки України - Гриневич Лілії Михайлівні


Представництво українського жіноцтва в ООН: низький рівень культури спілкування в соціальних мережах


Гендерна антидискримінаційна експертиза може зробити нас моральними рабами


ЛІВИЙ МАРКСИЗМ У НОВИХ ПІДРУЧНИКАХ ДЛЯ ШКОЛЯРІВ


ВІДКРИТА ЗАЯВА на підтримку позиції Ганни Турчинової та права кожної людини на свободу думки, світогляду та вираження поглядів



Контакти
 


Тлумачний словник
Авто
Автоматизація
Архітектура
Астрономія
Аудит
Біологія
Будівництво
Бухгалтерія
Винахідництво
Виробництво
Військова справа
Генетика
Географія
Геологія
Господарство
Держава
Дім
Екологія
Економетрика
Економіка
Електроніка
Журналістика та ЗМІ
Зв'язок
Іноземні мови
Інформатика
Історія
Комп'ютери
Креслення
Кулінарія
Культура
Лексикологія
Література
Логіка
Маркетинг
Математика
Машинобудування
Медицина
Менеджмент
Метали і Зварювання
Механіка
Мистецтво
Музика
Населення
Освіта
Охорона безпеки життя
Охорона Праці
Педагогіка
Політика
Право
Програмування
Промисловість
Психологія
Радіо
Регилия
Соціологія
Спорт
Стандартизація
Технології
Торгівля
Туризм
Фізика
Фізіологія
Філософія
Фінанси
Хімія
Юриспунденкция






ENTER 0,0

LENSTR PROC

Invoke Sleep, 5000

LOOP L1

MOV ECX,01FFFFFFFH

PUSH HANDL

PUSH OFFSET BUF

PUSH OFFSET LENS

PUSH 0

PUSH HANDL

PUSH COL2

PUSH HANDL1

PUSH OFFSET BUF

PUSH 200

PUSH OFFSET LENS

PUSH 0

PUSH HANDL

PUSH OFFSET STR3

PUSH EBX

PUSH OFFSET LENS

PUSH 0

PUSH OFFSET STR3

PUSH HANDL

PUSH COL2

PUSH HANDL

PUSH CRD

MOV CRD.Y,2

MOV CRD.X,0

PUSH HANDL

PUSH OFFSET BUF

PUSH OFFSET LENS

PUSH 0

PUSH HANDL

PUSH COL1

PUSH HANDL1

PUSH OFFSET BUF

PUSH 200

PUSH OFFSET LENS

PUSH 0

PUSH HANDL

PUSH OFFSET STR2

PUSH EBX

PUSH OFFSET LENS

PUSH 0

PUSH OFFSET STR2

PUSH HANDL

PUSH CRD

MOV CRD.Y,3

MOV CRD.X,0

PUSH HANDL

PUSH COL1

PUSH OFFSET STR1

PUSH EAX

PUSH CRD

MOV CRD.Y, 50

MOV CRD.X, 50

MOV HANDL, EAX

PUSH STD_OUTPUT_HANDLE

MOV HANDL1, EAX

PUSH STD_INPUT_HANDLE

PUSH OFFSET STR3

PUSH OFFSET STR3

PUSH OFFSET STR2

PUSH OFFSET STR2

PUSH OFFSET STR1

PUSH OFFSET STR1

COOR ENDS

COOR STRUC

X WORD ?

Y WORD ?

; сегмент данних

_DATA SEGMENT DWORD PUBLIC USE32 'DATA'

HANDL DWORD ?

HANDL1 DWORD ?

STR2 DB "Введить перший рядок: ",0

STR3 DB "Введить другий рядок: ",0

STR1 DB "Нова консоль",0

BUF DB 200 dup (?)

LENS DWORD ? ; кількість символів, що вводяться

CRD COOR <?>

_DATA ENDS

; сегмент кода

_TEXT SEGMENT DWORD PUBLIC USE32 'CODE'

START:

; кодування рядка

CALL CharToOemA@8

; кодування рядка

CALL CharToOemA@8

; кодування рядка

CALL CharToOemA@8

; створення консолі

; звільнення консолі

CALL FreeConsole@0

CALL AllocConsole@0

; отримати HANDL1 вводу

CALL GetStdHandle@4

; отримати HANDL виводу

CALL GetStdHandle@4

; встановлення розмірів консолі

CALL SetConsoleScreenBufferSize@8

; задання заголовку консолі

CALL SetConsoleTitleA@4

; задати атрибути кольору видимого тексту

CALL SetConsoleTextAttribute@8

; позиція курсора

CALL SetConsoleCursorPosition@8

; виведення рядка

CALL LENSTR ; в EBX довжина рядка

CALL WriteConsoleA@20

; чекати виведення консолі

CALL ReadConsoleA@20

; виведення отриманої консолі

; задати атрибути кольору тексту, який буде виводитись

CALL SetConsoleTextAttribute@8

;------------------------------------------------------------

PUSH [LENS] ; довжина рядка, що вводиться

CALL WriteConsoleA@20

; позиція курсора

CALL SetConsoleCursorPosition@8

; задати атрибути кольору видимого тексту

CALL SetConsoleTextAttribute@8

; виведення рядка

CALL LENSTR ; в EBX довжина рядка

CALL WriteConsoleA@20

; чекати виведення консолі

CALL ReadConsoleA@20

; виведення отриманої консолі

; задати атрибути кольору тексту, який буде виводитись

CALL SetConsoleTextAttribute@8

;------------------------------------------------------------

PUSH [LENS] ; довжина рядка, що вводиться

CALL WriteConsoleA@20

; невелика затримка

L1:

; закрити консоль

;затримка

CALL FreeConsole@0

CALL ExitProcess@4

; рядок - [EBP+08H]

; довжина в EBX


Читайте також:

  1. Система планування ресурсів підприємства ( ERP – Enterprise Resource Planning ).




Переглядів: 525

<== попередня сторінка | наступна сторінка ==>
BACKGROUND_INTENSITY equ 80h | PUSH EBX

Не знайшли потрібну інформацію? Скористайтесь пошуком google:

 

© studopedia.com.ua При використанні або копіюванні матеріалів пряме посилання на сайт обов'язкове.


Генерація сторінки за: 0.007 сек.