[function mkoy]
serv.newitem i_travgate
new.p <p>
src.field_uyari
[ITEMDEF i_travgate]
ID=i_moongate_blue
TYPE=t_moongate
NAME=Moongate
DEFNAME=i_travgate
on=@create
ATTR=010
COLOR=0
timer 1
on=@step
if (<src.findid i_rune_poison>)
src.hata Zehirliyken Moongate Kullanamazsınız.
RETURN 1
elseif (<src.hits> < <src.str>)
src.hata Yaralıyken Moongate Kullanamazsınız.
RETURN 1
elseif (<distance> > 3)
SRC.hata Moongateye Uzaktasınız.
RETURN 1
else
src.timerf 10,src.dialogclose d_system_error
src.sdialog d_system_error
RETURN 1
endif
on=@Click
message @0481,,1 <name> of <src.region.name>
return 1
on=@dclick
if (<src.findid i_rune_poison>)
src.hata Zehirliyken Moongate Kullanamazsınız.
RETURN 1
elseif (<src.hits> < <src.str>)
src.hata Yaralıyken Moongate Kullanamazsınız.
RETURN 1
elseif (<distance> > 3)
SRC.hata Moongateye Uzaktasınız.
RETURN 1
else
src.timerf 5,src.dialogclose d_system_error
src.sdialog d_system_error
RETURN 1
elseif (<src.findid i_olmesuresi>)
src.sysmessage @07a5,1,1 (<src.findid.i_olmesuresi.timer>)SN Sonra gecebilirsiniz
return 1
endif
on=@timer
foritems 5
if (<baseid> == i_sticks) || (<baseid> == c_horse_brown_dk) || (<baseid> == i_box_wood)
timer
endif
if (<attr>&attr_magic)
if (<type> == t_spell)
timer
endif
endif
endfor
forchars 5
if (<baseid> == c_bear_brown) || (<baseid> == c_bear_grizzly) || (<baseid> == c_scorpion_giant)
remove
endif
endfor
timer 1
return 1
[dialog d_system_error]
0,0
nomove
PAGE 0
resizepic 187 80 9300 220 420
resizepic 197 90 9300 200 400
if (strmatch('<src.region.name>','Britain Moongate')
else
button 230 130 2714 2715 1 0 1
endif
if (strmatch('<src.region.name>','Minoc-Vesper Moongate')
else
button 230 155 2714 2715 1 0 2
endif
if (strmatch('<src.region.name>','Moonglow Moongate')
else
button 230 180 2714 2715 1 0 3
endif
if (strmatch('<src.region.name>','Trinsic Moongate')
else
button 230 205 2714 2715 1 0 4
endif
if (strmatch('<src.region.name>','Delucia')
else
button 230 230 2714 2715 1 0 5
endif
if (strmatch('<src.region.name>','Buccaneer's Den')
else
button 230 255 2714 2715 1 0 6
endif
if (strmatch('<src.region.name>','Magincia Moongate')
else
button 230 280 2714 2715 1 0 7
endif
if (strmatch('<src.region.name>','Yew Moongate')
else
button 230 305 2714 2715 1 0 8
endif
if (strmatch('<src.region.name>','Pazar Alani') |
else
button 230 330 2714 2715 1 0 9
endif
if (strmatch('<src.region.name>','Jhelom Moongate')
else
button 230 355 2714 2715 1 0 10
endif
if (strmatch('<src.region.name>','Skara Brae Moongate')
else
button 230 379 2714 2715 1 0 11
endif
if (strmatch('<src.region.name>','Skara Brae Moongate 2')
else
button 230 407 2714 2715 1 0 12
endif
gumppic 195 90 00000034
dtext 260 95 044 Moongate
dtext 260 126 0455 Kumar Alanı
dtext 260 151 0455 Safe Alanı
dtext 260 176 0455 Britan
dtext 260 201 0455 Trinsic
dtext 260 226 0455 Delucia
dtext 260 251 0455 Serpent's Hold
dtext 260 276 0455 Moonglow
dtext 260 301 0455 3D Egg [24 Saatte 1]
dtext 260 326 0455 Destard [Gold]
dtext 260 351 0455 Boya Alanı
dtext 260 379 0455 Guild Alanı
dtext 260 407 0455 Spawn Alanları
[dialog d_system_error text]
[dialog d_system_error button]
on=1
src.mgit Safe
on=2
src.mgit 1955,2090
on=3
src.mgit britain
on=4
src.mgit trinsic
on=5
src.mgit Delucia
on=6
src.mgit Serpent's Hold
on=7
src.mgit moonglow
on=8
src.mgit 1349,1492,20
on=9
src.mgit destard
on=10
src.mgit 6059,1689,20
on=11
src.mgit 6058,1784,20
on=12
src.dialog d_spawn_alani
[dialog d_spawn_alani]
0,0
nomove
PAGE 0
resizepic 187 80 9300 220 380
resizepic 197 90 9300 200 360
if (strmatch('<src.region.name>','Britain Moongate')
else
button 230 130 2714 2715 1 0 1
endif
if (strmatch('<src.region.name>','Minoc-Vesper Moongate')
else
button 230 155 2714 2715 1 0 2
endif
if (strmatch('<src.region.name>','Moonglow Moongate')
else
button 230 180 2714 2715 1 0 3
endif
if (strmatch('<src.region.name>','Trinsic Moongate')
else
button 230 205 2714 2715 1 0 4
endif
if (strmatch('<src.region.name>','Delucia')
else
button 230 230 2714 2715 1 0 5
endif
if (strmatch('<src.region.name>','Buccaneer's Den')
else
button 230 255 2714 2715 1 0 6
endif
if (strmatch('<src.region.name>','Magincia Moongate')
else
button 230 280 2714 2715 1 0 7
endif
if (strmatch('<src.region.name>','Yew Moongate')
else
button 230 305 2714 2715 1 0 8
endif
if (strmatch('<src.region.name>','Pazar Alani') |
else
button 230 330 2714 2715 1 0 9
endif
if (strmatch('<src.region.name>','Jhelom Moongate')
else
button 230 355 2714 2715 1 0 10
endif
if (strmatch('<src.region.name>','Skara Brae Moongate')
else
button 230 379 2714 2715 1 0 11
endif
if (strmatch('<src.region.name>','Skara Brae Moongate 2')
else
button 230 407 2714 2715 1 0 12
endif
gumppic 195 90 00000034
dtext 260 95 044 Spawn Alanları
dtext 260 126 0455 <var.spawn1>
dtext 260 151 0455 <var.spawn2>
dtext 260 176 0455 <var.spawn3>
dtext 260 201 0455 <var.spawn4>
dtext 260 226 0455 <var.spawn5>
dtext 260 251 0455 <var.spawn6>
dtext 260 276 0455 <var.spawn7>
dtext 260 301 0455 <var.spawn8>
dtext 260 326 0455 <var.spawn9>
dtext 260 351 0455 <var.spawn10>
dtext 260 379 0455 <var.spawn11>
dtext 260 407 0455 <var.spawn12>
[dialog d_spawn_alani text]
[dialog d_spawn_alani button]
on=1
src.mgit <var.spawngit1>
on=2
src.mgit <var.spawngit2>
on=3
src.mgit <var.spawngit3>
on=4
src.mgit <var.spawngit4>
on=5
src.mgit <var.spawngit5>
on=6
src.mgit <var.spawngit6>
on=7
src.mgit <var.spawngit7>
on=8
src.mgit <var.spawngit8>
on=9
src.mgit <var.spawngit9>
on=10
src.mgit <var.spawngit10>
on=11
src.mgit <var.spawngit11>
on=12
src.mgit <var.spawngit12>
[function mgit]
if (<src.findid i_rune_poison>)
src.hata Zehirli iken Moongate Kullanamazsınız.
return 1
elseif !(<src.flags>&statf_dead) && (<src.hits> < (<src.str>)
src.hata Yaralı iken Moongate Kullanamazsınız.
return 1
endif
IF !(<src.ISNEARTYPE t_Moongate 3>)
src.hata Gateye uzaksınız.
return 1
endif
src.go <args>
src.fix
return 1
[EOF]
AHADA BU D:
sonra buttonlar var orda yanında gidiceğin alan yazar ordan istediğini deiştriicen biraz alttada onbutton=1 diye bişey var onun altında koordinatları yazar gitmek istediğin yere gidip .where yazıp oraya yazarsan olur .
