http://www.ousob.com --- Legacy Redefined #include <dos.h> #include <extend50.h> CLIPPER b_setpid() { int gotAproblem = 0 ; union REGS regs ; regs.h.ah = 0x50 ; regs.x.bx = _parni(1) ; if( PCOUNT != 1 || !ISNUM(1) ) { gotAproblem++; } if( !gotAproblem ) { int86(0x21,&regs,&regs); } _ret(); }