Rev 16831 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
7640 | bpr | 1 | !if $wims_read_parm=$empty |
13798 | bpr | 2 | !exit |
7640 | bpr | 3 | !endif |
7916 | bpr | 4 | |
7640 | bpr | 5 | !set pp=!trim $wims_read_parm |
15293 | bpr | 6 | !! useful only (?) in draw for symbols as \RR |
7 | !!set pp=!replace internal \\ by ///?/?/?/// in $pp |
||
8 | !!set pp=!replace internal \ by $$m_ in $pp |
||
9 | !!set pp=!replace internal ///?/?/?/// by \\ in $pp |
||
13798 | bpr | 10 | !set pp=!translate internal $ $ to $\ |
11 | $ in $pp |
||
7640 | bpr | 12 | !set s_=!line 1 of $pp |
7916 | bpr | 13 | |
14566 | bpr | 14 | !set tmp=!text remove ,0123456789 in $s_ |
15 | !set tmpcnt=!itemcnt $s_ |
||
16552 | bpr | 16 | !if size notin $s_ and ($tmp notsametext $empty or $s_=$empty or $tmpcnt!=2) |
7640 | bpr | 17 | !exit |
18 | !endif |
||
16552 | bpr | 19 | !if size isin $s_ |
20 | !set s_=!replace internal size by in $s_ |
||
21 | !set s_=!trim $s_ |
||
22 | !endif |
||
7640 | bpr | 23 | !set pp=!line 2 to -1 of $pp |
8405 | bpr | 24 | |
8409 | bpr | 25 | !read canvasimagedir.phtml $pp |
26 | !set pp=!trim $canvas_ppm |
||
8405 | bpr | 27 | |
11986 | bpr | 28 | !set pp=!rows2lines $pp |
11053 | bpr | 29 | !!non empty lines in canvasdraw |
30 | !set pp=!nonempty lines $pp |
||
7640 | bpr | 31 | !set canvasdraw_out=!exec canvasdraw\ |
32 | size $s_\ |
||
33 | $pp |
||
11033 | bpr | 34 | !reset canvasdraw_idclass |
35 | !set id1=!positionof canvas_div in $canvasdraw_out |
||
36 | !if $id1!=$empty |
||
37 | !set id2=!positionof " in $canvasdraw_out |
||
38 | !for j in $id2 |
||
39 | !if $j>$id1 |
||
40 | !break |
||
41 | !endif |
||
42 | !next |
||
16845 | bpr | 43 | !set canvasdraw_idclass=!char $id1+1 to $j of $canvasdraw_out |
11033 | bpr | 44 | !endif |
16845 | bpr | 45 | !set canvasdraw_out=!replace internal , by in $canvasdraw_out |
46 | !!set canvasdraw_out=<div class="wims_scrollable">$canvasdraw_out</div> |
||
7640 | bpr | 47 | |
48 | $canvasdraw_out |