Programa documentado:
https://drive.google.com/open?id=1XUd_pYgMQAmwMZrECZGg3Nu6KhKDwBUK
-------------
jueves, 22 de febrero de 2018
miércoles, 21 de febrero de 2018
Programas del dia 20/02/018. Manejo del colores
FIN_4c00H EQU 4c00h
DOS_21h EQU 21h
BIOS_10h EQU 10h
pila segment stack
Dw 100 DUP('0')
pila ends
codigo segment
CLS proc Far
assume CS:codigo,SS:pila
CAll limpia
mov ax,FIN_4c00H
int DOS_21h
CLS ENDP
limpia proc near
mov ax,0600h
mov bh,0Ah
mov cx,001h
mov dx,484fh
int BIOS_10h
ret
limpia endp
codigo ends
end CLS
---------------------------------------------------------------------------------------------
org 100h
mov ah ,06h
mov bh, 9fh
mov cx ,0000h
mov dx,484fh
int 10h
mov ah,02h
mov bh ,00h
mov dx ,0000h
int 10h
int 21h
mov ax,4c00h
int 21h
ret
--------------------------------------------------------------------------------------------------
org 100h
.data
msg DB "color","$"
.code
mov ah ,06h
mov bh, 9fh
mov cx ,0000h
mov dx,484fh
int 10h
mov ah,02h
mov bh ,00h
mov dx ,0000h
int 10h
mov ax,@data
mov dx,ax
lea dx,msg
mov ah,9h
int 21h
mov ax,4c00h
int 21h
DOS_21h EQU 21h
BIOS_10h EQU 10h
pila segment stack
Dw 100 DUP('0')
pila ends
codigo segment
CLS proc Far
assume CS:codigo,SS:pila
CAll limpia
mov ax,FIN_4c00H
int DOS_21h
CLS ENDP
limpia proc near
mov ax,0600h
mov bh,0Ah
mov cx,001h
mov dx,484fh
int BIOS_10h
ret
limpia endp
codigo ends
end CLS
---------------------------------------------------------------------------------------------
org 100h
mov ah ,06h
mov bh, 9fh
mov cx ,0000h
mov dx,484fh
int 10h
mov ah,02h
mov bh ,00h
mov dx ,0000h
int 10h
int 21h
mov ax,4c00h
int 21h
ret
--------------------------------------------------------------------------------------------------
org 100h
.data
msg DB "color","$"
.code
mov ah ,06h
mov bh, 9fh
mov cx ,0000h
mov dx,484fh
int 10h
mov ah,02h
mov bh ,00h
mov dx ,0000h
int 10h
mov ax,@data
mov dx,ax
lea dx,msg
mov ah,9h
int 21h
mov ax,4c00h
int 21h
martes, 20 de febrero de 2018
Programas del dia 19/02/018
include 'emu8086.inc'
name "Muestra"
org 100h
call suma
call inicio
call resta
call final
inicio:
mov ax,20h
mov bx,13h
ret
suma:
add ax,1AAh
add bx,11ch
add ax,bx
ret
resta:
sub ax,3h
sub bx,2h
ret
final:
mov ax,4c00h
int 21h
ret
end
-------------------------------------------------------------------------
org 100h
CR EQU 13
lf EQU 10
imprimir EQU 9
fin EQU 4c00h
dos EQU 21h
.data
txt DB 'ejemplos',CR,lf,'$'
.stack 100h
.code
inicio:mov ax,@data
mov ds,ax
mov dx,offset txt
mov ah,imprimir
int dos
mov ax,fin
int dos
end inicio
ret
---------------------------------------------------------------------------------------
org 100h
CR EQU 13
lf EQU 10
imprimir EQU 9
fin EQU 4c00h
dos EQU 21h
.data
txt DB 'ejemplos',CR,lf,'$'
.stack 100h
.code
inicio proc
mov ax,@data
mov ds,ax
mov dx,offset txt
mov ah,imprimir
int dos
mov ax,fin
int dos
end inicio
ret
------------------------------------------------------------------------------------------------
include 'emu8086.inc'
name "Muestra"
org 100h
call suma
call inicio
call resta
call final
inicio proc
mov ax,20h
mov bx,13h
ret
suma proc
add ax,1AAh
add bx,11ch
add ax,bx
ret
resta proc
sub ax,3h
sub bx,2h
ret
final proc
mov ax,4c00h
int 21h
ret
end
-----------------------------------------------------------------------------------------------------------------------
name "Muestra"
org 100h
call suma
call inicio
call resta
call final
inicio:
mov ax,20h
mov bx,13h
ret
suma:
add ax,1AAh
add bx,11ch
add ax,bx
ret
resta:
sub ax,3h
sub bx,2h
ret
final:
mov ax,4c00h
int 21h
ret
end
-------------------------------------------------------------------------
org 100h
CR EQU 13
lf EQU 10
imprimir EQU 9
fin EQU 4c00h
dos EQU 21h
.data
txt DB 'ejemplos',CR,lf,'$'
.stack 100h
.code
inicio:mov ax,@data
mov ds,ax
mov dx,offset txt
mov ah,imprimir
int dos
mov ax,fin
int dos
end inicio
ret
---------------------------------------------------------------------------------------
org 100h
CR EQU 13
lf EQU 10
imprimir EQU 9
fin EQU 4c00h
dos EQU 21h
.data
txt DB 'ejemplos',CR,lf,'$'
.stack 100h
.code
inicio proc
mov ax,@data
mov ds,ax
mov dx,offset txt
mov ah,imprimir
int dos
mov ax,fin
int dos
end inicio
ret
------------------------------------------------------------------------------------------------
include 'emu8086.inc'
name "Muestra"
org 100h
call suma
call inicio
call resta
call final
inicio proc
mov ax,20h
mov bx,13h
ret
suma proc
add ax,1AAh
add bx,11ch
add ax,bx
ret
resta proc
sub ax,3h
sub bx,2h
ret
final proc
mov ax,4c00h
int 21h
ret
end
-----------------------------------------------------------------------------------------------------------------------
miércoles, 14 de febrero de 2018
martes, 13 de febrero de 2018
jueves, 8 de febrero de 2018
lunes, 5 de febrero de 2018
Suscribirse a:
Entradas (Atom)