做Check Mate功能包常用的几个信息输出打印方法

admin

9 l3 ?( Z* A  ~  X0 ^6 Z
: Y  B" Q: s* O$ Z做Check Mate功能包常用的几个信息输出打印方法
+ f. w# M! n  t1 z( o2 m: d
#  Checker function
( r- R9 E9 R0 X/ C4 _4 ^6 F(Any Uncached) do_check:
* x: ]) ?: D! X) u' M' }4 ~" @@{
8 D' o% l( G9 V$ ]. i8 p    $tag << XXXXX();
  A* Z% ~& E+ {- |    $log_option << Nth( log_type:, log_type_option: );
    $log_str << mqc_sprintf ("XXXXXXXXXX: %s", UG_askObjectName(%mqc_askHostpointerOfTag($tag)) );
   
* w5 F3 J2 C1 H9 P% x9 O$ {    if ($tag > 0) Then
    @{
8 n  i6 M. U0 T1 ^        ug_PrintValue($log_str);
7 [0 M4 T4 G3 v  W        mqc_logError( $tag, {}, $log_str );
  z/ F( Y1 q' x4 G3 q4 O8 V    }
2 W1 `0 s8 Z& v8 [. q9 Q" d- s2 T    else
1 Y5 ]  `1 K0 i6 t" l. q        mqc_log( $log_option, {}, "No active SkeTCh found.");
- {$ X' o/ m; ?. ^# p, \- c) _1 O};