hedgewars/uScript.pas
changeset 13832 10a3b80130b5
parent 13812 0beff00d223a
child 13842 35ba3a550cad
equal deleted inserted replaced
13831:b07610de9957 13832:10a3b80130b5
  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+FormatA(trmsg[sidChatHog], [gear^.Hedgehog^.Name, vgear^.text]));
  1654                    AddChatString(#9+FormatA(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));