http://www.ousob.com --- Legacy Redefined #include <dos.h> #include <extend50.h> CLIPPER b_fastkey() { union REGS regs; int logical = _parl(1); if( !ISLOG(1) ){ _ret(); return; } switch(logical){ case 0x01: regs.h.ah = 0x03; regs.h.al = 0x05; regs.h.bh = 0x00; regs.h.bl = 0x00; int86(0x16,&regs,&regs); break; case 0x00: regs.h.ah = 0x03; regs.h.al = 0x05; regs.h.bh = 0x02; regs.h.bl = 0x10; break; int86(0x16,&regs,&regs); } _ret(); }