Npc Q Faz Acc

Ablank
Por Ablank
em NPCs, monsters e raids

Ablank

.-.
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/07/06Posts: 88

Este Npc faz account só colocar no ot e usar

va na pasta data/npc/scripts e crie um arquivo chamado acc.lua com o seguinte

 

focus = 0talk_start = 0target = 0following = falseattacking = falseaccstatus = 0seksik = 3myname = ''mypass = ''maxnamelen = 10maxpasslen = 6allow_pattern = '^[a-zA-Z0-9 -]+$'origmsg = ''mypasscheck = ''mynamecheck = ''function onThingMove(creature, thing, oldpos, oldstackpos)endfunction onCreatureAppear(creature)endfunction onCreatureDisappear(cid, pos)if focus == cid thenselfSay('Good bye then.')focus = 0talk_start = 0endendfunction onCreatureTurn(creature)endfunction msgcontains(txt, str)return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))endfunction onCreatureSay(cid, type, msg)origmsg = msgmsg = string.lower(msg)if (msgcontains(msg, 'hi') and focus == 0) and getDistanceToCreature(cid) < 4 thenselfSay('Hello --male---famale--- ')accstatus = 1myname = ''mypass = ''myaccnumber = 0seksik = 0focus = cidtalk_start = os.clock()elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 thenselfSay('Please wait')elseif focus == cid thentalk_start = os.clock()if msgcontains(msg, 'male') and accstatus == 1 thenselfSay('Your name is ?')seksik = 1accstatus = 2elseif msgcontains(msg, 'famale') and accstatus == 1 thenselfSay('Your name is ?')seksik = 0accstatus = 2elseif accstatus == 2 thenmyname = origmsgmynamecheck = msgif string.len(mynamecheck) <= maxnamelen thenif string.find(mynamecheck, allow_pattern) thenif io.open("data/players/"..myname..".xml" , "r") == nil thenselfSay('You like to have name: '..myname..' yes ?')accstatus = 3elseselfSay('Name allready exist, please give next one')endelseselfSay('Illegal characters, try another')endelseselfSay('Name is too long! Max is 10, try again')endelseif msgcontains(msg, 'yes') thenif accstatus == 3 thenselfSay('Ok, give password')accstatus = 4elseif accstatus == 5 thenif seksik == 0 thenselfSay('Ok. Lets check: You are women '..myname..' tour password is: '..mypass..'.yes ?')elseselfSay('Ok. Lets check: You are men '..myname..' tour password is: '..mypass..'.yes ?')endaccstatus = 6elseif accstatus == 6 thenselfSay('ok. Can we randominze uour number? --rand--bye---')accstatus = 7endelseif msgcontains(msg, 'no') thenif accstatus == 3 thenselfSay('Chooze another')accstatus = 2elseif accstatus == 5 thenselfSay('Chooze another')accstatus = 4elseif accstatus == 6 thenselfSay('Again, you are man or woman?')accstatus = 1endelseif accstatus == 4 thenmypass = origmsgmypasscheck = msgif string.len(mypasscheck) <= maxpasslen thenif string.find(mypasscheck, allow_pattern) thenselfSay('Your pass is '..mypass..' yes ?')accstatus = 5elseselfSay('Illegal characters, try another')endelseselfSay('too long! Max is 6, give other')endelseif msgcontains(msg, 'rand') and accstatus == 7 thenmyaccnumber = math.random(100000,999999)if io.open("data/accounts/"..myaccnumber..".xml" , "r") == nil thenselfSay('Number is '..myaccnumber..' Sey --next--')accstatus = 8f = assert(io.open("./data/accounts/"..myaccnumber..".xml", "w"))f = io.open("./data/accounts/"..myaccnumber..".xml", "w")f:write("<?xml version=\"1.0\"?><account pass=\""..mypass.."\" type=\"1\" premDays=\"666\"><characters><character name=\""..myname.."\"\/><\/characters><\/account>")f:close()f = assert(io.open("./data/players/"..myname..".xml", "w"))f = io.open("./data/players/"..myname..".xml", "w")f:write("<?xml version=\"1.0\"?><player name=\""..myname.."\" account=\""..myaccnumber.."\" sex=\""..seksik.."\" lookdir=\"3\" exp=\"1\" voc=\"0\" level=\"1\" access=\"0\" cap=\"1\" maglevel=\"1\" lastlogin=\"0\" premticks=\"0\" promoted=\"0\" banned=\"0\"><spawn x=\"474\" y=\"398\" z=\"7\"\/><temple x=\"474\" y=\"398\" z=\"7\"\/><skull type=\"0\" kills=\"0\" ticks=\"0\" absolve=\"0\"\/><health now=\"150\" max=\"150\" food=\"1000\"\/><mana now=\"1\" max=\"1\" spent=\"1\"\/><look type=\"134\" head=\"77\" body=\"79\" legs=\"78\" feet=\"77\"\/><skills><skill skillid=\"0\" level=\"10\" tries=\"0\"\/><skill skillid=\"1\" level=\"10\" tries=\"0\"\/><skill skillid=\"2\" level=\"10\" tries=\"0\"\/><skill skillid=\"3\" level=\"10\" tries=\"0\"\/><skill skillid=\"4\" level=\"10\" tries=\"0\"\/><skill skillid=\"5\" level=\"10\" tries=\"0\"\/><skill skillid=\"6\" level=\"10\" tries=\"0\"\/><\/skills><spells><spell words=\"utevo lux\"\/><\/spells><deaths\/><inventory><slot slotid=\"3\"><item id=\"1994\"><inside><item id=\"2674\" count=\"1\"\/><\/inside><\/item><\/slot><slot slotid=\"4\"><item id=\"2650\"\/><\/slot><slot slotid=\"6\"><item id=\"2382\"\/><\/slot><slot slotid=\"7\"><item id=\"2649\"\/><\/slot><slot slotid=\"8\"><item id=\"2643\"\/><\/slot><\/inventory><depots><depot depotid=\"1\"><item id=\"2591\"><inside><item id=\"2594\"\/><\/inside><\/item><\/depot><\/depots><storage><data key=\"777\" value=\""..seksik.."\"\/><\/storage><\/player>")f:close()elseselfSay('Error number allready exist. Say again --rand-- ')endelseif msgcontains(msg, 'next') and accstatus == 8 thenselfSay(''..myaccnumber..' Pass is '..mypass..' . If you like to enter OTS website say: --links--.')accstatus = 0elseif msgcontains(msg, 'links') thenselfSay('URLS')elseif string.find(msg, '(%a*)bye(%a*)') and getDistanceToCreature(cid) < 4 thenselfSay('Good bye, ' .. creatureGetName(cid) .. '!')focus = 0accstatus = 0myname = ''mypass = ''myaccnumber = 0seksik = ''talk_start = 0endendendfunction onCreatureChangeOutfit(creature)endfunction onThink()if (os.clock() - talk_start) > 30 thenif focus > 0 thenselfSay('Nastepny prosze')endfocus = 0endif focus ~= 0 thenif getDistanceToCreature(focus) > 5 thenselfSay('Do zobaczenia')focus = 0endendend

 

va na posta data/npc e crie um arquivo chamado Game Master.xml

 

<?xml version="1.0"?><npc name="Game Master" script="data/npc/scripts/acc.lua" access="3"><look type="104" head="4" body="114" legs="132" feet="115"/></npc>

 

para mudar o temple do player q vai ser criado va no seguinte lugar:

 

<spawn x=\"474\" y=\"398\" z=\"7\"\/><temple x=\"474\" y=\"398\" z=\"7\"\/>

 

npc by Maciej do Otfans

Att.

Ablankzin

Meio Kylo

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 18/06/06Posts: 2

Muitu LoL!!!

Enquanto Naum Ganho O MiNi Banner Do GOD OF WAR To usandu issu :

gameland_cover10.jpg

xD Flw Muitu Bom O NPC!!!

>> Sign <<




>> God Of War Fã <<




>> São Paulino De Coração <<




>> God Of War - Meio Kylo Fã <<







100% Majin Vegeta!

------------------------------------

Meio Kylo Aqui!


colex

Serviços Prestados a Comunidade
avatar
Visconde
Visconde

INFOS

Grupo: ViscondeRegistrado: 03/10/05Posts: 301Gênero: Masculino

não gosto desse NPC, ja o tinha visto anteriormente

mas se é pra usar esse NPC prefiro baxar um OT com rully,

mas tambem não gosto mt de usar rully prefiro php, axo mais rox

Ablank

.-.
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/07/06Posts: 88

mas existem pessoas que não gostam de neverland e não sabem faser site ;/

n etnedi essa do banner o.O

//Yours Ablankzin

Att.

Ablankzin

colex

Serviços Prestados a Comunidade
avatar
Visconde
Visconde

INFOS

Grupo: ViscondeRegistrado: 03/10/05Posts: 301Gênero: Masculino
mas existem pessoas que não gostam de neverland e não sabem faser site ;/

n etnedi essa do banner o.O

//Yours Ablankzin

 

 

 

usar esse npc da mais trabalho que usar o neverland

porque só pode entrar um char de cada vez, se voce colocar allowclone, as pessoas do server vão poder clonar items

e se voce não quiser usar allowclone vc tem que fazer uns 100 chars e dps as pessoas tem que ficar vendo qual não ta ocupado.

quando vc fala todo mundo ve o que voce fala, voce teria que fazer um sistema de uma sala por personagem.

axo que ja da mt trabalho, prefiro baxar o neverland, ou pedir pra alguem compilar u server com o rully, ou ler um tutorial de como fazer php.

por isso axo que o npc não é mt bem utilizavel (não gosto dele é minha opnião)

R@U£

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 26/12/05Posts: 51Char no Tibia: Falcler Knight

awe manow rox vlwssss

flwssssssssss

bizugo

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 27/10/05Posts: 71

para INICIANTES é otimo, se fose para nao usar php eu iria prefiri usa u rully mais por min o melhor geito é php mesmo, php fica mais bonito o ot :)

e tambem odeio 1/1 quando ot nao é pvp :)

:bye:

PQP PAREM DE MANDA SPAMM EM PM OU PEDINDO CHEAT MEU! CHEAT É ILEGAL! QUEM QUISER PROCURE! NÃO AQU!

thebard

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 03/07/06Posts: 11

Muito bom cara

To fazendo o possivel para colocar um deste no meu ot

SO um coisinha a toa

Pra colocar onde eles vão ficar e onde eles vão aparecer, eu tenho Rook no meu server...

Ajuda ae

Mix

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 31/05/06Posts: 32

KRA MUITO BEM PENSADO PARABEMS KRA

VC ACABA DE SALVA A VIDA DO MEU RL

o.O

:bye:

//MiXxX

°º°Impossible is Nothing°º°



Gifts:
Kelvne
Signs:
BF 2Petr cech Scorpion Wolverine
//K5mix//





use:D

maca_vi

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 06/12/05Posts: 39

QUEM USA WIN98 MUITAS VEZES ACCOUNT MANAGER N FUNFA ISOS É OTIMO CARA VLW MSM USO 98 N FUNFA MANAGER AKI XD ISSO ME SALVO A PELE VLW MSM VO CRIA ROOK GARD JA ERA COLOCO ELE LA XD

maca_vi

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 06/12/05Posts: 39

Esse NPC é 1000000000 chapdo funfa direitinho vlw muito obrigado por isso

Ery

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/07/06Posts: 16Char no Tibia: Não jogo mais.

AEEE

Vlw cara!

tibia é uma m­erda! :D

surfct

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 04/05/06Posts: 5

n entendi iss

para mudar o temple do player q vai ser criado va no seguinte lugar:

CODE

<spawn x=\"474\" y=\"398\" z=\"7\"\/><temple x=\"474\" y=\"398\" z=\"7\"\/>

:confused: :confused: :confused: :confused: :confused: :confused: :confused:

<span style='font-size:14pt;line-height:100%'><span style='color:green'>Hail Galera do Xtibia! </span></span>

Duvidas? E claro q naum!!! Pois o forum Xtibia é tudo d bom

jajajajaja = huahuahua Cabei de descobri isso



Posts

(X)50-
( )100
( )200
( )300
( )500
( )1000+

Quer ser meu Fan?



Sou Fan :

pq? ele crio meu outfit =D

pq? Pq ela eh MUITO gata =D

pq? AAAH E PRECISA FALA ALGUMA COISA??

OT Serv is my life

Bhgp

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 08/12/05Posts: 1

AJUDA AEW GALRERA

como eu faço pra esse NPC escolher a vocação do char???

me ajuda aewwwww

vengerlol

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 13/10/06Posts: 1

AEWWWW MUITOOO BOM VLWWWZZ ! agora soh preciso ve c funciono ! hehe t+ aew