home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c129 / 1.ddi / MISCIO.C < prev    next >
Encoding:
C/C++ Source or Header  |  1989-04-11  |  1.1 KB  |  72 lines
  1.  
  2.  
  3. # include <stdio.h>
  4. # include <dos.h>
  5. # include <stdlib.h>
  6.  
  7. # define M_PI     3.14159265358979324
  8. # define M_PI_2   1.57079632679489662
  9. # define M_PI_4      0.785398163397448310 
  10.  
  11. void GotoXY(int x,int y)
  12. {
  13.   union REGS r;
  14.   r.h.ah=2;
  15.   r.h.dl=x-1;
  16.   r.h.dh=y-1;
  17.   r.h.bh=0;
  18.   int86(0x10, &r, &r);
  19. }
  20.  
  21. void ClrScr()
  22. {
  23.   union REGS r;
  24.   r.h.ah=6;
  25.   r.h.al=0;
  26.   r.h.cl=0;
  27.   r.h.ch=0;
  28.   r.h.dl=79;
  29.   r.h.dh=24;
  30.   r.h.bh=7;
  31.   int86(0x10, &r, &r);
  32. }
  33.  
  34. void ClrEol()
  35. { int i,x,y,z;
  36.   char c;
  37.   union REGS r;
  38.  
  39.   r.h.ah=3;
  40.   r.h.bh = 0;
  41.   int86(0x10, &r, &r);
  42.   y = r.h.dh;
  43.   x = r.h.dl;
  44.   z = 79-x;
  45.   c = 32;
  46.   for (i=1; i<z; i++)
  47.     printf("%c",c);
  48.   GotoXY(x+1,y+1);
  49. }
  50.  
  51. float frandom()
  52. {
  53.   float r;
  54.   int i;
  55.   i = rand();
  56.   r = i;
  57.   r = r / 32767.0;
  58.   return(r);
  59. }
  60.  
  61. void double2float(float destination[], double source[],int n)
  62. { int i;
  63.   for (i=0; i <=n-1; i++)
  64.     destination[i] = source[i];
  65. }
  66.  
  67. void float2double(double destination[], float source[],int n)
  68. { int i;
  69.   for (i=0; i <=n-1; i++)
  70.     destination[i] = source[i];
  71. }
  72.