正文

[原创]汇编版张雨生《大海》2005-06-19 19:47:00

【评论】 【打印】 【字体: 】 本文链接:http://blog.pfan.cn/caoxin/1939.html

分享到:

自学两个月汇编了,用MASM5.0编译。 data segment freq dw 196,220      dw 262,262,262,262,262,220,196      dw 262,262,262,262,294,262,220,262      dw 294,294,294,294,294,262,220      dw 294,294,294,294,330,294,330,392      dw 440,440,392,440,392,330      dw 294,294,330,294,262,220,196,220      dw 262,262,262,262,262,220      dw 262,196,220      dw 440,440,392,440,524,440      dw 392,330,294,262,220,196,220      dw 262,262,262,262,294,262      dw 262,330,392      dw 440,440,440,440,524,440      dw 392,392,392,440,392,330,294      dw 262,262,262,262,294      dw 330,330,294      dw 262,262,262,262,524,440      dw 392,392,392,440,392,330,392      dw 440,524,524,440,392      dw 392,330,392      dw 440,440,440,440,524,440      dw 392,392,392,440,392,330,294      dw 262,262,262,262,392      dw 330,330,294      dw 262,262,262,262,294,330      dw 392,392,330,392,330,392      dw 440      dw 9,9,196,660,294,294,262      dw 262,-1 time dw 400,400      dw 400,200,400,400,800,400,400      dw 400,200,400,200,200,800,400,400      dw 400,200,400,400,800,400,400      dw 400,200,400,200,200,800,400,400      dw 400,800,400,800,400,400      dw 400,200,200,400,400,800,400,400      dw 400,200,400,400,800,800      dw 1600,800,800      dw 400,800,400,800,400,400      dw 400,400,400,400,800,400,400      dw 400,800,400,800,400,200      dw 2400,400,400      dw 400,800,400,800,400,400      dw 400,800,200,200,800,400,400      dw 400,800,400,800,800      dw 2400,400,400      dw 400,800,400,800,400,400      dw 400,800,200,200,800,400,400      dw 800,400,800,400,200      dw 2400,400,400      dw 400,800,400,800,400,400      dw 400,800,200,200,800,400,400      dw 400,800,400,800,800      dw 2400,400,400      dw 400,800,400,800,400,400      dw 400,800,400,800,400,400      dw 3200      dw 800,400,400,400,400,400,400      dw 4000 data ends code segment assume cs:code,ds:data main proc far start:mov ax,data       mov ds,ax       mov si,offset freq       mov di,offset time l1:  mov cx,[si]       cmp cx,-1       je exit       mov bx,[di]       call gensound       add si,2       add di,2       jmp l1 exit:mov ax,4c00h       int 21h main endp gensound proc near        push dx        mov al,0b6h        out 43h,al        mov dx,8h        mov ax,3208h        div cx        out 42h,al        mov al,ah        out 42h,al        in al,61h        mov ah,al        or al,3        out 61h,al l2:    push dx        push ax        mov dx,8h        mov ax,0f05h s1:    sub ax,1        sbb dx,0        jnz s1        pop ax        pop dx        dec bx        jnz l2      mov al,ah   out 61h,al   pop dx   ret   gensound endp   code ends   end start

阅读(3982) | 评论(0)


版权声明:编程爱好者网站为此博客服务提供商,如本文牵涉到版权问题,编程爱好者网站不承担相关责任,如有版权问题请直接与本文作者联系解决。谢谢!

评论

暂无评论
您需要登录后才能评论,请 登录 或者 注册