Ensamblador - No me funciona el modo grafico

 
Vista:

No me funciona el modo grafico

Publicado por abc (1 intervención) el 29/06/2009 20:05:55
mov ax, data
mov ds, ax
mov es, ax

mov ah,00h
mov al,12h
int 10h
mov cx,20h
mov dx,20h
inicio:
call pixel
inc cx
cmp cx,60h
je bajar
jmp inicio
bajar:
call pixel
inc dx
cmp dx,60h
je salir
regreso:
call pixel
dec cx
cmp cx,20h
je bajar2
jmp regreso
bajar2:
call pixel
inc dx
cmp dx,60h
je salir
jmp inicio
salir:
mov ah,00h
int 16h
cmp al,"s"
je fin
jmp salir
fin: int 20h
pixel:
mov ah,0ch
mov al,04h
mov bl,00h
int 10h
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:No me funciona el modo grafico

Publicado por MSH (1 intervención) el 04/07/2009 03:37:51
Saludos:

Me parece que el error fue el no delarar la rutina de pixel como procedimiento

.model small
.stack 256h
.data
x dw 100
y dw 200
.code
inicio:
mov ax,@data
mov ds, ax
mov es, ax

mov ah,00h ;modo grafico
mov al,12h
int 10h

mov cx,20h
mov dx,20h
begin:
call pixel
inc cx
cmp cx,60h
je bajar
jmp begin
bajar:
call pixel
inc dx
cmp dx,60h
je salir
regreso:
call pixel
dec cx
cmp cx,20h
je bajar2
jmp regreso
bajar2:
call pixel
inc dx
cmp dx,60h
je salir
jmp begin
salir:
mov ah,00h
int 16h
cmp al,"s"
je fin
jmp salir
fin: ;siempre que termines un programa en modo gráfico
mov ah,00h ; debes regresar al DOS en modo texto
mov al,03h
int 10h
mov ax,4c00h
int 21h
;............................................
pixel proc near
mov ah,0ch
mov al,04h
int 10h
ret
pixel endp

end inicio
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar