Subversion Repositories wimsdev

Rev

Rev 15353 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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