ex-st.asm

一些汇编实验程序

;程序模板

extrn  endaddr:word,swapped:byte,nametab:byte,namesav:byte
public g10sort

SSEG SEGMENT PARA STACK 'stack'
	dw 100h dup(0) ;初始化堆栈大小为100
SSEG ENDS

DSEG SEGMENT
	;数据段：在此处添加程序所需的数据
DSEG ENDS

ESEG SEGMENT
	;附加段：在此处添加程序所需的数据
ESEG ENDS

CSEG SEGMENT
	assume  cs:CSEG, ds:DSEG, es:ESEG, ss:SSEG


start:	
g10sort proc far

   sub di,40
  mov endaddr,di
g20:
mov swapped,0
lea si,nametab
g30:
mov cx,20
mov di,si
add di,20
mov ax,di
mov bx,si
repe cmpsb
jbe g40
call h10xchg
g40:
mov si,ax
cmp si,endaddr
jbe g30
cmp swapped,0
jnz g20
ret
g10sort endp


h10xchg proc near

mov cx,10
lea di,namesav
mov si,bx
rep movsw

mov cx,10
mov di,bx
rep movsw

mov cx,10
lea si,namesav
rep movsw
mov swapped,1
ret

h10xchg endp

CSEG ENDS

END start