Open Tibia Server http://www.tibiaskrypty.pun.pl Open Tibia Server pl http://backend.userland.com/rss Serdecznie zapraszam na super ots!!! http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=52#p52 52@http://www.tibiaskrypty.pun.pl Sobota 2 Luty Sobota 2 Luty http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=51#p51 51@http://www.tibiaskrypty.pun.pl Robisz notatnik , a w notatniku wpisujesz:

function onStepIn(cid, item, pos)

local pos1 = {x=1029, y=1007, z=7, stackpos=255}
local newpos = {x=1012, y=1028, z=7}
local scarab = getThingfromPos(pos1)

               if scarab.itemid == 2159 then
        doTeleportThing(cid, newpos)
        doRemoveItem(scarab.uid,1)
else
    end
end
Zapisujesz jako tomb.lua

Kolor Zolty to miejsce gdzie ma lezec scarab coin (nie zmieniaj stackpos), czerwony to miejsce gdzie ci ma teleportowac.

Skrypt dziala tylko musisz najpierw polozyc na miejsce scaraba a potem wejsc w ogien, innaczej nie przejdziesz.


Przechodzisz do data/movements  edytuje plik movements.xml i dodajesz tam linijke

<movevent event="StepIn" itemid="1397" script="tomb.lua" />
]]> Czwartek 25 Grudzień Czwartek 25 Grudzień http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=50#p50 50@http://www.tibiaskrypty.pun.pl
Wchodzimy w data/spells/runes

Tworzymy notatnik , a w nim wpisujemy:

function onUse(cid, item, frompos, item2, topos)

if getPlayerAccess(cid) >=2 then
creature2pos = {x=topos.x, y=topos.y, z=topos.z, stackpos=253}
creature2 = getThingfromPos(creature2pos)

if creature2.itemid > 0 then
cela1={x=114, y=112, z=8}
cela2={x=116, y=112, z=8}
cela3={x=118, y=115, z=8}
cela4={x=118, y=117, z=8}
cela5={x=116, y=119, z=8}
cela6={x=114, y=119, z=8}
cela7={x=111, y=117, z=8} doPlayerSendTextMessage(cid,22,"Poszedl siedziec!")
rand = math.random(1,7)
if rand == 1 then
doTeleportThing(creature2.uid,cela1)
elseif rand == 2 then
doTeleportThing(creature2.uid,cela2)
elseif rand == 3 then
doTeleportThing(creature2.uid,cela3)
elseif rand == 4 then
doTeleportThing(creature2.uid,cela4)
elseif rand == 5 then
doTeleportThing(creature2.uid,cela5)
elseif rand == 6 then
doTeleportThing(creature2.uid,cela6)
elseif rand == 7 then
doTeleportThing(creature2.uid,cela7)
end
doPlayerSendTextMessage(creature2.uid,18,"Posiedzisz tu torche.")
else
doPlayerSendCancel(cid,"Pudlo.")
end
else
doPlayerSendCancel(cid,"IDZ Z TYM PRZEDMIOTEM DO GM A DOSTANIESZ WYSOKA NAGRODE")
end
return 1
end
Zapisujemy jako:  wiezienie.lua

Tworzymy notatnik , a w nim wpisujemy:

function onUse(cid, item, frompos, item2, topos)

if getPlayerAccess(cid) > 0 then
doTransformItem(item.uid,item.itemid+1)
else
doPlayerSendCancel(cid,"Tylko GM moze Cie wypuscic")
end

return 1
end

kraty2.lua


function onUse(cid, item, frompos, item2, topos)

doTransformItem(item.uid,item.itemid-1)
return 1

end
Zapisujemy go jako:  kraty1.lua

Wchodzimy w data/actions/actions.xml

Dodajemy tam linijki:

<action itemid="2297" script="wiezienie.lua" allowfaruse="1" />
<action itemid="5733" script="kraty1.lua" />
<action itemid="5736" script="kraty1.lua" />
<action itemid="5734" script="kraty2.lua" />
<action itemid="5737" script="kraty2.lua" />
]]> Czwartek 25 Grudzień Czwartek 25 Grudzień Magiczna Czapka Ferumbrasa http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=49#p49 49@http://www.tibiaskrypty.pun.pl
Wchodzimy w ots/data/action/script i tworzymy notatnik , a w nim wpisujemy:

function onUse(cid, item, frompos, item2, topos)
pos = getPlayerPosition(cid)

summon = math.random(1, 3)

if summon == 1 then
doPlayerSay(cid,"WTF? Kroliczek? o.O",1)
doSummonCreature("Rabbit", pos)
doSendMagicEffect(topos,14)
doRemoveItem(item.uid,1)

elseif summon == 2 then
doPlayerSay(cid,"LOL! Papuga? W tej czapce?",1)
doSummonCreature("Parrot", pos)
doSendMagicEffect(topos,13)
doRemoveItem(item.uid,1)

elseif summon == 3 then
doPlayerSay(cid,"O fak! To cos tam siedzialo? ;/",1)
doSummonCreature("Skunk", pos)
doSendMagicEffect(topos,12)
doRemoveItem(item.uid,1)

end
return 1
end
Zapisujemy jako: ferumbras hat.lua

Następnie dodajemy linijke do ots/data/action Actions.xml

<action itemid="5903" script="ferumbras hat.lua" />]]> Czwartek 25 Grudzień Czwartek 25 Grudzień Rosyjska Ruletka http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=48#p48 48@http://www.tibiaskrypty.pun.pl
Wchodzimy w ots/data/action/script i tworzymy notatnik , a w nim wpisujemy:

function onUse(cid, item, frompos, item2, topos)

local hp = getPlayerHealth(cid)
local mana = getPlayerMana(cid)
local level = getPlayerLevel(cid)

local ded = (hp) + (mana)
local ileexpa = (level * 100)


text = math.random(1, 6)
if text == 1 then
doPlayerAddItem(cid,2152,1)
doSendMagicEffect(topos, 1)
doSendAnimatedText(topos,'Masz farta!',137)
elseif text == 2 then
doPlayerAddItem(cid,2152,1)
doSendMagicEffect(topos, 1)
doSendAnimatedText(topos,'Masz farta!',137)
elseif text == 3 then
doPlayerAddExp(cid,ileexpa)
doSendMagicEffect(topos, 1)
doSendAnimatedText(topos,'Masz farta!',137)
elseif text == 4 then
doPlayerAddExp(cid,ileexpa)
doSendMagicEffect(topos, 1)
doSendAnimatedText(topos,'Masz farta!',137)
elseif text == 5 then
doPlayerAddExp(cid,ileexpa)
doSendMagicEffect(topos, 1)
doSendAnimatedText(topos,'Masz farta!',137)
elseif text == 6 then
doPlayerAddHealth(cid,-ded)
doSendMagicEffect(topos, 17)
doSendAnimatedText(topos,'Pech...!',180)
end
return 1

end
Zapisujemy jako:  ruletka.lua

Następnie dodajemy linijke do ots/data/action Actions.xml
<action itemid="xxxx" script="ruletka.lua" />

xxxx to id itema jakim będzie ta ruleta. W grafikach tibii nie znalazłem rzeczy która mogła by tak wygl±dać dlatego nie podałem konkretnego id.]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„ http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=46#p46 46@http://www.tibiaskrypty.pun.pl
local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
-- OTServ event handling functions start
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink() npcHandler:onThink() end
-- OTServ event handling functions end
function creatureSayCallback(cid, type, msg)
-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
if(npcHandler.focus ~= cid) then
return false
end
bless1 = getPlayerBlessing(cid,1)
bless2 = getPlayerBlessing(cid,2)
bless3 = getPlayerBlessing(cid,3)
bless4 = getPlayerBlessing(cid,4)
bless5 = getPlayerBlessing(cid,5)
tbless = 'Sorry, but you already have this blessing.'
pbless = 'Sorry, you need a premium account to buy blessings.'
obless = 'Do you have 10000 gold coins to buy this blessing?'
mbless = 'Sorry, but you need 10000 gold coins to buy this blessing.'
gbless = 'Now the Gods blessed you.'
player_gold = getPlayerItemCount(cid,2148)
player_plat = getPlayerItemCount(cid,2152)*100
player_crys = getPlayerItemCount(cid,2160)*10000
player_money = player_gold + player_plat + player_crys
if msgcontains(msg, 'blessing') or msgcontains(msg, 'blessings') then
selfSay('I can give you 5 blessing, and each blessing cost 10000 gold coins. Just say help to know how to buy.')
elseif msgcontains(msg, 'help') or msgcontains(msg, 'ajuda') then
selfSay('To buy the blessings say, first bless, second bless, third bless, fouth bless and fifth bless.')
elseif msgcontains(msg, 'first bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 1
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'second bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 2
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'third bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 3
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'fourth bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 4
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'fifth bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 5
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
------------------------------ Confirm yes ---------------------------------
elseif msgcontains(msg, 'yes') and talk_state == 1 then
talk_state = 0
if bless1 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 1)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 2 then
talk_state = 0
if bless2 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 2)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 3 then
talk_state = 0
if bless3 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 3)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 4 then
talk_state = 0
if bless4 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 4)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 5 then
talk_state = 0
if bless5 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 5)
selfSay(gbless)
else
selfSay(mbless)
end
end
------------------------------------------------ confirm no ------------------------------------------------
elseif msgcontains(msg, 'no') and (talk_state >= 1 and talk_state <= 5) then
selfSay('Ok than.')
talk_state = 0
end
-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
Zapisujemy jako: bless.lua

W data/npc utwarzamy notatnik , a w nim wpisujemy:

<?xml version="1.0"?>
<npc name="Waterlow" script="data/npc/scripts/bless.lua" access="3" lookdir="2">
    <mana now="800" max="800"/>
    <health now="200" max="200"/>
<look type="139" head="132" body="79" legs="97" feet="132"/>
</npc>
Zapisujemy jako:  Waterlow.xml

Oczywi¶cie musimy ustawić naszego Npc więc wchodzimy w data/world/npc.xml

Edytujemy plik Npc.xml

i dodajemy pod:
<npclist>

<npc name="Waterlow" x="xxx" y="xxx" z="x" dir="2"/>
Niebieski = Położenie Waterlowa - gdzie Waterlow ma się znajdować]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„ http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=45#p45 45@http://www.tibiaskrypty.pun.pl
local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
-- OTServ event handling functions start
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink() npcHandler:onThink() end
-- OTServ event handling functions end
function creatureSayCallback(cid, type, msg)
-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
if(npcHandler.focus ~= cid) then
return false
end
bless1 = getPlayerBlessing(cid,1)
bless2 = getPlayerBlessing(cid,2)
bless3 = getPlayerBlessing(cid,3)
bless4 = getPlayerBlessing(cid,4)
bless5 = getPlayerBlessing(cid,5)
tbless = 'Sorry, but you already have this blessing.'
pbless = 'Sorry, you need a premium account to buy blessings.'
obless = 'Do you have 10000 gold coins to buy this blessing?'
mbless = 'Sorry, but you need 10000 gold coins to buy this blessing.'
gbless = 'Now the Gods blessed you.'
player_gold = getPlayerItemCount(cid,2148)
player_plat = getPlayerItemCount(cid,2152)*100
player_crys = getPlayerItemCount(cid,2160)*10000
player_money = player_gold + player_plat + player_crys
if msgcontains(msg, 'blessing') or msgcontains(msg, 'blessings') then
selfSay('I can give you 5 blessing, and each blessing cost 10000 gold coins. Just say help to know how to buy.')
elseif msgcontains(msg, 'help') or msgcontains(msg, 'ajuda') then
selfSay('To buy the blessings say, first bless, second bless, third bless, fouth bless and fifth bless.')
elseif msgcontains(msg, 'first bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 1
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'second bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 2
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'third bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 3
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'fourth bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 4
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
elseif msgcontains(msg, 'fifth bless') then
if isPremium(cid) then
if player_money >= 10000 then
selfSay(obless)
talk_state = 5
else
selfSay(mbless)
talk_state = 0
end
else
selfSay(pbless)
talk_state = 0
end
------------------------------ Confirm yes ---------------------------------
elseif msgcontains(msg, 'yes') and talk_state == 1 then
talk_state = 0
if bless1 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 1)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 2 then
talk_state = 0
if bless2 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 2)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 3 then
talk_state = 0
if bless3 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 3)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 4 then
talk_state = 0
if bless4 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 4)
selfSay(gbless)
else
selfSay(mbless)
end
end
elseif msgcontains(msg, 'yes') and talk_state == 5 then
talk_state = 0
if bless5 then
selfSay(tbless)
else
if pay(cid,10000) then
doPlayerAddBlessing(cid, 5)
selfSay(gbless)
else
selfSay(mbless)
end
end
------------------------------------------------ confirm no ------------------------------------------------
elseif msgcontains(msg, 'no') and (talk_state >= 1 and talk_state <= 5) then
selfSay('Ok than.')
talk_state = 0
end
-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
Zapisujemy jako: bless.lua

W data/npc utwarzamy notatnik , a w nim wpisujemy:

<?xml version="1.0"?>
<npc name="Waterlow" script="data/npc/scripts/bless.lua" access="3" lookdir="2">
    <mana now="800" max="800"/>
    <health now="200" max="200"/>
<look type="139" head="132" body="79" legs="97" feet="132"/>
</npc>
Zapisujemy jako:  Waterlow.xml

Oczywi¶cie musimy ustawić naszego Npc więc wchodzimy w data/world/npc.xml

Edytujemy plik Npc.xml

i dodajemy pod:
<npclist>

<npc name="Waterlow" x="xxx" y="xxx" z="x" dir="2"/>
Niebieski = Położenie Waterlowa - gdzie Waterlow ma się znajdować]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„ NPC Heal ten npc leczy wszystkich graczy za darmo !!! http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=44#p44 44@http://www.tibiaskrypty.pun.pl
local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
-- OTServ event handling functions start
function onCreatureAppear(cid)              npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid)             npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg)     npcHandler:onCreatureSay(cid, type, msg)
    if(cid ~= npcHandler.focus) then
        return false
    end
    if msgcontains(msg, 'heal') then
        health = getCreatureHealth(cid)
        if health < 65 then
            maxhealth = getCreatureMaxHealth(cid)
            ammount = maxhealth - health
            doCreatureAddHealth(cid, ammount)
            selfSay('Let me heal you.')
        else
            selfSay('Sorry, you are not badly hurt')
        end
    end
end
function onThink()                         npcHandler:onThink() end
-- OTServ event handling functions end
npcHandler:addModule(FocusModule:new())
Zapisujemy jako healer.lua

W miejscu --
if health < 65 then
-- masz liczbę 65, oznacza to że może uleczyć gracza dopiero, gdy ma 65 hp. Możesz oczywi¶cie zmienić t± liczbę.


W data/npc tworzymy notatnik , a w nim wpisujemy:

<?xml version="1.0" encoding="UTF-8"?>
<npc name="Healer" script="data/npc/scripts/healer.lua" autowalk="1" floorchange="0" speed="12">
    <health now="100" max="100"/>
    <look type="128" head="0" body="0" legs="0" feet="0" addons="0"/>
</npc>
Zapisujemy jako Healer.xml

Oczywi¶cie musimy ustawić gdzie ma stać nasz Npc

Wiec wchodzimy w data/world/npc.xml


Edytujemy plik Npc.xml

i dodajemy pod:
<npclist>

<npc name="Healer" x="xxx" y="xxx" z="x" dir="2"/>
Niebieski = Położenie Healera - gdzie Healer ma się znajdować]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„ 100cc w scarab coins 100 scarab coins w gold nugget http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=43#p43 43@http://www.tibiaskrypty.pun.pl
function onUse(cid, item, frompos, item2, topos)
       if item.itemid == 2160 and item.type == 100 then
           doRemoveItem(item.uid,item.type)
           doPlayerAddItem(cid,2159,1)
           doPlayerSendTextMessage(cid,22,"You have changed 100 crystal coin to 1 scarab coin")
       elseif item.itemid == 2159 and item.type < 100 then
           doRemoveItem(item.uid,1)
           doPlayerAddItem(cid,2160,100)
           doPlayerSendTextMessage(cid,22,"You have changed 1 scarab coin to 100 crystal coins")
       elseif item.itemid == 2160 and item.type < 100 then
           doRemoveItem(item.uid,1)
           doPlayerAddItem(cid,2152,100)
           doPlayerSendTextMessage(cid,22,"You have changed 1 crystal to 100 platinum coins")
       end
   end
Potem tez w actions/scripts

Następnie tworzymy notatnik , a w nim wpisujemy:

function onUse(cid, item, frompos, item2, topos)
       if item.itemid == 2159 and item.type == 100 then
           doRemoveItem(item.uid,item.type)
           doPlayerAddItem(cid,2157,1)
           doPlayerSendTextMessage(cid,22,"You have changed 100 scarab coin to 1 gold nugget")
    elseif doRemoveItem(item.uid,1) then
          doPlayerSendTextMessage(cid,22,"You have changed 1 scarab coin to 100 crystal coins")
          doPlayerAddItem(cid,2160,100)
       end
end
Zapisujemy jako: scarab.lua

Następnie tworzymy notatnik , a w nim wpisujemy:

function onUse(cid, item, frompos, item2, topos)
      if doRemoveItem(item.uid,1) then
          doPlayerSendTextMessage(cid,22,"You have changed 1 gold nugget to 100 scarab coins")
          doPlayerAddItem(cid,2159,100)
      end
  end
Zapisujemy jako: nugget.lua


Na końcu przechodzimy w data/actions/actions.xml

pod -- Transform money wpisujemy:

<action itemid="2160" script="crystal.lua" />
<action itemid="2159" script="scarab.lua" />
<action itemid="2157" script="gold nugget.lua" />
]]> Czwartek 25 Grudzień Czwartek 25 Grudzień Zegarek http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=42#p42 42@http://www.tibiaskrypty.pun.pl
if (tibiantime == false) then
if (twentyfour == true) then
time = os.date('%H:%M')
else
time = os.date('%I:%M %p')
end
else
time = rl2tib(os.date('%M'), os.date('%S'), twentyfour)
end
doPlayerSendTextMessage(cid, 22, "The time is "..time..".")
return 1
end

function rl2tib(min, sec, twentyfour)
--zegarek - by Apitov (7.6)
suffix = ''
varh = (min*60+sec)/150
tibH = math.floor(varh) -- hour!
tibM = math.floor(60*(varh-tibH)) -- minute!

if (twentyfour == false) then
if (tonumber(tibH) > 11) then
tibH = tonumber(tibH) - 12
suffix = ' pm'
else
suffix = ' am'
end
if (tibH == 0) then
tibH = 12
end
end
if (tibH < 10) then
tibH = '0'..tibH
end
if (tibM < 10) then
tibM = '0'..tibM
end
return (tibH..':'..tibM..suffix)
end
Zapisujemy jako: watch.lua

Przechodzimy w data/actions/actions.xml

Dodajemy linijkę:
<action itemid="2036" script="watch.lua" />
]]> Czwartek 25 Grudzień Czwartek 25 Grudzień Proca http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=41#p41 41@http://www.tibiaskrypty.pun.pl
Proca jest do¶ć silna wiec proponuje ja dać od 200-300lvla+

Do weapons.xml dodajemy

<distance id="5907" range="6" enabled="1" exhaustion="0" ammo="hand" script="proca.lua"><vocation id="3"/><vocation id="7"/></distance>
Przechodzimy do weapons\scripts tworzymy notatnik , a w nim wpisujemy:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 4)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_LARGEROCK)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -0.4, -100, -0.9, -200)

local area = createCombatArea( { {1, 1, 1}, {1, 3, 1}, {1, 1, 1} } )
setCombatArea(combat, area)

function onUseWeapon(cid, var)
    return doCombat(cid, combat, var)
end
Zapisujemy jako proca.lua]]> Czwartek 25 Grudzień Czwartek 25 Grudzień Anty Przeklinanie http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=40#p40 40@http://www.tibiaskrypty.pun.pl
-- Zakaz przeklinania v.1.0 Michal --
function onSay(cid, words, param)
local salakarna = {x=1000, y=1000, z=0}
local warnings = getPlayerStorageValue(cid, 9999)
if words == "!opusc" then
if warnings > 3 then
local odsiadka = getPlayerStorageValue(cid, 9998) + 3600
if(os.time() >= odsiadka) then
setPlayerStorageValue(cid, 9998, os.time())
doTeleportThing(cid, getPlayerMasterPos(cid))
setPlayerStorageValue(cid, 9999, 0)
else
doPlayerSendTextMessage(cid, 19, "Gdzie...Nie mozezs jeszcze opuscic.")
end
else
doPlayerSendTextMessage(cid, 19, "Nie jestes,juz w sali karnej nieradze przeklinac bo znowu bedziesz siedzial 24h.")
end
else
if warnings < 3 then
local warnstatus = (warnings+1)
doPlayerSendTextMessage(cid, 19, "Ostrzezen "..warnstatus..".")
setPlayerStorageValue(cid, 9999, warnings+1)
elseif warnings == 3 then
doPlayerSendTextMessage(cid, 19, "To twoje,ostatnie ostrzezenie,inaczej ban.")
doTeleportThing(cid, salakarna)
local warning = getPlayerStorageValue(cid, 9998)
setPlayerStorageValue(cid, 9998, warning+3600)
end
end
end
Zapisujemy jako cenzura.lua

Kolor =  pozycja sali w ktorej odbywamy karę.

Nastepnie idziemy do data\talkactions\talkactions.xml i wklejamy :

<talkaction words="!opusc" script="cenzura.lua" />
<talkaction words="Huj ci za to pizdo szmato." script="cenzura.lua" />
<talkaction words="twoj stary" script="cenzura.lua" />
<talkaction words="Twoj Stary" script="cenzura.lua" />
<talkaction words="kurwo" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="kurwo,dopierdolona" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="suka" script="cenzura.lua" />
<talkaction words="chuju" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="jebana" script="cenzura.lua" />
<talkaction words="wyruchana" script="cenzura.lua" />
<talkaction words="pierdol" script="cenzura.lua" />
<talkaction words="pierdolona" script="cenzura.lua" />
<talkaction words="wyruchany" script="cenzura.lua" />
<talkaction words="suko" script="cenzura.lua" />
<talkaction words="******" script="cenzura.lua" />
<talkaction words="szmato" script="cenzura.lua" />
<talkaction words="fuck" script="cenzura.lua" />
<talkaction words="bitch" script="cenzura.lua" />
<talkaction words="ass" script="cenzura.lua" />
<talkaction words="Kurwo" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="*****" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="Suka" script="cenzura.lua" />
<talkaction words="Chuju" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="Jebana" script="cenzura.lua" />
<talkaction words="Wyruchana" script="cenzura.lua" />
<talkaction words="Pierdol" script="cenzura.lua" />
<talkaction words="Pierdolona" script="cenzura.lua" />
<talkaction words="Wyruchany" script="cenzura.lua" />
<talkaction words="Suko" script="cenzura.lua" />
<talkaction words="******" script="cenzura.lua" />
<talkaction words="Szmato" script="cenzura.lua" />
<talkaction words="Fuck" script="cenzura.lua" />
<talkaction words="Bitch" script="cenzura.lua" />
<talkaction words="Ass" script="cenzura.lua" />
<talkaction words="Wypierdalaj" script="cenzura.lua" />
<talkaction words="wypierdalaj" script="cenzura.lua" />
<talkaction words="Dziwka" script="cenzura.lua" />
<talkaction words="dziwka" script="cenzura.lua" />
Teraz wam powiem jak się dodaje cenzurę.

Poprostu włazimy w talkactions.xml
i dajemy t± linijkę

<talkaction words="cenzura" script="cenzura.lua" />
Tym kolorem piszę,sie jakie słowo wywoławcze ma być aby napisało ci że przeklinasz.


Tym kolorem piszę,Plik z t± cenzur± czyli,cenzura.lua


UWAGA!!! Ten Skrypty jest pod tibie 8,1 ale może zadziałać na 7.6]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„ Anty Przeklinanie http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=39#p39 39@http://www.tibiaskrypty.pun.pl
-- Zakaz przeklinania v.1.0 Michal --
function onSay(cid, words, param)
local salakarna = {x=1000, y=1000, z=0}
local warnings = getPlayerStorageValue(cid, 9999)
if words == "!opusc" then
if warnings > 3 then
local odsiadka = getPlayerStorageValue(cid, 9998) + 3600
if(os.time() >= odsiadka) then
setPlayerStorageValue(cid, 9998, os.time())
doTeleportThing(cid, getPlayerMasterPos(cid))
setPlayerStorageValue(cid, 9999, 0)
else
doPlayerSendTextMessage(cid, 19, "Gdzie...Nie mozezs jeszcze opuscic.")
end
else
doPlayerSendTextMessage(cid, 19, "Nie jestes,juz w sali karnej nieradze przeklinac bo znowu bedziesz siedzial 24h.")
end
else
if warnings < 3 then
local warnstatus = (warnings+1)
doPlayerSendTextMessage(cid, 19, "Ostrzezen "..warnstatus..".")
setPlayerStorageValue(cid, 9999, warnings+1)
elseif warnings == 3 then
doPlayerSendTextMessage(cid, 19, "To twoje,ostatnie ostrzezenie,inaczej ban.")
doTeleportThing(cid, salakarna)
local warning = getPlayerStorageValue(cid, 9998)
setPlayerStorageValue(cid, 9998, warning+3600)
end
end
end
Zapisujemy jako cenzura.lua

Kolor =  pozycja sali w ktorej odbywamy karę.

Nastepnie idziemy do data\talkactions\talkactions.xml i wklejamy :

<talkaction words="!opusc" script="cenzura.lua" />
<talkaction words="Huj ci za to pizdo szmato." script="cenzura.lua" />
<talkaction words="twoj stary" script="cenzura.lua" />
<talkaction words="Twoj Stary" script="cenzura.lua" />
<talkaction words="kurwo" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="kurwo,dopierdolona" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="suka" script="cenzura.lua" />
<talkaction words="chuju" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="jebana" script="cenzura.lua" />
<talkaction words="wyruchana" script="cenzura.lua" />
<talkaction words="pierdol" script="cenzura.lua" />
<talkaction words="pierdolona" script="cenzura.lua" />
<talkaction words="wyruchany" script="cenzura.lua" />
<talkaction words="suko" script="cenzura.lua" />
<talkaction words="******" script="cenzura.lua" />
<talkaction words="szmato" script="cenzura.lua" />
<talkaction words="fuck" script="cenzura.lua" />
<talkaction words="bitch" script="cenzura.lua" />
<talkaction words="ass" script="cenzura.lua" />
<talkaction words="Kurwo" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="*****" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="Suka" script="cenzura.lua" />
<talkaction words="Chuju" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="cenzura" script="cenzura.lua" />
<talkaction words="Jebana" script="cenzura.lua" />
<talkaction words="Wyruchana" script="cenzura.lua" />
<talkaction words="Pierdol" script="cenzura.lua" />
<talkaction words="Pierdolona" script="cenzura.lua" />
<talkaction words="Wyruchany" script="cenzura.lua" />
<talkaction words="Suko" script="cenzura.lua" />
<talkaction words="******" script="cenzura.lua" />
<talkaction words="Szmato" script="cenzura.lua" />
<talkaction words="Fuck" script="cenzura.lua" />
<talkaction words="Bitch" script="cenzura.lua" />
<talkaction words="Ass" script="cenzura.lua" />
<talkaction words="Wypierdalaj" script="cenzura.lua" />
<talkaction words="wypierdalaj" script="cenzura.lua" />
<talkaction words="Dziwka" script="cenzura.lua" />
<talkaction words="dziwka" script="cenzura.lua" />
Teraz wam powiem jak się dodaje cenzurę.

Poprostu włazimy w talkactions.xml
i dajemy t± linijkę

<talkaction words="cenzura" script="cenzura.lua" />
Tym kolorem piszę,sie jakie słowo wywoławcze ma być aby napisało ci że przeklinasz.


Tym kolorem piszę,Plik z t± cenzur± czyli,cenzura.lua]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„ ManaUh http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=38#p38 38@http://www.tibiaskrypty.pun.pl
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, 1)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)
setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE)
function onCastSpell(cid, var)
    doPlayerAddMana(cid, x)
    doPlayerAddHealth(cid,y)
    return doCombat(cid, combat, var)
end
Zapisujemy jako: manaa.lua

x - tu wpisujemy ile many ma nam dodawać
runa po użyciu
y - tu wpisujemy ile życia ma nam dawać runa po użyciu

W data/spells.xml dodajemy:

<rune name="ManaUh" id="2281" charges="10" lvl="150" needtarget="1" maglv="15" exhaustion="1" enabled="1" allowfaruse="1" script="manaa.lua"><vocation id="3"/><vocation id="7"/></rune>
Oczywiscie vocation id mozemy sobie dowolnie zmienic, jak i lvl i mlvl runy itd...
Jeżeli chcemy dodac, aby dana profesja mogla robic t± runke to wpisujemy pod conjure w data/spells.xml :

<conjure name="ManaUh" words="adura mana" reagentId="2260" conjureId="2281" aggressive="0" conjureCount="10" maglv="15" mana="2000" soul="0" prem="0" enabled="1" function="conjureItem"><vocation id="7"/></conjure>
]]> Czwartek 25 Grudzień Czwartek 25 Grudzień http://www.tibiaskrypty.pun.pl/viewtopic.php?pid=37#p37 37@http://www.tibiaskrypty.pun.pl
function onUse(cid, item, frompos, item2, topos)

if item.itemid == 2272 then

local playerpos = getCreaturePosition(cid)

doRemoveItem(item.uid,2272)
doPlayerSetVocation(cid, getPlayerVocation(cid)+4)
doSendMagicEffect(playerpos, 12)
doPlayerSendTextMessage(cid,22,"Wlasnie otrzymales promocje!!!")
end
end
Zapisujemy jako: vocation rune.lua

I w data\actions do actions.xml dodajemy:

<action itemid="2272" script="vocation rune.lua" />
Zielony = Id runki

czerwony-o ile id profesji ma zmienić się nasza profesja podczas użycia.]]> Czwartek 25 GrudzieĹ„ Czwartek 25 GrudzieĹ„