//
// Author: Hanna Lehtola
// Original base document by Timo Ehmke

// Systemvariablen
// ===============

APPLET_WIDTH  = 360
APPLET_HEIGHT = 300
WORLD_X_MAX    = 9.0
WORLD_X_MIN    = -9.0
WORLD_Y_MAX    = +9.0
WORLD_Y_MIN    = -9.0
ALIGN = RIGHT


// Figurenbeschreibung
// ===================

//punaiset solmut
e[1]  = v1p;  point;   fixed;      0.0,6.0;     0;red;red;0;
e[2]  = v2p;  point;   fixed;      -5.0,4.0;    0;red;red;0;
e[3]  = v3p;  point;   fixed;      -5.0,-4.0;   0;red;red;0;
e[4]  = v4p;  point;   fixed;      0.0,-8.0;    0;red;red;0;
e[5]  = v5p;  point;   fixed;      5.0,-4.0;    0;red;red;0;
e[6]  = v6p;  point;   fixed;      5.0,4.0;     0;red;red;0;

//mustat solmut
e[7]  = v1m;  point;   fixed;      0.0,6.0;    0;black;black;0;
e[8]  = v2m;  point;   fixed;      -5.0,4.0;   0;black;black;0;
e[9]  = v3m;  point;   fixed;      -5.0,-4.0;  0;black;black;0;
e[10] = v4m;  point;   fixed;      0.0,-8.0;   0;black;black;0;
e[11] = v5m;  point;   fixed;      5.0,-4.0;   0;black;black;0;
e[12] = v6m;  point;   fixed;      5.0,4.0;    0;black;black;0;

//mustat kaaret
e[13] = v1v2;  line;    connect;    v1m,v2m;    0;0;black;0;
e[14] = v1v4;  line;    connect;    v1m,v4m;    0;0;black;0;
e[15] = v2v4;  line;    connect;    v2m,v4m;    0;0;black;0;
e[16] = v2v3;  line;    connect;    v2m,v3m;    0;0;black;0;
e[17] = v3v6;  line;    connect;    v3m,v6m;    0;0;black;0;
e[18] = v4v5;  line;    connect;    v4m,v5m;    0;0;black;0;

e[19] = reitti1a;  line;    connect;    v1m,v2m;    0;0;black;0;
e[20] = reitti1b;  line;    connect;    v1m,v4m;    0;0;black;0;
e[21] = reitti2a;  line;    connect;    v2m,v3m;    0;0;black;0;
e[22] = reitti2b;  line;    connect;    v4m,v5m;    0;0;black;0;
e[23] = reitti3;   line;    connect;    v3m,v6m;    0;0;black;0;

e[24] = an1;     point;   dragable;   0.0,6.0,reitti1a;    0;red;red;0;
e[25] = an2;     point;   dragable;   0.0,8.0,reitti1b;    0;red;red;0;
e[26] = an3;     point;   dragable;   -5.0,4.0,reitti2a;   0;red;red;0;
e[27] = an4;     point;   dragable;   0.0,-8.0,reitti2b;   0;red;red;0;
e[28] = an5;     point;   dragable;    -5.0,-4.0,reitti3;  0;red;red;0;

e[29] = viiva1;   line;    connect;    v1m,an1;    0;0;red;0;
e[30] = viiva2;   line;    connect;    v1m,an2;    0;0;red;0;
e[31] = viiva3;   line;    connect;    v2m,an3;    0;0;red;0;
e[32] = viiva4;   line;    connect;    v4m,an4;    0;0;red;0;
e[33] = viiva5;   line;    connect;    v3m,an5;    0;0;red;0;

//nimet
e[34] = v1;  point;   fixed;      0.5,6.0;    black;0;0;0;
e[35] = v2;  point;   fixed;      -6.5,4.0;   black;0;0;0;
e[36] = v3;  point;   fixed;      -6.5,-4.0;  black;0;0;0;
e[37] = v4;  point;   fixed;      0.5,-8.0;   black;0;0;0;
e[38] = v5;  point;   fixed;      5.5,-4.0;   black;0;0;0;
e[39] = v6;  point;   fixed;      5.5,4.0;    black;0;0;0;

//lista
e[40]  = v1';  point;   fixed;      -8.0,-8.0;   black;0;0;0;
e[41]  = v2';  point;   fixed;      -7.0,-8.0;   black;0;0;0;
e[42]  = v4';  point;   fixed;      -6.0,-8.0;   black;0;0;0;
e[43]  = v3';  point;   fixed;      -5.0,-8.0;   black;0;0;0;
e[44]  = v5';  point;   fixed;      -4.0,-8.0;   black;0;0;0;
e[45]  = v6';  point;   fixed;      -3.0,-8.0;   black;0;0;0;

e[46] = askel; measure; JSfunction;  "getStep","action";

// Animation
// =========

anim[1] = "if (calculate(askel) = 1) animate (an1,10,1,100,1)"
anim[2] = "if (calculate(askel) = 1) animate (an2,10,1,100,1)"
anim[3] = "if (calculate(askel) = 2) animate (an3,10,1,100,1)"
anim[4] = "if (calculate(askel) = 2) animate (an4,10,1,100,1)"
anim[5] = "if (calculate(askel) = 3) animate (an5,10,1,100,1)"

// Hidden
// =========

hidden[1] = "if (calculate(askel) < 1) hide (an1,an2,Textbox_1)"
hidden[2] = "if (calculate(askel) < 2) hide (an3,an4,v2',v4',Textbox_2)"
hidden[3] = "if (calculate(askel) < 3) hide (an5,v3',v5',Textbox_3)"
hidden[4] = "if (calculate(askel) < 4) hide (v6',Textbox_4)"
hidden[5] = "if (calculate(askel) > 0) hide (v1m)"
hidden[6] = "if (calculate(askel) > 1) hide (v2m,v4m)"
hidden[7] = "if (calculate(askel) > 2) hide (v3m,v5m)"
hidden[8] = "if (calculate(askel) > 3) hide (v6m)"

// Textfenster
// ===========

<Textbox>
 Position = 10;10;340;-1
 Solmusta edetään sen kaikkiin läpikäymättömiin naapureihin
</Textbox>

<Textbox>
 Position = 10;10;340;-1
 v2:sta ei edetä v4:n, koska siinä on jo vierailtu
</Textbox>

<Textbox>
 Position = 10;10;340;-1
 v5:sta ei päästä eteenpäin, v3:sta edetään solmuun v6
</Textbox>

<Textbox>
 Position = 10;10;340;-1
 Verkon läpikäynti on valmis
</Textbox>