UO-Dev Arama


Stafflar için hazırlanmış komutlarla otomatik oluşturulabilecek bir quest sistemi

Yazar: Bilinmiyor
Tarih: 29-07-2009 13:15


Paylaş : Paylaş

Kod:
[PLEVEL 1]
quest
questbendebitti
etkinlik
etkinlikbendebitti

[PLEVEL 4]
questbaslat
questbitir
etkinlikbaslat
etkinlikbitir


[FUNCTION quest]
if (<src.findid.(i_quest_bilgi)> == 0)
src.sysmessage @1100,,1 Suanda aktif quest bulunmamaktadir!
return 1
else
src.dialog d_quest_player
endif
return 1

[FUNCTION etkinlik]
if (<src.findid.(i_etkinlik_bilgi)> == 0)
src.sysmessage @1100,,1 Suanda aktif etkinlik bulunmamaktadir!
return 1
else
src.dialog d_etkinlik_player
endif
return 1

[FUNCTION questbaslat]
if (<src.account.plevel> < 4)
src.sysmessage @1100,,1 Quest baslatmaya yetkiniz yok!
return 1
else
src.dialog d_quest_staff
endif
return 1

[FUNCTION questbitir]
SERV.ALLCLIENTS questbendebitti
SERV.ALLCLIENTS sysmessage @0793,,1 Quest Duyurusu :
SERV.ALLCLIENTS sysmessage @1156,,1 Duzenlenen quest sona ermistir, katilimlar icin tesekkurler!
return 1

[FUNCTION questbendebitti]
src.findid.(i_quest).remove
src.findid.(i_quest_bilgi).remove
return 1


[FUNCTION etkinlikbaslat]
if (<src.account.plevel> < 4)
src.sysmessage @1100,,1 Etkinlik duzenlenmeye yetkiniz yok!
return 1
else
src.dialog d_etkinlik_staff
endif
return 1

[FUNCTION etkinlikbitir]
SERV.ALLCLIENTS etkinlikbendebitti
SERV.ALLCLIENTS sysmessage @0793,,1 Etkinlik Duyurusu :
SERV.ALLCLIENTS sysmessage @1156,,1 Duzenlenen etkinlik sona ermistir, katilimlar icin tesekkurler!
return 1

[FUNCTION etkinlikbendebitti]
src.findid.(i_etkinlik).remove
src.findid.(i_etkinlik_bilgi).remove
return 1



//---------------------------
//  DIALOGLAR
//---------------------------


[DIALOG d_etkinlik_player]
0, 0
nomove
noclose
PAGE 0
resizepic 80 80 5054 430 370

text 130 90 150 0

text 100 120 955 1
text 100 140 955 2
text 100 160 955 3

text 100 190 87 4

text 100 220 955 5
text 100 245 955 6
text 100 270 955 7
text 100 295 955 8

resizepic 190 220 3000 290 23
resizepic 190 245 3000 290 23
resizepic 190 270 3000 290 23
//resizepic 190 295 3000 290 23

text 200 220 0 9
text 200 245 0 10
text 200 270 0 11
htmlgump 190 295 305 65 12 10 10 //text 200 295 955 12

text 100 370 47 13
text 100 390 47 14

text 160 415 57 15
text 390 415 27 16

button 120 415 4006 4007 1 0 1
button 350 415 4003 4002 1 0 0


[DIALOG d_etkinlik_player TEXT]
<serv.name> Oyuncu Etkinlik Sistemi
Sayin <src.name>;
<serv.name> bunyesinde sizler icin etkinlik duzenlemekteyiz.
Bu etkinlikte sizide aramizda gormekten gurur duyariz.
Etkinlik Bilgileri
Adi:
Saati:
Ucreti:
Bilgileri:
<src.findid.(i_etkinlik_bilgi).name>
<eval <src.findid.(i_etkinlik).more>>:<eval <src.findid.(i_etkinlik).morez>>
<eval <src.findid.(i_etkinlik).more2>>gp
<src.findid.(i_etkinlik).name>
Bu bilgiler dogrultusunda yapilan etkinlige kabul edilmek
istiyorsaniz lutfen "kabul" tusuna basiniz.
Kabul Ediyorum
Istemiyorum



[DIALOG d_etkinlik_player BUTTON]
On=0
return 1

On=1
if (<src.hits> < <src.str>)
src.sysmessage @1100,,1 Yarali iken etkinlige katilamazsiniz!
return 1
elseif (<src.findlayer(25)>)
src.sysmessage @1100,,1 Binekli halde etkinlige katilamazsiniz!
return 1
elseif (<src.findid.(i_etkinlik_bilgi)> == 0)
src.sysmessage @1100,,1 Suanda etkinlik bulunmamaktadir yada katilimlar bitmistir!
return 1
elseif (<rescount <def.cmoney>> < <eval <src.findid.(i_etkinlik).more2>>)
src.sysmessage @1100,,1 Yaninizda <eval <src.findid.(i_etkinlik).more2>>gp para bulunmamaktadir.
return 1
elseif (<rescount <def.cmoney>> >= <eval <src.findid.(i_etkinlik).more2>>)
src.consumegold <eval <src.findid.(i_etkinlik).more2>>
src.sysmessage @1156,,1 Etkinlige katildiginiz icin tesekkurler <src.name>, cantanizdan <eval <src.findid.(i_etkinlik).more2>>gp para tedarik edilmistir.
src.go <eval <src.findid.(i_etkinlik_bilgi).morex>>,<eval <src.findid.(i_etkinlik_bilgi).morey>>
src.findid.(i_etkinlik).remove
src.findid.(i_etkinlik_bilgi).remove
return 1
endif



[DIALOG d_etkinlik_staff]
0, 0
nomove
noclose
PAGE 0
resizepic 80 80 5054 430 445

text 130 90 150 0

text 100 120 955 1
text 100 140 955 2
text 100 160 955 3

text 100 190 87 4

text 100 220 955 5
text 100 245 955 6
text 100 270 955 7
text 100 295 955 8
text 100 320 955 9
text 100 345 955 10
text 100 370 955 11

resizepic 170 220 3000 330 23
resizepic 170 245 3000 330 23
resizepic 170 270 3000 330 23
resizepic 170 295 3000 330 23
resizepic 170 320 3000 330 23
resizepic 230 345 3000 270 23
resizepic 230 370 3000 270 23

textentry 180 220 313 25 0 0 12 //text 200 220 0 9
textentry 180 245 313 25 0 1 13 //text 200 245 0 10
textentry 180 270 313 25 0 2 14
textentry 180 295 313 25 0 3 15 //text 200 270 0 11
textentry 180 320 500 25 0 4 16 //text 200 295 0 12
textentry 240 345 313 25 0 5 17
textentry 240 370 313 25 0 6 18

text 100 400 47 19
text 100 420 47 20
text 100 440 47 21
text 100 460 47 22

text 160 490 57 23
text 430 490 27 24

button 125 490 4006 4007 1 0 1
button 393 490 4003 4002 1 0 0


[DIALOG d_etkinlik_staff TEXT]
<serv.name> Oyuncu Etkinlik Duzenleme Sistemi
Sayin <src.name>;
Suan etkinlik duzenlemek uzeresiniz lutfen assagidaki
bilgileri doldurarak oyuncularin katilimini saglayin.
Duzenlenecek Etkinlik Bilgileri
Adi:
Saati:
Dakikasi:
Ucreti:
Bilgileri:
Ilk Koordinat:
Ikinci Koordinat:
Etkinlik Adi Giriniz
Saat Belirleyiniz
Dakika Belirleyiniz
GP Uzerinden Fiyat Belirleyin
Aciklama Belirtiniz
Koordinat Belirtin Orn:( 1210 )
Koordinat Belirtin Orn:( 1820 )
.where yada .map menusunde cikan koordinatlari ilk ve
ikinci olarak yaziniz orn (1210,1820) 1(1210) 2(1820)
oyuncular yazdiginiz koordinatlara gidiceklerdir
lutfen cok dikkatli olun ve koordinatlari dogru yazin
Etkinlik Duzenle
Iptal



[DIALOG d_etkinlik_staff BUTTON]
On=0
return 1

//findid.(i_etkinlik)
//findid.(i_etkinlik_bilgi)

On=1
SERV.ALLCLIENTS etkinlikbendebitti
SERV.ALLCLIENTS newitem i_etkinlik
SERV.ALLCLIENTS act.bounce
SERV.ALLCLIENTS act.name = <ARGTXT[4]> // Aciklama
SERV.ALLCLIENTS act.more = <ARGTXT[1]> // Saat
SERV.ALLCLIENTS act.morez = <ARGTXT[2]> // Dakika
SERV.ALLCLIENTS act.more2 = <ARGTXT[3]> // Fiyat

SERV.ALLCLIENTS newitem i_etkinlik_bilgi
SERV.ALLCLIENTS act.bounce
SERV.ALLCLIENTS act.name = <ARGTXT[0]> // Etkinlik Adi
SERV.ALLCLIENTS act.morex = <ARGTXT[5]> // Koordinat 1
SERV.ALLCLIENTS act.morey = <ARGTXT[6]> // Koordinat 2

SERV.ALLCLIENTS sysmessage @0793,,1 Etkinlik Duyurusu :
SERV.ALLCLIENTS sysmessage @1156,,1 <ARGTXT[0]> duzenlenmektedir, lutfen katilmak icin .etkinlik yaziniz!!
return 1


[DIALOG d_quest_player]
0, 0
nomove
noclose
PAGE 0
resizepic 80 80 5054 430 370

text 130 90 150 0

text 100 120 955 1
text 100 140 955 2
text 100 160 955 3

text 100 190 87 4

text 100 220 955 5
text 100 245 955 6
text 100 270 955 7
text 100 295 955 8

resizepic 190 220 3000 290 23
resizepic 190 245 3000 290 23
resizepic 190 270 3000 290 23
//resizepic 190 295 3000 290 23

text 200 220 0 9
text 200 245 0 10
text 200 270 0 11
htmlgump 190 295 305 65 12 10 10 //text 200 295 955 12

text 100 370 47 13
text 100 390 47 14

text 160 415 57 15
text 390 415 27 16

button 120 415 4006 4007 1 0 1
button 350 415 4003 4002 1 0 0


[DIALOG d_quest_player TEXT]
<serv.name> Oyuncu Quest Sistemi
Sayin <src.name>;
<serv.name> bunyesinde sizler icin quest duzenlemekteyiz.
Bu quest'te sizide aramizda gormekten gurur duyariz.
Quest Bilgileri
Adi:
Saati:
Ucreti:
Bilgileri:
<src.findid.(i_quest_bilgi).name>
<eval <src.findid.(i_quest).more>>:<eval <src.findid.(i_quest).morez>>
<eval <src.findid.(i_quest).more2>>gp
<src.findid.(i_quest).name>
Bu bilgiler dogrultusunda yapilan quest'e kabul edilmek
istiyorsaniz lutfen "kabul" tusuna basiniz.
Kabul Ediyorum
Istemiyorum



[DIALOG d_quest_player BUTTON]
On=0
return 1

On=1
if (<src.hits> < <src.str>)
src.sysmessage @1100,,1 Yarali iken quest'e katilamazsiniz!
return 1
//elseif (<src.findlayer(25)>)
// src.sysmessage @1100,,1 Binekli halde quest'e katilamazsiniz!
// return 1
elseif (<src.findid.(i_quest_bilgi)> == 0)
src.sysmessage @1100,,1 Suanda quest bulunmamaktadir yada katilimlar bitmistir!
return 1
elseif (<rescount <def.cmoney>> < <eval <src.findid.(i_quest).more2>>)
src.sysmessage @1100,,1 Yaninizda <eval <src.findid.(i_quest).more2>>gp para bulunmamaktadir.
return 1
elseif (<rescount <def.cmoney>> >= <eval <src.findid.(i_quest).more2>>)
src.consumegold <eval <src.findid.(i_quest).more2>>
src.sysmessage @1156,,1 Quest'e katildiginiz icin tesekkurler <src.name>, cantanizdan <eval <src.findid.(i_quest).more2>>gp para tedarik edilmistir.
src.go <eval <src.findid.(i_quest_bilgi).morex>>,<eval <src.findid.(i_quest_bilgi).morey>>
src.findid.(i_quest).remove
src.findid.(i_quest_bilgi).remove
return 1
endif



[DIALOG d_quest_staff]
0, 0
nomove
noclose
PAGE 0
resizepic 80 80 5054 430 445

text 130 90 150 0

text 100 120 955 1
text 100 140 955 2
text 100 160 955 3

text 100 190 87 4

text 100 220 955 5
text 100 245 955 6
text 100 270 955 7
text 100 295 955 8
text 100 320 955 9
text 100 345 955 10
text 100 370 955 11

resizepic 170 220 3000 330 23
resizepic 170 245 3000 330 23
resizepic 170 270 3000 330 23
resizepic 170 295 3000 330 23
resizepic 170 320 3000 330 23
resizepic 230 345 3000 270 23
resizepic 230 370 3000 270 23

textentry 180 220 313 25 0 0 12 //text 200 220 0 9
textentry 180 245 313 25 0 1 13 //text 200 245 0 10
textentry 180 270 313 25 0 2 14
textentry 180 295 313 25 0 3 15 //text 200 270 0 11
textentry 180 320 500 25 0 4 16 //text 200 295 0 12
textentry 240 345 313 25 0 5 17
textentry 240 370 313 25 0 6 18

text 100 400 47 19
text 100 420 47 20
text 100 440 47 21
text 100 460 47 22

text 160 490 57 23
text 430 490 27 24

button 125 490 4006 4007 1 0 1
button 393 490 4003 4002 1 0 0


[DIALOG d_quest_staff TEXT]
<serv.name> Oyuncu Quest Duzenleme Sistemi
Sayin <src.name>;
Suan quest duzenlemek uzeresiniz lutfen assagidaki
bilgileri doldurarak oyuncularin katilimini saglayin.
Duzenlenecek Quest Bilgileri
Adi:
Saati:
Dakikasi:
Ucreti:
Bilgileri:
Ilk Koordinat:
Ikinci Koordinat:
Quest Adi Giriniz
Saat Belirleyiniz
Dakika Belirleyiniz
GP Uzerinden Fiyat Belirleyin
Aciklama Belirtiniz
Koordinat Belirtin Orn:( 1210 )
Koordinat Belirtin Orn:( 1820 )
.where yada .map menusunde cikan koordinatlari ilk ve
ikinci olarak yaziniz orn (1210,1820) 1(1210) 2(1820)
oyuncular yazdiginiz koordinatlara gidiceklerdir
lutfen cok dikkatli olun ve koordinatlari dogru yazin
Quest Duzenle
Iptal



[DIALOG d_quest_staff BUTTON]
On=0
return 1

//findid.(i_quest)
//findid.(i_quest_bilgi)

On=1
SERV.ALLCLIENTS questbendebitti
SERV.ALLCLIENTS newitem i_quest
SERV.ALLCLIENTS act.bounce
SERV.ALLCLIENTS act.name = <ARGTXT[4]> // Aciklama
SERV.ALLCLIENTS act.more = <ARGTXT[1]> // Saat
SERV.ALLCLIENTS act.morez = <ARGTXT[2]> // Dakika
SERV.ALLCLIENTS act.more2 = <ARGTXT[3]> // Fiyat

SERV.ALLCLIENTS newitem i_quest_bilgi
SERV.ALLCLIENTS act.bounce
SERV.ALLCLIENTS act.name = <ARGTXT[0]> // Quest Adi
SERV.ALLCLIENTS act.morex = <ARGTXT[5]> // Koordinat 1
SERV.ALLCLIENTS act.morey = <ARGTXT[6]> // Koordinat 2

SERV.ALLCLIENTS sysmessage @0793,,1 Quest Duyurusu :
SERV.ALLCLIENTS sysmessage @1156,,1 <ARGTXT[0]> duzenlenmektedir, lutfen katilmak icin .quest yaziniz!!
return 1



//---------------------------
//  ESYALAR
//---------------------------


[ITEMDEF i_etkinlik]
NAME=Etkinlik Aciklamasi
ID=i_deed
TYPE=t_eq_script
LAYER=layer_special

ON=@Create
More 00
Morez 00
More2 0000
Attr=attr_invis|attr_decay

ON=@Click
src.sysmessage @1156,,1 Bu deed etkinlik bilgilerini icerir ve sadece stafflar gorebilir!

ON=@Equip

ON=@UnEquip

ON=@Timer



[ITEMDEF i_etkinlik_bilgi]
NAME=Etkinlik Adi
ID=i_deed
TYPE=t_eq_script
LAYER=layer_special

ON=@Create
Morex 00
Morey 00
Attr=attr_invis|attr_decay

ON=@Click
src.sysmessage @1156,,1 Bu deed etkinlik bilgilerini icerir ve sadece stafflar gorebilir!

ON=@Equip

ON=@UnEquip

ON=@Timer


[ITEMDEF i_quest]
NAME=Quest Aciklamasi
ID=i_deed
TYPE=t_eq_script
LAYER=layer_special

ON=@Create
More 00
Morez 00
More2 0000
Attr=attr_invis|attr_decay

ON=@Click
src.sysmessage @1156,,1 Bu deed quest bilgilerini icerir ve sadece stafflar gorebilir!

ON=@Equip

ON=@UnEquip

ON=@Timer


[ITEMDEF i_quest_bilgi]
NAME=Quest Adi
ID=i_deed
TYPE=t_eq_script
LAYER=layer_special

ON=@Create
Morex 00
Morey 00
Attr=attr_invis|attr_decay

ON=@Click
src.sysmessage @1156,,1 Bu deed quest bilgilerini icerir ve sadece stafflar gorebilir!

ON=@Equip

ON=@UnEquip

ON=@Timer


[ITEMDEF i_quester_staff]
ID=i_staff_black
NAME=Null
TYPE=t_weapon_mace_staff
LAYER=1

ON=@CREATE
COLOR=0455
HITPOINTS=100

ON=@CLICK
message @0808 Quest Writer Staff
message @0808 [<name>]
return 1

ON=@DCLICK
equip
If (<src.account.plevel> > 2)
src.questbaslat
return 1
Else
Remove
EndIf

ON=@EQUIP
name = <src.name>



Yorumlar

Henüz yorum yapılmamıştır.

Oylamalar

Oylama :
Üyelerin oylama ortalaması (10 dışında) : Henüz Oylanmamış   
Oylar: 0

Benzer Sayfalar

SayfalarYorumlarGönderenTarih
Guild sistemi0Mrs.xariyla04-03-2012
House sistemi0Mrs.xariyla04-03-2012
Maaş Sistemi0Kraagnar17-11-2011
Flash üyelik sistemi0Culum25-09-2011
Sorter Account Sistemi0Sorter23-07-2011


Keywords:

ultima online, RunUO, ultima online download, sphere scripting, role play, uo grafik, second age ultima, uo loop, macroman, pvp server, server kurulumu, sphere, multool, ml mulls, 56b 55r 55i, htmlgumps, client 4x, client edit, sphere release, osi, rp server, sunucular, ghost mouse, inside uo, kingdom reborn, stygian abyss, uo nasıl oynanır, mondain's legacy, age of shadows, world build, grandmaster, ultima online pvp, player dosyaları, ultima online indir, frp game, RunUO 1.0.0, razor, uo rice, hue editör, skill tools, ultima online patch, axis, world build, verdata, verdata patcher, map editör, gump editör, mul patcher, aos mulls, scriptler, anim edit, anim publish, hues mul, hosting vps, event dialog, account sistemi, skill gain, static yapımı,