- Base PokeWish + Pokelight
-
methemia reagiu a uma resposta no tópico: Novos Locais de Caça (atualizado 29/11/2020) Trackeando...
-
Nokturnos new show off
pues si yo era el que andaba contigo en ese proyecto jajajaja creo que antes me llamaba brilux smn nomas avisame y lo veo con gusto
-
-
Nokturnos new show off
saca el thronia jajaja, pense que jamas volverias a mapear
-
[TFS 1.x | Global Windows e Linux 10.0 OLD/11.3] Halls of Hope, Wrap, Store, Prey, Imbuing, Events - Castle War, Snow Ball, Zombie, BattleField
wrap bug imbuing bug
-
Problem with MapTracker
-
-
[TFS 1.2] Tibia Coin.
<action itemid="24774" script="tibiacoin.lua" /> data/actions/scripts/tibiacoin.lua local config = { idcoin = 24774 } function onUse(cid, item, fromPosition, itemEx, toPosition) local player = Player(cid) local item = Item(item.uid) if player:getItemCount(config.idcoin) > 0 then local coinplayer = player:getCoinsBalance()+item:getCount() player:getPosition():sendMagicEffect(15) item:remove() player:setCoinsBalance(coinplayer) else player:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You have to carry tibia coins in your backpack.") end return true end
-
Help PHP
Please changue PHP znote for PHP Gesior <?php require_once 'engine/init.php'; include 'layout/overall/header.php'; protect_page();?> <div class="news_info"> <div><!--<img src="layout/images/rl/titles/buycoins.gif">--></div> </div> <div class="news_message"> <div class="news_body"> <h2>Castle System:</h2><br> <?php function castleIsAvailable($castle_id){ $castle = mysql_select_single("SELECT `castle_id` FROM `castle_rented` WHERE `castle_id`=".$castle_id); if(!$castle){ return true; } return false; } function getPlayerId($account_id){ $acc = mysql_select_single("SELECT `id` FROM `players` WHERE `account_id` = ".$account_id); if($acc){ return (int)$acc['id']; } return false; } function setPlayerCastle($cid, $castleid, $time){ $playerid = getPlayerId($cid); print($time); mysql_insert("INSERT INTO `castle_rented` (`id`, `castle_id`, `player_id`, `time`, `castle_invited`) VALUES ('', '".$castleid."', '".$playerid."', '".$time."', '1')"); } function getNameByPlayerId($player_id){ $name = mysql_select_single("SELECT `name` FROM `players` WHERE `id`=".$player_id); if($name){ return $name['name']; } return false; } if (isset($_POST['castle']) && isset($_POST['castleid'])){ $castleID = (int)$_POST['castleid']; if(castleIsAvailable($castleID)){ $castleDB = mysql_select_single("SELECT `price`, `time_rented` FROM `castle` WHERE `id` = ".$castleID); if ($castleDB != false) { $castlePrice = (int)$castleDB['price']; $castleTime = $castleDB['time_rented']; $time = time(); $player_points = (int)$user_znote_data['points']; $cid = (int)$user_data['id']; if($player_points >= $castlePrice){ $data = mysql_select_single("SELECT `points` FROM `znote_accounts` WHERE `account_id`='$cid';"); $old_points = $data['points']; if ((int)$old_points != (int)$player_points) die("1: Failed to equalize your points."); // Remove points if they can afford // Give points to user $expense_points = $castlePrice; $new_points = $old_points - $expense_points; $update_account = mysql_update("UPDATE `znote_accounts` SET `points`='$new_points' WHERE `account_id`='$cid'"); setPlayerCastle($cid, $castleID, time()+$castleTime); echo "<b>En hora buena, usted a obtenido su castillo con respawn, para entrar al castillo utilize el comando \"!castle goto\" en el juego.</b><br><br>"; }else{ echo "<b>Usted no cuenta con los suficientes puntos para comprar este castillo.</b><br><br>"; } //print($cid); }else{ echo "<b>El castillo no existe. comuniquese con el administrador.</b><br><br>"; } }else{ echo "<b>El castillo ya esta ocupado.</b><br><br>"; } } ?> <?php echo " <b>Comandos que puedes utilizar:</b><br><br> <b>!castle goto</b>: te teletransporta a ti o a los miembros de tu guild al castillo.<br> <b>!castle on</b>: Activa las visitas a tu castillo, todos los miembros de tu guild pueden visitar tu castillo.<br> <b>!castle off</b>: Desactiva las visitas a tu castillo. nadie excepto tú puede entrar.<br><br> <b>Nota:</b> Si usted quiere cambiar el respawn comuniquise con el adm.<br><br> "; $castles = mysql_select_multi("SELECT * FROM `castle`"); echo "<table class='table table-condensed table-content table-striped'> <tr> <td style='text-align:center;width:7%;'><b>Castle:</b></td> <td style='text-align:center;width:7%;'><b>Points:</b></td> <td style='text-align:center;width:36%;'><b>respawn:</b></td> <td style='text-align:center;width:10%;'><b>time:</b></td> <td style='text-align:center;width:20%;'><b>Action:</b></td> </tr> "; foreach ($castles as $castle) { $castles_rented = mysql_select_single("SELECT `player_id`, `time` FROM `castle_rented` WHERE `castle_id` = ".$castle['id']); $expire = date('d/m/Y H:i:s', $castles_rented['time']); echo " <tr> <td style='text-align:center;vertical-align: middle;'>#".$castle['id']."</td> <td style='text-align:center;vertical-align: middle;'>".$castle['price']."</td> <td style='text-align:center;vertical-align: middle;'>".$castle['respawn']."</td> <td style='text-align:center;vertical-align: middle;'>".(intval($castle['time_rented'])/24/60/60)." DAYS.</td>"; if ($castles_rented['player_id']){ echo "<td style='text-align:center;vertical-align: middle;'>Owner By:<br><b>".getNameByPlayerId($castles_rented['player_id'])."</b><br><font style='font-size:10px;font-family: monospace;'>expire: ".$expire."<font></td>"; }else{ echo " <td style='text-align:center;'> <form action='' method='post'> <input type='submit' name='castle' value='BUY NOW' style='margin: auto;'> <input type='hidden' name='castleid' value='".$castle['id']."'> </form> </td>"; } echo "</tr>"; } echo "</table>"; ?> </div> </div> <?php include 'layout/overall/footer.php'; ?>
- [v32] GlobalFull 11/12 - New Asuras, Falcons, Warzones 4,5,6 . (Updates Frequentes)
- [v32] GlobalFull 11/12 - New Asuras, Falcons, Warzones 4,5,6 . (Updates Frequentes)
-
RewardLoot.lua Help
bump
-
RewardLoot.lua Help
Help OTx 3.5 v. 10.94/10.95 function sort_descending(t) local tmp = {} for k, v in pairs(t) do table.insert(tmp, {k, v}) end table.sort(tmp, function(a, b) return a[2] > b[2] end) return tmp end function table.find(t, v) for i,x in pairs(t) do if x == v then return true end end end function Player:addItemRewardBag(itemid, count) local rewardbag = self:getDepotChest(99) return rewardbag:addItem(itemid, count) end function MonsterType:getBossReward(chance, unique) local ret = {} local function randomItem(lootBlock, chance) local randvalue = math.random(0, 100000) / (getConfigInfo("rateLoot") * chance) if randvalue < lootBlock.chance then if (ItemType(lootBlock.itemId):isStackable()) then return (randvalue%lootBlock.maxCount) + 1 else return 1 end end end local lootBlockList = self:getLoot() for _, loot in pairs(lootBlockList) do local rd = randomItem(loot, chance) if rd then if loot.uniquedrop then if unique then table.insert(ret, {loot, rd}) end else table.insert(ret, {loot, rd}) end end end return ret end BossLoot = {} BossUids = {} function BossLoot:new(boss) if not table.find(BossUids, boss:getId()) then table.insert(BossUids, boss:getId()) return setmetatable({creature=boss}, {__index = BossLoot}) end end function BossLoot:updateDamage() if self.creature then local tmp = {} local totaldmg = 0 for killer, damage in pairs(self.creature:getDamageMap()) do totaldmg = totaldmg+damage.total tmp[killer] = damage.total end self.players = sort_descending(tmp) self.totaldmg = totaldmg else error("Creature not found.") end end function BossLoot:setRewards() if self.totaldmg and self.creature then if getConfigInfo("rateLoot") > 0 then local mt = MonsterType(self.creature:getName()) for i, playertab in ipairs(self.players) do local loot if i == 1 then loot = mt:getBossReward(playertab[2] / self.totaldmg, true) else loot = mt:getBossReward(playertab[2] / self.totaldmg, false) end table.insert(self.players[i], loot) end end else error("Error") end end function BossLoot:addRewards() if self.players and self.players[1] and self.players[1][3] then for i, playertab in ipairs(self.players) do local player = Player(playertab[1]) if player then local str = "The following items are available in your reward chest: " for i, lootTable in ipairs(playertab[3]) do local item = player:addItemRewardBag(lootTable[1].itemId, math.ceil(lootTable[2])) if item then str = str .. item:getNameDescription() .. ", " end end str = str:sub(1, #str-2) player:sendTextMessage(MESSAGE_EVENT_ADVANCE, str) end end else error("Error") end end function onKill(creature, target) if (Monster(target) ~= nil) then local mt = MonsterType(target:getName()) if mt:useRewardChest() then local loot = BossLoot:new(target) if loot then local corpse = Item(doCreateItem(MonsterType(target:getName()):getCorpseId(), 1, target:getPosition())) corpse:decay() target:setDropLoot(false) loot:updateDamage() loot:setRewards() loot:addRewards() corpse:setAttribute('aid', 21584) end end end end [code/]
-
-
[C++] Level Monster
D; fire elemental lvl 255? max level 4 d;
- 2.0 Database Cleaner - Inactive Players + The Players Child Data (skills, items, et
-
[10.90] Vanaheim Global Opensource - TFS 1.2
cuando un player usa cast y da logout en el jugador al que entra, se cierra el server
-
[SOURCE 9.8-9.86] The Forgotten Server v0.2.15
re-up please i need sources!!

methemia
Membro
-
Registro em
-
Última visita