跳转到内容

File:Positional astronomy.svg

页面内容不支持其他语言。
这个文件来自维基共享资源
维基百科,自由的百科全书

原始文件 (SVG文件,尺寸为429 × 375像素,文件大小:16 KB)

生成本图像。


摘要

描述
Català: Versió vectorial generada en metapost de Positional astronomy.png.
English: Metapost-generated vector version of Positional astronomy.png.
日期
来源 Positional astronomy.png
作者 Wmheric
其他版本
Other related versions:[编辑]
SVG开发
InfoField
 
SVG的源代码为有效代码
 
矢量图使用MetaPost创作。
 
 此SVG 文件使用了内嵌文本,可以使用任何文本编辑器轻松翻译
源代码
InfoField

PostScript code

metapost-source
def drawangle(expr A,X,B,r,w,col) =
    draw (X + r*unitvector(A-X))
         { r*unitvector(A-X) rotated 90 }
         ..
         { r*unitvector(B-X) rotated 90 }
         (X + r*unitvector(B-X)) withpen pencircle scaled w withcolor col;
enddef;

def drawcircle(expr X,r,w,col,shade,angle) =
    draw (X + (r,0))..(X + (0,r))..(X - (r,0))..(X - (0,r))..cycle withpen pencircle scaled w withcolor col;
    if shade: fill (X + (r,0))--(X - (r,0))..(X - (0,r))..(X + (r,0))..cycle rotatedaround (X,angle); fi;
enddef;

def drawcircleS(expr X,r,w,col,angle) =
    drawcircle(X,r,w,col,true,angle);
enddef;

s = 2cm;
r = 2.2mm;
path p;
pair A, B, C, D;
pair GEE;  % greatest eastern elongation
pair GWE;  % greatest western elongation
pair EQ;  % eastern quadrature
pair WQ;  % western quadrature
pair Sun;  % position of the Sun, defines the origin
  Sun = (0,0);
pair Earth;  % position of the Earth
pair planet;
numeric GEEangle, GWEangle, EQangle, WQangle, planetangle;
GEEangle = 300;
GWEangle = 60;
EQangle = 311.8103;
WQangle = 48.1897;  % arccos(2/3)

pair Conj;  % conjunction
pair Opp;  % opposition
pair SupConj;  % superior conjunction
pair InfConj;  % inferior conjunction

% draw the circles and define points of interest
for i=0 upto 2:
  A := (s + i*s,0);
  B := A rotated 90;
  C := B rotated 90;
  D := C rotated 90;
  p := A..B..C..D..cycle;
  draw p withpen pencircle scaled 1pt;
  
  if i=1:
    Earth := D;
  fi;
  
  if i=0:
    GEE := D rotated GEEangle;
    GWE := D rotated GWEangle;
  fi;
  
  if i=2:
    EQ := D rotated EQangle;
    WQ := D rotated WQangle;  % arccos(2/3)
  fi;
  
  % naming special points for further labeling references
  if i=0:
    SupConj := B;
    InfConj := D;
  fi;
  if i=2:
    Conj := B;
    Opp := D;
  fi;
endfor;

% draw small circles at points of interest
drawcircleS(Conj,r,1pt,black,180);
drawcircleS(SupConj,r,1pt,black,180);
drawcircleS(Opp,r,1pt,black,0);
drawcircleS(InfConj,r,1pt,black,0);

drawcircle(Earth,2.5mm,1pt,black,false,0);
drawcircleS(GEE,r,1pt,black,GEEangle);
drawcircleS(GWE,r,1pt,black,GWEangle);
drawcircleS(EQ,r,1pt,black,EQangle);
drawcircleS(WQ,r,1pt,black,WQangle);

drawcircle(Sun,1.6mm,1pt,black,false,0);
pair out; out = (0,0.6cm);
pair inlft; inlft = (0,2.5mm) rotated 15;
pair inrt; inrt = (0,2.5mm) rotated (-15);
path q;
for i=0 step 30 until 360:
  q := (inlft--out--inrt) rotated i;
  draw q;
endfor;

numeric planetAngle; planetAngle = 330;
planet := D rotated planetAngle;
drawcircleS(planet,r,1pt,black,planetAngle);

% draw the dashed lines
draw B--D withpen pencircle scaled 1pt dashed evenly;
draw EQ--WQ withpen pencircle scaled 1pt dashed evenly;
draw GEE--Earth--GWE withpen pencircle scaled 1pt dashed evenly;
draw Sun--planet--Earth withpen pencircle scaled 1pt dashed evenly;

% draw the Sun and the Earth
drawangle(Earth,planet,Sun,1.0cm,1pt,black);
drawangle(Sun,Earth,planet,0.7cm,1pt,black);

% labelling
label(btex $\alpha$ etex, planet) shifted (1cm,0.8cm);
label(btex $\varepsilon$ etex, Earth) shifted (-0.8cm,0.6cm);

lbl = 0.2cm;

label.lrt("Earth", Earth) shifted (lbl,-lbl);
label.urt("Sun", Sun) shifted (lbl,3*lbl);

label.bot("Opposition", Opp) shifted (0,-lbl);
label.top("Conjunction", Conj) shifted (0,lbl);
label.top("Superior conjunction", SupConj) shifted (0,lbl);

label.top("Inferior", InfConj) shifted (0,3*lbl);
label.top("conjunction", InfConj) shifted (0,lbl);

label.lrt("Western quadrature", WQ) shifted (0,-lbl);
label.llft("Eastern quadrature", EQ) shifted (0,-lbl);

label.top("Greatest western", GWE) shifted (8*lbl,lbl);
label.top("elongation", GWE) shifted (6*lbl,-lbl);
label.top("Greatest eastern", GEE) shifted (-8*lbl,lbl);
label.top("elongation", GEE) shifted (-6*lbl,-lbl);

% arrows
pair OPO,EO,IPO;
OPO := Conj rotated 32;
EO := Earth rotated (180+42);
IPO := SupConj rotated 80;

pair sft; sft := (-lbl,lbl);

drawarrow ((OPO + 3*sft)--(OPO + sft));
drawarrow ((EO + 10*sft)--(EO + sft));
drawarrow ((IPO + 18*sft)--(IPO + sft));

label.top("Outer planet's", (OPO + 3*sft)) shifted (3*lbl,1.8*lbl);
label.top("orbit", (OPO + 3*sft)) shifted (0,0.5*lbl);

label.top("Earth's orbit", (EO + 10*sft)) shifted (0,0.5*lbl);

label.top("Inner planet's", (IPO + 18*sft)) shifted (0,0.7*lbl);
label.top("orbit", (IPO + 18*sft)) shifted (-3*lbl,-0.5*lbl);
Translate this file This SVG file contains embedded text that can be translated into your language, using any capable SVG editor, text editor or the SVG Translate tool. For more information see: About translating SVG files.
This file is translated using SVG <switch> elements. All translations are stored in the same file! Learn more.

For most Wikipedia projects, you can embed the file normally (without a lang parameter). The Wikipedia will use its language if the SVG file supports that language. For example, the German Wikipedia will use German if the SVG file has German. To embed this file in a particular language use the lang parameter with the appropriate language code, e.g. [[File:Positional astronomy.svg|lang=en]] for the English version. Do not specify a lang parameter if it is not needed. The parameter may prevent the use of a subsequent translation.

To translate the text into your language, you can use the SVG Translate tool. Alternatively, you can download the file to your computer, add your translations using whatever software you're familiar with, and re-upload it with the same name. You will find help in Graphics Lab if you're not sure how to do this.

许可协议

w:zh:知识共享
署名 相同方式共享
您可以自由地:
  • 共享 – 复制、发行并传播本作品
  • 修改 – 改编作品
惟须遵守下列条件:
  • 署名 – 您必须对作品进行署名,提供授权条款的链接,并说明是否对原始内容进行了更改。您可以用任何合理的方式来署名,但不得以任何方式表明许可人认可您或您的使用。
  • 相同方式共享 – 如果您再混合、转换或者基于本作品进行创作,您必须以与原先许可协议相同或相兼容的许可协议分发您贡献的作品。

说明

添加一行文字以描述该文件所表现的内容
太陽系的位置天文學

此文件中描述的项目

描绘内容

image/svg+xml

文件历史

点击某个日期/时间查看对应时刻的文件。

日期/时间缩⁠略⁠图大小用户备注
当前2024年2月5日 (一) 14:452024年2月5日 (一) 14:45版本的缩略图429 × 375(16 KB)ManlleusFile uploaded using svgtranslate tool (https://svgtranslate.toolforge.org/). Added translation for ca.
2019年6月23日 (日) 19:062019年6月23日 (日) 19:06版本的缩略图429 × 375(11 KB)PbrksChange text to sans-serif; changed "inner planet" to "inferior planet" and "outer planet" to "superior planet" per cleanup request
2010年3月30日 (二) 02:552010年3月30日 (二) 02:55版本的缩略图429 × 375(42 KB)Wmhericmistakes found for shading of the planets at opposition and at inferior conjunction
2010年3月30日 (二) 02:452010年3月30日 (二) 02:45版本的缩略图429 × 375(42 KB)Wmhericmetapost generated svg version of Positional_astronomy.png Category:Astronomy sketches

以下3个页面使用本文件:

全域文件用途

以下其他wiki使用此文件:

查看此文件的更多全域用途

元数据