File:  [Research Unix] / researchv9 / cmd / emacs / macros / draw-elipse
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:59 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv9-SUN3_old, researchv9-SUN3, HEAD
researchv9-SUN3(old)

track-elipse compute residual distance
 x coordinate of center 
 y coordinate of center 
compute raw differences
���2~=�<X
�#����2~�=�<Y
�#�scale to 100
���4~�3~�3~���00�3~�<X-AXIS
�#��<X-AXIS
�#����4~�3~�3~���00�3~�<Y-AXIS
�#��<Y-AXIS
�#����2~�1~���00|���~�����2~�����
draw-elipse draws an elipse on the screen in the region
��=���=<X
�#�4~�1~�=�<Y
�#�4~�1~��=�now compute the axes
���4~�2~�=�|���~�����2~����<X-AXIS
�#����4~�2~��=�|���~�����2~����<Y-AXIS
�#� position the cursor 
<Y
�#�2~�<X
�#���@�3~��@ The following implements a repeat-until loop 
^�����track-elipse
�|���~�track-elipse
����|���~�track-elipse
�����@ now reflect around X and y axes 
���3~��2~�<X
�#�=�@�3~��2~�<Y
�#��=@�@�~=�<X
�#����

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.