beautypg.com

AMETEK SLD Series User Manual

Page 86

background image

Appendix B

Sorensen SLD-Series DC Load

B-8

M540075-01 Rev C

case '3':
pd_wrt("chan 3",6);
pd_wrt("meas:volt?",10);
pd_rd(rdmbuf,rdmcnt);
strncat(tmpbuf,chanbuf,1);
pd_wrt(tmpbuf,6);
break;
case '4':
pd_wrt("chan 4",6);
pd_wrt("meas:volt?",10);
pd_rd(rdmbuf,rdmcnt);
strncat(tmpbuf,chanbuf,1);
pd_wrt(tmpbuf,6);
break;
}
}
}
else
{
return(OPER_ERR);
}
return (result);
}

void pd_rem(void)
{
char ch;
outportb(ACE_INT_ENB_REG, 0xd);

/* enable ACIA interrupt register */

inportb(ACE_DATA_REG);

/* empty receive data register

*/
inportb(ACE_LINE_STAT_REG);

/* clear line status register */

outportb(ACE_MODEM_CTL_REG, 0xb);

/* set RTS,DTR to enable modem

and */

/* turn on OUT2 to enable the 8250's */

/* IRQ interrupt to system */

}
void pd_loc(void)
{
char ch;
outportb(ACE_INT_ENB_REG, 0);

/* disable all 8250 interrupt */

outportb(ACE_MODEM_CTL_REG, 0);

/* clear RTS,DTR to disable

modem and */

/* turn off OUT2 to disable the 8250's*/

/* IRQ interrupt to system */

}/* Program terminated. */