Subversion Repositories wimsdev

Rev

Rev 546 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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