Jump to content
Forumu Destekleyenlere Katılın ×
Paticik Forumları
2000 lerden beri faal olan, çok şukela bir paylaşım platformuyuz. Hoşgeldiniz.

Vendor BUg fixi


baltajr

Öne çıkan mesajlar

Su duvar atip hasila yazarak para kasilan bi bug varya o nasil fixleniyo acaba hasila bolumu soyle

On=hasila*
if ( == )
if (strmatch('','HASILA ?'))
sayu Kasamdaki parayi banka hesabiniza aktarmakta kullanacaginiz komuttur. Kasamdaki son 2500 altini aktarmaniz mumkun degildir.
else
if (> < 2501)
sayu Kasamda 2500 veya daha az altin var, su durumda size nakit veremem.
else
dialog d_pv_cash
endif
endif
endif
return 1
Link to comment
Sosyal ağlarda paylaş

// ----------------------------
// CHAR_HVENDOR.SCP - OYUNCU VENDOR SISTEMI (1 KASIM 2002) BRNX
// SON GUNCELLENME TARIHI: 12 KASIM 2002 - Bronx
// ----------------------------

VERSION=0.55

// *********************************
// HOUSING ILE ILISKILI VENDOR DEEDI
// *********************************

[ITEMDEF i_deed_pv]
name contract of employment
id i_deed
type t_script
value 55000

On=@Create
color 066f
attr 04

On=@DClick
if ()
if !(( == ) || ( == ) || ( == ) || ( == ) || ( == ) || ( == ) || ( == ) || ( == ) || ( == ))
src.sysmessage Sadece sahibi veya ortagi oldugunuz evlere vendor yerlestirebilirsiniz.
elseif ( == 04fffffff)
src.sysmessage Deed'i eve sabitleyip kullanmalisiniz.
elseif (() && () && ())
src.sysmessage Bir eve 3'ten fazla vendor yerlestiremezsiniz.
elseif (strmatch('.id>','c_pv'))
try var.vhomeowner .region.tag.owner>
try var.vhomeowner .name>
if !(strmatch('',''))
src.sysmessage isimli sahsin evinde zaten bir vendorunuz bulunuyor, yeni bir tane kurmak icin onu kovmalisiniz.
else
src.sysmessage Evinizde zaten bir vendorunuz bulunuyor.
endif
elseif ( == r_house_private)
src.sysmessage Lutfen evin halka acik oldugundan emin olunuz.
elseif !()
src.sysmessage Vendoru kurabilmek icin yaninizda 2500 altin olmali.
else
src.consume 2500 i_gold
src.newnpc c_pv
src.act.p


src.act.tag.p


src.act.tag.px
src.act.tag.py
src.act.tag.pz
src.act.findid.i_pv.link
src.act.tag.owner
src.act.findlayer(29).more1 2500
src.act.memorydel
src.act.newitem i_memory
src.act.act.attr 04
src.act.act.more1 04
src.act.act.more2
src.act.act.morep
src.act.act.color memory_ipet
src.act.act.timer -1
src.act.act.link
src.act.act.cont
src.act.flags &statf_pet
src.act.update
src.sysmessage Vendorunuz kuruldu, komutlar icin ' yardim' yaziniz.
src.tag.vendor
link.tag.locknumber - 1)>
link.tag.vendnumber + 1)>
if !()
link.tag.vendor1
elseif !()
link.tag.vendor2
else
link.tag.vendor3
endif
remove
endif
else
message Bu deed'i kullanabilmek icin evinizde olmalisiniz.
endif
return 1

// **************
// VENDOR CHARDEF
// **************

[chardef c_pv]
defname c_pv
name #names_humanmale the Player Vendor
id c_man
can mt_equip|mt_nonmover
hiredaywage 52
desires i_gold

tspeech pv_spch
tevents e_pv

On=@Create
str 9500
dex 25
int 25
color colors_skin
speechcolor 0481
food 990
npc 1

itemnewbie random_male_hair
color colors_hair
itemnewbie random_facial_hair
color match_hair
item i_robe
color colors_all
item i_torch_lit
morey -1
itemnewbie i_backpack
itemnewbie i_bankbox
color 0384
timer 900
attr 014
itemnewbie i_pv
itemnewbie i_pv_rem

// *******
// ITEMLAR
// *******

[itemdef i_pv_rem]
id i_memory
name vendor silici
type t_eq_script

On=@UnEquip
cont.memoryfindtype.memory_ipet.link.tag.vendor
if !( == 3)
cont.findid.i_pv.link.tag.vendnumber - 1)>
if ( == )
cont.findid.i_pv.link.tag.vendor1 0
elseif ( == )
cont.findid.i_pv.link.tag.vendor2 0
elseif ( == )
cont.findid.i_pv.link.tag.vendor3 0
endif
endif
cont.remove

On=@Timer
remove
return 1

[itemdef i_pv]
id i_memory
name vendor ana kontroller
type t_eq_script

On=@TargOn_Char
if ( == )
cont.findlayer(21).open
target
endif
return 1

On=@TargOn_Item
if ( == 1) // dinamik fiyatlandirma
if !( == )
cont.sayu , siz benim isverenim degilsiniz.
elseif !( == )
cont.sayu Bu esya cantamda degil.
elseif (strmatch('',''))
cont.sayu Bu satilabilecek bir esya degil.
elseif (> <= 0)
src.targ.price 0
cont.sayu : 'satilik degil' olarak isaretlendi.
else
src.targ.price >
more2 0
cont.sayu : altin.
endif
elseif ( == 2) // satis
if !( ==

Link to comment
Sosyal ağlarda paylaş

×
  • Yeni Oluştur...