/ C/C++ Interactive Guide / c-cplusplus-interactive-guide.iso / c_ref / csource2 / sclib_2 / 2_6 / v6n6091a.txt

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| ff 01 00 00 00 5c 4e 4c | 45 54 54 45 52 5c 36 2e |.....\NL|ETTER\6.|
|00000010| 36 5c 43 55 52 56 45 53 | 37 2e 50 52 47 00 00 00 |6\CURVES|7.PRG...|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 19 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 50 72 6f 67 72 61 6d 20 | 37 0d 0a 0d 0a 76 6f 69 |Program |7....voi|
|00000090| 64 20 65 6c 6c 69 70 73 | 65 20 28 78 63 2c 79 63 |d ellips|e (xc,yc|
|000000a0| 2c 61 2c 62 2c 63 69 29 | 0d 0a 69 6e 74 20 78 63 |,a,b,ci)|..int xc|
|000000b0| 2c 79 63 2c 61 2c 62 2c | 63 69 3b 0d 0a 2f 2a 0d |,yc,a,b,|ci;../*.|
|000000c0| 0a 20 2a 20 54 68 69 73 | 20 72 6f 75 74 69 6e 65 |. * This| routine|
|000000d0| 20 64 72 61 77 73 20 61 | 6e 20 65 6c 6c 69 70 73 | draws a|n ellips|
|000000e0| 65 20 77 69 74 68 20 63 | 65 6e 74 72 65 20 28 78 |e with c|entre (x|
|000000f0| 63 2c 79 63 29 2c 0d 0a | 20 2a 20 20 61 6e 64 20 |c,yc),..| *  and |
|00000100| 73 65 6d 69 2d 61 78 65 | 73 20 61 20 61 6e 64 20 |semi-axe|s a and |
|00000110| 62 20 69 6e 20 74 68 65 | 20 58 20 61 6e 64 20 59 |b in the| X and Y|
|00000120| 20 64 69 72 65 63 74 69 | 6f 6e 73 0d 0a 20 2a 20 | directi|ons.. * |
|00000130| 20 72 65 70 65 63 74 69 | 76 65 6c 79 2e 0d 0a 20 | repecti|vely... |
|00000140| 2a 2f 0d 0a 7b 0d 0a 20 | 69 6e 74 20 78 2c 79 3b |*/..{.. |int x,y;|
|00000150| 0d 0a 20 6c 6f 6e 67 20 | 61 32 2c 62 32 2c 61 32 |.. long |a2,b2,a2|
|00000160| 32 2c 62 32 32 2c 78 64 | 65 72 69 76 2c 79 64 65 |2,b22,xd|eriv,yde|
|00000170| 72 69 76 2c 66 6d 69 64 | 3b 0d 0a 2f 2a 0d 0a 20 |riv,fmid|;../*.. |
|00000180| 2a 20 20 49 6e 69 74 69 | 61 6c 69 7a 65 20 76 61 |*  Initi|alize va|
|00000190| 72 69 61 62 6c 65 73 2e | 0d 0a 20 2a 2f 0d 0a 78 |riables.|.. */..x|
|000001a0| 20 3d 20 61 3b 20 79 20 | 3d 20 30 3b 20 61 32 20 | = a; y |= 0; a2 |
|000001b0| 3d 20 61 2a 61 3b 20 62 | 32 20 3d 20 62 2a 62 3b |= a*a; b|2 = b*b;|
|000001c0| 20 61 32 32 20 3d 20 61 | 32 20 2b 20 61 32 3b 20 | a22 = a|2 + a2; |
|000001d0| 62 32 32 20 3d 20 62 32 | 20 2b 20 62 32 3b 0d 0a |b22 = b2| + b2;..|
|000001e0| 78 64 65 72 69 76 20 3d | 20 62 32 32 2a 61 61 3b |xderiv =| b22*aa;|
|000001f0| 20 79 64 65 72 69 76 20 | 3d 20 4f 4c 3b 20 66 6d | yderiv |= OL; fm|
|00000200| 69 64 20 3d 20 62 32 2f | 34 4c 2d 62 32 2a 61 2b |id = b2/|4L-b2*a+|
|00000210| 61 32 3b 0d 0a 2f 2a 0d | 0a 20 2a 20 20 53 74 65 |a2;../*.|. *  Ste|
|00000220| 70 20 61 6c 6f 6e 67 20 | 59 2d 61 78 69 73 2e 0d |p along |Y-axis..|
|00000230| 0a 20 2a 2f 0d 0a 77 68 | 69 6c 65 20 28 78 64 65 |. */..wh|ile (xde|
|00000240| 72 69 76 3e 79 64 65 72 | 69 76 29 0d 0a 20 7b 0d |riv>yder|iv).. {.|
|00000250| 0a 20 20 20 20 70 6f 69 | 6e 74 73 28 78 63 2c 79 |.    poi|nts(xc,y|
|00000260| 63 2c 78 2c 79 2c 63 69 | 29 3b 0d 0a 20 20 20 20 |c,x,y,ci|);..    |
|00000270| 79 2b 2b 3b 0d 0a 20 20 | 20 20 79 64 65 72 69 76 |y++;..  |  yderiv|
|00000280| 20 2b 3d 20 61 32 32 3b | 0d 0a 20 20 20 20 69 66 | += a22;|..    if|
|00000290| 20 28 66 6d 69 64 3c 4f | 4c 29 20 66 6d 69 64 20 | (fmid<O|L) fmid |
|000002a0| 2b 3d 20 28 79 64 65 72 | 69 76 2b 61 32 29 3b 0d |+= (yder|iv+a2);.|
|000002b0| 0a 20 20 20 20 65 6c 73 | 65 0d 0a 20 20 20 20 20 |.    els|e..     |
|000002c0| 20 20 7b 0d 0a 20 20 20 | 20 20 20 20 20 20 20 78 |  {..   |       x|
|000002d0| 2d 2d 3b 20 78 64 65 72 | 69 76 20 2d 3d 20 62 32 |--; xder|iv -= b2|
|000002e0| 32 3b 0d 0a 20 20 20 20 | 20 20 20 20 20 20 66 6d |2;..    |      fm|
|000002f0| 69 64 20 2b 3d 20 28 79 | 64 65 72 69 76 2b 61 32 |id += (y|deriv+a2|
|00000300| 2d 78 64 65 72 69 76 29 | 3b 0d 0a 20 20 20 20 20 |-xderiv)|;..     |
|00000310| 20 20 7d 0d 0a 20 20 7d | 0d 0a 2f 2a 0d 0a 20 2a |  }..  }|../*.. *|
|00000320| 20 20 20 20 53 74 65 70 | 20 61 6c 6f 6e 67 20 58 |    Step| along X|
|00000330| 2d 61 78 69 73 2e 0d 0a | 20 2a 2f 0d 0a 66 6d 69 |-axis...| */..fmi|
|00000340| 64 20 2b 3d 20 28 33 4c | 2a 28 62 32 2d 61 32 29 |d += (3L|*(b2-a2)|
|00000350| 2f 32 4c 20 2d 20 28 78 | 64 65 72 69 76 2b 79 64 |/2L - (x|deriv+yd|
|00000360| 65 72 69 76 29 29 2f 32 | 4c 3b 0d 0a 77 68 69 6c |eriv))/2|L;..whil|
|00000370| 65 20 28 78 3e 30 29 0d | 0a 20 7b 0d 0a 20 20 20 |e (x>0).|. {..   |
|00000380| 70 6f 69 6e 74 73 20 28 | 78 63 2c 79 63 2c 78 2c |points (|xc,yc,x,|
|00000390| 79 2c 63 69 29 3b 0d 0a | 20 20 20 78 2d 2d 3b 0d |y,ci);..|   x--;.|
|000003a0| 0a 20 20 20 78 64 65 72 | 69 76 20 2d 3d 20 62 32 |.   xder|iv -= b2|
|000003b0| 32 3b 0d 0a 20 20 20 69 | 66 20 28 66 6d 69 64 3e |2;..   i|f (fmid>|
|000003c0| 4f 4c 29 20 66 6d 69 64 | 20 2b 3d 20 28 62 32 2d |OL) fmid| += (b2-|
|000003d0| 78 64 65 72 69 76 29 3b | 0d 0a 20 20 20 65 6c 73 |xderiv);|..   els|
|000003e0| 65 0d 0a 20 20 20 7b 0d | 0a 20 20 20 20 20 20 79 |e..   {.|.      y|
|000003f0| 2b 2b 3b 20 79 64 65 72 | 69 76 20 2b 3d 20 61 32 |++; yder|iv += a2|
|00000400| 32 3b 0d 0a 20 20 20 20 | 20 20 66 6d 69 64 20 2b |2;..    |  fmid +|
|00000410| 3d 20 28 79 64 65 72 69 | 76 2b 62 32 2d 78 64 65 |= (yderi|v+b2-xde|
|00000420| 72 69 76 29 3b 0d 0a 20 | 20 20 7d 0d 0a 20 20 7d |riv);.. |  }..  }|
|00000430| 0d 0a 7d 0d 0a 0d 0a 1a |                         |..}.....|        |
+--------+-------------------------+-------------------------+--------+--------+