hedgewars/uScript.pas
changeset 11944 87edf67f2107
parent 11941 7ece39a537bd
child 11945 1e58845fa3c1
equal deleted inserted replaced
11943:a50cf6f5e3cd 11944:87edf67f2107
  2610 begin
  2610 begin
  2611     if CheckLuaParamCount(L, 1, call, params) then
  2611     if CheckLuaParamCount(L, 1, call, params) then
  2612         begin
  2612         begin
  2613         at:= LuaToAmmoTypeOrd(L, 1, call, params);                                                                                                   
  2613         at:= LuaToAmmoTypeOrd(L, 1, call, params);                                                                                                   
  2614         if at >= 0 then   
  2614         if at >= 0 then   
  2615             lua_pushstring(L, PChar(trammo[Ammoz[TAmmoType(at)].NameId]));
  2615             if length(trluaammo[Ammoz[TAmmoType(at)].NameId]) > 0 then
       
  2616                 lua_pushstring(L, PChar(trluaammo[Ammoz[TAmmoType(at)].NameId]))
       
  2617             else
       
  2618                 lua_pushstring(L, PChar(trammo[Ammoz[TAmmoType(at)].NameId]));
  2616         end
  2619         end
  2617     else
  2620     else
  2618         lua_pushnil(L);
  2621         lua_pushnil(L);
  2619     lc_getammoname:= 1;
  2622     lc_getammoname:= 1;
  2620 end;
  2623 end;