[comment mortal_craft_dialog]
Craft dialoglarının tanımlamaları
Yazar: Mortal
Tarih: 29.09.2012
Saat: 00:32
Kullanımı:
ilk önce 0 konur bu değişmez
Daha sonraki sayı o kategori içerisinde kaç item olduğunu gösterir
Daha sonra item id'leri yazılır.
[defname mortal_craft_dialog]
ins_kategori1 0,8,i_scroll_clumsy, i_scroll_create_food, i_scroll_feeblemind, i_scroll_heal, i_scroll_magic_arrow, i_scroll_night_sight, i_scroll_reactive_armor,i_scroll_weaken
ins_kategori2 0,8,i_scroll_agility,i_scroll_cunning,i_scroll_cure,i_scroll_harm,i_scroll_magic_trap,i_scroll_magic_untrap,i_scroll_protection,i_scroll_strength
ins_kategori3 0,8,i_scroll_bless,i_scroll_fireball,i_scroll_magic_lock,i_scroll_poison,i_scroll_telekinesis,i_scroll_teleport,i_scroll_unlock,i_scroll_wall_of_stone
ins_kategori4 0,8,i_scroll_archcure,i_scroll_archprotection,i_scroll_curse,i_scroll_fire_field,i_scroll_greater_heal,i_scroll_lightning,i_scroll_mana_drain,i_scroll_recall
ins_kategori5 0,8,i_scroll_blade_spirits,i_scroll_dispel_field,i_scroll_incognito,i_scroll_magic_reflection,i_scroll_mind_blast,i_scroll_paralyze,i_scroll_poison_field,i_scroll_summon_creature
ins_kategori6 0,8,i_scroll_dispel,i_scroll_energy_bolt,i_scroll_explosion,i_scroll_invisibility,i_scroll_mark,i_scroll_mass_curse,i_scroll_paralyze_field,i_scroll_reveal
ins_kategori7 0,8,i_scroll_chain_lightning,i_scroll_energy_field,i_scroll_flamestrike,i_scroll_gate_travel,i_scroll_mana_vampire,i_scroll_mass_dispel,i_scroll_meteor_swarm,i_scroll_polymorph
ins_kategori8 0,8,i_scroll_earthquake,i_scroll_energy_vortex,i_scroll_resurrection,i_scroll_summon_elem_air,i_scroll_summon_daemon,i_scroll_summon_elem_earth,i_scroll_summon_elem_fire,i_scroll_summon_elem_water
ins_kategori9 0,1,i_f_s
alc_kategori1 0,4,i_potion_explosionless,i_potion_poisonless,i_potion_healless,i_potion_cureless
alc_kategori2 0,8,i_potion_agility,i_potion_refresh,i_potion_explosion,i_potion_poison,i_potion_heal,i_potion_cure,i_potion_strength,i_potion_nightsight
alc_kategori3 0,6,i_potion_agilitygreat,i_potion_explosiongreat,i_potion_poisongreat,i_potion_healgreat,i_potion_curegreat,i_potion_strengthgreat
alc_kategori4 0,2,i_potion_refreshtotal,i_potion_poisondeadly
tailor_kategori1 0,11,i_skull_cap,i_bandana,i_hat_floppy,i_hat_wide_brim,i_hat_straw,i_hat_straw_tall,i_bonnet,i_hat_feather,i_hat_jester,i_cap,i_hat_wizards
tailor_kategori2 0,10,i_doublet,i_shirt_plain,i_shirt_fancy,i_tunic,i_surcoat,i_dress_plain,i_dress_full,i_cape,i_robe,i_jester_suit
tailor_kategori3 0,4,i_pants_short,i_pants_long,i_kilt,i_skirt_long
tailor_kategori4 0,4,i_sandals,i_shoes_plain,i_boots_calf,i_boots_thigh
tailor_kategori5 0,6,i_leather_gorget,i_leather_cap,i_leather_gloves,i_leather_sleeves,i_leather_leggings,i_leather_tunic
tailor_kategori6 0,5,i_studded_gorget,i_studded_gloves,i_studded_sleeves,i_studded_leggings,i_studded_tunic
tailor_kategori7 0,6,i_armor_female_shorts,i_armor_female_skirt,i_armor_female_bustier,i_armor_female_bustier_studded,i_armor_female_leather,i_armor_female_studded
tailor_kategori8 0,3,i_backpack,i_pouch,i_bag
tailor_kategori9 0,4,i_sash,i_apron_half,i_apron_full,i_deathshroud
carpentery_kategori1 0,7,i_chair_throne,i_chair_wood_rough_dark,i_chair_wood_cushion,i_chair_wood,i_chair_wood_bamboo,i_chair_stool,i_bench_wood_dark
carpentery_kategori2 0,7,i_chest_wooden_brass,i_box_wood,i_crate_small,i_crate_md,i_crate_lg,i_armoir_dk,i_armoir_lt
carpentery_kategori3 0,7,i_table_nightstand,i_table_wood_rough_small,i_table_wood_rough_board,i_bench_woodworker_end,i_vise,i_bench_cooper,i_table_writing
carpentery_kategori4 0,7,i_club,i_staff_gnarled,i_staff_quarter,i_shepherds_crook,i_staff_black,i_fishing_pole,i_shield_wood
carpentery_kategori5 0,6,i_bar_door_ne,i_bar_piece,i_bureau_2,i_music_stand_tall,i_music_stand,i_bookcase
carpentery_kategori6 0,2,i_deed_forge,i_deed_anvil
carpentery_kategori7 0,4,i_spinning_wheel,01062,01061,i_bookcase_full
carpentery_kategori8 0,4,i_deed_pickpockn,i_deed_dummyn,i_saddle,i_dye_tub
[eof]
[comment ins_dialog]
Skill Dialogları
Yazar: Mortal
Tarih: 23.09.2012
Saat: 01:21
[function ins_dialog]
src.dialogclose d_skill_ins
src.ctag0.kategori <args>
src.dialog d_skill_ins <def.ins_kategori<dsrc.ctag0.kategori>>
[dialog d_skill_ins]
20,35
page 0
makebg 0,0,605,245
button 562 12 4017 4018 1 0 0
dtext 10 13 0480 <serv.servname> İnscription Menu
gumppictiled 5 72 595 3 2604
checkertrans 5 72 595 3
gumppictiled 5 43 595 3 2604
checkertrans 5 43 595 3
gumppictiled 5 200 595 4 2604
checkertrans 5 200 595 4
local.z -55
local.y -35
for 10 18
local.z += 65
local.y += 65
dtext <dlocal.y> 50 0480 Mics:<eval <dlocal._for>-9>
button <dlocal.z> 52 5601 5605 1 0 <dlocal._for>
endfor
src.ctag0.items <argv[0]>
if (<dsrc.ctag0.items> < 5)
local.y 52
for a 2 <eval <src.ctag0.items>+1>
local.y +=30
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
else
local.y 52
for a 2 5
local.y +=30
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 52
for b 6 <eval <src.ctag0.items>+1>
local.y +=30
dtext 400 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
endif
resizepic 523 210 3000 35 25
dtextentry 527 211 25 20 0 1
button 563 212 2714 2715 1 0 19
dtext 10 210 354 Son yapilan item: <serv.itemdef.<src.ctag.makelast>.name>
dtext 460 210 360 Tekraryap
[dialog d_skill_ins button]
on=0
src.dialogclose d_skill_ins
return 1
on=2 9
local.sayi <argn>
args <def.ins_kategori<dsrc.ctag0.kategori>>
src.ctag.makelast <argv[<dlocal.sayi>]>
if !(<canmake <src.ctag.makelast>>)
src.sysmessage @58,,1 <serv.itemdef.<src.ctag.makelast>.name> yapabilmek için <serv.itemdef.<src.ctag.makelast>.resmake>'e ihtiyacınız var.
src.sysmessage @38,,1 Bu itemi yapabilmek için <serv.itemdef.<src.ctag.makelast>.skillmake> gerekli.
return 1
endif
src.makeitem <src.ctag.makelast>
on=10 18
argn -=9
src.ins_dialog <argn>
on=19
if !(<src.ctag.makelast>)
src.sysmessage @38,,1 En son ne yaptiginizi hatirlamiyorsunuz
return 1
endif
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,,1 Sadece rakam girebilirsiniz.
return 1
endif
if (<argtxt[1]> > 500)
src.sysmessage @38,,1 500'den fazla macroya bırakamazsınız
return 1
endif
src.tag.macro=<eval <argtxt[1]>>
src.makelast_mortal
[eof]
[comment carpentery_dialog]
Skill Dialogları
Yazar: Mortal
Tarih: 25.09.2012
Saat: 13:21
[function carpentery_dialog]
src.dialogclose d_skill_carpentery
src.ctag0.kategori <args>
src.dialog d_skill_carpentery <def.carpentery_kategori<dsrc.ctag0.kategori>>
[dialog d_skill_carpentery]
20,35
page 0
makebg 0,0,590,340
//resizepic 0 0 2620 590 340
//checkertrans 5 5 580 330
button 552 12 4017 4018 1 0 0
dtext 10 13 0480 <serv.servname> Tailor Menu
gumppictiled 5 72 580 3 2604
checkertrans 5 72 580 3
gumppictiled 5 43 580 3 2604
checkertrans 5 43 580 3
gumppictiled 5 300 580 4 2604
checkertrans 5 300 580 4
dtext 30 50 0480 Chairs
button 10 52 5601 5605 1 0 16
dtext 85 50 0480 Containers
button 65 52 5601 5605 1 0 17
dtext 150 50 0480 Tables
button 130 52 5601 5605 1 0 18
dtext 215 50 0480 Weapons
button 195 52 5601 5605 1 0 19
dtext 275 50 0480 Furniture
button 255 52 5601 5605 1 0 20
dtext 345 50 0480 Miner[T]
button 325 52 5601 5605 1 0 21
dtext 415 50 0480 Tailor[T]
button 395 52 5601 5605 1 0 22
dtext 490 50 0480 Others
button 470 52 5601 5605 1 0 23
src.ctag0.items <argv[0]>
if (<dsrc.ctag0.items> < 3)
local.y 35
for a 2 3
local.y +=55
dtext 100 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
elif (<dsrc.ctag0.items> < 5)
local.y 25
for a 2 3
local.y +=75
dtext 100 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 25
for b 4 <eval <src.ctag0.items>+1>
local.y +=75
dtext 420 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
elif (<dsrc.ctag0.items> < 6)
local.y 52
for a 2 <eval <src.ctag0.items>+1>
local.y +=38
dtext 100 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
elif (<dsrc.ctag0.items> < 11)
local.y 32
for a 2 5
local.y +=55
dtext 120 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 32
for b 6 <eval <src.ctag0.items>+1>
local.y +=55
dtext 420 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
else
local.y 42
for a 2 7
local.y +=37
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 52
for b 8 <eval <src.ctag0.items>+1>
local.y +=37
dtext 400 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
endif
resizepic 523 307 3000 35 25
dtextentry 527 308 25 20 0 1
button 563 309 2714 2715 1 0 18
dtext 10 308 354 Son yapilan item: <serv.itemdef.<src.ctag.makelast>.name>
dtext 460 308 360 Tekraryap
[dialog d_skill_carpentery button]
on=0
src.dialogclose d_skill_carpentery
return 1
on=2 15
local.sayi <argn>
args <def.carpentery_kategori<dsrc.ctag0.kategori>>
src.ctag.makelast <argv[<dlocal.sayi>]>
if !(<canmake <src.ctag.makelast>>)
src.sysmessage @58,,1 <serv.itemdef.<src.ctag.makelast>.name> yapabilmek için <serv.itemdef.<src.ctag.makelast>.resmake>'e ihtiyacınız var.
src.sysmessage @38,,1 Bu itemi yapabilmek için <serv.itemdef.<src.ctag.makelast>.skillmake> gerekli.
return 1
endif
src.makeitem <src.ctag.makelast>
on=16 23
argn -=15
src.carpentery_dialog <argn>
on=18
if !(<src.ctag.makelast>)
src.sysmessage @38,,1 En son ne yaptiginizi hatirlamiyorsunuz
return 1
endif
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,,1 Sadece rakam girebilirsiniz.
return 1
endif
if (<argtxt[1]> > 500)
src.sysmessage @38,,1 500'den fazla macroya bırakamazsınız
return 1
endif
src.tag.macro=<eval <argtxt[1]>>
src.makelast_mortal
[eof]
[comment alchemy_dialog]
Skill Dialogları
Yazar: Mortal
Tarih: 24.09.2012
Saat: 16:30
[function alc_dialog]
src.dialogclose d_skill_alc
src.ctag0.kategori <args>
src.dialog d_skill_alc <def.alc_kategori<dsrc.ctag0.kategori>>
[dialog d_skill_alc]
20,35
page 0
resizepic 0 0 2620 540 245
checkertrans 5 5 530 235
button 502 12 4017 4018 1 0 0
dtext 10 13 0480 <serv.servname> Alchemy Menu
gumppictiled 5 72 530 3 2604
checkertrans 5 72 530 3
gumppictiled 5 43 530 3 2604
checkertrans 5 43 530 3
gumppictiled 5 200 530 4 2604
checkertrans 5 200 530 4
local.z -55
local.y -35
for 10 13
local.z += 65
local.y += 65
dtext <dlocal.y> 50 0480 Mics:<eval <dlocal._for>-9>
button <dlocal.z> 52 5601 5605 1 0 <dlocal._for>
endfor
src.ctag0.items <argv[0]>
if (<dsrc.ctag0.items> < 5)
local.y 52
for a 2 <eval <src.ctag0.items>+1>
local.y +=30
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
else
local.y 52
for a 2 5
local.y +=30
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 52
for b 6 <eval <src.ctag0.items>+1>
local.y +=30
dtext 400 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
endif
resizepic 463 210 3000 35 25
dtextentry 467 211 25 20 0 1
button 503 212 2714 2715 1 0 18
dtext 10 210 354 Son yapilan item: <serv.itemdef.<src.ctag.makelast>.name>
dtext 400 210 360 Tekraryap
[dialog d_skill_alc button]
on=0
src.dialogclose d_skill_alc
return 1
on=2 9
local.sayi <argn>
args <def.alc_kategori<dsrc.ctag0.kategori>>
src.ctag.makelast <argv[<dlocal.sayi>]>
if !(<canmake <src.ctag.makelast>>)
src.sysmessage @58,,1 <serv.itemdef.<src.ctag.makelast>.name> yapabilmek için <serv.itemdef.<src.ctag.makelast>.resmake>'e ihtiyacınız var.
src.sysmessage @38,,1 Bu itemi yapabilmek için <serv.itemdef.<src.ctag.makelast>.skillmake> gerekli.
return 1
endif
src.makeitem <src.ctag.makelast>
on=10 13
argn -=9
src.alc_dialog <argn>
on=18
if !(<src.ctag.makelast>)
src.sysmessage @38,,1 En son ne yaptiginizi hatirlamiyorsunuz
return 1
endif
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,,1 Sadece rakam girebilirsiniz.
return 1
endif
if (<argtxt[1]> > 500)
src.sysmessage @38,,1 500'den fazla macroya bırakamazsınız
return 1
endif
src.tag.macro=<eval <argtxt[1]>>
src.makelast_mortal
[eof]
[comment carpentery_dialog]
Skill Dialogları
Yazar: Mortal
Tarih: 27.09.2012
Saat: 01:23
[function tailor_dialog]
src.dialogclose d_skill_tailor
src.ctag0.kategori <args>
src.dialog d_skill_tailor <def.tailor_kategori<dsrc.ctag0.kategori>>
[dialog d_skill_tailor]
20,35
page 0
resizepic 0 0 2620 590 340
checkertrans 5 5 580 330
button 552 12 4017 4018 1 0 0
dtext 10 13 0480 <serv.servname> Tailor Menu
gumppictiled 5 72 580 3 2604
checkertrans 5 72 580 3
gumppictiled 5 43 580 3 2604
checkertrans 5 43 580 3
gumppictiled 5 300 580 4 2604
checkertrans 5 300 580 4
dtext 30 50 0480 Hats
button 10 52 5601 5605 1 0 16
dtext 85 50 0480 Shirts
button 65 52 5601 5605 1 0 17
dtext 150 50 0480 Pants
button 130 52 5601 5605 1 0 18
dtext 215 50 0480 Shoes
button 195 52 5601 5605 1 0 19
dtext 275 50 0480 Leather
button 255 52 5601 5605 1 0 20
dtext 345 50 0480 Studded
button 325 52 5601 5605 1 0 21
dtext 415 50 0480 [F]Armor
button 395 52 5601 5605 1 0 22
dtext 490 50 0480 Bags
button 470 52 5601 5605 1 0 23
dtext 540 50 0480 Other
button 520 52 5601 5605 1 0 24
src.ctag0.items <argv[0]>
if (<dsrc.ctag0.items> < 7)
local.y 52
for a 2 <eval <src.ctag0.items>+1>
local.y +=35
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
elif (<dsrc.ctag0.items> < 11)
local.y 52
for a 2 6
local.y +=42
dtext 100 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 52
for b 7 <eval <src.ctag0.items>+1>
local.y +=42
dtext 420 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
else
local.y 52
for a 2 7
local.y +=37
dtext 85 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.a>-1>]>.name>
tilepic 40 <dlocal.y> <serv.itemdef.<argv[<eval <local.a>-1>]>.id>
button 10 <dlocal.y> 4005 4006 1 0 <dlocal.a>
endfor
local.y 52
for b 8 <eval <src.ctag0.items>+1>
local.y +=37
dtext 400 <dlocal.y> 0c1 <serv.itemdef.<argv[<eval <local.b>-1>]>.name>
tilepic 355 <dlocal.y> <serv.itemdef.<argv[<eval <local.b>-1>]>.id>
button 325 <dlocal.y> 4005 4006 1 0 <dlocal.b>
endfor
endif
resizepic 523 307 3000 35 25
dtextentry 527 308 25 20 0 1
button 563 309 2714 2715 1 0 18
dtext 10 308 354 Son yapilan item: <serv.itemdef.<src.ctag.makelast>.name>
dtext 460 308 360 Tekraryap
[dialog d_skill_tailor button]
on=0
src.dialogclose d_skill_tailor
return 1
on=2 15
local.sayi <argn>
args <def.tailor_kategori<dsrc.ctag0.kategori>>
src.ctag.makelast <argv[<dlocal.sayi>]>
if !(<canmake <src.ctag.makelast>>)
src.sysmessage @58,,1 <serv.itemdef.<src.ctag.makelast>.name> yapabilmek için <serv.itemdef.<src.ctag.makelast>.resmake>'e ihtiyacınız var.
src.sysmessage @38,,1 Bu itemi yapabilmek için <serv.itemdef.<src.ctag.makelast>.skillmake> gerekli.
return 1
endif
src.makeitem <src.ctag.makelast>
on=16 24
argn -=15
src.tailor_dialog <argn>
on=18
if !(<src.ctag.makelast>)
src.sysmessage @38,,1 En son ne yaptiginizi hatirlamiyorsunuz
return 1
endif
if !(<isnum <argtxt[1]>>)
src.sysmessage @38,,1 Sadece rakam girebilirsiniz.
return 1
endif
if (<argtxt[1]> > 500)
src.sysmessage @38,,1 500'den fazla macroya bırakamazsınız
return 1
endif
src.tag.macro=<eval <argtxt[1]>>
src.makelast_mortal
[eof]
[function makebg]
resizepic <argv[0]> <argv[1]> 2620 <argv[2]> <argv[3]>
checkertrans <eval <argv[0]>+5> <eval <argv[1]>+5> <eval <argv[2]>-10> <eval <argv[3]>-10>
[function makelast_mortal]
if (<tag0.macro> > 0)
if !(<canmake <src.ctag.makelast>>)
src.sysmessage @58,,1 <serv.itemdef.<src.ctag.makelast>.name> yapabilmek için <serv.itemdef.<src.ctag.makelast>.resmake>'e ihtiyacınız var.
src.sysmessage @38,,1 Bu itemi yapabilmek için <serv.itemdef.<src.ctag.makelast>.skillmake> gerekli.
return 1
else
src.events +e_macro
src.makeitem <src.ctag.makelast>
src.tag0.macro -=1
src.ctag.makelast <src.ctag.makelast> // zaman aşımına uğrayıp ctag silmesin diye fixxxx
timerf 5,makelast_mortal
endif
else
src.sys_trk Macro görevi başarıyla tamamlanmistir.
src.events -e_macro
return 1
endif
[events e_macro]
on=@logout
src.tag0.macro
src.timerf 1,makelast_mortal
on=@userwarmode
src.tag0.macro
src.timerf 1,makelast_mortal
[comment help_menu]
Help Menu
Yazar: Mortal
Tarih: 26.09.2012
Saat: 01:21
[function helppage]
src.dialogclose d_help_mortal
src.dialog d_help_mortal
[dialog d_help_mortal]
20,35
page 0
makebg 0,0,440,250
gumppictiled 5 72 430 3 2604
checkertrans 5 72 430 3
gumppictiled 5 43 430 3 2604
checkertrans 5 43 430 3
gumppictiled 100 45 3 27 2604
checkertrans 100 45 3 27
gumppictiled 200 45 3 27 2604
checkertrans 200 45 3 27
gumppictiled 310 45 3 27 2604
checkertrans 310 45 3 27
button 25 50 5601 5605 0 2 0
dtext 45 49 0841 PAGE
button 120 50 5601 5605 0 3 0
dtext 140 49 0841 STUCK
button 220 50 5601 5605 0 4 0
dtext 240 49 0841 OYUNCU
button 327 50 5601 5605 1 0 7
dtext 347 49 0841 WEB SITE
page 1
dtext 25 13 0480 <serv.servname> HELP MENU
dhtmlgump 25 85 278 116 1 1 Hoşgeldiniz sayın, <src.name> adsas das dasd asdas dasd asd as dasd asdas asdas das das dasd asdsd istediğiniz yapın istediğinizi edin size karisan yok eden yok duydun mu beni ?
resizepic 315 85 3000 100 25
resizepic 315 115 3000 100 25
resizepic 315 145 3000 100 25
resizepic 315 175 3000 100 25
resizepic 315 205 3000 100 25
resizepic 25 205 3000 281 25
dtext 325 87 0235 Client: <dserv.clients>
dtext 325 117 0235 Npc: <dserv.chars>
dtext 325 147 0235 Item: <dserv.items>
dtext 325 177 0235 Page: <dserv.gmpages>
dtext 325 207 0235 Guild: <dserv.guilds>
dtext 36 207 0448 Uptime: <f_zaman <dserv.timeup>>
PAGE 2
dtext 25 13 0480 <serv.servname> PAGE MENU
resizepic 18 135 3000 400 83
dtextentry 20 137 396 70 0 1
button 400 221 2714 2715 1 0 10
dtext 320 221 31 Page Gönder
dtext 18 221 0480 Powered by <serv.servname> / 2012
dtext 25 77 0c1 Page atarken sorununuzu net bir sekilde bildirin.Aksi takdirde so-
dtext 25 92 0c1 runlarınızı çözmek için yardımcı olamayacağız.
dtext 310 110 0365 <serv.servname> Yönetim
PAGE 3
dtext 25 13 0480 <serv.servname> STUCK MENU
dtext 18 221 0480 Powered by <serv.servname> / 2012
dhtmlgump 25 87 238 130 1 1 Hoşgeldiniz sayın, <src.name> <def.br>adsas das dasd asdas dasd asd as dasd asdas asdas das das dasd asdsd istediğiniz yapın istediğinizi edin size karisan yok eden yok duydun mu beni ?
resizepic 295 87 3000 120 130
local.y 92
for x 1 6
args <def.sehir<dlocal.x>>
dtext 340 <dlocal.y> 0c1 <serv.map(<dargv[0]>,<dargv[1]>,<dargv[2]>,<dargv[3]>).region.name>
button 315 <dlocal.y> 2714 2715 1 3 <dlocal.x>
local.y +=20
endfor
[dialog d_help_mortal button]
on 0
return 1
on 1 6
args <def.sehir<argn>>
if (<src.findid(i_stuck)>) && (<SRC.FINDID(i_stuck).MORE2> == 1)
src.sysh_trk Şu anda zaten stuck sistemini kullanıyorsunuz.
elif (<src.findid(i_stuck)>) && (<SRC.FINDID(i_stuck).MORE2> == 2)
src.sysh_trk Stuck sistemini sadece 1 saatte bir kullanabilirsiniz.
elif <src.isevent.e_jailm>
src.sysh_trk Jail cezanız bitmedi bu yüzden stuck işleminiz gerçekleşmedi.
else
serv.newitem i_stuck,1,<src>,1
new.morep <dargv[0]>,<dargv[1]>,<dargv[2]>,<dargv[3]>
endif
return 1
on 7
src.weblink www.google.com.tr
return 1
on 10
if (<isempty <argtxt[1]>>)
src.sysh_trk Bildiri bölümünü boş bırakamazsınız.
else
gmpage add <src> <argtxt[1]>
src.sys_trk Bildiriniz gönderildi. <dserv.gmpages>. sıradasınız.
return 1
endif
[ITEMDEF i_stuck]
ID=i_handr_1
NAME=Stuck Item
WEIGHT=0
VALUE=0
TYPE=t_eq_script
on=@Create
ATTR=attr_invis|attr_newbie|attr_decay
on=@Equip
MORE1=60
MORE2=1
TIMER=1
TOPOBJ.SAY_TRK *stucked*
TOPOBJ.FLAGS <TOPOBJ.FLAGS>|statf_freeze
on=@UnEquip
TOPOBJ.sys_trkl Stuck sistemini tekrardan kullanabilirsiniz.
on=@Timer
IF (<MORE2> == 1)
IF (<MORE1>)
TOPOBj.MESSAGE <dMORE1>
MORE1 --
TIMER=1
RETURN 1
ELSE
MORE2=2
TOPOBJ.FLAGS <TOPOBJ.FLAGS>&~statf_freeze
TOPOBJ.GO <MOREP>
TIMER=3600
RETURN 1
ENDIF
ELIF (<MORE2> == 2)
REMOVE
RETURN 1
ENDIF
[defname sehir]
sehir1 1495,1629,0,0
sehir2 2466,544,0,0
sehir3 4442,1172,0,0
sehir4 546,992,0,0
sehir5 2899,676,0,0
sehir6 5272,3995,37,0
[eof]