作者  [e-mail] (jjchen),                看板  MUD         
 標題  semote.c                                                               
 時間  交大資工鳳凰城資訊站 (Thu Jul  9 00:00:09 1998)                        
 來源  SimFarm!news.ntu!news.mcu!news.cs.nthu!news.csie.nctu!phoenix          
───────────────────────────────────────

// /cmds/std/semote.c
// 本檔案改自 es2  mudlib
// 歡迎流傳本檔案, 請保留本檔頭
// wade 1998/7/10

inherit F_CLEAN_UP;

int main(object me, string arg)
{
  string        *e, buf;
  mapping       emotes;
  int           i;

  emotes = EMOTE_D->query_all_emotes();
  e = sort_array(EMOTE_D->query_all_emote(), "sort_keys", this_object());

  buf = "";
  for(i=0; i<sizeof(e); i++)
    buf += sprintf("%-26s%s", e[i]+"("+emotes[e[i]]["short"]+")",
(i%3==2)?"\n":
 "");
  buf += "\n";
  me->start_more (buf);
  return 1;
}

int sort_keys (string key1, string key2)
{
  return strcmp (key1, key2);
}

int help(object me)
{
  write(@HELP
指令格式 : semote
指令說明 :
           這個指令可以列出目前所能使用的動作。
           動作除了可以直接用，有點類似說話以外，
           還可以配合 chat* 來用， 類似 chat。
使用範例 :
           semote
           smile
           chat* smile
HELP
    );
    return 1;
}