[PLEVEL 1]
killdusur
[FUNCTION killdusur]
src.dialog d_killdusur
[dialog d_killdusur]
0,0
resizepic 65 65 9300 320 200
resizepic 65 35 9300 320 30
dtext 110 40 020 <serv.name> Skill Düşürme Sistemi
dtext 100 80 040 Karakter İsmi :
dtext 220 80 40 <name>
dtext 113 100 040 Kill Sayiniz :
dtext 225 100 40 <kills>
button 100 135 55 56 1 0 1
button 100 160 55 56 1 0 2
button 100 185 55 56 1 0 3
button 100 210 55 56 1 0 4
button 100 235 55 56 1 0 5
dtext 125 135 100 1 Kill Düşür
dtext 125 160 100 5 Kill Düşür
dtext 125 185 100 10 Kill Düşür
dtext 125 210 100 25 Kill Düşür
dtext 125 235 100 50 Kill Düşür
[dialog d_killdusur button]
On=1
if (<kills> < 1)
src.sysmessage @08a,,1 Hata : Killiniz zaten 0.
else
if !(<restest 5000 i_gold>)
src.sysmessage @08a,,1 Hata : çantanızda 5.000 gp olmalı.
else
consume 5000 i_gold
kills (<kills> +(-1))
src.sysmessage @60,,1 Sistem : Killiniz <kills>
return 1
endif
endif
On=2
if (<kills> < 5)
src.sysmessage @08a,,1 Hata : Killiniz zaten 5'ten küçük.
else
if !(<restest 25000 i_gold>)
src.sysmessage @08a,,1 Hata : çantanızda 25.000 gp olmalı.
else
consume 25000 i_gold
kills (<kills> +(-5))
src.sysmessage @60,,1 Sistem : Killiniz <kills>
return 1
endif
endif
On=3
if (<kills> < 10)
src.sysmessage @08a,,1 Hata : Killiniz zaten 10'dan küçük.
else
if !(<restest 50000 i_gold>)
src.sysmessage @08a,,1 Hata : çantanızda 50.000 gp olmalı.
else
consume 50000 i_gold
kills (<kills> +(-10))
src.sysmessage @60,,1 Sistem : Killiniz <kills>
return 1
endif
endif
On=4
if (<kills> < 25)
src.sysmessage @08a,,1 Hata : Killiniz zaten 25'ten küçük.
else
if !(<restest 100000 i_gold>)
src.sysmessage @08a,,1 Hata : çantanızda 100.000 gp olmalı.
else
consume 100000 i_gold
kills (<kills> +(-25))
src.sysmessage @60,,1 Sistem : Killiniz <kills>
return 1
endif
endif
On=5
if (<kills> < 50)
src.sysmessage @08a,,1 Hata : Killiniz zaten 50'den küçük.
else
if !(<restest 200000 i_gold>)
src.sysmessage @08a,,1 Hata : çantanızda 200.000 gp olmalı.
else
consume 200000 i_gold
kills (<kills> +(-50))
src.sysmessage @60,,1 Sistem : Killiniz <kills>
return 1
endif
endif
src.dialog yerine, src.sdialog kullanmalısın. Bu şekilde 2. bir dialog açılmasını önleyebilirsin.
2. si
dtext yerine dhtmlgump kullanmalısın, böylelikle yazıları daha okunaklı yapabilirsin.
3. sü 10larca on=1,2,3,4,5 gibi bölmek yerine şu şekilde yapabilirsin;
- Butonları düşürülecek kill sayısına göre ayarlarsın, 1,5,10,15,20,50
-
On=1 50
if <src.kills> < <dargn>
src.sysmessage Zaten <dargn> killiniz yok.
return 1
elif !<src.restest <eval 5000*<dargn>> i_gold>
src.sysmessage <dargn> kill düşürmek için <eval 5000*<dargn>> altına ihtiyacınız var.
return 1
else
src.kills -=<dargn>
src.sysmessage <dargn> kill düşürdünüz.
src.consume <eval 5000*<dargn>> i_gold
return 1
endif
4. sü
defname ve array functionu ile dialogu daha kısa ve kolay hale getirebilirsin.
Başarılar dilerim. Oyum 6/10
sana puanım 9 kanka