Hesabına erişemeyen eski üyeler Discord üzerinden yardım alabilir.
arkadaşlar bi ticaret scripti üzerinde ugasıyorum fakat yapamadım simdi player tuccardan bileti alıyo pack llamaya yüklüyo malı buraya kadar hersey güzel minoca gidicek pack llamayla gitti diyelim orda malı teslim alan vendor olcak .ticaretbitir diye yazsın player Malı teslim ediceginiz tuccarı secin gibisinden bi mesajla tuccara tıklasın parayı alsın istiyorum böyle bişey mümkünmüdür kodu veriyim

[events e_ticaret_tuccar] 
on=@click 
msgub Ticaret (<eval <findid.i_ticaret_bileti.tag.deger>*50>) gp


[events e_ticaret_llama] 
on=@click 
msgub Ticaret (<eval <memoryfindtype.memory_ipet.link.findid.i_ticaret_bileti.tag.deger>*50>) gp 


on=@death 
for 0 <eval <findlayer.21.rescount>-1> 
obj=<findlayer.21.findcont.<eval <local._for>>> 
obj.attr 0 
endfor 
try uid.<memoryfindtype.memory_ipet.link>.sysmessage @0845,1,1 Ticaret Llama'nız oldu ve eşyalarınız yere saçıldı! 
try uid.<tag.ticaret_bileti>.remove 
try uid.<memoryfindtype.memory_ipet.link>.findid.i_ticaret_zorluk.remove 
try uid.<memoryfindtype.memory_ipet.link>.events -e_ticaret_tuccar 

// itemler 

[itemdef i_ticaret_bileti] 
id i_map_rolled
name Ticaret Ticket 
type t_normal 

on=@create 
color 0481 

on=@click 
msgub (<eval <more2>> eşya, <eval <tag0.deger>*50> gp) 

on=@dclick 
if (<tag0.ticaret>==1) 
target 
src.sysmessage @666,1,1 Ticarete bitirmek için lütfen Ticaret Tüccarını seçiniz. (Britain Banka ici) 
return 1 
endif 

if (<more2>==100) 
target 
src.sysmessage @666,1,1 Ticarete başlamak için lütfen Ticaret Tüccarını seçiniz. (Minoc Banka ici) 
return 1 
endif 

if !(<more1>)
target
src.sysmessage @666,1,1 lütfen ticarette kullanmak istediğiniz Pack Llama'yı seçiniz. 
return 1 
endif 

if (<more2> < 100) 
target
src.sysmessage @666,1,1 lütfen ticaretini yapacağınız craft ürününü seçiniz. 
return 1 
endif 

On=@TargOn_Char 
if (<more2> == 100) && (<src.targ.id> == c_ticaret_tuccar_1) && !(<tag0.ticaret>)
src.targ.message @0845,1,1 Ticaretiniz başladı. 
src.events e_ticaret_tuccar 
src.sysmessage @666,1,1 Pack Llama ile beraber ölmeden Britain Bank'a ulaşınız! 
src.newitem i_ticaret_zorluk 
src.new.equip 
tag.ticaret 1 
return 1 
endif 


if (<more2> == 100) && (<src.targ.id> == c_ticaret_tuccar_2) && (<tag0.ticaret>) 
src.targ.message @0845,1,1 Süre dolmadan geldiniz.
src.sysmessage @666,1,1 Ticaretinizi başarı ile bitirdiniz.
newitem i_check_brnx 
new.more1 <eval <tag.deger>*50> 
new.more2 <src.uid> 
new.cont <src.uid> 
new.update 
src.events -e_ticaret_tuccar 
try uid.<tag.hayvan>.findlayer.21.remove 
try uid.<tag.hayvan>.events -e_ticaret_llama 
remove 
return 1 
endif 

if (<more1>) 
return 1 
endif 

if !(<src.targ.id> == c_llama_pack) 
src.sysmessage @0845,1,1 Bu bir Pack Llama değildir!
target
src.sysmessage @666,1,1 lütfen ticarette kullanmak istediğiniz Pack Llama'yı seçiniz. 
return 1 
endif 

if !(<src.targ.ismypet>) 
src.sysmessage @0845,1,1 Bu hayvan size ait değildir! 
target
src.sysmessage @666,1,1 lütfen ticarette kullanmak istediğiniz Pack Llama'yı seçiniz. 
return 1 
endif 

if !(<src.targ.findlayer.21>)
src.sysmessage @0845,1,1 Önce Llama'nın çantasını bir kez açınız!
target
src.sysmessage @666,1,1 lütfen ticarette kullanmak istediğiniz Pack Llama'yı seçiniz. 
return 1 
endif 

tag.hayvan <src.targ.uid> 
src.tag.ticaret_bileti <uid> 
src.tag.hayvan <src.targ.uid> 
src.targ.tag.ticaret_bileti <uid> 
src.targ.events e_ticaret_llama 
more1 1 
target
src.sysmessage @666,1,1 lütfen ticaretini yapacağınız craft ürününü seçiniz. 
return 1 


on=@targon_item 
if !(<more1>) 
src.sysmessage @0845,1,1 Bu bir Pack Llama değildir!
target
src.sysmessage @666,1,1  lütfen ticarette kullanmak istediğiniz Pack Llama'yı seçiniz. 
return 1 
endif 

if !(<more2> < 100) 
src.sysmessage @0845,1,1 Her ticaret sırasında maximum 100 craft ürün taşıyabilirsiniz!
return 1 
endif 
IF ( <SRC.TARG.TYPE> == t_food ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>)
RETURN 1 
ENDIF 

IF ( <SRC.TARG.TYPE> == t_gold ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.TYPE> == t_container ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.TYPE> == t_sign_gump ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>)
RETURN 1 
ENDIF 

IF ( <SRC.TARG.TYPE> == t_shield ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.DISPID> == i_shield_order ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.DISPID> == i_shield_chaos ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.DISPID> == i_cloth ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.DISPID> == i_cloth_bolt ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.ID> == i_bandage ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 
IF ( <SRC.TARG.BASEID> == i_jailcik ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 
IF ( <SRC.TARG.BASEID> == i_fishing_net_green ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.ID> == i_kindling ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.BASEID> == i_robe ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.TYPE> == t_key ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

IF ( <SRC.TARG.DISPID> == i_deed ) 
src.sysmessage @0845,1,1 Bu eşyanın ticaretini yapamazsınız! (<SRC.TARG.NAME>) 
RETURN 1 
ENDIF 

if (<uid.<tag.hayvan>.findlayer.21.count> > <more2>) 
src.sysmessage @0845,1,1 Llama'dan yabancı çıkartınız!
return 1 
endif 

if !(<src.targ.topobj.uid> == <src.uid>) 
src.sysmessage @0845,1,1 Eşyaların çantanızda olması gerekmektedir!
target
src.sysmessage @666,1,1 lütfen ticaretini yapacağınız craft ürününü seçiniz. 
return 1 
endif 

if (<eval <more2>+<src.targ.amount>> > 100) 
src.sysmessage @0845,1,1 Ticarette maksimum 100 eşya taşıyabilirsiniz!
return 1 
endif 

tag.deger <eval <tag0.deger>+(<src.targ.value>*<src.targ.amount>> 
more2 <eval 0<more2>+<src.targ.amount>> 
src.sysmessage @0845,1,1 Ticaretinizin degeri suanda <eval <tag.deger>*50> olmustur. 
src.targ.cont <tag.hayvan> 
src.targ.attr 08010 
target
src.sysmessage @666,1,1 Lutfen ticaretini yapacaginiz craft urununu seciniz. 
return 1 

[function ticaret_zorluk] 
if (<isevent.e_ticaret_tuccar>) 
newitem i_ticaret_zorluk 
new.equip 
new.timer (rand(60)) 
endif 

[itemdef i_ticaret_zorluk] 
id i_gold 
name Ticaret Zorluk 
type t_eq_script 

on=@create 
attr attr_decay 

on=@equip 
timer 60 

on=@unequip 
src.ticaret_zorluk 

on=@timer 
if (<distance.<cont.tag.hayvan>> > 50) 
cont.p <uid.<cont.tag.hayvan>.p> 
cont.update 
cont.sysmessage @0845,1,1 Ticaret yaparken hayvandan cok uzaklaşmayınız!
endif 

if !(<region.guarded>) 
if (<cont.isevent.e_ticaret_tuccar> 
newnpc c_ticaret_eskiya 
new.p <cont.p> 
new.update 
attr attr_decay 
remove 
endif 
else 
attr attr_decay 
remove 
endif 
endif 


// eskiyalar 
[chardef c_ticaret_eskiya] 
defname c_ticaret_eskiya 
name Eskiya 
id c_man 
can mt_walk|mt_run|mt_usehands|mt_equip 

Category Civilized 
Subsection Savages 
Description Savage Rider 

On=@Create 
npc brain_monster 
color 0835 
str {100 150} 
dex {100 120} 
int 15 
karma -5000 
fame {500 1000} 

fencing {60.0 70.0} 
anatomy {95.0 99.0} 
wrestling {20.0 45.0} 
tactics 100.0 
magicresistance 100.0 

item i_bone_arms 
item i_robe 
color 01 
item i_bone_leggings 
item i_mask_bear 
item i_spear 
item i_gold,{20 50} 
item i_bandage,5 
item i_mt_ostard_desert 
name Savage Ridgeback 
timer -1 
color 08a2 

On=@EnvironChange 
if (<findlayer(25)>) 
findlayer(25).more2 <uid> 
endif 


On=@Death 
if (<findlayer(25)>) 
findlayer(25).remove 
endif 

[chardef c_ticaret_tuccar_1] 
NAME=#NAMES_HUMANFEMALE the Merchant 
ID=C_MAN 
DESIRES=i_gold,e_notoriety 


TEVENTS=e_Human_Needs 
TEVENTS=e_Human_ConvInit 
TEVENTS=e_Human_Greet 
TEVENTS=e_Human_Space 
TEVENTS=e_Human_Refuse 
TEVENTS=e_Human_Environ 

ON=@Create 
NPC=brain_vendor 
COLOR=colors_skin 
STR={51 65} 
DEX={41 55} 
INT={31 45} 

WRESTLING={15.0 38.0} 
TACTICS={25.0 48.0} 

SPEECHCOLOR={ 0231 1 0481 1 018b 1 0515 1 07d1 1 060a 1 0400 1 } 
ITEMNEWBIE=i_lantern 
ITEMNEWBIE=i_hat_wide_brim 
ITEMNEWBIE=i_shirt_fancy 
COLOR 0482 
ITEMNEWBIE=i_pants_long 
COLOR 0256 
ITEMNEWBIE=i_cape 
COLOR 0256 
ITEMNEWBIE=i_boots_calf 
COLOR 0256 

ON=@CLICK 
MESSAGE @0845,1,1,1,1 [Ticaret Tuccari] 
MESSAGE @90 <NAME> 
return 1 




[chardef c_ticaret_tuccar_2] 
NAME=#NAMES_HUMANFEMALE the Merchant 
ID=C_MAN 
DESIRES=i_gold,e_notoriety 


TEVENTS=e_Human_Needs 
TEVENTS=e_Human_ConvInit 
TEVENTS=e_Human_Greet 
TEVENTS=e_Human_Space 
TEVENTS=e_Human_Refuse 
TEVENTS=e_Human_Environ 

ON=@Create 
NPC=brain_vendor 
COLOR=colors_skin 
STR={51 65} 
DEX={41 55} 
INT={31 45} 

WRESTLING={15.0 38.0} 
TACTICS={25.0 48.0} 

SPEECHCOLOR={ 0231 1 0481 1 018b 1 0515 1 07d1 1 060a 1 0400 1 } 
ITEMNEWBIE=i_lantern 
ITEMNEWBIE=i_hat_wide_brim 
ITEMNEWBIE=i_shirt_fancy 
COLOR 0482 
ITEMNEWBIE=i_pants_long 
COLOR 0256 
ITEMNEWBIE=i_cape 
COLOR 0256 
ITEMNEWBIE=i_boots_calf 
COLOR 0256 

ON=@CLICK 
MESSAGE @0845,1,1,1,1 [Ticaret Tuccari] 
MESSAGE @90 <NAME> 
return 1 

on=@dclick 
src.dialog d_ticaret_bilgi 
return 1 


[dialog d_ticaret_bilgi] 
60,40 

page 0 
resizepic 50 10 5120 310 320 // dis lacivert bg 
resizepic 60 20 3000 290 300 // ust beyaz bg 
text 90 30 <eval <var.fctn_color>> 0 // baslik seysi 
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_ticaret_bilgi text] 
Ticaret Sistemi 
<var.font3>>Ticaret sistemi ile eşyalarınızı 3 katı fiyatiına satabilirsiniz. Llama çantasına 100 adet item koyabilirsiniz. Tüm bu işlemleri çantanızdaki ticaret deed'i ile yapacaksınız. Ticaret sistemi bileti için 5.000 altın gerekiyor. Yolunuz açık olsun ...
Bilet (5k altın) 
Vazgeç
Çıkış 


[dialog d_ticaret_bilgi button] 
On=1 
if (<src.restest 5000 i_gold>) 
src.newitem i_ticaret_bileti 
src.act.bounce 
src.consume 5000 i_gold 
else 
src.sysmessage @0845,1,1 Çantanızda 5.000 altın bulunmamaktadır!
return 1 
endif 

on=2
return 1


[EOF]
[function ticaretbitir]
forchars 3
if (<src.isevent.e_ticareteventi>) && (<isevent.e_ticaret_llama)
src.sysmessage ticareti bitirdiniz
vs...
return 1
endif
endfor
ya benim istedigim bu degil ticaret bitir dediginde target cıkıp tuccarı secmesi sonra parayı alması
venue pvpde olan kervan sistemini yapmaya calısmıssın :D
oynamadım orda bilmiyorum ya bi el atıcak yokmu fazla bişey istemiyorum tuccar 2'den alcak bileti yuklucek llamaya gitcek tuccar 1in yanına .ticaretbitir yazıp tıklıcak parasını alcak bu kadar :S

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.