Subversion Repositories wimsdev

Rev

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

Rev 20 Rev 12325
Line 2... Line 2...
2 
oefstepcnt=0
 2 
oefstepcnt=0
3 
!if $oefsteps=$empty
 3 
!if $oefsteps=$empty
4 
 oefstep=0
 4 
  oefstep=0
5 
 !exit
 5 
  !exit
6 
!endif
 6 
!endif
7 
oefsteps=!translate $	\
 7 
oefsteps=!translate $	\
8 
$ to ;; in $oefsteps
 8 
$ to ;; in $oefsteps
9 
oefsteps=!lower $oefsteps
 9 
oefsteps=!lower $oefsteps
10 
oefsteps=!replace replies by r in $oefsteps
 10 
oefsteps=!replace replies by r in $oefsteps
Line 12... Line 12...
12 
oefsteps=!replace reply by r in $oefsteps
 12 
oefsteps=!replace reply by r in $oefsteps
13 
oefsteps=!replace choice by c in $oefsteps
 13 
oefsteps=!replace choice by c in $oefsteps
14 
oefsteps=!nospace $oefsteps
 14 
oefsteps=!nospace $oefsteps
15 
oefsteps=!rows2lines $oefsteps
 15 
oefsteps=!rows2lines $oefsteps
16 
!if $dynstep=yes
 16 
!if $dynstep=yes
17 
 oefsteps=!line 1 of $oefsteps
 17 
  oefsteps=!line 1 of $oefsteps
18 
!endif
 18 
!endif
19 
oefsteps=!nonempty lines $oefsteps
 19 
oefsteps=!nonempty lines $oefsteps
20 
oefstepcnt=!linecnt $oefsteps
 20 
oefstepcnt=!linecnt $oefsteps
21 
rr=!text select r in $oefsteps
 21 
rr=!text select r in $oefsteps
22 
cc=!text select c in $oefsteps
 22 
cc=!text select c in $oefsteps