// mz_sky_tour1.ssc
// v.06.SE 2024-04-16 - 2024-04-24
// for app Stellarium 24.1 by Magnus Zeisig
// This script animates how the starry sky changes in a year and in a day, and zooms in constellations.
// Detailed description, installation and tweaks at the end of the script.

//TODO
//LOG
// 2024-04-24 Adjusted planet presentation animation
// 2024-04-24 Adjusted constellation presentation animation
// 2024-04-24 Updated documentation for new options
// 2024-04-24 Removed unused variable and renamed variable for consistency
// 2024-04-24 Added LOG and TODO section
// 2024-04-23 Added functionality to zoom in on and present planets
// 2024-04-22 Added functionality to present (bright) stars
// 2024-04-21 Added lists of (bright) stars HIP numbera
// 2024-04-21 Simplified constellation above horizon check
// 2024-04-20 Restructured code and made repeats into functions
// 2024-04-19 Renamed many variables for better readability
// 2024-04-18 Added settings parameters and documentation
// 2024-04-17 Added functionality to present constellations over the horizon
// 2024-04-16 Created this script with functionality to present changes over year and day

// SETTINGS
"use strict!"; // not implemented in SSC
var obsLatD, obsLonD, obsAltM, obsDatetime0, obsTime0, viewAziD, showEarth, timeSYs, timeSDs, timeSC, timeSS, timeSP, conAltDMin, starAltDMin, starMax, planetAltDMin, planetMagMax, planetFovD, planetMax, grpHi, repHi;
var conData, planetData, repHo, textI11, textI12, textI13, textI14, textI15, textI16;
var rep, labeled, jDay, textI0s, d, conIHi, conI, con, obj, hipIHi, hipI, star, planetIHi, planetI, planet;
obsLatD = 59.341451; // observer latitude (°)
obsLonD = 18.054668; // observer longitude (°)
obsAltM = 47.0; // observer altitude (m)
obsDatetime0 = '2024-04-20T22:00:00'; // observation datetime yyyy-mm-ddTHH:MM:SS, present if unset
obsTime0 = '20:00:00'; // daily observation time point (local HH:MM:SS)
viewAziD = 0.0; // view default azimuth (°)
showEarth = true; // show terrain and atmospheric effects when true, default true
timeSYs = [60.0, 60.0]; // time (s) for changes over a year, without and with legends, 0 = off, 60 = default
timeSDs = [60.0, 60.0]; // time (s) for changes over a day, without and with legends, 0 = off, 60 = default
timeSC = 5.0; // time (s) for (9) change events in (each) constellation presentation, 0 = off, 5 = default
timeSS = 5.0; // time (s) for presenting a star, 0 = off, 5 = default
timeSP = 5.0; // time (s) for (8) change events in (each) solar system object presentation, 0 = off, 5 = default
conAltDMin = 10; // lower altitude (°) limit for presented constellations
starAltDMin = 5; // lower altitude (°) limit for presented stars
starMax = 12; // max number of stars presented per constellation, 0 = off, 12 = default/max
planetAltDMin = 1; // lower altitude (°) limit for presented solar system objects
planetMagMax = 8.0; // max visual magnitude of solar system objects presented, 8 = default
planetFovD = 10; // field of vision (°) for presented solar system objects
planetMax = 20; // max number of solar system objects presented, 0 = off, 1 = Sun, 2 = +Moon, 9 = +planets, 20 = +asteroids, default/max
grpHi = 4; // number of groups in constellation presentations
repHi = 1; // number of presentation repeats, 0 = infinite

// FUNCTIONS
function addText0(texts) {
    var fontSize, fontColor, is, tHi, t, u, v;
    fontSize = 48;
    fontColor ="#ffcc00";
    is = [];
    tHi = texts.length;
    v = core.getScreenHeight() * 0.5 - fontSize * 0.625 * tHi;
    for (t = 0; t < tHi; t++) {
        u = core.getScreenWidth() * 0.5 - fontSize * 0.25 * texts[t].length;
        is.push(LabelMgr.labelScreen(texts[t], u, v, true, fontSize, fontColor));
        v += fontSize * 1.25;
    }
    return is;
}
function remText0(is) {
    var tHi, t;
    tHi = is.length;
    for (t = 0; t < tHi; t++)
        LabelMgr.deleteLabel(is[t]);
}
function setText2Con(con, obj) {
    LabelMgr.setLabelText(textI13, 'Stjärnbild: ' + con.sv + ' / ' + con.en + ' (' + obj.iauConstellation + ')');
    LabelMgr.setLabelText(textI14, 'totalmagnitud: ' + con.mag + ', yta (°^2): ' + con.area);
    LabelMgr.setLabelText(textI15, 'år ' + con.year + ' av ' + con.by);
    LabelMgr.setLabelText(textI16, con.desc);
}
function setText2Star(star) {
    var txt;
    txt = 'Stjärna: ' + star['localized-name'];
    if (star['localized-name'] != star.name)
        txt += ' (' + star.name + ')';
    LabelMgr.setLabelText(textI13, txt);
    LabelMgr.setLabelText(textI14, 'magnitud, visuell: ' + star.vmag.toFixed(2) + ', absolut: ' + star['absolute-mag'].toFixed(2));
    LabelMgr.setLabelText(textI15, 'spektralklass: ' + star['spectral-class']);
    txt = 'avstånd: ' + star['distance-ly'].toFixed(1) + ' ljusår';
    if (!isNaN(star.parallax - parseFloat(star.parallax)))
        txt += ', ' + (1 / star.parallax).toFixed(1) + ' parsec';
    LabelMgr.setLabelText(textI16, txt);
}
function setText2Planet(planet, obj) {
    if (!obj['phase-angle-deg'])
        obj['phase-angle-deg'] = '0.0°';
    if (!obj.phase)
        obj.phase = 1.0;
    LabelMgr.setLabelText(textI13, 'Himlakropp (' + planet.type + '): ' + planet.sv + ' (i stjärnbilden ' + obj.iauConstellation + ')');
    LabelMgr.setLabelText(textI14, 'visuell magnitud: ' + obj.vmag.toFixed(2) + ', fasvinkel: ' + Number(obj['phase-angle-deg'].replace('°', '')).toFixed(0) + '°, belyst yta: ' + (obj.phase * 100.0).toFixed(0) +'%');
    LabelMgr.setLabelText(textI15, 'avstånd: ' + obj.distance.toFixed(6) + ' au, ' + (obj['distance-km'] * 0.000001).toFixed(3) + ' M km');
    LabelMgr.setLabelText(textI16, planet.desc);
}
function resetText2() {
    LabelMgr.setLabelText(textI13, '');
    LabelMgr.setLabelText(textI14, '');
    LabelMgr.setLabelText(textI15, '');
    LabelMgr.setLabelText(textI16, '');
}
function formatNow() {
    return core.getDate(spec = 'local').substring(0, 16).replace('T', ' kl ');
}
function setEnvironment(set) {
    var landscape, conLabel, starScale, fps, fov;
    if (set) {
        landscape = 'Zero Horizon';
        conLabel = 0; // abbreviated
        starScale = 2.5;
        fps = 30.0;
        fov = 180.0;
    }
    else {
        landscape = 'Guereins';
        conLabel = 2; // translated
        starScale = 1.0;
        fps = 18.0;
        fov = 60.0;
    }
    CustomObjectMgr.removeCustomObjects();
    LandscapeMgr.setCurrentLandscapeName(landscape, changeLocationDuration = 1.0);
    ConstellationMgr.setFlagLines(false);
    ConstellationMgr.setFlagLabels(false);
    ConstellationMgr.setConstellationDisplayStyle(conLabel);
    ConstellationMgr.setFlagBoundaries(false);
    ConstellationMgr.setFlagArt(false);
    StelMovementMgr.zoomTo(fov, 1.0);
    Satellites.setFlagHintsVisible(!set);
    NebulaMgr.setFlagHints(!set);
    StarMgr.setFlagLabels(!set);
    SolarSystem.setFlagPlanets(true);
    SolarSystem.setFlagLabels(!set);
    MeteorShowers.setEnableMarker(true);
    MeteorShowers.setEnableLabels(!set);
    StelSkyDrawer.setAbsoluteStarScale(starScale);
    StelSkyDrawer.setFlagStarSpiky(set);
    StelSkyDrawer.setFlagTwinkle(!set);
    SpecialMarkersMgr.setFlagFOVCenterMarker(set);
    SpecialMarkersMgr.setFlagFOVCircularMarker(set);
    core.setGuiVisible(!set);
    core.setMinFps(fps);
    LabelMgr.deleteAllLabels();
}
function setEarth(show) {
    LandscapeMgr.setFlagLandscape(show);
    LandscapeMgr.setFlagAtmosphere(show);
    GridLinesMgr.setFlagHorizonLine(!show);
}
function setLabels(set) {
    ConstellationMgr.setFlagLines(set);
    ConstellationMgr.setFlagLabels(set);
    SolarSystem.setFlagLabels(set);
    MeteorShowers.setEnableLabels(set);
}
function setDatetime(datetime) {
    if (datetime)
        core.setDate(datetime, spec = 'local', dateIsDT = false);
    else
        core.setRealTime();
    core.setTimeRate(0.0);
}

// DATA
conData = [
    {i: 1, en: "Canis Major", sv: "Stora hunden", mag: -1.82, lum: 5.37, area: 380, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [32349, 33579, 34444, 30324, 35904, 30122, 33977, 33856, 32759, 33152, 31592, 35037], desc: "hund, Europas, Prokris eller Cephalus Laelaps, eller Orions Sirius, Orion-kretsen i grekisk mytologi"},
    {i: 2, en: "Centaurus", sv: "Kentauren", mag: -1.58, lum: 4.34, area: 1060, fov: 50, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [71683, 68702, 71681, 68933, 66657, 71352, 59196, 68002, 65109, 61932, 56561, 73334], desc: "kentauren Kiron, Herakles-kretsen i grekisk mytologi"},
    {i: 3, en: "Orion", sv: "Orion", mag: -1.42, lum: 3.72, area: 594, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [24436, 27989, 25336, 26311, 26727, 27366, 25930, 26241, 22449, 25281, 26207, 24674], desc: "jägare och halvgud, jagade bl.a. Plejaderna, Orion-kretsen i grekisk mytologi"},
    {i: 4, en: "Carina", sv: "Kölen", mag: -1.41, lum: 3.71, area: 494, fov: 35, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [30438, 45238, 41037, 45556, 52419, 48002, 50099, 51576, 50371, 45080, 38827, 47854], desc: "del av skeppet Argo Navis, Jason-kretsen i grekisk mytologi"},
    {i: 5, en: "Scorpius", sv: "Skorpionen", mag: -1.00, lum: 2.54, area: 497, fov: 45, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [80763, 85927, 86228, 82396, 78401, 86670, 78820, 85696, 81266, 78265, 87073, 82514], desc: "dödade Orion eller Faeton, Orion-kretsen i grekisk mytologi, 8:e i zodiaken"},
    {i: 6, en: "Taurus", sv: "Oxen", mag: -0.88, lum: 2.28, area: 797, fov: 45, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [21421, 25428, 17702, 26451, 18724, 20894, 20889, 17847, 15900, 20205, 17499, 20455], desc: "guden Zeus som tjuren som förde bort prinsessan Europa, Orion-kretsen i grekisk mytologi, 2:a i zodiaken"},
    {i: 7, en: "Ursa Major", sv: "Story björnen", mag: -0.88, lum: 2.26, area: 1280, fov: 60, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [62956, 67301, 54061, 65378, 53910, 58001, 54539, 50801, 44127, 46853, 59774, 41704], desc: "nymfen Kallisto som förfördes av guden Zeus och gjordes till björn av gudinnan Hera, Ursa-kretsen i grekisk mytologi"},
    {i: 8, en: "Eridanus", sv: "Eridanus", mag: -0.87, lum: 2.24, area: 1138, fov: 80, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [7588, 23875, 18543, 13847, 17378, 20042, 10602, 9007, 16537, 15474, 21393, 13701], desc: "floden Po eller spår efter Faethons åktur med solguden Helions vagn i grekisk mytologi"},
    {i: 9, en: "Bootes", sv: "Björnvaktaren", mag: -0.80, lum: 2.10, area: 907, fov: 45, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [69673, 72105, 67927, 71075, 74666, 73555, 71053, 70497, 67459, 69732, 75411, 71795], desc: "halvgud och plöjare, son till Demeter, Ursa-kretsen i grekisk mytologi"},
    {i: 10, en: "Auriga", sv: "Kusken", mag: -0.74, lum: 2.00, area: 657, fov: 35, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [24608, 28360, 28380, 23015, 23416, 23767, 23453, 28358, 27673, 29696, 28404, 27483], desc: "hjälten och kusken Erichtonius eller Myrtilos i grekisk mytologi"},
    {i: 11, en: "Cygnus", sv: "Svanen", mag: -0.72, lum: 1.97, area: 804, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [102098, 100453, 102488, 104732, 95947, 104060, 95853, 94779, 99675, 98110, 99848, 106481], desc: "guden Zeus som svanen som förförde Leda, Olympen-kretsen i grekisk mytologi"},
    {i: 12, en: "Vela", sv: "Seglet", mag: -0.66, lum: 1.86, area: 500, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [39953, 42913, 44816, 45941, 52727, 46701, 48774, 42536, 44511, 42570, 50191, 43023], desc: "del av skeppet Argo Navis, Jason-kretsen i grekisk mytologi"},
    {i: 13, en: "Sagittarius", sv: "Skytten", mag: -0.65, lum: 1.84, area: 867, fov: 45, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [90185, 92855, 89931, 90496, 94141, 88635, 89642, 92041, 93506, 93864, 93085, 93683], desc: "bågskytt, kentauren Kiron eller satyren Krotos i grekisk mytologi, 9:e i zodiaken-kretsen"},
    {i: 14, en: "Puppis", sv: "Akterskeppet", mag: -0.61, lum: 1.77, area: 673, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [39429, 39757, 32768, 31685, 36377, 38170, 37819, 38414, 37677, 38518, 38835, 37229], desc: "del av skeppet Argo Navis, Jason-kretsen i grekisk mytologi"},
    {i: 15, en: "Gemini", sv: "Tvillingarna", mag: -0.55, lum: 1.67, area: 514, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [37826, 36850, 31681, 30343, 32246, 32362, 35550, 37740, 35350, 33018, 36046, 34088], desc: "dioskurerna Kastor och Polydeukes, Olympen i grekisk mytologi, 3:e i zodiaken-kretsen"},
    {i: 16, en: "Hercules", sv: "Herkules", mag: -0.51, lum: 1.62, area: 1225, fov: 45, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [80816, 81693, 84379, 84380, 84345, 86974, 81833, 87933, 80170, 86414, 88794, 87808], desc: "hjälten Herakles, Herakles-kretsen i grekisk mytologi"},
    {i: 17, en: "Perseus", sv: "Perseus", mag: -0.50, lum: 1.60, area: 615, fov: 35, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [15863, 14576, 18246, 14328, 18532, 14354, 17529, 14668, 13268, 13531, 18614, 19343], desc: "hjälte som dödade Medusa och Cetus, och räddade Andromeda, Perseus-kretsen i grekisk mytologi"},
    {i: 18, en: "Leo", sv: "Lejonet", mag: -0.48, lum: 1.57, area: 947, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [49669, 57632, 50583, 54872, 47908, 54879, 50335, 49583, 47508, 51624, 48455, 55434], desc: "Nemeiska lejonet dräpt av Herakles, Herakles-kretsen i grekisk mytologi, 5:e i zodiaken"},
    {i: 19, en: "Hydra", sv: "Vattenormen", mag: -0.44, lum: 1.52, area: 1303, fov: 90, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [46390, 64962, 52943, 43813, 68895, 56343, 49841, 51069, 45336, 47431, 41307, 48356], desc: "vattenormen i Apollons bägare eller monstret Hydra dräpt av Herakles, Herakles-kretsen i grekisk mytologi"},
    {i: 20, en: "Virgo", sv: "Jungfrun", mag: -0.44, lum: 1.51, area: 1294, fov: 65, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [65474, 63608, 63090, 66249, 61941, 57757, 72220, 71957, 60129, 57380, 69701, 58948], desc: "gudinnan Demeter, Justitia, Astraia, Persefone eller kvinnan Erigone, Olympen-kretsen i grekisk mytologi, 6:e i zodiaken"},
    {i: 21, en: "Ophiuchus", sv: "Ormbäraren", mag: -0.43, lum: 1.51, area: 948, fov: 60, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [86032, 84012, 81377, 79593, 86742, 83000, 79882, 84970, 88048, 88771, 87108, 80883], desc: "läkekonstguden Asklepios, guden Apollons strid mot orm, eller den trojanske prästen Laokoon, Olympen-kretsen i grekisk mytologi"},
    {i: 22, en: "Draco", sv: "Draken", mag: -0.43, lum: 1.50, area: 1083, fov: 60, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [87833, 80331, 85670, 94376, 83895, 75458, 89937, 68756, 87585, 56211, 61281, 78527], desc: "drake, en Gigant, Ladon eller Gaias och Tyfons son, Herakles-kretsen i grekisk mytologi"},
    {i: 23, en: "Crux", sv: "Södra korset", mag: -0.36, lum: 1.41, area: 68, fov: 10, by: "nederländske Petrus Plancius", year: 1598, hips: [62434, 60718, 61084, 59747, 60260, 63003, 60009, 59072, 58758, 63007, 62327, 62268], desc: "kristet"},
    {i: 24, en: "Lyra", sv: "Lyran", mag: -0.34, lum: 1.38, area: 286, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [91262, 93194, 92420, 92862, 92791, 89826, 91971, 94713, 94481, 92088, 93279, 93408], desc: "Halvguden Orfeus lyra, Olympen-kretsen i grekisk mytologi"},
    {i: 25, en: "Aquila", sv: "Örnen", mag: -0.32, lum: 1.35, area: 652, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [97649, 97278, 93747, 99473, 95501, 93805, 98036, 97804, 93244, 93429, 101847, 96468], desc: "Zeus örn som förde bort Ganymedes, Olympen-kretsen i grekisk mytologi"},
    {i: 26, en: "Pegasus", sv: "Pegasus", mag: -0.31, lum: 1.34, area: 1121, fov: 60, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [107315, 113881, 113963, 1067, 112158, 112029, 109427, 112748, 109176, 112440, 105502, 112447], desc: "bevingad häst riden av Bellerofon och Perseus, Perseus-kretsen i grekisk mytologi"},
    {i: 27, en: "Cassiopeia", sv: "Kassiopeia", mag: -0.26, lum: 1.28, area: 598, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [4427, 3179, 746, 6686, 8886, 2920, 9598, 2599, 5542, 3504, 117863, 4422], desc: "etiopisk drottning, mor till Andromeda, Perseus-kretsen i grekisk mytologi"},
    {i: 28, en: "Andromeda", sv: "Andromeda", mag: -0.24, lum: 1.26, area: 722, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [5447, 677, 9640, 3092, 7607, 116584, 4436, 3693, 7513, 116805, 116631, 3031], desc: "etiopisk prinsessa som kedjades för att offras till Cetus, Perseus-kretsen i grekisk mytologi"},
    {i: 29, en: "Cetus", sv: "Valfisken", mag: -0.24, lum: 1.26, area: 1231, fov: 60, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [3419, 14135, 8102, 5364, 12706, 1562, 6537, 8645, 9347, 12387, 12770, 12828], desc: "havsmonster som skulle sluka Andromeda, Perseus-kretsen i grekisk mytologi"},
    {i: 30, en: "Lupus", sv: "Vargen", mag: -0.18, lum: 1.19, area: 334, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [71860, 73273, 76297, 75141, 78384, 74395, 75177, 69996, 75264, 74376, 77634, 71536], desc: "Kentaurens byte, Herakles-kretsen i grekisk mytologi"},
    {i: 31, en: "Aquarius", sv: "Vattumannen", mag: -0.12, lum: 1.13, area: 980, fov: 55, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [106278, 109074, 113136, 114341, 112961, 102618, 110395, 115438, 111497, 112716, 110960, 110003], desc: "Deukalion eller Ganymedes, Olympen-kretsen i grekisk mytologi, 11:e i zodiaken"},
    {i: 32, en: "Cepheus", sv: "Kepheus", mag: -0.04, lum: 1.05, area: 588, fov: 40, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [105199, 106032, 116727, 109492, 102422, 112724, 110991, 109857, 5372, 107259, 101093, 107418], desc: "etiopisk kung, far till Andromeda, Perseus-kretsen i grekisk mytologi"},
    {i: 33, en: "Canis Minor", sv: "Lilla hunden", mag: 0.07, lum: 0.93, area: 183, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [37279, 36188, 36284, 39311, 36425, 36041], desc: "Orions hund Procyon eller den kadmiska räven, Orion-kretsen i grekisk mytologi"},
    {i: 34, en: "Serpens", sv: "Ormen", mag: 0.27, lum: 0.78, area: 637, fov: 70, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [77070, 89962, 77516, 86263, 77233, 77622, 78072, 77450, 76276, 86565, 84880, 77257], desc: "orm hållen av Asklepios i grekisk mytologi"},
    {i: 35, en: "Grus", sv: "Tranan", mag: 0.28, lum: 0.78, area: 366, fov: 30, by: "nederländske Petrus Plancius", year: 1598, hips: [109268, 112122, 108085, 112623, 114421, 110997, 113638, 111043, 109111, 112203, 112374], desc: "exotism"},
    {i: 36, en: "Pisces", sv: "Fiskarna", mag: 0.31, lum: 0.75, area: 889, fov: 50, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [114971, 118268, 9487, 116771, 115830, 8198, 4906, 154, 3786, 116928, 7884, 113889], desc: "gudarna Afrodite och Eros transformerade, Olympen-kretsen i grekisk mytologi, 12:e i zodiaken"},
    {i: 37, en: "Lepus", sv: "Haren", mag: 0.39, lum: 0.70, area: 290, fov: 20, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [25985, 25606, 23685, 24305, 27072, 27288, 28103, 27654, 24845, 24244, 28910, 28816], desc: "Orions byte, Orion-kretsen i grekisk mytologi"},
    {i: 38, en: "Aries", sv: "Väduren", mag: 0.43, lum: 0.67, area: 441, fov: 25, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [9884, 8903, 13209, 14838, 15549, 13061, 8832, 12719, 9153, 15110, 10053, 9836], desc: "gyllene vädur som räddade Frixos och Helle, Jason-kretsen i grekisk mytologi, 1:a i zodiaken"},
    {i: 39, en: "Pavo", sv: "Påfågeln", mag: 0.45, lum: 0.66, area: 378, fov: 35, by: "franske Nicolas-Louis de Lacaille", year: 1756, hips: [100751, 102395, 99240, 86929, 98495, 91792, 105858, 92609, 88866, 90098, 93015, 90797], desc: "djur"},
    {i: 40, en: "Libra", sv: "Vågen", mag: 0.46, lum: 0.66, area: 538, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [74785, 72622, 73714, 76470, 76600, 76333, 77853, 73165, 74392, 76219, 76880, 72631], desc: "Skorpionens klor, babylonisk våg, Orion-kretsen i grekisk mytologi, 7:e i zodiaken"},
    {i: 41, en: "Capricornus", sv: "Stenbocken", mag: 0.51, lum: 0.63, area: 414, fov: 30, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [107556, 100345, 100064, 106985, 105881, 104139, 102485, 102978, 105515, 104234, 106039, 106723], desc: "geten Amalthea eller guden Pan med fiskstjärt i grekisk mytologi, 10:e i zodiaken"},
    {i: 42, en: "Camelopardalis", sv: "Giraffen", mag: 0.57, lum: 0.59, area: 757, fov: 45, by: "nederländske Petrus Plancius", year: 1613, hips: [23522, 22783, 17884, 33694, 17959, 16281, 15520, 17587, 29997, 36547, 18505, 19018], desc: "exotism"},
    {i: 43, en: "Ara", sv: "Altaret", mag: 0.58, lum: 0.58, area: 237, fov: 20, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [85792, 85258, 83081, 85267, 85727, 88714, 82363, 83153, 86092, 86486], desc: "olympiska gudarnas offeraltare, Olympen-kretsen i grekisk mytologi"},
    {i: 44, en: "Ursa Minor", sv: "Lilla björnen", mag: 0.58, lum: 0.58, area: 256, fov: 25, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [11767, 72607, 75097, 82080, 77055, 70692, 85822, 73199, 69112, 79822, 74793, 76008], desc: "många olika myter, Ursa-kretsen i grekisk mytologi"},
    {i: 45, en: "Monoceros", sv: "Enhörningen", mag: 0.59, lum: 0.58, area: 482, fov: 40, by: "nederländske Petrus Plancius", year: 1613, hips: [37447, 29651, 34769, 39863, 30419, 32578, 31216, 30867, 39211, 32533, 34622, 39079], desc: "exotism"},
    {i: 46, en: "Piscis Austrinus", sv: "Södra fisken", mag: 0.61, lum: 0.57, area: 245, fov: 25, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [113368, 111954, 113246, 111188, 107380, 112948, 109285, 109422, 109289, 107608], desc: "förälder till Fiskarna, Olympen-kretsen i grekisk mytologi"},
    {i: 47, en: "Phoenix", sv: "Fenix", mag: 0.62, lum: 0.56, area: 469, fov: 20, by: "nederländske Petrus Plancius", year: 1597, hips: [2081, 5165, 6867, 765, 7083, 2072, 8837, 3405, 3245, 116389, 116602, 2472], desc: "exotism"},
    {i: 48, en: "Lynx", sv: "Lodjuret", mag: 0.71, lum: 0.52, area: 545, fov: 60, by: "polsk-tyske Johannes Hevelius", year: 1687, hips: [45860, 41075, 33449, 30060, 44700, 36145, 39847, 47029, 37609, 33485, 35384, 29919], desc: "djur"},
    {i: 49, en: "Columba", sv: "Duvan", mag: 0.75, lum: 0.50, area: 270, fov: 20, by: "nederländske Petrus Plancius", year: 1592, hips: [26634, 27628, 30277, 25859, 28328, 28199, 29807, 24659, 27810, 28010, 29034], desc: "Noaks duva, Jason-kretsen i grekisk mytologi"},
    {i: 50, en: "Triangulum Australe", sv: "Södra triangeln", mag: 0.82, lum: 0.47, area: 110, fov: 15, by: "nederländske Petrus Plancius", year: 1598, hips: [82273, 77952, 74946, 79664, 76440, 80686], desc: "geometri"},
    {i: 51, en: "Musca", sv: "Flugan", mag: 0.87, lum: 0.45, area: 138, fov: 15, by: "nederländske Petrus Plancius", year: 1598, hips: [61585, 62322, 63613, 57363, 61199, 59929, 64661, 57581, 64820, 57696, 65468], desc: "exotism, Kameleontens byte"},
    {i: 52, en: "Corvus", sv: "Korpen", mag: 0.92, lum: 0.43, area: 184, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [59803, 61359, 60965, 59316, 59199, 61174], desc: "korp som bar guden Apollons bägare, Olympen-kretsen i grekisk mytologi"},
    {i: 53, en: "Corona Borealis", sv: "Norra kronan", mag: 0.98, lum: 0.41, area: 179, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [76267, 75695, 76952, 78159, 77512, 79119, 77655, 80181, 76669, 78493], desc: "krona given till Ariadne av Dionysos i grekisk mytologi"},
    {i: 54, en: "Cancer", sv: "Kräftan", mag: 1.02, lum: 0.39, area: 506, fov: 25, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [40526, 42911, 43103, 44066, 42806], desc: "krabba som bet Herakles i foten, Herakles-kretsen i grekisk mytologi, 4:e i zodiaken"},
    {i: 55, en: "Vulpecula", sv: "Räven", mag: 1.14, lum: 0.35, area: 268, fov: 25, by: "polsk-tyske Johannes Hevelius", year: 1690, hips: [95771, 103004, 98543, 94703, 101867, 102388, 97679, 96275, 103200], desc: "djur, ursprungligen med gås"},
    {i: 56, en: "Hydrus", sv: "Lilla vattenormen", mag: 1.15, lum: 0.35, area: 243, fov: 30, by: "nederländske Petrus Plancius", year: 1598, hips: [2021, 9236, 17678, 11001, 12394, 8928, 13244, 12876], desc: "exotism"},
    {i: 57, en: "Lacerta", sv: "Ödlan", mag: 1.15, lum: 0.35, area: 201, fov: 30, by: "polsk-tyske Johannes Hevelius", year: 1687, hips: [111169, 109937, 111022, 110538, 111104, 111944, 110351, 110609, 111674, 111841, 112917, 113288], desc: "djur, taggsvansagam"},
    {i: 58, en: "Coma Berenices", sv: "Berenikes hår", mag: 1.19, lum: 0.33, area: 386, fov: 30, by: "tyske Caspar Vopelius", year: 1536, hips: [64394, 64241, 60742, 60202, 63355, 60351, 64022, 62763, 59847, 60697, 61418, 59856], desc: "egyptiska drottningen Berenike II:s hår"},
    {i: 59, en: "Tucana", sv: "Tukanen", mag: 1.23, lum: 0.32, area: 295, fov: 25, by: "nederländske Petrus Plancius", year: 1598, hips: [110130, 114996, 1599, 2484, 118322, 2487, 111310, 118121], desc: "exotism"},
    {i: 60, en: "Canes Venatici", sv: "Jakthundarna", mag: 1.27, lum: 0.31, area: 465, fov: 30, by: "polsk-tyske Johannes Hevelius", year: 1687, hips: [63125, 61317, 66234, 64844, 67665, 60485, 66257, 64540, 60646], desc: "djur, Björnvaktarens jakthundar Astern och Chara, Ursa-kretsen i grekisk mytologi"},
    {i: 61, en: "Octans", sv: "Oktanten", mag: 1.42, lum: 0.27, area: 291, fov: 20, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [107089, 112405, 70638, 122], desc: "teknik"},
    {i: 62, en: "Corona Australis", sv: "Södra kronan", mag: 1.46, lum: 0.26, area: 128, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [94160, 94114, 94005, 90982, 93542, 93174, 93825], desc: "krans tappad av Kentauren eller Skytten, Herakles-kretsen i grekisk mytologi"},
    {i: 63, en: "Telescopium", sv: "Teleskopet", mag: 1.52, lum: 0.25, area: 252, fov: 10, by: "franske Nicolas-Louis de Lacaille", year: 1752, hips: [90422, 90568, 89112, 96341, 93148, 99120, 90830, 95261], desc: "teknik"},
    {i: 64, en: "Sculptor", sv: "Bildhuggaren", mag: 1.53, lum: 0.25, area: 475, fov: 30, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [4577, 116231, 115102, 117452, 2210, 183], desc: "bildhuggarstudio, teknik"},
    {i: 65, en: "Volans", sv: "Flygfisken", mag: 1.53, lum: 0.24, area: 141, fov: 20, by: "nederländske Petrus Plancius", year: 1598, hips: [34481, 41312, 37504, 35228, 44382], desc: "exotism, Jason-kretsen i grekisk mytologi"},
    {i: 66, en: "Dorado", sv: "Svärdfisken", mag: 1.55, lum: 0.24, area: 179, fov: 30, by: "nederländske Petrus Plancius", year: 1598, hips: [21281, 26069, 19893, 27100, 27890, 23693, 24372, 29353], desc: "exotism, Jason-kretsen i grekisk mytologi"},
    {i: 67, en: "Indus", sv: "Indianen", mag: 1.55, lum: 0.24, area: 294, fov: 30, by: "nederländske Petrus Plancius", year: 1598, hips: [101772, 103227, 102333, 108870, 108431, 102790], desc: "exotism"},
    {i: 68, en: "Pictor", sv: "Målaren", mag: 1.58, lum: 0.23, area: 247, fov: 20, by: "franske Nicolas-Louis de Lacaille", year: 1756, hips: [32607, 27321, 27530, 29276, 28991], desc: "staffli, teknik"},
    {i: 69, en: "Triangulum", sv: "Triangeln", mag: 1.59, lum: 0.23, area: 132, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [10064, 8796, 10670, 10644], desc: "geometri, triangel, Nilens floddelta"},
    {i: 70, en: "Delphinus", sv: "Delfinen", mag: 1.65, lum: 0.22, area: 189, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [101421, 101769, 102532, 102281, 101589, 99742], desc: "guden Poseidons budbärare till nereiden Amfitrite i grekisk mytologi"},
    {i: 71, en: "Norma", sv: "Vinkelhaken", mag: 1.68, lum: 0.21, area: 165, fov: 15, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [80000, 80582, 78639, 78914, 81122, 79509, 79790], desc: "teknik"},
    {i: 72, en: "Pyxis", sv: "Kompassen", mag: 1.69, lum: 0.21, area: 221, fov: 10, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [42828, 42515, 43409, 44824, 45902, 46026, 43825, 42483], desc: "teknik, skeppet Argo Navis, Jason-kretsen i grekisk mytologi"},
    {i: 73, en: "Circinus", sv: "Cirkelpassaren", mag: 1.70, lum: 0.21, area: 93, fov: 10, by: "franske Nicolas-Louis de Lacaille", year: 1756, hips: [71908, 74824, 74837, 75323, 74778], desc: "teknik"},
    {i: 74, en: "Leo Minor", sv: "Lilla lejonet", mag: 1.71, lum: 0.21, area: 232, fov: 30, by: "polsk-tyske Johannes Hevelius", year: 1687, hips: [53229, 49593, 46952, 52098, 51056], desc: "djur, Leos hona eller avkomma, Herakles-kretsen i grekisk mytologi"},
    {i: 75, en: "Apus", sv: "Paradisfågeln", mag: 1.73, lum: 0.20, area: 206, fov: 20, by: "nederländske Petrus Plancius", year: 1598, hips: [72370, 81065, 81852, 80047, 84969, 69896], desc: "exotism"},
    {i: 76, en: "Reticulum", sv: "Rombiska nätet", mag: 1.75, lum: 0.20, area: 114, fov: 10, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [19780, 17440, 19921, 18744, 18597, 16245, 18772], desc: "teknik"},
    {i: 77, en: "Crater", sv: "Bägaren", mag: 1.76, lum: 0.20, area: 282, fov: 20, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [55282, 55705, 53740, 54682, 56633, 55687], desc: "guden Apollons bägare, Olympen-kretsen i grekisk mytologi"},
    {i: 78, en: "Fornax", sv: "Ugnen", mag: 1.76, lum: 0.20, area: 398, fov: 15, by: "franske Nicolas-Louis de Lacaille", year: 1756, hips: [13147, 9677, 17304], desc: "teknik"},
    {i: 79, en: "Chamaeleon", sv: "Kameleonten", mag: 1.78, lum: 0.19, area: 132, fov: 20, by: "nederländske Petrus Plancius", year: 1597, hips: [40702, 51839, 60000, 40888, 52633, 58905], desc: "exotism"},
    {i: 80, en: "Scutum", sv: "Skölden", mag: 1.87, lum: 0.18, area: 109, fov: 25, by: "polsk-tyske Johannes Hevelius", year: 1684, hips: [91117, 92175, 90135, 90595, 91726, 93026, 91845], desc: "polske kungen Johan III Sobieskis sköld"},
    {i: 81, en: "Microscopium", sv: "Mikroskopet", mag: 1.92, lum: 0.17, area: 210, fov: 15, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [103738, 105140, 102831], desc: "teknik"},
    {i: 82, en: "Sagitta", sv: "Pilen", mag: 1.92, lum: 0.17, area: 80, fov: 10, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [98337, 97365, 96757, 96837], desc: "pil som Herakles dödade Zeus örn eller Stymfaliderna med, eller Apollon dödade cykloperna med, Herakles-kretsen i grekisk mytologi"},
    {i: 83, en: "Antlia", sv: "Luftpumpen", mag: 1.98, lum: 0.16, area: 239, fov: 40, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [51172, 46515, 53502], desc: "teknik"},
    {i: 84, en: "Horologium", sv: "Pendeluret", mag: 2.12, lum: 0.14, area: 249, fov: 30, by: "franske Nicolas-Louis de Lacaille", year: 1756, hips: [19747, 13884], desc: "teknik"},
    {i: 85, en: "Sextans", sv: "Sextanten", mag: 2.41, lum: 0.11, area: 314, fov: 20, by: "polsk-tyske Johannes Hevelius", year: 1687, hips: [49641], desc: "teknik"},
    {i: 86, en: "Equuleus", sv: "Lilla hästen", mag: 2.46, lum: 0.10, area: 72, fov: 15, by: "grekisk-egyptiske Klaudios Ptolemaios", year: 150, hips: [104987], desc: "föl, Pegasus bror/son Celeris eller från Poseidons treudd, Perseus-kretsen i grekisk mytologi"},
    {i: 87, en: "Mensa", sv: "Taffelberget", mag: 2.57, lum: 0.09, area: 153, fov: 20, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [], desc: "geografi i Sydafrika"},
    {i: 88, en: "Caelum", sv: "Gravstickeln", mag: 2.96, lum: 0.07, area: 125, fov: 15, by: "franske Nicolas-Louis de Lacaille", year: 1763, hips: [21770, 21861], desc: "teknik"}
];
planetData = [
    {i: 1, en: "Sun", sv: "Solen", type: "stjärna", by: "tidigt liv", year: -3700000000, desc: "grekiske solguden Helios, romerske solguden Sol"},
    {i: 2, en: "Moon", sv: "Månen", type: "måne", by: "tidigt liv", year: -541000000, desc: "grekiska mångudinnan Selene, romerska solgudinnan Luna"},
    {i: 3, en: "Mercury", sv: "Merkurius", type: "planet", by: "egyptier", year: -2000, desc: "grekiske budbärarguden Hermes, romerske handelsguden Mercurius"},
    {i: 4, en: "Venus", sv: "Venus", type: "planet", by: "egyptier", year: -2000, desc: "grekiska fruktbarhetsgudinnan Afrodite, romerska kärleksgudinnan Venus"},
    {i: 5, en: "Mars", sv: "Mars", type: "planet", by: "egyptier", year: -2000, desc: "grekiske krigsguden Ares, romerske krigsguden Mar"},
    {i: 6, en: "Jupiter", sv: "Jupiter", type: "planet", by: "egyptier", year: -2000, desc: "grekiske gudakungen Zeus, romerske gudakungen Jupiter"},
    {i: 7, en: "Saturn", sv: "Saturnus", type: "planet", by: "egyptier", year: -2000, desc: "grekiske jordbruksguden Kronos, romerske jordbruksguden Saturnus"},
    {i: 8, en: "Uranus", sv: "Uranus", type: "planet", by: "tysk-brittiske William Herschel", year: 1781, desc: "grekiske himmelsguden Uranos"},
    {i: 9, en: "Neptune", sv: "Neptunus", type: "planet", by: "tysken Johann Gottfried Galle", year: 1846, desc: "grekiske havsguden Poseidon, romerske havsguden Neptunus"},
    {i: 10, en: "(4) Vesta", sv: "4 Vesta", type: "asteroid", by: "tyske Heinrich Wilhelm Olbers", year: 1807, desc: "romerska eldgudinnan Vesta"},
    {i: 11, en: "(2) Pallas", sv: "2 Pallas", type: "asteroid", by: "tyske Heinrich Wilhelm Olbers", year: 1802, desc: "grekiska visdomsgudinnan Pallas Athena"},
    {i: 12, en: "(1) Ceres", sv: "1 Ceres", type: "asteroid", by: "italienske Giuseppe Piazzi", year: 1801, desc: "romerska jordbruksgudinnan Ceres"},
    {i: 13, en: "(7) Iris", sv: "7 Iris", type: "asteroid", by: "brittiske John Russell Hind", year: 1847, desc: "grekiska regnbågsgudinnan Iris"},
    {i: 14, en: "(433) Eros", sv: "433 Eros", type: "asteroid", by: "tyske Carl Gustav Witt", year: 1898, desc: "grekiske kärleksguden Eros"},
    {i: 15, en: "(6) Hebe", sv: "6 Hebe", type: "asteroid", by: "tyske Karl Luwig Hencke", year: 1847, desc: "grekiska ungdomsgudinnan Hebe"},
    {i: 16, en: "(3) Juno", sv: "3 Juno", type: "asteroid", by: "tyske Karl Ludwig Harding", year: 1804, desc: "grekiska gudadrottningen Hera, romerska gudadrottningen Juno"},
    {i: 17, en: "(18) Melpomene", sv: "18 Melpomene", type: "asteroid", by: "brittiske John Russell Hind", year: 1852, desc: "grekiska tragedimusan Melpomene"},
    {i: 18, en: "(15) Eunomia", sv: "15 Eunomia", type: "asteroid", by: "italienska Annibale de Gasparis", year: 1851, desc: "grekiska ordningsgudinnan Eunomia"},
    {i: 19, en: "(8) Flora", sv: "8 Flora", type: "asteroid", by: "brittiske John Russell Hind", year: 1847, desc: "romerska växtlighetsgudinnan Flora"},
    {i: 20, en: "(324) Bamberga", sv: "324 Bamberga", type: "asteroid", by: "österrikiske Johann Palisa", year: 1892, desc: "tyska staden Bamberg"}
];

// PRESETS
core.setObserverLocation(obsLonD, obsLatD, obsAltM, 0.0);
if (repHi > 0)
    grpHo = repHi * grpHi;
else
    grpHo = 1000000000000 * grpHi;

// ENVIRONMENT SETTINGS
setEnvironment(true);
setEarth(showEarth);
textI11 = LabelMgr.labelScreen('Himlen över Stockholms Gamla Observatorium', 12, 12, true, 24, '#ffcc00');
textI12 = LabelMgr.labelScreen('', 12, 42, true, 24, '#ffcc00');
textI13 = LabelMgr.labelScreen('', 12, core.getScreenHeight() - 126, true, 24, '#ffcc00');
textI14 = LabelMgr.labelScreen('', 12, core.getScreenHeight() - 96, true, 24, '#ffcc00');
textI15 = LabelMgr.labelScreen('', 12, core.getScreenHeight() - 66, true, 24, '#ffcc00');
textI16 = LabelMgr.labelScreen('', 12, core.getScreenHeight() - 36, true, 24, '#ffcc00');
for (grp = 0; grp < grpHo; grp++) {

    // STARRY SKY CHANGES DURING YEAR
    for (labeled = 0; labeled <= 1; labeled++) {
        if (timeSYs[labeled] == 0)
            continue;
        setDatetime(obsDatetime0);
        core.setDate(core.getDate(spec = 'local').substring(0, 4) + '-01-01T' + obsTime0, spec = 'local', dateIsDT = false);
        jDay = core.getJDay();
        LabelMgr.setLabelText(textI12, formatNow());
        textI0s = addText0(['Stockholms stjärnhimmel', 'under det här året']);
        core.moveToAltAzi (90.0, viewAziD, 2.5);
        core.wait(5.0);
        remText0(textI0s);
        setLabels(labeled);
        for (d = 0; d < 366; d++) {
            core.setJDay(jDay + d);
            core.setDate(core.getDate(spec = 'local').substring(0, 11) +  obsTime0, spec = 'local', dateIsDT = false);
            core.moveToAltAzi (90.0, viewAziD, 0.0);
            LabelMgr.setLabelText(textI12, formatNow());
            core.wait(timeSYs[labeled] / 366);
        }
        setLabels(false);
    }

    // STARRY SKY CHANGES DURING DAY
    for (labeled = 0; labeled <= 1; labeled++) {
        if (timeSDs[labeled] == 0)
            continue;
        setDatetime(obsDatetime0);
        core.setDate(core.getDate(spec = 'local').substring(0, 11) + '00:00:00', spec = 'local', dateIsDT = false);
        jDay = core.getJDay();
        LabelMgr.setLabelText(textI12, formatNow());
        textI0s = addText0(['Stockholms stjärnhimmel', 'under det här dygnet']);
        core.moveToAltAzi (90.0, viewAziD, 2.5);
        core.wait(5.0);
        remText0(textI0s);
        setLabels(labeled);
        for (d = 0; d < 720; d++) {
            core.setJDay(jDay + d / 720);
            core.moveToAltAzi (90.0, viewAziD, 0.0);
            LabelMgr.setLabelText(textI12, formatNow());
            core.wait(timeSDs[labeled] / 720);
        }
        setLabels(false);
    }

    // STARRY SKY AND CONSTELLATIONS NOW
    for (labeled = 0; labeled <= 0; labeled++) {
        if (timeSC == 0)
            continue;
        setDatetime(obsDatetime0);
        LabelMgr.setLabelText(textI12, formatNow());
        textI0s = addText0(['Stockholms stjärnhimmel', 'och stjärnbilder just nu']);
        core.moveToAltAzi (90.0, viewAziD, timeSC * 0.5);
        core.wait(timeSC);
        remText0(textI0s);
        conIHi = conData.length; // conIHi = 24;
        for (conI = grp % grpHi; conI < conIHi; conI += grpHi) {
            con = conData[conI];
            obj = core.getObjectInfo(con.en);
            if (!obj.found)
                continue;
            if (obj.altitude < conAltDMin && showEarth)
                continue;
            setDatetime(obsDatetime0);
            LabelMgr.setLabelText(textI12, formatNow());
            LabelMgr.setLabelText(textI13, 'Stjärnbild: ' + con.sv + ' / ' + con.en + ' (' + obj.iauConstellation + ')');
            LabelMgr.setLabelText(textI14, 'letar...');
            LabelMgr.setLabelText(textI15, '');
            LabelMgr.setLabelText(textI16, '');
            core.moveToAltAzi (90.0, viewAziD, 0.0);
            core.selectConstellationByName(con.en);
            core.moveToSelectedObject(duration = timeSC);
            core.selectObjectByName('');
            core.wait(timeSC);
            setText2Con(con, obj);
            StelMovementMgr.zoomTo(con.fov, timeSC);
            core.wait(timeSC * 2.0);
            ConstellationMgr.setConstellationDisplayStyle(2); // translated
            ConstellationMgr.setFlagBoundaries(true);
            StarMgr.setFlagLabels(true);
            setLabels(true);
            core.wait(timeSC);
            if (timeSS > 0 && starMax > 0) {
                StarMgr.setFlagLabels(false);
                resetText2();
                CustomObjectMgr.setMarkersSize(20);
                CustomObjectMgr.setMarkersColor(core.vec3f(1.0,0.0,0.0));
                hipIHi = Math.min(con.hips.length, starMax);
                for (hipI = 0; hipI < hipIHi; hipI++) {
                    star = core.getObjectInfo('HIP '+con.hips[hipI]);
                    if (!star.found)
                        continue;
                    if (star.altitude < starAltDMin && showEarth)
                        continue;
                    CustomObjectMgr.addCustomObjectRaDec(star['localized-name'], star.ra, star.dec, true);
                    setText2Star(star);
                    core.wait(timeSS);
                    CustomObjectMgr.removeCustomObjects();
                }
                StarMgr.setFlagLabels(true);
                setText2Con(con, obj);
            }
            ConstellationMgr.setFlagArt(true);
            core.wait(timeSC);
            StelMovementMgr.zoomTo(180.0, timeSC);
            core.wait(timeSC);
            ConstellationMgr.setConstellationDisplayStyle(0); // abbreviated
            resetText2();
            core.moveToAltAzi (90.0, viewAziD, timeSC);
            core.wait(timeSC);
            ConstellationMgr.setFlagBoundaries(false);
            ConstellationMgr.setFlagArt(false);
            core.wait(timeSC);
            setLabels(false);
            StarMgr.setFlagLabels(false);
            core.wait(timeSC);
        }
    }

    // STARRY SKY AND PLANETS NOW
    if (timeSP > 0 && planetMax > 0) {
        CustomObjectMgr.setMarkersSize(20);
        CustomObjectMgr.setMarkersColor(core.vec3f(1.0,0.0,0.0));
        planetIHi = Math.min(planetData.length, planetMax);
        for (planetI = 0; planetI < planetIHi; planetI++) {
            planet = planetData[planetI];
            obj = core.getObjectInfo(planet.en);
            if (!obj.found)
                continue;
            if (obj.altitude < planetAltDMin && showEarth)
                continue;
            if (obj.vmag > planetMagMax)
                continue;
            setDatetime(obsDatetime0);
            LabelMgr.setLabelText(textI12, formatNow());
            LabelMgr.setLabelText(textI13, 'Himlakropp (' + planet.type + '): ' + planet.sv);
            LabelMgr.setLabelText(textI14, 'letar...');
            LabelMgr.setLabelText(textI15, '');
            LabelMgr.setLabelText(textI16, '');
            core.moveToAltAzi (90.0, viewAziD, 0.0);
            core.selectObjectByName(planet.en, pointer = false);
            core.moveToSelectedObject(duration = timeSP);
            core.selectObjectByName('');
            core.wait(timeSP);
            setText2Planet(planet, obj);
            StelMovementMgr.zoomTo(planetFovD, timeSP);
            core.wait(timeSP * 2.0);
            ConstellationMgr.setConstellationDisplayStyle(2); // translated
            StarMgr.setFlagLabels(true);
            setLabels(true);
            SolarSystem.setFlagLabels(false);
            CustomObjectMgr.addCustomObjectRaDec(planet.sv, obj.ra, obj.dec, true);
            core.wait(timeSP);
            StelMovementMgr.zoomTo(180.0, timeSP);
            core.wait(timeSP);
            ConstellationMgr.setConstellationDisplayStyle(0); // abbreviated
            CustomObjectMgr.removeCustomObjects();
            SolarSystem.setFlagLabels(true);
            resetText2();
            core.moveToAltAzi (90.0, viewAziD, timeSP);
            core.wait(timeSP * 2.0);
            setLabels(false);
            StarMgr.setFlagLabels(false);
            core.wait(timeSP);
        }
    }
}

// RESET ENVIRONMENT
core.setRealTime();
core.moveToAltAzi (0.0, 180.0, 0.2);
setEnvironment(false);
setEarth(true);

// DESCRIPTION
// The full show consists of:
// 1. The changes from day to day during a year, without and with annotations and constellation lines.
// 2. The changes during a day, without and with annotations and constellation lines.
// 3.a) Zooms to and information about constellations above horizon at a certain timepoint.
// 3.b) The zooms are split into groups, each preceded by step 1 and 2.
// 4. Zooms and information about Solar system objects above horizon at a certain timepoint.
// The views are from a certain location on Earth (settings obsLatD, obsLonD, obsAltM).
// The views can be at a past or future time (setting obsDatetime0) or the present, also setting year and day.
// The viewing timepoint of day during a year is set separately (setting obsTime0).
// Animation length of yearly revolution without and with constellations is set (settings timeSYs).
// Animation length of daily revolution without and with constellations is set (settings timeSDs).
// Animation lengths of change events when focusing on particular constellations is set (setting timeSC).
// Time for focus on individual stars is set (setting timeSS).
// Animation lengths of change events when focusing on particular Solar system objects is set (setting timeSP).
// Minimum altitude angle for constellation centers focused on is set (setting conAltDMin).
// Minimum altitude angle for stars focused on is set (setting starAltDMin).
// Maximum number of stars per constellation focused on is set (setting starMax).
// Minimum altitude angle for Solar system objects focused on is set (setting planetAltDMin).
// Maximum magnitude for Solar system objects focused on is set (setting planetMagMax).
// Field of vision angle for Solar system objects focused on is set (setting planetFovD).
// Maximum number of Solar system objects focused on is set (setting planetMax).
// Number of groups constellations focused on are divided into is set (setting grpHi).
// Number of repeats of the full show is set (setting repHi).

// INSTALLATION
// 1. This file is the complete script and documentation
// 2. The installation requires a reasonably powerful computer with app Stellarium ~3.23 installed.
// 2.a) Stellarium installers for Windows, MacOS and Linux can be downloaded from stellarium.org
// 3. Start app Stellarium
// 4. Open Stellarium script console using key F12 (fn-F12 on Mac).
// 5. Copy and paste the contents of this file to the Script tab content field.
// 6. Edit any Settings parameters (above) you want.
// 7. Save as a new script, e.g. mz_sky_tour1.ssc, using button Save script to file.
// 8. Run the script using button Run script.
// 9. Stop the script by opening Stellarium script console using key F12 (fn-F12 on Mac) and button Stop script.

// TWEAKS
// A full show with original settings takes 40 minutes.
// For a faster show, reduce values of settings timeSYs, timeSDs and timeSC.
// For a longer show (by repeating), increase value of setting pHi (9 => 6 hours).
// This script was originally developed for use by STAR at Stockholm Culture Night 2024.
// STAR is the non-profit organisation Stockholm Amateur Astronomers.
// Stockholm Culture Night 2024 is Saturday 2024-04-20 18:00-24:00.
// The STAR premises is at Sockholm Old Observatory, Drottninggatan 120.
// The position, lat (°), lon (°), alt (m), points to these premises.
// The direction azi (°) matches the projector at the STAR premises pointing north = 0°
// (east = 90°, south = 180°, west = 270°).
// The datetime obsDatetime0 is set to 22:00 instead of present (live) because the sky is too bright earlier.
// The zoomed constellations takes 45 s each, and in the 4 batches are:
// 1 (8 st): Boo, Per, Cmi, Mon, CrB, Lac, Crt, Sex
// 2 (8 st): Tau, Aur, Leo, Dra, Cam, Cnc, Com, Lmi 
// 3 (5 st): Uma, Cyg, Gem, Hya, Cas
// 4 (7 st): Her, Vir, Lyr, Cep, Umi, Lyn, CVn