Merchant Sistemi.

Arkadaşlar sistem Rexos'a aittir.Eleştirilere aldırmadan sisteme devam etti.Ben yayımlama dedim ama kendisi istedi.O yüzden koyuyorum.Gerçekten güzel oldu (:


arkadaşlar artık c_pv veya c_player_v klasikligine son noktayı koyup daha ilginç ve mantıklı bi sistem yapalım dedim.

sistem şöyle:

pazar kurmak isteyen arkadaş .merchant yazarak pazar kurma menüsünü açar. (bknz Resim 1)
pazar kurmak isteyen arkadaş merchant menüsünü açtıktan sonra istedigi slot'a istedigi itemi ekler ve istedigi gibi fiyatını/tanımını belirler. Eğer istersede o eşyayı pazardan çıkartabilir.
pazar kurmak isteyen arkadaş bunları yaptıktan sonra Pazarı Kur butonuna basarak pazar moduna girer ve bu sırada freeze olur eğer herhangi bişey yaparsa büyü/hit/logout (gibi) pazar modundan çıkar pazara soktugunuz eşyalarınız çalınmaz. Pazarı başlattıktan sonra .merchant yazarak pazarınızın durumunu görebilirsiniz (yani hangi itemi sattıgınızı falan)

pazardan eşya almak isteyen arkadaş üstünde [Pazar] yazan ve beyaz koltukta oturan yani pazar kuran kişilere çift tıklayarak sattıkları şeyleri görebilir ve bunları satın alabilirler.

resimler :

//Rexos
[defname renk]
renkrex <basefont color="#fff659">

[function merchant]
for 1 45
if (<src.tag0.merchantta> == 0)
try uid.<src.tag0.slot<dlocal._for>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal._for>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal._for>>.tag0.pazarda=0
src.tag0.slot<dlocal._for> 0
endif
endfor
src.ctag.page_view 0
src.ctag.sayfa 1
src.ctag0.izin 0
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_merchant_1]
0,0
nomove

obj <src.ctag0.sonkisi>
resizepic 20 20 5120 655 625
resizepic 30 30 3500 635 565
resizepic 30 600 3000 635 38
for 1 5
if (<dlocal._for> < 15)
local.for_ = <eval <local._for> + <src.ctag0.page_view>>
resizepic 50 <eval (<dlocal._for>*110)-63> 2620 90 90
resizepic 150 <eval (<dlocal._for>*110)-63> 3000 235 30
if !(<uid.<obj.tag0.slot<dlocal.for_>>.amount> == 0)
resizepic 150 <eval (<dlocal._for>*110)-30> 3000 235 57
resizepic 390 <eval (<dlocal._for>*110)-63> 3000 235 30
resizepic 390 <eval (<dlocal._for>*110)-30> 3000 235 30
tilepic 60 <eval (<dlocal._for>*110)-40> <serv.itemdef.<uid.<obj.tag0.slot<dlocal.for_>>.baseid>.id>.
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 <def.bfont_dred>Eşya <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>.amount> <uid.<obj.tag0.slot<dlocal.for_>>.name>.
dhtmlgump 155 <eval (<dlocal._for>*110)-25> 200 60 0 0 <def.bfont_dred>Eşya Tanıtımı <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>..tag0.tanitim>.
dhtmlgump 395 <eval (<dlocal._for>*110)-24> 200 20 0 0 <def.bfont_dred>Eşya Rengi <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>.color>
dhtmlgump 395 <eval (<dlocal._for>*110)-57> 200 20 0 0 <def.bfont_dred>Eşya Fiyatı <def.bfont_black>: <def.renkrex><uid.<obj.tag0.slot<dlocal.for_>>.dtag0.fiyat><def.bfont_black> Gp.
dhtmlgump 430 <eval (<dlocal._for>*110)+7> 200 20 0 0 <def.bfont_black>Bu Eşyayı Satın Al.
button 395 <eval (<dlocal._for>*110)+5> 4023 4024 1 0 <dlocal.for_>
else
dhtmlgump 74 <eval (<dlocal._for>*110)-26> 200 200 0 0 <def.bfont_white> BOŞ
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 200 0 0 Bu Slot Boş.
endif
endif
endfor

if !(<src.ctag0.page_view> == 0)
dhtmlgump 50 610 50 20 0 0 <def.bfont_dred> Geri
button 35 610 56 55 1 0 98000
endif

dhtmlgump 320 610 100 20 0 0 <def.bfont_dred> Sayfa <src.dctag0.sayfa>

if !(<src.ctag0.page_view> == 45)
dhtmlgump 600 610 30 20 0 0 <def.bfont_dred> İleri
button 640 610 55 56 1 0 99000
endif

[dialog d_merchant_1 button]
on=98000
src.ctag.sayfa -=1
src.ctag0.page_view -=5
dialogclose d_merchant_1
dialog d_merchant_1
return 1

on=99000
src.ctag.sayfa +=1
src.ctag.spawntakip 0
src.ctag0.page_view +=5
dialogclose d_merchant_1
dialog d_merchant_1

on=1 5000
if (<uid.<uid.<src.ctag0.sonkisi>.tag0.slot<argn>>.amount> == 0)
src.sysmessage @0458,1,1 Üzgünüz Bu eşyayı sizden önce başkası almış...
return 1
endif

if (<src.gold> < <uid.<uid.<src.ctag0.sonkisi>.tag0.slot<argn>>.dtag0.fiyat>)
src.sysmessage @0458,1,1 Üzgünüz bu eşyayı alacak kadar paranız yok.
return 1
endif

itemal <argn>

[dialog d_tanimbelirle]
0,0
nomove

resizepic 20 20 5120 635 100
resizepic 30 30 3500 615 80
resizepic 55 75 3000 565 20
dhtmlgump 50 45 400 20 0 0 <def.bfont_dred> Lütfen <uid.<src.ctag0.sontik>.name> isimli eşyanın tanımını aşşağıya yazınız.
dtextentry 60 76 540 20 0 0
button 585 46 4023 4024 1 0 1

[dialog d_tanimbelirle button]
on 1
if (strlen(<argtxt[0]>) > 100)
src.sysmessage @07a1,1,1 En fazla 100 karakter kullanabilirsiniz.
return 1
endif

try uid.<src.ctag0.sontik>.tag.tanitim <argtxt[0]>
src.sysmessage @0458,1,1 <uid.<src.ctag0.sontik>.name> isimli eşyanın tanıtımını ; [<argtxt[0]>] olarak ayarladınız.
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_fiyatbelirle]
0,0
nomove

resizepic 20 20 5120 335 100
resizepic 30 30 3500 315 80
resizepic 55 75 3000 240 20
dhtmlgump 50 45 400 20 0 0 <def.bfont_dred> Lütfen <uid.<src.ctag0.sontik>.name> isimli eşyanın fiyatını belirleyiniz.
dtextentry 60 76 240 20 0 0
button 300 75 4023 4024 1 0 1

[dialog d_fiyatbelirle button]
on 1
if !(<isnum <argtxt[0]>>)
src.sysmessage @07a1,1,1 Sadece sayı girebilirsiniz.
return 1
endif

if (<argtxt[0]> > 1000000)
src.sysmessage @07a1,1,1 En fazla 1000000 altın fiyat koyabilirsiniz
return 1
endif

try uid.<src.ctag0.sontik>.tag.fiyat <eval <argtxt[0]>>
src.sysmessage @0458,1,1 <uid.<src.ctag0.sontik>.name> isimli eşyanın fiyatını ; [<eval <argtxt[0]>>] olarak ayarladınız.
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_merchant_2]
0,0
nomove
resizepic 20 20 5120 775 625
resizepic 30 30 3500 755 565
resizepic 30 600 3000 755 38
if (<src.tag0.merchantta> == 0)
resizepic 290 650 5120 230 58
resizepic 300 660 3000 210 38
dhtmlgump 375 672 100 20 0 0 <def.bfont_dred> Pazarı Kur
button 340 670 4023 4024 1 0 999999
else
resizepic 290 650 5120 230 58
resizepic 300 660 3000 210 38
dhtmlgump 375 672 100 20 0 0 <def.bfont_dred> Pazarı Kapat
button 340 670 4023 4024 1 0 899999
endif
for 1 5
if (<dlocal._for> < 15)
local.for_ = <eval <local._for> + <src.ctag0.page_view>>
resizepic 50 <eval (<dlocal._for>*110)-63> 2620 90 90
resizepic 150 <eval (<dlocal._for>*110)-63> 3000 235 30
if !(<uid.<src.tag0.slot<dlocal.for_>>.amount> == 0)
resizepic 150 <eval (<dlocal._for>*110)-30> 3000 235 57
resizepic 390 <eval (<dlocal._for>*110)-63> 3000 235 30
tilepic 60 <eval (<dlocal._for>*110)-40> <serv.itemdef.<uid.<src.tag0.slot<dlocal.for_>>.baseid>.id>.
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 <def.bfont_dred>Eşya <def.bfont_black>: <uid.<src.tag0.slot<dlocal.for_>>.amount> <uid.<src.tag0.slot<dlocal.for_>>.name>.
dhtmlgump 155 <eval (<dlocal._for>*110)-25> 200 60 0 0 <def.bfont_dred>Eşya Tanıtımı <def.bfont_black>: <uid.<src.tag0.slot<dlocal.for_>>.tag0.tanitim>.
dhtmlgump 395 <eval (<dlocal._for>*110)-57> 200 20 0 0 <def.bfont_dred>Eşya Fiyatı <def.bfont_black>: <def.renkrex><uid.<src.tag0.slot<dlocal.for_>>.dtag0.fiyat><def.bfont_black> Gp.
dhtmlgump 430 <eval (<dlocal._for>*110)-26> 200 20 0 0 <def.bfont_black>Bu Slottaki Eşyaya Tanım yap
button 395 <eval (<dlocal._for>*110)-28> 4023 4024 1 0 <eval <dlocal.for_>+1000000>
dhtmlgump 430 <eval (<dlocal._for>*110)+7> 200 20 0 0 <def.bfont_black>Bu Slottaki Eşyaya Fiyat ver
button 395 <eval (<dlocal._for>*110)+5> 4023 4024 1 0 <eval <dlocal.for_>+2000000>
dhtmlgump 670 <eval (<dlocal._for>*110)-12> 200 20 0 0 <def.bfont_black><dlocal.for_>. Eşyayı Çıkart
button 630 <eval (<dlocal._for>*110)-13> 4023 4024 1 0 <eval <dlocal.for_>+3000000>
resizepic 40 <eval (<dlocal._for>*110)-74> 3000 735 2
else
dhtmlgump 74 <eval (<dlocal._for>*110)-26> 50 20 0 0 <def.bfont_white> BOŞ
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 Bu Slot Boş.
dhtmlgump 200 <eval (<dlocal._for>*110)-8> 200 20 0 0 <def.bfont_black>Bu Slota Eşya Ekle
button 155 <eval (<dlocal._for>*110)-10> 4023 4024 1 0 <dlocal.for_>
endif
endif
endfor

if !(<src.ctag0.page_view> == 0)
dhtmlgump 50 610 50 20 0 0 <def.bfont_dred> Geri
button 35 610 56 55 1 0 98000
endif

dhtmlgump 380 610 100 20 0 0 <def.bfont_dred> Sayfa <src.dctag0.sayfa>

if !(<src.ctag0.page_view> == 45)
dhtmlgump 720 610 30 20 0 0 <def.bfont_dred> İleri
button 760 610 55 56 1 0 99000
endif

[dialog d_merchant_2 button]
on=899999
src.pazariptal

on=999999
for 1 45
if (<src.dctag0.izin> == 0)
src.sysmessage @0458,1,1 Satışa başlamak için önce eşya koyunuz.
return 1
endif
endfor

src.kurak

on=98000
src.ctag.sayfa -=1
src.ctag0.page_view -=5
dialogclose d_merchant_2
dialog d_merchant_2
return 1

on=99000
src.ctag.sayfa +=1
src.ctag.spawntakip 0
src.ctag0.page_view +=5
dialogclose d_merchant_2
sdialog d_merchant_2

on=3000001 3999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
src.merchant
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
src.merchant
endif

local.argn <eval <argn>-3000000>
timerf 1,src.sysmessage @0458,1,1 <uid.<src.tag0.slot<dlocal.argn>>.name> İsimli eşyayı <src.dctag0.sayfa>. sayfadan ve <dlocal.argn>. sıradan çıkarttınız.
try uid.<src.tag0.slot<dlocal.argn>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal.argn>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal.argn>>.tag0.pazarda=0
src.tag0.slot<dlocal.argn> 0
src.dialogclose d_merchant_2
src.dialog d_merchant_2

on=1000001 1999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

local.argn <eval <argn>-1000000>
src.ctag0.sontik <src.tag0.slot<dlocal.argn>>
src.dialog d_tanimbelirle

on=2000001 2999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

local.argn <eval <argn>-2000000>
src.ctag0.sontik <src.tag0.slot<dlocal.argn>>
src.dialog d_fiyatbelirle

on=1 9998
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

targetf itemekle <argn>

[function itemekle]
if !(<argo.cont> == <src.findlayer(21).uid>)
src.sysmessage @0458,1,1 Sadece Çantanızdaki eşyaları pazara koyabilirsiniz.
return 1
endif

if (<argo.tag0.pazarda> == 0)
src.sysmessage @0485,1,1 <argo.name> İsimli eşya, <src.dctag0.sayfa>. sayfada ve <args>. sırada pazara konmuştur.
src.tag0.slot<args> <argo.uid>
argo.tag0.pazarda 1
src.dialogclose d_merchant_2
src.dialog d_merchant_2
src.ctag0.izin 1
else
src.sysmessage @0458,1,1 Bu Eşyayı zaten pazara koymuşsunuz.
endif

[function kurak]
forplayers 1
if (<tag0.merchantta> == 1) // üst üste kurmasınlar pazarı küfür yemeyek dimi
src.dialog d_merchant_2
src.sysmessage @0458,1,1 1 Kare Etrafınızda başka bir pazarcı bulunuyor lütfen kendinize başka biyer bulunuz.
return 1
endif
endfor

src.tag0.merchantta 1
src.sysmessage @0458,1,1 .pazariptal yazarak pazarınızı kapatabilirsiniz.
src.events +e_pazarda
serv.newitem i_bench_marble
new.p <src.p>
src.ctag0.koltuk <new.uid>
new.name @0458,1,1 Pazar Koltugu
src.say @0458,1,1 Gell!! Gell!! En Güzel Eşyalar bende!!!
serv.allclients sysmessage @0458,1,1 <src.name> : Gell!! Gell!! En Güzel Eşyalar bende!! [Yer : <src.region.name>]
SRC.FLAGS=<SRC.FLAGS>|020004
for 1 45
try uid.<src.tag0.slot<dlocal._for>>.tag.eskiattr <uid.<src.tag0.slot<dlocal._for>>.attr>
try uid.<src.tag0.slot<dlocal._for>>.attr attr_newbie|attr_static
try uid.<src.tag0.slot<dlocal._for>>.message @0458,1,1 Satışta.
endfor

[events e_pazarda]
on=@dclick
if (<tag0.merchantta> == 1) && !(<uid> == <src.uid>)
src.ctag0.sonkisi <uid>
src.ctag.page_view 0
src.ctag.sayfa 1
src.dialogclose d_merchant_1
src.dialog d_merchant_1
endif

on=@click
message @0458,1,1 [Pazar]

on=@logout
src.pazariptal

on=@gethit
pazariptal

on=@spellcast
pazariptal

on=@spelleffect
pazariptal

on=@skillstart
pazariptal

[function pazariptal]
src.events -e_pazarda
src.tag0.merchantta 0
try uid.<src.ctag0.koltuk>.remove
for 1 45
try uid.<src.tag0.slot<dlocal._for>>.attr <uid.<src.tag0.slot<dlocal._for>>.tag0.eskiattr>
try uid.<src.tag0.slot<dlocal._for>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal._for>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal._for>>.tag0.pazarda=0
src.tag0.slot<dlocal._for> 0
endfor
src.ctag.page_view 0
src.ctag.sayfa 1
src.ctag0.izin 0
src.flags <src.flags>&~04

[function itemal]
forplayers 2
if (<src.ctag0.sonkisi> == <uid>)
src.itemal1 <args>
return 1
endif
endfor

src.sysmessage @0458,1,1 Satıcıya yetişemiyorsunuz
return 1

[function itemal1]
obj <src.ctag0.sonkisi>
src.gold -=<uid.<obj.tag0.slot<args>>.dtag0.fiyat>
obj.gold +=<uid.<obj.tag0.slot<args>>.dtag0.fiyat>
src.sysmessage @0458,1,1 <uid.<uid.<src.ctag0.sonkisi>.tag0.slot<args>>.name> isimli eşya bankanıza koyuldu.
obj.sysmessage @0458,1,1 Pazarınızdaki <args>. Eşyanız satıldı.
try uid.<obj.tag0.slot<args>>.cont <src.findlayer.29.uid>
try uid.<obj.tag0.slot<args>>.tag0.tanitim=
try uid.<obj.tag0.slot<args>>.tag0.fiyat=
try uid.<obj.tag0.slot<args>>.tag0.pazarda=0
obj.tag0.slot<args> 0
trysrc <obj> dialogclose d_merchant_2
trysrc <obj> dialog d_merchant_2
obj.update
src.update

Güncellendi.

Bu konu Nexima tarafından düzenlendi(2008-09-22 18:35, 15 yıl önce)

Knight gibi çok mantıqlı güzel

baba bozuk bu ekliyorum itemi yine bos gosteriyo :S

güzel olmus Rexos güzel bir sistem yazmış [Tanımıorum gelçi ama :P]

Tamam düzelttim.Bunu kullanın

// Rexos
[defname renk]
renkrex <basefont color="#fff659">

[function merchant]
for 1 45
if (<src.tag0.merchantta> == 0)
try uid.<src.tag0.slot<dlocal._for>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal._for>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal._for>>.tag0.pazarda=0
src.tag0.slot<dlocal._for> 0
endif
endfor
src.ctag.page_view 0
src.ctag.sayfa 1
src.ctag0.izin 0
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_merchant_1]
0,0
nomove

obj <src.ctag0.sonkisi>
resizepic 20 20 5120 655 625
resizepic 30 30 3500 635 565
resizepic 30 600 3000 635 38
for 1 5
if (<dlocal._for> < 15)
local.for_ = <eval <local._for> + <src.ctag0.page_view>>
resizepic 50 <eval (<dlocal._for>*110)-63> 2620 90 90
resizepic 150 <eval (<dlocal._for>*110)-63> 3000 235 30
if !(<uid.<obj.tag0.slot<dlocal.for_>>.amount> == 0)
resizepic 150 <eval (<dlocal._for>*110)-30> 3000 235 57
resizepic 390 <eval (<dlocal._for>*110)-63> 3000 235 30
resizepic 390 <eval (<dlocal._for>*110)-30> 3000 235 30
tilepic 60 <eval (<dlocal._for>*110)-40> <serv.itemdef.<uid.<obj.tag0.slot<dlocal.for_>>.baseid>.id>.
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 <def.bfont_dred>Eşya <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>.amount> <uid.<obj.tag0.slot<dlocal.for_>>.name>.
dhtmlgump 155 <eval (<dlocal._for>*110)-25> 200 60 0 0 <def.bfont_dred>Eşya Tanıtımı <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>..tag0.tanitim>.
dhtmlgump 395 <eval (<dlocal._for>*110)-24> 200 20 0 0 <def.bfont_dred>Eşya Rengi <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>.color>
dhtmlgump 395 <eval (<dlocal._for>*110)-57> 200 20 0 0 <def.bfont_dred>Eşya Fiyatı <def.bfont_black>: <def.renkrex><uid.<obj.tag0.slot<dlocal.for_>>.dtag0.fiyat><def.bfont_black> Gp.
dhtmlgump 430 <eval (<dlocal._for>*110)+7> 200 20 0 0 <def.bfont_black>Bu Eşyayı Satın Al.
button 395 <eval (<dlocal._for>*110)+5> 4023 4024 1 0 <dlocal.for_>
else
dhtmlgump 74 <eval (<dlocal._for>*110)-26> 200 200 0 0 <def.bfont_white> BOŞ
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 200 0 0 Bu Slot Boş.
endif
endif
endfor

if !(<src.ctag0.page_view> == 0)
dhtmlgump 50 610 50 20 0 0 <def.bfont_dred> Geri
button 35 610 56 55 1 0 98000
endif

dhtmlgump 320 610 100 20 0 0 <def.bfont_dred> Sayfa <src.dctag0.sayfa>

if !(<src.ctag0.page_view> == 45)
dhtmlgump 600 610 30 20 0 0 <def.bfont_dred> İleri
button 640 610 55 56 1 0 99000
endif

[dialog d_merchant_1 button]
on=98000
src.ctag.sayfa -=1
src.ctag0.page_view -=5
dialogclose d_merchant_1
dialog d_merchant_1
return 1

on=99000
src.ctag.sayfa +=1
src.ctag.spawntakip 0
src.ctag0.page_view +=5
dialogclose d_merchant_1
dialog d_merchant_1

on=1 5000
if (<uid.<uid.<src.ctag0.sonkisi>.tag0.slot<argn>>.amount> == 0)
src.sysmessage @0458,1,1 Üzgünüz Bu eşyayı sizden önce başkası almış...
return 1
endif

if (<src.gold> < <uid.<uid.<src.ctag0.sonkisi>.tag0.slot<argn>>.dtag0.fiyat>)
src.sysmessage @0458,1,1 Üzgünüz bu eşyayı alacak kadar paranız yok.
return 1
endif

itemal <argn>

[dialog d_tanimbelirle]
0,0
nomove

resizepic 20 20 5120 635 100
resizepic 30 30 3500 615 80
resizepic 55 75 3000 565 20
dhtmlgump 50 45 400 20 0 0 <def.bfont_dred> Lütfen <uid.<src.ctag0.sontik>.name> isimli eşyanın tanımını aşşağıya yazınız.
dtextentry 60 76 540 20 0 0
button 585 46 4023 4024 1 0 1

[dialog d_tanimbelirle button]
on 1
if (strlen(<argtxt[0]>) > 100)
src.sysmessage @07a1,1,1 En fazla 100 karakter kullanabilirsiniz.
return 1
endif

try uid.<src.ctag0.sontik>.tag.tanitim <argtxt[0]>
src.sysmessage @0458,1,1 <uid.<src.ctag0.sontik>.name> isimli eşyanın tanıtımını ; [<argtxt[0]>] olarak ayarladınız.
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_fiyatbelirle]
0,0
nomove

resizepic 20 20 5120 335 100
resizepic 30 30 3500 315 80
resizepic 55 75 3000 240 20
dhtmlgump 50 45 400 20 0 0 <def.bfont_dred> Lütfen <uid.<src.ctag0.sontik>.name> isimli eşyanın fiyatını belirleyiniz.
dtextentry 60 76 240 20 0 0
button 300 75 4023 4024 1 0 1

[dialog d_fiyatbelirle button]
on 1
if !(<isnum <argtxt[0]>>)
src.sysmessage @07a1,1,1 Sadece sayı girebilirsiniz.
return 1
endif

if (<argtxt[0]> > 1000000)
src.sysmessage @07a1,1,1 En fazla 1000000 altın fiyat koyabilirsiniz
return 1
endif

try uid.<src.ctag0.sontik>.tag.fiyat <eval <argtxt[0]>>
src.sysmessage @0458,1,1 <uid.<src.ctag0.sontik>.name> isimli eşyanın fiyatını ; [<eval <argtxt[0]>>] olarak ayarladınız.
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_merchant_2]
0,0
nomove
resizepic 20 20 5120 775 625
resizepic 30 30 3500 755 565
resizepic 30 600 3000 755 38
if (<src.tag0.merchantta> == 0)
resizepic 290 650 5120 230 58
resizepic 300 660 3000 210 38
dhtmlgump 375 672 100 20 0 0 <def.bfont_dred> Pazarı Kur
button 340 670 4023 4024 1 0 999999
else
resizepic 290 650 5120 230 58
resizepic 300 660 3000 210 38
dhtmlgump 375 672 100 20 0 0 <def.bfont_dred> Pazarı Kapat
button 340 670 4023 4024 1 0 899999
endif
for 1 5
if (<dlocal._for> < 15)
local.for_ = <eval <local._for> + <src.ctag0.page_view>>
resizepic 50 <eval (<dlocal._for>*110)-63> 2620 90 90
resizepic 150 <eval (<dlocal._for>*110)-63> 3000 235 30
if !(<uid.<src.tag0.slot<dlocal.for_>>.amount> == 0)
resizepic 150 <eval (<dlocal._for>*110)-30> 3000 235 57
resizepic 390 <eval (<dlocal._for>*110)-63> 3000 235 30
tilepic 60 <eval (<dlocal._for>*110)-40> <serv.itemdef.<uid.<src.tag0.slot<dlocal.for_>>.baseid>.id>.
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 <def.bfont_dred>Eşya <def.bfont_black>: <uid.<src.tag0.slot<dlocal.for_>>.amount> <uid.<src.tag0.slot<dlocal.for_>>.name>.
dhtmlgump 155 <eval (<dlocal._for>*110)-25> 200 60 0 0 <def.bfont_dred>Eşya Tanıtımı <def.bfont_black>: <uid.<src.tag0.slot<dlocal.for_>>.tag0.tanitim>.
dhtmlgump 395 <eval (<dlocal._for>*110)-57> 200 20 0 0 <def.bfont_dred>Eşya Fiyatı <def.bfont_black>: <def.renkrex><uid.<src.tag0.slot<dlocal.for_>>.dtag0.fiyat><def.bfont_black> Gp.
dhtmlgump 430 <eval (<dlocal._for>*110)-26> 200 20 0 0 <def.bfont_black>Bu Slottaki Eşyaya Tanım yap
button 395 <eval (<dlocal._for>*110)-28> 4023 4024 1 0 <eval <dlocal.for_>+1000000>
dhtmlgump 430 <eval (<dlocal._for>*110)+7> 200 20 0 0 <def.bfont_black>Bu Slottaki Eşyaya Fiyat ver
button 395 <eval (<dlocal._for>*110)+5> 4023 4024 1 0 <eval <dlocal.for_>+2000000>
dhtmlgump 670 <eval (<dlocal._for>*110)-12> 200 20 0 0 <def.bfont_black><dlocal.for_>. Eşyayı Çıkart
button 630 <eval (<dlocal._for>*110)-13> 4023 4024 1 0 <eval <dlocal.for_>+3000000>
resizepic 40 <eval (<dlocal._for>*110)-74> 3000 735 2
else
dhtmlgump 74 <eval (<dlocal._for>*110)-26> 50 20 0 0 <def.bfont_white> BOŞ
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 Bu Slot Boş.
dhtmlgump 200 <eval (<dlocal._for>*110)-8> 200 20 0 0 <def.bfont_black>Bu Slota Eşya Ekle
button 155 <eval (<dlocal._for>*110)-10> 4023 4024 1 0 <dlocal.for_>
endif
endif
endfor

if !(<src.ctag0.page_view> == 0)
dhtmlgump 50 610 50 20 0 0 <def.bfont_dred> Geri
button 35 610 56 55 1 0 98000
endif

dhtmlgump 380 610 100 20 0 0 <def.bfont_dred> Sayfa <src.dctag0.sayfa>

if !(<src.ctag0.page_view> == 45)
dhtmlgump 720 610 30 20 0 0 <def.bfont_dred> İleri
button 760 610 55 56 1 0 99000
endif

[dialog d_merchant_2 button]
on=899999
src.pazariptal

on=999999
for 1 45
if (<src.dctag0.izin> == 0)
src.sysmessage @0458,1,1 Satışa başlamak için önce eşya koyunuz.
return 1
endif
endfor

src.kurak

on=98000
src.ctag.sayfa -=1
src.ctag0.page_view -=5
dialogclose d_merchant_2
dialog d_merchant_2
return 1

on=99000
src.ctag.sayfa +=1
src.ctag.spawntakip 0
src.ctag0.page_view +=5
dialogclose d_merchant_2
sdialog d_merchant_2

on=3000001 3999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
src.merchant
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
src.merchant
endif

local.argn <eval <argn>-3000000>
timerf 1,src.sysmessage @0458,1,1 <uid.<src.tag0.slot<dlocal.argn>>.name> İsimli eşyayı <src.dctag0.sayfa>. sayfadan ve <dlocal.argn>. sıradan çıkarttınız.
try uid.<src.tag0.slot<dlocal.argn>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal.argn>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal.argn>>.tag0.pazarda=0
src.tag0.slot<dlocal.argn> 0
src.dialogclose d_merchant_2
src.dialog d_merchant_2

on=1000001 1999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

local.argn <eval <argn>-1000000>
src.ctag0.sontik <src.tag0.slot<dlocal.argn>>
src.dialog d_tanimbelirle

on=2000001 2999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

local.argn <eval <argn>-2000000>
src.ctag0.sontik <src.tag0.slot<dlocal.argn>>
src.dialog d_fiyatbelirle

on=1 9998
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

targetf itemekle <argn>

[function itemekle]
if !(<argo.cont> == <src.findlayer(21).uid>)
src.sysmessage @0458,1,1 Sadece Çantanızdaki eşyaları pazara koyabilirsiniz.
return 1
endif

if (<argo.tag0.pazarda> == 0)
src.sysmessage @0485,1,1 <argo.name> İsimli eşya, <src.dctag0.sayfa>. sayfada ve <args>. sırada pazara konmuştur.
src.tag0.slot<args> <argo.uid>
argo.tag0.pazarda 1
src.dialogclose d_merchant_2
src.dialog d_merchant_2
src.ctag0.izin 1
else
src.sysmessage @0458,1,1 Bu Eşyayı zaten pazara koymuşsunuz.
endif

[function kurak]
forplayers 1
if (<tag0.merchantta> == 1) // üst üste kurmasınlar pazarı küfür yemeyek dimi
src.dialog d_merchant_2
src.sysmessage @0458,1,1 1 Kare Etrafınızda başka bir pazarcı bulunuyor lütfen kendinize başka biyer bulunuz.
return 1
endif
endfor

src.tag0.merchantta 1
src.sysmessage @0458,1,1 .pazariptal yazarak pazarınızı kapatabilirsiniz.
src.events +e_pazarda
serv.newitem i_bench_marble
new.p <src.p>
src.ctag0.koltuk <new.uid>
new.name @0458,1,1 Pazar Koltugu
src.say @0458,1,1 Gell!! Gell!! En Güzel Eşyalar bende!!!
serv.allclients sysmessage @0458,1,1 <src.name> : Gell!! Gell!! En Güzel Eşyalar bende!! [Yer : <src.region.name>]
SRC.FLAGS=<SRC.FLAGS>|020004
for 1 45
try uid.<src.tag0.slor<dlocal._for>>.tag.eskiattr <uid.<src.tag0.slor<dlocal._for>>.attr>
try uid.<src.tag0.slot<dlocal._for>>.attr attr_newbie|attr_static
try uid.<src.tag0.slot<dlocal._for>>.message @0458,1,1 Satışta.
endfor

[events e_pazarda]
on=@dclick
if (<tag0.merchantta> == 1) && !(<uid> == <src.uid>)
src.ctag0.sonkisi <uid>
src.ctag.page_view 0
src.ctag.sayfa 1
src.dialogclose d_merchant_1
src.dialog d_merchant_1
endif

on=@click
message @0458,1,1 [Pazar]

on=@logout
src.pazariptal

on=@gethit
pazariptal

on=@spellcast
pazariptal

on=@spelleffect
pazariptal

on=@skillstart
pazariptal

[function pazariptal]
src.events -e_pazarda
src.tag0.merchantta 0
try uid.<src.ctag0.koltuk>.remove
for 1 45
try uid.<src.tag0.slot<dlocal._for>>.attr <uid.<src.tag0.slor<dlocal._for>>.tag0.eskiattr>
try uid.<src.tag0.slot<dlocal._for>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal._for>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal._for>>.tag0.pazarda=0
src.tag0.slot<dlocal._for> 0
endfor
src.ctag.page_view 0
src.ctag.sayfa 1
src.ctag0.izin 0
src.flags <src.flags>&~04

[function itemal]
forplayers 2
if (<src.ctag0.sonkisi> == <uid>)
src.itemal1 <args>
return 1
endif
endfor

src.sysmessage @0458,1,1 Satıcıya yetişemiyorsunuz
return 1

[function itemal1]
obj <src.ctag0.sonkisi>
src.gold -=<uid.<obj.tag0.slot<args>>.dtag0.fiyat>
obj.gold +=<uid.<obj.tag0.slot<args>>.dtag0.fiyat>
src.sysmessage @0458,1,1 <uid.<uid.<src.ctag0.sonkisi>.tag0.slot<args>>.name> isimli eşya bankanıza koyuldu.
obj.sysmessage @0458,1,1 Pazarınızdaki <args>. Eşyanız satıldı.
try uid.<obj.tag0.slot<args>>.cont <src.findlayer.29.uid>
try uid.<obj.tag0.slot<args>>.tag0.tanitim=
try uid.<obj.tag0.slot<args>>.tag0.fiyat=
try uid.<obj.tag0.slot<args>>.tag0.pazarda=0
obj.tag0.slot<args> 0
trysrc <obj> dialogclose d_merchant_2
trysrc <obj> dialog d_merchant_2
obj.update
src.update

Arkadaşlar tekrar güncelledim.Yenisini kullanınız.

[defname renk]
renkrex <basefont color="#fff659">

[function merchant]
for 1 45
if (<src.tag0.merchantta> == 0)
try uid.<src.tag0.slot<dlocal._for>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal._for>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal._for>>.tag0.pazarda=0
src.tag0.slot<dlocal._for> 0
endif
endfor
src.ctag.page_view 0
src.ctag.sayfa 1
src.ctag0.izin 0
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_merchant_1]
0,0
nomove

obj <src.ctag0.sonkisi>
resizepic 20 20 5120 655 625
resizepic 30 30 3500 635 565
resizepic 30 600 3000 635 38
for 1 5
if (<dlocal._for> < 15)
local.for_ = <eval <local._for> + <src.ctag0.page_view>>
resizepic 50 <eval (<dlocal._for>*110)-63> 2620 90 90
resizepic 150 <eval (<dlocal._for>*110)-63> 3000 235 30
if !(<uid.<obj.tag0.slot<dlocal.for_>>.amount> == 0)
resizepic 150 <eval (<dlocal._for>*110)-30> 3000 235 57
resizepic 390 <eval (<dlocal._for>*110)-63> 3000 235 30
resizepic 390 <eval (<dlocal._for>*110)-30> 3000 235 30
tilepic 60 <eval (<dlocal._for>*110)-40> <serv.itemdef.<uid.<obj.tag0.slot<dlocal.for_>>.baseid>.id>.
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 <def.bfont_dred>Eşya <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>.amount> <uid.<obj.tag0.slot<dlocal.for_>>.name>.
dhtmlgump 155 <eval (<dlocal._for>*110)-25> 200 60 0 0 <def.bfont_dred>Eşya Tanıtımı <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>..tag0.tanitim>.
dhtmlgump 395 <eval (<dlocal._for>*110)-24> 200 20 0 0 <def.bfont_dred>Eşya Rengi <def.bfont_black>: <uid.<obj.tag0.slot<dlocal.for_>>.color>
dhtmlgump 395 <eval (<dlocal._for>*110)-57> 200 20 0 0 <def.bfont_dred>Eşya Fiyatı <def.bfont_black>: <def.renkrex><uid.<obj.tag0.slot<dlocal.for_>>.dtag0.fiyat><def.bfont_black> Gp.
dhtmlgump 430 <eval (<dlocal._for>*110)+7> 200 20 0 0 <def.bfont_black>Bu Eşyayı Satın Al.
button 395 <eval (<dlocal._for>*110)+5> 4023 4024 1 0 <dlocal.for_>
else
dhtmlgump 74 <eval (<dlocal._for>*110)-26> 200 200 0 0 <def.bfont_white> BOŞ
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 200 0 0 Bu Slot Boş.
endif
endif
endfor

if !(<src.ctag0.page_view> == 0)
dhtmlgump 50 610 50 20 0 0 <def.bfont_dred> Geri
button 35 610 56 55 1 0 98000
endif

dhtmlgump 320 610 100 20 0 0 <def.bfont_dred> Sayfa <src.dctag0.sayfa>

if !(<src.ctag0.page_view> == 45)
dhtmlgump 600 610 30 20 0 0 <def.bfont_dred> İleri
button 640 610 55 56 1 0 99000
endif

[dialog d_merchant_1 button]
on=98000
src.ctag.sayfa -=1
src.ctag0.page_view -=5
dialogclose d_merchant_1
dialog d_merchant_1
return 1

on=99000
src.ctag.sayfa +=1
src.ctag.spawntakip 0
src.ctag0.page_view +=5
dialogclose d_merchant_1
dialog d_merchant_1

on=1 5000
if (<uid.<uid.<src.ctag0.sonkisi>.tag0.slot<argn>>.amount> == 0)
src.sysmessage @0458,1,1 Üzgünüz Bu eşyayı sizden önce başkası almış...
return 1
endif

if (<src.gold> < <uid.<uid.<src.ctag0.sonkisi>.tag0.slot<argn>>.dtag0.fiyat>)
src.sysmessage @0458,1,1 Üzgünüz bu eşyayı alacak kadar paranız yok.
return 1
endif

itemal <argn>

[dialog d_tanimbelirle]
0,0
nomove

resizepic 20 20 5120 635 100
resizepic 30 30 3500 615 80
resizepic 55 75 3000 565 20
dhtmlgump 50 45 400 20 0 0 <def.bfont_dred> Lütfen <uid.<src.ctag0.sontik>.name> isimli eşyanın tanımını aşşağıya yazınız.
dtextentry 60 76 540 20 0 0
button 585 46 4023 4024 1 0 1

[dialog d_tanimbelirle button]
on 1
if (strlen(<argtxt[0]>) > 100)
src.sysmessage @07a1,1,1 En fazla 100 karakter kullanabilirsiniz.
return 1
endif

try uid.<src.ctag0.sontik>.tag.tanitim <argtxt[0]>
src.sysmessage @0458,1,1 <uid.<src.ctag0.sontik>.name> isimli eşyanın tanıtımını ; [<argtxt[0]>] olarak ayarladınız.
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_fiyatbelirle]
0,0
nomove

resizepic 20 20 5120 335 100
resizepic 30 30 3500 315 80
resizepic 55 75 3000 240 20
dhtmlgump 50 45 400 20 0 0 <def.bfont_dred> Lütfen <uid.<src.ctag0.sontik>.name> isimli eşyanın fiyatını belirleyiniz.
dtextentry 60 76 240 20 0 0
button 300 75 4023 4024 1 0 1

[dialog d_fiyatbelirle button]
on 1
if !(<isnum <argtxt[0]>>)
src.sysmessage @07a1,1,1 Sadece sayı girebilirsiniz.
return 1
endif

if (<argtxt[0]> > 1000000)
src.sysmessage @07a1,1,1 En fazla 1000000 altın fiyat koyabilirsiniz
return 1
endif

try uid.<src.ctag0.sontik>.tag.fiyat <eval <argtxt[0]>>
src.sysmessage @0458,1,1 <uid.<src.ctag0.sontik>.name> isimli eşyanın fiyatını ; [<eval <argtxt[0]>>] olarak ayarladınız.
src.dialogclose d_merchant_2
src.dialog d_merchant_2

[dialog d_merchant_2]
0,0
nomove
resizepic 20 20 5120 775 625
resizepic 30 30 3500 755 565
resizepic 30 600 3000 755 38
if (<src.tag0.merchantta> == 0)
resizepic 290 650 5120 230 58
resizepic 300 660 3000 210 38
dhtmlgump 375 672 100 20 0 0 <def.bfont_dred> Pazarı Kur
button 340 670 4023 4024 1 0 999999
else
resizepic 290 650 5120 230 58
resizepic 300 660 3000 210 38
dhtmlgump 375 672 100 20 0 0 <def.bfont_dred> Pazarı Kapat
button 340 670 4023 4024 1 0 899999
endif
for 1 5
if (<dlocal._for> < 15)
local.for_ = <eval <local._for> + <src.ctag0.page_view>>
resizepic 50 <eval (<dlocal._for>*110)-63> 2620 90 90
resizepic 150 <eval (<dlocal._for>*110)-63> 3000 235 30
if !(<uid.<src.tag0.slot<dlocal.for_>>.amount> == 0)
resizepic 150 <eval (<dlocal._for>*110)-30> 3000 235 57
resizepic 390 <eval (<dlocal._for>*110)-63> 3000 235 30
tilepic 60 <eval (<dlocal._for>*110)-40> <serv.itemdef.<uid.<src.tag0.slot<dlocal.for_>>.baseid>.id>.
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 <def.bfont_dred>Eşya <def.bfont_black>: <uid.<src.tag0.slot<dlocal.for_>>.amount> <uid.<src.tag0.slot<dlocal.for_>>.name>.
dhtmlgump 155 <eval (<dlocal._for>*110)-25> 200 60 0 0 <def.bfont_dred>Eşya Tanıtımı <def.bfont_black>: <uid.<src.tag0.slot<dlocal.for_>>.tag0.tanitim>.
dhtmlgump 395 <eval (<dlocal._for>*110)-57> 200 20 0 0 <def.bfont_dred>Eşya Fiyatı <def.bfont_black>: <def.renkrex><uid.<src.tag0.slot<dlocal.for_>>.dtag0.fiyat><def.bfont_black> Gp.
dhtmlgump 430 <eval (<dlocal._for>*110)-26> 200 20 0 0 <def.bfont_black>Bu Slottaki Eşyaya Tanım yap
button 395 <eval (<dlocal._for>*110)-28> 4023 4024 1 0 <eval <dlocal.for_>+1000000>
dhtmlgump 430 <eval (<dlocal._for>*110)+7> 200 20 0 0 <def.bfont_black>Bu Slottaki Eşyaya Fiyat ver
button 395 <eval (<dlocal._for>*110)+5> 4023 4024 1 0 <eval <dlocal.for_>+2000000>
dhtmlgump 670 <eval (<dlocal._for>*110)-12> 200 20 0 0 <def.bfont_black><dlocal.for_>. Eşyayı Çıkart
button 630 <eval (<dlocal._for>*110)-13> 4023 4024 1 0 <eval <dlocal.for_>+3000000>
resizepic 40 <eval (<dlocal._for>*110)-74> 3000 735 2
else
dhtmlgump 74 <eval (<dlocal._for>*110)-26> 50 20 0 0 <def.bfont_white> BOŞ
dhtmlgump 155 <eval (<dlocal._for>*110)-58> 200 20 0 0 Bu Slot Boş.
dhtmlgump 200 <eval (<dlocal._for>*110)-8> 200 20 0 0 <def.bfont_black>Bu Slota Eşya Ekle
button 155 <eval (<dlocal._for>*110)-10> 4023 4024 1 0 <dlocal.for_>
endif
endif
endfor

if !(<src.ctag0.page_view> == 0)
dhtmlgump 50 610 50 20 0 0 <def.bfont_dred> Geri
button 35 610 56 55 1 0 98000
endif

dhtmlgump 380 610 100 20 0 0 <def.bfont_dred> Sayfa <src.dctag0.sayfa>

if !(<src.ctag0.page_view> == 45)
dhtmlgump 720 610 30 20 0 0 <def.bfont_dred> İleri
button 760 610 55 56 1 0 99000
endif

[dialog d_merchant_2 button]
on=899999
src.pazariptal

on=999999
for 1 45
if (<src.dctag0.izin> == 0)
src.sysmessage @0458,1,1 Satışa başlamak için önce eşya koyunuz.
return 1
endif
endfor

src.kurak

on=98000
src.ctag.sayfa -=1
src.ctag0.page_view -=5
dialogclose d_merchant_2
dialog d_merchant_2
return 1

on=99000
src.ctag.sayfa +=1
src.ctag.spawntakip 0
src.ctag0.page_view +=5
dialogclose d_merchant_2
sdialog d_merchant_2

on=3000001 3999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
src.merchant
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
src.merchant
endif

local.argn <eval <argn>-3000000>
timerf 1,src.sysmessage @0458,1,1 <uid.<src.tag0.slot<dlocal.argn>>.name> İsimli eşyayı <src.dctag0.sayfa>. sayfadan ve <dlocal.argn>. sıradan çıkarttınız.
try uid.<src.tag0.slot<dlocal.argn>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal.argn>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal.argn>>.tag0.pazarda=0
src.tag0.slot<dlocal.argn> 0
src.dialogclose d_merchant_2
src.dialog d_merchant_2

on=1000001 1999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

local.argn <eval <argn>-1000000>
src.ctag0.sontik <src.tag0.slot<dlocal.argn>>
src.dialog d_tanimbelirle

on=2000001 2999999
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

local.argn <eval <argn>-2000000>
src.ctag0.sontik <src.tag0.slot<dlocal.argn>>
src.dialog d_fiyatbelirle

on=1 9998
if (<src.region.guarded>==0)
src.sysmessage @0458,1,1 Sadece Güvenli şehirlerde pazar kurabilirsiniz.
src.dialogclose d_merchant_2
endif

if (<src.hits> < <src.str>)
src.sysmessage @0458,1,1 Yaralıyken bu sistemden faydalanamazsınız.
src.dialogclose d_merchant_2
endif

targetf itemekle <argn>

[function itemekle]
if !(<argo.cont> == <src.findlayer(21).uid>)
src.sysmessage @0458,1,1 Sadece Çantanızdaki eşyaları pazara koyabilirsiniz.
return 1
endif

if (<argo.tag0.pazarda> == 0)
src.sysmessage @0485,1,1 <argo.name> İsimli eşya, <src.dctag0.sayfa>. sayfada ve <args>. sırada pazara konmuştur.
src.tag0.slot<args> <argo.uid>
argo.tag0.pazarda 1
src.dialogclose d_merchant_2
src.dialog d_merchant_2
src.ctag0.izin 1
else
src.sysmessage @0458,1,1 Bu Eşyayı zaten pazara koymuşsunuz.
endif

[function kurak]
forplayers 1
if (<tag0.merchantta> == 1) // üst üste kurmasınlar pazarı küfür yemeyek dimi
src.dialog d_merchant_2
src.sysmessage @0458,1,1 1 Kare Etrafınızda başka bir pazarcı bulunuyor lütfen kendinize başka biyer bulunuz.
return 1
endif
endfor

src.tag0.merchantta 1
src.sysmessage @0458,1,1 .pazariptal yazarak pazarınızı kapatabilirsiniz.
src.events +e_pazarda
serv.newitem i_bench_marble
new.p <src.p>
src.ctag0.koltuk <new.uid>
new.name @0458,1,1 Pazar Koltugu
src.say @0458,1,1 Gell!! Gell!! En Güzel Eşyalar bende!!!
serv.allclients sysmessage @0458,1,1 <src.name> : Gell!! Gell!! En Güzel Eşyalar bende!! [Yer : <src.region.name>]
SRC.FLAGS=<SRC.FLAGS>|020004
for 1 45
try uid.<src.tag0.slot<dlocal._for>>.tag.eskiattr <uid.<src.tag0.slot<dlocal._for>>.attr>
try uid.<src.tag0.slot<dlocal._for>>.attr attr_newbie|attr_static
try uid.<src.tag0.slot<dlocal._for>>.message @0458,1,1 Satışta.
endfor

[events e_pazarda]
on=@dclick
if (<tag0.merchantta> == 1) && !(<uid> == <src.uid>)
src.ctag0.sonkisi <uid>
src.ctag.page_view 0
src.ctag.sayfa 1
src.dialogclose d_merchant_1
src.dialog d_merchant_1
endif

on=@click
message @0458,1,1 [Pazar]

on=@logout
src.pazariptal

on=@gethit
pazariptal

on=@spellcast
pazariptal

on=@spelleffect
pazariptal

on=@skillstart
pazariptal

[function pazariptal]
src.events -e_pazarda
src.tag0.merchantta 0
try uid.<src.ctag0.koltuk>.remove
for 1 45
try uid.<src.tag0.slot<dlocal._for>>.attr <uid.<src.tag0.slot<dlocal._for>>.tag0.eskiattr>
try uid.<src.tag0.slot<dlocal._for>>.tag0.tanitim=
try uid.<src.tag0.slot<dlocal._for>>.tag0.fiyat=
try uid.<src.tag0.slot<dlocal._for>>.tag0.pazarda=0
src.tag0.slot<dlocal._for> 0
endfor
src.ctag.page_view 0
src.ctag.sayfa 1
src.ctag0.izin 0
src.flags <src.flags>&~04

[function itemal]
forplayers 2
if (<src.ctag0.sonkisi> == <uid>)
src.itemal1 <args>
return 1
endif
endfor

src.sysmessage @0458,1,1 Satıcıya yetişemiyorsunuz
return 1

[function itemal1]
obj <src.ctag0.sonkisi>
src.gold -=<uid.<obj.tag0.slot<args>>.dtag0.fiyat>
obj.gold +=<uid.<obj.tag0.slot<args>>.dtag0.fiyat>
src.sysmessage @0458,1,1 <uid.<uid.<src.ctag0.sonkisi>.tag0.slot<args>>.name> isimli eşya bankanıza koyuldu.
obj.sysmessage @0458,1,1 Pazarınızdaki <args>. Eşyanız satıldı.
try uid.<obj.tag0.slot<args>>.cont <src.findlayer.29.uid>
try uid.<obj.tag0.slot<args>>.tag0.tanitim=
try uid.<obj.tag0.slot<args>>.tag0.fiyat=
try uid.<obj.tag0.slot<args>>.tag0.pazarda=0
obj.tag0.slot<args> 0
trysrc <obj> dialogclose d_merchant_2
trysrc <obj> dialog d_merchant_2
obj.update
src.update