# Variable initialisation file.
# This file is read by wims for new sessions.

# content of the file: initialisation of the problem.
!default cnt_date=4
border=1
arrondi=4.5
dessin1=$empty
dessin2=$empty
m=4
xsize1=$[-$m]
xsize2=2
x_size=$xsize1, $xsize2
xx_size=$[$xsize2- $xsize1]
y_size=-5,5
insdraw_size=600,150
inssize=!item 1 of $insdraw_size

dessin=xrange $x_size\
yrange $y_size\
hline black,0,0\
arrow 2.5,0,3,0,10,black\
parallel -$m,-0.8,-$m,0.4,1/2,0, 40, blue\
parallel -$m,-0.3,-$m,0.3,1/10,0, 200, blue\
parallel -$m,-0.8,-$m,0.6,1,0, 40, red

!for i=-$m to 2
a=$[$i*1000]
dessin=$dessin\
text black, $i,-1, medium,$a
!next i

clickcnt=0
cnt_orange=0
u=!shuffle 4
H=$empty

liste=A,B,C,D,E,F,G
!for i=1 to $cnt_date
j=!item $i of $u
m2=!record $j of chrono
S=!randline $m2 
date$i=!word 1 of $S
texte$i=!word 2 to -1 of $S
dat=$[$(date$i)/1000]
X$(i)=$[rint($inssize*($dat-$xsize1)/$xx_size+$border)]
U=!item $i of $liste
dessin2 =$dessin2\
arrow $dat,-2.5,$dat,0,7,blue\
text blue,$dat,-2.5,medium,$U
!next i

erreur=0
miss=0
status=waiting
wims_module_log=$cmd  $cnt_date number
