Forum forumsebekol Strona Główna forumsebekol
Witamy Na Forum Sebekol
 
 FAQFAQ   SzukajSzukaj   UżytkownicyUżytkownicy   GrupyGrupy   GalerieGalerie   RejestracjaRejestracja 
 ProfilProfil   Zaloguj się, by sprawdzić wiadomościZaloguj się, by sprawdzić wiadomości   ZalogujZaloguj 

NpC kSiaDz

 
Napisz nowy temat   Odpowiedz do tematu    Forum forumsebekol Strona Główna -> propozycje potworów i npc
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
Gość







PostWysłany: Śro 16:43, 08 Lis 2006    Temat postu: NpC kSiaDz

Dodam ksiedza sam go kiedyś szukałem wiec może komuś sie przyda!

Tworzymy plik padre.xml o treści:

Kod:
<?xml version="1.0"?>

<npc name="Padre" script="data/npc/scripts/padre.lua" access="3" lookdir="2">
<mana now="800" max="800"/>
<health now="200" max="200"/>
<look type="57" head="79" body="79" legs="79" feet="79"/>
</npc>


Wklejamy plik do folderu /npc/
Teraz tworzymy plik padre.lua i wklejamy go do folderu /scripts/
oto treść padre.lua :

Kod:
focus1 = 0
focus2 = 0
talk_start = 0
target = 0
following = false
attacking = false
talkstate = 0
moved=0
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(id, stackpos)
if id == focus1 or id == focus1 then
ceremonyend('Goodbye, then.')
end
end
function onCreatureTurn(creature)
end
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
function ceremonyend(msg)
focus1 = 0
focus2 = 0
talk_start = 0
talkstate = 0
selfSay(msg)
end
function onCreatureSay(cid, type, msg)
msg = string.lower(msg)
if talkstate == 1 then
if cid == focus2 then
if msgcontains(msg, 'yes') then
talkstate=2
selfSay('' .. creatureGetName(focus1) .. ' should I begin the ceremony?')
else
ceremonyend('Come back when you are ready.')
end
end
end
if talkstate == 2 then
if cid == focus1 then
if msgcontains(msg, 'yes') then
talkstate=3
else
ceremonyend('Come back when you are ready.')
end
end
end
if talkstate == 9 then
if cid == focus1 then
if string.find(msg, '(%a*)yes(%a*)') then
talkstate=10
else
ceremonyend('Come back when you are ready.')
end
end
end
if talkstate == 11 then
if cid == focus2 then
if string.find(msg, '(%a*)yes(%a*)') then
talkstate=12
else
ceremonyend('Come back when you are ready.')
end
end
end
if msgcontains(msg, 'hi') and focus1 > 0 and focus2 == 0 and not(cid==focus1) and getDistanceToCreature(cid) < 4 then
if isMarried(cid) == "poo" then

selfSay('Hello, ' .. creatureGetName(cid) .. '! I am a priestess of Ishtar. Should I begin the ceremony?')
focus2 = cid
talk_start = os.clock()
talkstate=1

else


selfSay('You are already married.')
end
end

if msgcontains(msg, 'hi') and focus1 == 0 and getDistanceToCreature(cid) < 4 then
if isMarried(cid) == "poo" then

selfSay('Hi, ' .. creatureGetName(cid) .. '! I am a priestess of Ishtar. I can marry you and your elect.')
focus1 = cid
talk_start = os.clock()

else


selfSay('You are already married.')
end
end
if msgcontains(msg, 'ishtar') and (focus1 == cid or focus2 == cid) then
selfSay('Ishtar is a goddess of love and fertility. She is the daughter of Anu, the god of the air.')
talk_start = os.clock()
end
if string.find(msg, '(%a*)bye(%a*)') and (focus1 == cid or focus2 == cid) and getDistanceToCreature(cid) < 6 then
ceremonyend('Farewell, ' .. creatureGetName(cid) .. '!')
end
end
function onCreatureChangeOutfit(creature)
end
function onThink()
if talkstate==3 and (os.clock() - talk_start) > 10 then
selfSay('Two lives, two people, so very different, yet so similar.');
talk_start = os.clock()
talkstate=4
end
if talkstate==4 and (os.clock() - talk_start) > 6 then
selfSay('Together we stand as one, sharing our future as it comes.');
talk_start = os.clock()
talkstate=5
end
if talkstate==5 and (os.clock() - talk_start) > 6 then
selfSay('The past is that, past. Buds are yet to blossom, with care and trust, the best is yet to be revealed.');
talk_start = os.clock()
talkstate=6
end
if talkstate==6 and (os.clock() - talk_start) > 8 then
selfSay('Honesty and kindness, are the fruits of love.');
talk_start = os.clock()
talkstate=7
end
if talkstate==7 and (os.clock() - talk_start) > 6 then
selfSay('Ishtar bless this day and always to enrich us so our love will never end.');
talk_start = os.clock()
talkstate=8
end
if talkstate==8 and (os.clock() - talk_start) > 6 then
selfSay(creatureGetName(focus1) .. ' will you marry ' .. creatureGetName(focus2) .. ' from this day forward....for better...for worse...for richer...for poorer...in sickness and in health...to love...to cherish...and to honour?');
talk_start = os.clock()
talkstate=9
end
if talkstate==10 and (os.clock() - talk_start) > 6 then
selfSay(creatureGetName(focus2) .. ' will you marry ' .. creatureGetName(focus1) .. ' from this day forward....for better...for worse...for richer...for poorer...in sickness and in health...to love...to cherish...and to honour?');
talk_start = os.clock()
talkstate=11
end
if talkstate==12 and (os.clock() - talk_start) > 6 then
pla1 = creatureGetName(focus1)
pla2 = creatureGetName(focus2)
getMarried(focus2,pla1)
getMarried(focus1,pla2)
ceremonyend('By the power of Ishtar you are now a husband and a wife. Good luck for both of you.');
talk_start = os.clock()
end
if (os.clock() - talk_start) > 100 then
if focus1 > 0 or focus2 > 0 then
ceremonyend('Goodbye, then.')
end
end
--if moved==0 then
--x, y, z = selfGetPosition()
--moveToPosition(x+1, y, z)
--moved=1
--end
end
Powrót do góry
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
Sebekol
Administrator



Dołączył: 06 Lis 2006
Posty: 8
Przeczytał: 0 tematów

Ostrzeżeń: 1/10
Skąd: PrOsTo Z uLiCy WiEŚcI

PostWysłany: Śro 20:33, 08 Lis 2006    Temat postu:

No spoczko ten npc, ale zalecam pisac nowe posty zarejestrowanym użytkownikom ;] ten npc moze znajdzie sie w grze

Post został pochwalony 0 razy
Powrót do góry
Zobacz profil autora
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
Sebekol
Administrator



Dołączył: 06 Lis 2006
Posty: 8
Przeczytał: 0 tematów

Ostrzeżeń: 1/10
Skąd: PrOsTo Z uLiCy WiEŚcI

PostWysłany: Śro 20:33, 08 Lis 2006    Temat postu:

No spoczko ten npc, ale zalecam pisac nowe posty zarejestrowanym użytkownikom ;] ten npc moze znajdzie sie w grze

Post został pochwalony 0 razy
Powrót do góry
Zobacz profil autora
Wyświetl posty z ostatnich:   
Napisz nowy temat   Odpowiedz do tematu    Forum forumsebekol Strona Główna -> propozycje potworów i npc Wszystkie czasy w strefie EET (Europa)
Strona 1 z 1

 
Skocz do:  
Możesz pisać nowe tematy
Możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach

fora.pl - załóż własne forum dyskusyjne za darmo
Powered by phpBB © 2001, 2005 phpBB Group
Regulamin