SHOP MODERN ACC

[kamus9629 14]

Boa Noite Alguem Pode Me ajudar Eu Criei Um serve DBO Sendo Que os item vip Quando eles compra Nao e Entregue Pros Player

Resulmindo O item Não Chega Para Quem Pagou

[p e o p l e 50]

  Esta é uma mensagem automática, este tópico foi movido para a área correta.
  Regras do fórum: http://www.tibiaking.com/forum/topic/1281-regras-gerais/#comment-7680

Este tópico foi movido:
De: OTServ > Notícias e OTServ Geral
Para: Suporte OTServ > OTServ > Suporte de WebSites

[vankk 456]

Tentar usar esses arquivos, não tenho ideia se vai funcionar, eu usava um parecido com esse em meados de 2011.

 

http://www.speedyshare.com/files/26113666/SHOP.zip

[kamus9629 14]

1 hora atrás, vankk disse:

Tentar usar esses arquivos, não tenho ideia se vai funcionar, eu usava um parecido com esse em meados de 2011.

 

http://www.speedyshare.com/files/26113666/SHOP.zip

eu modifiquei ELE Crack so qe funfo n

[kamus9629 14]

UP

[kamus9629 14]

up

Em 04/11/2015 16:10:44, vankk disse:

Tentar usar esses arquivos, não tenho ideia se vai funcionar, eu usava um parecido com esse em meados de 2011.

 

http://www.speedyshare.com/files/26113666/SHOP.zip

agora ele ta assim ? semparar

 

[vankk 456]

Aumenta o tempo no globalevents, coloca multiplicado por mil.

[kamus9629 14]

Em 08/11/2015 10:44:38, vankk disse:

Aumenta o tempo no globalevents, coloca multiplicado por mil.

deus mesma zebra so qe ta indo de vaga mais o item nao para se dser criado

[vankk 456]

Bota 5000 segundos no globalevents, e tenta esse script:

 

E veja se da algum erro no console.

function onThink()
	local r = db.getResult('SELECT * FROM shop_history WHERE processed=0')
		if r:getID() ~= -1 then
		repeat
			local cid = getPlayerByName(r:getDataString('player'))
			if isPlayer(cid) then
				local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK).uid
				if bp ~= 0 then
					local j = db.getResult('SELECT * FROM shop_offer WHERE id='..r:getDataInt('product'))
					if j:getID() ~= -1 then
						local id = tonumber(j:getDataInt('item'))
						local tid = tonumber(r:getDataInt('id'))
						local count = tonumber(j:getDataInt('count'))
						local tipe = tonumber(j:getDataInt('type'))
						local name = j:getDataString('name')
						if tipe == 5 or tipe == 8 then
							local w = getItemInfo(id).weight * count
							if getPlayerFreeCap(cid) >= w then
								if doAddContainerItemEx(bp, doCreateItemEx(id, count)) == 1 then
									doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You have received >> '..name..' << from our shop system')
									db.executeQuery('UPDATE shop_history SET processed=1 WHERE id = ' .. tid)
								else
									doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You don\'t have enough space in backpack to receive >> '..name..' <<')
							end
						else
							doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'Sorry, you don\'t have enough capacity to receive >> '..name..' << (You need: '..getItemInfo(id).weight * count..' Capacity)')
						end
					elseif tipe == 6 or tipe == 7 then
						local bid, bcap =
						tipe == 6 and 1987 or 1988,
						tipe == 6 and 8 or 20
						local w = getItemInfo(bid).weight + (getItemInfo(id).weight * count * bcap)
						if getPlayerFreeCap(cid) >= w then
							local c = doCreateItemEx(bid)
								for i = 1, bcap do
									doAddContainerItem(c, id, count)
								end
								if doPlayerAddItemEx(getPlayerSlotItem(cid, 3).uid, c) == RETURNVALUE_NOERROR then
									doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You have received >> '..name..' << from our shop system')
									db.executeQuery('UPDATE shop_history SET processed=1 WHERE id='..tid)
								else
									doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'Sorry, you don\'t have enough space to receive >> '..name..' <<')
								end
						else
							doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'Sorry, you don\'t have enough capacity to receive >> '..name..' << (You need: '..w..' Capacity)')
						end
					end
					j:free()
				end
			else
				doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, 'You don\'t have a container in your backpack slot.')
			end
		end
	until not r:next()
	r:free()
	end
	return true
end

 

[kamus9629 14]

ta dando certo n eu fasso isso continua mesma coisa kkk

Nome do Produto:	Teste
Categoria:	Recipientes com itens
Tipo:	Mochila com Itens
Ponto Custo:	500
Item ID:	12633
Contagem:	1
Descrição:	teste

[kamus9629 14]

Em 08/11/2015 10:44:38, vankk disse:

Aumenta o tempo no globalevents, coloca multiplicado por mil.

 

UP+

Amigo meu qe e programador concertou pra min Tinha 3 erro nessa scripterkk por isso qe clonava

[Fear of Dark 5]

Em 14/11/2015 at 14:19, kamus9629 disse:

 

UP+

Amigo meu qe e programador concertou pra min Tinha 3 erro nessa scripterkk por isso qe clonava

Pode demonstrar onde estava o erro ?