
   /* AMX Mod script.
   *
   * (c) Copyright 2003, BouBou (c) DevProd.com
   * This file is provided as is (no warranties).
   *
   * SwissGamesCave Server Admin
   */
   #include <amxmod>
   public tk_slap(id){
       new killer = read_data(1)
       new victim = read_data(2)
       new Vmsg[100], Kname[32]

       if (get_user_team(killer)==get_user_team(victim)&& killer!=0) {
               get_user_name(killer,Kname,31)
           user_slap(killer,10)
           emit_sound(id,CHAN_ITEM,      "player/pl_slosh4.wav",     1.0,
   ATTN_NORM, 0, PITCH_NORM)
           format(Vmsg,99,"%s^ncommitted  TK^nand  as been slaped^nby the
   server",Kname)
           set_hudmessage(200,  150,  0,  0.75,  0.50,  0, 3.0, 3.0, 0.5,
   0.15, 4)
                   show_hudmessage(killer,"Don't kill your friends:^nSlap
   loss 10 Health")
           show_hudmessage(victim,Vmsg)
       }
   }
   public plugin_init() {
       register_plugin("DoD TK Events","1.1.0","BouBou")
       register_event("DeathMsg","tk_slap","a")
       return PLUGIN_CONTINUE
   }
