Action [Action]Donation House

[Tenaria]

Hello Guys, as the Thread text showing iam gonna show the donation house system also if u have an donation system on ur server build an new one for 5€ or as u like in the House of the player will be build an teleporter that tps too and small area. Theres an Parchment (scroll) if u click on it u can lvl also its summoning some Frost Dragons. If u want change it just doo it from Frost dragon too Warlock or Hydra what ever u want

create an new lua file in actions/scripts and put that

--parchment by peonso (edited by Tenaria) donation House by Tenaria

function onUse(cid, item, frompos, item2, topos)
playerpos = getPlayerPosition(cid)
demon1pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
demon2pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
demon3pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
demon4pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
paperpos = {x=XID, y=YID, z=ZID, stackpos=2} -- the position the parchment need to are to make the quest change it
checkpaper = getThingfromPos(paperpos)
if item.uid == 8870 then
queststatus = getPlayerStorageValue(cid,6030) --leave it as it is
if queststatus == -1 or queststatus == 0 then
doPlayerSendTextMessage(cid,22,"You have found a backpack.")
  doSummonCreature("Frost dragon", demon1pos)
  doSummonCreature("Frost dragon", demon2pos)
  doSummonCreature("Frost dragon", demon3pos)
  doSummonCreature("Frost dragon", demon4pos)
doTeleportThing(cid,playerpos)
doSendMagicEffect(topos,12)
end
else
if item.uid == 8870 then
queststatus = getPlayerStorageValue(cid,6030)
if queststatus == -1 or queststatus == 0 then
if checkpaper.itemid == 1953 and checkpaper.uid == 8870 then 

doPlayerSendTextMessage(cid,22,"You have found a backpack.")
  doSummonCreature("Frost dragon", demon1pos)
  doSummonCreature("Frost dragon", demon2pos)
  doSummonCreature("Frost dragon", demon3pos)
  doSummonCreature("Frost dragon", demon4pos)
doTeleportThing(cid,playerpos)
doSendMagicEffect(topos,12)
container = doPlayerAddItem(cid, 2091, 1)
doContainerAddItem(container, 2091, 1) --golden key
doContainerAddItem(container, 2151, 3) --talon
doContainerAddItem(container, 2168, 1) --life ring
key_uid = doContainerAddItem(container, 2091, 1)
doSetItemActionId(2091,155)
setPlayerStorageValue(cid,6030,1)	
else
doPlayerSendTextMessage(cid,22,"Parchment has to be ontop of the coffin.")
end
else
   			doSetItemText(uid,"You deafeated us once, but now the Demons army come maybe with morgaroth run run...")
end

return 0
end
end
return 1
end

Dont forget too edit the positon of the monster and the scroll.

in actions.xml put :

<action uniqueid="8970" script="whateverunamed.lua" />

in mapeditor change the scroll uniqueid too "8970" or what ever u want

Tested with Tfs v0.2.4 (8.11):thumbup:

Yours Tenaria.

 

[GangsteR]

Rox !!!

 

[Tenaria]

bump

 

[Cykotitan]

--parchment by peonso (edited by Tenaria) donation House by Tenaria

local demon1pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
local demon2pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
local demon3pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
local demon4pos = {x=XID, y=YID, z=ZID} -- change it too the corect position of the monster
local paperpos = {x=XID, y=YID, z=ZID, stackpos=2} -- the position the parchment need to are to make the quest change it
function onUse(cid, item, frompos, item2, topos)

local playerpos = getPlayerPosition(cid)
local checkpaper = getThingfromPos(paperpos)

	if item.uid == 8870 then
		local queststatus = getPlayerStorageValue(cid,6030) --leave it as it is
			if queststatus == -1 or queststatus == 0 then
				doPlayerSendTextMessage(cid,22,"You have found a backpack.")
				doSummonCreature("Frost dragon", demon1pos)
				doSummonCreature("Frost dragon", demon2pos)
				doSummonCreature("Frost dragon", demon3pos)
				doSummonCreature("Frost dragon", demon4pos)
				doTeleportThing(cid,playerpos)
				doSendMagicEffect(topos,12)
			end
			else
				if item.uid == 8870 then
					local queststatus = getPlayerStorageValue(cid,6030)
					if queststatus == -1 or queststatus == 0 then
						if checkpaper.itemid == 1953 and checkpaper.uid == 8870 then 
							doPlayerSendTextMessage(cid,22,"You have found a backpack.")
							doSummonCreature("Frost dragon", demon1pos)
							doSummonCreature("Frost dragon", demon2pos)
							doSummonCreature("Frost dragon", demon3pos)
							doSummonCreature("Frost dragon", demon4pos)
							doTeleportThing(cid,playerpos)
							doSendMagicEffect(topos,12)
							local container = doPlayerAddItem(cid, 2091, 1)
							doContainerAddItem(container, 2091, 1) --golden key
							doContainerAddItem(container, 2151, 3) --talon
							doContainerAddItem(container, 2168, 1) --life ring
							local key_uid = doContainerAddItem(container, 2091, 1)
							doSetItemActionId(2091,155)
							setPlayerStorageValue(cid,6030,1)    
						else
						doPlayerSendTextMessage(cid,22,"Parchment has to be ontop of the coffin.")
						end
					else
					doSetItemText(uid,"You defeated us once, but now the Demons army come maybe with morgaroth run run...")
					end
				return 0
			end
	end
return 1
end

 

[Tenaria]

pwns but the script was for 8.11 also tfs 2.0.4 i think!
thx anyways emo

 

[arminfific]

Nice;D