Subversion Repositories wimsdev

Rev

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

  1. !set p_=!trim $wims_read_parm
  2. !if $p_=$empty
  3.  !exit
  4. !endif
  5. !set p_=!items2words $p_
  6. !set p_=!words2items $p_
  7.  
  8. !if $module_language notwordof cn fr nl si es
  9.  !set prompt1=Useful online tools:
  10.  !set prompt2=(available in another window of your browser)
  11. !else
  12.  !if $module_language=si
  13.   !set prompt1=Uporabna spletna orodja:
  14.   !set prompt2=(na razpolago v novem oknu brskalnika)
  15.  !endif
  16.  !if $module_language=fr
  17.   !set prompt1=Outils en ligne utiles :
  18.   !set prompt2=(disponible dans une autre fenêtre de votre navigateur)
  19.  !endif
  20.  !if $module_language=cn
  21.   !set prompt1=¿ÉÒÔʹÓõŤ¾ß:
  22.   !set prompt2=(»áÔÚÄãµÄä¯ÀÀÆ÷ÀïÁí¿ªÒ»¸ö´°¿Ú)
  23.  !endif
  24.  !if $module_language=nl
  25.   !set prompt1=Handige online tools :
  26.   !set prompt2=(verschijnt in een separaat browser venster)
  27.  !endif
  28.  !if $module_language=es
  29.   !set prompt1=Herramientas en línea útiles:
  30.   !set prompt2=(disponibles en otra ventana de su navegador)
  31.  !endif
  32.  
  33. !endif
  34.  
  35. !reset T_
  36. !for t in $p_
  37.   !set tit=!module title tool/$t
  38.   !if $tit!=$empty and $tit!=$module_title
  39.    !set T_=!append line $t,$tit to $T_
  40.   !endif
  41. !next t
  42. !if $T_!=$empty
  43.  !set n_=!linecnt $T_
  44.  <p>$prompt1
  45.  !for i=1 to $n_
  46.    !set l_=!line $i of $T_
  47.    !set t_=!item 1 of $l_
  48.    !set n_=!item 2 to -1 of $l_
  49.    !href target=wims_tool module=tool/$t_ $n_
  50.    &nbsp;
  51.  !next i
  52.  <small>$prompt2</small> <p>
  53. !endif
  54.  
  55.