.
data
text        db
'Hello!'
,
0
mes1        db
'Codeby.net'
,
0
mes2        db
'Marylin'
,
0
align
16
localStack  rd
64
funcArg     dd
0
,
text
,
2222
h
,
3333
h
,
4444
h
,
5555
h
;
//
@exit
:
cinvoke  _getch
        cinvoke  exit
,
0
;
//-------
proc foo a1
,
a2
,
a3
,
a4
,
a5
;
//
@exit
:
cinvoke  _getch
        cinvoke  exit
,
0
;
//-------
proc foo a1
,
a2
,
a3
,
a4
,
a5
;
//
;
// Квота реестра!
invoke  GetSystemRegistryQuota
,
maxReg
,
curReg
         shr
[
maxReg
]
,
20
;
//
,
[
maxReg
]
,
[
curReg
]
;
// Открыть ветку реестра "..\Uninstall"
invoke  RegOpenKeyEx
,
HKEY_LOCAL_MACHINE
,
key
,
0
,
\
                              KEY_QUERY_VALUE
+
KEY_ENUMERATE_SUB_KEYS
,
\
                              hKey
;
// Вычислить кол-во подразделов в ней (нули - типы информации)
invoke  RegQueryInfoKeyA
,
[
hKey
]
,
0
,
0
,
0
,
index
,
0
,
0
,
0
,
0
,
0
,
0
,
0
cinvoke  printf
,

,
[
index
]
dec
[
index
]
;
//
,
0
,
0
,
buff
,
buffLen
         cmp     eax
,
2
;
//
,
[
counter
]
,
buff
         inc
[
counter
]
;
//
;
// Запросить дескриптор ввода для ReadConsoleA()
invoke  GetStdHandle
,
STD_INPUT_HANDLE
        mov
[
inpHndl
]
,
eax
;
// Запрос на ввод строки в буфер
cinvoke  printf
,

invoke  ReadConsoleA
,
[
inpHndl
]
,
inpBuff
,
128
,
strLen
,
0
;
// Перевод в верхний регистр
mov     ecx
,
[
strLen
]
;
// длина строки\цикла
mov     esi
,
inpBuff
;
// источник
push    ecx esi
;
// (про запас..)
mov     edi
,
bigBuff
;
// приёмник
@@
:
lodsb
;
// AL = очередной символ из ESI
cmp     al
,
'A'
;
// фильтр букв, отсеивая цифры и знаки
jb      @fuck1
;
//  ^^^^ (меньше Below)
cmp     al
,
'z'
;
//   ^^^^
ja      @fuck1
;
//    ^^^^ (больше Above)
and     al
,
11011111
b
;
// сбросить бит(5) маской
@fuck1
:
stosb
;
// записать в приёмник EDI
loop    @b
;
// промотать цикл ECX-раз..
;
// Перевод в нижний регистр
pop     esi ecx
        mov     edi
,
smallBuff
@@
:
lodsb
        cmp     al
,
'A'
jb      @fuck2
        cmp     al
,
'z'
ja      @fuck2
        or      al
,
00100000
b
;
//
,
bigBuff
,
smallBuff

@exit
:
cinvoke  _getch
       cinvoke  exit
,
0
;
//---------------
section
'.idata'
import data readable
library  msvcrt
,
'msvcrt.dll'
,
kernel32
,
'kernel32.dll'
include
'api\msvcrt.inc'
include
'api\kernel32.inc'

format   pe console
entry    start
include
'win32ax.inc'
;
//----------
.
data
inpBuff    rb
128
inpHndl    dd
0
strLen     dd
0
buff       db
0
;
//----------
.
code
start
:
invoke  SetConsoleTitle
,

;
// Запросить дескриптор ввода для ReadConsoleA()
invoke  GetStdHandle
,
STD_INPUT_HANDLE
        mov
[
inpHndl
]
,
eax
;
// Запрос на ввод строки в буфер
cinvoke  printf
,

invoke  ReadConsoleA
,
[
inpHndl
]
,
inpBuff
,
128
,
strLen
,
0
;
// Парсим строку на лишние пробелы --------------------------
mov     ecx
,
[
strLen
]
;
// длина строки\цикла
mov     esi
,
inpBuff
;
// источник
mov     edi
,
esi
;
// приёмник
@@
:
lodsb
;
// AL = очередной символ
cmp     al
,
' '
;
// это пробел?
jne     @miss
;
// нет: пропускаем
cmp     ax
,
'  '
;
// да: тест с предыдущим
je      @next
;
// 2 пробела - пропускаем
@miss
:
stosb
;
// перезапись символа
@next
:
xchg    ah
,
al
;
// запомним текущий символ
loop    @b
;
// мотаем цикл по длине ЕСХ..
mov     byte
[
edi
]
,
0
;
// вставить маркер конца стоки
;
//-----------------------------------------------------------
;
// Результат
cinvoke  printf
,

,
inpBuff

@exit
:
cinvoke  _getch
       cinvoke  exit
,
0
;
//---------------
section
'.idata'
import data readable
library  msvcrt
,
'msvcrt.dll'
,
kernel32
,
'kernel32.dll'
include
'api\msvcrt.inc'
include
'api\kernel32.inc'