Fazer runas em frente a casa

[EdsonJunior 966]

Fazer runas em frente a casa

init start

	local runespell = {word = 'adori vis', soul = 3, mana = 350, level = 25}

	local trainspell = {word = 'exura', mana = 20, level = 9}

	local makefood = {makefoodtotrain = true, word = 'exevo pan', soul = 1, mana = 120, level = 14}

	local enterHouseIfPlayer = true

	local safeList = {'Bubble', 'Eternal Oblivion'}

	local safeHp = 50 -- in percentage

	local safeMp = 70 -- in absolute amount

	local eatFoodFromHouse = true

	local whereToMoveItems = 'n'

	local outPos = {x=nil, y=nil, z=nil}

	local inPos = {x=nil, y=nil, z=nil}

	local timeInside = {from = 5000, to = 9000} -- time in miliseconds, it is randomized between from and to.

	----------------------##DONT CHANGE NOTHING BELOW HERE##--------------------------------

	local direction = {x = {n = 0, s = 0, w = -1, e = 1, nw = -1, ne = 1, sw = -1, se = 1},

                   	y = {n = -1, s = 1, w = 0, e = 0, nw = -1, ne = -1, sw = 1, se = 1}}

	local pks = {}

	local eatfoodtime,starttime,randmakerune,randmanatrain,randtime = 0

	for i=1, #safeList do safeList[i] = safeList[i]:lower() end

	if timeInside.from > timeInside.to then local temp = timeInside.from timeInside.from = timeInside.to timeInside.to = temp end

init end


if not (randmakerune and randmanatrain) then

	randmakerune = math.random(25,50) -- missing MP to make rune

	randmanatrain = math.random(2,24) -- missing MP to train mana

end


auto(200)

if inPos.x and inPos.y and inPos.z and outPos.x and outPos.y and outPos.z then

	setpriority(50,0,1000,10000)

	listcolor(color(56,180,71))

	listas("Rune Maker Enabled (say 'restart maker' to define the positions again)")

	if $mp >= $maxmp-randmakerune and ($mp >= runespell.mana or runespell.mana > $maxmp) then

    	if itemcount('blank rune') > 0 and $soul >= runespell.soul and $mp >= runespell.mana and $level >= runespell.level then

        	cast(runespell.word)

        	wait(900,1100)

        	randmakerune = nil

    	elseif $mp >= $maxmp-randmanatrain then

        	if makefood.makefoodtotrain and $soul >= makefood.soul and $mp >= makefood.mana and $level >= makefood.level then

            	cast(makefood.word)

        	elseif $mp >= trainspell.mana and $level >= trainspell.level then

            	cast(trainspell.word)

        	end

        	wait(900,1100)

        	randmanatrain = nil

    	end

	end

	local foundplayer = false

	foreach newmessage msg do

    	if msg.type == MSG_STATUS then

        	if msg.content == 'You are full.' then

            	eatfoodtime = $timems+math.random(60000,360000)

        	end

    	elseif msg.type == MSG_STATUSLOG and msg.content:token(10) ~= 'a' and msg.content:token(10) ~= 'an' then

        	local pos = msg.content:find('by')

        	local pkname = msg.content:sub(pos+3,msg.content:len()-1)

        	local pknamelower = pkname:lower()

        	if not table.find(safeList,pknamelower) and pkname ~= $name then

            	foundplayer = true

            	if not table.find(pks,pknamelower) then table.insert(pks,pknamelower) end

        	end

    	elseif msg.sender == $name and msg.type == MSG_DEFAULT and msg.content:find('restart maker') then

        	outPos = {x = nil, y = nil, z = nil}

        	inPos = {x = nil, y = nil, z = nil}

        	return

    	end

	end

	if (enterHouseIfPlayer or #pks > 0 or $self.party > 0) and not foundplayer then

    	local p

    	foreach creature p 'pf' do

        	if p ~= $self then

            	local playername = p.name:lower()

            	if p.party >= 3 and not table.find(safeList,playername) then

                	table.insert(safeList,playername)

                	local pos = table.find(pks,playername)

                	if pos then

                    	table.remove(pks,pos)

                	end

            	end

            	if (not table.find(safeList,playername) and p.party < 3 and enterHouseIfPlayer) or table.find(pks,playername) then

                	foundplayer = true

                	break

            	end

        	end

    	end

	end

	if foundplayer or $hppc < safeHp then

    	if ground($posx,$posy,$posz) ~= ground(inPos.x,inPos.y,inPos.z) then

        	setpriority(90,70,1000,10000)

        	moveto(inPos.x,inPos.y,inPos.z)

    	elseif $mp < safeMp then

        	while $battlesigned do

            	listas('Going to logout...')

        	end

        	logout()

    	end

    	wait(timeInside.from,timeInside.to)

	else

    	if ground($posx,$posy,$posz) ~= ground(outPos.x,outPos.y,outPos.z) and not iscreatureontile(outPos.x,outPos.y,outPos.z) then

        	moveto(outPos.x,outPos.y,outPos.z)

    	else

        	reachlocation(outPos.x,outPos.y,outPos.z)

    	end

	end

	if $timems > eatfoodtime then

    	local fcount = foodcount()

    	if fcount > 0 then

        	if not $pzone then eatfood() end

    	elseif eatFoodFromHouse then

        	local topid = topitem(inPos.x,inPos.y,inPos.z).id

        	local itemfood = isfood(topid)

        	if not itemproperty(topid,ITEM_GROUND) then

            	reachlocation(inPos.x,inPos.y,inPos.z)

            	while not itemfood and not itemproperty(topid,ITEM_GROUND) and not itemproperty(topid,ITEM_NOTMOVEABLE) do

                	moveitems(topid,ground(inPos.x,inPos.y,inPos.z),ground(inPos.x+direction.x[whereToMoveItems],inPos.y+direction.y[whereToMoveItems],inPos.z)) wait(600,900)

                	if topid ~= topitem(inPos.x,inPos.y,inPos.z).id then

                    	topid = topitem(inPos.x,inPos.y,inPos.z).id

                    	itemfood = isfood(topid)

                	end

            	end

            	if itemfood then

                	for i=1, math.random(4,10) do

                    	useitem(topid,ground(inPos.x,inPos.y,inPos.z))

                    	wait(300,500)

                    	if topid ~= topitem(inPos.x,inPos.y,inPos.z).id then

                        	topid = topitem(inPos.x,inPos.y,inPos.z).id

                        	itemfood = isfood(topid)

                    	end

                    	if itemproperty(topitem(inPos.x,inPos.y,inPos.z).id,ITEM_GROUND) or not itemfood then

                        	break

                    	end

                	end

            	end

        	end

    	end

	end

else

	if (starttime == nil or $standtime < starttime) then

    	starttime = $standtime-1

	end

	if $standtime > starttime then

    	if $standtime-starttime < 5000 then

        	listcolor(color(255,255,255))

        	if not outPos.x then

            	listas('RUNE MAKER: This script will set your current position as out standing position if you stay here for more: ... ' .. math.floor((starttime+5200-$standtime)/1000) .. ' ... seconds')

        	else

            	listas('RUNE MAKER: This script will set your current position as inside standing position if you stay here for more: ... ' .. math.floor((starttime+5200-$standtime)/1000) .. ' ... seconds')

        	end

    	else

        	listcolor(color(241,60,90))

        	if not outPos.x then

            	outPos = {x = $posx, y = $posy, z = $posz}

            	listas('RUNE MAKER: out standing position set to: ' .. outPos.x .. ',' .. outPos.y .. ',' .. outPos.z .. ' ... inside standing position will start in 3 seconds.')

        	else

            	inPos = {x = $posx, y = $posy, z = $posz}

            	listas('RUNE MAKER: inside standing position set to: ' .. inPos.x .. ',' .. inPos.y .. ',' .. inPos.z .. ' ... rune maker will start in 3 seconds.')

        	end

        	wait(3000)

        	starttime = $standtime-1

    	end

	end

end  

só editar onde deseja que o script faça, por exemplo, o tipo de runa, quanto de soul precisa, quanto de mana precisa etc.

Abraços,

Por: Aabcd.