user/Games/defs.htc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50

\cond{T.BEGIN}{0}
\cond{T.END}{0}
\cond{NQUEST}{10}
\def{drawnum}{}(int (1+\NQUEST*\random{6}/1000000))
\def{multip.get}{}{
  \if{\T.BEGIN}{
    \h3{Testet p&aring;g&aring;r}
    \form{
      \variable{START}{\now}
      \table{
        \for(ii:=1)(ii<=\NQUEST)(ii+=1){
          \tr{
            [aa:=\drawnum;bb:=\drawnum];
            \variable{ANS[ii]}(aa*bb);
            \td{[aa] * [bb] =}
            \td{\input{TEST[ii]}{4}}
          }
        }
      }
      \button{Jag är färdig!}
    }
  }{
    \if{\T.END}{
      \h3{Testet f&auml;rdigt}
      \table{
        \tr{
          \td{Po&auml;ng (max \NQUEST):}
          \td{\T.POINTS}
        }
        \tr{
          \td{Tid (sekunder):}
          \td{\T.DELTA}
        }
      }
      <p>
      \href{\this?BEGIN=1}{\h3{En g&aring;ng till!}}
    }{
      N&auml;r du trycker p&aring; knappen nedan,
      kommer du att f&aring; tio fr&aring;gor att svara p&aring;.
      <p>
      \href{\this?BEGIN=1}{\h3{Starta testet!}}
    }
  }
}
\def{multip.post}{}{
  [pts:=0]\for(ii:=1)(ii<=\NQUEST)(ii+=1){\if(\T.ANS[ii]==\T.TEST[ii])(pts+=1)}
  \redirect{\this?END=1&POINTS=[pts]&DELTA=[\now-\T.START]}
}