汇编语言模拟电梯到达楼层的顺序

在做一个关于电梯的proteus的课设中遇到的这样一个问题，如果同时按下多个键如何判断运行的次序：所以单独写了一个程序，来仿真：
这里模拟的是比较简单的情况，分为三种情况：
①当前楼层低于所有目标楼层
②当前楼层高于所有目标楼层
③当前楼层在目标楼层之间
其实还有一种情况没有输入目标楼层，这里没有加入这种情况，但是实际仿真时要考虑。
这里分了两级优先级，向上优先于向上，越靠近当前楼层的越优先到达。这里讨论的最简单的情况即在电梯内按键，没有考虑外面的人按键的情况。
分别讨论三种情况：
首先要对输入楼层进行排序，有大到小
比如输入楼层为：

输入楼层	目标楼层	输出结果
7 3 2	1	7 3 2
7 3 2	4	2 3 7
7 3 1	2	1 7 3
7 3 1	8	1 3 7

将最先到达的楼层放在后面方便在实际运行时到达后消除这个值。
分为两种情况小于目标楼层的部分压栈后再出栈输出到结果中，大于等于目标楼层的部分直接正序放在结果中。
这里还对只有一个输入的情况单独讨论了。
代码中的seq表示目标楼层，num表示目标楼层的数目，current_floor表示当前楼层，ordered存放排序后的结果。

DATAS SEGMENT
    ;此处输入数据段代码
    seq db 01h,02h,05h
    num db $-seq
    ordered db 3 dup(?)
    current_floor db 03h
    buf1 db 0ah,'Added array is:',0dh,0ah,'$'
    buf2 db 0ah,'The sorted array is:',0dh,0ah,'$'
    buf3 db 0ah,'num=',0dh,0ah,'$'
    buf4 db 0ah,'ordered',0dh,0ah,'$'
DATAS ENDS

STACKS SEGMENT
    ;此处输入堆栈段代码
    dw 50 dup(?)
    top label byte
STACKS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
	mov ax,stacks
	mov ss,ax
	mov sp,offset top
    MOV AX,DATAS
    MOV DS,AX
    ;显示内存中所有数据
    mov cl,num
    mov ch,00h
    lea bx,seq
    cmp cx,01h
    je one
    jmp Loop_first
One:
	lea si,seq
	lea di,ordered
	mov al,[si]
	mov [di],al
	jmp ordered_end
Loop_first:
	mov al,[bx]
	call show_low
	call kong_ge
	inc bx
	loop loop_first
	mov dx,offset buf1
    mov ah,9h
    int 21h 
    lea bx,seq
    mov cl,num
    mov ch,00h
LOOP_show1:
	mov al,[bx]
	call show_low
	call kong_ge
	inc bx
	loop loop_show1
    ;-----------------------------------
    ;冒泡排序部分
    mov cl,num;cx为比较轮数，大循环次数
    mov ch,00h
    dec cx
    ;-----------------------------------------
	;显示num中的数据
	mov dx,offset buf3
    mov ah,9h
    int 21h 
	mov al,num;num为什么会变成了7
	call show_low
Loop_sort1:
	mov dx,cx;dx表示大循环次数
	mov bx,0;地址指针
Loop_sort2:
	mov al,seq[bx]
	cmp al,seq[bx+1]
	jae no_change
	xchg al,seq[bx+1]
	mov seq[bx],al;在这里相当于溢出多给num了值
no_change:
	inc bx
	loop loop_sort2
	mov cx,dx;一轮比完之后，cx再次赋值比较轮数
	loop loop_sort1
	;提示语
	mov dx,offset buf2
    mov ah,9h
    int 21h 
    lea bx,seq
	mov cl,num
	mov ch,00h
LOOP_show2:
	mov al,[bx]
	call show_low
	call kong_ge
	inc bx
	loop loop_show2
	;-----------------------------------------
	;显示num中的数据
	mov dx,offset buf3
    mov ah,9h
    int 21h 
	mov al,num;num为什么会变成了7
	call show_low
	
Modify:
	;先遍历找到当前元素在第几位
	;类似于压栈
	mov al,current_floor
	lea di,seq
	lea si,ordered
	mov cl,num
	mov ch,00h
	mov bh,00h
Loop_modify:
	cmp al,[di]
	ja big;小于al的数压栈，大于al的数不管
modify_back:
	inc di
	loop loop_modify
	jmp move
big:
	push [di]
	inc bh
	jmp modify_back
move:
	mov cl,num
	sub cl,bh;得到不需要出栈的数的个数
	cmp bh,00h;判断是否栈中有数据
	ja pop_loop
	jmp normal
pop_loop:;首先需要出栈
	pop [si]
	inc si
	dec bh
	cmp bh,00h
	ja pop_loop
normal:;直接正序赋值
	mov bx,00h
	cmp cl,00h
	ja normal_loop
	jmp ordered_end
normal_loop:
	mov al,seq[bx]
	mov [si],al
	inc si
	inc bx
	loop normal_loop
;--------------------------------
;显示
ordered_end:
	mov dx,offset buf4
    mov ah,9h
    int 21h 
	lea bx,ordered
    mov cl,num
    mov ch,00h
LOOP_show3:
	mov al,[bx]
	call show_low
	call kong_ge
	inc bx
	loop loop_show3
	jmp end_pro

show_low proc near
	mov dl,'0'
	add dl,al
	mov ah,02h
	int 21h
	ret
show_low endp

kong_ge proc near
	mov dl,' '
	mov ah,02h
	int 21h
	ret
kong_ge endp

end_pro:    
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START

上图的结果为：

最后一行即是结果。
推荐一篇文章比较详细的介绍了电梯调度的算法：https://mp.weixin.qq.com/s/yAcmwIKsCadj5CH_91aWXw