hedgewars/uScript.pas
changeset 13876 aa321e51da14
parent 13868 26ebbf9717fd
child 13933 429945a9b8db
equal deleted inserted replaced
13875:f81fad2f0e70 13876:aa321e51da14
  1649             if vgear <> nil then
  1649             if vgear <> nil then
  1650                begin
  1650                begin
  1651                vgear^.Text:= lua_tostring(L, 2);
  1651                vgear^.Text:= lua_tostring(L, 2);
  1652                if Gear^.Kind = gtHedgehog then
  1652                if Gear^.Kind = gtHedgehog then
  1653                    begin
  1653                    begin
  1654                    AddChatString(#9+Format(trmsg[sidChatHog], gear^.Hedgehog^.Name, vgear^.text));
  1654                    AddChatString(#9+Format(shortstring(trmsg[sidChatHog]), gear^.Hedgehog^.Name, vgear^.text));
  1655                    vgear^.Hedgehog:= gear^.Hedgehog
  1655                    vgear^.Hedgehog:= gear^.Hedgehog
  1656                    end
  1656                    end
  1657                else vgear^.Frame:= gear^.uid;
  1657                else vgear^.Frame:= gear^.uid;
  1658 
  1658 
  1659                vgear^.FrameTicks:= Trunc(lua_tonumber(L, 3));
  1659                vgear^.FrameTicks:= Trunc(lua_tonumber(L, 3));