Jump to content
Sign in to follow this  
fabio_coimbra

duvida assembly

Recommended Posts

fabio_coimbra

Boa tarde!

Preciso de mudar a cor de texto e a cor de fundo da comsola através do assembly 8086.

Alguém pode-me ajudar?

Obrigado.

Share this post


Link to post
Share on other sites
Catarrunas

Ola tudo bem, tinha este código praqui esquecido na minha maquina, o que faz e mudar a cor de fundo.  Define a memoria para a memoria gráfica e poe o fundo a verde. Código e compilado em masm versao 5.1.

Pra experimentares outras cores muda esta linha, podes procurar na net outras cores:  MOV BL,02

STACK SEGMENT PARA STACK ; define o seg. de pilha
DB 64 DUP ('MYSTACK ')
STACK ENDS

MYCODE SEGMENT PARA 'CODE' ; define o segmento cod. para o MASM

MYPROC PROC FAR ; nome do procedimento MYPROC
ASSUME CS:MYCODE,SS:STACK
PUSH DS ; guarda na pilha o SEG. DS
SUB AX,AX ; garante zero no AX
PUSH AX ; guarda zero na pilha


MOV AH, 00h ; prepara para definir o modo graf.
MOV AL, 04h ; modo graf. 320x200 color mode
INT 10h ; invoca a interrupção 10h da BIOS

MOV AH,11 ; prepara configuração da palete de cores
MOV BH,00 ; inicializa a cor de background
MOV BL,02 ; background
INT 10h ; invoca a interrupção 10h da BIOS

;------------------------------------------------------------------------------

MOV ah,01
INT 21h

MOV AH,00h
MOV AL,02h
INT 10h



RET ; retorna o controlo ao DOS

MYPROC ENDP ; fim do procedimento MYPROC

MYCODE ENDS ; fim do seg. de codigo

END ; fim de todo o programa

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.