Лено4ка
Новенький
Offline
|
|
« Ответ #2 : 08-05-2012 10:15 » |
|
а здесь напиши
Добавлено через 7 минут и 32 секунды:
span class="kw4"> model small .data buf db 100 len db 0 str1 db 100 dup(0) soob db 'kod 2 symbol <= kod 4 symbol$' .code mov ax,seg @data mov ds,ax lea dx,buf mov ah,0ah int 21h cmp len,4 jb exit lea si,str1 mov al, byte ptr [si+3] cmp al, byte ptr [si+1] ja m1 ; sort mov ch,len mov cl,ch dec ch n1: mov al, byte ptr [si] dec cl push cx mov di,si n2: inc di mov ah, byte ptr [di] cmp al,ah jbe n3 mov byte ptr [si],ah mov byte ptr [di],al xchg ah,al n3: dec cl jnz n2 pop cx inc si dec ch jnz n1 mov byte ptr [si+1],'$' lea dx,str1 jmp m2 m1: lea dx,soob m2: mov ah,9 int 21h exit: mov ax,4c00h int 21h end не могу записать в макросах и процедурах
|