equal
deleted
inserted
replaced
1905 var gear : PGear; |
1905 var gear : PGear; |
1906 begin |
1906 begin |
1907 if CheckLuaParamCount(L, 2, 'SetTimer', 'gearUid, timer') then |
1907 if CheckLuaParamCount(L, 2, 'SetTimer', 'gearUid, timer') then |
1908 begin |
1908 begin |
1909 gear:= GearByUID(Trunc(lua_tonumber(L, 1))); |
1909 gear:= GearByUID(Trunc(lua_tonumber(L, 1))); |
1910 if gear <> nil then gear^.Timer:= Trunc(lua_tonumber(L, 2)) |
1910 if gear <> nil then |
|
1911 begin |
|
1912 gear^.Timer:= Trunc(lua_tonumber(L, 2)); |
|
1913 if gear^.RenderTimer and (gear^.Tex <> nil) then |
|
1914 FreeAndNilTexture(gear^.Tex); |
|
1915 end; |
1911 end; |
1916 end; |
1912 lc_settimer:= 0 |
1917 lc_settimer:= 0 |
1913 end; |
1918 end; |
1914 |
1919 |
1915 function lc_setflighttime(L : Plua_State) : LongInt; Cdecl; |
1920 function lc_setflighttime(L : Plua_State) : LongInt; Cdecl; |