Subversion Repositories wimsdev

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
 
2
!for i=1 to $parmcnt
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)
8
!next i
9
 
10
!for i in $storename
11
 storeval=!append line $($i) to $storeval
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