Menu
Co nowego?
Przez:
Filtry
  • logo_cipsoft
    Nowe serwery zostały otwarte 19 Lut 2025:
    Noctalia (Open PvP) Ignitera (Open PvP) us_logo Xybra (Open PvP)

[x.x][Skrypty] Zam?wienia

Status
Zamknięty.
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

mug? bys mi podac dok?adnie bo mi si? 1 strona z 5 minut ?aduje cos z mojim netem jeb**** i mam jeszcze 1 pro?be
nie wiem czy to skrypt czy item
bo chcia? bym miec taki Parhament kt?ry teleport?je do temple zeby kosztowa? 5 k i by sie pisa?o !buyParhament czy cos podobnego
widzialem cos takiego na 1 otsie nie pami?tam ip

PS:Oczywi?cie all pod tibie 8.10
 
Ostatnia edycja:
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

@gelio
1.

-- the id of the creature we are attacking, following, etc.

target = 0
following = false
attacking = false

function onThingMove(creature, thing, oldpos, oldstackpos)

end


function onCreatureAppear(creature)

end


function onCreatureDisappear(cid, pos)

end


function onCreatureTurn(creature)

end



function onCreatureSay(cid, type, msg)
msg = string.lower(msg)

if (string.find(msg, '(%a*)hi(%a*)')) and getDistanceToCreature(cid) < 4 then
selfSay('You do not talk about Fight Club.')
end
end


function onCreatureChangeOutfit(creature)

end


function onThink()

end
Kliknij aby rozwinąć...

<?xml version="1.0"?>
<npc name="Cody" script="data/npc/scripts/guard.lua" access="3">
<look type="128" head="4" body="114" legs="132" feet="115"/>
</npc>
Kliknij aby rozwinąć...

2. Niby jak mam je przerobi? ? Jak bym wiedzia? to bym nie pisa?.
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

NPC pod 8.1 kt?ry wymienia itemy na itemki do wyboru nie wiem co tu jest ?le:
Kod: 
local focus = 0
local talk_start = 0
local target = 0
local following = false
local attacking = false

function onThingMove(creature, thing, oldpos, oldstackpos)

end


function onCreatureAppear(creature)

end


function onCreatureDisappear(cid, pos)
  	if focus == cid then
          selfSay('Good bye then.')
          focus = 0
          talk_start = 0
  	end
end


function onCreatureTurn(creature)

end


function msgcontains(txt, str)
  	return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end


function onCreatureSay(cid, type, msg)
  	msg = string.lower(msg)

  	if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
  		selfSay('Witaj, ' .. getCreatureName(cid) .. '! Sprzedaje "pacc7" za 3 magic sulphur, "pacc12" za 5, "pacc30" za 10, "magic long sword", "golden bow", "crystal arrow", "arcane staff" wszystkie oprocz pacc za 5. Cos chcesz kupic?')
  		focus = cid
  		talk_start = os.clock()

  	elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
  		selfSay('Sorki, ' .. getCreatureName(cid) .. '! Ale gadam z kims innym!')

	elseif focus == cid then
		talk_start = os.clock()

		if msgcontains(msg, 'pacc7')then
			buy(cid,2275,1,0)
			sell(cid,5904,3,0)
		elseif msgcontains(msg, 'pacc12') then
			buy(cid,2276,1,0)
			sell(cid,5904,5,0)
		elseif msgcontains(msg, 'pacc30') then
			buy(cid,2306,1,0)
			sell(cid,5904,10,10)
		elseif msgcontains(msg, 'magic long sword') then
			buy(cid,2390,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'golden bow') then
			buy(cid,7438,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'crystal arrow') then
			buy(cid,2352,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'arcane staff') then
			buy(cid,2453,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'aol') then
			buy(cid,2173,getCount(msg),10000)

		elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
			selfSay('Narazie, ' .. getCreatureName(cid) .. '!')
			focus = 0
			talk_start = 0
		end
	end
end


function onCreatureChangeOutfit(creature)

end


function onThink()
	if focus > 0 then 
		x, y, z = creatureGetPosition(focus)
		myx, myy, myz = selfGetPosition()
		
		if ((myy-y==0) and (myx-x<=0 and myx-x>=-4)) then
			selfTurn(1)
		end 
		if ((myy-y==0) and (myx-x>=0 and myx-x<=4)) then
			selfTurn(3)
		end
		if ((myx-x==0) and (myy-y<=0 and myy-y>=-4)) then
			selfTurn(2)
		end
		if ((myx-x==0) and (myy-y>=0 and myy-y<=4)) then
			selfTurn(0)
		end
		if ((myy-y==-2) and (myx-x>=-1 and myx-x<=1)) then
			selfTurn(2)
		end
		if ((myy-y==2) and (myx-x>=-1 and myx-x<=1)) then
			selfTurn(0)
		end
		if ((myx-x==2) and (myy-y>=-1 and myy-y<=1)) then
			selfTurn(3)
		end
		if ((myx-x==-2) and (myy-y>=-1 and myy-y<=1)) then
			selfTurn(1)
		end
		if ((myy-y==-3) and (myx-x>=-2 and myx-x<=2)) then
			selfTurn(2)
		end
		if ((myy-y==3) and (myx-x>=-2 and myx-x<=2)) then
			selfTurn(0)
		end
		if ((myx-x==3) and (myy-y>=-2 and myy-y<=2)) then
			selfTurn(3)
		end
		if ((myx-x==-3) and (myy-y>=-2 and myy-y<=2)) then
			selfTurn(1)
		end
		if ((myy-y==-4) and (myx-x>=-3 and myx-x<=3)) then
			selfTurn(2)
		end
		if ((myy-y==4) and (myx-x>=-3 and myx-x<=3)) then
			selfTurn(0)
		end
		if ((myx-x==4) and (myy-y>=-3 and myy-y<=3)) then
			selfTurn(3)
		end
		if ((myx-x==-4) and (myy-y>=-3 and myy-y<=3)) then
			selfTurn(1)
		end
	end

  	if (os.clock() - talk_start) > 30 then
  		if focus > 0 then
  			selfSay('Nastepny...')
  		end
  			focus = 0
  	end
 	if focus ~= 0 then
 		if getDistanceToCreature(focus) > 5 then
 			selfSay('Gdzie maniery?')
 			focus = 0
 		end
 	end
end

Chodzi o to ?e ten npc zabiera item i daje to jest dobrze. Ale jak nie mam itemku to i tak da... Tylko napisze "you dont have (blabla)!"

Dodam:
Kod: 
<?xml version="1.0"?>

<npc name="Super itemy" script="data/npc/scripts/itemki.lua" access="1" lookdir="2">
	<mana now="800" max="800"/>
	<health now="200" max="200"/>
<look type="75" head="20" body="30" legs="40" feet="50"/>
</npc>

@Gelio wielkie dzi?ki, dzia?a.
 
Ostatnia edycja:
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

3 skryptow potrzebuje:
1. Npc taki ktoremu przyniesiemy dany item(tylko raz) to bedziemy mogli u niego podrozowac(wiele razy)
2.most , zeby przez ktory dalo sie przejsc wymagany jest dany item, ale po przejsciu przez niego item z nika z bp.
3.dziwgnia jak na ktora kilkniemy przenosi nas, ale zeby kliknac na nia wymagane jest polozenie 5 itemow obok na specialnych miejscach.
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

mru napisał:
NPC pod 8.1 kt?ry wymienia itemy na itemki do wyboru nie wiem co tu jest ?le:
Kod: 
local focus = 0
local talk_start = 0
local target = 0
local following = false
local attacking = false
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(cid, pos)
  	if focus == cid then
          selfSay('Good bye then.')
          focus = 0
          talk_start = 0
  	end
end
function onCreatureTurn(creature)
end
function msgcontains(txt, str)
  	return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
function onCreatureSay(cid, type, msg)
  	msg = string.lower(msg)
  	if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
  		selfSay('Witaj, ' .. getCreatureName(cid) .. '! Sprzedaje "pacc7" za 3 magic sulphur, "pacc12" za 5, "pacc30" za 10, "magic long sword", "golden bow", "crystal arrow", "arcane staff" wszystkie oprocz pacc za 5. Cos chcesz kupic?')
  		focus = cid
  		talk_start = os.clock()
  	elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
  		selfSay('Sorki, ' .. getCreatureName(cid) .. '! Ale gadam z kims innym!')
	elseif focus == cid then
		talk_start = os.clock()
		if msgcontains(msg, 'pacc7')then
			buy(cid,2275,1,0)
			sell(cid,5904,3,0)
		elseif msgcontains(msg, 'pacc12') then
			buy(cid,2276,1,0)
			sell(cid,5904,5,0)
		elseif msgcontains(msg, 'pacc30') then
			buy(cid,2306,1,0)
			sell(cid,5904,10,10)
		elseif msgcontains(msg, 'magic long sword') then
			buy(cid,2390,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'golden bow') then
			buy(cid,7438,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'crystal arrow') then
			buy(cid,2352,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'arcane staff') then
			buy(cid,2453,1,0)
			sell(cid,5904,5,5)
		elseif msgcontains(msg, 'aol') then
			buy(cid,2173,getCount(msg),10000)
		elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then
			selfSay('Narazie, ' .. getCreatureName(cid) .. '!')
			focus = 0
			talk_start = 0
		end
	end
end
function onCreatureChangeOutfit(creature)
end
function onThink()
	if focus > 0 then 
		x, y, z = creatureGetPosition(focus)
		myx, myy, myz = selfGetPosition()
		if ((myy-y==0) and (myx-x<=0 and myx-x>=-4)) then
			selfTurn(1)
		end 
		if ((myy-y==0) and (myx-x>=0 and myx-x<=4)) then
			selfTurn(3)
		end
		if ((myx-x==0) and (myy-y<=0 and myy-y>=-4)) then
			selfTurn(2)
		end
		if ((myx-x==0) and (myy-y>=0 and myy-y<=4)) then
			selfTurn(0)
		end
		if ((myy-y==-2) and (myx-x>=-1 and myx-x<=1)) then
			selfTurn(2)
		end
		if ((myy-y==2) and (myx-x>=-1 and myx-x<=1)) then
			selfTurn(0)
		end
		if ((myx-x==2) and (myy-y>=-1 and myy-y<=1)) then
			selfTurn(3)
		end
		if ((myx-x==-2) and (myy-y>=-1 and myy-y<=1)) then
			selfTurn(1)
		end
		if ((myy-y==-3) and (myx-x>=-2 and myx-x<=2)) then
			selfTurn(2)
		end
		if ((myy-y==3) and (myx-x>=-2 and myx-x<=2)) then
			selfTurn(0)
		end
		if ((myx-x==3) and (myy-y>=-2 and myy-y<=2)) then
			selfTurn(3)
		end
		if ((myx-x==-3) and (myy-y>=-2 and myy-y<=2)) then
			selfTurn(1)
		end
		if ((myy-y==-4) and (myx-x>=-3 and myx-x<=3)) then
			selfTurn(2)
		end
		if ((myy-y==4) and (myx-x>=-3 and myx-x<=3)) then
			selfTurn(0)
		end
		if ((myx-x==4) and (myy-y>=-3 and myy-y<=3)) then
			selfTurn(3)
		end
		if ((myx-x==-4) and (myy-y>=-3 and myy-y<=3)) then
			selfTurn(1)
		end
	end
  	if (os.clock() - talk_start) > 30 then
  		if focus > 0 then
  			selfSay('Nastepny...')
  		end
  			focus = 0
  	end
 	if focus ~= 0 then
 		if getDistanceToCreature(focus) > 5 then
 			selfSay('Gdzie maniery?')
 			focus = 0
 		end
 	end
end
Chodzi o to ?e ten npc zabiera item i daje to jest dobrze. Ale jak nie mam itemku to i tak da... Tylko napisze "you dont have (blabla)!"
Dodam:
Kod: 
<?xml version="1.0"?>
<npc name="Super itemy" script="data/npc/scripts/itemki.lua" access="1" lookdir="2">
	<mana now="800" max="800"/>
	<health now="200" max="200"/>
<look type="75" head="20" body="30" legs="40" feet="50"/>
</npc>
Kliknij aby rozwinąć...
No wi?c mo?esz doda? co? takiego:
Kod: 
if (getPlayerItemCount(cid, id itemu) >= 1) then
-- co robi je?eli ma item
else
-- co robi, je?eli nie ma itemu
end

Pozdro,
Gelio
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Tibia 8.10
typ chyba actions i items
opis chodzi mi o to zeby boots of waterking jak sie je zalozy to mozna chodzic po wodzie
Z Gory dziex
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

mam nadzieje ze sie przyda bot do itemuw klonoweania w rodzaju tibia auto

/Hack-link ocenzurowano
 
Ostatnio edytowane przez moderatora:
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

tomcrusher napisał:
Tibia 8.10
typ chyba actions i items
opis chodzi mi o to zeby boots of waterking jak sie je zalozy to mozna chodzic po wodzie
Z Gory dziex
Kliknij aby rozwinąć...
Actions = 0%
Items.otb = 100%
Musia?by? zrobi? nowy item: wode, po kt?rej da si? chodzi?, a potem ju? bym to zrobi?.

Pozdro,
Gelio
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

hm juz szukam jak znajde zrobie edit ;)

Bump: szukalem szukalem i znalazlem id 4820 itemu mozna
Bump: mozna chodzic a i jak chodzi sie po tej wodzie to sprawdza czy mam boots jak nie to mam paralize i zabiera mi po 100 hp a jak wyjde z wody to ma mi przez 5 min isc hp po 50
 
Ostatnia edycja:
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

tomcrusher napisał:
hm juz szukam jak znajde zrobie edit ;)
Bump: szukalem szukalem i znalazlem id 4820 itemu ;)
Kliknij aby rozwinąć...
Ale da si? po niej chodzi??? Bo jak tak, to wystarczy da? actionid i po ka?dym wej?ciu na tak? wod? by sprawdza?o, czy masz te bootsy. Jak tak to nic nie robi, jak nie to zabiera xxx hp albo teleportuje gdzie?.


Pozdro,
Gelio
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Rodzaj:actions
Wersja tibii:8.0
Stoisz przed d?wigni? naciskasz j? przenosi ci? do pomieszczenia ale tylko 1 osoba morze przebywa? w tym pomieszczeniu na raz, w pomieszczeniu znajduje si? 2 d?wignia po naci?ni?ciu jej otwiera si? przej?cie(G?az) i w tym samym czasie zostaj? przywo?ane potwory np 5 demon?w i 1 Orshaball po pokonaniu ich podchodzimy do przej?cia w kt?rym znajduje si? skrzynka po klikni?ciu na ni? dzwi otrzymujemy nagrod?(jaki? item)si? zn?w zamykaj? i pojawia si? w tym pomieszczeniu bos po pokonaniu go zostajemy przeniesieni na np do dp czy oboj?tnie jakich wsp??rz?dnych a kolejna osoba dopiero mo?e zacz?? robi? questa.
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Prosil bym o taki srypt
pod tibie 8.31
mianowicie ma dzialac tak
np sa pasy 1/1
i sa 4 postacie ek,rp,ms,ed
i np po kazdym zalogowaniu pojawia sie w 1 z 4 templatow
za kazdym razem w innym.
Zrozumieliscie?

prosil bym o szybka pomoc
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Rodzaj: actions
Wersja Tibii: 8.10
Mam dla ciebie Wyzwanie przynajmniej tak my?l?. Potrzebuje skryptu na pok?j do kt?rego gracze nie mog? wchodzi? dop?ki mnie tam nie b?dzie lub GM:cool:
je?eli ju? ja tam wejd? gracze kt?rzy wejd? maj? dostawa? po 25% many i 15% HP
Pozdro, BlackDeD1
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Koozaczek napisał:
Prosil bym o taki srypt
pod tibie 8.31
mianowicie ma dzialac tak
np sa pasy 1/1
i sa 4 postacie ek,rp,ms,ed
i np po kazdym zalogowaniu pojawia sie w 1 z 4 templatow
za kazdym razem w innym.
Zrozumieliscie?
prosil bym o szybka pomoc
Kliknij aby rozwinąć...
Lol? To nie jest
Koozaczek napisał:
srypt
Kliknij aby rozwinąć...
, tylko kod c++, wi?c bye bye.

Pozdro,
Gelio

Bump:
BlackDeD1 napisał:
Rodzaj: actions
Wersja Tibii: 8.10
Mam dla ciebie Wyzwanie przynajmniej tak my?l?. Potrzebuje skryptu na pok?j do kt?rego gracze nie mog? wchodzi? dop?ki mnie tam nie b?dzie lub GM:cool:
je?eli ju? ja tam wejd? gracze kt?rzy wejd? maj? dostawa? po 25% many i 15% HP
Pozdro, BlackDeD1
Kliknij aby rozwinąć...
Heh, no dobra. P?ytki w tym pokoju maj? by? o action id: 9569. A skrypt b?dzie dodawa? wtedy hp i mane, je?eli si? chodzi po tych p?ytkach.

data/movements/scripts/special room.lua:
Kod: 
function onStepIn(cid, item, pos)
local pozycjePomieszczenia = {lewyGornyRog = {x=123, y=132, z=7}, prawyDolnyRog = {x=124, y=133, z=7}}  -- Tutaj wpisz pozycje pomieszczenia
local wherePos = {x=122, y=122, z=7}   -- Gdzie ma teleportowac, jezeli gm'a nie ma w pomieszczeniu
local accessMoze = 1   -- Jaki access zawsze moze wejsc
local accessKtoryUdostepnia = 3    -- Jezeli gracz z takim accessem jest w pomieszczeniu wtedy inny gracz moze wejsc
jestGM = 0
local ileMany = getPlayerMaxMana(cid)/4
local ileHP = getPlayerMaxHealth(cid)/6

if (getPlayerAccess(cid) < accessMoze) then
	for x=pozycjePomieszczenia.lewyGornyRog.x, pozycjePomieszczenia.prawyDolnyRog.x do
		for y=pozycjePomieszczenia.lewyGornyRog.y. pozycjePomieszczenia.prawyDolnyRog.y do
			local aktualnyPos = {x=x, y=y, z=pozycjePomieszczenia.lewyGornyRog.z, stackpos=253}
			local graczZPozycji = getThingfromPos(aktualnyPos)
			if (isPlayer(graczZPozycji)) then
				if (getPlayerAccess(graczZPozycji) >= accessKtoryUdostepnia) then
					jestGM = jestGM+1
				end
			end
		end
	end
	if (jestGM == 0) then
		doTeleportThing(cid, wherePos)
		doSendMagicEffect(wherePos, CONST_ME_PUFF)
		doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR,"GM musi byc w pokoju zebys wszedl")
	else
		doPlayerAddMana(cid, ileMany)
		doPlayerAddHealth(cid, ileHP)
		doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_BLUE)
		doPlayerSay(cid,"+".. ileHP .." HP, +".. ileMany .." mana", TALKTYPE_ORANGE2)
	end
end
end
Do movements.xml:
Kod: 
<movevent event="StepIn" actionid="9569" script="special room.lua" />

Powinno dzia?a?. Fajne nawet pomys?y masz ;p.

Pozdro,
Gelio
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Siema.
Mo?esz zrobi? mi Npc na tibie 8.31, kt?ry b?dzie sprzedawa? wszystkie klucze ??
Czekam na odpowiedz ;)
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Zulfis napisał:
A co z moj? pro?b? ?
Kliknij aby rozwinąć...
Spell (jak zadzia?a):
Kod: 
local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_EFFECT, CONST_ME_HITBYFIRE)
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -1.2, -20, -1.8, -50)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_EFFECT, CONST_ME_HITBYFIRE)
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -1.2, -20, -1.8, -50)

local arr1 = {
{0, 0, 1, 0, 0},
{0, 1, 1, 1, 0},
{1, 1, 2, 1, 1},
{0, 1, 1, 1, 0},
{0, 0, 1, 0, 0}
}
local area1 = createCombatArea(arr1)
setCombatArea(combat1, area1)

local arr2 = {
{0, 0, 1, 0, 0},
{0, 1, 1, 1, 0},
{1, 1, 3, 1, 1},
{0, 1, 1, 1, 0},
{0, 0, 1, 0, 0}
}
local area2 = createCombatArea(arr2)
setCombatArea(combat2, area2)

function onCastSpell(cid, var)
local target = getCreatureTarget(cid)
if (target > 0) then
	return doCombat(cid, combat1, numberToVariant(target))
else
	return doCombat(cid, combat2, var)
end
end

A co do NPC, to du?o z tym roboty.

Pozdro,
Gelio
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Tak na trade i silnik TFS, a i jak masz to parcel system.
 
Odp: Skrypty na zam?wienie.

Odp: Skrypty na zam?wienie.

Widz? ze 1 skrypt chyba za trudny no to poprosi?bym 2 inne jak najszybciej je?li mo?na.
Client: 8.0
Actions
1.K?adziesz w 4 miejscach 4 przedmioty poci?gasz za d?wignie i tp cie na wybrane miejsce a itemy znikaj?.
2.stajesz w wybranym miejscu poci?gasz za dzwignie i tp cie na wybrane miejsce.
Z g?ry dzi?ki.
 
Ostatnia edycja:
Status
Zamknięty.
Do góry