XENOBOT SKRYPTY LUA, MASS SHARING!

hugo999 OP · 10-07-2014 18:05

Wpadłem na pomysł aby każdy torgowicz który ma swoje lua skrypty (funkcje, moduły) wstawił tutaj i się podzielił z innymi. No to ja wstawiam pierwszy.
Aby było prosto i czytelnie sugeruje użycie takiego formularza: Nazwa Skryptu -> KOD -> "Przykładowe Użycie" -> Finalna Funkcja.

Otwieranie drzwi za pomocą klucza.

Kod:

function OpenDoor(x, y, z, id)
tmp = 0
  if Map.IsTileWalkable(x, y, z) then
    return false 
  else
    tmp = Map.GetTopUseItem(x, y, z).id
    Self.UseItemFromGround(x, y, z)
    wait(Self.Ping() * 2, Self.Ping() * 3) 
  if tmp == Map.GetTopUseItem(x, y, z).id then
    UseItemFromBP(x, y, z, id)
    end
  end
end
 
function UseItemFromBP(x, y, z, id)
  for i = 0, 15 do
  BP = Container.New(i)
    for SPOT = BP:ItemCount() - 1, 0, -1 do
      if (BP:GetItemData(SPOT).id == id) then
        BP:UseItemWithGround(SPOT, x, y, z)
      end
    end
  end
end

Przykładowe użycie:

Kod:

OpenDoor(32400, 31789, 8, 2973)

liker · 10-07-2014 23:48

nie wiem czy ten temat jakkolwiek ruszy, ponieważ tutaj połowa userów nie potrafi nawet lua skonfigurować, a co nie mówić robić skrypty jakieś :)

ps. to o co się pytałem wczoraj już zrobiłem, śmiga jak ta lala :)

**zakius** · 10-07-2014 23:50

Lua to jeden z najelastyczniejszych języków, który przy okazji jest bardzo prosty do opanowania
jak ktoś sam nie potrafi sobie skryptu w lua napisać (albo domyslić się, że jak skopiuj ebez ostatniej linijki to jego wina, a nie bluzgać na autora :p)to tym bardziej nie powinien bocić(albo zabierać za OT, żadna różnica), ale co ja tam wiem...

**ProEda** · 10-07-2014 23:58

czyli trzeba najpierw kod wgrac do skryptow, a potem w walkerze to przykładowe użycie?
a w tym kodzie najpierw podstawic wartosci?
jak ogarniam settingi, to tego nie czaje, nie dziala mi :d co musze zmienic w kodzie?
wpisuje polozenie mojego pionka i id keya i nic

**zakius** · 11-07-2014 00:03

no masz, wywołanieFunkcji(argumenty) tak?
x, y, z, idklucza

ta, zapewne w walkerze masz opcję wklejenia skryptu gdzieś, nei wiem, xeno mnie na tyle odrzuca interfejsem (idea zacna, ale mało praktyczna), że się nie bawiłem

a pozycję pewnie drzwi masz wpisać

//wychodzi

**ProEda** · 11-07-2014 00:15

Kod:

function OpenDoor(32656, 31657, 10, 2969)
tmp = 0
  if Map.IsTileWalkable(32656, 31657, 10) then
    return false 
  else
    tmp = Map.GetTopUseItem(32656, 31657, 10).2969
    Self.UseItemFromGround(32656, 31657, 10)
    wait(Self.Ping() * 2, Self.Ping() * 3) 
  if tmp == Map.GetTopUseItem(32656, 31657, 10).2969 then
    UseItemFromBP(32656, 31657, 10, 2969)
    end
  end
end
 
function UseItemFromBP(32656, 31657, 10, 2969)
  for i = 0, 15 do
  BP = Container.New(i)
    for SPOT = BP:ItemCount() - 1, 0, -1 do
      if (BP:GetItemData(SPOT).2969 == 2969) then
        BP:UseItemWithGround(SPOT, 32656, 31657, 10)
      end
    end
  end
end

tak o?
nie laduje mi sie to :p

Diabel · 11-07-2014 06:53

Jeśli ktoś chce otworzyć dom społeczny gdzieś w depo czy gdziekolwiek no to proszę bardzo :D

Kod PHP:

Module.New('Player_On_Position', function(Mod)
		local Player_Detected = false
        for name, creature in Creature.iPlayers(7) do
            if (creature:Position().x == Self.Position().x and creature:Position().y == (Self.Position().y-1) and creature:Position().z == (Self.Position().z)) then
              				Player_Detected = true
			  if (creature:Name()~=Player_LastName) then
				Player_LastName=creature:Name()
				Bye_Say = true
                Self.Say("Bierz Mnie " ..Player_LastName.. "! Bierz Mnie Ostro Tygrysie!")
				end
				if (Self.LookDirection() ~= SOUTH) then
						Self.Turn(SOUTH)
				end
            end
		end
        if not (Player_Detected) then
				if (Bye_Say==true) then
				Bye_Say=false
                Self.Say(""..Player_LastName.. " Tak szybko skonczyles? WSTYD!")
				end
				if (Self.LookDirection() ~= NORTH) then
				Self.Turn(NORTH)
			end
		end
	Mod:Delay(100)
	end)

hugo999 OP · 11-07-2014 08:29

ProEda napisał

Cytat został ukryty, ponieważ ignorujesz tego użytkownika. Pokaż cytat.

Kod:

function OpenDoor(32656, 31657, 10, 2969)
tmp = 0
  if Map.IsTileWalkable(32656, 31657, 10) then
    return false 
  else
    tmp = Map.GetTopUseItem(32656, 31657, 10).2969
    Self.UseItemFromGround(32656, 31657, 10)
    wait(Self.Ping() * 2, Self.Ping() * 3) 
  if tmp == Map.GetTopUseItem(32656, 31657, 10).2969 then
    UseItemFromBP(32656, 31657, 10, 2969)
    end
  end
end
 
function UseItemFromBP(32656, 31657, 10, 2969)
  for i = 0, 15 do
  BP = Container.New(i)
    for SPOT = BP:ItemCount() - 1, 0, -1 do
      if (BP:GetItemData(SPOT).2969 == 2969) then
        BP:UseItemWithGround(SPOT, 32656, 31657, 10)
      end
    end
  end
end

tak o?
nie laduje mi sie to :p

Kod:

registerEventListener(WALKER_SELECTLABEL,"onWalkerSelectLabel")

function onWalkerSelectLabel(labelName)
if (labelName == "OpenFirstDoor") then
  Walker.Stop()
    OpenDoor(32400, 31789, 8, 2973)
  Walker.Start()

elseif (labelName == "OpenSecondDoor") then
  Walker.Stop()
    OpenDoor(32401, 31744, 9, 2972)
  Walker.Start()
	end
end


function OpenDoor(x, y, z, id)
tmp = 0
  if Map.IsTileWalkable(x, y, z) then
    return false 
  else
    tmp = Map.GetTopUseItem(x, y, z).id
    Self.UseItemFromGround(x, y, z)
    wait(Self.Ping() * 2, Self.Ping() * 3) 
  if tmp == Map.GetTopUseItem(x, y, z).id then
    UseItemFromBP(x, y, z, id)
    end
  end
end
 
function UseItemFromBP(x, y, z, id)
  for i = 0, 15 do
  BP = Container.New(i)
    for SPOT = BP:ItemCount() - 1, 0, -1 do
      if (BP:GetItemData(SPOT).id == id) then
        BP:UseItemWithGround(SPOT, x, y, z)
      end
    end
  end
end

Przykład wykorzystywania w CaveBocie, załadujesz skrypt lua, a następnie robisz jakieś wpt> podchodzisz do drzwi dajesz stand i ustawiasz label OpenFirstDoor, analogicznie robisz z innymi drzwiami i tu masz label OpenSecondDoor.

Temat: XENOBOT SKRYPTY LUA, MASS SHARING!

Narzędzia tematu

Oceń ten temat

XENOBOT SKRYPTY LUA, MASS SHARING!

Informacje o temacie

Użytkownicy przeglądający temat

Podobne tematy

[LUA] Krótsze odpowiedniki w lua - autorstwa Grimkka

skrypty w c++ / lua - poszukuje programistow

skrypty w c++ / lua - poszukuje programistow

[Lua] Od zera do skryptera, czyli LUA: Pętle i tablice*

[Lua] Od zera do skryptera, czyli LUA: PODSTAWY i Actions*

Zakładki

Zakładki

Zasady postowania