Ola, eu tenho o seguinte código, porem nao consigo deixar para ter 1000 cargas de red aol.

function onDeath(cid, corpse, deathList)

if (getPlayerSlotItem(cid, 2).itemid == 10218) and getPlayerSkullType(cid) >= 4 then

doPlayerRemoveItem(cid, 10218, 1)

doCreatureSetDropLoot(cid, false)

end

return true

end

pode sim fazer pra 1Mil, mais só pode fazer in-game:

Pega o AoL de red skull q vc feiz e liga seu ot e faiz o seguinte

Vai num lugar onde n passa mto player, sumona o teu Aol com o /i e faiz o comando: /attr set charges 1000

Pronto! agr so dar pro player q vc kiser, por isso NO preocupação

Lembrando que, esse procedimento so pega in-game, pra fazer pelos scripts tem que procurar.

function onDeath(cid, corpse, deathlist)
   if(getPlayerSlotItem(cid, CONST_SLOT_NECKLACE).itemid == 10218 and getCreatureSkullType(cid) > 3) then
       doCreatureSetStorage(cid, 111011, getCreatureStorage(cid, 111011) - 1)
       if getCreatureStorage(cid, 111011) == 0 then
           doRemoveItem(getPlayerSlotItem(cid, CONST_SLOT_NECKLACE).uid, 1)
       elseif getCreatureStorage(cid, 111011) < 0 then
           doCreatureSetStorage(cid, 111011, 999)
       end
       doCreatureSetDropLoot(cid, false)
   end
   return true
end

Abraços.

function onDeath(cid, corpse, deathlist)
if(getPlayerSlotItem(cid, CONST_SLOT_NECKLACE).itemid == 10218 and getCreatureSkullType(cid) > 3) then
	doCreatureSetStorage(cid, 111011, getCreatureStorage(cid, 111011) - 1)
	if getCreatureStorage(cid, 111011) == 0 then
		doRemoveItem(getPlayerSlotItem(cid, CONST_SLOT_NECKLACE).uid, 1)
	elseif getCreatureStorage(cid, 111011) < 0 then
		doCreatureSetStorage(cid, 111011, 999)
	end
	doCreatureSetDropLoot(cid, false)
end
return true
end

 

Abraços.

Funcionou, obrigado.