Ayuda Piedra Skills

Bueno hace un tiempito Ludgan, subió un skill que permitía bajar las skills, acorde al numero que el Player eligiera....


Ahora me gustaría hacer esta misma piedra, pero en inversa, osea para subir los Skills de dicha forma...

Pero no entiendo el funcionamiento de la misma, se me hace complicado :$ !!!!

Código:


//****************************************************************************
// Piedra de Skills
// Creado por Ludgan
//****************************************************************************
[ITEMDEF i_piedra_skills]
ID=i_grave_stone
TYPE=t_normal
NAME=Bajar Skills

ON=@DCLICK
IF (<SRC.DISTANCE> > 3)
SRC.SMSG Estas muy lejos
RETURN 1
ENDIF
SRC.SDIALOG d_skills
RETURN 1

[DIALOG d_skills]
0,0
page 0
resizepic 7 6 2600 598 530
dtextentrylimited 515 36 30 21 1935 2 1 0
dtextentrylimited 484 36 30 21 1935 1 3 000
dtext 510 36 1935 ..
FOR 0 51
IF (<SRC.<SERV.SKILL.<dlocal._for>.KEY>> > 30.0)
dtext <eval 70 + (150*<local.skills>)> <eval 114 + (20*<local.skill>)> 1152 <SERV.SKILL.<dlocal._for>.KEY>:<SRC.<SERV.SKILL.<dlocal._for>.KEY>>
button <eval 46 + (150*<local.skills>)> <eval 118 + (20*<local.skill>)> 1210 1209 1 0 <eval <dlocal._for> + 1>
LOCAL.SKILL +=1
IF (<LOCAL.SKILL>==19)
LOCAL.SKILLS +=1
LOCAL.SKILL=0
ENDIF
ENDIF
ENDFOR
dtext 291 63 1935 Escriba la cantidad de Skill que desea bajar,
dtext 291 80 1935 y presione el boton que se encuentra junto a el.

[DIALOG d_skills BUTTON]
ON=1,57
IF !(<ISNUM <ARGTXT[1]>>) || !(<ISNUM <ARGTXT[2]>>)
SMSG Solo numeros!
DIALOG d_skills
RETURN 1
ENDIF
IF (<ARGTXT[1]> < 0) || (<ARGTXT[2]> < 0)
SMSG Debe ser mayor o igual que 0!
DIALOG d_skills
RETURN 1
ENDIF
IF (<ARGTXT[1]>==0) && (<ARGTXT[2]>==0)
SMSG Escribe cuanto quieres bajar de skill!
DIALOG d_skills
RETURN 1
ENDIF
IF (<ARGTXT[1]> > 0)
IF (<STRSUB 0 1 <ARGTXT[1]>>==0)
IF (<STRSUB 1 1 <ARGTXT[1]>>==0)
LOCAL.SKILL=<EVAL (<STRSUB 2 1 <ARGTXT[1]>>*10) + <ARGTXT[2]>>
ELSE
LOCAL.SKILL=<EVAL (<STRSUB 1 2 <ARGTXT[1]>>*10) + <ARGTXT[2]>>
ENDIF
IF !(<RESTEST <eval (<LOCAL.SKILL>*3)> i_gold>)
SMSG Necesitas <eval (<LOCAL.SKILL>*3)> monedas de oro
RETURN 1
ENDIF
SRC.CONSUME <eval (<LOCAL.SKILL>*3)> i_gold
<SERV.SKILL.<EVAL  <ARGN> - 1>.NAME> = <EVAL <<SERV.SKILL.<EVAL  <ARGN> - 1>.NAME>> - <LOCAL.SKILL>>
DIALOG d_skills
RETURN 1
ENDIF
ENDIF
LOCAL.SKILL=<EVAL (<ARGTXT[1]>*10) + <ARGTXT[2]>>
IF !(<RESTEST <eval (<LOCAL.SKILL>*3)> i_gold>)
SMSG Necesitas <eval (<LOCAL.SKILL>*3)> monedas de oro
RETURN 1
ENDIF
SRC.CONSUME <eval (<LOCAL.SKILL>*3)> i_gold
<SERV.SKILL.<EVAL  <ARGN> - 1>.NAME> = <EVAL <<SERV.SKILL.<EVAL  <ARGN> - 1>.NAME>> - <LOCAL.SKILL>>
DIALOG d_skills
RETURN 1


Alguna idea de como "invertirlo" ???

O alguien me explica como hacer eso de "setiar" semi-automaticamente un valor ???


Ej:

Sale el gump, el player quiere tener 15 de dicha skill... Pone 15 y buala.... A su vez, se necesitaría una restricción para que no se pueda aumentar a mas de 55 la skill... Soy un poco "precario" a la hora de scriptear :$ !!!

No pido que me hagan el script, sino que me expliquen a como "armarlo"....