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

   *   05-Mayıs-2001  *

   *   by Hyperion    *

   *    Binek Bilgi   *

   *                  *

   ******Editing*******

        *  56b  *      

        *Version*

        *********

[plevel 1]

binekbilgisi



[function binekbilgisi]

if (<src.hits> < 1)

src.sysmessage @38,,1 Oluyken Bu Komutu Kullanamazsiniz.

elseif (<distance> > 3)

src.sysmessage @38,,1 <src.targ.name>'e Yetisemiyorsun

else

newitem i_binekbilgileri

src.act.equip

endif





[dialog d_binekbilgileri]

50,50

nomove



resizepic 250 10 9250 250 350

resizepic 253 13 9250 245 345



text 290 40 1313 0

text 290 70 <eval 1152> 1

text 290 90 <eval 1152> 2

text 290 110 <eval 1152> 3

text 290 130 <eval 1152> 4

text 290 150 <eval 1152> 5

text 290 170 <eval 1152> 6

text 290 190 <eval 1152> 7

text 290 210 <eval 1152> 8

text 290 230 <eval 1152> 9

text 290 250 <eval 1152> 10

text 350 70 32 11

text 350 90 32 12

text 350 110 32 13

text 350 130 32 14

text 350 150 32 15

text 350 170 32 16

text 350 190 32 17

text 350 210 32 18

text 350 230 32 19

text 350 250 32 20



[dialog d_binekbilgileri text]

Binek Kontrol

Str:

Hits:

Dex:

Stam:

Int:

Mana:

Kill:

Fame:

Karma:

Food:

<src.targ.str>

<src.targ.hits>

<src.targ.dex>

<src.targ.stam>

<src.targ.int>

<src.targ.mana>

<src.targ.kills>

<src.targ.fame>

<src.targ.karma>

<src.targ.food>r





[ITEMDEF i_binekbilgileri]

Id i_handr_1

type t_eq_script

name res





ON=@equip

if (<src.tag.resurrect>==0)

target c Bilgilerini Ogrenmek Istediginiz Binegi Seciniz.

return 1

endif



ON=@TARGON_CHAR

if ((<src.targ.body> == c_man) || (<src.targ.body> == c_woman))

src.sysmessage @48,1,1 [<src.targ.name>] Bir Binek Degil.

return 1

else

src.dialog d_binekbilgileri

return 1

endif



ON=@TARGON_item

return 1



ON=@TARGON_groud

return 1