function FadingTextSingle takes player p, string msg, integer red, integer green, integer blue, real x, real y, real vel, real fade, real life returns nothing    
          local texttag t=CreateTextTag()    
          call SetTextTagText(t,msg,0.024)    
          call SetTextTagPos(t,x,y, 0.00)    
          call SetTextTagColor(t,red,green,blue,255)    
          call SetTextTagVelocity(t,0,vel)    
          call SetTextTagVisibility(t,(GetLocalPlayer() == p))    
          call SetTextTagFadepoint(t, fade)    
          call SetTextTagLifespan(t, life)    
          call SetTextTagPermanent(t, false)    
          set t = null    
endfunction