[TASM]как работает этот код для сортировки знаков методом подсчета

[Ciaran]

Здраствуйте! Мне нужна срочно помощь. Можно сказать что эта программа решает мое будущее. Я знаю, что программа сортирует знаки методом подсчёта и знаю как этот метод работает, но не вижу это в программе.

dosseg
.model small
.stack 100h
org 100h
.data
maxlen  db 254
len     db 0
array   db 255 dup(0)   
count   db 256 dup(0)   
survey  dw ?
txt     db  10, 13, "Eta programma sortiruet vse metodom podscheta: ",0
UNGR = 041h
OBGR = 05Ah
ESCt = 1Bh

jumps
include macros.mac
.code
	start:

mov ax,@DATA
mov ds,ax
mov es,ax                


	prog:
writes txt              
nl
mov ah,0ah              
mov dx,offset array-2    
int 21h



xor si,si
xor ax,ax
mov al,[len] 		
	
	sort:
xor bx,bx
mov bl,byte ptr [array+si]   
inc   [count+bx]             


inc   si                  
cmp   si,ax		   
jne   sort

xor si,si
mov di,offset array	  


	
how:

xor cx,cx
mov cl, [count+si]         

test cx,cx
jz increm

mov   ax,si
rep   stosb


	increm:
inc   si
cmp   si, 256
jne how
mov byte ptr es:[di],'$'

;-----Vyvod

mov ah,9
mov dx,offset array
int 21h
mov ah,7
int 21h
nl
cmp al,1
jnz again
ret


again:
print "again(y/n): ?"
nl
reads survey
cmp survey, 59h 
je start
cmp survey, 4eh
je quit
cmp survey, 79h
je start
cmp survey, 6eh
je quit
jne again


	quit:

mov ah,4ch
int 21h
end start

[alexey2]

попытаюсь помочь если еще не поздно ;-)
начало-данные и вывод строки

mov ah,0ah              
mov dx,offset array-2    
int 21h

считывание данных от пользователя

	sort:
xor bx,bx
mov bl,byte ptr [array+si]   
inc   [count+bx]             
inc   si                  
cmp   si,ax		   
jne   sort

массив array просматривается побайтно, значение из array увеличивает счетчик в count по смещению, равному значению, т.е. если пользователь ввел символ с кодом 30h, то значение в count[30h] увеличится на 1.

how:
xor cx,cx
mov cl, [count+si]         
test cx,cx
jz increm
mov   ax,si
rep   stosb
	increm:
inc   si
cmp   si, 256
jne how
mov byte ptr es:[di],'$'

теперь просматривается массив count побайтно с начала. нулевые значения (т.е. пользователь не вводил символа с таким кодом - равного смещению в count, или по коду =si) пропускаются, ненулевые пишутся в array столько раз, сколько их вводил юзер. В конец добавляется $ для печати

далее этот массив печатается и делаются попытки повторить.

да, заметил пару ошибок:

jnz again
ret

я бы заменил на jz quit

и, если вызывать again, то массив count нужно заполнять нулями, иначе правильно работать не будет ))

[Ciaran]

Спасибо, ты мне очень помог. Пока срок еще не кончился. А в "inc" просто обрабатывается каждый элемент в массиве count. Правильно?

[alexey2]

inc увеличивает на единицу значение в регистре или памяти.
inc si это si=si+1
inc [count+bx] это count[bx]=count[bx]+1

[Ciaran]

Не правильно вопрос поставил. Я имел в виду "increm:".

[alexey2]

дак это метка в коде, такая же как и how, again, sort...