汇编编程正方形缩放和小球在屏幕内运动.docxVIP

山西大学 郝泽龙 物理电子工程编程实现：方形缩放(square.gif)演示效果。assume cs:codecode segment start: mov dh,13 mov dl,30 mov bl,0 mov al,12 s:mov cx,9 xh:push cx mov cl,2 call clean call msas call delay inc bl pop cx loop xh mov cx,9 xh1:push cx mov cl,2 dec bl call clean call msas call delay pop cx loop xh1 push ax push cx mov ah,0 int 16h cmp al,1 je over pop cx pop ax jmp s ove:mov ax,4c00h int 21h over:pop cx pop ax jmp ove msas: push ax push bx push cx push dx push ds push si push es push di call show push dx sub dl,bl call show pop dx push dx add dl,bl call show pop dx push dx sub dh,bl call show pop dx push dx add dh,bl call show pop dx push dx add dh,bl add dl,bl call show pop dx push dx add dh,bl sub dl,bl call show pop dx push dx sub dh,bl add dl,bl call show pop dx push dx sub dh,bl sub dl,bl call show pop dx pop di pop es pop si pop ds pop dx pop cx pop bx pop ax ret show: push ax push bx push cx push dx push es push di push ds push si push ax mov ax,160 mul dh add dl,dl mov dh,0 add ax,dx mov di,ax mov ax,0b800h mov es,ax pop ax mov ah,cl mov es:[di],ax pop si pop ds pop di pop es pop dx pop cx pop bx pop ax ret delay: push cx mov cx,0fffh sm:push cx mov cx,0ffffh sm1:loop sm1 pop cx loop sm pop cx ret clean: push ax push es push di push cx mov ax,0b800h mov es,ax mov di,0 mov cx,2000 mov al, we:mov es:[di],al add di,2 loop we pop cx pop di pop es pop ax retcode endsend start2、编写程序实现demo.exe演示效果。提示： 小球运动行号列号变化规律是： 碰到上壁则行号变为自增规律； 碰到下壁则行号变为自减规律； 碰到左壁则列号变为自增规律； 碰到右壁则列号变为自减规律。assume cs:codecode segmentstart: mov dh,13 mov dl,30 mov cl,2 mov al,64 mov bx,0 fanhui:cmp dh,25 je jxwzh cmp dh,0 je jxwzh cmp dl,80 je jxwzl cmp dl,0 je jxwzl cmp dh,bh ja sw1 cmp dh,bh jb sw2 jx:cmp dl,bl ja sw3 cmp dl,bl jb sw4 jx1:call zh jmp fanhui mov ax,4c00h int 21h sw1: mov bh,dh inc dh jmp jx sw2: mov bh,dh dec dh jmp jx sw3: mov bl,dl inc dl jmp jx1 sw4: mov bl,dl dec dl jmp jx1 jxwzh:push ax mov ah,bh mov bh,dh mov dh,ah pop ax jmp fanhui jxwzl:push ax mov al,bl mov bl,dl mov dl,al po