Subversion Repositories wimsdev

Rev

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

Rev 8409 Rev 12586
Line 1... Line 1...
1
!if $wims_read_parm!=$empty
1
!if $wims_read_parm!=$empty
2
 !set parms=$wims_read_parm
2
  !set parms=$wims_read_parm
3
 !set parms=!replace internal $ $ by $\
3
  !set parms=!replace internal $        $ by $\
4
$ in $parms
4
$ in $parms
5
 !set size=!line 1 of $parms
5
  !set size=!line 1 of $parms
6
 !distribute items $size into sx,sy
6
  !distribute items $size into sx,sy
7
 !set ppm=!line 2 to -1 of $parms
7
  !set ppm=!line 2 to -1 of $parms
8
!else
8
!else
9
 !if $parms=$empty
9
  !if $parms=$empty
10
  !exit
10
    !exit
11
 !endif
11
  !endif
12
 !distribute items $parms into sx,sy
12
  !distribute items $parms into sx,sy
13
 !set ppm=!item 3 to -1 of $parms
13
  !set ppm=!item 3 to -1 of $parms
14
!endif
14
!endif
15
 
15
 
16
!set ppm=!replace internal $    $ by $\
16
!set ppm=!replace internal $    $ by $\
17
$ in $ppm
17
$ in $ppm
18
 
18