//////////////////////

///////////Script Res Gate///////////

        //////////////////////

///////////Yazan:Blues///////////

     //////////////////////     



Arkadaşlar Denemedim Bug Cikabilir Oyüzden Kusra Bakmayin.



[ITEMDEF i_res_gate] 

name Res Gate

ID=i_moongate_blue 

TYPE=t_telepad 

ON=@CREATE 

COLOR=0493 



CATEGORY=Other 

SUBSECTION=Gates 

DESCRIPTION=Ressurection Gate 



ONTRIGGER=@STEP 

src.move 1

src.sysmessage @07a1,3 Reslenebilmek Icin Cift Tiklayiniz.

return 1



on=@click

message @080a,3 [ <serv.name> ]

message @07a1,3 Res Gate

return 1





on=@dclick

if !(<src.hits> = 0)

src.sysmessage @07a1,3 <serv.name> Uyarisi : Uzgunum Siz Olu Degilsiniz Bu Menuyu Acmaya Hakkiniz Yok...

return 1

else

src.hakan

return 1









[plevel 2]

hakan



[function hakan]

src.dialog d_res

src.sysmessage @07a1,3 Sayin <src.name> Reslenme Menusunu Actiniz.



[dialog d_res]

100,100

nomove



resizepic 0 0 5120 560 200

resizepic 10 10 3000 540 180



for 1 1

resizepic 10 <eval (<dlocal._for>*30)+10> 9300 540 23

endfor 



for 1 1

resizepic 90 <eval (<dlocal._for>*30)+45> 9300 120 23

endfor



for 1 1

resizepic 270 <eval (<dlocal._for>*30)+45> 9300 120 23

endfor  



for 1 1

resizepic 70 <eval (<dlocal._for>*5)+5> 9300 260 23

endfor  





dtext 80 10 32 <serv.name> Reslenme Menusu 



dtext 120 40 32 <src.name> Reslenme Menusune Hos Geldiniz.



dtext 120 75 05 Reslen



dtext 300 75 05 Reslenme



button 100 75 2714 2715 1 0 1

button 280 75 2714 2715 1 0 2



[dialog d_res button]

onbutton=0

src.sysmessage @07a1,3 Sayin <src.name> Reslenme Menusunu Kapattiniz.

onbutton=1

IF (<src.body> == c_ghost_man)

SRC.say @07a1,3 Hayata Doner

SRC.RESURRECT 

RETURN 0 

ELSE 

IF (<src.body> == c_ghost_woman)

SRC.say @07a1,3 Hayata Doner

SRC.RESURRECT

RETURN 0 

ELSE 

src.sysmessage @07a1,3 Olu Degilsiniz. 

ENDIF 

onbutton=2

src.sysmessage @32 Reslenmekten Vazgectiniz.





Denemedim Bug Varsa Bildirin.



[email protected]

Değerlendirmeler

0

Total votes: 0