 |
|
 |
 |
| Subiectul anterior :: Subiectul urmator |
| Autor |
Mesaj |
legendarul27
Administrator
Data inscrierii: 05/Iun/2012
Mesaje: 996
|
 Trimis: 15/06/2012 21:58 Titlul subiectului: Camera de cristal , Beran Setaou :) Explicate de DeMoN :) |
|
|
http://perihelion.metin2legends.ro/tutoriale/Camera%20de%20cristal%20BY%20DEMON%20-%20Metin2Legends.ro.rar
| Cod: |
----------------------------------------------------
--Camera_de_cristal_by_demonn
----------------------------------------------------
quest Camera_de_cristal_by_demon begin
state start begin
when 30123.chat."Templul Dragonului." with pc.get_map_index() == 73 begin
if get_time() > game.get_event_flag("Grotte_time") then
game.set_event_flag("Grotte_zugang",0)
end
if pc.is_gm() or pc.count_item(80041) >= 1 then
say_title(""..mob_name(30123).."")
say("Bun venit "..pc.get_name().."")
say("Nu ai nevoie nici de chei nici de parola")
say("esti GM poti intra cand vrei.")
wait()
pc.warp(826400, 1063800)
return
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
say_title(""..mob_name(30123).."")
say_reward("Pentru a intra în templul lui Beran,")
say_reward("ai trebuință de "..item_name(30179).."")
say_item_vnum(30179)
say_reward("Aceastã cheie rãsucitã picã la Cãpitanul Setaou.")
say_reward("Ai necesitate de trei Chei Rãsucite pentru a intra.")
return
end
if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30123).."")
pc.setqf("grotte_passworto", 078954687921)
if pc.getqf("abgabe") == 1 then
pc.setqf("abgabe",0)
say("Ai cele trei Chei Rãsucite.")
say("Te voi teleporta degrabă în camera de cristal.")
pc.setqf("erlaubt",1)
wait()
pc.warp(826400, 1063800)
return
end
say("Introdu codul ales de liderul grupului.")
local passwort = tonumber(input(""))
--pc.setqf("grotte_passworto", passwort)
if game.get_event_flag("Grotte_passwort") == passwort then
say_title(""..mob_name(30123).."")
say("Ai introdus codul corect.")
if pc.count_item(30179) < 3 then
say("Nu te pot teleporta deoarece nu ai")
say(""..item_name(30179).."")
say_item_vnum(30179)
say("Ai nevoie de cele trei Chei Rãsucite.")
return
end
say("Te voi teleporta imediat.")
pc.setqf("erlaubt",1)
wait()
if pc.can_warp() then
pc.remove_item("30179",3) end
pc.warp(826400, 1063800)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30123).."")
say("")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30123).."")
say("Deþin în mine, ultima suflare a zului dragon.")
say("Aceastã suflare magicã te pot ajuta sã mergi în")
say_reward("Camera de cristal.")
say("")
say("Ai nevoie de cele trei chei rãsucite.")
local i = select("Da, Vreau", "Nu, Mulþumesc")
if 1 == i then
say_title(""..mob_name(30123).."")
say("Ai nevoie de un cod pentru tine ºi grupul tãu.")
say("Codul pe care îl vei introduce, va trebui sã ")
say("conþinã maxim 2 cifre.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
game.set_event_flag("Grotte_zugang",1)
game.set_event_flag("Grotte_passwort",passwort)
local times = get_time() + 300 --Wartezeit
game.set_event_flag("Grotte_time", times)
say_title(""..mob_name(30123).."")
pc.setqf("abgabe",1)
say("Parola aleasa este: "..passwort.."")
notice_in_map("[Pocal Magic]:Parola camerei alese este "..passwort.." ")
pc.remove_item("30179",3)
else
say_title(""..mob_name(30123).."")
say("Nu ai scris codul corect.")
end
end
end
end
when login with pc.get_map_index() == 189 and not pc.is_gm() begin
if pc.count_item("80041") >= 1 then chat("") return end
if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 189 then
chat("")
warp_to_village()
end
notice_in_map("[Camera de cristal]:Bun venit în camera de cristal ! Începem prima sarcinã a voastrã.")
notice_in_map("[Camera de cristal]:Spargeþi toate metinele, si aflaþi care este metinul corespunzãtor.")
pc.set_warp_location(73 , 1825, 12207)
end
when 8031.kill with pc.get_map_index() == 189 begin
timer("skipia_boss_goo", 10)
notice_in_map("[Camera de cristal]:Aþi spart metinul corespunzãtor.")
notice_in_map("[Camera de cristal]:Îl veþi întâlni pe Beran-Setaou. Ce veþi face ?")
d.kill_all()
end
when skipia_boss_goo.timer begin
game.set_event_flag("Grotte_zugang",0)
d.new_jump_all(189, 8264, 10638)
d.setf("grotte_boss", 1)
d.spawn_mob(9012, 64, 142)
end
when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
local n =d.getf("count") + 1
d.setf("count", n)
notice_in_map("[Camera de cristal]:Aþi spart pânã acum "..n.." metine.")
if n > 2 then
local t = number(1,4)
notice_in_map("[Camera de cristal]:Beran-Setaou este tare furios.")
notice_in_map("[Camera de cristal]:Cheama ºi mai numeroase metine.")
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
end
end
when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
d.setf("grotte_boss", 3)
notice_all("Cu o ultimã suflare de speranþã liderul "..pc.get_name().."")
notice_all("Urmat de rãzboinici lui de încredere, au reuºit sã învingã Dragonul Albastru.")
timer("skipia_boss_end", 60)
d.spawn_mob(9012, 64, 142)
d.kill_all()
d.clear_regen()
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
timer("skipia_boss_end", 3600)
d.set_regen_file("data/dungeon/skia_boss.txt")
local t = number(1,4)
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
local o = number(1,4)
if 1 == o then
d.regen_file("data/dungeon/skia_boss5.txt")
elseif 2 == o then
d.regen_file("data/dungeon/skia_boss6.txt")
elseif 3 == o then
d.regen_file("data/dungeon/skia_boss7.txt")
else
d.regen_file("data/dungeon/skia_boss8.txt")
end
d.setf("grotte_boss", 2)
d.notice("[Camera de cristal]:Aveþi la dispozitie 60 de minute sã îi capturaþi sufletul lui Beran.")
d.setf("count", 0)
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin -- begin
--pc.warp(181700, 1220600)
end
when skipia_boss_end.timer begin
d.exit_all()
end
when skipia_boss_ende.timer begin
kill_all_in_map(189)
game.set_event_flag("Grotte_zugang",0)
d.setf("grotte_boss", 1)
d.exit_all()
end
when login with pc.get_map_index() != 189 or not pc.in_dungeon() begin
pc.setqf("erlaubt",0)
end
end
end
|
Acesta este questul Camerei de cristal 
Acestea sunt 518 - functii ale questurilor in game. aveti nevoie de ele ca questul camerei de cristal sa functioneze corect
Il puteti descarca de aici
http://perihelion.metin2legends.ro/tutoriale/Camera%20de%20cristal%20BY%20DEMON%20-%20Metin2Legends.ro.rar
| Cod: |
__give_char_priv
addimage
addmapsignal
affect.add
affect.remove
affect.remove_bad
affect.remove_good
affect.remove_hair
affect.add_hair
affect.add_collect
affect.add_collect_point
affect.remove_collect
bool_to_str
building.get_land_id
building.get_land_info
building.has_land
building.set_land_owner
char_log
item_log
chat
clear_server_timer
clearmapsignal
cleartimer
cmdchat
color
complete_quest
complete_quest_state
confirm
sys_log
d.check_eliminated
d.clear_regen
d.count_monster
d.exit
d.exit_all
d.exit_all_to_start_position
d.get_kill_mob_count
d.get_kill_stone_count
d.get_map_index
d.getf
d.is_unique_dead
d.is_use_potion
d.join
d.jump_all
d.jump_all_local
d.kill_unique
d.new_jump
d.new_jump_all
d.purge
d.purge_unique
d.regen_file
d.revived
d.select
d.set_dest
d.set_exit_all_at_eliminate
d.set_regen_file
d.set_unique
d.set_warp_at_eliminate
d.setf
d.spawn
d.spawn_goto_mob
d.spawn_group
d.spawn_mob
d.spawn_move_group
d.spawn_move_unique
d.spawn_name_mob
d.spawn_stone_door
d.spawn_unique
d.spawn_wooden_door
d.unique_get_hp_perc
d.unique_set_def_grade
d.unique_set_hp
d.unique_set_maxhp
delay
find_npc_by_vnum
find_pc_by_name
find_pc_cond
game.drop_item
game.get_event_flag
game.get_guild_name
game.get_safebox_level
game.get_warp_guild_war_list
game.open_mall
game.open_safebox
game.request_make_guild
game.set_event_flag
game.set_safebox_level
get_global_time
get_locale
get_server_timer_arg
get_time
guild.around_ranking_string
guild.get_any_war
guild.get_ladder_point
guild.get_name
guild.get_rank
guild.get_reserve_war_table
guild.get_warp_war_list
guild.high_ranking_string
guild.is_bet
guild.is_war
guild.level
guild.name
guild.war_bet
guild.war_enter
guild.get_member_count
highscore.register
highscore.show
horse.advance
horse.feed
horse.get_grade
horse.get_health
horse.get_health_pct
horse.get_hp
horse.get_level
horse.get_stamina
horse.get_stamina_pct
horse.is_dead
horse.is_mine
horse.is_riding
horse.revive
horse.ride
horse.set_level
horse.set_name
horse.get_name
horse.summon
horse.unride
horse.unsummon
input
is_test_server
item.get_count
item.get_level
item.get_name
item.get_refine_vnum
item.get_size
item.get_socket
item.get_sub_type
item.get_type
item.get_value
item.get_vnum
item.has_flag
item.next_refine_vnum
item.remove
item.set_socket
item.can_over9refine
item.change_to_over9
item.over9refine
item.get_over9_material_vnum
item_name
loop_timer
makequestbutton
marriage.divorce_time_check
marriage.end_wedding
marriage.engage_to
marriage.find_married_vid
marriage.get_married_time
marriage.get_wedding_list
marriage.join_wedding
marriage.marry_to
marriage.remove
marriage.set_to_marriage
marriage.warp_to_my_marriage_map
marriage.wedding_dark
marriage.wedding_snow
marriage.wedding_music
marriage.wedding_is_playing_music
marriage.in_my_wedding
marriage.wedding_client_command
math.floor
math.max
math.mod
math.random
member.chat
member.clear_ready
member.set_ready
mob.spawn
mob.spawn_group
mob_name
mob_vnum
next_time_is_now
next_time_set
notice
npc.dec_remain_hairdye_count
npc.dec_remain_skill_book_count
npc.get_empire
npc.get_race
npc.get_remain_hairdye_count
npc.get_remain_skill_book_count
npc.getrace
npc.is_near
npc.is_near_vid
npc.is_pc
npc.is_quest
npc.kill
npc.lock
npc.open_shop
npc.purge
npc.unlock
npc_get_job
npc_is_same_empire
npc_is_same_job
number
party.chat
party.clear_ready
party.get_max_level
party.get_near_count
party.getf
party.is_leader
party.is_party
party.run_cinematic
party.setf
party.setqf
party.show_cinematic
party.syschat
pc.aggregate_monster
pc.change_alignment
pc.change_sex
pc.change_gold
pc.change_money
pc.change_sp
pc.changealignment
pc.changegold
pc.changemoney
pc.change_empire
pc.change_name
pc.clear_skill
pc.clear_sub_skill
pc.clear_one_skill
pc.count_item
pc.countitem
pc.delqf
pc.destroy_guild
pc.enough_inventory
pc.forget_my_attacker
pc.get_armor
pc.get_empire
pc.get_equip_refine_level
pc.get_exp
pc.get_gold
pc.get_guild
pc.get_horse_level
pc.get_hp
pc.get_job
pc.get_leadership
pc.get_level
pc.get_local_x
pc.get_local_y
pc.get_map_index
pc.get_max_hp
pc.get_max_sp
pc.get_money
pc.get_name
pc.get_next_exp
pc.get_part
pc.get_playtime
pc.get_sex
pc.get_skill_level
pc.get_sp
pc.get_start_location
pc.get_vid
pc.get_war_map
pc.get_weapon
pc.get_x
pc.get_y
pc.getarmor
pc.getcurrentmapindex
pc.getempire
pc.getf
pc.getgold
pc.getguild
pc.gethp
pc.getleadership
pc.getmaxhp
pc.getmaxsp
pc.getmoney
pc.getname
pc.getplaytime
pc.getqf
pc.get_skill_group
pc.getsp
pc.getweapon
pc.getx
pc.gety
pc.give_exp
pc.give_exp2
pc.give_exp_perc
pc.give_gold
pc.give_item
pc.give_item2
pc.give_item_from_special_item_group
pc.give_lotto
pc.give_polymorph_book
pc.has_guild
pc.has_master_skill
pc.hasguild
pc.have_map_scroll
pc.have_pos_scroll
pc.in_dungeon
pc.is_guild_master
pc.is_horse_alive
pc.is_married
pc.is_mount
pc.is_polymorphed
pc.isguildmaster
pc.is_dead
pc.mount
pc.pc_attract_ranger
pc.polymorph
pc.refine_equip
pc.remove_from_guild
pc.remove_item
pc.remove_polymorph
pc.removeitem
pc.reset_point
pc.reset_status
pc.revive_horse
pc.select
pc.set_part
pc.set_warp_location
pc.set_warp_location_local
pc.setf
pc.setqf
pc.set_skill_group
pc.set_skill_level
pc.unmount
pc.warp
pc.warp_exit
pc.warp_local
pc.warp_to_guild_war_observer_position
pc.is_clear_skill_group
pc_find_skill_teacher_vid
pc_find_square_guard_vid
pc_get_exp_bonus
pc_get_village_map_index
pc_is_novice
q.done
q.getcurrentquestindex
q.no_send
q.set_clock
q.set_clock_name
q.set_clock_value
q.set_counter
q.set_counter_name
q.set_counter_value
q.set_icon
q.set_quest_state
q.set_state
q.set_title
q.set_title2
q.setstate
q.start
q.yield
raw_script
restart_quest
say
say_npc_name
say_pc_name
say_reward
say_title
say_item
say_item_vnum
select
select_table
clear_letter
send_letter
send_letter_ex
server_loop_timer
server_timer
set_quest_state
set_state
setbgimage
setcolor
setleftimage
setmapcenterposition
setskin
setstate
show_horse_menu
skill_group_dialog
syschat
table.insert
table.foreach
table.foreachi
table.getn
table_get_random_item
target.clear
target.delete
target.id
target.npc
target.pc
target.pos
target.vid
test_chat
time_hour_to_sec
time_min_to_sec
timer
tonumber
tostring
type
wait
pc.is_engaged
time_to_str
string.format
string.len
math.ceil
pc.is_gm
pc.get_gm_level
pc.get_alignment
pc.get_real_alignment
pc.learn_grand_master_skill
pc.is_skill_book_no_delay
pc.remove_skill_book_no_delay
__get_empire_priv_string
__give_empire_priv
npc.get_guild
pc.mining
d.notice
pc.ore_refine
under_han
d.kill_all
d.setqf
__get_guild_priv_string
__give_guild_priv
__get_guildid_byname
item.get_id
item.select
select_item
item.select_cell
pc.diamond_refine
__fish_real_refine_rod
__refine_pick
item.get_cell
building.reconstruct
arena.start_duel
arena.get_duel_list
arena.add_observer
arena.is_in_arena
BuildSkillList
notice_all
warp_all_to_village
say_in_map
goldbar.quest
regen_in_map
kill_all_in_map
forked.setdeadcount
forked.initkillcount
forked.initmobkillcount
forked.initforked
warp_to_village
forked.getdeadcount
forked.incbosskillcount
forked.getbosskillcount
forked.getsungziposx
forked.getsungziposy
forked.getpassstartposx
forked.getpassstartposy
forked.getsungzimapindex
forked.getpassmapindex
forked.getpassmapindexbyempire
forked.warp_all_in_map
forked.getpasspath
forked.getpasspathbyempire
forked.isforkedmapindex
forked.issungzimapindex
oh.candidacy_list
oh.election
oh.candidacy_name
oh.candidacy
oh.takemonarchmoney
pc.teleport
oh.isguildmaster
oh.candidacycount
pc.get_premium_remain_sec
oh.ismonarch
oh.spawnmob
oh.monarchbless
oh.monarchpowerup
oh.monarchdefenseup
pc.send_block_mode
command
oxevent.get_status
oxevent.open
oxevent.close
oxevent.quiz
oxevent.end_event
oxevent.get_attender
oxevent.give_item
oxevent.end_event_force
forked.getlevellimit
mgmt.monarch_state
mgmt.monarch_change_lord
oh.frog_to_empire_money
oh.spawnguard
pc.get_change_empire_count
pc.set_change_empire_count
oh.notice
ba.start
setdelay
resetdelay
pc.is_near_vid
get_quest_state
math.min
pc.get_empty_inventory_count
pc.get_socket_items
table.remove
guild.change_master_with_limit
warp_all_in_map
forked.get_pass_start_pos
forked.get_sungzi_start_pos
forked.is_registered_user
forked.purge_all_monsters
forked.register_user
notice_in_map
pc.can_warp
mysql_notselect
mysql_select
pc.get_account_id
pc.get_player_id
os.date
pc.mount_bonus
|
Ce veti vedea dedesubt, este aur curat pentru cei care detin sf de 2011 , 2010 , Beran-Setaou ( Dragon Albastru ) nu da dmg , aceste setari , restabilesc bugul dragonului Aceste setari , vin scrise in :
/usr/home/game/share/locale/germany/ - in settings.lua , jos de tot in pagina !
| Cod: |
-- Dragon Setting
BlueDragonSetting = {
DragonStone = {{effect_type = 1,vnum = 8031, val = 1,enemy_val =3,enemy = 1},
{effect_type = 2,vnum = 8031, val = 2,enemy_val =4,enemy = 2},
{effect_type = 3,vnum = 8032, val = 3,enemy_val =5,enemy = 3},
{effect_type = 4,vnum = 8033, val = 4,enemy_val =6,enemy = 4},
{effect_type = 5,vnum = 8034, val = 5,enemy_val =7,enemy = 5}},
hp_regen = {
['min'] = 15,
['max'] = 15,
['pct'] = 35
},
hp_period = {
['min'] = 3,
['max'] = 7,
['pct'] = 25
},
hp_damage = {
['min'] = 2000,
['max'] = 3500,
['pct'] = 35
},
Skill0 = {
['damage'] = {musa={min=13,max=38},muda={min=12,max=30},assa={min=10,max=24},sura={min=18,max=29}},
['damage_area'] = 6000,
['default_damage'] = {min=6000,max=9000},
['period'] = {min=19,max=27},
['gender'] = {female={min=5,max=10},male={min=8,max=17}},
},
Skill1 = {
['damage_area'] = 6500,
['default_damage'] = {min=7000,max=10000},
['period'] = {min=29,max=39},
},
Skill2 = {
['damage_area'] = 8000,
['period'] = {min=30,max=56},
['default_damage'] = {min=9000,max=11000},
['stun_time'] = {default={min=1,max=2}},
['gender'] = {female={min=5,max=10},male={min=8,max=17}},
},
}
-- BY DEMON @ METIN2LEGENDS.ro
-- BY DEMON @ METIN2LEGENDS.ro
-- BY DEMON @ METIN2LEGENDS.ro
|
Aceste coduri : 8031 - 8032 8033 - 8034 - sunt metinele de 60 . Odata ce fiecare dintre aceste metine , puse in camera de cristal , langa Beran-Setaou , sporesc Agresivitatea , Dmg-ul , si viteza farmecului Dragonului de 4 ori .
Fiecare metin spart , scade Agresiunea , dmg-ul si viteza farcemului.
De favorit pentru cei ce nu stiu, odata intrati la dragonul Beran-Setaou , spargeti întâia data , aceste 4 metine !
//-------------------------------------------- HARTA TEMPLUL DRAGONULUI ---------------------------------\\
De aici puteti descarca tot ce apartine de Camera de cristal !
http://perihelion.metin2legends.ro/tutoriale/Camera%20de%20cristal%20BY%20DEMON%20-%20Metin2Legends.ro.rar
Tineti minte , dupa ce adaugati mapa " metin2_map_skipia_boss_demon" in server , in map , in intex trebuie neaparat adaugat numarul mapei "189 metin2_map_skipia_boss_demon"
in /share/data/dungeon/ adaugati , fisierele , skia_boss1.txt - skia_boss2.txt - skia_boss3.txt - skia_boss4.txt - skia_boss5.txt - skia_boss6.txt - skia_boss7.txt - skia_boss8.txt si skia_boss.txt
in /share/locale/germany/ - adaugati , group.txt - group_group.txt si settings.lua.
Dupa ce ati adaugat tot ce se afla aici
http://perihelion.metin2legends.ro/tutoriale/Camera%20de%20cristal%20BY%20DEMON%20-%20Metin2Legends.ro.rar
In Channel1 - Channel2 - channel99 sau "game99" la uni , adaugati in CONFIG la MAP_ALLOW: 189
Dati un reboot la server " de preferat sa faceti tutorialul cu serverul OFF " si bafta in continuare |
|
| Sus » |
|
|
|
|
|
Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum
|
|
 |
|
|
 |
|
