用汇编语言编程:输入半径值和圆心数据,在屏幕中画圆,并能多次运行

时间: 2024-02-17 14:02:28 浏览: 18
以下是一段汇编程序,可以实现输入半径值和圆心数据,画出圆,并能多次运行。 ``` .MODEL SMALL .STACK 100h .DATA msg1 DB 'Enter the radius of the circle: $' msg2 DB 'Enter the x coordinate of the center: $' msg3 DB 'Enter the y coordinate of the center: $' msg4 DB 0dh, 0ah, 'Press any key to continue...', 0 .CODE MAIN PROC MOV AX, @DATA MOV DS, AX MOV AH, 9 LEA DX, msg1 INT 21h MOV AH, 1 INT 21h SUB AL, 30h MOV BL, AL MOV AH, 9 LEA DX, msg2 INT 21h MOV AH, 1 INT 21h SUB AL, 30h MOV CL, AL MOV AH, 9 LEA DX, msg3 INT 21h MOV AH, 1 INT 21h SUB AL, 30h MOV CH, AL MOV CX, 0 MOV DL, BL MOV DH, 0 MOV AH, 0ch INT 10h MOV CX, 0 MOV DL, CL MOV DH, CH MOV AH, 0ch INT 10h MOV AX, 0b800h MOV ES, AX MOV DI, 0 MOV CX, BL MOV BX, 0 MOV AX, 0a000h MOV DS, AX DRAW_CIRCLE: MOV AX, BX MOV DX, CX ADD AX, AX ADD DX, DX MOV SI, DX ADD SI, AX MOV AX, SI ADD AX, 0a000h MOV DI, AX MOV AL, 1 MOV [DI], AL INC BX CMP BX, CX JLE DRAW_CIRCLE MOV AH, 9 LEA DX, msg4 INT 21h MOV AH, 0 INT 16h JMP MAIN MAIN ENDP END MAIN ``` 这段程序使用 INT 10h 中断来在屏幕上画圆。程序首先提示用户输入半径值和圆心数据,然后根据用户输入的数据画出圆。程序最后再提示用户按任意键继续,并等待用户按键后重新开始。您可以将这段程序保存为一个 .asm 文件,使用汇编器和链接器将其编译和链接成可执行文件。

相关推荐

给出以下汇编语言代码的完整的注释data segment shuc db 'draw a yuan: $' hua1 db 'input yuanxin and banjing(example:310,220 200): $' zifu db 20 dup(0) ;此段用以临时存放输入字符 shu db 20 dup(0) ;再次存放输入数字的ASCII码转换华为的数字 suan db 24 dup(0) ;用来存放计算圆过程中产生的临时数据 data ends stack segment stk db 16 dup(0) stack ends code segment assume cs:code, ds:data,ss:stack start: mov ax,data mov ds,ax mov ax,stack mov ss,ax mov dx,offset shuc call showmsg call input mov al,ds:[si] and al,11011111b cmp al,43h draw1: mov dx,offset hua1 call showmsg call input call zhuanshu call moshi mov bx,offset shu mov ax,ds:[bx] mov si,ax mov ax,ds:[bx+2] mov di,ax mov ax,ds:[bx+4] call drawyuan mov ax,4c00h int 21h input: mov bx,0 mov cx,20 re: mov ah,1h int 21h cmp al,0dh jz scx mov si,offset zifu mov [bx][si],al inc bx loop re ret scx: mov cx,0 ret showmsg: mov ah,9h int 21h ret moshi: mov al,12h mov ah,0 int 10h ret zhuanshu: mov bx,offset zifu mov bp,offset shu mov cx,16 mov si,0 mov di,0 lei: mov al,ds:[bx][si] cmp al,0 jz scx sub al,30h mov dl,100 mul dl mov word ptr ds:[bp][di],ax mov ax,0 mov al,ds:[bx][si+1] sub al,30h mov dl,10 mul dl add ax,word ptr ds:[bp][di] mov word ptr ds:[bp][di],ax mov ax,0 mov al,ds:[bx][si+2] sub al,30h add ax,word ptr ds:[bp][di] mov word ptr ds:[bp][di],ax add si,4 add di,2 loop lei ret drawyuan: mov bx,offset suan mov word ptr ds:[bx],si mov word ptr ds:[bx+2],di sub si,ax mov word ptr ds:[bx+4],si sub di,ax mov word ptr ds:[bx+6],di shl ax,1 mov cx,ax mov word ptr ds:[bx+10],ax shr ax,1 xor dx,dx mul ax mov word ptr ds:[bx+12],ax mov word ptr ds:[bx+14],dx hang: push cx mov cx,ds:[bx+10] mov dx,di mov si,ds:[bx+4] lie: push cx push dx xor dx,dx mov cx,si mov ax,si sub ax,ds:[bx] xor dx,dx imul ax mov word ptr ds:[bx+16],ax mov word ptr ds:[bx+18],dx mov ax,di sub ax,ds:[bx+2] xor dx,dx imul ax add ax,ds:[bx+16] adc dx,ds:[bx+18] mov word ptr ds:[bx+20],ax mov word ptr ds:[bx+22],dx pop dx mov ax,ds:[bx+22] cmp ax,ds:[bx+14] jne kong mov ax,ds:[bx+12] sub ax,ds:[bx+20] cmp ax,500 ja kong mov ah,0ch mov al,5h int 10h kong: pop cx inc si loop lie pop cx inc di loop hang ret code ends end start

最新推荐

recommend-type

在KEIL中实现C语言嵌套的汇编语言

在单片机学习的过程中,掌握一点汇编语言是非常有必有的,作为低级语言汇编语言在单片机开发中有它不可取代的作用。但是要提高单片机技能,必须掌握C 语言编程,因为C 语言有强大的模块化管理思想。我想在很多人学习...
recommend-type

汇编语言在屏幕上输出中文字符

在屏幕上输出中文字符“长春大学”。 code segment assume cs:code, ds:code begin: ;----使文本显示模式扩展为全屏---- mov ax,12h INT 10H ;置图形模式 。。。。。。。。。。。。。 。。。。。。。。。。。。
recommend-type

ARM中C语言和汇编语言混合编程

ARM中C语言和汇编语言混合编程 C语言调用汇编 汇编语言嵌入C中 混合编程
recommend-type

微信小程序-番茄时钟源码

微信小程序番茄时钟的源码,支持进一步的修改。番茄钟,指的是把工作任务分解成半小时左右,集中精力工作25分钟后休息5分钟,如此视作种一个“番茄”,而“番茄工作法”的流程能使下一个30分钟更有动力。
recommend-type

zigbee-cluster-library-specification

最新的zigbee-cluster-library-specification说明文档。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

实现实时数据湖架构:Kafka与Hive集成

![实现实时数据湖架构:Kafka与Hive集成](https://img-blog.csdnimg.cn/img_convert/10eb2e6972b3b6086286fc64c0b3ee41.jpeg) # 1. 实时数据湖架构概述** 实时数据湖是一种现代数据管理架构,它允许企业以低延迟的方式收集、存储和处理大量数据。与传统数据仓库不同,实时数据湖不依赖于预先定义的模式,而是采用灵活的架构,可以处理各种数据类型和格式。这种架构为企业提供了以下优势: - **实时洞察:**实时数据湖允许企业访问最新的数据,从而做出更明智的决策。 - **数据民主化:**实时数据湖使各种利益相关者都可
recommend-type

用 Python 画一个可以动的爱心

好的,我可以帮助您使用Python来绘制一个动态的爱心。您可以使用turtle库来实现。以下是实现代码: ```python import turtle import math # 设置画布和画笔 canvas = turtle.Screen() canvas.bgcolor("black") pencil = turtle.Turtle() pencil.speed(0) pencil.color("red", "pink") pencil.pensize(3) # 定义爱心函数 def draw_love(heart_size, x_offset=0, y_offset=0):
recommend-type

JSBSim Reference Manual

JSBSim参考手册,其中包含JSBSim简介,JSBSim配置文件xml的编写语法,编程手册以及一些应用实例等。其中有部分内容还没有写完,估计有生之年很难看到完整版了,但是内容还是很有参考价值的。
recommend-type

"互动学习:行动中的多样性与论文攻读经历"

多样性她- 事实上SCI NCES你的时间表ECOLEDO C Tora SC和NCESPOUR l’Ingén学习互动,互动学习以行动为中心的强化学习学会互动,互动学习,以行动为中心的强化学习计算机科学博士论文于2021年9月28日在Villeneuve d'Asq公开支持马修·瑟林评审团主席法布里斯·勒菲弗尔阿维尼翁大学教授论文指导奥利维尔·皮耶昆谷歌研究教授:智囊团论文联合主任菲利普·普雷教授,大学。里尔/CRISTAL/因里亚报告员奥利维耶·西格德索邦大学报告员卢多维奇·德诺耶教授,Facebook /索邦大学审查员越南圣迈IMT Atlantic高级讲师邀请弗洛里安·斯特鲁布博士,Deepmind对于那些及时看到自己错误的人...3谢谢你首先,我要感谢我的两位博士生导师Olivier和Philippe。奥利维尔,"站在巨人的肩膀上"这句话对你来说完全有意义了。从科学上讲,你知道在这篇论文的(许多)错误中,你是我可以依