Subversion Repositories wimsdev

Rev

Rev 17975 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  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. !if $printlatex!=yes
  6.   !exit
  7. !endif
  8. !if $savedrawtikzcnt>0
  9.   !set savedrawtikz$savedrawtikzcnt=$wims_read_parm
  10.   !increase savedrawtikzcnt
  11. !endif
  12.  
  13. !set pp=!trim $wims_read_parm
  14. !set pp=!replace internal \\ by ///?/?/?/// in $pp
  15. !set pp=!replace internal \ by $$m_ in $pp
  16. !set pp=!replace internal ///?/?/?/// by \\ in $pp
  17. !set s_=!line 1 of $pp
  18. !set pp=!line 2 to -1 of $pp
  19. !set pp=!translate internal $   $ to $\
  20. $ in $pp
  21. !set pp=!trim $pp
  22.  
  23. !set a_=!word 1 of $pp
  24. !if $a_=alt
  25.   !set pp=!line 2 to -1 of $pp
  26. !endif
  27. !set a_=!word 1 of $pp
  28. !if $a_=animate
  29.   !set pp=!line 2 to -1 of $pp
  30. !endif
  31. !set insdraw_size=$s_
  32. !set tmp_format=$ins_format
  33. !set ins_format=tex
  34. !insdraw $pp
  35. !set ins_format=$tmp_format
  36.