Welcome to our site! EDAboard.com is an international Electronics Discussion Forum focused on EDA software, circuits, schematics, books, theory, papers, asic, pld, 8051, DSP, Network, RF, Analog Design, PCB, Service Manuals... and a whole lot more! To participate you need to register. Registration is free. Click here to register now.
C++:
#include<dos.h>
#include<conio.h>
#include<stdio.h>
main()
{
int a,b;
do
{
a=inportb(0x379); //Input a byte from port
b=a&0x10; //Mask
outportb(0x378,0);
}while(b!=0);
outportb(0x378,0xff)
{
Note:for input a word you must use import() for input a word, and outport() for out.
===================================================
Pascal:
Program
Uses crt;
Var
a,b:byte;
begin
clrscr;
repeat
a:=port[$379];
b:=a and $10;
port[$378]:=0;
until b=0;
port[$378]:=$FF;
End.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.
