Begging

[Sirviper]

Taming scriptinden yola çıkarak bir tane begging sopası yapmaya çalıştım. İstediğim şu;

Begging skilli kontrol edicek. Örneğin NPC lerden dilenirken 70-80 arasına belli miktar para vericek. 80-90 arasına daha fazla. 70 ten küçük ise vermicek. Sadece skill gain alacak...

Scriptteki sıralamayı ve yazılışı bir türlü yapamadım

Script

If ( > 0)
Dorand 7
Cont.Sayua 0481,6,0,0 Lutfen yardim edin
Cont.Sayua 0481,6,0,0 Bos gecmeyin
Cont.Sayua 0481,6,0,0 Evde cocuklarim ac
Cont.Sayua 0481,6,0,0 Bizim hic paramiz olmadi
Cont.Sayua 0481,6,0,0 Fakire bir sadaka
Cont.Sayua 0481,6,0,0 Yardim edin
Cont.Sayua 0481,6,0,0 Tok acin halinden anlamaz
Enddo
dorand 3
cont.anim 32
cont.anim 33
cont.anim 34
enddo
More1 ( - 1)
Timer 2
Return 1
Else

If (Rand(2) == 1)


IF ( < 70.0)
Cont.sysmessage @54,,1 size yardim etmeyi kabul etti.
cont.begging_gain
return 1
endif

IF ()>70.0 && ()<80.0)
cont.newitem poor_gold_pile
Cont.sysmessage @54,,1 size yardim etmeyi kabul etti.
cont.begging_gain
return 1
endif

Else
Cont.sysmessage @38,,1 size yardim etmeyi reddetti.

Endif
remove
return 1
Endif

[Volfied]

kimse dusunmemis mi simdiye kadar, PC lere begging yapildiginda kisa sureli stun etseymis, adamin elinden bi yerinden tutarmis gibi.

[PrudenT]

e if'i kapattıktan sonra else desen neye yarar :)

[Sirviper]

Script

If (Rand(2) == 1)

cont.begging_gain
Cont.sysmessage @54,,1 size yardim etmeyi kabul etti.


Else
Cont.sysmessage @38,,1 size yardim etmeyi reddetti.

endif
remove
return 1
Endif

Bu şekilde çalışıyor. Ama dediğim gibi begging skilli işin içine girdiğinde timer remove olmuyor. Şu hali editleyebilirseniz cok güzel olur



if ( > 70.0) && ( < 80.0)
cont.newitem poor_gold_pile

Bu kısmı nerenin altına koyduysam olmadı.

[go2hell]

insanlar baymadımı yaw scriptingden :)