//
// Autor: Timo Ehmke (ehmke@uni-flensburg.de)
//
 
// Systemvariablen 
// ===============

snapToGrid    = true
gridSize      = 20
showGrid      = true

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

e[1]  = A;  point;   free;      -7.0,3.0; "hideLabel"
e[2]  = B;  point;   free;      -9.0,2.0; "hideLabel"
e[3]  = C;  point;   free;      -8.0,1.0; "hideLabel"
e[4]  = P1; polygon; polygon;   A,B,C;     "hideLabel"
e[5]  = D;  point;   free;      -1.0,1.0; "hideLabel"
e[6]  = E;  point;   free;      -1.0,3.0; "hideLabel"
e[7]  = F;  point;   free;      1.0,3.0; "hideLabel"
e[8]  = G;  point;   free;      1.0,1.0; "hideLabel"
e[9]  = P2; polygon; polygon;   D,E,F,G;   "hideLabel"
e[10] = H;  point;   free;      6.0,3.0;  "hideLabel"
e[11] = I;  point;   free;      8.0,3.0;  "hideLabel"
e[12] = J;  point;   free;      8.0,1.0;  "hideLabel"
e[13] = K;  point;   free;      6.0,1.0;  "hideLabel"
e[14] = L;  point;   free;      5.0,2.0;  "hideLabel"
e[15] = P3; polygon; polygon;   H,I,J,K,L; "hideLabel"
e[16] = i1; measure; function;  "Functional_PickscheFormel","i","P1",-9.0,-1.0,"i = ",""; 
e[17] = r1; measure; function;  "Functional_PickscheFormel","r","P1",-9.0,-2.0,"r = ",""; 
e[18] = i2; measure; function;  "Functional_PickscheFormel","i","P2",-1.0,-1.0,"i = ",""; 
e[19] = r2; measure; function;  "Functional_PickscheFormel","r","P2",-1.0,-2.0,"r = ",""; 
e[20] = i3; measure; function;  "Functional_PickscheFormel","i","P3",6.0,-1.0,"i = ",""; 
e[21] = r3; measure; function;  "Functional_PickscheFormel","r","P3",6.0,-2.0,"r = ",""; 
e[22] = sw; measure; checkbox;  "Show solution",0;  
e[23] = s1; measure; calculate; "calculate(i1)+(calculate(r1)/2)-1",-10.0,-3.0,"i + (r/2) – 1 = ",""; 
e[24] = s2; measure; calculate; "calculate(i2)+(calculate(r2)/2)-1",-1.0,-3.0,"i + (r/2) – 1 = ",""; 
e[25] = s3; measure; calculate; "calculate(i3)+(calculate(r3)/2)-1",6.0,-3.0,"i + (r/2) – 1 = ",""; 
e[26] = s4; measure; calculate; "calculate(i1)+(calculate(r1)/2)-1",-9.0,-3.0,"f = ",""; 
e[27] = s5; measure; calculate; "calculate(i2)+(calculate(r2)/2)-1",-1.0,-3.0,"f = ",""; 
e[28] = s6; measure; calculate; "calculate(i3)+(calculate(r3)/2)-1",6.0,-3.0,"f = ",""; 

// Ein- und Ausblenden von Objekten
// ================================

hidden[1] = "if (not(calculate(sw))) hide (s1,s2,s3,Textbox_1)" 
hidden[2] = "if (calculate(sw)) hide (s4,s5,s6)" 

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

<Textbox>
 Position = 20;20;-1;-1
  Solution:   
  i = number of grid points within a polygon,
  r = number of grid points on the edge of a polygon, 
  thus the area f = i + (r / 2) – 1 .
</Textbox>