// Yarışma :: UO-Dev 1. Scripting Yarışması
// Adres :: http://www.uo-developer.com
// Yazar :: Basic
// Script Adı :: Elemental Sistemi

on=@success
local.ele <R1,11>
if (<rand(<eval (2000/<mining>)*<dlocal.ele>>)> == 1)
emote found something which have a material of <f_basic_ayir 1,<def.ele<dlocal.ele>>>.
createelemental <dlocal.ele>
endif

[defname elemental_system]
ele1 Earth,100,100
ele2 Copper,150,100
ele3 Agapite,400,170
ele4 Bronze,400,170
ele5 Shadow,400,170
ele6 Verite,700,250
ele7 Valorite,700,250
ele8 Mytheril,900,300
ele9 Bloodrock,1900,900
ele10 Blackrock,2300,1200
compass s,se,e,ne,n,nw,w,sw

[function createelemental]
serv.newnpc c_elem_earth
new.color <def.color_o_<f_basic_ayir 1,<def.ele<args>>>>
new.name <f_basic_ayir 1,<def.ele<args>>> Elemental
new.str <f_Basic_ayir 2,<def.ele<args>>>
new.hits <new.str>
new.dex <f_basic_ayir 3,<def.ele<args>>>
new.stam <new.dex>
new.tactics 1000
new.wrestling 1000
new.home <p>
new.homedist 2
new.p <p>
new.events e_elem
new.sayua Arrgh!!
new.anim 12
new.flags 04
new.timerf 2,new.flags 020
new.findlayer(21).remove
ref1=<new.uid>
serv.newitem i_elem_memory,1,<ref1>
new.timer 180

[itemdef i_elem_memory]
id i_gold
type t_eq_script
name Elemental Memory

on=@timer
cont.emote can't find which he need.
timerf 1,cont.emote returning back to the earth.
timerf 2,cont.anim 12
timerf 3,cont.remove

[events e_elem]
on=@death
for 1 8
serv.newitem i_fire_column
new.attr attr_decay | attr_static
new.p <p>
new.timer 1
new.move <f_Basic_ayir <dlocal._for>,<def.compass>> 1
serv.newitem i_ore_<strarg <name>>
new.p <p>
new.amount <R1,10>
new.timer 600
new.move <f_Basic_ayir <dlocal._for>,<def.compass>> 1
endfor


[function f_basic_ayir]
if !strcmpi('<argv[0]>','length')
return <eval <argv>-1>
//elif !<isnum <argv[0]>> //length olayıyla çakışabilir çakışırsa && <argv[0]> != length
//return Ilk deger sadece rakam olabilir.
elif <argv[0]> == 0
return "0" tanimsiz.
else
local.ayir <argv[<argv[0]>]>
return <local.ayir>
endif

// Yarışma :: UO-Dev 1. Scripting Yarışması
// Adres :: http://www.uo-developer.com
// Yazar :: xwerswoodx
// Script Adı :: Alchemy Craft Dialog

[Defname alchemy_hamit]
hd_alc_1 i_potion_agility
hd_alc_2 i_potion_agilitygreat
hd_alc_3 i_potion_refresh
hd_alc_4 i_potion_refreshtotal
hd_alc_5 i_potion_explosionless
hd_alc_6 i_potion_explosion
hd_alc_7 i_potion_explosiongreat
hd_alc_8 i_potion_explosionsuper
hd_alc_9 i_potion_poisonless
hd_alc_10 i_potion_poison
hd_alc_11 i_potion_poisongreat
hd_alc_12 i_potion_poisondeadly
hd_alc_13 i_potion_healless
hd_alc_14 i_potion_heal
hd_alc_15 i_potion_healgreat
hd_alc_16 i_potion_cureless
hd_alc_17 i_potion_cure
hd_alc_18 i_potion_curegreat
hd_alc_19 i_potion_strenght
hd_alc_20 i_potion_strenghtgreat
hd_alc_21 i_potion_nightsight
hd_alc_22 i_potion_bleedless
hd_alc_23 i_potion_bleed
hd_alc_24 i_potion_bleedgreat
hd_alc_25 i_potion_invis
hd_alc_menu_1 Agility
hd_alc_menu_1a 0.0
hd_alc_menu_2 Refresh
hd_alc_menu_2a 20.0
hd_alc_menu_3 Explosion
hd_alc_menu_3a 40.0
hd_alc_menu_4 Poison
hd_alc_menu_4a 60.0
hd_alc_menu_5 Heal
hd_alc_menu_5a 80.0
hd_alc_menu_6 Cure
hd_alc_menu_6a 100.0
hd_alc_menu_7 Strenght
hd_alc_menu_7a 140.0
hd_alc_menu_8 Nightsight
hd_alc_menu_8a 170.0
hd_alc_menu_9 Bleed
hd_alc_menu_9a 190.0
hd_alc_menu_10 Invisibility
hd_alc_menu_10a 200.0

[DIALOG d_menu_alchemy]                           
0,0
NOMOVE

resizepic 0 0 5054 650 500

dtext 20 15 250 <serv.name> Alchemy Menu

resizepic 10 40 3000 150 450
resizepic 165 40 3000 475 450

dtext 50 48 00 Potions

local.t 72
local.b 70
for 1 10
if (<src.alchemy> >= <ddef.hd_alc_menu_<dlocal._for>a>)
dtext 55 <dlocal.t> 00 <def.hd_alc_menu_<dlocal._for>>
button 20 <dlocal.b> 4005 4006 0 <dlocal._for>
local.t +=30
local.b +=30
endif
endfor

PAGE 1 // Agility
tilepic 220 62 3848
dtext 200 82 00 Agility
button 180 84 2511 2510 1 0 1

if (<src.alchemy> > 25.3)
tilepic 360 62 3848
dtext 340 82 00 Greater Agility
button 320 84 2511 2510 1 0 2
endif

PAGE 2 // Refresh
tilepic 205 62 3851
dtext 200 82 00 Refresh
button 180 84 2511 2510 1 0 3

if (<src.alchemy> > 12.4)
tilepic 345 62 3851
dtext 340 82 00 Greater Refresh
button 320 84 2511 2510 1 0 4
endif

PAGE 3 // Explosion
tilepic 223 62 3853
dtext 200 82 00 Lesser Explosion
button 180 84 2511 2510 1 0 5

if (<src.alchemy> > 45.0)
tilepic 363 62 3853
dtext 340 82 00 Explosion
button 320 84 2511 2510 1 0 6
endif

if (<src.alchemy> > 55.0)
tilepic 503 62 3853
dtext 480 82 00 Greater Explosion
button 460 84 2511 2510 1 0 7
endif

if (<src.alchemy> > 58.4)
tilepic 223 162 3853
dtext 200 182 00 Süper Explosion
button 180 184 2511 2510 1 0 8
endif

PAGE 4 // Poison
tilepic 215 62 3850
dtext 200 82 00 Lesser Poison
button 180 84 2511 2510 1 0 9

if (<src.alchemy> > 67.0)
tilepic 355 62 3850
dtext 340 82 00 Poison
button 320 84 2511 2510 1 0 10
endif

if (<src.alchemy> > 75.2)
tilepic 495 62 3850
dtext 480 82 00 Greater Poison
button 460 84 2511 2510 1 0 11
endif

if (<src.alchemy> > 78.3)
tilepic 215 162 3850
dtext 200 182 00 Deadly Poison
button 180 184 2511 2510 1 0 12
endif

PAGE 5 // Heal
tilepic 208 62 3852
dtext 200 82 00 Lesser Heal
button 180 84 2511 2510 1 0 13

if (<src.alchemy> > 87.2)
tilepic 348 62 3852
dtext 340 82 00 Heal
button 320 84 2511 2510 1 0 14
endif

if (<src.alchemy> > 94.4)
tilepic 488 62 3852
dtext 480 82 00 Greater Heal
button 460 84 2511 2510 1 0 15
endif

PAGE 6 // Cure
tilepic 210 62 3847
dtext 200 82 00 Lesser Cure
button 180 84 2511 2510 1 0 16

if (<src.alchemy> > 107.0)
tilepic 350 62 3847
dtext 340 82 00 Cure
button 320 84 2511 2510 1 0 17
endif

if (<src.alchemy> > 112.0)
tilepic 490 62 3847
dtext 480 82 00 Greater Cure
button 460 84 2511 2510 1 0 18
endif

PAGE 7 // Strenght
tilepic 211 62 3849
dtext 200 82 00 Strenght
button 180 84 2511 2510 1 0 19

if (<src.alchemy> > 155.2)
tilepic 351 62 3849
dtext 340 82 00 Greater Strenght
button 320 84 2511 2510 1 0 20
endif

PAGE 8 // Nightsight
tilepic 219 62 3846
dtext 200 82 00 Nightsight
button 180 84 2511 2510 1 0 21

PAGE 9 // Bleed
tilepic 220 62 3848
dtext 200 82 00 Lesser Bleed
button 180 84 2511 2510 1 0 22

if (<src.alchemy> > 193.9)
tilepic 360 62 3848
dtext 340 82 00 Bleed
button 320 84 2511 2510 1 0 23
endif

if (<src.alchemy> > 198.0)
tilepic 500 62 3848
dtext 480 82 00 Greater Bleed
button 460 84 2511 2510 1 0 24
endif

PAGE 10 // Invisibility
tilepic 211 62 3849
dtext 200 82 00 Invisibility
button 180 84 2511 2510 1 0 25

[DIALOG d_menu_alchemy BUTTON]
on=0
src.dikkat Sayfayı kapattınız.
return 1

on=1 25
if (<src.restest <SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.1.val><SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.1.key>>) || (<src.restest <SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.2.val><SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.2.key>)
src.makeitem <def.hd_alc_<dargn>>
src.ctag.makelast <def.hd_alc_<dargn>>
if (<var0.hamit_alchemy_<dargn>>==0)
icat <serv.itemdef.<def.hd_alc_<dargn>>.name> <src.name> tarafından icat edildi.
var.hamit_alchemy_<dargn>=1
var.hamit_alchemy_<dargn>_yapan=<src.name>
endif
else
src.hata Bunu yapabilmek için <SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.1.val><SERV.ITEMDEF.<SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.1.key>.NAME> ve <SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.2.val><SERV.ITEMDEF.<SERV.ITEMDEF.<def.hd_alc_<dargn>>.RESOURCES.2.key>.NAME> gereklidir.
endif
return 1

[Function dikkat]
sysmessage @095,,1 <args>

[Function icat]
serv.allclients sysmessage @0481,,1 <args>

[Function makelast]
src.f_makelast

[Function tekraryap]
src.f_makelast

[Function f_makelast]
if !(<src.ctag.makelast>==0)
if <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.5>
if (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.5.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.5.key>>)
src.makeitem <src.ctag0.makelast>
else
src.hata Bunu yapabilmek için <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>.name>, <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>.name>, <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.key>.name>, <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.key>.name> ve <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.5.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.5.key>.name> gereklidir.
endif
elseif <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4>
if (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.key>>)
src.makeitem <src.ctag0.makelast>
else
src.hata Bunu yapabilmek için <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>.name>, <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>.name>, <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.key>.name> ve <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.4.key>.name> gereklidir.
endif
elseif <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3>
if (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.key>>)
src.makeitem <src.ctag0.makelast>
else
src.hata Bunu yapabilmek için <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>.name>, <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>.name> ve <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.3.key>.name> gereklidir.
endif
elseif <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2>
if (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>>) || (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>>)
src.makeitem <src.ctag0.makelast>
else
src.hata Bunu yapabilmek için <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>.name> ve <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.2.key>.name> gereklidir.
endif
elseif <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1>
if (<src.restest <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>>)
src.makeitem <src.ctag0.makelast>
else
src.hata Bunu yapabilmek için <SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.val><SERV.ITEMDEF.<SERV.ITEMDEF.<src.ctag0.makelast>.RESOURCES.1.key>.name> gereklidir.
endif
endif
else
src.hata En son yaptığınız eşyayı hatırlamıyorsunuz.
return 1
endif

[EOF]

// Yarışma :: UO-Dev 1. Scripting Yarışması
// Adres :: http://www.uo-developer.com
// Yazar :: MagLor
// Script Adı :: Buz savaşları


[function freeze]
if (strmatch('<region.name>','Ice isle')
  forcharlayer layer_special
    if (<baseid> = i_mem_ica)
      src.sysmessage @0481,,1 Birdaki için <EVAL (<TIMER>/60)-((<TIMER>/3600)*60)> dakika <eval <timer>-((<timer>/60)*60)> saniye beklemelisin.
      return 1
    endif
  endfor

  if (<src.region.safe> == 1)
    return 1
  endif
  src.newitem i_mem_ica
  new.timer 300
  new.equip
  ica_nocheck
  return 1
endif

[itemdef i_mem_ica]
name=ica_memory
id=i_memory
type=t_eq_script

on=@timer
  remove
  return 1

[function ica_nocheck]
serv.newitem i_mem_icemake
new.timer 5
new.equip
return 1

[itemdef i_mem_icemake]
name=ice_maker
id=i_memory
type=t_eq_script

on=@equip
target Select a target
return 1

on=@timer
remove
return 1

on=@targon_char
if <src.targ.canseelos>
  if <src.targ.distance> < 15
    if <src.targ.npc>
      src.sysmessage @95,,1 Vendorlara Atamazsin
      return 1
    endif
    if <src.targ.restest 1 i_ica_memory_targ>
      src.sysmessage @0481,,1 Kime atmak istiyorsunuz?
      return 1
    endif
    serv.newitem i_ica_memory_targ
    new.timer 60
    src.targ.equip <new.uid>


SRC.TARG.NEWITEM=i_fx_FROST1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE 1
SRC.TARG.NEWITEM=i_fx_FROST1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE 0 1
SRC.TARG.NEWITEM=i_fx_FROST1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE -1
SRC.TARG.NEWITEM=i_fx_FROST1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE 0 -1
SRC.TARG.NEWITEM=i_fx_FROST_Floor1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.NEWITEM=i_fx_FROST_Floor1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE 1 1
SRC.TARG.NEWITEM=i_fx_FROST_Floor1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE 1 -1
SRC.TARG.NEWITEM=i_fx_FROST_Floor1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE -1 1
SRC.TARG.NEWITEM=i_fx_FROST_Floor1
SRC.TARG.ACT.ATTR=attr_decay
SRC.TARG.ACT.TIMER=3
SRC.TARG.ACT.P=<SRC.targ.P>
SRC.TARG.ACT.NUDGEUP 2
SRC.TARG.ACT.MOVE -1 -1
remove 1


    return 1
  else
    src.sysmessage @0481,,1 Çok uzak
    return 1
  endif
else
  src.sysmessage @055 Boş gitti
  return 1
endif

[itemdef i_ica_memory_targ]
name=freezetarget
id=i_memory
type=t_eq_script 
on=@timer
  remove
  return 1


[ITEMDEF i_fx_FROST1]
ID=08e0
Name=Frost Buildup

ON=@TIMER
REMOVE
on=@create
Color=0480

[ITEMDEF i_fx_FROST_floor1]
ID=0343b
Name=Frost Covering

ON=@TIMER
REMOVE
on=@create
Color=0480

[ITEMDEF i_fx_recover1]
ID=0376a
Name=Healing Wind
ON=@TIMER
REMOVE
on=@create
Color=0480

[ITEMDEF i_fx_frozen_stalagmites1]
ID=i_fx_glow_spike
Name=phrozen stalagmites
RETURN 1
ON=@TIMER
REMOVE
on=@create
Color=0f8f

// Yarışma :: UO-Dev 1. Scripting Yarışması
// Adres :: http://www.uo-developer.com
// Yazar :: Zeus
// Script Adı :: Star Güvenlik, {Player, Yetkili vb.}

[itemdef i_pk]
id i_gold
name Player Kovar

on=@create
attr attr_move_never|attr_invis
timer 2
color 01
tag.xx 1

on=@timer
timer 1
forchars 60
if !(<npc>)
if !(strmatch('<region.name>','Star')
if !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx')) && !(strmatch('<account.name>','xx'))
smsx Star'da bulunmanız yasak olduğu için sorgu alanina atıldınız !
writefile logs/starlog.txt İsim : <name> - Account : <account> - Pozisyon : <p> - Zaman : <serv.rtime> star'a girmeyi denedi.
go britain
endif
endif
endif
endfor
return 1

on=@pickup_ground
return 1

// Yarışma :: UO-Dev 1. Scripting Yarışması
// Adres :: http://www.uo-developer.com
// Yazar :: aldarson
// Script Adı :: corpse clothing system

[comment system]
sistemin çalışması:herhangi bir nesnenin type'sini t_scisscors_corpse olarak ayarlayınız
bu nesneyle obody'si c_dragon_new olan bir ceset seçilirse dialog açılır(ayarlı olan:80 tailoring lazım)
bu dialogda 5 tane armordan rasgele birisini yapabilirsin ben deri armorlar eklemedim i_leather dan gittim
siz ekleyebilirsiniz.

[defname system_item]
new_item i_leather_gloves,i_leather_gorget,i_leather_tunic,i_leather_sleeves,i_leather_leggings,80.0

[function f_select]
return=<argv[<argv[0]>]>

[typedef t_scisscors_corpse]
on=@dclick
target @50,,1 Hangi cesetten armor yapıcaksınız?
  return 1

on=@targon_item
ref1=<src.targ.uid>
  if !<ref1.type> == t_corpse || <ref1.link.isplayer> || !<ref1.link.obody>==c_dragon_new
    src.sys_normal Bundan armor yapamassınız.
     elseif <src.distance <ref1>> >2
      src.sys_ok Çok uzaktasınız.
       elseif <src.tailoring> < <f_select 6,<def.new_item>>
        src.sys_ok Mininum <f_select 6,<def.new_item>> tailoring lazım.
         else
          src.ctag0.info=<ref1.uid>,<ref1.tag0.parca>
           sdialog d_corpse_clothing
    endif
     return 1

on=@targon_char
src.sys_ok Bu bir ceset değil.
   return 1

on=@targon_ground
  src.sys_ok Bu bir ceset değil.
    return 1

[dialog d_corpse_clothing]
50,50
nomove
resizepic 0 0 5120 400 250
resizepic 10 10 3000 380 230

tilepic 300 105 <serv.itemdef.<streat <src.ctag0.info>>.id>

dhtmlgump 30 30 200 20 0 0 <def.bfont_blue><serv.name> Corpse Clothing System
dhtmlgump 20 80 999 20 0 0 <def.bfont_red>Bu cesetten yapılacak armor parçası : <serv.itemdef.<streat <src.ctag0.info>>.name>
dhtmlgump 20 150 200 20 0 0 <def.bfont_red>armor parçasını dik
dhtmlgump 250 150 200 20 0 0 <def.bfont_red>iptal et

button 150 150 210 211 1 0 2
button 210 150 210 211 1 0 1

[dialog d_corpse_clothing button]
on 0,1
src.sys_ok vazgeçtiniz.

on 2
if (<src.distance <strarg <src.ctag0.info>>> >2)
src.sys_ok Cesede uzaksınız.
elseif !(<src.restest 1 i_crystal_new>) || !(<src.restest 2 i_hide_new>)
src.sys_ok Gerekli malzemeler(1 new crystal,2 new hide)
else
src.consume 1 i_crystal_new
src.consume 2 i_hide_new
serv.newitem <streat <src.ctag0.info>>,1,<src.findlayer(layer_pack)>
src.sys_ok <serv.itemdef.<streat <src.ctag0.info>>.name> yapıldı.
try uid.<strarg <src.ctag0.info>>.remove
src.clearctags
endif

[chardef c_dragon_new]
id c_dragon_red
name Power Armor Dragon
armor 50
dam 50
can mt_walk|mt_run

on=@create
str={300 400}
int={300 400}
dex={200 400}
karma=-9000
fame=1000
tactics={100 200}
magicresistance={100 200}
wrestling={100 200}

on=@gethit
if (<flags>&statf_poisoned)
spelleffect s_cure,1000,<uid>
endif
foritems 10
if (<type> == t_spell)
spelleffect s_mass_dispel,1000
endif
endfor

on=@npcrestock
item=i_crystal_new
item=i_hide_new,2

on=@deathcorpse
argo.tag0.parca <f_select <R1,5>,<def.new_item>>

[itemdef i_crystal_new]
id i_crystal_green
name New Crystal

on=@create
color=080a

[itemdef i_hide_new]
id i_Hide
name New Hide

on=@create
color=080a

// Yarışma :: UO-Dev 1. Scripting Yarışması
// Adres :: http://www.uo-developer.com
// Yazar :: robellious
// Script Adı :: moongate system

[FUNCTION f_array]
local.temp = <argv[<eval <argv> - 1>]> -1
return <argv[<dlocal.temp>]>


[defname regionlarfln]
toplam 5
alan1 ActionZone,Action Alanı,Bu Alanda rakiplerinizle kapışabilirsiniz.
alan2 SafeAlan,Safe Zone,Bu Alanda gereksinimlerinizi karşılayabilirsiniz.
alan3 DeathMatchs,Death Match Sahası,ufak bi alanda istediğiniz kişiye saldırabilirsiniz. Stafflar açabilir yada kapatabilir.
alan4 Pazar,Pazar Alanı,Bu alanda eşya satışlarınızı gerçekleştirebilirsiniz..
alan5 Duello,Duello Arena,En kısa sürede aktif olucaktır.

[defname sehirler]
toplamm 5
sehir1 Britain,Action Alanı,Bu şehirde rakiplerinizle kapışabilirsiniz.
sehir2 Moonglow,Action Alanı,Bu şehirde rakiplerinizle kapışabilirsiniz.
sehir3 Minoc,Action Alanı,Bu şehirde rakiplerinizle kapışabilirsiniz.
sehir4 Cove,Savaş Şehri,Neblies yetkilileri tarafından yapılan savaşlar bu şehirde gerçekleşir.
sehir5 Delucia,Quest Şehri,Neblies yetkilileri tarafından yapılan questler bu şehirde gerçekleşir.

[defname dungeonlar]
toplammm 5
dunge1 Destard,Dungeon Alanı,Bu Alanda bazı bosslar için yada puan için pvm yapabilirsiniz.
dunge2 Despise,Dungeon Alanı,Bu dungeon'da rakiplerinizle kapışabilir ayrıca eşya çıkartabilirsiniz.
dunge3 Deceit,Dungeon Alanı,Bu dungeon'da rakiplerinizle kapışabilir ayrıca eşya çıkartabilirsiniz.
dunge4 Hythloth,Dungeon Alanı,Bu Alanda bazı bosslar için yada puan için pvm yapabilirsiniz.
dunge5 Wrong,Dungeon Alanı,Bu dungeon'da rakiplerinizle kapışabilir ayrıca eşya çıkartabilirsiniz.


[itemdef i_moongate]
id i_moongate_black
name Moongate


on=@create
color 0796
attr 010
tag.sahip 0
timerd 1

on=@step
if (<src.dir> == 0)
src.move 0 1
elseif (<src.dir> == 1)
src.move -1 1
elseif (<src.dir> == 2)
src.move -1 0
elseif (<src.dir> == 3)
src.move -1 -1
elseif (<src.dir> == 4)
src.move 0 -1
elseif (<src.dir> == 5)
src.move 1 -1
elseif (<src.dir> == 6)
src.move 1 0
elseif (<src.dir> == 7)
src.move 1 1
src.smsx iki kere tıklamanız yeterlidir.
endif
return 1

on=@dclick
tag.sahip <src.uid>
sdialog d_facet_moongate
return 1

on=@timer
if !(<tag.sahip> = 0)
if (<distance <tag.sahip>> > 3)
try uid.<tag.sahip>.dialogum 1
tag.sahip 0
timerd 1
endif
endif
timerd 1
return 1

[function dialogum]
if <args> = 1
trysrc <uid> dialogclose d_facet_moongate
trysrc <uid> dialogclose d_regionlar
trysrc <uid> dialogclose d_dungeonn
endif


[dialog d_regionlar]
0,0
nomove
local.genisle 93
local.carp 95
resizepic 10 10 5120 450 <eval (<local.genisle>*<def.toplam>)+80>
resizepic 20 20 3000 430 <eval (<local.genisle>*<def.toplam>)+60>
dhtmlgump 150 35 200 20 0 0 <def.bfont_dred><serv.name> UO - Moongate Menüsü

for x 0 <eval <serv.clients>-1>
for y 1 <def.toplam>
if (strmatch('<serv.client.<dlocal.x>.region.name>','<f_array <def.alan<dlocal.y>>,1>'))
local.<f_array <def.alan<dlocal.y>>,1> <eval <local.<f_array <def.alan<dlocal.y>>,1>>+1>
endif
endfor
endfor

for 1 <def.toplam>
resizepic 20 <eval (<dlocal._for>*<dlocal.carp>)-25> 3000 430 2
dhtmlgump 25 <eval (<dlocal._for>*<dlocal.carp>)-20> 400 20 0 0 <def.bfont_dred><dlocal._for>) <def.bfont_dblue><f_array <def.alan<dlocal._for>>,2> <def.bfont_dgreen>[<f_array <def.alan<dlocal._for>>,1>]
resizepic 25 <eval (<dlocal._for>*<dlocal.carp>)> 3000 300 65
dhtmlgump 30 <eval (<dlocal._for>*<dlocal.carp>)+5> 300 40 0 0 <def.bfont_dred>Açıklama : <def.bfont_dblue><f_array <def.alan<dlocal._for>>,3>
dhtmlgump 30 <eval (<dlocal._for>*<dlocal.carp>)+45> 300 40 0 0 <def.bfont_dred>İçerdeki Kişi Sayısı : <def.bfont_dyellow><dlocal.<strarg <f_array <def.alan<dlocal._for>>>,1>>
button 330 <eval (<dlocal._for>*<dlocal.carp>)+5> 55 56 1 0 <dlocal._for>
button 330 <eval (<dlocal._for>*<dlocal.carp>)+40> 55 56 1 0 <eval <dlocal._for>+300>
dhtmlgump 350 <eval (<dlocal._for>*<dlocal.carp>)+5> 200 20 0 0 <def.bfont_dred>Alana Git
dhtmlgump 350 <eval (<dlocal._for>*<dlocal.carp>)+40> 200 20 0 0 <def.bfont_dred>İçerdeki Kişiler
endfor

[dialog d_regionlar button]
on 1 100
if (<distance> > 3)
src.mrt Yetişemiyorsunuz.
return 1
endif


if (<src.hits> < <src.str>)
src.sysmessage @0785,1,1 Canınız az iken geçemesiniz.
return 1
endif


src.go <f_array <def.alan<argn>>,1>

on 300 500
if (<distance> > 3)
src.mrt Yetişemiyorsunuz.
return 1
endif


src.ctag.kisiler=
local.buton <eval <argn>-300>
local.toplam 0

for x 0 <eval <serv.clients>-1>
if (strmatch('<serv.client.<dlocal.x>.region.name>','<f_array <def.alan<dlocal.buton>>,1>'))
local.toplam +=1
src.ctag.kisiler <src.ctag.kisiler>,<serv.client.<dlocal.x>.uid>
endif
endfor
say <dlocal.toplam>
src.ctag.toplam <local.toplam>
src.ctag.alan <f_array <def.alan<dlocal.buton>>,1>
if <local.toplam> = 0
src.sysmessage @07a1,1,1 Bu Alanda Kimse Yok.
return 1
endif
src.ctag0.page_view 1
src.ctag0.sayfa 1
src.sdialog d_kisiler

[dialog d_kisiler]
0,0
nomove
resizepic 10 10 5120 750 300
resizepic 20 20 3000 730 280
resizepic 35 45 3000 40 2
resizepic 150 45 3000 90 2
resizepic 295 45 3000 90 2
resizepic 490 45 3000 35 2
resizepic 640 45 3000 65 2
resizepic 20 270 3000 730 2
dhtmlgump 30 30 2500 20 0 0 <def.bfont_dred>  İsim            Kills/Deaths         Fame/Karma               Guild                Ölü/Diri
local.kisiler = 0
for 1 8
local.for_ = <eval <local._for> + <eval <src.ctag0.page_view>-1>>
if <f_array <ctag.kisiler>,<dlocal.for_>>
if <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.isplayer>
if <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.kills> > 6
local.renk <def.bfont_red>
else
local.renk <def.bfont_blue>
endif
dhtmlgump 30 <eval (<dlocal.kisiler>*30)+50> 250 20 0 0 <local.renk> <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.name>
dhtmlgump 150 <eval (<dlocal.kisiler>*30)+50> 250 20 0 0 <def.bfont_dblue> <eval <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.kills>> <def.bfont_dred>/ <def.bfont_dgreen><eval <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.deaths>>
dhtmlgump 280 <eval (<dlocal.kisiler>*30)+50> 250 20 0 0 <def.bfont_dblue> <eval <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.fame>> <def.bfont_dred>/ <def.bfont_dgreen><eval <uid.<f_array <ctag.kisiler>,<dlocal.for_>>.karma>>
if (<uid.<f_array <ctag.kisiler>,<dlocal.for_>>.memoryfindtype.memory_guild>)
if (<uid.<f_array <ctag.kisiler>,<dlocal.for_>>.memoryfindtype.memory_guild.link.align> == 2)
local.guildrenk <def.bfont_red>
endif
if (<uid.<f_array <ctag.kisiler>,<dlocal.for_>>.memoryfindtype.memory_guild.link.align> == 1)
local.guildrenk <def.bfont_blue>
endif
if (<uid.<f_array <ctag.kisiler>,<dlocal.for_>>.memoryfindtype.memory_guild.link.align> == 0)
local.guildrenk <def.bfont_green>
endif
dhtmlgump 460 <eval (<dlocal.kisiler>*30)+50> 250 20 0 0 <local.guildrenk><uid.<f_array <ctag.kisiler>,<dlocal.for_>>.memoryfindtype.memory_guild.link.name> [<uid.<f_array <ctag.kisiler>,<dlocal.for_>>.memoryfindtype.memory_guild.link.abbrev>]
else
dhtmlgump 500 <eval (<dlocal.kisiler>*30)+50> 250 20 0 0 <def.bfont_dgreen>Yok
endif
if (<uid.<f_array <ctag.kisiler>,<dlocal.for_>>.hits> > 0)
local.durum <def.bfont_dblue>Diri
else
local.durum <def.bfont_red>Ölü
endif
dhtmlgump 665 <eval (<dlocal.kisiler>*30)+50> 250 20 0 0 <local.durum>
local.kisiler +=1
endif
endif
endfor
dhtmlgump 320 275 200 20 0 0 <def.bfont_dblue>[<ctag.alan>]<def.bfont_dred> Sayfa <dctag.sayfa>
if !(<ctag0.page_view> == 1)
dhtmlgump 45 275 200 20 0 0 <def.bfont_dred> Geri
button 30 277 015e3 015e7 1 0 2000
endif
if !(<dlocal.for_> > <ctag0.toplam>)
button 720 277 015e1 015e5 1 0 200
dhtmlgump 685 275 35 20 0 0 <def.bfont_dred> İleri
endif

[dialog d_kisiler button]
on 200
src.ctag.page_view <eval <src.ctag.page_view>+8>
src.ctag.sayfa +=1

src.sdialog d_kisiler

on 2000
src.ctag.sayfa -=1
src.ctag.page_view -=8
src.sdialog d_kisiler


// şehirler

[dialog d_sehirler]
0,0
nomove
local.genisle 93
local.carp 95
resizepic 10 10 5120 450 <eval (<local.genisle>*<def.toplamm>)+80>
resizepic 20 20 3000 430 <eval (<local.genisle>*<def.toplamm>)+60>
dhtmlgump 150 35 200 20 0 0 <def.bfont_dred><serv.name> UO - Moongate Menüsü

for x 0 <eval <serv.clients>-1>
for y 1 <def.toplamm>
if (strmatch('<serv.client.<dlocal.x>.region.name>','<f_array <def.sehir<dlocal.y>>,1>'))
local.<f_array <def.sehir<dlocal.y>>,1> <eval <local.<f_array <def.sehir<dlocal.y>>,1>>+1>
endif
endfor
endfor

for 1 <def.toplam>
resizepic 20 <eval (<dlocal._for>*<dlocal.carp>)-25> 3000 430 2
dhtmlgump 25 <eval (<dlocal._for>*<dlocal.carp>)-20> 400 20 0 0 <def.bfont_dred><dlocal._for>) <def.bfont_dblue><f_array <def.sehir<dlocal._for>>,2> <def.bfont_dgreen>[<f_array <def.sehir<dlocal._for>>,1>]
resizepic 25 <eval (<dlocal._for>*<dlocal.carp>)> 3000 300 65
dhtmlgump 30 <eval (<dlocal._for>*<dlocal.carp>)+5> 300 40 0 0 <def.bfont_dred>Açıklama : <def.bfont_dblue><f_array <def.sehir<dlocal._for>>,3>
dhtmlgump 30 <eval (<dlocal._for>*<dlocal.carp>)+45> 300 40 0 0 <def.bfont_dred>İçerdeki Kişi Sayısı : <def.bfont_dyellow><dlocal.<strarg <f_array <def.sehir<dlocal._for>>>,1>>
button 330 <eval (<dlocal._for>*<dlocal.carp>)+5> 55 56 1 0 <dlocal._for>
button 330 <eval (<dlocal._for>*<dlocal.carp>)+40> 55 56 1 0 <eval <dlocal._for>+300>
dhtmlgump 350 <eval (<dlocal._for>*<dlocal.carp>)+5> 200 20 0 0 <def.bfont_dred>Alana Git
dhtmlgump 350 <eval (<dlocal._for>*<dlocal.carp>)+40> 200 20 0 0 <def.bfont_dred>İçerdeki Kişiler
endfor

[dialog d_sehirler button]
on 1 100
if (<distance> > 3)
src.mrt Yetişemiyorsunuz.
return 1
endif

if (<src.hits> < <src.str>)
src.sysmessage @0785,1,1 Canınız az iken geçemesiniz.
return 1
endif

src.go <f_array <def.sehir<argn>>,1>

on 300 500
if (<distance> > 3)
src.mrt Yetişemiyorsunuz.
return 1
endif

src.ctag.kisiler=
local.buton <eval <argn>-300>
local.toplam 0

for x 0 <eval <serv.clients>-1>
if (strmatch('<serv.client.<dlocal.x>.region.name>','<f_array <def.sehir<dlocal.buton>>,1>'))
local.toplam +=1
src.ctag.kisiler <src.ctag.kisiler>,<serv.client.<dlocal.x>.uid>
endif
endfor
src.ctag.toplam <local.toplam>
src.ctag.alan <f_array <def.sehir<dlocal.buton>>,1>
if <local.toplam> = 0
src.sysmessage @07a1,1,1 Bu Alanda Kimse Yok.
return 1
endif
src.ctag0.page_view 0
src.ctag0.sayfa 1
src.sdialog d_kisiler

//dungeon

[dialog d_dungeonn]
0,0
nomove
local.genisle 93
local.carp 95
resizepic 10 10 5120 450 <eval (<local.genisle>*<def.toplammm>)+80>
resizepic 20 20 3000 430 <eval (<local.genisle>*<def.toplammm>)+60>
dhtmlgump 150 35 200 20 0 0 <def.bfont_dred><serv.name> UO - Moongate Menüsü

for x 0 <eval <serv.clients>-1>
for y 1 <def.toplammm>
if (strmatch('<serv.client.<dlocal.x>.region.name>','<f_array <def.dunge<dlocal.y>>,1>'))
local.<f_array <def.dunge<dlocal.y>>,1> <eval <local.<f_array <def.dunge<dlocal.y>>,1>>+1>
endif
endfor
endfor

for 1 <def.toplam>
resizepic 20 <eval (<dlocal._for>*<dlocal.carp>)-25> 3000 430 2
dhtmlgump 25 <eval (<dlocal._for>*<dlocal.carp>)-20> 400 20 0 0 <def.bfont_dred><dlocal._for>) <def.bfont_dblue><f_array <def.dunge<dlocal._for>>,2> <def.bfont_dgreen>[<f_array <def.dunge<dlocal._for>>,1>]
resizepic 25 <eval (<dlocal._for>*<dlocal.carp>)> 3000 300 65
dhtmlgump 30 <eval (<dlocal._for>*<dlocal.carp>)+5> 300 40 0 0 <def.bfont_dred>Açıklama : <def.bfont_dblue><f_array <def.dunge<dlocal._for>>,3>
dhtmlgump 30 <eval (<dlocal._for>*<dlocal.carp>)+45> 300 40 0 0 <def.bfont_dred>İçerdeki Kişi Sayısı : <def.bfont_dyellow><dlocal.<strarg <f_array <def.dunge<dlocal._for>>>,1>>
button 330 <eval (<dlocal._for>*<dlocal.carp>)+5> 55 56 1 0 <dlocal._for>
button 330 <eval (<dlocal._for>*<dlocal.carp>)+40> 55 56 1 0 <eval <dlocal._for>+300>
dhtmlgump 350 <eval (<dlocal._for>*<dlocal.carp>)+5> 200 20 0 0 <def.bfont_dred>Alana Git
dhtmlgump 350 <eval (<dlocal._for>*<dlocal.carp>)+40> 200 20 0 0 <def.bfont_dred>İçerdeki Kişiler
endfor

[dialog d_dungeonn button]
on 1 100
if (<distance> > 3)
src.mrt Yetişemiyorsunuz.
return 1
endif

if (<src.hits> < <src.str>)
src.sysmessage @0785,1,1 Canınız az iken geçemesiniz.
return 1
endif

src.go <f_array <def.dunge<argn>>,1>

on 300 500
if (<distance> > 3)
src.mrt Yetişemiyorsunuz.
return 1
endif

src.ctag.kisiler=
local.buton <eval <argn>-300>
local.toplam 0

for x 0 <eval <serv.clients>-1>
if (strmatch('<serv.client.<dlocal.x>.region.name>','<f_array <def.dunge<dlocal.buton>>,1>'))
local.toplam +=1
src.ctag.kisiler <src.ctag.kisiler>,<serv.client.<dlocal.x>.uid>
endif
endfor
src.ctag.toplam <local.toplam>
src.ctag.alan <f_array <def.alan<dlocal.buton>>,1>
if <local.toplam> = 0
src.sysmessage @07a1,1,1 Bu Alanda Kimse Yok.
return 1
endif
src.ctag0.page_view 0
src.ctag0.sayfa 1
src.sdialog d_kisiler


[dialog d_facet_moongate]
0,10
nomove
resizepic 10 80 5120 340 260
resizepic 20 90 3000 320 240

Resizepic 20 290 3000 320 3 //çizgimiz en alt

dhtmlgump 115 90 250 25 0 0 <def.bfont_red><def.u> Neblies Moongate
dhtmlgump 60 120 250 25 0 0 <def.bfont_dblue>Neblies Alanlar
dhtmlgump 60 150 250 25 0 0 <def.bfont_dblue>Guildine Git<def.bfont_dgreen> [Guild Sayısı <serv.guilds>]
dhtmlgump 60 180 250 25 0 0 <def.bfont_dblue>Neblies Şehirler
dhtmlgump 60 210 250 25 0 0 <def.bfont_dblue>Neblies Dungeon

dhtmlgump 60 240 250 25 0 0 <def.bfont_dblue>Puan Alanı
dhtmlgump 60 270 150 25 0 0 <def.bfont_dblue>Puan Alanı 2


dhtmlgump 60 300 140 20 0 0 <def.bfont_dblue>Neblies Boya Alanı
dhtmlgump 220 300 70 20 0 0 <def.bfont_dblue>Neblies Bar

button 30 120 2714 2715 1 0 1
button 30 150 2714 2715 1 0 2
button 30 180 2714 2715 1 0 3
button 30 210 2714 2715 1 0 4

button 30 240 2714 2715 1 0 5
button 30 270 2714 2715 1 0 6

button 30 300 2714 2715 1 0 7
button 190 300 2714 2715 1 0 8



[dialog d_facet_moongate button]
On=1
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
dialog d_regionlar
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
SRC.FIX

On=2
if !(<memoryfindtype.memory_guild>)
src.sysmessage @07a1,1,1 Guildiniz Yok.
else
src.go <memoryfindtype.memory_guild.link.p>
return 1
endif

on=3
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
sdialog d_sehirler
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
SRC.FIX

On=4
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
dialog d_dungeonn
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
SRC.FIX

On=5
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
src.go 5578,1914
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
SRC.FIX

on=6
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
src.go 4573,3628,30
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
endif
SRC.FIX

On=7
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
src.go 1858,2082
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
SRC.FIX

on=8
if (<src.hits> == <src.str>) || (<src.hits> == 0) || (<src.hits> > <src.str>) || (<distance> > 3)
src.go 1916,2119
ELSE
src.smsx Gate'den uzakdasınız veya yaralısınız.
ENDIF
SRC.FIX