Üye ol    Giriş
  1. UO Scriptleri
  2. Sphere Scripts
  3. Items
  4. Güzel Bir Moongate Scpsi
polat77

Güzel Bir Moongate Scpsi

  • polat77
  • 2007-06-25 17:56
  • 0
  • 1521 
[DIALOG d_moongate]

0, 0

NOMOVE

PAGE 1

resizepic 95 30 5120 210 315

dtext 140 40 0481 Driver Moongates

button 144 70 2117 2118 1 0 1

dtext 165 66 5 Item Alani

button 144 100 2117 2118 1 0 2

dtext 165 97 5 Safe Alan

button 144 130 2117 2118 1 0 3

dtext 165 127 5 Boya Alani

button 144 160 2117 2118 1 0 4

dtext 165 157 5 Bilet Alani

button 144 190 2117 2118 1 0 5

dtext 165 187 5 Ozel Alan

button 144 220 2117 2118 1 0 6

dtext 165 217 5 Action Zone

button 144 250 2117 2118 1 0 7

dtext 165 247 5 Quest Alani

button 144 280 2117 2118 1 0 8

dtext 165 277 5 Magincia

button 144 310 2117 2118 1 0 9

dtext 165 307 5 Vendor Alani



[DIALOG d_moongate TEXT]



[DIALOG d_moongate BUTTON]

ONBUTTON=0

RETURN 1 



ONBUTTON=1

IF (<DISTANCE><=3)

SRC.GO 1476,1628,20

RETURN 1

ELSE

SRC.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=2

IF (<DISTANCE><=3)

SRC.GO britain 

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX  



ONBUTTON=3

IF (<DISTANCE><=3)

SRC.GO 1901,2074

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX  



ONBUTTON=4

IF (<DISTANCE><=3)

SRC.GO 4110,432,5

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 





ONBUTTON=5

IF (<DISTANCE><=3)

SRC.GO 5708,661

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=6

IF (<DISTANCE><=3)

SRC.GO 1828,2822

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=7

IF (<DISTANCE><=3)

SRC.GO cove

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=8

IF (<DISTANCE><=3)

SRC.GO 3564,2139,34

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=9

IF (<DISTANCE><=3)

SRC.GO 1962,2073

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=10

IF (<DISTANCE><=3)

SRC.GO 1960,2073

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



ONBUTTON=11

IF (<DISTANCE><=3)

SRC.GO 1970,2074,0

ELSE

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

ENDIF

SRC.FIX 



[ITEMDEF i_mgate]

DEFNAME=i_mgate

TYPE=t_moongate  

ID=i_moongate_blue

NAME=Moongate



category=Diger itemler

subsection=Diger

description=Facet moongate



ON=@DCLICK

IF (<src.flags>&04)

src.dialogclose d_moongate

src.dialog d_moongate

return 1

elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)

src.sysmessage @38,,1 Yaraliyken moongateleri kullanamazsiniz.

return 1

elseif (<DISTANCE><=3)

dialogclose d_moongate

DIALOG d_moongate

RETURN 1

else

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

return 1

endif



ON=@STEP

IF (<src.flags>&04)

src.dialogclose d_moongate

src.dialog d_moongate

src.f_ittir <src.dir>

return 1

elseif !(<src.str> = <src.hits>) && !(<src.hits> > <src.str>)

src.sysmessage @38,,1 Yaraliyken moongateleri kullanamazsiniz.

return 1

elseif (<DISTANCE><=3)

dialogclose d_moongate

DIALOG d_moongate

src.f_ittir <src.dir>

RETURN 1

else

src.sysmessage @38,,1 Yeterince yakin degilsiniz.

return 1

endif



[function f_ittir] 

if (<argn>==0) 

Move N 

more=0 

elseif (<argn>==1) 

Move N 

Move E 

more=1 

elseif (<argn>==2) 

Move E 

more=2 

elseif (<argn>==3) 

Move E 

Move S 

more=3 

elseif (<argn>==4) 

Move S 

more=4 

elseif (<argn>==5) 

Move S 

Move W 

more=5 

elseif (<argn>==6) 

Move W 

more=6 

elseif (<argn>==7) 

Move N 

Move W 

more=7 

endif 

return 1 





// ----------------------------

// MOONGATE.SCP - MOONGATE SISTEMI 

// SON GUNCELLENME TARIHI: 1 Aralik 2001

// ----------------------------

VERSION=0.55



[itemdef i_gater]

name gater

id i_handr_1

type t_eq_script

weight 0

layer layer_special



On=@Create

attr attr_invis|attr_can_decay



On=@Equip

timer 30

src.dialog d_gatetravel

	

On=@Timer

remove

return 1



[itemdef i_moongater]

name moongater

id i_handr_1

type t_eq_script

weight 0

layer layer_special



On=@Create

attr attr_invis|attr_can_decay



On=@Equip

timer 10

src.dialog d_facet_moongate

	

on=@unequip

src.dialogclose d_facet_moongate



On=@Timer

remove

return 1



[typedef t_facet_moongate]

On=@Step

if !((<src.findid.i_moongater>) || (<src.flags>&statf_stone))

	src.newitem i_moongater

	src.act.link <uid>

	src.act.equip

endif

var.font1 <basefont color=#ffffff

return 1



On=@Dclick

if !(<src.flags>&statf_stone)

	if (<distance> > 3)

		src.sysmessage @50 Gate'e ulasamiyorsunuz.

	else

		if (<src.findid.i_moongater>)

			src.findid.i_moongater.remove

		endif

		src.newitem i_moongater

		src.act.link <uid>

		src.act.equip

	endif

endif

var.font1 <basefont color=#ffffff

return 1



On=@Click

if (<src.region.type> == <region.type>)

	sayua 0905,0,0,0 a Moongate

else

	message a Moongate

endif

return 1



[dialog d_gatetravel]

-100,-100

nomove



resizepic 190 165 5120 140 120

resizepic 200 175 3000 120 100

htmlgump 220 185 120 20 0 0 0



htmlgump 258 218 80 20 1 0 0

htmlgump 258 238 80 20 2 0 0



button 225 215 4006 4007 1 0 1

button 225 235 4018 4019 1 0 0



[dialog d_gatetravel text]

GATE TRAVEL

Evet

Hayir



[dialog d_gatetravel button]

On=0

findid.i_gater.remove



On=1 // gate'e gir

if !(<findid.i_gater.link.isitem>)

	sysmessage @38 Gate gecemeden kapanmis.

	findid.i_gater.remove

elseif (<findid.i_gater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_gater.remove

else

	goplace <findid.i_gater.morep>

	findid.i_gater.timer 2

endif



[dialog d_facet_moongate]

-100,-100

nomove



resizepic 190 165 5054 180 250



text 220 185 2100 0



htmlgump 240 215 80 20 1 0 0

htmlgump 240 235 80 20 2 0 0

htmlgump 240 255 80 20 3 0 0

htmlgump 240 275 80 20 4 0 0

htmlgump 240 295 80 20 5 0 0

htmlgump 240 315 80 20 6 0 0

htmlgump 240 335 80 20 7 0 0

htmlgump 240 355 80 20 8 0 0

htmlgump 240 375 80 20 9 0 0



button 220 215 2714 2715 1 0 2

button 220 235 2714 2715 1 0 3

button 220 255 2714 2715 1 0 4

button 220 275 2714 2715 1 0 5

button 220 295 2714 2715 1 0 6

button 220 315 2714 2715 1 0 7

button 220 335 2714 2715 1 0 8

button 220 355 2714 2715 1 0 9

button 220 375 2714 2715 1 0 10



[dialog d_facet_moongate text]

Andoria Moongate

<var.font1>>Item Zone

<var.font1>>Safe Alan

<var.font1>>Jhelom

<var.font1>>Yew

<var.font1>>Minoc

<var.font1>>Trinsic

<var.font1>>Skara Brae

<var.font1>>Magincia

<var.font1>>Market Alani



[dialog d_facet_moongate button]

On=0

findid.i_moongater.remove



On=2

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace moonglow moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace moonglow moongate

	findid.i_moongater.timer 2

endif



On=3

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace britain moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace britain moongate

	findid.i_moongater.timer 2

endif



On=4

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace jhelom moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace jhelom moongate

	findid.i_moongater.timer 2

endif



On=5

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace yew moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace yew moongate

	findid.i_moongater.timer 2

endif



On=6

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace minoc-vesper moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace minoc-vesper moongate

	findid.i_moongater.timer 2

endif



On=7

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace trinsic moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace trinsic moongate

	findid.i_moongater.timer 2

endif



On=8

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace skara brae moongate

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace skara brae moongate

	findid.i_moongater.timer 2

endif



On=9

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace 3563,2139,34

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace 3563,2139,34

	findid.i_moongater.timer 2

endif



On=10

if !(<findid.i_moongater>)

	sysmessage @50 Gate'e ulasamiyorsunuz.

return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif <flags>&statf_dead

	sysmessage @38 Olu sekilde gate'den gectiniz.

	goplace 1966,2088

	findid.i_moongater.timer 2

	return 1

endif

if (<findid.i_moongater.link.distance> > 3)

	sysmessage @50 Gate'e ulasamiyorsunuz.

	findid.i_moongater.remove

elseif !(<hits> == <str>)

	sysmessage @38 Yarali sekilde gate'den gecemezsiniz.

	findid.i_moongater.remove

else

	goplace 1915,2101

	findid.i_moongater.timer 2

endif



[EOF]

Değerlendirmeler

0 0

Total votes: 0

Üye Ol veya Giriş Yap

Bu içeriğe yorum atmak istiyorsanız hemen üye olun veya giriş yapın.

Discord ile Bağlan
Twitch ile Bağlan
Steam ile Bağlan
Google ile Bağlan

Yorumlar (0)

Henüz yorum yapılmamış
Sadece kayıtlı kullanıcılar yeni yorum yapabilir.


Ultima-Strike Discord
Benzer Sayfalar