/*C31COM.C - C31 COMMUNICATION PROGRAM TO MULTIPLY NUMBER BY 2*/
main()
{ 
 unsigned int hostdata;
 unsigned int *pwAddrHD;     
 unsigned int *pwAddrTD;
 asm("     OR   2000h,ST  "); 
 for (;;)                           
  {
   pwAddrHD = (unsigned int *)0x809800; /*PC host mail Addr   */
   pwAddrTD = (unsigned int *)0x809801; /*C31 target mail Addr*/
   hostdata = *pwAddrHD;
   *pwAddrTD = hostdata * 2;
  }
}