Berkas:Periodic_table,_good_SVG.svg
From Wikipedia, the free encyclopedia
Ukuran asli (Berkas SVG, secara nominal 1.176 × 800 piksel, besar berkas: 20 KB)
Berkas ini berasal dari Wikimedia Commons dan mungkin digunakan oleh proyek-proyek lain. Deskripsi dari halaman deskripsinya ditunjukkan di bawah ini.
Ringkasan
DeskripsiPeriodic table, good SVG.svg |
English: A by-product of File:Monoisotopic, mononuclidic, radioactive elements.svg with more classical proportions of element cells, but without information about isotopes. These Perl programs generate a good, structured SVG code and may be modified further to create more sentient images that this concrete table.
Elements:
|
||
Tanggal | |||
Sumber | Karya sendiri | ||
Pembuat | Incnis Mrsi | ||
Versi lainnya | |||
SVG genesis InfoField | Gambar vektor ini dibuat menggunakan unknown tool This file uses embedded text that can be easily translated using a text editor.
|
Source code
See File:Monoisotopic, mononuclidic, radioactive elements.svg for definition of the @elements
array.
sub start_box {
my $fill="";
$fill=' style="fill:'.$_[2].'"' if ($_[2]);
print "<g> <rect$fill x=\"".(16*$_[1]-15)."\" width=\"14\" y=\"".($_[0]-19)."\" height=\"18\"/> ";
};
sub make_text {
my $cl="";
$cl=' class="'.$_[3].'"' if ($_[3]);
print "<text$cl x=\"".$_[0]."\" y=\"".$_[1]."\">".$_[2]."</text> ";
};
sub smart_symbol {
make_text ($_[0], $_[1], $_[2], (length($_[2])>2)?"smallsym":"sym");
};
sub smart_number {
my $x = $_[0] - 3;
my $cl = "num";
if ( $_[2] >=100 ) { $cl = "smallnum"; $x -= 3; }
elsif ( $_[2] >=10 ) { $x -= 3; };
make_text ($x, $_[1], $_[2], $cl);
};
sub print_Z {
my $ref = $elements[$_[0]];
return unless $ref;
my $intro;
my $base_y = 20 * $ref->[1];
my $group = $ref->[2];
if ($group == 1) { # First element in a period
$intro = $ref->[1];
}
elsif (!$group) {
if ( $ref->[1] == 6) { # Lanthanoid
if ($_[0] == 57) { # Lanthanum
start_box($base_y, 3); make_text (37, $base_y-10, "*", "sym"); print "</g>";
$intro = "* lanthanoids";
};
$base_y = 174;
$group = $_[0] - 54;
}
elsif ( $ref->[1] == 7) { # Actinoid
if ($_[0] == 89) { # Actinium
start_box($base_y, 3); make_text (35, $base_y-10, "**", "sym"); print "</g>";
$intro = "** actinoids";
};
$base_y = 194;
$group = $_[0] - 86;
}
else { return; };
};
if ($intro) {
print "\n";
make_text (-5, $base_y-4, $intro) if ($intro);
print "\n";
};
my $background = $ref->[3];
# this version is not focused on nuclides, recycling some stuff
if ( $background =~ /\#FF00/ ) {
# we classify all unstable elements to nanural, marginally natural and unnatural in this version
if ( $ref->[5] eq "0" ) {
$background = '#CC00FF'; # I said: no natural isotopes
}
else {
$background = (($_[0] == 90)||($_[0] == 92))?'#FF3333' # Th, U
:'#FF33FF'; # marginally natural
};
}
else {
$background =~ s/\#..FF../\#FFFFFF/;
};
start_box ($base_y, $group, $background);
# no check for natural radionuclides in this version
smart_number (16*$group-8, $base_y-5, $_[0]); # Atomic number
smart_symbol (16*$group-13, $base_y-11, $ref->[0]); # Symbol
# no mass numbers in this version
print "</g>\n"; # end box
};
print "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\
<!DOCTYPE svg PUBLIC \"-//W3C//DTD SVG 1.1//EN\" \"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd\">\
<svg xmlns=\"http://www.w3.org/2000/svg\" xml:space=\"preserve\" width=\"1176\" height=\"800\" viewBox=\"-5 -6 294 200\"\
xmlns:xlink=\"http://www.w3.org/1999/xlink\">\
<!-- see http://commons.wikimedia.org/wiki/File:Periodic_table,_good_SVG.svg for more information about the file -->
<defs>\
<style type=\"text/css\">\
<![CDATA[\
rect {stroke:#666666; stroke-width:1px; fill:none} /* for cells */\
text {fill:#000000; font-family:sans; font-size:5px; stroke:none} /* periods and groups */\
.sym {font-family:serif; font-size:7px}\
.smallsym {font-family:serif; font-size:5.5px} /* Uu? */\
.num {font-size:4px} /* up to 99 */\
.smallnum {font-size:3px} /* 100 and greater */\
]]>\
</style>\
</defs>\n\n";
my $group;
make_text ( 6, -1, 1);
make_text (22, 18, 2);
for ( $group=3; $group<=12; $group++) { make_text(16*$group-10, 58, $group); };
for ($group=13; $group<=17; $group++) { make_text(16*$group-12, 18, $group); };
make_text (276, -1, 18);
my $Z;
for ($Z=1; $Z<=119; $Z++) { print_Z ($Z); };
print "</svg>\n";
Lisensi
Diizinkan untuk menyalin, mendistribusikan dan/atau memodifikasi dokumen ini di bawah syarat-syarat Lisensi Dokumentasi Bebas GNU, Versi 1.2 atau lebih baru yang diterbitkan oleh Free Software Foundation; tanpa Bagian Invarian, tanpa Teks Sampul Depan, dan tanpa Teks Sampul Belakang. Salinan lisensi dimasukkan ke bagian yang berjudul Lisensi Dokumentasi Bebas GNU.http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue |
- Anda diizinkan:
- untuk berbagi – untuk menyalin, mendistribusikan dan memindahkan karya ini
- untuk menggubah – untuk mengadaptasi karya ini
- Berdasarkan ketentuan berikut:
- atribusi – Anda harus mencantumkan atribusi yang sesuai, memberikan pranala ke lisensi, dan memberi tahu bila ada perubahan. Anda dapat melakukannya melalui cara yang Anda inginkan, namun tidak menyatakan bahwa pemberi lisensi mendukung Anda atau penggunaan Anda.
- berbagi serupa – Apabila Anda menggubah, mengubah, atau membuat turunan dari materi ini, Anda harus menyebarluaskan kontribusi Anda di bawah lisensi yang sama seperti lisensi pada materi asli.
Items portrayed in this file
menggambarkan
22 Oktober 2012
image/svg+xml
Riwayat berkas
Klik pada tanggal/waktu untuk melihat berkas ini pada saat tersebut.
Tanggal/Waktu | Miniatur | Dimensi | Pengguna | Komentar | |
---|---|---|---|---|---|
terkini | 9 Oktober 2020 16.54 | 1.176 × 800 (20 KB) | Burzuchius | Reverted to version as of 13:09, 11 November 2018 (UTC) | |
21 September 2020 14.26 | 1.176 × 800 (21 KB) | Once4O4 | Reverted to version as of 11:40, 30 November 2016 (UTC) | ||
11 November 2018 13.09 | 1.176 × 800 (20 KB) | TilmannR | Am (95), Cm (96), Bk (97), and Cf (98) are purely synthetic. Uue (119) has not yet been synthesized. (Wikipedia illustration workshop request) | ||
30 November 2016 11.40 | 1.176 × 800 (21 KB) | Wiki LIC | IUPAC 2016/11/28 actualization: Uut>>Nh Uup>>Mc Uus>>Ts Uuo>>Og | ||
22 Oktober 2012 21.51 | 1.176 × 800 (21 KB) | Incnis Mrsi | corrected in line with w: Synthetic element | ||
22 Oktober 2012 19.10 | 1.176 × 784 (21 KB) | Incnis Mrsi | == {{int:filedesc}} == {{Information |Description ={{en|1=A by-product of File:Monoisotopic, mononuclidic, radioactive elements.svg with more classical proportions of element cells, but without information about isotopes. This concrete SVG imag... |
Penggunaan berkas
Halaman berikut menggunakan berkas ini:
Penggunaan berkas global
Wiki lain berikut menggunakan berkas ini:
- Penggunaan pada ar.wikipedia.org
- Penggunaan pada ast.wikipedia.org
- Penggunaan pada en.wikipedia.org
- Penggunaan pada es.wikipedia.org
- Penggunaan pada fa.wikipedia.org
- Penggunaan pada hr.wikipedia.org
- Penggunaan pada mk.wikipedia.org
- Penggunaan pada my.wikipedia.org
- Penggunaan pada ro.wikipedia.org
- Penggunaan pada ru.wikipedia.org
- Penggunaan pada sv.wikipedia.org
- Penggunaan pada ta.wikipedia.org
- Penggunaan pada tr.wikipedia.org
- Penggunaan pada vi.wikipedia.org
Metadata
Berkas ini mengandung informasi tambahan yang mungkin ditambahkan oleh kamera digital atau pemindai yang digunakan untuk membuat atau mendigitalisasi berkas. Jika berkas ini telah mengalami modifikasi, rincian yang ada mungkin tidak secara penuh merefleksikan informasi dari gambar yang sudah dimodifikasi ini.
Lebar | 1176 |
---|---|
Tinggi | 800 |