<%@ LANGUAGE="VBScript" %>
<%
If IsEmpty(Request("measurement_id")) Then
measurement_id="TEMPERATURE"
Else
measurement_id=Request("measurement_id")
End If
If IsEmpty(Request("id0")) Then
id0=2
Else
id0=CInt(Request("id0"))
End If
If IsEmpty(Request("days")) Then
days=1
Else
days=CInt(Request("days"))
End If
If IsEmpty(Request("height")) Then
height=300
Else
height=CInt(Request("height"))
End If
If IsEmpty(Request("width")) Then
width=300
Else
width=CInt(Request("width"))
End If
seed=-(second(now())+60*minute(now())+3600*hour(now())+3600*24*day(now()))
Dummy=CStr(CLng(100000.*rnd(seed)))
%>
Tunnel Environment