AMETEK SLM-1 - Manual (Page 67)

Sorensen SLM-1 Chassis Appendix B
case '1':
pd_wrt("chan 1",6);
pd_wrt("meas:volt?",10);
pd_rd(rdmbuf,rdmcnt);
strncat(tmpbuf,chanbuf,1);
pd_wrt(tmpbuf,6);
break;
case '2':
pd_wrt("chan 2",6);
pd_wrt("meas:volt?",10);
pd_rd(rdmbuf,rdmcnt);
strncat(tmpbuf,chanbuf,1);
pd_wrt(tmpbuf,6);
break;
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
*/
}
Operation and Programming Manual B-7