Croqueta

mira aq pc.say_item_vnum(armor[n][2]) pc. no tiene nada q ver ai >.> @fuuton97 si qieres averiguar cuales quests son mia, tienes q mirar siempre en las quest q el español este mas malo jajajaja^^

no se a q te refieres sorry

Les pongo la quest q ise, ella cambia piedras contra perlas, si uno lo qiere usar . el pescador solo muenstra las perlas q se puede cambiar con la cantidad q uno tiene por ejemplo->http://prntscr.com/1e4ot5 tengo en mi invetario solo 100 piedras http://prntscr.com/1e4p7r el pescador solo enseña la perla blanca y la perla azul por q la perla blanca cuesta 50 piedras y la azul 100 la roja cuesta 200 y es mas de lo q tengo, por eso no lo enseña. Pienso q les guste la quest, mucho gusto: Noa quest cambia_piedra begin state start begin when 9009.chat."Cambiar Piedras" begin say_title(mob_name(npc.get_race())) say() say("Qieres Cambiar piedras contra perlas?") if select("Si","No")==2 then return end local tabelle=cambia_piedra.cambia() local menu,cost=tabelle[1],tabelle[2] local menu_namen={} for i=1,table.getn(menu) do table.insert(menu_namen,item_name(menu[i])) end table.insert(menu_namen,"Cerrar") say_title(mob_name(npc.get_race())) say() if table.getn(menu)==0 then say("Tienes q tener minimo 50 piedras") say() return end say("Vamos a ver q te puedeo dar") local auswahl=select_table(menu_namen) if auswahl==table.getn(menu_namen) then return end say_title(mob_name(npc.get_race())) say() say("Qieres cambiar "..cost[auswahl].." contra "..menu_namen[auswahl].." ?") say() if select("Cambiar","Cerrar")==2 then return end say_title(mob_name(npc.get_race())) say() say("resivistes") say_item_vnum(menu[auswahl]) say("") pc.remove_item(27990,cost[auswahl]) pc.give_item2(menu[auswahl],1) end function cambia() local steine= pc.count_item(27990) --[Presio]=Item, local a={[50]=27992, [100]=27993, [200]=27994, } local menu,cost={},{} for _,i in pairs(a) do if steine >=_ then table.insert(menu,i) table.insert(cost,_) end end table.sort(menu) table.sort(cost) return {menu,cost} end endend

Qui presento una nueva quest q ise, ella escribe noticias por horas o minutos diarios, aun q el gm q la empeso este offline.para cambiar los textos tienen q ver q ustedes qieren aser por horas o minutos, para q los den una noticia por hora cambien en esta parte ['hour']={ la hora de noticia, por ejmpl. [14]='hola a todos aora son '..os.date("%H:%M:%S").." Horas", [horas]='noticia',y con los minutos es lo mismo, con mucho gusto, Noa quest time_notice begin state start begin when 9009.chat."noticia automatica" with pc.is_gm() begin say_title(mob_name(npc.get_race())) say() say("Tiempo del server: "..os.date("%H:%M:%S")) say("el systema de noticia esta "..({[0]="Apagada",[1]="Ensendida"})[game.get_event_flag("loop_time")]) say("q qieres aser?") local s= select("Ensender","Apagar","cerrar") if s==3 then return end if s==1 then game.set_event_flag("loop_time",1) server_loop_timer("loop_time",2,get_server_timer_arg()) else game.set_event_flag("loop_time",0) clear_server_timer("loop_time") end say("systema de noticia "..({"Esendido","Apagado"})[s]) end when loop_time.timer begin local time_notice={ ['hour']={ [14]='hola a todos aora son '..os.date("%H:%M:%S").." Horas", [18]='Preparanse para dormir, maña se tiene q levantarse temprano', ['min']={ [16]='hola queridos jugadores, no se olvide votar todos los dias', [17]='Test1', [18]='Test2', }, } } if game.get_event_flag("hour_time")!=tonumber(os.date("%H")) and game.get_event_flag("min_time")!=tonumber(os.date("%M")) then game.set_event_flag("hour_time",0) game.set_event_flag("min_time",0) for zeit,text in pairs(time_notice.hour) do if type(zeit)=='number' then if zeit==tonumber(os.date("%H")) then notice_all(text) game.set_event_flag("hour_time",tonumber(os.date("%H"))) end end if type(text)=='table' then table.foreach(time_notice['hour']['min'], function(t_ime,t_ext) if t_ime==tonumber(os.date("%M")) then notice_all(t_ext) game.set_event_flag("min_time",tonumber(os.date("%M"))) end end) end end end end endend

first click on cristal-> get bonus second click on cristal-> item and bonus remove that's what you exactly whant right?

entonses el item so se va cuando lo usas

se puede aser uo q se puede cambiar el cabello o?

me gustaria aprender Python por q qiero aser systemas graficos

Hola chicos y chicas, yo qiero aprender escribir en python ya q no tengo optiones mas en lua, qiero aprender otro lenguaje y para eso nesesito mas o meno un "Maestro" para aprenderlo rapido. si algientrabajar con migo me puede escriir en skype: spetznas4 yo aprendo mui rapido esos idioma y me gusta aprenderlos Mucho gusto Croqueta

keko no lo entiendo por q en la parte esta 2 - Arrays con subcategorías: cordes[4][2] es -> 12300 ami me da nil por q son solo 3 tablas en esta parte 4 - KeKo, no lo hemos entendido!!!! local sitio = select ("Mapa1" , "Mapa2", "Mapa3" , "Cerrar") sito es un select no una tabla por eso me pregunto por q usas esto if sitio == table.getn(sitio)+1 then return end table.getn(tala) esta funcion cuenta las cosas en la tabla por ejemplo a={4,5,6,13,5} print(table.getn(a))-->5 del select debe de ser nil por q el sitio no es una tabla perdona por corregirte pero es mejor saver los errores y no aserlo muchas veses, por q con una script complicada puede ser ese error mui grave

nivel: http://prntscr.com/1a39hg selection con el nivel: http://prntscr.com/1a39mf otro nivel: http://prntscr.com/1a39re selection con ese nivel: http://prntscr.com/1a39ul para cambiar las mapas, editen la tabla quest tele begin state start begin function warp_tab(warp) local a,lvl={},pc.get_level() table.foreach(warp,function(val,i) if lvl >= val then table.insert(a,val) end end) return a end function local_table(warp) local tabelle,main_menu,sel_table = tele.warp_tab(warp),{},{} table.sort(tabelle) table.foreach(tabelle,function(i,n) main_menu[i]={warp[n][1],warp[n][2]} sel_table[i]=warp[n][3] end) return main_menu,sel_table end when 9009.chat."Teleport pro" begin local warp={ --[lvl]={x,y,"Map_name"}, [30]={105,106,"Cuba"}, [50]={109,110,"Spain"}, [20]={103,104,"Miami"}, [10]={101,102,"USA"}, [40]={107,108,"London"}, } say_title("Teleport:") say() say("if your level is rising, more maps unlocked.") say("where you like want to go?") local ports,map_auswahl=tele.local_table(warp) table.insert(map_auswahl,locale.cancel) local auswahl=select_table(map_auswahl)--select2(map_auswahl) if auswahl==table.getn(map_auswahl) then return end pc.warp(ports[auswahl][1],ports[auswahl][2]) --say(ports[auswahl][1].."x , "..ports[auswahl][2].." y") end end end

debe de ser todo quest baul begin state start begin when login or levelup begin local a={1,10,20,30,40,50,60,70,80,90,100} local lvl=10 for i=1,table.getn(a) do if a[i]==lvl then if pc.getqf("last_flag")<lvl then local i=i-1 if lvl==100 then pc.give_item2(10..i) pc.setqf("last_flag",lvl) chat("Has recibido el baul del aprendiz") return end pc.give_item2(100..i) pc.setqf("last_flag",lvl) end end end chat("Has recibido el baul del aprendiz") end when 1000.use or 1001.use or 1002.use or 1003.use or 1004.use or 1005.use or 1006.use or 1007.use or 1008.use or 1009.use or 1010.use begin local drop = {[1000] = {9999, 8888, 7777}, [1001] = {9999, 8888, 7777}, [1002] = {9999, 8888, 7777}, [1003] = {9999, 8888, 7777}, [1004] = {9999, 8888, 7777}, [1005] = {9999, 8888, 7777}, [1006] = {9999, 8888, 7777}, [1007] = {9999, 8888, 7777}, [1008] = {9999, 8888, 7777}, [1009] = {9999, 8888, 7777} } chat(item_name(item.get_vnum()).." usado") for _,i in next,drop[item.get_vnum()] do chat("Has recibido "..item_name(i)) pc.give_item2(i,1) end end end end

-1 + -2 = -3 -100000exp+-100000exp=-200000exp la quest quest negative_exp begin state start begin when login with pc.get_exp() < 0 begin pc.give_exp2(math.abs(pc.get_exp())) end end end

update, tenia un pequeno bug, el bug era q la quest siempre empesava si el jugador iso un relog quest pferd_quest begin state start begin when login or levelup with type(pferd_quest_table[pc.get_level()])=='table' begin pc.setqf("pony_quest",pferd_quest_table[pc.get_level()][2]) if pc.getqf("pony_quest")>pc.getqf("last_quest") then q.set_counter("kills",pferd_quest_table[pc.get_level()][5]) pc.setqf("kills",pferd_quest_table[pc.get_level()][5]) setstate(status) end end end state status begin when letter begin send_letter("Caballo quest") end when button or info begin say_title("Caballo quest") say() say("Para la quest del Caballo "..pferd_quest_table[pc.get_level()][2]) say("tienes q matar "..pferd_quest_table[pc.get_level()][5].."x "..mob_name(pferd_quest_table[pc.get_level()][4])) say() say_reward("tienes q matar "..pc.getqf("kills").."x "..mob_name(pferd_quest_table[pc.get_level()][4])) end when kill with not npc.is_pc() and npc.get_race()==pferd_quest_table[pc.get_level()][4] begin local count = pc.getqf("kills") - 1 if count <= pferd_quest_table[pc.get_level()][5] then pc.setqf("kills", count) q.set_counter("kills", count) end if count == 0 then say("Felicidades") say_reward("nivel de caballo "..pferd_quest_table[pc.get_level()][2]) pc.give_item2(pferd_quest_table[pc.get_level()][1], 1) horse.set_level(pferd_quest_table[pc.get_level()][2]) pc.change_money(pferd_quest_table[pc.get_level()][3]) pc.setqf("last_quest",pferd_quest_table[pc.get_level()][2]) clear_letter() restart_quest() end end end end

esta quest es para todos los caballos una imagen, para ver como se ve en el juego http://prntscr.com/18h0fo questlib.lua: pferd_quest_table={ [25]={50051,1,100000,101,20}, [35]={50052,11,250000,102,50}, [50]={50053,21,400000,103,100} } {50051,1,100000,101,20}, Todo es editable: 50051: es el libro para llamar el caballo 1: es el nivel de el caballo 100000: es el dinero q gana por la quest 101: es el bicho q nesesita matar 20: es cantidad q tiene q matar para q la quest se termine Quest: quest pferd_quest begin state start begin when levelup with type(pferd_quest_table[pc.get_level()])=='table' begin q.set_counter("kills",pferd_quest_table[pc.get_level()][5]) pc.setqf("kills",pferd_quest_table[pc.get_level()][5]) setstate(status) end end state status begin when letter begin send_letter("Caballo quest") end when button or info begin say_title("Caballo quest") say() say("Para la quest del Caballo "..pferd_quest_table[pc.get_level()][2]) say("tienes q matar "..pferd_quest_table[pc.get_level()][5].."x "..mob_name(pferd_quest_table[pc.get_level()][4])) say() say_reward("tienes q matar "..pc.getqf("kills").."x "..mob_name(pferd_quest_table[pc.get_level()][4])) end when kill with not npc.is_pc() and npc.get_race()==pferd_quest_table[pc.get_level()][4] begin local count = pc.getqf("kills") - 1 if count <= pferd_quest_table[pc.get_level()][5] then pc.setqf("kills", count) q.set_counter("kills", count) end if count == 0 then say("Felicidades") say_reward("nivel de caballo "..pferd_quest_table[pc.get_level()][2]) pc.give_item2(pferd_quest_table[pc.get_level()][1], 1) horse.set_level(pferd_quest_table[pc.get_level()][2]) pc.change_money(pferd_quest_table[pc.get_level()][3]) clear_letter() restart_quest() end end end end

si el jugador no tiene el dinero pc.change_money("-100000") tiene despues el yang bug

se puede ver q si copia los tabs tab1 tab2 ademas se ve tambien en el paso 5

para q aser 4 armadura si se puede dar el shining asi mas rapido, y asi le puedes dar a todas las armaduras un shining en menos de 1 minuto

aun q unos lo saven, veo siempre que lo postean falso

es q no nesesito aora ninguna quest, por eso lo pongo todo public

playersettingsmodule.py en emotions, escriben esto, los numeros "EMOTICON+25" se tiene que corregir a el cliente de ustedes, por que si tienen 25-29 no pueden usar los mismos numeros. los "[TAB]" no se escriben, es solo una ayuda para que pongan los tabuladores. screen:http://prntscr.com/17jbx9 game.py screen de commandlist: http://prntscr.com/17jc1g screen de la funcion abajo: http://prntscr.com/17jc4b buscan a esto def __ServerCommand_Build(self): serverCommandList={ y pongan abajo de eso, esto uichat.py screen: http://prntscr.com/17jc7t buscan a esto def __SendChatPacket(self, text, type): y escriben a bajo esto para usar el shining como en mi video tienen q cargar el pack archivo, y ponerlo en el cliente de ustedes, en el pack ruta. despues tienen que editar el index a * shining como se ve en el screen aqi http://prntscr.com/17jcln lo que falta es la quest aqi esta 1 rojo 2 azul 3 orage 4 amarillo 5 verde para que tenga una armadura ese shining, solo nesesitan editar la tabla, [vnumdelaarmadura]={shiningnumero,vnumdelaarmadura}, quest testshining begin state start begin when login begin loop_timer("check",1) end when check.timer begin local items={ [11200]={1,11200},--los items que qiera tener un shining, lo pongan aqi [11201]={2,11201}, [11202]={3,11202} } pc.setqf("check",pc.get_armor()) if pc.get_armor()==0 then pc.setqf("use",0) pc.setqf("check",1) pc.setqf("last",2) end if pc.getqf("check")!= pc.getqf("last") then pc.setqf("use",0) pc.setqf("last",2) end if pc.getqf("check")!= pc.getqf("last") and pc.getqf("use")==0 then if pc.get_armor() == items[pc.get_armor()][2] then pc.setqf("last",pc.get_armor()) cmdchat("peng "..items[pc.get_armor()][1].."") pc.setqf("use",1) end end end end end pack.zip

gracias q le gusten, ami me gustaria mas ver la quest que andere en python

1.paso copia la quest http://prntscr.com/17hmgw 2.paso http://prntscr.com/17hn0h 3.paso escribe el codigo http://prntscr.com/17hnbo 4.paso pone la quest en el codigo http://prntscr.com/17hnfx 5.paso la resulta quests croquetatest begin state start begin when login begin say("hola, soi la croqueta, bien tostaita y calientita.") end end end

el sistema de rabia. cuando matas a bichos puedes cojer unos bonus, por items se puede cambiar "schutzpatron" es para defensa y "berserker" es para ataque, lo queria aser en python, pero como unos me conose no se nada de python. lo queria vizualisar con una bola que se llena por kill, la idea basica era dar puntos por matar a jugadores, aqi lo ise para ensenar con bichos por eso when kill with not npc.is_pc() begin--with npc.is_pc() and npc.get_empire() != pc.get_empire() beginlos que escriben quests me pueden preguntar si tienen preguntas, a lo demas solo puedo desir, qita la mano de la quest.un saludo Croque aqi esta la quest. quest rage_system begin state start begin when 71137.use or 40004.use begin local i_item={ [71137]={1,"Berserker"}, [40004]={2,"Schutzpatron"} } if pc.getqf("rage_use")> get_time() then chat("Du kannst dein Rage modus noch nicht ändern") return; end pc.setqf("rage_typ",i_item[item.get_vnum()][1]) chat(i_item[item.get_vnum()][2].." Rage zur Auswahl Gestellt") end when kill with not npc.is_pc() begin--with npc.is_pc() and npc.get_empire() != pc.get_empire() begin local i_bonus={ [1]={"Berserker",{{apply.ATTBONUS_HUMAN,10},{apply.ATT_SPEED, 20},{apply.MOV_SPEED,40},{apply.CRITICAL_PCT, 5},{apply.ATT_GRADE_BONUS,5},{apply.PENETRATE_PCT,5}}},--berserk [2]={"Schutzpatron",{{apply.RESIST_SWORD, 5},{apply.RESIST_TWOHAND,5},{apply.RESIST_DAGGER,5},{apply.RESIST_BELL,5},{apply.RESIST_FAN,5},{apply.RESIST_BOW,5}}},--defense } if pc.getqf("rage_use")> get_time() then return; end if pc.getqf("rage_typ") == 0 then return; end pc.setqf("rage_bar", pc.getqf("rage_bar")+1) chat(pc.getqf("rage_bar").."% von 100%") if pc.getqf("rage_bar")== 100 then pc.setqf("rage_bar",0) chat("Du bist in "..i_bonus[pc.getqf("rage_typ")][1].." Rage") chat("------BONUS------") for i=1, table.getn(i_bonus[pc.getqf("rage_typ")][2]) do affect.add_collect(i_bonus[pc.getqf("rage_typ")][2][i][1],i_bonus[pc.getqf("rage_typ")][2][i][2],60) chat("Du hast "..i_bonus[pc.getqf("rage_typ")][2][i][2].." "..bonus.trans[i_bonus[pc.getqf("rage_typ")][2][i][1]].." erhalten") end pc.setqf("rage_use",get_time()+60) end end end end escriben esto en la questlib para tradusir los bonus me ayudo stein20 en la tradusion

for i=1,6 do print(i) end escribelo en el lua editor