*****************************************************************************

*                               27.05.2011 - SALI                           *

* Yeni Olduğum İçin Bazı Scriptlerden Yardım Alarak Yazdım ve Paylaşmak     *

*İstedim :) Umarım Hoşunuza Gider :)                                        *

*****************************************************************************





[CHARDEF c_tommy]

DEFNAME=c_tommy

NAME=Tommy

CAN=MT_NONMOVER

ID=c_Man



On=@Click

message @38,,1 Gunluk Hediye

message @0790,,1 [Tommy]

return 1



ON=@Create

NPC=BRAIN_VENDOR

color=033ea

INVUL=1

STR=1000

DEX=1000

INT=1000



ITEM=i_robe

color 0455

ATTR=04

ITEM=i_shield_chaos

COLOR 0455

ATTR=04



On=@Dclick

src.sysmessage @98,,1 Gunluk Hediye Deed'inizi Bu Vendora Bozdurabilirsiniz.

return 1



ON=@Gethit

src.sysmessage @38,,1 Boyle Birsey Yapamazsın .!

return 1



[ITEMDEF i_deed_hediye]

ID=i_deed

NAME=Gunluk Hediyeniz.



ON=@Create

COLOR=07a1

ATTR=04



ON=@Click

message @38,,1 [ <serv.name> ]

message @48,,1 <name>

return 1



ON=@Dclick

IF ! <SRC.RESTEST 1 <SRC.TARG.BASEID>> 

src.sysmessage @38,,1 Itemin Cantanda Olmasi Lazim.

else

target @0790,,1 Gunluk Hediyenizi Bozdurmaniz Icin Tommy Ile Konusun.

return 1



on=@targon_char

if (strmatch('<src.targ.id>','c_tommy'))

dorand 10

var.gunlukhediye 1

var.gunlukhediye 2

var.gunlukhediye 3

var.gunlukhediye 4

var.gunlukhediye 5

var.gunlukhediye 6

var.gunlukhediye 7

var.gunlukhediye 8

var.gunlukhediye 9

var.gunlukhediye 10

enddo

else

src.sysmessage @07a1 Bu Kisi de kim ?? Sadece Tommy'den Hediyenizi Alabilirsiniz.

return 1

endif





if (<var.gunlukhediye>=1)

gunlukhediye1

return 1

endif



if (<var.gunlukhediye>=2)

gunlukhediye2

return 1

endif



if (<var.gunlukhediye>=3)

gunlukhediye3

return 1

endif



if (<var.gunlukhediye>=4)

gunlukhediye4

return 1

endif



if (<var.gunlukhediye>=5)

gunlukhediye5

return 1

endif



if (<var.gunlukhediye>=6)

gunlukhediye6

return 1

endif



if (<var.gunlukhediye>=7)

gunlukhediye7

return 1

endif



if (<var.gunlukhediye>=8)

gunlukhediye8

return 1

endif



if (<var.gunlukhediye>=9)

gunlukhediye9

return 1

endif



if (<var.gunlukhediye>=10)

gunlukhediye10

return 1

endif



[function gunlukhediye1]

src.newitem i_tas,1

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 1 Binek Ta$i Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye2]

src.newitem i_tas,1

src.act.bounce

src.newitem i_bilet,10000

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 1 Binek Ta$i 10K Bilet Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye3]

src.newitem i_tas,2

src.act.bounce

src.newitem i_bilet,15000

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 2 Binek Ta$i 15K Bilet Kazandin..

src.findid.i_deed_hediye.remove





[function gunlukhediye4]

src.newitem i_tas,2

src.act.bounce

src.newitem i_bilet,20000

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 2 Binek Ta$i 20K Bilet Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye5]

src.newitem i_tas,2

src.act.bounce

src.newitem i_bilet,25000

src.sysmessage @0481,1,1 Tebrikler, 2 Binek Ta$i 25K Bilet Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye6]

src.newitem i_tas,2

src.act.bounce

src.newitem i_bilet,25000

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 2 Binek Ta$i 25K Bilet Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye7]

src.newitem i_tas,3

src.act.bounce

src.newitem i_bilet,25000

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 3 Binek Ta$i 25K Bilet Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye8]

src.newitem i_tas,3

src.act.bounce

src.newitem i_bilet,30000

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 3 Binek Ta$i 30K Bilet Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye9]

src.newitem i_tas,5

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 5 Binek Ta$i Kazandin..

src.findid.i_deed_hediye.remove



[function gunlukhediye10]

src.newitem i_tas,7

src.act.bounce

src.sysmessage @0481,1,1 Tebrikler, 7 Binek Ta$i Kazandin..

src.findid.i_deed_hediye.remove



[ITEMDEF i_gunluk_hediye]

NAME=Gunluk Hediye

ID=i_grave_stone

WEIGHT=99999



ON=@Create

COLOR=07a1

tag.hediyecik 0



ON=@Click

message @38,,1 [ Gunluk Hediye ]

return 1



ON=@Dclick

if (<tag0.hediyecik> > 0) 

src.sysmessage @38,,1 Gunde 1 Defa Hediye Alabilirsiniz.

return 1

else

tag.hediyecik 1

timer 86400

src.newitem i_deed_hediye

src.act.bounce

src.sysmessage @38,,1 1 Gun Boyunca Bir Daha Hediye Alamiyacaksiniz.

return 1



on=@Timer

CLEARTAGS

src.sysmessage @0790,,1 Gunluk Hediyenizi Artik Alabilirsiniz.

return 1