Subversion Repositories wimsdev

Rev

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

  1. !set wims_module_error=error: $error
  2. !if $oldpenalty<$penalty
  3.  !set penaltymsg=Õâ¸öÑÏÖØ´íÎóÒª¿Û·Ö.
  4.  !set oldpenalty=$penalty
  5. !endif
  6.  
  7. <b>´íÎó.</b>
  8.  
  9. !set n=!wordcnt $error
  10. !if $n>1
  11.  $error
  12.  !exit
  13. !endif
  14.  
  15. !if $error iswordof empty_data bad_data bad_reply double_reply\
  16.     bad_answer bad_exo nofloat unjustified check_fail no_object\
  17.     bad_step illegal_method bad_method bad_env fixedgoal msg\
  18.     unknown_variable
  19.  !goto $error
  20. !else
  21.  !msg $error
  22.  !exit
  23. !endif
  24.  
  25. :empty_data
  26.  Äã·¢Ë͵Ļشð²»ÍêÕû. Çë²¹ÍêÕû.
  27.  !exit
  28.  
  29. :bad_data
  30.  ÄãµÄÊý¾Ý²»ÄÜÀí½â. ´ò×Ö´íÎó?
  31.  !exit
  32.  
  33. :bad_reply
  34.  ²»! ÄãµÄ»Ø´ðÊÇ´íµÄ. ÇëÔÙÊÔ.
  35.  !exit
  36.  
  37. :double_reply
  38. ±¾Á·Ï°ÒѾ­½áÊøÇÒ´òÁË·Ö. Äã²»ÄܼÌÐø·¢Ëͻشð.
  39. (Ç벻ҪʹÓÃä¯ÀÀÆ÷µÄ `Ë¢ÐÂ' °´Å¥Öظ´·¢Ëͻشð!)
  40. !exit
  41.  
  42. :unknown_variable
  43. ±äÁ¿ <b><em>$unknown</em></b> ÔÚÕâÀïûÓж¨Òå¹ý.
  44. !exit
  45.  
  46. :nofloat
  47. Á·Ï°Öв»ÄÜʹÓÃСÊý. Óà 1/3 ´úÌæ
  48. 0.33333, ÓÃ 1/4 ´úÌæ 0.25!
  49. !exit
  50.  
  51. :unjustified
  52. ±§Ç¸, Õâ¸ö·½·¨²»ÄܽÓÊÜÄãµÄÊäÈë.
  53. ÄãÓ¦¸Ã³¢ÊÔÆäËûÊÖ¶Î.
  54. !exit
  55.  
  56. :check_fail
  57. Èí¼þ´íÎó: Ç뱨¸æÕâ¸ö©¶´.
  58. !exit
  59.  
  60. :no_object
  61. ÔÚÕâÖÖÇé¿öÄãûÓÐÓ¦Óô˷½·¨µÄÒÀ¾Ý <font color="red">
  62. <em>$badmeth</em></font>.
  63. !exit
  64.  
  65. :bad_step
  66. ÄãÏëÒª³¢ÊÔÎÞЧµÄ²½Öè. ²Ù×÷´íÎó?
  67. !exit
  68.  
  69. :illegal_method
  70. ÄãÏëʹÓò»±»ÔÊÐíµÄ·½·¨. ÏëҪȡÇÉÂð?
  71. !exit
  72.  
  73. :bad_method
  74. ´Ë·½·¨²»´æÔÚ. ÕâÒ²ÐíÊÇÁ·Ï°µÄ´íÎó.
  75. ÇëÓë×÷ÕßÁªÏµÒÔ¾ÀÕýËü.
  76. !exit
  77.  
  78. :bad_env
  79. ´Ë·½·¨ÓëÁ·Ï°µÄµÄ»·¾³²»ÏàÈÝ.
  80. !exit
  81.  
  82. :fixedgoal
  83. Õâ¸öÁ·Ï°²»ÔÊÐíÄã¸Ä±äÄ¿±ê.
  84. ËùÒÔÄã²»ÄÜʹÓÃÕâ¸ö·½·¨.
  85. !exit
  86.  
  87. :msg
  88. $msg
  89. !exit
  90.  
  91. :bad_answer
  92. ÄãµÄ»Ø´ð <p><center>
  93. <b>$bad_name</b> = <tt>$bad_value</tt> <p></center>
  94. !if unknownword iswordof $test
  95.  !set w=!word 3 of $test
  96.  ²»¿ÉÀí½â: »Ø´ðÖÐµÄ´Ê <font color="red">$w</font>
  97.  ÓëÎÊÌâÎÞ¹Ø. Çë¾ÀÕý.
  98.  !exit
  99. !endif
  100. !if nocompute iswordof $test
  101.  ²»±»ÔÊÐí: ÇëÄã×Ô¼º¼ÆËãºÃ,
  102. ÔÙÌá½»¼ÆËã½á¹û.
  103.  !exit
  104. !endif
  105. !if badform iswordof $test
  106.  ²»·ûºÏÒªÇó. ÇëÖØÐÂд³ÉÕýÈ·µÄÐÎʽ.
  107.  !exit
  108. !endif
  109. !if notunit iswordof $test
  110.  Ö»ÊÇÒ»¸öÊý: ÇëÃ÷È·ËüµÄµ¥Î».
  111.  !exit
  112. !endif
  113. ²»ÄÜÀí½â.
  114. Çë¸ÄÕý²¢ÖØÐ·¢ËÍ.
  115. !exit
  116.  
  117. :bad_exo
  118. ÓÉÓÚ±¾Á·Ï°Éè¼ÆÓдí (<b>$(replyname$i)</b> µÄÕýÈ·´ð°¸ÊÇÎÞЧµÄ),
  119. ÎÞ·¨²âÊÔÄãµÄ»Ø´ðµÄÕýÈ·ÐÔ.
  120. Òò´ËÖ»ÄÜÇëÄã»»Ò»¸öÁ·Ï°. ±§Ç¸.
  121. <p>
  122. Èç¹ûÄãÒª±¨¸æÕâ¸öÎÊÌâ, Çë
  123. !if $email!=$empty
  124.  !mailurl $email ÁªÏµ×÷Õß
  125. !else
  126.  ÁªÏµ×÷Õß
  127. !endif
  128. .
  129. !exit
  130.  
  131.  
  132.  
  133.