Gm topuk yardım

arkadaslar yardımcı olun herseyi yapıyorum oluyor ama ödül kazanan ödül almıo yaızom cantaya bişi gelmio hemde hiç bişi geriye kalan hersey normal calısıo bi bakarsanız sevinirim

YArdım:

---

[plevel 1]
inlor

[function serverinlor]
serv.allclients nightsight 1

[function inlor]
src.nightsight 1



[events e_gmtopuk]
on=@click
message @38,,1 [Yarismaci]
message @38,,1 <name>
return 1

On=@ItemDClick
if !(<act.type> == t_container) || (<act.type> == t_potion)
src.sysmessage @37,,1 Bu Alanda Yasak
return 1
endif

On=@ItemEquip
src.sysmessage @37,,1 Bu Alanda Yasak
return 1

On=@SkillStart
src.sysmessage @37,,1 Bu Alanda Yasak
skill fail
return 1

On=@SpellCast
src.sysmessage @37,,1 Bu Alanda Yasak
src.f_fizzle
return 1

On=@Hittry
src.sysmessage @37,,1 Bu Alanda Yasak
return 1

On=@Gethit
if !(<src.npc>)
src.sysmessage @37,,1 Bu Alanda Yasak
return 1
endif

On=@Attack
sysmessage @37,,1 Bu Alanda Yasak
return 1

on=@death
forchars 30
if !(<src.uid>==<uid>)
if ((<hits> > 0) && (0<account.plevel> == 1))
src.sysmessage @37,,1 GM Topuk yarismasindan elendiniz...
serv.allclients sysmessage @95,,1 <var.sonolen> GM topukdan elendi
src.hits <src.str>
src.resurrect
src.go 5932,1987
var.sonolen <src.name>
src.atbeni
return 1
endif
endif
endfor
src.sysmessage @0481 Tebrikler Kazandiniz.
serv.allclients sysmessage @95,,1 [Auto Gm-Topuk Message]
serv.allclients sysmessage @68 Gm topuk yarismasini <name> kazandi, Tebrikler!
src.hits <src.str>
src.go safe
src.events -e_gmtopuk
src.events +e_safes
src.events +e_dropfixx
src.events +e_level
src.events -e_gmtopuk
src.vortidel
var.sonkazanan <src.uid>
dorand 5
src.newitem i_gold , 65000
src.act.bounce
return 1
enddo
return 1

[events e_gmtopuknpc]

[function stopmonster]
if (<isplayer>)
say @0790,,1 pl
endif
if (<isgm>)
say @0790,,1 gm
endif

[CHARDEF c_topuk]
id=c_vortex
NAME=Energy Vortex
CAN=MT_WALK|MT_FLY|MT_FIRE_IMMUNE|MT_RUN|MT_USEHANDS
ICON=i_FX_Blade_Spirit_1
DAM=5,8
ARMOR=10
BLOODCOLOR=colors_pink

ON=@Create
STR=300
DEX=1000
INT=1


TACTICS=500.0
WRESTLING=500.0
POISONING=600.0
FAME=500
KARMA=-100

[PLEVEL 7]
gmtopuk

[function gmtopuk]
serv.allclients sysmessage @68 [Auto Gm-Topuk Message]
serv.allclients sysmessage @95,,1 Gm topuk yarismasi yapilacaktir, katilmak isteyenler Safe'de bulunan gate'den girebilirler. Maximum 30 Kisidir.
serv.newitem i_topukg
new.p 5882,1919
return 1

[itemdef i_topukg]
type t_telepad
name Gm Topuk Yarismasi
id i_moongate_blue

ON=@create
attr 010
color 0799
tag.giris 0
tag.giricek 30
timer 200

ON=@Click
message @,,1 <eval <tag.giris>> kisi.
message @95,,1 <name>
message @95,,1 Gate Kalkmasina Son:<timer> Saniye
return 1

ON=@Dclick
src.sysmessage @58,,1 Ustunden Geciniz.
return 1

ON=@step
if (<eval <tag.giris>> < 30)
src.topukgir
src.events -e_safes
src.events -e_biletevent
src.events -e_dropfixx
src.events -e_level
serv.allclients sysmessage @68 [Auto Gm-Topuk Message]
serv.allclients sysmessage @95,,1 Gm topuk yarismasi katilimlari icin son <eval(<timer>/60)> dakika <eval <timer>> saniye, veya <eval <tag.giricek>> kisi..
serv.allclients sysmessage @95,,1 Gate Safede
tag.giris +=1
tag.giricek -=1
return 1
endif

if (<eval <tag.giris>> == 29)
src.sysmessage @95,,1 Son kisi olarak girdiniz, tebrikler..
serv.allclients timerf 1,stac
serv.allclients sysmessage @68 [Auto Gm-Topuk Message]
serv.allclients sysmessage @95,,1 Gm topuk yarismasina katilim sona erdi ve yarısma basladi, İyi oyunlar.
region.safe 0
src.topukgir2
tag.giris +=1
tag.giricek -=1
remove
return 1
endif


if (<eval <tag.giris>> < 30)
src.topukgir
serv.allclients sysmessage @68 [Auto Gm-Topuk Message]
serv.allclients sysmessage @95,,1 Gm topuk yarismasi katilimlari icin son <eval(<timer>/60)> dakika <eval <timer>> saniye, veya <eval <tag.giricek>> kisi..
serv.allclients sysmessage @95,,1 Gate Safede
tag.giris +=1
tag.giricek -=1
return 1
endif

if (<eval <tag.giris>> == 29)
src.sysmessage @95,,1 Son kisi olarak girdiniz, tebrikler..
serv.allclients timerf 1,stac
serv.allclients sysmessage @68 [Auto Gm-Topuk Message]
serv.allclients sysmessage @95,,1 Gm topuk yarismasina katilim sona erdi ve yarısma basladi, İyi oyunlar.
region.safe 0
src.topukgir2
tag.giris +=1
tag.giricek -=1
remove
return 1
endif

ON=@timer
serv.allclients sysmessage @48,,1 Gm topuk yarismasina katilim sona erdi ve yarısma basladi, Iyi oyunlar.
serv.allclients timerf 1,stac
remove
serv.newnpc c_topuk
new.p 5438,1246
return 1

[function topukgir]
src.binekolmasin
src.itemyolla
src.go 5431,1246
src.events +e_gmtopuk
src.tag.stonever 1
src.tag.hits 100
src.tag.s 1
src.stone 1
src.vortidel
src.sysmessage @95,,1 Yarismaya katildiniz, lutfen bekleyiniz..
return 1

[function stac]
src.stone 0
src.tag.s 0
src.tag.stonever 0
src.nightsight 1

[function topukgir2]
src.binekolmasin
src.itemyolla
src.go 5484,1105
src.tag.hits 100
src.tag.stonever 1
src.tag.s 1
src.stone 1
src.vortidel
return 1

[function vortidel]
forchars 50
if (<baseid> == c_topuk)
remove
return 1
endif
endfor

[FUNCTION itemyolla]
findlayer(1).cont=<findlayer.layer_pack.uid>
findlayer(2).cont=<findlayer.layer_pack.uid>
findlayer(3).cont=<findlayer.layer_pack.uid>
findlayer(4).cont=<findlayer.layer_pack.uid>
findlayer(5).cont=<findlayer.layer_pack.uid>
findlayer(6).cont=<findlayer.layer_pack.uid>
findlayer(7).cont=<findlayer.layer_pack.uid>
findlayer(8).cont=<findlayer.layer_pack.uid>
findlayer(10).cont=<findlayer.layer_pack.uid>
findlayer(12).cont=<findlayer.layer_pack.uid>
findlayer(13).cont=<findlayer.layer_pack.uid>
findlayer(14).cont=<findlayer.layer_pack.uid>
findlayer(17).cont=<findlayer.layer_pack.uid>
findlayer(18).cont=<findlayer.layer_pack.uid>
findlayer(19).cont=<findlayer.layer_pack.uid>
findlayer(20).cont=<findlayer.layer_pack.uid>
findlayer(22).cont=<findlayer.layer_pack.uid>
findlayer(23).cont=<findlayer.layer_pack.uid>
findlayer(24).cont=<findlayer.layer_pack.uid>
findlayer(layer_pack).color 0481
findlayer(layer_pack).attr 0
findlayer(layer_pack).cont <findlayer(layer_bankbox)>
findlayer(layer_pack).empty
findlayer(layer_pack).dclick
bank
update
src.sysmessage @0481,,1 Cantandaki itemler bankaya yerlestirildi.
src.newitem
src.act.bounce
src.act.dclick
return 1

[function binekolmasin]
if (<findlayer.25>)
tag.binekid <findlayer.25.more1>
tag.binekkarma <uid.<findlayer.25.more2>.karma>
tag.binekfame <uid.<findlayer.25.more2>.fame>
tag.binekfood <uid.<findlayer.25.more2>.food>
tag.binekcolor <uid.<findlayer.25.more2>.color>
tag.binekname <findlayer.25.name>

serv.newitem i_binek_hafiza
new.tag.name <tag.binekname>
new.tag.fame <tag.binekfame>
new.tag.karma <tag.binekkarma>
new.tag.food <tag.binekfood>
new.tag.binekid <tag.binekid>
new.color <tag.binekcolor>
new.cont <findlayer(29).uid>
new.more2 1
findlayer.25.remove
else
return 1
endif

[itemdef i_binek_hafiza]
id i_deed
type t_normal
weight 20.0
name Binek

on=@click
if (<more2>
message @260,,1 [Dogal ismi : <serv.chardef.<tag0.binekid>.name>]
message <name> - <tag.name>
return 1
else
message <name>
return 1
endif

on=@dclick
if (<more2>)
try src.newnpc <tag.binekid>
link <src.act.uid>
link.name <tag.name>
link.karma <tag.karma>
link.fame <tag.fame>
link.food <tag.food>
link.color <color>


link.memorydel <src.uid>
link.newitem i_memory
link.act.attr 04
link.act.more1 04
link.act.more2 <serv.time>
link.act.morep <link.p>
link.act.color memory_ipet
link.act.timer -1
link.act.link <src.uid>
link.act.cont <link.uid>
link.flags <link.flags>&statf_pet
link.update
link.anim 5
link.bark 3
remove
return 1
else
return1
endif


[function atbeni]
if (<src.kills> < 7)
src.events -e_gmtopuk
src.events -e_gmtopuk
src.events +e_safes
src.events +e_dropfixx
src.go safe
return 1
elseif (<src.kills> == 7)
src.events -e_gmtopuk
src.events -e_gmtopuk
src.events +e_safes
src.events +e_dropfixx
src.go safe
return 1
elseif (<src.kills> > 7)
src.events -e_gmtopuk
src.events -e_gmtopuk
src.events +e_safes
src.events +e_dropfixx
src.go safe
return 1
endif

[function totalgold]
RETURN <eval <rescount <def.cmoney>>+<findlayer.19.rescount <def.cmoney>>>

[FUNCTION consumegold]
IF (<TOTALGOLD> < <ARGN1>)
sysmessage .
RETURN 1
ENDIF
LOCAL.AMOUNT=<ARGN1>
WHILE (<LOCAL.AMOUNT>)
IF (0<FINDLAYER.21.FINDID.i_gold>)
LOCAL.GOLD=<FINDLAYER.21.FINDID.i_gold.amount>
IF (<EVAL <LOCAL.AMOUNT>-<LOCAL.GOLD>> < 0)
FINDLAYER.21.FINDID.i_gold.AMOUNT -= <LOCAL.AMOUNT>
LOCAL.AMOUNT=0
ELSE
FINDLAYER.21.FINDID.i_gold.remove
LOCAL.AMOUNT -= <LOCAL.GOLD>
ENDIF
ELIF (0<FINDLAYER.19.FINDID.i_gold>)
LOCAL.GOLD=<FINDLAYER.19.FINDID.i_gold.amount>
IF !(<EVAL <LOCAL.AMOUNT>-<LOCAL.GOLD>> < 0)
FINDLAYER.19.FINDID.i_gold.AMOUNT -= <LOCAL.AMOUNT>
LOCAL.AMOUNT=0
ELSE
FINDLAYER.19.FINDID.i_gold.remove
LOCAL.AMOUNT -= <LOCAL.GOLD>
ENDIF
ENDIF
ENDWHILE
UPDATE


[function ticketver]
newitem i_gold,7500
new.cont <findlayer.21>

[function bomberat]
if (<src.kills> < 7)
src.events -e_bombaci
src.events -e_bombaci
src.events +e_safes
src.events +e_dropfixx
src.go safe
return 1
elseif (<src.kills> == 7)
src.events -e_bombaci
src.events -e_bombaci
src.events +e_safes
src.events +e_dropfixx
src.go safe
return 1
elseif (<src.kills> > 7)
src.events -e_bombaci
src.events -e_bombaci
src.events +e_safes
src.events +e_dropfixx
src.go safe
return 1
endif

Evet ya hersey sorunsuz kazanıyor ediyor giriyor çıkıyor sadece cantaya ödül düsmesini istiyorum anlayamaıdm giitti

baktım baktım 5 kişi kodyum hepsi öldü son ölen kaznaıyor yellde hersey geçio hepsinin cantaya bakıyorum bos zaten delircem:S ödüll vermeiyorum cantasına