**************************************************************************
*Yardım Alarak Yazdığım Bir Check Scripti.                               *
*YAZAR:Tyrone                                                            *
*Tarih:26.Nisan.2011/ Salı Günü Saat 16:51'de Yazılmıştır                *
*Yapmanız Gerek Sadece Script Olarak Ekleyip .add c_cekci_abi Vendorunu *
*Kurmanız Olacaktır.Şuana Kadar Bug 1 Bug İle Karşılaştım Onunda Çözümü *
*nü Vereyim, Yere Deedı Attığınızzda Deed Silinmeyip Extra Para Geliyor *
*Çözümü Fix Scriptinize Şunu Yapıştırmanız Yeterli Olur *
**************************************************************************

if (<act.dispid>==i_bottle_black) || (<act.dispid>==i_bottle_green) || (<act.dispid>==i_bottle_orange) || (<act.dispid>==i_bottle_yellow) || (<act.dispid>==i_bottle_blue) || (<act.dispid>==i_bottle_red) || (<act.dispid>==i_deed)
if !(<act.topobj.uid> == <src.uid>)
act.fix Bunu kullanabilmeniz icin cantanizda olmasi gerekir.
return 1
endif
endif
*************************************************************************


[chardef c_cekci_abi]
id=c_man
Name=Checker
armor 999

on=@create
brain_vendor
color 083ea
str 100
int 100
dex 100

ITEMNEWBIE=i_staff_taming
COLOR=1170
ITEMNEWBIE=i_robe
COLOR=1170
ITEMNEWBIE=random_shoes
COLOR=1170
ITEMNEWBIE=i_apron_half
COLOR=1770
ITEMNEWBIE=i_hat_straw
COLOR=1170

ON=@Dclick
src.dialog d_cekcimenu
return 1

ON=@Click
message @38,,1 [<serv.name> Checker]
message @48,,1 Tyrone
return 1

[DIALOG d_cekcimenu]
0, 0
nomove
resizepic 250 100 9200 300 200
resizepic 260 110 9300 280 180
page 0
text 310 110 <eval 0481> 0


text 320 148 0455 1
button 300 150 55 56 1 0 1
text 320 168 0455 2
button 300 170 55 56 1 0 2
text 320 188 0455 3
button 300 190 55 56 1 0 3
text 320 207 0455 4
button 300 210 55 56 1 0 4
text 320 227 0455 5
button 300 230 55 56 1 0 5
text 320 248 0455 6
button 300 250 55 56 1 0 6

[DIALOG d_cekcimenu TEXT]
Shadow PvP Check Sistemi
250 K
500 K
1 M
5 M
10M
50M
[dialog d_cekcimenu button]


on=1
if !(<src.restest 250000 i_sp>)
src.sysmessage @38,,1 250'lik Cek Alabilmek Icin 250 K Sp Geremektedir.!
else
src.message @07a1,,1 Ceki Aldiniz..
src.consume 250000 i_sp
src.newitem i_250_cek
src.act.bounce
return 1

on=2
if !(<src.restest 500000 i_sp>)
src.sysmessage @38,,1 500'lik Cek Alabilmek Icin 500 K Sp Geremektedir.!
else
src.message @07a1,,1 Ceki Aldiniz..
src.consume 500000 i_sp
src.newitem i_500_cek
src.act.bounce
return 1

on=3
if !(<src.restest 1000000 i_sp>)
src.sysmessage @38,,1 1 M'lik Cek Alabilmek Icin 1M Sp Geremektedir.!
else
src.message @07a1,,1 Ceki Aldiniz..
src.consume 1000000 i_sp
src.newitem i_1m_cek
src.act.bounce
return 1

on=4
if !(<src.restest 5000000 i_sp>)
src.sysmessage @38,,1 5m'lik Cek Alabilmek Icin 5M Sp Geremektedir.!
else
src.message @07a1,,1 Ceki Aldiniz..
src.consume 5000000 i_sp
src.newitem i_5m_cek
src.act.bounce
return 1

on=5
if !(<src.restest 10000000 i_sp>)
src.sysmessage @38,,1 10m'lik Cek Alabilmek Icin 10M Sp Geremektedir.!
else
src.message @07a1,,1 Ceki Aldiniz..
src.consume 10000000 i_sp
src.newitem i_10m_cek
src.act.bounce
return 1

on=6
if !(<src.restest 50000000 i_sp>)
src.sysmessage @38,,1 50'lik Cek Alabilmek Icin 50 M Sp Geremektedir.!
else
src.message @07a1,,1 Ceki Aldiniz..
src.consume 50000000 i_sp
src.newitem i_50m_cek
src.act.bounce
return 1


[itemdef i_250_cek]
NAME=250 K Check
WEIGHT=0.1
ID=i_deed

ON=@Create
Color 017eb

ON=@Click
sysmessage @38,,1 250 Lik Checki Bozdurmak Icin Cift Tiklayiniz.
return 1

ON=@Dclick
src.250_cek
src.findid.i_250_cek.remove
src.sysmessage @48,,1 250 Lik Checki Bozdurdunuz Paraniz Cantanizdadir.
return 1


[FUNCTION 250_cek]
src.addsp 250000
return 1

[itemdef i_500_cek]
NAME=500 K Check
WEIGHT=0.1
ID=i_deed

ON=@Create
Color 017eb

ON=@Click
sysmessage @38,,1 500 Lik Checki Bozdurmak Icin Cift Tiklayiniz.
return 1

ON=@Dclick
src.500_cek
src.findid.i_500_cek.remove
src.sysmessage @48,,1 500 Lik Checki Bozdurdunuz Paraniz Cantanizdadir.
return 1

[FUNCTION 500_cek]
src.addsp 500000
return 1

[itemdef i_1m_cek]
NAME=1M Check
WEIGHT=0.1
ID=i_deed

ON=@Create
Color 017eb

ON=@Click
sysmessage @38,,1 1 M Lik Checki Bozdurmak Icin Cift Tiklayiniz.
return 1

ON=@Dclick
src.1m_cek
src.findid.i_1m_cek.remove
src.sysmessage @48,,1 1 M Lik Checki Bozdurdunuz Paraniz Cantanizdadir.
return 1

[FUNCTION 1m_cek]
src.addsp 1000000
return 1

[itemdef i_5m_cek]
NAME=5M Check
WEIGHT=0.1
ID=i_deed

ON=@Create
Color 017eb

ON=@Click
sysmessage @38,,1 5M Lik Checki Bozdurmak Icin Cift Tiklayiniz.
return 1

ON=@Dclick
src.5m_cek
src.findid.i_5m_cek.remove
src.sysmessage @48,,1 5M Lik Checki Bozdurdunuz Paraniz Cantanizdadir.
return 1

[FUNCTION 5m_cek]
src.addsp 5000000
return 1

[itemdef i_10m_cek]
NAME=10 M Check
WEIGHT=0.1
ID=i_deed

ON=@Create
Color 017eb

ON=@Click
sysmessage @38,,1 10M Lik Checki Bozdurmak Icin Cift Tiklayiniz.
return 1

ON=@Dclick
src.10m_cek
src.findid.i_10m_cek.remove
src.sysmessage @48,,1 10M Lik Checki Bozdurdunuz Paraniz Cantanizdadir.
return 1

[FUNCTION 10m_cek]
src.addsp 10000000
return 1

[itemdef i_50m_cek]
NAME=50M Check
WEIGHT=0.1
ID=i_deed

ON=@Create
Color 017eb

ON=@Click
sysmessage @38,,1 50M Lik Checki Bozdurmak Icin Cift Tiklayiniz.
return 1

ON=@Dclick
src.50m_cek
src.findid.i_50m_cek.remove
src.sysmessage @48,,1 50M Lik Checki Bozdurdunuz Paraniz Cantanizdadir.
return 1

[FUNCTION 50m_cek]
src.addsp 50000000
return 1


[FUNCTION addsp]
IF (<ARGS> > 0)
serv.newitem i_sp
IF (<ARGS> > 65000)
new.amount=65000
new.bounce
addsp <eval <ARGS>-<NEW.AMOUNT>>
ELSE
new.amount=<ARGS>
new.bounce
ENDIF
ENDIF

[EOF]