Subversion Repositories wimsdev

Rev

Rev 17918 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
17918 bpr 1
!!see modules/adm/doc/primitives/draw.phtml scripts/docu/primitives/draw.phtml scripts/primitives/draw.phtml
2
!if $wims_read_parm=$empty
3
  !exit
4
!endif
5
 
6
!if $savedrawtikzcnt>0
7
  !set savedrawtikz$savedrawtikzcnt=$wims_read_parm
8
  !increase savedrawtikzcnt
9
!endif
10
 
11
!set pp=!trim $wims_read_parm
12
!set pp=!replace internal \\ by ///?/?/?/// in $pp
13
!set pp=!replace internal \ by $$m_ in $pp
14
!set pp=!replace internal ///?/?/?/// by \\ in $pp
15
!set s_=!line 1 of $pp
16
!set pp=!line 2 to -1 of $pp
17
!set pp=!translate internal $   $ to $\
18
$ in $pp
19
!set pp=!trim $pp
20
 
21
!set a_=!word 1 of $pp
22
!if $a_=alt
23
  !set pp=!line 2 to -1 of $pp
24
!endif
25
!set a_=!word 1 of $pp
26
!if $a_=animate
27
  !set pp=!line 2 to -1 of $pp
28
!endif
29
!set insdraw_size=$s_
17975 bpr 30
!set tmp_format=$ins_format
17918 bpr 31
!set ins_format=tex
32
!insdraw $pp
17975 bpr 33
!set ins_format=$tmp_format