Subversion Repositories wimsdev

Rev

Rev 546 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
 
2
!for i=1 to $parmcnt
15353 bpr 3
  asklist=$asklist $i
4
  p=!line 2 of $(parm$i)
5
  p=!translate , to ; in $p
6
  promptlist=!append item $p? to $promptlist
7
  parm$i=!replace ?? by $(val$i) in $(parm$i)
23 reyssat 8
!next i
9
 
10
!for i in $storename
15353 bpr 11
  storeval=!append line $($i) to $storeval
23 reyssat 12
!next i
13
 
14
remlist=!words2items $asklist
15
!reset gotlist ans1 ans2 ans3 ans4 ans5 ans6 ans7 ans8 ans9 ans10
16
!bound precision between integer 20 and 100000000 default 10000
17
wims_compare_precision=$precision
18
thisscore=0
19
status=waiting
20