listen_for_hit

listen_for_hit = [
  my_pstat_weap = (pstat_weap (findcn $curname))
  if (checkalias old_pstat_weap) [
    if (! (strcmp $my_pstat_weap $old_pstat_weap)) [
      curweapindex = (+ (* (curweapon) 2) 1)
      if (> (at $my_pstat_weap $curweapindex) (at $old_pstat_weap $curweapindex)) [
        loadcrosshair dot_wide-hit.png // replace this with the "hit" crosshair
        sleep 100 [
          loadcrosshair dot_wide.png // the default crosshair
          loadcrosshair teammate.png teammate
          loadcrosshair red_dot.png scope ] ] ] ]
  old_pstat_weap = $my_pstat_weap
  sleep 0 listen_for_hit ]