Üye ol    Giriş
  1. Forumlar
  2. Oyunlar
  3. Ultima Online
  4. Sphere Scripting
  5. Kendi yazdığım Faction sistemi

Kendi yazdığım Faction sistemi

mahmure
mahmure
Members
0 
[Events e_order]
on=@click
message @0481,0 [Order,Puan:<eval <TAG.Plan>>]


if (<src.isevent.e_chaos>)
message @08b <name>
return 1
else

if (<src.isevent.e_order>)
message @045 <name>
return 1
else


on=@attack
if (<act.isevent.e_chaos>)
criminal 0
murderer 0
endif


[Events e_chaos]
on=@click
message @025,0 [Chaos,Puan:<eval <TAG.Plan>>]


if (<src.isevent.e_order>)
message @08b <name>
return 1
else

if (<src.isevent.e_chaos>)
message @045 <name>
return 1
else

on=@attack
if (<act.isevent.e_order>)
criminal 0
murderer 0
endif

[Events e_puan]
on=@kill
if (<act.isplayer> && (<isevent.e_puan>) && (<act.isevent.e_puan>)
src.TAG.Plan <eval <src.TAG.Plan> +1>
src.for_display
endif
if (<act.TAG.Plan> > 4)
src.newitem i_fctn_silver
src.act.amount 3
src.act.bounce 
endif
on=@death
if !(<src.TAG.Plan> = 0) && (<act.isplayer>)
src.TAG.Plan <eval <src.TAG.Plan> -1>
src.for_display
endif




[Itemdef i_faction_order]
id i_grave_Stone
name Order

on=@create
color 455
attr 010

on=@click
message  @0480,0 <name> Factionu
message  @0481,0 [<eval <var.order>> Uye war]
return 1

on=@dclick
if (<src.tag0.chaosum> == 1)
src.sysmessage Bu Stoneyi siz kullanamassiniz.
return 1
else
if (<src.tag0.orderim> == 1)
src.marketegiris
else
dialog d_order
return 1
endif

[dialog d_order] ////Kayit Bolumu
60,40

page 0
resizepic 50 10 5120 310 320 
resizepic 60 20 3000 290 300 
text 90 30 <eval <var.fctn_color>> 0 
htmlgump 80 50 250 200 1 1 1

button 80 282 4012 4013 1 0 2
button 80 260 4009 4010 1 0 1
button 298 260 4018 4019 1 0 0
htmlgump 113 284 50 20 4 0 0
htmlgump 113 262 50 20 2 0 0
htmlgump 256 262 50 20 3 0 0



[dialog d_order text]
Order
<var.font3>>Bu faction'a kayit olacak misiniz? On-bilgi:Ayri faction uyeleri birbirini dusman olarak gorur ve gz icinde dahi birbirlerine saldirabilir/loot'layabilirler.
Kaydol
Cikis
Bilgi

[dialog d_order button]
On=1
src.events +e_order
src.tag.orderim 1
var.order +=1
return 1

On=2
src.sysmessage @93 Order Factionu.
return 1

[Itemdef i_faction_chaos]
id i_grave_Stone
name Chaos

on=@create
color 455
attr 010

on=@click
message  @0480,0 <name> Factionu
message  @0481,0 [<eval <var.chaos>> Uye war]
return 1

on=@dclick
if (<src.tag0.orderim> == 1)
src.sysmessage Bu Stoneyi siz kullanamassiniz.
return 1
else
if (<src.tag0.chaosum> == 1)
src.marketegiris
else
dialog d_chaos
return 1
endif

[dialog d_chaos] ////Kayit Bolumu
60,40

page 0
resizepic 50 10 5120 310 320 
resizepic 60 20 3000 290 300 
text 90 30 <eval <var.fctn_color>> 0 
htmlgump 80 50 250 200 1 1 1

button 80 282 4012 4013 1 0 2
button 80 260 4009 4010 1 0 1
button 298 260 4018 4019 1 0 0
htmlgump 113 284 50 20 4 0 0
htmlgump 113 262 50 20 2 0 0
htmlgump 256 262 50 20 3 0 0



[dialog d_chaos text]
Chaos
<var.font3>>Bu faction'a kayit olacak misiniz? On-bilgi:Ayri faction uyeleri birbirini dusman olarak gorur ve gz icinde dahi birbirlerine saldirabilir/loot'layabilirler.
Kaydol
Cikis
Bilgi

[dialog d_chaos button]
On=1
src.events +e_chaos
src.tag.chaosum 1
var.chaos +=1
return 1

On=2
src.sysmessage @93 Chaos Factionu.
return 1

[Function marketegiris]
dialog d_market


[dialog d_market]
60,40

page 0
resizepic 50 10 5120 310 280 // dis lacivert bg
resizepic 60 20 3000 290 260 // ust beyaz bg
text 90 30 <eval <var.fctn_color>> 0 // baslik seysi
resizepic 80 50 3000 250 200

page 1
htmlgump 90 60 90 20 1 0 0
htmlgump 90 80 90 20 19 0 0
htmlgump 90 100 90 20 2 0 0
htmlgump 90 120 90 20 3 0 0
htmlgump 90 140 90 20 17 0 0
htmlgump 90 160 90 20 4 0 0
htmlgump 180 61 160 20 5 0 0
htmlgump 180 81 160 20 20 0 0
htmlgump 180 101 160 20 6 0 0
htmlgump 180 121 160 20 7 0 0
htmlgump 180 141 160 20 18 0 0
htmlgump 180 161 160 20 8 0 0

button 140 195 2714 2715 0 2
button 140 215 2714 2715 0 3
htmlgump 162 196 100 20 9 0 0
htmlgump 162 216 100 20 10 0 0

page 2
button 100 80 2714 2715 1 0 20
button 100 100 2714 2715 1 0 30
//button 100 120 2714 2715 1 0 31
htmlgump 122 81 170 20 11 0 0
htmlgump 122 101 150 20 12 0 0
//htmlgump 122 121 180 20 21 0 0

button 100 200 2714 2715 0 1
htmlgump 122 201 100 20 13 0 0

page 3
htmlgump 90 55 230 140 14 0 0
button 230 190 4003 4004 1 0 10
button 230 212 4009 4010 0 1
htmlgump 265 192 50 20 15 0 0
htmlgump 265 214 50 20 16 0 0

[dialog d_market text]
Faction
Orderlar:
Chaoslar:
Puaniniz:
Factionunuz:
<eval <var.order>>
<eval <var.chaos>>
<eval <tag.plan>>
Order/Chaos
Faction Market
Ayril
Order Shield (25 Bilet)
Chaos Shiled (25 Bilet)
Geri Don
Bunu yapmak istediginize emin misiniz? eger faction'dan ayrilmayi secerseniz 1 saat boyunca hala faction'da gorunecek ve diger faction uyeleri tarafindan saldiriya acik olacaksiniz. Bu surenin sonunda faction'dan otomatik olarak cikacak ve faction puaniniz sifirlancaktir.
Terket!
Vazgec.
Factionlar:
2
Guild'ler:
<link.morex> / <eval (<serv.guilds> - 4)>
Guildstone (10000 silver)

[dialog d_market button]
On=10
if (<src.isevent.e_order>)
src.events -e_order
src.tag.orderim 0
var.order +=-1
else
if (<src.isevent.e_chaos>)
src.events -e_chaos
src.tag.chaosum 0
var.chaos +=-1
endif

On=20
if !(<src.restest 25 i_fctn_silver>)
	src.sysmessage @90 Order shield almak icin cantanizda 25 pvp bileti olmalidir.
else
	src.consume 25 i_fctn_silver
	src.newitem i_fctn_order
	src.act.link <uid>
	src.act.color <link.more2>
	src.act.bounce
endif

On=30
if !(<src.restest 25 i_fctn_silver>)
	src.sysmessage @90 Chaos shield almak icin cantanizda 25 pvp bileti olmalidir.
else
	src.consume 25 i_fctn_silver
	src.newitem i_fctn_chaos
	src.act.link <uid>
	src.act.color <link.more2>
	src.act.bounce
endif

[ITEMDEF 01bc4]
DEFNAME=i_fctn_order
name=Order Shield
TYPE=t_shield
FLIP=1
VALUE=1
WEIGHT=1
ARMOR=30
REQSTR=60
CATEGORY=Provisions - Armor
SUBSECTION=Shields
DESCRIPTION=Order Shield

ON=@Create
hitpoints 100
attr 06

On=@Equip
if !(<src.tag.orderim> == 1)
	src.smg Bunu kullanmak icin Order guildlerden birine uye olman lazim.
	unequip
	return 1
	elseif (<src.tag.chaosum> == 1)
	src.smg Chaos Guildleri Order kalkani kullanamaz.
	unequip
endif

[ITEMDEF 01bc3]
DEFNAME=i_fctn_chaos
TYPE=t_shield
name=Chaos Shield
FLIP=1
VALUE=1
WEIGHT=1
ARMOR=30
REQSTR=60
CATEGORY=Provisions - Armor
SUBSECTION=Shields
DESCRIPTION=Chaos Shield

ON=@Create
hitpoints 100
attr 06

On=@Equip
if !(<src.tag.chaosum> == 1)
	src.smg Bunu kullanmak icin Chaos guildlerden birine uye olman lazim.
	unequip
elseif (<src.tag.orderim> == 1)
	src.smg Order Guildleri Chaos kalkani kullanamaz.
	unequip
endif


Arkadaşlar klasik order chaos scripti yazdım fakat bir takım arkadaş bug olduğuna inanıyor.Scripti incelemeden önce ben size nasıl olduğunu anlatiyim.

e_puan eventini girisde verdiriyorum bu sayede player order veya chaos deilken bile puan alabilio.Ondan sonra gerisi stonelerden kayıt vs. klasik şeyler sizce bu scripte bug varmı?

Doğru düzgün çalışırmı çalışmazmı?

Şahsen defalarca test yaptım.
İgilenenlere simdiden tesekkürler.
  • 2008-02-24 00:01
  • #1
KadhraS
KadhraS
Novice
-14.8
e kardeşim orada zaten e_order event'i var
  • 2008-02-24 00:10
  • #2
[Narcotich]
[Narcotich]
Banned
0
Yürü be mahmure yürü koçum kim tutar seni :D

Söküyosun bu işleri yavaş yavaş :p
  • 2008-02-24 00:23
  • #3
mahmure
mahmure
Members
0
Kadhras O order chaos eventi sadece order veya chaos olduklarını belli etmek için.Puan eventi ise guildde deilken bile puan kazana bilmeleri için!
  • 2008-02-25 00:40
  • #4
gungor
gungor
Members
0
e peki bug bunun neresinde ?
  • 2008-04-03 14:59
  • #5
nuker
nuker
Banned
0
evet hata var.

varları var0
tagları tag0 yapmassan unfinded symbol ' ' hatası verir konsol
  • 2008-07-16 15:18
  • #6
hwgordon
hwgordon
Neophyte
0
ayrıca bunda order ve chaos lar birbirlerine düşman görünmüyor kill ve criminal olayları olur.
  • 2008-07-18 22:23
  • #7
Owner_Jin üyesi avatar
Owner_Jin
Novice
0
Hocam sen e_puan eventini herkese weriorsun e_puan eventinin iinde e_order veya e_chaos yok ki sadece orderler chaoslar puan alsın...
  • 2008-07-20 14:19
  • #8
balik
balik
Members
0
puan derken puanları ustunde yazıormu mesela bi grp war dielim puanları cok yuksek olanların istatistlklerde 2 grp halin maavilerin en yuksek puanlısı pkların en yuksek puanlısını gormek için nasl bişeyler yapmak lazm
  • 2008-07-25 00:03
  • #9

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj 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