//
// Level System 
//           Created by Gr!M

[CHARDEF c_level_tester] 
ID=c_man
Name=Level Tester
TSPEECH=spk_human_prime
TEVENTS=e_level_monster

ON=@Create
NPC=brain_vendor
COLOR=colors_skin
STR=50
DEX={36 50}
INT={51 65}
karma=-9999
fame=0
TAG.LEVEL=5
TAG.EXP=<EVAL <TAG.LEVEL>*100>


[EVENTS e_level_monster]

ON=@CLICK
message @0480 [Level: <eval(<tag.level>)> Exp: <eval(<tag.exp>)>]
IF (<TAG.LEVEL> > <EVAL <SRC.TAG.LEVEL>*4>)
	MESSAGE=@46 <NAME> Invincible
ELSEIF (<TAG.LEVEL> > <EVAL <SRC.TAG.LEVEL>*2>)
	MESSAGE=@45 <NAME> Chopper
ELSEIF (<TAG.LEVEL> > <SRC.TAG.LEVEL>) 
	MESSAGE=@44 <NAME> Jockstrapper
ELSEIF (<TAG.LEVEL> < <EVAL <SRC.TAG.LEVEL>/4>) 
	MESSAGE=@68 <NAME> Inferior
ELSEIF (<TAG.LEVEL> < <EVAL <SRC.TAG.LEVEL>/2>) 
	MESSAGE=@70 <NAME> Effeminate
ELSEIF (<TAG.LEVEL> < <SRC.TAG.LEVEL>) 
	MESSAGE=@72 <NAME> Crumples
ELSE
	MESSAGE=<NAME>
ENDIF



RETURN 1


ON=@GETHIT
Sector.allclients SENDPACKET 0bf W11 W022 01 D<Uid> <argn1>
memoryfindtype.MEMORY_FIGHT.more1=<memoryfindtype.MEMORY_FIGHT.more1>+<ARGN1>

On=@Death	

var.killers=0
var.expdivide=0
FORCHARMEMORYTYPE MEMORY_FIGHT
	IF (<link.brain>!=0)
		remove
		Return 1
	ENDIF
	var.killers=<eval 1+<var.killers>>
        var.expdivide=<var.expdivide> + <more1>
serv.b <name> <more1>
ENDFOR

var.expdivide2=<tag.exp> / <var.expdivide>

FORCHARMEMORYTYPE MEMORY_FIGHT
	var.exps=<var.expdivide2> * <more1>
	link.say @0480,0 +<eval <var.exps>> Exp
	link.tag.exp=<link.tag.exp> + <var.exps>
	serv.b <LINK.NAME> gains <EVAL <var.exps>> now <EVAL <link.tag.exp>> more1 : <EVAL <more1>>
        link.f_level_check
ENDFOR




[FUNCTION f_level_check]
IF (<EVAL <TAG.EXP>> >= <EVAL <TAG.EXPNEED>>)
	TAG.LVL=<TAG.LVL> + 1
	//ALLSKILLS <EVAL <TAG.LVL>*10>
	SYSMESSAGE You have gained a Level <EVAL <TAG.LVL>> !
	TAG.EXP=<TAG.EXP> - <TAG.EXPNEED>
	TAG.EXPNEED=<TAG.EXPNEED> * 3
	if (<EVAL <TAG.EXP>> >= <EVAL <TAG.EXPNEED>>)
		f_level_check
	endif
ENDIF



[PLEVEL 1]
level

[FUNCTION level]
serv.b <name> <eval <tag.exp>> <eval <tag.expneed>>
//src.dialogclose d_level_system
//src.dialog d_level_system

[DIALOG d_level_system]
410,255
resizepic 0 0 3600 230 226
//RESIZEPIC 25 100 5100 <EVAL (<TAG.EXP>*200)/<TAG.EXPNEED>> 2
resizepic 15 189 83 <EVAL (<TAG.EXP>*200)/<TAG.EXPNEED>> 20
text 100 14 99 0
text 15 35 1 1
text 60 35 55 2
text 15 56 1 3 
text 60 56 55 4
text 15 77 1 5
text 60 77 55 6
text 15 98 1 7
text 60 98 55 8
text 15 119 1 9
text 60 119 55 10
text 105 165 55 11



[DIALOG d_level_system TEXT]
<NAME>
Class:
<TAG.CLASS>
Kills: 
<EVAL <TAG.KILLS>>
Rank: 
<EVAL <TAG.RANK>>
Level: 
<EVAL <TAG.LVL>>
Exp: 
<EVAL <TAG.EXP>> / <EVAL <TAG.EXPNEED>>
<EVAL (<TAG.EXP>*100)/<TAG.EXPNEED>>%




[DIALOG d_level_system BUTTON]