hedgewars/uScript.pas
changeset 5964 44d2dc3b438f
parent 5900 37516a3bdb0e
child 5995 647d52370ce9
child 6019 8843ea756cfc
equal deleted inserted replaced
5962:a5267091b205 5964:44d2dc3b438f
  1205         if gear <> nil then
  1205         if gear <> nil then
  1206             begin
  1206             begin
  1207             lua_pushinteger(L, hwRound(gear^.X));
  1207             lua_pushinteger(L, hwRound(gear^.X));
  1208             lua_pushinteger(L, hwRound(gear^.Y))
  1208             lua_pushinteger(L, hwRound(gear^.Y))
  1209             end
  1209             end
       
  1210         else
       
  1211             begin
       
  1212             lua_pushnil(L);
       
  1213             lua_pushnil(L)
       
  1214             end;
  1210         end;
  1215         end;
  1211     lc_getgearposition:= 2;
  1216     lc_getgearposition:= 2;
  1212 end;
  1217 end;
  1213 
  1218 
  1214 function lc_setgearposition(L : Plua_State) : LongInt; Cdecl;
  1219 function lc_setgearposition(L : Plua_State) : LongInt; Cdecl;