Subversion Repositories wimsdev

Rev

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

  1.  
  2. !set module_language=!trim $module_language
  3. !if $module_language=$empty or $module_language notwordof $wims_site_languages
  4.  !set module_language=en
  5. !endif
  6.  
  7. !read name.phtml.$module_language
  8. !default wims_name_bgcolor=$wims_ref_bgcolor
  9.  
  10. !if $wims_hm!=$empty
  11.  !goto defend
  12. !endif
  13.  
  14. !reset 1_
  15. !if _ isin $wims_session
  16.  !if _exam isin $wims_session
  17.   !set wims_pses=!translate _ to , in $wims_session
  18.   !set wims_pses=!item 1 of $wims_pses
  19.   !set wims_pser=!randint 1,99999
  20.   !set wims_href_opener=window.opener.location='$wims_ref_name?session=$wims_pses.1&cmd=reply&job=student&randomizer=$wims_pser';
  21.  !endif
  22.  !set 1_=!append line back,3,window.close();$wims_href_opener to $1_
  23. !else
  24.  !set 1_=!append line home,1,session=$wims_session.1\
  25.   visitor,1,cmd=close&module=home&lang=$lang to $1_
  26. !endif
  27. !if _check isin $wims_session
  28.  !set ckstep=$special_parm
  29.  !distribute item $wims_check into ckmodule,ckuser,cksession,ckexo,cksteps,score
  30.  !set qstr=module=$ckmodule&cmd=new&job=examcheck&checkuser=$ckuser&checksession=$cksession&checkexo=$ckexo
  31.  !set 2_= 
  32.  !if $ckstep>1
  33.   !set 2_=$2_<a href=$wims_ref_name?session=$session&$qstr&checkstep=1>||</a>&nbsp;<a href=$wims_ref_name?session=$session&$qstr&checkstep=$[$ckstep-1]>&lt;&lt;</a>&nbsp;
  34.  !endif
  35.  !if $ckstep<$cksteps
  36.   !set 2_=$2_<a href=$wims_ref_name?session=$session&$qstr&checkstep=$[$ckstep+1]>&gt;&gt;</a>&nbsp;<a href=$wims_ref_name?session=$session&$qstr&checkstep=$cksteps>||</a>
  37.  !endif
  38.  !set 1_=!append line nav,0,$2_ to $1_
  39.  !set 3_=!translate internal - to , in $ckexo
  40.  !set 3_=!item -1 of $3_
  41.  !set 2_=<small>$ckuser: $3_=$module. $cksteps steps, $score/10.</small>
  42.  !set wims_hm=!append line score,0,$2_ to $1_
  43.  !goto defend
  44. !endif
  45. !if adm/forum notin $module and _ notin $wims_session \
  46.         and $wims_sheet=$empty
  47.  !set 1_=!append line forum,1,module=adm/forum/mboard to $1_
  48. !endif
  49. !if $cmd=intro
  50.  !set 1_=!append line work,1,module=$module&cmd=new to $1_
  51. !endif
  52. !if $wims_sheet!=$empty or _exam isin $wims_session
  53.  !set 1_=!append line tools,4,module=home,tool to $1_
  54. !endif
  55. !if _ notin $wims_session and adm/ notin $module \
  56.         and $cmd notwordof help ref
  57.  !set 1_=!append line ref,4,module=$module&cmd=ref&special_parm=$cmd,ref to $1_
  58. !endif
  59. !if $wims_sheet>0 or P isin $wims_sheet
  60.  !set 1_=!append line sheet,1,module=adm/sheet&sh=$wims_sheet to $1_
  61. !endif
  62. !if $cmd=help or $cmd=hint
  63.  !set 1_=!append line resume,1,cmd=resume to $1_
  64. !endif
  65. !if $module_has_intro=yes and $cmd notwordof intro help and \
  66.         $wims_sheet=$empty and exam notin $wims_session
  67.  !set 1_=!append line intro,1,module=$module&cmd=intro&special_parm=$wims_intro_parm to $1_
  68. !endif
  69. !if $module_has_help=yes and $cmd notwordof intro help
  70.  !if $module_help=$empty or $module_help=popup
  71.   !set 1_=!append line help,4,module=$module&cmd=help&special_parm=$wims_help_parm,mhelp to $1_
  72.  !else
  73.   !set 1_=!append line help,1,module=$module&cmd=help&special_parm=$wims_help_parm to $1_
  74.  !endif
  75. !endif
  76. !if $module_has_about=yes and $cmd notwordof help intro
  77.  !set 1_=!append line about,4,module=$module&cmd=help&special_parm=about,mhelp to $1_
  78. !endif
  79. !if _ notin $wims_session
  80.  !set 1_=!append line whelp,4,module=help/main&$wims_helper,help to $1_
  81. !endif
  82.  
  83. !set wims_hm=$1_
  84. :defend
  85. !set wims_hm_cnt=!linecnt $wims_hm
  86.  
  87. !read themes.phtml header
  88.  
  89. <div class=wimsbody>
  90.