Biryere c_curtis sabitleyin , ona tıklayarak işe başlayabilirler...
// DIALOG //
[DIALOG d_grodt_main]
60,60
resizepic 0 0 3600 530 520
dtext 35 20 1100 GET RICH OR DIE TRYIN'
dtext 35 45 800 Welcome to the GRoDT system. The system is just a risk.
dtext 35 65 800 When you join the event , you cannot go to back for one hour.
dtext 35 95 100 Advantages :
dtext 35 115 800 - Monsters give X10 gold pieces.
dtext 35 135 800 - Monsters give X10 experience points.
dtext 35 155 800 - When you success , you will get a 80.0 skill box.
dtext 35 185 1100 Disadvantages :
dtext 35 205 800 - If you die , you will go jail for 100 jail ores.
dtext 35 225 800 - You will be a player killer for one hour during the event.
dtext 35 245 800 - You will be a player killer with 800 kills if you fail the event.
dtext 35 265 800 - You cannot open corpses and you cannot pick up gold coins.
dtext 45 285 800 ( You will get gold pieces automatically. )
dtext 35 305 800 - If players kill you , they will get 20000 experience points.
dtext 35 325 800 - If players kill you , they will get 10000 fame and 80.0 skill box.
dtext 35 345 800 - Other players will know where are you , no way to run.
dtext 35 365 800 - You must kill 200 monsters in the time.
dtext 35 385 800 - You will take your items of all ( with in your bankbox ) to your corpse
dtext 35 405 800 when you die.
if (<src.tag0.grodt.timer>>0)
dtext 70 435 100 YOU ARE ALREADY A GANGSTER.
ELSE
button 30 435 4005 4006 1 0 1
dtext 70 435 100 I WILL BE A GANGSTER FOR ONE HOUR.
ENDIF
IF (<src.tag0.grodtknow><1)
button 30 455 4005 4006 1 0 2
dtext 70 455 100 I WANT TO KNOW WHERE ARE THEY?
ELSE
button 30 455 4005 4006 1 0 3
dtext 70 455 100 I DO NOT WANT TO KNOW WHERE ARE THEY?
ENDIF
[DIALOG d_grodt_main BUTTON]
ON=1
src.events +e_grodt
src.tag0.oldfame=<src.fame>
src.tag0.oldkarma=<src.karma>
src.fame 0
src.karma 0
src.kills 800
src.tag0.grodt = 1
src.tag0.grodt.kill 200
src.tag0.grodt.timer 3600
src.newitem i_mem_grodt_timer
new.equip
src.timerf 1 , src.sysmessage @021,3,1 60 Minutes left.
src.go luna
serv.b @045,3,1 <src.name> started to become a gangster.
ON=2
IF (<src.tag0.grodtknow><1)
src.tag0.grodtknow=1
src.message @,3,1 Enabled.
else
src.message @,3,1 Already enabled.
endif
ON=3
IF (<src.tag0.grodtknow>>0)
src.tag0.grodtknow=0
src.message @,3,1 Disabled.
else
src.message @,3,1 Already disabled.
endif
// EVENTS //
[EVENTS e_grodt]
ON=@LOGOUT
src.findid.i_mem_grodt_timer.remove
ON=@LOGIN
src.newitem i_mem_grodt_timer
new.equip
new.timer 59
ON=@CLICK
message @021,3,1 [Gangster]
ON=@KILL
IF !(<src.isplayer>)
if (<argo.karma>>-1000)
src.message @,3,1 You need to find a more bad monster to kill.
else
if (<eval <src.tag0.grodt.kill>><1)
src.sysmessage @,3,1 You do not need to kill any monster. You should wait until the time.
else
src.tag0.grodt.kill -= 1
src.message @,3,1 <eval <src.tag0.grodt.kill>> monsters left to kill.
endif
endif
var.grodt.name="<src.name>"
var.grodt.region="<src.region.name>"
var.grodt.p="<src.p>"
serv.allclients knowgrodt
if (<eval <argo.str>*10><60000)
src.additem i_gold,<eval <argo.str>*10>
else
src.additem i_gold,60000
endif
if !(<src.IsInParty>)
local.exp = <eval (<argo.str>/3)*(<argo.str>/3)>
if (<argo.npc>) && !(<argo.flags>&statf_conjured) && !(<argo.tag0.summon>>0)
src.expgain <eval <local.exp>>
endif
else
if (<argo.npc>) && !(<argo.flags>&statf_conjured) && !(<argo.tag0.summon>>0)
FOR 0 <eval <src.party.members>-1>
local.exp = <eval (<argo.str>/2)*(<argo.str>/2)*<src.party.members>>
OBJ=<party.member.<local._for>.uid>
obj.expgain <eval <local.exp>>
endif
endif
endif
ON=@DEATH
src.tag0.grodt
src.tag0.grodt.timer
src.findid.i_mem_grodt_timer.remove
obj=<src.findid.i_bankbox>
obj.bounce
obj.type t_container
obj.attr 00
obj.id i_backpack
src.findlayer.29.id i_bankbox
src.findid.i_bankbox.attr 04
src.timerf 2 , src.message @,3,1 You lose in Get Rich or Die Tryin'.
src.timerf 3 , src.message @,3,1 You will be jail for 100 jail ores.
src.events -e_grodt
src.kills=800
src.fame=<src.tag0.oldfame>
src.karma=<src.tag0.oldkarma>
src.timerf 5 , src.go jail
src.timerf 6 , src.resurrect
src.timerf 7 , f_jail_grodt
ON=@ITEMPICKUP_GROUND
if (<act.baseid>=i_gold)
return 1
endif
ON=@ITEMPICKUP_PACK
if (<act.baseid>=i_gold)
return 1
endif
ON=@ITEMPICKUP_SELF
if (<act.baseid>=i_gold)
return 1
endif
ON=@ITEMDCLICK
if (<act.type>=t_corpse)
return 1
endif
[FUNCTION f_jail_grodt]
if (<src.account.jail><1)
src.newitem i_mem_dojail
new.equip
new.timer 1
new.tag0.timer 100
endif
[EVENTS e_tumplayerlaraver] // tum playerlara verin
ON=@KILL
if <argo.tag0.grodt.timer>>0)
src.expgain 20000
src.fame 10000
src.newitem i_scroll_80skill
new.tag.owner "<src.uid>"
new.bounce
endif
ON=@SKILLSTART
if ((<action> == id(skill_stealing)) || (<action> == skill_stealing))
IF <REF1.TAG0.GRODT.TIMER>>0
TARG.TOPOBJ.MESSAGE @,3,1 Try to kill me if you wanna it.
SRC.SYSMESSAGE @,3,1 You can't steal from motherfuckin' killers.
RETURN 1
ENDIF
Endif
ON=@SKILLSUCCESS
if ((<action> == id(skill_stealing)) || (<action> == skill_stealing))
IF <REF1.TAG0.GRODT.TIMER>>0
TARG.TOPOBJ.MESSAGE @,3,1 Try to kill me if you wanna it.
SRC.SYSMESSAGE @,3,1 You can't steal from motherfuckin' killers.
RETURN 1
ENDIF
Endif
// FUNCTIONS //
[FUNCTION knowgrodt]
if <tag0.grodtknow>>0
SYSMESSAGE @0481,3,1 <var.grodt.name> the gangster spotted at <var.grodt.region> , <var.grodt.p>.
endif
// ITEMS //
[ITEMDEF i_mem_grodt_timer]
ID=i_gold
TYPE=t_eq_script
NAME=delay
ON=@Create
ATTR=attr_invis|attr_decay
ON=@equip
TIMER=59
ON=@Timer
if <cont.tag0.grodt.timer>>0
cont.tag0.grodt.timer = <eval <cont.tag0.grodt.timer>-60>
cont.sysmessage @021,3,1 <eval <cont.tag0.grodt.timer>/60> minutes left.
if (<cont.tag0.grodt.kill>>0)
cont.message @,3,1 common you need to kill <eval <cont.tag0.grodt.kill>> monsters.
endif
var.grodt.name="<cont.name>"
var.grodt.region="<cont.region.name>"
var.grodt.p="<cont.p>"
serv.allclients knowgrodt
timer 59
return 1
else
if (<cont.tag0.grodt.kill>>0) || (<cont.tag0.grodt>>0)
cont.timerf 1 , tag0.grodt.kill
cont.timerf 1 , tag0.grodt
cont.timerf 1 , tag0.grodt.timer
cont.timerf 1 , findid.i_mem_grodt_timer.remove
cont.timerf 1 , events -e_grodt
cont.timerf 2 , message @021,3,1 You finished the time but you failed the event
cont.timerf 5 , message @021,3,1 beacuse you do not kill 100 monsters in the time.
cont.timerf 8 , message @,3,1 You will be jail for 100 jail ores.
cont.timerf 11 , go jail
cont.timerf 13 , f_jail_grodt
return 1
endif
SERV.B @0481 <cont.name> successed the GRoDT!!!! We congratulate.
cont.message @045,3,1 YOU SUCCESS THE GRoDT!!!!
cont.newitem i_scroll_80skill
new.tag.owner "<cont.uid>"
new.cont <cont.uid>
cont.events -e_grodt
cont.kills=<cont.tag0.oldkill>
cont.fame=<cont.tag0.oldfame>
cont.karma=<cont.tag0.oldkarma>
cont.timerf 1 , tag0.grodt.kill
cont.timerf 1 , tag0.grodt.timer
cont.timerf 1 , tag0.grodt
cont.go luna
remove
return 1
endif
[itemdef i_scroll_80skill]
ID=i_box_wood
NAME=Magical 80.0 Skill Box
TYPE=t_script
ON=@CREATE
ATTR=04
COLOR=020
ON=@DCLICK
IF !(strmatch("<tag.owner>","<src.uid>"))
message @,3,1 This is not yours.
return 1
endif
SRC.SDIALOG d_skill_80 1
SRC.CTAG.UID = <uid>
return 1
ON=@TOOLTIP
add_tooltip Owner : <uid.<tag.owner>.name>
[dialog d_skill_80]
0, 28
src.flags |= statf_freeze
resizepic 30 30 1000 740 400
dtext 245 60 1800 SELECT A SKILL TO GAIN TO 80.0
var.y 120
for 0 13
button 125 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 148 <eval <var.y>> 800 <serv.skill.<eval <local._for>>.name>
var.y +=20
endfor
var.y 120
for 14 27
button 235 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 258 <eval <var.y>> 800 <serv.skill.<eval <local._for>>.name>
var.y +=20
endfor
var.y 120
for 28 41
button 360 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 383 <eval <var.y>> 800 <serv.skill.<eval <local._for>>.name>
var.y +=20
endfor
var.y 120
for 42 54
button 480 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 503 <eval <var.y>> 800 <serv.skill.<eval <local._for>>.name>
var.y +=20
endfor
[dialog d_skill_80 button]
ON=0
src.flags &= ~statf_freeze
on 1 55
var.argn <argn> -1
if (<<serv.skill.<eval <var.argn>>.name>> > 79.9)
src.sysmessage @,3,1 You know this skill more than 80.0 , try another skill.
src.sdialog d_skill_80 1
return 1
else
src.flags &= ~statf_freeze
src.<serv.skill.<eval <var.argn>>.name> = 80.0
powerscroll_fx
uid.<src.ctag.uid>.remove
endif
// NPCS //
[CHARDEF c_curtis]
NAME=Marcus
ID=C_MAN
DAM=8,12
ARMOR=100
CAN=MT_EQUIP|MT_WALK|MT_MALE|MT_RUN
TSPEECH=spk_human_prime
TSPEECH=spk_human_default
CATEGORY=Civilized
SUBSECTION=Witches (Evil)
ON=@Create
TITLE=the grandmaster rapper
COLOR=0455
STR={3370 4410}
INT={180 200}
TACTICS={70.0 90.0}
WRESTLING={40.0 55.0}
FENCING={70.0 90.0}
NPC=BRAIN_HUMAN
ON=@NPCRestock
ITEM=i_doublet
ITEM=i_pants_long
ITEM=i_shoes_plain
COLOR=0481
ITEM=i_necklace_gold
COLOR=0481
ON=@CLICK
if rand(4)=1
say @0481 Get Rich or Die Tryin'
return 1
endif
message @012,3,1 Marcus the gangster rapper
RETURN 1
ON=@DCLICK
if (<def.nodie>>0)
message @,3,1 System is currently closed.
return 1
endif
if (<def.pvpserver>>0)
message @,3,1 System is currently closed.
return 1
endif
if (<def.grodt><1)
message @,3,1 System is currently closed.
return 1
endif
if (<src.hits><1)
message @0481 I do not need a dead man to work for me.
return 1
endif
if <eval <src.account.totalconnecttime>/60><10
message @0481 You must play 10 hours minimum.
return 1
endif
if (<src.tag0.level><10)
message @0481 You must be level 10 minimum.
return 1
endif
if (<src.restest 1 i_mem_young_player>)
message @0481 You cannot become a gangster when young.
return 1
endif
src.sdialog d_grodt_main 1
return 1