rockbox/apps/plugins/periodic_table.c

665 lines
32 KiB
C

/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
* $Id$
*
* Copyright (C) 2005 Jonathan Bettencourt (jonrelay)
* (C) 2009 Port to Rockbox by: Yifu Huang
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
* KIND, either express or implied.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software Foundation,
* Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
****************************************************************************/
#include "plugin.h"
#include "lib/pluginlib_actions.h"
/* - - - PERIODIC TABLE DATA - - - */
struct periodic_element_t {
int group;
int period;
int number;
char *symbol;
char *name;
char *mass;
char *density;
char *fpoint; /* freezing point */
char *bpoint; /* boiling point */
char block; /* s, p, d, f */
int color; /* in periodic_color_palette below */
uint8_t up; /* index of element "up" from this */
uint8_t down; /* index of element "down" from this */
};
static const struct periodic_element_t periodic_elements[] = {
{ 1, 1, 1, "H", "Hydrogen", "1.00794", "0.0899", "-259.14", "-252.87", 's', 0 , 86, 2},
{ 18, 1, 2, "He", "Helium", "4.002602", "0.1785", "-272.2", "-268.934", 's', 9 , 117, 9},
{ 1, 2, 3, "Li", "Lithium", "6.941", "0.534", "180.54", "1347", 's', 1 , 0, 10},
{ 2, 2, 4, "Be", "Beryllium", "9.012182", "1.848", "1287", "2472", 's', 2 , 87, 11},
{ 13, 2, 5, "B", "Boron", "10.811", "2.34", "2077", "3870", 'p', 5 , 112, 12},
{ 14, 2, 6, "C", "Carbon", "12.0107", "2.250", "3727", "3827", 'p', 6 , 113, 13},
{ 15, 2, 7, "N", "Nitrogen", "14.0067", "1.2506", "-209.86", "-195.8", 'p', 6 , 114, 14},
{ 16, 2, 8, "O", "Oxygen", "15.9994", "1.4291", "-218.4", "-182.96", 'p', 6 , 115, 15},
{ 17, 2, 9, "F", "Fluorine", "18.9984032", "1.696", "-219.62", "-188.14", 'p', 7 , 116, 16},
{ 18, 2, 10, "Ne", "Neon", "20.1797", "0.899990", "-248.67", "-246.048", 'p', 9 , 1, 17},
{ 1, 3, 11, "Na", "Sodium", "22.98976928", "0.971", "97.81", "883", 's', 1 , 2, 18},
{ 2, 3, 12, "Mg", "Magnesium", "24.3050", "1.738", "650", "1095", 's', 2 , 3, 19},
{ 13, 3, 13, "Al", "Aluminum", "26.9815386", "2.6989", "660.323", "2520", 'p', 4 , 4, 30},
{ 14, 3, 14, "Si", "Silicon", "28.0855", "2.329", "1412", "3266", 'p', 5 , 5, 31},
{ 15, 3, 15, "P", "Phosphorus", "30.973762", "1.82", "44.1", "280.5", 'p', 6 , 6, 32},
{ 16, 3, 16, "S", "Sulfur", "32.065", "2.07", "112.8", "444.674", 'p', 6 , 7, 33},
{ 17, 3, 17, "Cl", "Chlorine", "35.453", "3.214", "-100.98", "-34.05", 'p', 7 , 8, 34},
{ 18, 3, 18, "Ar", "Argon", "39.948", "1.7837", "-189.2", "-185.86", 'p', 9 , 9, 35},
{ 1, 4, 19, "K", "Potassium", "39.0983", "0.862", "63.65", "765", 's', 1 , 10, 36},
{ 2, 4, 20, "Ca", "Calcium", "40.078", "1.55", "842", "1503", 's', 2 , 11, 37},
{ 3, 4, 21, "Sc", "Scandium", "44.955912", "2.989", "1539", "2831", 'd', 3 , 102, 38},
{ 4, 4, 22, "Ti", "Titanium", "47.867", "4.54", "1666", "3289", 'd', 3 , 88, 39},
{ 5, 4, 23, "V", "Vanadium", "50.9415", "6.11", "1917", "3420", 'd', 3 , 104, 40},
{ 6, 4, 24, "Cr", "Chromium", "51.9961", "7.20", "1857", "2682", 'd', 3 , 105, 41},
{ 7, 4, 25, "Mn", "Manganese", "54.938045", "7.44", "1246", "2062", 'd', 3 , 106, 42},
{ 8, 4, 26, "Fe", "Iron", "55.845", "7.874", "1536", "2863", 'd', 3 , 107, 43},
{ 9, 4, 27, "Co", "Cobalt", "58.933195", "8.9", "1495", "2930", 'd', 3 , 108, 44},
{ 10, 4, 28, "Ni", "Nickel", "58.6934", "8.902", "1455", "2890", 'd', 3 , 109, 45},
{ 11, 4, 29, "Cu", "Copper", "63.546", "8.96", "1084.62", "2571", 'd', 3 , 110, 46},
{ 12, 4, 30, "Zn", "Zinc", "65.38", "7.13", "419.527", "907", 'd', 3 , 111, 47},
{ 13, 4, 31, "Ga", "Gallium", "69.723", "5.904", "29.7646", "2208", 'p', 4 , 12, 48},
{ 14, 4, 32, "Ge", "Germanium", "72.64", "5.323", "937.4", "2834", 'p', 5 , 13, 49},
{ 15, 4, 33, "As", "Arsenic", "74.92160", "5.73", "817", "603", 'p', 5 , 14, 50},
{ 16, 4, 34, "Se", "Selenium", "78.96", "4.79", "220.2", "684.9", 'p', 6 , 15, 51},
{ 17, 4, 35, "Br", "Bromine", "79.904", "3.12", "-7.2", "58.78", 'p', 7 , 16, 52},
{ 18, 4, 36, "Kr", "Krypton", "83.798", "3.733", "-156.6", "-153.35", 'p', 9 , 17, 53},
{ 1, 5, 37, "Rb", "Rubidium", "85.4678", "1.532", "38.89", "688", 's', 1 , 18, 54},
{ 2, 5, 38, "Sr", "Strontium", "87.62", "2.54", "777", "1414", 's', 2 , 19, 55},
{ 3, 5, 39, "Y", "Yttrium", "88.90585", "4.469", "1520", "3388", 'd', 3 , 20, 70},
{ 4, 5, 40, "Zr", "Zirconium", "91.224", "6.506", "1852", "4361", 'd', 3 , 21, 71},
{ 5, 5, 41, "Nb", "Niobium", "92.90638", "8.57", "2477", "4744", 'd', 3 , 22, 72},
{ 6, 5, 42, "Mo", "Molybdenum", "95.96", "10.22", "2623", "4682", 'd', 3 , 23, 73},
{ 7, 5, 43, "Tc", "Technetium", "[98]", "11.500", "2157", "4265", 'd', 3 , 24, 74},
{ 8, 5, 44, "Ru", "Ruthenium", "101.07", "12.41", "2250", "4155", 'd', 3 , 25, 75},
{ 9, 5, 45, "Rh", "Rhodium", "102.90550", "12.41", "1960", "3697", 'd', 3 , 26, 76},
{ 10, 5, 46, "Pd", "Palladium", "106.42", "12.02", "1552", "2964", 'd', 3 , 27, 77},
{ 11, 5, 47, "Ag", "Silver", "107.8682", "10.50", "961.78", "2162", 'd', 3 , 28, 78},
{ 12, 5, 48, "Cd", "Cadmium", "112.411", "8.65", "321.03", "767", 'd', 3 , 29, 79},
{ 13, 5, 49, "In", "Indium", "114.818", "7.31", "156.5985", "2072", 'p', 4 , 30, 80},
{ 14, 5, 50, "Sn", "Tin", "118.710", "7.31", "231.968", "2603", 'p', 4 , 31, 81},
{ 15, 5, 51, "Sb", "Antimony", "121.760", "6.691", "630.74", "1587", 'p', 5 , 32, 82},
{ 16, 5, 52, "Te", "Tellurium", "127.60", "6.24", "449.8", "991", 'p', 5 , 33, 83},
{ 17, 5, 53, "I", "Iodine", "126.90447", "4.93", "113.6", "184.35", 'p', 7 , 34, 84},
{ 18, 5, 54, "Xe", "Xenon", "131.293", "5.887", "-111.9", "-108.1", 'p', 9 , 35, 85},
{ 1, 6, 55, "Cs", "Caesium", "132.9054519", "1.873", "28.4", "658", 's', 1 , 36, 86},
{ 2, 6, 56, "Ba", "Barium", "137.327", "3.51", "729", "1898", 's', 2 , 37, 87},
{ 2, 9, 57, "La", "Lanthanum", "138.90547", "6.145", "920", "3461", 'd', 3 , 88, 88},
{ 3, 9, 58, "Ce", "Cerium", "140.116", "6.757", "799", "3426", 'f', 10 , 89, 89},
{ 4, 9, 59, "Pr", "Praseodymium", "140.90765", "6.773", "931", "3520", 'f', 10 , 90, 90},
{ 5, 9, 60, "Nd", "Neodymium", "144.242", "7.007", "1021", "3074", 'f', 10 , 91, 91},
{ 6, 9, 61, "Pm", "Promethium", "[145]", "7.220", "1100", "3000", 'f', 10 , 92, 92},
{ 7, 9, 62, "Sm", "Samarium", "150.36", "7.520", "1072", "1791", 'f', 10 , 93, 93},
{ 8, 9, 63, "Eu", "Europium", "151.964", "5.243", "822", "1529", 'f', 10 , 94, 94},
{ 9, 9, 64, "Gd", "Gadolinium", "157.25", "7.9004", "1312", "3266", 'f', 10 , 95, 95},
{ 10, 9, 65, "Tb", "Terbium", "158.92535", "8.229", "1356", "3230", 'f', 10 , 96, 96},
{ 11, 9, 66, "Dy", "Dysprosium", "162.500", "8.550", "1412", "2567", 'f', 10 , 97, 97},
{ 12, 9, 67, "Ho", "Holmium", "164.93032", "8.795", "1474", "2700", 'f', 10 , 98, 98},
{ 13, 9, 68, "Er", "Erbium", "167.259", "9.066", "1529", "2868", 'f', 10 , 99, 99},
{ 14, 9, 69, "Tm", "Thulium", "168.93421", "9.321", "1545", "1950", 'f', 10 , 100, 100},
{ 15, 9, 70, "Yb", "Ytterbium", "173.054", "6.965", "819", "1196", 'f', 10 , 101, 101},
{ 16, 9, 71, "Lu", "Lutetium", "174.9668", "9.840", "1663", "3402", 'd', 10 , 38, 102},
{ 4, 6, 72, "Hf", "Hafnium", "178.49", "13.31", "2233", "4603", 'd', 3 , 39, 103},
{ 5, 6, 73, "Ta", "Tantalum", "180.94788", "16.654", "2985", "5510", 'd', 3 , 40, 104},
{ 6, 6, 74, "W", "Tungsten", "183.84", "19.3", "3407", "5555", 'd', 3 , 41, 105},
{ 7, 6, 75, "Re", "Rhenium", "186.207", "21.02", "3180", "5596", 'd', 3 , 42, 106},
{ 8, 6, 76, "Os", "Osmium", "190.23", "22.57", "3045", "5012", 'd', 3 , 43, 107},
{ 9, 6, 77, "Ir", "Iridium", "192.217", "22.42", "2443", "4437", 'd', 3 , 44, 108},
{ 10, 6, 78, "Pt", "Platinum", "195.084", "21.45", "1769", "3827", 'd', 3 , 45, 109},
{ 11, 6, 79, "Au", "Gold", "196.966569", "19.32", "1064.18", "2857", 'd', 3 , 46, 110},
{ 12, 6, 80, "Hg", "Mercury", "200.59", "13.546", "-38.842", "356.58", 'd', 3 , 47, 111},
{ 13, 6, 81, "Tl", "Thallium", "204.3833", "11.85", "303.5", "1473", 'p', 4 , 48, 112},
{ 14, 6, 82, "Pb", "Lead", "207.2", "11.35", "327.5", "1750", 'p', 4 , 49, 113},
{ 15, 6, 83, "Bi", "Bismuth", "208.98040", "9.747", "271.4", "1561", 'p', 4 , 50, 114},
{ 16, 6, 84, "Po", "Polonium", "[209]", "9.32", "254", "962", 'p', 4 , 51, 115},
{ 17, 6, 85, "At", "Astatine", "[210]", "-", "302", "337", 'p', 8 , 52, 116},
{ 18, 6, 86, "Rn", "Radon", "[222]", "9.73", "-71", "-61.8", 'p', 9 , 53, 117},
{ 1, 7, 87, "Fr", "Francium", "[223]", "2.410", "27", "657", 's', 1 , 54, 0},
{ 2, 7, 88, "Ra", "Radium", "[226]", "5.00", "700", "1140", 's', 2 , 55, 3},
{ 2, 10, 89, "Ac", "Actinium", "[227]", "10.07", "1051", "3200", 'd', 4 , 56, 56},
{ 3, 10, 90, "Th", "Thorium", "232.03806", "11.720", "1750", "4789", 'f', 11 , 57, 57},
{ 4, 10, 91, "Pa", "Protactinium", "231.03588", "15.370", "1567", "4227", 'f', 11 , 58, 58},
{ 5, 10, 92, "U", "Uranium", "238.02891", "18.95", "1132.3", "4172", 'f', 11 , 59, 59},
{ 6, 10, 93, "Np", "Neptunium", "[237]", "20.45", "637", "4000", 'f', 11 , 60, 60},
{ 7, 10, 94, "Pu", "Plutonium", "[244]", "19.84", "639.5", "3231", 'f', 11 , 61, 61},
{ 8, 10, 95, "Am", "Americiam", "[243]", "13.67", "1176", "2607", 'f', 11 , 62, 62},
{ 9, 10, 96, "Cm", "Curium", "[247]", "13.51", "1340", "3110", 'f', 11 , 63, 63},
{ 10, 10, 97, "Bk", "Berkelium", "[247]", "14.78", "986", "-", 'f', 11 , 64, 64},
{ 11, 10, 98, "Cf", "Californium", "[251]", "15.1", "900", "-", 'f', 11 , 65, 65},
{ 12, 10, 99, "Es", "Einsteinium", "[252]", "-", "860", "-", 'f', 11 , 66, 66},
{ 13, 10, 100, "Fm", "Fermium", "[257]", "-", "1527", "-", 'f', 11 , 67, 67},
{ 14, 10, 101, "Md", "Mendelevium", "[258]", "-", "827", "-", 'f', 11 , 68, 68},
{ 15, 10, 102, "No", "Nobelium", "[259]", "-", "827", "-", 'f', 11 , 69, 69},
{ 16, 10, 103, "Lr", "Lawrencium", "[262]", "-", "1627", "-", 'f', 11 , 70, 20},
{ 4, 7, 104, "Rf", "Rutherfordium", "[267]", "-", "-", "-", 'd', 3 , 71, 21},
{ 5, 7, 105, "Db", "Dubnium", "[268]", "-", "-", "-", 'd', 3 , 72, 22},
{ 6, 7, 106, "Sg", "Seaborgium", "[271]", "-", "-", "-", 'd', 3 , 73, 23},
{ 7, 7, 107, "Bh", "Bhorium", "[272]", "-", "-", "-", 'd', 3 , 74, 24},
{ 8, 7, 108, "Hs", "Hassium", "[270]", "-", "-", "-", 'd', 3 , 75, 25},
{ 9, 7, 109, "Mt", "Meitnerium", "[276]", "-", "-", "-", 'd', 3 , 76, 26},
{ 10, 7, 110, "Ds", "Darmstadtium", "[281]", "-", "-", "-", 'd', 3 , 77, 27},
{ 11, 7, 111, "Rg", "Roentgenium", "[280]", "-", "-", "-", 'd', 3 , 78, 28},
{ 12, 7, 112, "Cn", "Copernicium", "[285]", "-", "-", "-", 'd', 3 , 79, 29},
{ 13, 7, 113, "Nh", "Nihonium", "[284]", "-", "-", "-", 'p', 4 , 80, 4},
{ 14, 7, 114, "Fl", "Flerovium", "[289]", "-", "-", "-", 'p', 4 , 81, 5},
{ 15, 7, 115, "Mc", "Moscovium", "[288]", "-", "-", "-", 'p', 4 , 82, 6},
{ 16, 7, 116, "Lv", "Livermorium", "[293]", "-", "-", "-", 'p', 4 , 83, 7},
{ 17, 7, 117, "Ts", "Tennessine", "[294]", "-", "-", "-", 'p', 4 , 84, 8},
{ 18, 7, 118, "Og", "Oganesson", "[294]", "-", "-", "-", 'p', 9 , 85, 1}
};
#define ELEMENTS_COUNT sizeof(periodic_elements)/sizeof(struct periodic_element_t)
/* - - - PERIODIC TABLE VARIABLES - - - */
#if LCD_DEPTH > 1
static unsigned periodic_color_palette[12];
static unsigned int theme_fg, theme_bg;
#endif
static unsigned int periodic_sel = 0;
static int font_height = 0;
/* - - - TINYFONT - - - */
static const long int periodic_tinyfont_bitmaps[] = {
0x00000000, 0x00220200, 0x00550000, 0x00575750, 0x00236200, 0x00514500, 0x00236300, 0x00220000,
0x00244200, 0x00211200, 0x00272720, 0x00027200, 0x00000240, 0x00007000, 0x00000200, 0x00122400,
0x00255200, 0x00262700, 0x00612700, 0x00631600, 0x00571100, 0x00761600, 0x00365200, 0x00712200,
0x00725200, 0x00353100, 0x00020200, 0x00020240, 0x00024200, 0x00070700, 0x00021200, 0x00610200,
0x00254300, 0x00257500, 0x00675600, 0x00344300, 0x00655600, 0x00764700, 0x00746400, 0x00345300,
0x00577500, 0x00722700, 0x00722400, 0x00566500, 0x00444700, 0x00775500, 0x00575500, 0x00255200,
0x00656400, 0x00255300, 0x00656500, 0x00363600, 0x00722200, 0x00555200, 0x00552200, 0x00557700,
0x00522500, 0x00522200, 0x00714700, 0x00322300, 0x00422100, 0x00622600, 0x00250000, 0x00000700,
0x00420000, 0x00063300, 0x00465600, 0x00034300, 0x00135300, 0x00026300, 0x00127200, 0x00035360,
0x00465500, 0x00202200, 0x00202240, 0x00456500, 0x00222200, 0x00067500, 0x00065500, 0x00025200,
0x00065640, 0x00035310, 0x00056400, 0x00032600, 0x00272100, 0x00055300, 0x00057200, 0x00057700,
0x00052500, 0x00055360, 0x00072700, 0x00162100, 0x00222220, 0x00432400, 0x00630000, 0x00525250
};
#if LCD_DEPTH > 1
static void periodic_tinyfont_draw_char(int x, int y, char ch)
{
int i,j;
int r;
long int bmp = periodic_tinyfont_bitmaps[ch-' '];
for (i=7; i>=0; i--) {
r = bmp & 15;
bmp /= 16;
for (j=3; j>=0; j--) {
if (r & 1) {
rb->lcd_drawpixel(x+j, y+i);
}
r /= 2;
}
}
}
static void periodic_tinyfont_draw_string(int x, int y, char * s)
{
char * t = s;
int xx = x;
int yy = y;
while (*t) {
if ((*t) == 10) {
xx = x;
yy += 8;
} else {
periodic_tinyfont_draw_char(xx, yy, *t);
xx += 4;
}
t++;
}
}
#endif
/*
void periodic_tinyfont_draw_chart(int x, int y, ttk_color col)
{
unsigned char ch;
int xx = x;
int yy = y;
for (ch = 32; ch < 128; ch++) {
periodic_tinyfont_draw_char(xx, yy, ch, col);
if ((ch % 16) == 15) {
xx = x;
yy += 8;
} else {
xx += 4;
}
}
}
*/
/* - - - KEYMAP - - - */
static const struct button_mapping *plugin_contexts[] = { pla_main_ctx };
#define PERIODIC_KEY_SELECT PLA_SELECT
#define PERIODIC_KEY_MENU PLA_CANCEL
#define PERIODIC_KEY_BACK PLA_LEFT
#define PERIODIC_KEY_FORWARD PLA_RIGHT
#define PERIODIC_KEY_UP PLA_UP
#define PERIODIC_KEY_DOWN PLA_DOWN
#define PERIODIC_KEY_BACK_RPT PLA_LEFT_REPEAT
#define PERIODIC_KEY_FORWARD_RPT PLA_RIGHT_REPEAT
#define PERIODIC_KEY_UP_RPT PLA_UP_REPEAT
#define PERIODIC_KEY_DOWN_RPT PLA_DOWN_REPEAT
/* - - - SOME CONSTANTS - - - */
#ifdef HAVE_LCD_COLOR
#define PERIODIC_COLOR_BLACK LCD_RGBPACK(0,0,0)
#else
#define PERIODIC_COLOR_BLACK LCD_BLACK
#endif
#ifdef HAVE_LCD_COLOR
#define PERIODIC_COLOR_WHITE LCD_RGBPACK(255,255,255)
#else
#define PERIODIC_COLOR_WHITE LCD_WHITE
#endif
#define CELLSIZE ((LCD_WIDTH-1)/18)
#define NUM_LINE ((LCD_HEIGHT - CELLSIZE * 10 + (CELLSIZE >> 1))/font_height)
#define CELSIUS "\xc2\xb0\x43"
#define CUBIC_CENTIMETER "\x63\x6d\xc2\xb3"
/* - - - PERIODIC TABLE HELPER FUNCTIONS - - - */
static void periodic_makecols(void)
{
#ifdef HAVE_LCD_COLOR
int i = 0;
periodic_color_palette[i++] = LCD_RGBPACK(255,255,255); /* 0 hydrogen */
periodic_color_palette[i++] = LCD_RGBPACK(221,221,221); /* 1 alkali metals */
periodic_color_palette[i++] = LCD_RGBPACK(187,187,187); /* 2 earth metals */
periodic_color_palette[i++] = LCD_RGBPACK(255,204,255); /* 3 transition metals */
periodic_color_palette[i++] = LCD_RGBPACK(255,204,204); /* 4 other metals */
periodic_color_palette[i++] = LCD_RGBPACK(255,204,153); /* 5 metalloids */
periodic_color_palette[i++] = LCD_RGBPACK(255,255,204); /* 6 nonmetals */
periodic_color_palette[i++] = LCD_RGBPACK(204,255,204); /* 7 halogens */
periodic_color_palette[i++] = LCD_RGBPACK(204,204,153); /* 8 astatine */
periodic_color_palette[i++] = LCD_RGBPACK(204,255,255); /* 9 noble gases */
periodic_color_palette[i++] = LCD_RGBPACK(153,204,255); /* 10 lanthanides */
periodic_color_palette[i++] = LCD_RGBPACK(204,153,255); /* 11 actinides */
#elif LCD_DEPTH > 1
int i = 0;
periodic_color_palette[i++] = LCD_WHITE; /* 0 hydrogen */
periodic_color_palette[i++] = LCD_DARKGRAY; /* 1 alkali metals */
periodic_color_palette[i++] = LCD_DARKGRAY; /* 2 earth metals */
periodic_color_palette[i++] = LCD_WHITE; /* 3 transition metals */
periodic_color_palette[i++] = LCD_WHITE; /* 4 other metals */
periodic_color_palette[i++] = LCD_DARKGRAY; /* 5 metalloids */
periodic_color_palette[i++] = LCD_WHITE; /* 6 nonmetals */
periodic_color_palette[i++] = LCD_WHITE; /* 7 halogens */
periodic_color_palette[i++] = LCD_DARKGRAY; /* 8 astatine */
periodic_color_palette[i++] = LCD_WHITE; /* 9 noble gases */
periodic_color_palette[i++] = LCD_DARKGRAY; /* 10 lanthanides */
periodic_color_palette[i++] = LCD_DARKGRAY; /* 11 actinides */
#endif
}
static int periodic_fix_period(int p)
{
/* lanthanides/actinides are periods 9/10 internally, but make them look like 6/7 in the displayed table */
return (p>8)?(p-3):p;
}
static int periodic_fix_group(int g, int p)
{
/* there is no agreed-upon group number for the lanthanides/actinides, but 3 is used sometimes */
return (p>8)?3:g;
}
static char * periodic_group_name(int i)
{
if (i==1) {
return "Noble Gases";
}
else if (periodic_elements[i].period > 8)
{
switch (periodic_elements[i].period)
{
case 9:
return "Lanthanides";
break;
case 10:
return "Actinides";
break;
}
return "";
}
else if (i>1)
{
switch (periodic_elements[i].group) {
case 1:
return "Alkali Metals";
break;
case 2:
return "Alkaline Earth Metals";
break;
case 15:
return "Pnictogens";
break;
case 16:
return "Chalcogens";
break;
case 17:
return "Halogens";
break;
case 18:
return "Noble Gases";
break;
}
}
return "";
}
static void periodic_draw_element(unsigned int i, int bx, int by)
{
int ex = (bx+((periodic_elements[i].group-1) * CELLSIZE));
int ey = (by+((periodic_elements[i].period-1) * CELLSIZE));
#if LCD_DEPTH > 1
int tx, ty;
char tt[4];
#endif
if (periodic_elements[i].period > 8)
ey -= (CELLSIZE >> 1);
if (i == periodic_sel)
{
#if LCD_DEPTH > 1
rb->lcd_set_foreground(PERIODIC_COLOR_BLACK);
#endif
#if LCD_DEPTH > 1
rb->lcd_fillrect(ex, ey, CELLSIZE+1, CELLSIZE+1);
#else
rb->lcd_set_drawmode(DRMODE_FG);
rb->lcd_fillrect(ex, ey, CELLSIZE+1, CELLSIZE+1);
rb->lcd_set_drawmode(DRMODE_SOLID);
#endif
}
else
{
#if LCD_DEPTH > 1
rb->lcd_set_foreground(periodic_color_palette[periodic_elements[i].color]);
rb->lcd_fillrect(ex, ey, CELLSIZE+1, CELLSIZE+1);
rb->lcd_set_foreground(PERIODIC_COLOR_BLACK);
#else
rb->lcd_set_drawmode(DRMODE_BG+DRMODE_INVERSEVID);
rb->lcd_fillrect(ex, ey, CELLSIZE+1, CELLSIZE+1);
rb->lcd_set_drawmode(DRMODE_SOLID);
#endif
rb->lcd_drawrect(ex, ey, CELLSIZE+1, CELLSIZE+1);
}
#if LCD_DEPTH > 1
if (CELLSIZE >= 8) {
rb->strcpy(tt, periodic_elements[i].symbol);
if (rb->strlen(tt) > 2) {
tt[1] = tt[rb->strlen(tt)-1];
tt[2] = 0;
tx = ex + (CELLSIZE >> 1) - 4;
} else if (tt[1] != 0) {
tx = ex + (CELLSIZE >> 1) - 4;
} else {
tx = ex + (CELLSIZE >> 1) - 2;
}
ty = ey + (CELLSIZE >> 1) - 4;
if (i == periodic_sel)
{
rb->lcd_set_foreground(PERIODIC_COLOR_WHITE);
}
else
{
rb->lcd_set_foreground(PERIODIC_COLOR_BLACK);
}
periodic_tinyfont_draw_string(tx, ty, tt);
}
#endif
}
static void periodic_draw_table(void)
{
int bx = (LCD_WIDTH - CELLSIZE * 18) >> 1;
int by = 1;
unsigned int i;
for (i = 0; i < ELEMENTS_COUNT; i++) {
periodic_draw_element(i, bx, by);
}
}
static void periodic_draw(void)
{
char buf[40];
periodic_draw_table();
/* show the info for the current element */
/* X coordinate of name/group */
int nx = (LCD_WIDTH >> 1) - CELLSIZE * 7 + 5;
/* X coordinate of first column */
int fx = 0;
#if LCD_WIDTH >= 220
int sx = (LCD_WIDTH > 220)? 120 : 90;
#endif
/* Y coordinate of first/second top column */
int ty = LCD_HEIGHT - font_height * NUM_LINE;
struct periodic_element_t e;
e = periodic_elements[periodic_sel];
#if LCD_DEPTH > 1
rb->lcd_set_foreground(theme_fg);
#endif
/* display name and group up top */
#if LCD_WIDTH > 160
rb->snprintf(buf, 40, "Name: %s", e.name);
rb->lcd_putsxy(nx, 0, buf);
rb->snprintf(buf, 40, "Group: %d %s", periodic_fix_group(e.group, e.period),
periodic_group_name(periodic_sel));
rb->lcd_putsxy(nx, font_height, buf);
#else
if (NUM_LINE > 0)
{
rb->snprintf(buf, 40, "%s", e.name);
rb->lcd_putsxy(nx, 0, buf);
rb->snprintf(buf, 40, "%d %s", periodic_fix_group(e.group, e.period),
periodic_group_name(periodic_sel));
rb->lcd_putsxy(nx, font_height, buf);
}
else
{
rb->snprintf(buf, 40, "%d %s %s", e.number, e.symbol, e.name);
rb->lcd_putsxy(nx, 0, buf);
rb->snprintf(buf, 40, "%s amu", e.mass);
rb->lcd_putsxy(nx, font_height, buf);
}
#endif
/* first col of info */
if (NUM_LINE >= 8)
{
rb->snprintf(buf, 40, "Number: %d", e.number);
rb->lcd_putsxy(fx, ty, buf);
rb->snprintf(buf, 40, "Symbol: %s", e.symbol);
rb->lcd_putsxy(fx, ty + font_height, buf);
rb->snprintf(buf, 40, "Period: %d", periodic_fix_period(e.period));
rb->lcd_putsxy(fx, ty + font_height*2, buf);
rb->snprintf(buf, 40, "Block: %c", e.block);
rb->lcd_putsxy(fx, ty + font_height*3, buf);
rb->snprintf(buf, 40, "Mass: %s amu", e.mass);
rb->lcd_putsxy(fx, ty + font_height*4, buf);
rb->snprintf(buf, 40, "Density: %s g/%s", e.density, CUBIC_CENTIMETER);
rb->lcd_putsxy(fx, ty + font_height*5, buf);
rb->snprintf(buf, 40, "F Point: %s %s", e.fpoint, CELSIUS);
rb->lcd_putsxy(fx, ty + font_height*6, buf);
rb->snprintf(buf, 40, "B Point: %s %s", e.bpoint, CELSIUS);
rb->lcd_putsxy(fx, ty + font_height*7, buf);
}
else
{
#if LCD_WIDTH >= 220 /* shuld be NUM_LINE >= 4 */
rb->snprintf(buf, 40, "Number: %d", e.number);
rb->lcd_putsxy(fx, ty, buf);
rb->snprintf(buf, 40, "Symbol: %s", e.symbol);
rb->lcd_putsxy(fx, ty + font_height, buf);
rb->snprintf(buf, 40, "Period: %d", periodic_fix_period(e.period));
rb->lcd_putsxy(fx, ty + font_height*2, buf);
rb->snprintf(buf, 40, "Block: %c", e.block);
rb->lcd_putsxy(fx, ty + font_height*3, buf);
#else
if (NUM_LINE >= 4)
{
rb->snprintf(buf, 40, "%d %s P: %d B: %c", e.number, e.symbol,
periodic_fix_period(e.period), e.block);
rb->lcd_putsxy(fx, ty, buf);
rb->snprintf(buf, 40, "M: %s amu", e.mass);
rb->lcd_putsxy(fx, ty + font_height, buf);
rb->snprintf(buf, 40, "D: %s g/%s", e.density, CUBIC_CENTIMETER);
rb->lcd_putsxy(fx, ty + font_height*2, buf);
rb->snprintf(buf, 40, "F/B: %s %s / %s %s", e.fpoint, CELSIUS, e.bpoint, CELSIUS);
rb->lcd_putsxy(fx, ty + font_height*3, buf);
}
else
{
if (NUM_LINE >= 1)
{
rb->snprintf(buf, 40, "%d %s %s amu", e.number, e.symbol, e.mass);
rb->lcd_putsxy(fx, ty, buf);
}
if (NUM_LINE >= 2)
{
rb->snprintf(buf, 40, "D: %s g/%s", e.density, CUBIC_CENTIMETER);
rb->lcd_putsxy(fx, ty + font_height, buf);
}
if (NUM_LINE >= 3)
{
rb->snprintf(buf, 40, "F/B: %s %s / %s %s", e.fpoint, CELSIUS, e.bpoint, CELSIUS);
rb->lcd_putsxy(fx, ty + font_height*2, buf);
}
}
#endif
}
/* second col of info */
#if LCD_WIDTH >= 220
if (NUM_LINE < 8)
{
rb->snprintf(buf, 40, "Mass: %s amu", e.mass);
rb->lcd_putsxy(sx, ty, buf);
rb->snprintf(buf, 40, "Density: %s g/%s", e.density, CUBIC_CENTIMETER);
rb->lcd_putsxy(sx, ty + font_height, buf);
rb->snprintf(buf, 40, "F Point: %s %s", e.fpoint, CELSIUS);
rb->lcd_putsxy(sx, ty + font_height*2, buf);
rb->snprintf(buf, 40, "B Point: %s %s", e.bpoint, CELSIUS);
rb->lcd_putsxy(sx, ty + font_height*3, buf);
}
#endif
}
enum plugin_status plugin_start(const void* parameter)
{
(void)parameter;
periodic_sel = 0;
periodic_makecols();
#if LCD_DEPTH > 1
theme_fg=rb->lcd_get_foreground();
theme_bg=rb->lcd_get_background();
#endif
struct font *pf = rb->font_get(FONT_UI);
font_height = pf->height;
while (1) {
#if LCD_DEPTH > 1
rb->lcd_set_background(theme_bg);
#endif
rb->lcd_clear_display();
periodic_draw();
rb->lcd_update();
int button = pluginlib_getaction(-1, plugin_contexts, ARRAYLEN(plugin_contexts));
switch (button)
{
case PERIODIC_KEY_SELECT:
break;
case PERIODIC_KEY_MENU:
return PLUGIN_OK;
break;
case PERIODIC_KEY_BACK:
case PERIODIC_KEY_BACK_RPT:
if (periodic_sel > 0)
{
periodic_sel--;
}
else
{
periodic_sel = ELEMENTS_COUNT - 1;
}
break;
case PERIODIC_KEY_FORWARD:
case PERIODIC_KEY_FORWARD_RPT:
if (periodic_sel < ELEMENTS_COUNT - 1)
{
periodic_sel++;
}
else
{
periodic_sel = 0;
}
break;
case PERIODIC_KEY_UP:
case PERIODIC_KEY_UP_RPT:
periodic_sel=periodic_elements[periodic_sel].up;
break;
case PERIODIC_KEY_DOWN:
case PERIODIC_KEY_DOWN_RPT:
periodic_sel=periodic_elements[periodic_sel].down;
break;
default:
if (rb->default_event_handler(button) == SYS_USB_CONNECTED) {
return PLUGIN_USB_CONNECTED;
}
break;
}
}
return PLUGIN_OK;
}