home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 573 / 3dlab101 / sincos.inc < prev    next >
Text File  |  1993-06-19  |  5KB  |  98 lines
  1. CONST    DCos    : ARRAY[ 0..359 ] OF Word = ( 
  2.  
  3.         $0100, $0100, $0100, $0100, $00FF, $00FF, $00FF, $00FE, 
  4.         $00FE, $00FD, $00FC, $00FB, $00FA, $00F9, $00F8, $00F7, 
  5.         $00F6, $00F5, $00F3, $00F2, $00F1, $00EF, $00ED, $00EC, 
  6.         $00EA, $00E8, $00E6, $00E4, $00E2, $00E0, $00DE, $00DB, 
  7.         $00D9, $00D7, $00D4, $00D2, $00CF, $00CC, $00CA, $00C7, 
  8.         $00C4, $00C1, $00BE, $00BB, $00B8, $00B5, $00B2, $00AF, 
  9.         $00AB, $00A8, $00A5, $00A1, $009E, $009A, $0096, $0093, 
  10.         $008F, $008B, $0088, $0084, $0080, $007C, $0078, $0074, 
  11.         $0070, $006C, $0068, $0064, $0060, $005C, $0058, $0053, 
  12.         $004F, $004B, $0047, $0042, $003E, $003A, $0035, $0031, 
  13.         $002C, $0028, $0024, $001F, $001B, $0016, $0012, $000D, 
  14.         $0009, $0004, $0000, $FFFC, $FFF7, $FFF3, $FFEE, $FFEA, 
  15.         $FFE5, $FFE1, $FFDC, $FFD8, $FFD4, $FFCF, $FFCB, $FFC6, 
  16.         $FFC2, $FFBE, $FFB9, $FFB5, $FFB1, $FFAD, $FFA8, $FFA4, 
  17.         $FFA0, $FF9C, $FF98, $FF94, $FF90, $FF8C, $FF88, $FF84, 
  18.         $FF80, $FF7C, $FF78, $FF75, $FF71, $FF6D, $FF6A, $FF66, 
  19.         $FF62, $FF5F, $FF5B, $FF58, $FF55, $FF51, $FF4E, $FF4B, 
  20.         $FF48, $FF45, $FF42, $FF3F, $FF3C, $FF39, $FF36, $FF34, 
  21.         $FF31, $FF2E, $FF2C, $FF29, $FF27, $FF25, $FF22, $FF20, 
  22.         $FF1E, $FF1C, $FF1A, $FF18, $FF16, $FF14, $FF13, $FF11, 
  23.         $FF0F, $FF0E, $FF0D, $FF0B, $FF0A, $FF09, $FF08, $FF07, 
  24.         $FF06, $FF05, $FF04, $FF03, $FF02, $FF02, $FF01, $FF01, 
  25.         $FF01, $FF00, $FF00, $FF00, $FF00, $FF00, $FF00, $FF00, 
  26.         $FF01, $FF01, $FF01, $FF02, $FF02, $FF03, $FF04, $FF05, 
  27.         $FF06, $FF07, $FF08, $FF09, $FF0A, $FF0B, $FF0D, $FF0E, 
  28.         $FF0F, $FF11, $FF13, $FF14, $FF16, $FF18, $FF1A, $FF1C, 
  29.         $FF1E, $FF20, $FF22, $FF25, $FF27, $FF29, $FF2C, $FF2E, 
  30.         $FF31, $FF34, $FF36, $FF39, $FF3C, $FF3F, $FF42, $FF45, 
  31.         $FF48, $FF4B, $FF4E, $FF51, $FF55, $FF58, $FF5B, $FF5F, 
  32.         $FF62, $FF66, $FF6A, $FF6D, $FF71, $FF75, $FF78, $FF7C, 
  33.         $FF80, $FF84, $FF88, $FF8C, $FF90, $FF94, $FF98, $FF9C, 
  34.         $FFA0, $FFA4, $FFA8, $FFAD, $FFB1, $FFB5, $FFB9, $FFBE, 
  35.         $FFC2, $FFC6, $FFCB, $FFCF, $FFD4, $FFD8, $FFDC, $FFE1, 
  36.         $FFE5, $FFEA, $FFEE, $FFF3, $FFF7, $FFFC, $0000, $0004, 
  37.         $0009, $000D, $0012, $0016, $001B, $001F, $0024, $0028, 
  38.         $002C, $0031, $0035, $003A, $003E, $0042, $0047, $004B, 
  39.         $004F, $0053, $0058, $005C, $0060, $0064, $0068, $006C, 
  40.         $0070, $0074, $0078, $007C, $0080, $0084, $0088, $008B, 
  41.         $008F, $0093, $0096, $009A, $009E, $00A1, $00A5, $00A8, 
  42.         $00AB, $00AF, $00B2, $00B5, $00B8, $00BB, $00BE, $00C1, 
  43.         $00C4, $00C7, $00CA, $00CC, $00CF, $00D2, $00D4, $00D7, 
  44.         $00D9, $00DB, $00DE, $00E0, $00E2, $00E4, $00E6, $00E8, 
  45.         $00EA, $00EC, $00ED, $00EF, $00F1, $00F2, $00F3, $00F5, 
  46.         $00F6, $00F7, $00F8, $00F9, $00FA, $00FB, $00FC, $00FD, 
  47.         $00FE, $00FE, $00FF, $00FF, $00FF, $0100, $0100, $0100 );
  48.  
  49.  
  50.         DSin    : ARRAY[ 0..359 ] OF Word = ( 
  51.  
  52.         $0000, $0004, $0009, $000D, $0012, $0016, $001B, $001F, 
  53.         $0024, $0028, $002C, $0031, $0035, $003A, $003E, $0042, 
  54.         $0047, $004B, $004F, $0053, $0058, $005C, $0060, $0064, 
  55.         $0068, $006C, $0070, $0074, $0078, $007C, $0080, $0084, 
  56.         $0088, $008B, $008F, $0093, $0096, $009A, $009E, $00A1, 
  57.         $00A5, $00A8, $00AB, $00AF, $00B2, $00B5, $00B8, $00BB, 
  58.         $00BE, $00C1, $00C4, $00C7, $00CA, $00CC, $00CF, $00D2, 
  59.         $00D4, $00D7, $00D9, $00DB, $00DE, $00E0, $00E2, $00E4, 
  60.         $00E6, $00E8, $00EA, $00EC, $00ED, $00EF, $00F1, $00F2, 
  61.         $00F3, $00F5, $00F6, $00F7, $00F8, $00F9, $00FA, $00FB, 
  62.         $00FC, $00FD, $00FE, $00FE, $00FF, $00FF, $00FF, $0100, 
  63.         $0100, $0100, $0100, $0100, $0100, $0100, $00FF, $00FF, 
  64.         $00FF, $00FE, $00FE, $00FD, $00FC, $00FB, $00FA, $00F9, 
  65.         $00F8, $00F7, $00F6, $00F5, $00F3, $00F2, $00F1, $00EF, 
  66.         $00ED, $00EC, $00EA, $00E8, $00E6, $00E4, $00E2, $00E0, 
  67.         $00DE, $00DB, $00D9, $00D7, $00D4, $00D2, $00CF, $00CC, 
  68.         $00CA, $00C7, $00C4, $00C1, $00BE, $00BB, $00B8, $00B5, 
  69.         $00B2, $00AF, $00AB, $00A8, $00A5, $00A1, $009E, $009A, 
  70.         $0096, $0093, $008F, $008B, $0088, $0084, $0080, $007C, 
  71.         $0078, $0074, $0070, $006C, $0068, $0064, $0060, $005C, 
  72.         $0058, $0053, $004F, $004B, $0047, $0042, $003E, $003A, 
  73.         $0035, $0031, $002C, $0028, $0024, $001F, $001B, $0016, 
  74.         $0012, $000D, $0009, $0004, $0000, $FFFC, $FFF7, $FFF3, 
  75.         $FFEE, $FFEA, $FFE5, $FFE1, $FFDC, $FFD8, $FFD4, $FFCF, 
  76.         $FFCB, $FFC6, $FFC2, $FFBE, $FFB9, $FFB5, $FFB1, $FFAD, 
  77.         $FFA8, $FFA4, $FFA0, $FF9C, $FF98, $FF94, $FF90, $FF8C, 
  78.         $FF88, $FF84, $FF80, $FF7C, $FF78, $FF75, $FF71, $FF6D, 
  79.         $FF6A, $FF66, $FF62, $FF5F, $FF5B, $FF58, $FF55, $FF51, 
  80.         $FF4E, $FF4B, $FF48, $FF45, $FF42, $FF3F, $FF3C, $FF39, 
  81.         $FF36, $FF34, $FF31, $FF2E, $FF2C, $FF29, $FF27, $FF25, 
  82.         $FF22, $FF20, $FF1E, $FF1C, $FF1A, $FF18, $FF16, $FF14, 
  83.         $FF13, $FF11, $FF0F, $FF0E, $FF0D, $FF0B, $FF0A, $FF09, 
  84.         $FF08, $FF07, $FF06, $FF05, $FF04, $FF03, $FF02, $FF02, 
  85.         $FF01, $FF01, $FF01, $FF00, $FF00, $FF00, $FF00, $FF00, 
  86.         $FF00, $FF00, $FF01, $FF01, $FF01, $FF02, $FF02, $FF03, 
  87.         $FF04, $FF05, $FF06, $FF07, $FF08, $FF09, $FF0A, $FF0B, 
  88.         $FF0D, $FF0E, $FF0F, $FF11, $FF13, $FF14, $FF16, $FF18, 
  89.         $FF1A, $FF1C, $FF1E, $FF20, $FF22, $FF25, $FF27, $FF29, 
  90.         $FF2C, $FF2E, $FF31, $FF34, $FF36, $FF39, $FF3C, $FF3F, 
  91.         $FF42, $FF45, $FF48, $FF4B, $FF4E, $FF51, $FF55, $FF58, 
  92.         $FF5B, $FF5F, $FF62, $FF66, $FF6A, $FF6D, $FF71, $FF75, 
  93.         $FF78, $FF7C, $FF80, $FF84, $FF88, $FF8C, $FF90, $FF94, 
  94.         $FF98, $FF9C, $FFA0, $FFA4, $FFA8, $FFAD, $FFB1, $FFB5, 
  95.         $FFB9, $FFBE, $FFC2, $FFC6, $FFCB, $FFCF, $FFD4, $FFD8, 
  96.         $FFDC, $FFE1, $FFE5, $FFEA, $FFEE, $FFF3, $FFF7, $FFFC );
  97.  
  98.