[PLEVEL 1]
KILLDUSUR
[FUNCTION KILLDUSUR]
src.menu m_killdusur
[MENU m_killdusur]
< account> : <name> Kill Sayiniz : <kills>
On=0 1 kill dusur (5.000 gp)
if !(<restest 5000 i_gold>)
sysmessage 5000 gp cantanizda olmali..
else
if (<kills> < 1)
sysmessage Zaten Killiniz 0
else
consume 5000 i_gold
kills (<kills> +(-1))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 5 kill dusur (25.000 gp)
if !(<restest 25000 i_gold>)
sysmessage 25000 gp cantanizda olmali..
else
if (<kills> < 5)
sysmessage Zaten Killiniz 5'den dusuk
else
consume 25000 i_gold
kills (<kills> +(-5))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 10 kill dusur (50.000 gp)
if !(<restest 50000 i_gold>)
sysmessage 50000 gp cantanizda olmali..
else
if (<kills> < 10)
sysmessage Zaten Killiniz 10'dan dusuk
else
consume 50000 i_gold
kills (<kills> +(-10))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 25 kill dusur (100.000 gp)
if !(<restest 100000 i_gold>)
sysmessage 100000 gp cantanizda olmali..
else
if (<kills> < 25)
sysmessage Zaten Killiniz 50'den dusuk
else
consume 100000 i_gold
kills (<kills> +(-25))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 50 kill dusur (200.000 gp)
if !(<restest 200000 i_gold>)
sysmessage 200000 gp cantanizda olmali..
else
if (<kills> < 50)
sysmessage Zaten Killiniz 50'den dusuk
else
consume 200000 i_gold
kills (<kills> +(-50))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 100 kill dusur (400.000 gp)
if !(<restest 400000 i_gold>)
sysmessage 400.000 gp cantanizda olmali..
else
if (<kills> < 100)
sysmessage Zaten Killiniz 100'den dusuk
else
consume 400000 i_gold
kills (<kills> +(-100))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 250 kill dusur (800.000 gp)
if !(<restest 800000 i_gold>)
sysmessage 800.000 gp cantanizda olmali..
else
if (<kills> < 250)
sysmessage Zaten Killiniz 250'den dusuk
else
consume 800000 i_gold
kills (<kills> +(-250))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 500 kill dusur (1.000.000 gp)
if !(<restest 1000000 i_gold>)
sysmessage 1000.000 gp cantanizda olmali..
else
if (<kills> < 500)
sysmessage Zaten Killiniz 500'den dusuk
else
consume 1000000 i_gold
kills (<kills> +(-500))
sysmessage Killiniz <kills>
return 1
endif
endif
On=0 1000 kill dusur (1.500.000 gp)
if !(<restest 1500000 i_gold>)
sysmessage 1.500.000 gp cantanizda olmali..
else
if (<kills> < 1000)
sysmessage Zaten Killiniz 500'den dusuk
else
consume 1500000 i_gold
kills (<kills> +(-1000))
sysmessage Killiniz <kills>
return 1
endif
endif
[eof]
