Basicly a remote script that sets stuff into the Popups for nicklist and query. It's like for shooting, and it has to be reloaded eventually, and when you level up, it does more damage! :D
Make sure you save this script before putting it anywhere, if you don't it might not work properly..

On *:Load: {
  set %Level 1
  set %Bullets 8
  set %Exp 0
}
Menu Nicklist,Query {
  .Shoot {
    if (%Exp > $Calc( %Level * 150) ) && (%Bullets > 0) && ($1 != $Me) {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %Bullets
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      inc %Level
      set %Exp 0
      me shoots at $1 with their M1 Grand doing ( %Damage ) Damage!  They also gain ( %Gained ) exp!
      .timer.Level^1 1 1 set %Exp 0
      .timer.Level^2 1 2 inc %Level
      .timer.Level^3 1 3 me  12,1( $+ 7Level up! $+ 12) has leveled up to level ( %Level )! 12,1( $+ 7Level up! $+ 12)
    }
    if (%Exp < $Calc( %Level * 150) ) && (%Bullets > 0) && ($1 != $Me)  {
      set %Damage $Calc( %Level * $rand(1,15) )
      dec %Bullets
      set %Gained $Rand(10,20)
      inc %Exp %Gained
      me shoots at $1 with their M1 Grand doing ( %Damage ) Damage!  They also gain ( %Gained ) exp!
    }
    if (%Bullets <= 0) && ($1 != $Me)  {
      echo -a You are out of ammo!
      halt
    }
    if ($1 = $Me) {
      echo -a You cannot shoot yourself!
    }
  }
  .Reload {
    .timer.Reload1 1 30 set %Bullets 8
    .timer.Reload2 1 2 me is reloading his M1 Grand!
    .timer.Reload3 1 31 me is done reloading their M1 Grand!
  }
}