//Made by Rastrero for everyone
//love 4 all.
//namesystem is a mod of a "name changer scroll.." or something like.
//dont remember more.
[DIALOG d_menu_personaje_1]
0,0
page 0
noclose
nomove
gumppic 389 12 9
resizepic 258 99 9270 400 470
if (<src.body>==c_woman)
gumppic 451 96 1888 <eval <src.color>>
else
gumppic 451 96 1889 <eval <src.color>>
endif
resizepic 287 399 3000 226 124
resizepic 346 192 3000 106 179
if (<src.body>==c_man)
gumppic 451 102 1848 <eval <src.findlayer.4.color>>
dtext 381 271 0 Barba
button 355 274 2223 2223 1 0 3
button 425 274 2224 2224 1 0 4
else
gumppic 451 102 1892 <eval <src.findlayer.23.color>>
endif
if (<src.body>==c_woman)
//gumppic 450 94 1842 <eval <src.findlayer.11.color>-1>
else
//gumppic 450 94 1846 <eval <src.findlayer.11.color>-1>
endif
dtext 386 231 0 Pelo
button 355 234 2223 2223 1 0 1
button 425 234 2224 2224 1 0 2
dtext 382 291 0 Torso
button 355 294 2223 2223 1 0 5
button 425 294 2224 2224 1 0 6
if (<src.body>==c_man)
gumppic 450 97 1849 <eval <src.findlayer.5.color>>
else
gumppic 450 97 1812 <eval <src.findlayer.5.color>>
endif
if (<src.body>==c_man)
gumppic 451 97 1890
endif
dtext 376 311 0 Piernas
button 355 314 2223 2223 1 0 7
button 425 314 2224 2224 1 0 8
button 355 214 2223 2223 1 0 9
dtext 384 211 0 Sexo
button 425 214 2224 2224 1 0 10
button 355 254 2223 2223 1 0 11
dtext 384 251 0 Color
button 425 254 2224 2224 1 0 12
button 355 334 2223 2223 1 0 13
button 425 334 2224 2224 1 0 14
dtext 386 331 0 Piel
dtext 332 425 0 Fuerza
dtext 325 445 0 Destreza
dtext 321 465 0 Inteligencia
button 293 430 2223 2223 1 0 15
button 402 430 2224 2224 1 0 16
button 293 450 2223 2223 1 0 17
button 402 450 2224 2224 1 0 18
button 293 470 2223 2223 1 0 19
button 402 470 2224 2224 1 0 20
dtext 432 425 0 <src.str>
dtext 431 445 0 <src.dex>
dtext 431 465 0 <src.int>
button 566 489 247 248 1 0 21
local.totalstat=<src.str>+<src.dex>+<src.int>
dtext 296 496 0 Total: <eval <local.totalstat>> / 200
dtext 569 510 1152 Finalizar
dtext 361 193 0 APARIENCIA
dtext 352 404 0 CAPACIDADES
dtext 380 115 1152 CREADOR DE PERSONAJE
//HAIR MATCHES
if (<tag0.hair1>==i_hair_short)
gumppic 451 94 1875 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_long)
gumppic 451 95 1876 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_buns)
gumppic 451 95 1873 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_afro)
gumppic 451 95 1873 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_ponytail)
gumppic 451 95 1845 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_2_pigtails)
gumppic 451 95 1870 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_krisna)
gumppic 451 95 1874 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_pageboy)
gumppic 451 95 1871 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_mohawk)
gumppic 451 95 1877 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_LF)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_short1)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_ML)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_mullet)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_flower)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_long2)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_long3)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_braid)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_long4)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
elif (<src.findlayer.11.baseid>==i_hair_elven_spike)
gumppic 451 95 1842 <eval <src.findlayer.11.color>-1>
endif
if (<src.findlayer.16.baseid>==i_beard_goatee))
gumppic 451 96 1881 <eval <src.findlayer.16.color>-1>
elif (<src.findlayer.16.baseid>==i_beard_long)
gumppic 451 96 1882 <eval <src.findlayer.16.color>-1>
elif (<src.findlayer.16.baseid>==i_beard_mustache)
gumppic 451 96 1884 <eval <src.findlayer.16.color>-1>
elif (<src.findlayer.16.baseid>==i_beard_short)
gumppic 451 96 1885 <eval <src.findlayer.16.color>-1>
elif (<src.findlayer.16.baseid>==i_beard_short_med)
gumppic 451 96 1886 <eval <src.findlayer.16.color>-1>
elif (<src.findlayer.16.baseid>==i_beard_vandyke)
gumppic 451 96 1887 <eval <src.findlayer.16.color>-1>
elif (<src.findlayer.16.baseid>==i_beard_long_med)
gumppic 451 96 1883 <eval <src.findlayer.16.color>-1>
endif
dtext 281 157 1152 NOMBRE:
if !(<tag0.nombre>)
resizepic 344 150 3000 202 33
dtextentry 350 157 187 20 0 0
else
resizepic 344 150 3000 202 33
dtext 350 157 0 <name>
else
endif
src.resend
[DIALOG d_menu_personaje_1 button]
//ON=0
ON=1
src.findlayer.11.remove
src.sdialog d_menu_personaje_1
on=2
if (<src.body>==c_man)
serv.newitem=random_male_hair
else
serv.newitem=random_female_hair
endif
new.color=colors_hair
src.findlayer.11.remove
src.equip=<new>
src.sdialog d_menu_personaje_1
ON=3
src.findlayer.16.remove
src.sdialog d_menu_personaje_1
ON=4
serv.newitem=random_facial_hair
new.color=<src.findlayer.11.color>
src.findlayer.16.remove
src.equip=<new>
src.sdialog d_menu_personaje_1
ON=5
if (<src.findlayer.5.color><=6)
src.findlayer.5.color=91
endif
src.findlayer.5.color -=5
src.sdialog d_menu_personaje_1
ON=6
if (<src.findlayer.5.color>>=91)
src.findlayer.5.color=2
else
src.findlayer.5.color +=5
endif
src.sdialog d_menu_personaje_1
ON=7
if (<src.body>==c_man)
if (<src.findlayer.4.color><=4)
src.findlayer.4.color=91
endif
src.findlayer.4.color -=3
else
if (<src.findlayer.23.color><=4)
src.findlayer.23.color=91
endif
src.findlayer.23.color -=3
endif
src.sdialog d_menu_personaje_1
ON=8
if (<src.body>==c_man)
if (<src.findlayer.4.color>>=91)
src.findlayer.4.color=2
else
src.findlayer.4.color +=5
endif
else
if (<src.findlayer.23.color>>=91)
src.findlayer.23.color=2
else
src.findlayer.23.color +=5
endif
endif
src.sdialog d_menu_personaje_1
ON=9 10
if (<src.body>==c_man)
src.body=c_woman
src.obody=c_woman
serv.newitem=random_female_hair
new.color=<src.findlayer.11.color>
src.findlayer.11.remove
src.equip=<new>
serv.newitem=i_skirt_long
new.color=<src.findlayer.4.color>
src.findlayer.16.remove
src.findlayer.4.remove
src.equip=<new>
else
src.body=c_man
src.obody=c_man
serv.newitem=random_male_hair
new.color=<src.findlayer.11.color>
src.findlayer.11.remove
src.equip=<new>
serv.newitem=random_facial_hair
new.color=<src.findlayer.11.color>
src.equip=<new>
serv.newitem=i_pants_short
new.color=<src.findlayer.23.color>
src.findlayer.23.remove
src.equip=<new>
endif
src.sdialog d_menu_personaje_1
on=11
if (<src.findlayer.11.color><=1102) || (<src.findlayer.16.color><=1102)
src.findlayer.11.color=1148
src.findlayer.16.color=1148
else
src.findlayer.11.color -=1
src.findlayer.16.color -=1
endif
src.sdialog d_menu_personaje_1
ON=12
if (<src.findlayer.11.color>>=1148) || (<src.findlayer.16.color>>=1148)
src.findlayer.11.color=1102
src.findlayer.16.color=1102
else
src.findlayer.11.color +=1
src.findlayer.16.color +=1
endif
src.sdialog d_menu_personaje_1
ON=13
if (<src.color><=1002)
src.color=1057
else
src.color -=1
endif
src.sdialog d_menu_personaje_1
ON=14
if <src.color>>=1057
src.color=1002
else
src.color +=1
endif
src.sdialog d_menu_personaje_1
ON=15
if (<src.str><=50)
src.sysmessage Minimo de fuerza alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
str -=1
src.sdialog d_menu_personaje_1
ON=16
local.ii=<dex>+<str>+<int>
if (<src.str>>=110)
src.sysmessage Maximo de fuerza alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
if (<local.ii>>=200)
src.sysmessage Maximo total alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
src.str +=5
src.sdialog d_menu_personaje_1
ON=17
if (<src.dex><=10)
src.sysmessage Minimo de destreza alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
src.dex -=5
src.sdialog d_menu_personaje_1
ON=18
local.ii=<dex>+<str>+<int>
if (<src.dex>>=110)
src.sysmessage Maximo de destreza alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
if (<local.ii>>=200)
src.sysmessage Maximo total alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
src.dex +=5
src.sdialog d_menu_personaje_1
ON=19
if (<src.int><=10)
src.sysmessage Minimo de inteligencia alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
src.int -=5
src.sdialog d_menu_personaje_1
ON=20
local.ii=<dex>+<str>+<int>
if (<src.int>>=80)
src.sysmessage Maximo de inteligencia alcanzado.
src.sdialog d_menu_personaje_1
return 1
endif
if (<local.ii>>=200)
src.sdialog d_menu_personaje_1
src.sysmessage Maximo total alcanzado.
return 1
endif
src.int +=5
src.sdialog d_menu_personaje_1
ON=21
local.ii=<dex>+<str>+<int>
if !(<tag0.nombre>)
if STRMATCH("[a-z]*","<argtxt[0]>") //strregex(^[a-z]+$,<argtxt[0]>) || strregex(^[A-Z]+$,<argtxt[0]>)
IF (STRMATCH( *=*, <ARGTXT[0]> ))
src.dialog d_menu_personaje_1
RETURN 1
elif !(STRCMPI("","<ARGTXT[0]>")) // thanks to Acratia for
src.sysmessage Es necesario que pongas un nombre
src.dialog d_menu_personaje_1
return 1
elif (STRMATCH(*eof*,<ARGTXT[0]> ))
src.sysmessage no puedes utilizar eof en el nombre.
src.dialog d_menu_personaje_1
return 1
elif (STRMATCH(*\n*,<ARGTXT[0]> ))
src.sysmessage No puedes usar \ en el nombre.
src.dialog d_menu_personaje_1
return 1
elif (STRMATCH(*plevel*,<ARGTXT[0]> ))
src.sysmessage No puedes utilizar plevel en el nombre.
src.dialog d_menu_personaje_1
return 1
elif (STRLEN(<ARGTXT[0]> ) > 16))
src.sysmessage El nombre no puede contener mas de 16 caracteres.
src.dialog d_menu_personaje_1
return 1
elif (STRLEN(<ARGTXT[0]> ) < 4))
src.sysmessage El nombre no puede contener menos de 4 caracteres.
src.dialog d_menu_personaje_1
return 1
endif
local.length=<argtxt[0]>
if (<eval strlen(<local.length>)> < 3) || (<eval strlen(<local.length>)> > 16)
src.sysmessage Nombre Invalido
src.sysmessage El nombre debe tener de 3 a 16 letras.
src.sdialog d_menu_personaje_1
return 1
else
//serv.LIST.player_names.ADD <argtxt[0]>
src.name <argtxt[0]>
src.sysmessage #@Tu nombre ahora es <src.name>
tag0.nombre=1
endif
else
src.sysmessage Nombre Invalido
src.sysmessage Escribe solo con letras (a - z)
src.dialog d_menu_personaje_1
return 1
endif
endif
if (<local.ii>!=200)
src.sysmessage @,,1 Asignate minimo 200 puntos en total, en fuerza, inteligencia y destreza.
src.sdialog d_menu_personaje_1
else
src.sdialog d_siguiente_paso
endif