⚡ Descuentos en cursos en video - Lleva tu aprendizaje técnico al siguiente nivel y aprovecha precios especiales antes de que termine la oferta. 🔥 Aprovechar oferta ahora 🔥
Microcontroladores y sistemas digitales

¿como controlo el puerto serial en ensamblador?

candia
candia
1
hace 17 años
hace 17 años
hola, quisiera realizar una comunicasion serial entre la computadora y el pic16f84a, pero no se como manipular el puerto serie, lo que estoy intentando hacer es un programa en delphi con una perte en ensamblador, pero no he podido, este es el codigo que tengo aver si le dan una checadita, haa el error que me marca es error unit1.pas(39): undeclared identifier: 'procedimiento1' entre otros, pero creo que este es el importante, cosi si tengo que llamar a una dll o algo asi. porfavor ayudenme, se los agradesere unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; Edit1: TEdit; Button1: TButton; Button2: TButton; Button3: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public procedure procedimiento1(x:byte); Aqui trato de hacer una funcion para sacar un dato en el puerto serial { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure tform1.procedimiento1(x:byte); esta es la funcion begin asm primero pongo asm para indicar que es ensamblador, mov ah,1h cargo el acumulador con un 1 para que al llamar a interrupsion mov dx,0h sea en la funcion 1 de transmision, y el registro d con un cero int 14 para indicar que es com1, llamo a la interrupsion, mov al,x pongo el dato que quiero transmitir, y buelvo a llamar a la int 14h interrupsion. ¿ SI ES ASI? O primero tengo que configurar el puerto con la funcion 00h end; procedure TForm1.Button1Click(Sender: TObject); var z:byte; HA, tambien esta esta parte donde llamo al begin procedimiento, pero tambien me marca un error en z:= 3; la variable x de arriba, undeclared identifier: 'x'. form1.procedimiento1(z); end; !!!! ayuda que esta mal ¡¡¡¡¡¡¡¡¡¡ end.
Reparaciones similares solucionadas

¿Conoces una solución?

¡Aprende a reparar con estos cursos YoReparo!

4.87
(15)

Curso Diseño de Amplificadores de Máxima Fidelidad

Maximiliano Resch
$ 29 USD
$ 13 USD
4.94
(16)

Curso Refrigeración Comercial Aplicado a Diagnóstico y Reparación

Ing. Georga Melgarejo
$ 40 USD
$ 13 USD
4.71
(7)

Curso TV OLED y QLED con el Ing. Picerno

Ing. Alberto H. Picerno
$ 29 USD
$ 10 USD
¿Tienes una mejor respuesta a este tema? ¿Quieres hacerle una pregunta a nuestra comunidad y sus expertos?
Regístrate gratis