{REQUEST} Buy Bprunes using lever

Danxo · Aug 12, 2008

Im request Buy Bprunes using lever.

its fine with 1 script i can change to others runes on my own. i just need a script to start from

Elda Swok · Aug 13, 2008

ill see what i can do for you...

Elda Swok · Aug 13, 2008

alright, i came up with something, not sure if it will work at all, but didn't have any errors in consul when i opened it,

Code:

local suddendeath = 2268
local ultimatehealing = 2273
local greatfireball = 2304
local explotion = 2313
local heavymagicmissle = 2268

function onUse(cid, item, frompos, item2, topos)
	if item.itemid == 1945 and action.id == 10550 then
		doPlayerAddItem(uid, 2003)
		doAddContainerItem(uid, suddendeath, 20)
		doRemoveMoney(cid, 6000)
	elseif action.id == 10551 then
		doPlayerAddItem(uid, 2002)
		doAddContainerItem(uid, ultimatehealing, 20)
		doRemoveMoney(cid, 4000)
	elseif action.id == 10552 then
		doPlayerAddItem(uid, 2001)
		doAddContainerItem(uid, heavymagicmissle, 20)
		doRemoveMoney(cid, 1000)
	elseif action.id == 10553 then
		doPlayerAddItem(uid, 2001)
		doAddContainerItem(uid, explotion, 20)
		doRemoveMoney(cid, 3000)
	elseif action.id == 10554 then
		doPlayerAddItem(uid, 2000)
		doAddContainerItem(uid, greatfireball, 20)
		doRemoveMoney(cid, 2000)
	elseif item.itemid == 1946 then
		doTransformItem(item.uid, item.itemid + 1)
		doPlayerSendCancel(cid, "Sorry, you do not have enough money.")
	end
	return TRUE
end

let me know if it works, if someone sees errors please tell me how to fix (this is my first real code)

Danxo · Aug 13, 2008

BigB said:

alright, i came up with something, not sure if it will work at all, but didn't have any errors in consul when i opened it,

Code:

local suddendeath = 2268
local ultimatehealing = 2273
local greatfireball = 2304
local explotion = 2313
local heavymagicmissle = 2268

function onUse(cid, item, frompos, item2, topos)
	if item.itemid == 1945 and action.id == 10550 then
		doPlayerAddItem(uid, 2003)
		doAddContainerItem(uid, suddendeath, 20)
		doRemoveMoney(cid, 6000)
	elseif action.id == 10551 then
		doPlayerAddItem(uid, 2002)
		doAddContainerItem(uid, ultimatehealing, 20)
		doRemoveMoney(cid, 4000)
	elseif action.id == 10552 then
		doPlayerAddItem(uid, 2001)
		doAddContainerItem(uid, heavymagicmissle, 20)
		doRemoveMoney(cid, 1000)
	elseif action.id == 10553 then
		doPlayerAddItem(uid, 2001)
		doAddContainerItem(uid, explotion, 20)
		doRemoveMoney(cid, 3000)
	elseif action.id == 10554 then
		doPlayerAddItem(uid, 2000)
		doAddContainerItem(uid, greatfireball, 20)
		doRemoveMoney(cid, 2000)
	elseif item.itemid == 1946 then
		doTransformItem(item.uid, item.itemid + 1)
		doPlayerSendCancel(cid, "Sorry, you do not have enough money.")
	end
	return TRUE
end

let me know if it works, if someone sees errors please tell me how to fix (this is my first real code)

The only error i can se is that is wrong word for explosion u wrote Explotion.

And ehere should i but this now again? in acions right ? and then make something in actions.xml for exh lever ?

Elda Swok · Aug 13, 2008

thats where i put it, then you put

Code:

	<action actionid="10550" script="name of script.lua"/>

for all the action ids you use

Danxo · Aug 13, 2008

Thanks.. it was years ago when i was in ot. im testing it right now.

EDIT

Forgot to mention does it work for Tfs 0.2?? Client 8.21?
i tested it and i cant get it to work :S

Elda Swok · Aug 13, 2008

Didn't test sorry lol just threw a quick code together

and you remember me from ots? or something like ot fans?

Danxo · Aug 13, 2008

Ops my bad When i Wrote U i did mean me. :S

Im going to bed now. but if u can make the script work il we very happy. or if u have a working npc that sells bp runes and potions for tfs 0.2 client 8.21

Elda Swok · Aug 13, 2008

You could use Mokerhamers tutorial to make it so you could buy bps of runes/potions and i can give you the script i can use.

flik · Aug 13, 2008

the script for the npc only need to add ULTIMATE HP AND SPRITI POTION,

Code:

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)
local msg = string.lower(msg)

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) < 4 then
selfSay('K pedo ' .. creatureGetName(cid) .. '! I sell bps of potions.  said  "potions" for more information.')
focus = cid
talk_start = os.clock()

elseif msgcontains(msg, 'hi') and focus ~= cid and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, ' .. creatureGetName(cid) .. '! I talk to you in a minute.')

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

if msgcontains(msg, 'potions') then
selfSay('I sell bp hp (2k), bp shp (5k), bp ghp (10k), bp mp (2k), smp (5k), gmp (1k).')



elseif msgcontains(msg, 'health potion') then
buyContainer(cid,2000,7618,1,2000)
elseif msgcontains(msg, 'strong health potion') then
buyContainer(cid,2000,7588,1,5000)
elseif msgcontains(msg, 'great health potion') then
buyContainer(cid,2000,7591,1,1000)
elseif msgcontains(msg, 'mana potion') then
buyContainer(cid,2001,7620,1,2000)
elseif msgcontains(msg, 'strong mana potion') then
buyContainer(cid,2001,7589,1,5000)
elseif msgcontains(msg, 'great mana potion') then
buyContainer(cid,2001,7590,1,1000)

elseif string.find(msg, '(%a*)bye(%a*)') and getDistanceToCreature(cid) < 4 then
selfSay('Good bye, ' .. creatureGetName(cid) .. '!')
focus = 0
talk_start = 0
end
end
end

function onCreatureChangeOutfit(creature)

end


function onThink()
if (os.clock() - talk_start) > 30 then
if focus > 0 then
selfSay('Next Please...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Good bye then.')
focus = 0
end
end
end

EvulMastah · Aug 13, 2008

http://otland.net/showthread.php?t=9849

Danxo · Aug 13, 2008

It doesnt work for me :S I put that in global.lua and the scripts in actions/scripts. then i added them to actions.xml
And i changed the action number in mapeditor to. it dosent work.

Elda Swok · Aug 13, 2008

Well, here is the actual script you wanted

Code:

local suddendeath = 2268
local ultimatehealing = 2273
local greatfireball = 2304
local explotion = 2313
local heavymagicmissle = 2268
local bp, rune, charges
 
function onUse(cid, item, frompos, item2, topos)
	if item.itemid == 1945 then
		if item.actionid == 10550 then
			if doRemoveMoney(cid, 6000) == 1 then 
				bp = doPlayerAddItem(cid, 2003)
				rune = suddendeath
				charges = 1
			else
				doPlayerSendTextMessage(player, 22, "You don\'t have enough money.")
			end
		elseif item.actionid == 10551 then
			if doRemoveMoney(cid, 4000) == 1 then
				bp = doPlayerAddItem(cid, 2002)
				rune = ultimatehealing
				charges = 1
			else
				doPlayerSendTextMessage(player, 22, "You don\'t have enough money.")
			end
		elseif item.actionid== 10552 then
			if doRemoveMoney(cid, 1000) == 1 then
				bp = doPlayerAddItem(cid, 2001)
				rune = heavymagicmissle
				charges = 10
			else
				doPlayerSendTextMessage(player, 22, "You don\'t have enough money.")
			end
		elseif item.actionid == 10553 then
			if doRemoveMoney(cid, 3000) == 1 then
				bp = doPlayerAddItem(cid, 2001)
				rune = explotion
				charges = 2
			else
				doPlayerSendTextMessage(player, 22, "You don\'t have enough money.")
			end
		elseif item.actionid == 10554 then
			if doRemoveMoney(cid, 2000) == 1 then
				bp = doPlayerAddItem(cid, 2000)
				rune = greatfireball
				charges = 2
			else
				doPlayerSendTextMessage(player, 22, "You don\'t have enough money.")
			end
		end
 
		if rune then
			for i = 1, 20 do
				doAddContainerItem(bp, rune, charges)
			end
			bp, rune, charges = nil
		end
	elseif item.itemid == 1946 then
		doTransformItem(item.uid, item.itemid + 1)
	end
		return TRUE
end

Credits to

Far Carder

helped me with errors on ot fans

Danxo · Aug 14, 2008

OK ill try it later

{REQUEST} Buy Bprunes using lever

Danxo

Taranox Pwns

Elda Swok

Searching New Project

Elda Swok

Searching New Project

Danxo

Taranox Pwns

Elda Swok

Searching New Project

Danxo

Taranox Pwns

Elda Swok

Searching New Project

Danxo

Taranox Pwns

Elda Swok

Searching New Project

flik

New Member

EvulMastah

๏̯͡๏﴿

Danxo

Taranox Pwns

Elda Swok

Searching New Project

Danxo

Taranox Pwns

Similar threads