MageKapura

Estou querendo trazer linguagem C para os xtibianos, para eles terem ideia ou uma pequena noçao do que essa linguagem é capaz de fazer !

Eae galerinha !!! Entao hoje vim aqui postar um tutorial que fiz sobre programaçao C, nada muito fabuloso, apenas um tutorial basico para terem um pequena ideia !! Bem para começar voce tem que adicionar as bibliotecas entao vamo nessa ! #include<stdio.h> #include<conio.h> Obs: essas duas bibliotecas servem para suas funções. int main(void) Obs: essa funçao é a principal, nao esqueça dela si nao ira dar erro. { printf("Ola Mundo !"); Obs: para que serve printf ? ela é responssavel por apareçer auguma coisa na tela. } E como tirar aquelas escritas que ta ali e deichar apenas a frase Ola Mundo !! ? Simples agora vou fazer o script C sem "OBS", msm por que eu acho que vocês entenderão #include<stdio.h> #include<conio.h> int main(void) { clrscr(); printf("Ola Mundo !!"); } Agora com a funçao " CLRSCR();", a tela fica assim : Azul: a entrada das bibliotecas Verde: funçao principal Vermelho:Funçao para deichar a tela limpa, nesse script C. I é isso ai rapaziada, vou fazer mais tutos mais pra frente e posto aqui si esse tuto for bem divulgado ou seja tiver jente interessada !! VLW um abrç do MageKapura !!

Pelo o que entendi meu caro voce quer editar um cliente com o seu ip né ?! Entao vamos lá : Requisitos: Cliente creator: Download aqui: http://www.4shared.c...te_Creator.html Esse programa permite que voce edite o ip do cliente Tibia para augum seu. Lá em arquivo do programa voce seleciona o executavel do Tibia 8.54, em seu ip voce coloca o ip que desejar ^^. Ai pronto seu cliente já está voltado para seu ip, agora só voce ir em config.lua do seu OT e achar o ip e substituir. -- Connection config worldId = 0 ip = "coloque sei ip aqui !" bindOnlyConfiguredIpAddress = false loginPort = 7171 gamePort = 7172 adminPort = 7171 statusPort = 7171 loginTries = 10 retryTimeout = 5 * 1000 loginTimeout = 60 * 1000 maxPlayers = 1000 motd = "Welcome to Zig OT!" displayOnOrOffAtCharlist = true onePlayerOnlinePerAccount = true allowClones = false serverName = "Zig OT" loginMessage = "Welcome to Zig OT" statusTimeout = 5 * 60 * 1000 replaceKickOnLogin = true forceSlowConnectionsToDisconnect = false loginOnlyWithLoginServer = false premiumPlayerSkipWaitList = false Outra coisa para mudar a cor do menu, o plano de fundo vc baixa o seguinte programa : Pic Editor: http://www.4shared.c...25_install.html Ok, agora, tendo o Pic Editor em mãos copie o PicEditor v2.5 by Isaac.EXE para seu diretório de Tibia (O mesmo que está seu cliente). Abra o PicEditor que está dentro da pasta do seu cliente e clique em "Arquivo" e selecione o Tibia.pic que está nessa mesma pasta. Após ter selecionado o arquivo Tibia.pic clique em "Extract". Vão aparecer 8 arquivos Bitmap, do 0.bmp ao 7.bmp. Você só irá mecher no 0.bmp, pois ele é a imagem de fundo. Para alterar, simplesmente clique com o botão direito editar. Apague a imagem que tem e cole a que você quer. LEMBRE-SE QUE A IMAGEM NÃO PODE SER MAIOR NEM MENOR QUE A DO TIBIA.Salve e clique em "Compilar" Pronto! Mais fácil do que parecia neh? Mas pode haver um pequeno probleminha.... Fiquem calmos, pois esse problema é perfeitamente comum e bem fácil de resolver! Caso suas letras fiquem assim: Você terá que seguir este meu outro tutorial: Letras Embaralhadas? Créditos 100% meus, postem ai, isso é muito importante pra mim (: Credits: amoeba13 por desponibilizar as imagens e parte do tutorial !

Ae meu colega, esses scripts que voce está pedindo sao muito faceis de achar, mas no entanto vou posta- los aqui pra você: Npc/Scripts e crie um arquivo chamado heal.lua local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false local talkState = {} local states = {'1', '2', '3', '4', '5', '6'} local store = {1001, 1002, 1003, 1004, 1005, 1006, 1007, 1008, 1009, 1010, 1011, 1012, 1013, 1014, 1015, 1016, 1017, 1018, 1019, 1020, 1021, 1022, 1023, 1024, 1025, 1026, 1027, 1028, 1029, 1030, 1031, 1032, 1033, 1034, 1035, 1036, 1037, 1038, 1039, 1040, 1041, 1042, 1043, 1044, 1045, 1046, 1047, 1048, 1049, 1050, 1051, 1052, 1053, 1054, 1055, 1056, 1057, 1058, 1059, 1060, 1061, 1062, 1063, 1064, 1065, 1066, 1067, 1068, 1069, 1071, 1072, 1073, 1074, 1075, 1076, 1077, 1078, 1079, 1080, 1081, 1082, 1083, 1084, 1085, 1086, 1087, 1088, 1089, 1090, 1091, 1092, 1093, 1094, 1095, 1096, 1097, 1098, 1099, 1100, 1101, 1102, 1103, 1104, 1105, 1106, 1107, 1108, 1109, 1110, 1111, 1112, 1113, 1114, 1115, 1116, 1117, 1118, 1119, 1120, 1121, 1122, 1123, 1124, 1125, 1126, 1127, 1128, 1129, 1130, 1131, 1132, 1133, 1134, 1135, 1136, 1137, 1138, 1139, 1140, 1141, 1142, 1143, 1144, 1145, 1146, 1147, 1148, 1149, 1150, 1151} local unlock = {} local pokeballs = {'2222', '2224'} local ultraballs = {'2220', '2227'} local greatballs = {'2651', '2657'} local superballs = {'2653', '2658'} local saffariballs = {'2655', '2659'} function onThingMove(creature, thing, oldpos, oldstackpos) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('Good bye sir!') focus = 0 talk_start = 0 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 onCreatureSay(cid, type, msg) local msg = string.lower(msg) local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if((msgcontains(msg, 'hi') or msgcontains(msg, 'heal') or msgcontains(msg, 'help')) and (getDistanceToCreature(cid) <= 3)) then if exhaustion.get(cid, 9211) then selfSay('Please wait a few moment before asking me to heal your pokemons again!') return true end exhaustion.set(cid, 9211, 5) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)-getCreatureHealth(cid)) doSendMagicEffect(getThingPos(cid), 132) if isInArray(pokeballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET) local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]")) doItemSetAttribute(feet.uid, "poke", getItemAttribute(feet.uid, "poke"):sub(1, findLetter(getItemAttribute(feet.uid, "poke"), "[")) .. maxh .. getItemAttribute(feet.uid, "poke"):sub(findLetter(getItemAttribute(feet.uid, "poke"), "/"))) doTransformItem(feet.uid, 2222) end if isInArray(ultraballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET) local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]")) doItemSetAttribute(feet.uid, "poke", getItemAttribute(feet.uid, "poke"):sub(1, findLetter(getItemAttribute(feet.uid, "poke"), "[")) .. maxh .. getItemAttribute(feet.uid, "poke"):sub(findLetter(getItemAttribute(feet.uid, "poke"), "/"))) doTransformItem(feet.uid, 2220) end if isInArray(greatballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET) local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]")) doItemSetAttribute(feet.uid, "poke", getItemAttribute(feet.uid, "poke"):sub(1, findLetter(getItemAttribute(feet.uid, "poke"), "[")) .. maxh .. getItemAttribute(feet.uid, "poke"):sub(findLetter(getItemAttribute(feet.uid, "poke"), "/"))) doTransformItem(feet.uid, 2651) end if isInArray(superballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET) local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]")) doItemSetAttribute(feet.uid, "poke", getItemAttribute(feet.uid, "poke"):sub(1, findLetter(getItemAttribute(feet.uid, "poke"), "[")) .. maxh .. getItemAttribute(feet.uid, "poke"):sub(findLetter(getItemAttribute(feet.uid, "poke"), "/"))) doTransformItem(feet.uid, 2653) end if isInArray(saffariballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET) local maxh = tonumber(getItemAttribute(feet.uid, "poke"):match("/(.+)]")) doItemSetAttribute(feet.uid, "poke", getItemAttribute(feet.uid, "poke"):sub(1, findLetter(getItemAttribute(feet.uid, "poke"), "[")) .. maxh .. getItemAttribute(feet.uid, "poke"):sub(findLetter(getItemAttribute(feet.uid, "poke"), "/"))) doTransformItem(feet.uid, 2655) end local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK) if #getCreatureSummons(cid) >= 1 then local jui = getCreatureSummons(cid)[1] doCreatureAddHealth(jui, getCreatureMaxHealth(jui)-getCreatureHealth(jui)) doSendMagicEffect(getThingPos(jui), 12) end local items = getItemsInContainerById(bp.uid, 2224) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) doTransformItem(uid, 2222) end local items = getItemsInContainerById(bp.uid, 2227) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) doTransformItem(uid, 2220) end local items = getItemsInContainerById(bp.uid, 2657) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) doTransformItem(uid, 2651) end local items = getItemsInContainerById(bp.uid, 2658) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) doTransformItem(uid, 2653) end local items = getItemsInContainerById(bp.uid, 2659) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) doTransformItem(uid, 2655) end local items = getItemsInContainerById(bp.uid, 2222) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) end local items = getItemsInContainerById(bp.uid, 2220) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) end local items = getItemsInContainerById(bp.uid, 2651) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) end local items = getItemsInContainerById(bp.uid, 2653) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) end local items = getItemsInContainerById(bp.uid, 2655) for _, uid in pairs(items) do local maxh = tonumber(getItemAttribute(uid, "poke"):match("/(.+)]")) doItemSetAttribute(uid, "poke", getItemAttribute(uid, "poke"):sub(1, findLetter(getItemAttribute(uid, "poke"), "[")) .. maxh .. getItemAttribute(uid, "poke"):sub(findLetter(getItemAttribute(uid, "poke"), "/"))) end selfSay('There you go! You and your pokemons are healthy again.') end end function onThink() if focus ~= 0 then a, b, c = selfGetPosition() if c ~= getThingPos(focus).z then focus = 0 end end if focus ~= 0 then if getDistanceToCreature(focus) > 3 then focus = 0 end end return true end logo após crie na pasta Data/Npcs o arquivo Nurse.xml. Ponha isso dentro: <?xml version="1.0" encoding="UTF-8"?> <npc name="Nurse Joy" script="heal.lua" walkinterval="350000" floorchange="0" speed="0"> <health now="150" max="150"/> <look type="181" head="91" body="102" legs="83" feet="0"/> <parameters> <parameter key="message_greet" value="Welcome to the pokemon center! We can {heal} your pokemons here!"/> <parameter key="message_farewell" value="Always remember to treat well your pokemons!"/> <parameter key="message_idletimeout" value="Have a nice day."/> <parameter key="message_walkaway" value="Good bye young trainer!"/> </parameters> </npc> Código: Copie e cole qualquer arquivo da pasta action/script Você irá Renomea-lo para revive.lua Dentro dele adicione o seguinte código: function onUse(cid, item, fromPosition, itemEx, toPosition) if itemEx.itemid ~= getPlayerSlotItem(cid, 8).itemid then return doPlayerSendCancel(cid, "You must put your pokeball in the correct place!") end if getPlayerStorageValue(cid, 990) >= 1 then return doPlayerSendTextMessage(cid, 27, "You can\'t use potions in the gym.") end if itemEx.itemid == 12422 then -- saffari doItemSetAttribute(itemEx.uid, "hp", 1) doTransformItem(itemEx.uid, 12420) doRemoveItem(item.uid, 1) doSendMagicEffect(getCreaturePosition(cid), 13) elseif itemEx.itemid == 11828 then -- normal doItemSetAttribute(itemEx.uid, "hp", 1) doTransformItem(itemEx.uid, 11826) doRemoveItem(item.uid, 1) doSendMagicEffect(getCreaturePosition(cid), 13) elseif itemEx.itemid == 11831 then -- ultra doItemSetAttribute(itemEx.uid, "hp", 1) doTransformItem(itemEx.uid, 11829) doRemoveItem(item.uid, 1) doSendMagicEffect(getCreaturePosition(cid), 13) elseif itemEx.itemid == 11837 then -- super doItemSetAttribute(itemEx.uid, "hp", 1) doTransformItem(itemEx.uid, 11835) doRemoveItem(item.uid, 1) doSendMagicEffect(getCreaturePosition(cid), 13) elseif itemEx.itemid == 11834 then -- great doItemSetAttribute(itemEx.uid, "hp", 1) doTransformItem(itemEx.uid, 11832) doRemoveItem(item.uid, 1) doSendMagicEffect(getCreaturePosition(cid), 13) end end Depois abra o arquivo actions.xml, localizado na pasta data/actions E adicione a seguinte tag: <action itemid="12344" event="script" value="revive.lua" allowfaruse="1" blockwalls="1"/> CREDITS: masquente pelo script da nurse lucashgas pelo script do revive

Desponha !

Meu caro como o One falou seria quase impossivel !! Então faça por script.lua uma interface mias simples... pois pelo o que eu entendi voce coloca sua senha e login, e depois de logar abre uma outra tabela com os lugares que os players quiserem ir. Crie uma script.lua com as funções de teleportar o player por comando para onde ele quisece ir "ilhas, hunts ou citys!". Boa sorte !

Ficou muito bom.. de verdade levou meu rep+ aprovado !