du26548 发表于 2019-10-18 10:25:31

学到第10章了 突发奇想写个小程序 以作练习

一天坐网吧里正刻苦‘学习’时,看见机箱里面的风扇周围有个光圈,白色的光圈里面有段红光在环绕,心想这肯定也是用汇编代码实现的,那是怎么实现的呢?
所以才有了第一次编写的汇编程序。
写的很粗糙的也很简单,但前几章能用的知识都用上了,感觉相对寻址很麻烦不能ds:,段寄存器不能直接做运算很不灵活,判断语句更是麻烦,延迟完全不会精准到毫秒,很有很多很多的常量,剩下的就都是思路问题也没什么好抱怨得了
assume cs:code,ds:data,ds:color,,ds:zuobiao,ss:sta
data segment
db'a'
db' a a '
db'a   a'
db' a a '
db'a'
data ends
color segment
db 77 ;
color ends
zuobiao segment
db 5,3,1,3,5,7,9,7,5 ;最低点1 最高点9 中间点5
zuobiao ends
sta segment ;作废,懒得写了
db 16 dup (0)
sta ends
code segment
start:
                        mov ax,data
                        mov ds,ax
                        mov ax,color
                        mov es,ax
                        mov dl,es:
                        mov ax,0b872h
                        mov es,ax
                        mov cx,5
                        mov bx,0
                s:
                        push cx       
                        mov cx,5
                f:
                        mov al,
                        mov es:,al
                        inc bx
                        inc di
                        mov al,dl
                        mov es:,al
                        inc di
                        loop f
                       
                        sub di,10
                        add di,160
                       
                        pop cx
                        loop s
                        ;以上为建图
                        ;--------------------------
                        ;以下为光标循环
                        mov ax,0;在栈内创建一个空间用来存 循环状态码
                        push ax
                        mov bp,sp
                       
                all:mov di,0
                        mov si,0
                        mov ax,zuobiao
                        mov ds,ax
                        mov ax,0
                        mov dx,0
                       
half:mov cx,4
       fo:
                 push cx
                 mov ah,0
                       mov al,ds:
                       add di,ax
                       inc si
                       mov byte ptr es:,byte ptr 77h;变白
                       call de;延迟
                      
                       mov byte ptr es:,byte ptr 77 ;回复
                       sub di,ax
                      
                       mov cx,ss:
                        jcxz jia
                       sub di,160 ;第一次运行该循环add向下 第二次运行sub向上
                      
        hui:pop cx
                       loop fo
                      
                       inc dx        ;以除法取余判断单双次运行循环
                       mov ax,dx
                       mov dh,2
                        div dh
                        mov ss:,ah
                        mov dh,0
                       
                        mov cx,ss:
                        jcxz all ;循环运行两次后从头再来
                       
                       
                        jmp half ;循环第一次运行 从一半开始
                       
                        mov ax,4c00h;作废
                        int 21h
                       
       jia:add di,160
                        jmp hui
               
       de:
                       MOV BX,0FH
D1:   MOV CX,0FFFFH
D2:    LOOP D2
            DEC BX
            JNZ D1
                        ret
               
code ends
end start

发表于 2019-10-18 18:22:14

在网吧学习,你真吊。
页: [1]
查看完整版本: 学到第10章了 突发奇想写个小程序 以作练习