Programa con cuadros de colores.

	import base64
	try:
	include 'emu8086.inc'
	CUADRO MACRO XI,YI,XF,YF,COLOR
	MOV AX, 0600H ;
	MOV BH, COLOR ; COLOR DE FONDO Y LETRA
	MOV BL, 00H
	MOV CH, YI ; Y INICIAL
	MOV CL, XI ; X INICIAL
	MOV DH, YF ; Y FINAL
	MOV DL, XF ; X FINAL
	INT 10h
	endM
	POSICION MACRO X,Y
	; **** POSICIONA EL CURSOR ********
	MOV DH, Y ; POSICI[ON EN Y
	MOV DL, X ; POSICI[ON EN X
	MOV AH, 02
	MOV BH, 00
	INT 10H
	ENDM
	DESPLEGAR MACRO MENSAJE
	MOV AH,09 ;****** MUESTRA MENSAJE *******
	MOV DX,OFFSET MENSAJE
	INT 21h
	ENDM
	DATOS SEGMENT ;SEGMENTO DE DATOS
	M1 DB "A",'$'
	M2 DB "B",'$'
	M3 DB "C",'$'
	datos ends
	cincocuadros macro
	cuadro 1,1,20,5,44
	posicion 10,3
	desplegar M1
	cuadro 21,1,40,5,14
	posicion 30,3
	desplegar M2
	cuadro 41,1,60,5,99
	posicion 50,3
	desplegar M3
	endM
	CODIGO SEGMENT
	ASSUME CS: CODIGO,DS:DATOS,SS:PILA
	PRINCIPAL PROC
	MOV AX,DATOS
	MOV DS,AX
	cincocuadros
	PRINCIPAL ENDP ;FIN DEL PROCEDIMIENTO
	CODIGO ENDS ;FIN DEL SEGMENTO
	END PRINCIPAL

view raw Programa con cuadros de colores. hosted with ❤ by GitHub