AXIOMTEK AX5420P, Руководство пользователя

Страница: 32 / 36

AX5420P & AX5425P User ’ s Manual
Examples
26
write(fd,"S1",2);
read(fd,&slotno,sizeof(int));
close(fd);
printf("BASE ADDRESS: %x\n",base);
printf("IRQ LEVEL: %x\n",irqno);
printf("SLOT NUMBER: %x\n",slotno);
if(base==0)
{
printf("ERROR INFORMATION!\n");
exit(0);
}
}
6.2 Turbo PASCAL
**************************************************************************************
*
Example program for Turbo PASCAL language *
* To get BASE ADDRESS *
* IRQ LEVEL *
* SLOT NUMBER via device driver *
* Before executing this program, device *
* driver must be installed successfully. *
**************************************************************************************
PROGRAM TP_DEMO(input,output);
uses dos,crt;
var
fdw:text;
fdr:file of integer;
addr,irqno,slotno:integer;
begin
clrscr;
assign(fdw,'5425DRV');
assign(fdr,'5425DRV');
rewrite(fdw);
writeln(fdw,'b1');
reset(fdr);
read(fdr,addr);
rewrite(fdw);
writeln(fdw,'i1');
reset(fdr);
read(fdr,irqno);
rewrite(fdw);
writeln(fdw,'s1');