Ultima modifica:
Ciao a tutti, sentendo nostalgia dei vecchi cari script in .lua ho deciso di cimentarmi un pò..
Questo simpatico item sostituisce completamente le 96 pettinature che messe quà e la tra gli npg incasinano parecchio, insegnanti dottrina a parte.
In pratica selezionate la vostra razza, il tipo di pettinatura e il colore e come per magia avrete rinnovato il vostro look!
Qualche screen:
Dando per scontato che lo sappiate inserire ecco lo script :
DOWNLOAD ICONA.TGA
La query per il DB:
Quella per l'item_proto del client:
Item_list:
Item_desc:
ENJOY!
Prego a chiunque voglia postare lo script su qualsiasi altro forum di aggiungere la fonte,grazie.
Questo simpatico item sostituisce completamente le 96 pettinature che messe quà e la tra gli npg incasinano parecchio, insegnanti dottrina a parte.
In pratica selezionate la vostra razza, il tipo di pettinatura e il colore e come per magia avrete rinnovato il vostro look!

Qualche screen:
Dando per scontato che lo sappiate inserire ecco lo script :
Codice:
say_title("Forbici Magiche")
say_reward ( "Queste forbici dotate di anima propria possono" )
say_reward ( "cambiare il tuo look, sarai al passo " )
say_reward ( "con la moda odierna del tuo regno! " )
say_reward ( " " )
say ( "A che razza appartieni ragazzo?" )
say_reward ( " " )
local razza1 = select ("Guerriero","Ninja","Sura","Shamano","Ho cambiato idea..")
if razza1 == 1 then
say_reward ( "Ecco i look disponibili per Guerrieri/e" )
local opzioniw = select ("Moderni Femmina - Moderni Maschio","Bandana Femmina - Bandana maschio","Lunghi con frangia Femmina - Coda Maschio","Annulla")
if opzioniw == 1 then
local tipo1 =select ("Rossi","Biondi","Blu","Marroni","annulla")
if tipo1 == 1 then
pc . set_part ( PART_HAIR , 1001 )
elseif tipo1 == 2 then
pc . set_part ( PART_HAIR , 1002 )
elseif tipo1 == 3 then
pc . set_part ( PART_HAIR , 1003 )
elseif tipo1 == 4 then
pc . set_part ( PART_HAIR , 1004 )
elseif tipo1 == 5 then
return
end
elseif opzioniw == 2 then
local tipo2 = select ("Rossa","Marrone","Blu","Verde","annulla")
if tipo2 == 1 then
pc . set_part ( PART_HAIR , 1005 )
elseif tipo2 == 2 then
pc . set_part ( PART_HAIR , 1006 )
elseif tipo2 == 3 then
pc . set_part ( PART_HAIR , 1007 )
elseif tipo2 == 4 then
pc . set_part ( PART_HAIR , 1008 )
elseif tipo2 == 5 then
return
end
elseif opzioniw == 3 then
local tipo3 = select ("Neri","Rossi","Biondi","Verdi","annulla")
if tipo3 == 1 then
pc . set_part ( PART_HAIR , 1009 )
elseif tipo3 == 2 then
pc . set_part ( PART_HAIR , 1010 )
elseif tipo3 == 3 then
pc . set_part ( PART_HAIR , 1011 )
elseif tipo3 == 4 then
pc . set_part ( PART_HAIR , 1012 )
elseif tipo3 == 5 then
return
end
elseif opzioniw == 4 then
return
end
elseif razza1 == 2 then
say_reward ( "Ecco i look disponibili per Ninja" )
local opzionirr = select ("Coda Femmina - Coda Maschio","Fashion Femmina - Bandana Maschio","Corti con frangia Femmina - Corti Maschio","Annulla")
if opzionirr == 1 then
local tipo99 =select ("Castani","Verdi","Blu","Biondi","Annulla")
if tipo99 == 1 then
pc . set_part ( PART_HAIR , 2001 )
elseif tipo99 == 2 then
pc . set_part ( PART_HAIR , 2002 )
elseif tipo99 == 3 then
pc . set_part ( PART_HAIR , 2003 )
elseif tipo99 == 4 then
pc . set_part ( PART_HAIR , 2004 )
elseif tipo99 == 5 then
return
end
elseif opzionirr == 2 then
local tipo88 = select ("Rossi","Castani","Biondi","Viola","Annulla")
if tipo88 == 1 then
pc . set_part ( PART_HAIR , 2005 )
elseif tipo88 == 2 then
pc . set_part ( PART_HAIR , 2006 )
elseif tipo88 == 3 then
pc . set_part ( PART_HAIR , 2007 ) elseif tipo88 == 4 then
pc . set_part ( PART_HAIR , 2008 )
elseif tipo88 == 5 then
return
end
elseif opzionirr == 3 then
local tipo77 = select ("Rossi","Blu","Neri","Biondi","Annulla")
if tipo3 == 1 then
pc . set_part ( PART_HAIR , 2009 )
elseif tipo77 == 2 then
pc . set_part ( PART_HAIR , 2010 )
elseif tipo77 == 3 then
pc . set_part ( PART_HAIR , 2011 )
elseif tipo77 == 4 then
pc . set_part ( PART_HAIR , 2012 )
elseif tipo77 == 5 then
return
end
elseif opzionirr == 4 then
return
end
elseif razza1 == 3 then
say_reward ( "Ecco i look disponibili per Sura" )
local opzionijj = select ("Corti Femmina - Corti Maschio","Lunghi Femmina - Fashion Maschio","Treccia Femmina - Lunghi Maschio","Annulla")
if opzionijj == 1 then
local tipo56 =select ("Bianchi","Castani","Biondi","Verdi","Annulla")
if tipo99 == 1 then
pc . set_part ( PART_HAIR , 3001 )
elseif tipo56 == 2 then
pc . set_part ( PART_HAIR , 3002 )
elseif tipo56 == 3 then
pc . set_part ( PART_HAIR , 3003 )
elseif tipo56 == 4 then
pc . set_part ( PART_HAIR , 3004 )
elseif tipo56 == 5 then
return
end
elseif opzionijj == 2 then
local tipo34 = select ("Bianchi","Rossi","Neri","Viola","Annulla")
if tipo34 == 1 then
pc . set_part ( PART_HAIR , 3005 )
elseif tipo34 == 2 then
pc . set_part ( PART_HAIR , 3006 )
elseif tipo34 == 3 then
pc . set_part ( PART_HAIR , 3007 ) elseif tipo34 == 4 then
pc . set_part ( PART_HAIR , 3008 )
elseif tipo34 == 5 then
return
end
elseif opzionijj == 3 then
local tipo23 = select ("Bianchi","Blu","Neri","Castani","Annulla")
if tipo23 == 1 then
pc . set_part ( PART_HAIR , 3009 )
elseif tipo23 == 2 then
pc . set_part ( PART_HAIR , 3010 )
elseif tipo23 == 3 then
pc . set_part ( PART_HAIR , 3011 )
elseif tipo23 == 4 then
pc . set_part ( PART_HAIR , 3012 )
elseif tipo23 == 5 then
return
end
elseif opzionijj == 4 then
return
end
elseif razza1 == 4 then
say_reward ( "Ecco i look disponibili per Shamani/e" )
local opzioni = select ("Raccolti Femmina - Moderni Maschio","Eleganti Femmina - Lisci maschio","Lunghi scalati Femmina - Coda Maschio","Annulla")
if opzioni == 1 then
local tipo =select ("Castani","Neri","Blu","Bianchi","annulla")
if tipo == 1 then
pc . set_part ( PART_HAIR , 4001 )
elseif tipo == 2 then
pc . set_part ( PART_HAIR , 4002 )
elseif tipo == 3 then
pc . set_part ( PART_HAIR , 4003 )
elseif tipo == 4 then
pc . set_part ( PART_HAIR , 4004 )
elseif tipo == 5 then
return
end
elseif opzioni == 2 then
local tipo2 = select ("Castani","Neri","Biondi","Viola","annulla")
if tipo2 == 1 then
pc . set_part ( PART_HAIR , 4005 )
elseif tipo2 == 2 then
pc . set_part ( PART_HAIR , 4006 )
elseif tipo2 == 3 then
pc . set_part ( PART_HAIR , 4007 )
elseif tipo2 == 4 then
pc . set_part ( PART_HAIR , 4008 )
elseif tipo2 == 5 then
return
end
elseif opzioni == 3 then
local tipo3 = select ("Castani","Biondi","Viola","Rossi","annulla")
if tipo3 == 1 then
pc . set_part ( PART_HAIR , 4009 )
elseif tipo3 == 2 then
pc . set_part ( PART_HAIR , 4010 )
elseif tipo3 == 3 then
pc . set_part ( PART_HAIR , 4011 )
elseif tipo3 == 4 then
pc . set_part ( PART_HAIR , 4012 )
elseif tipo3 == 5 then
return
end
elseif opzioni == 4 then
return
end
elseif razza1 == 5 then
return
end
La query per il DB:
Codice:
INSERT INTO `item_proto` VALUES (6, "Forbici magiche", "Forbici magiche", 18, 0, 0, 1, 0, 20, 0, "", 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, -1, -1, -1, -1, -1, 0, 0, 0);
Codice:
<Item vnum="6" hashName="Forbici magiche" name="Forbici magiche" type="18" subtype="0" weight="0" size="1" antiflag="0" flag="20" wearflag="0" immuneflag="0" gold="1000" buy_price="500" limittype0="0" limitvalue0="0" limittype1="0" limitvalue1="0" applytype0="0" applyvalue0="0" applytype1="0" applyvalue1="0" applytype2="0" applyvalue2="0" value0="1" value1="0" value2="0" value3="0" value4="0" value5="0" socket0="0" socket1="64992" socket2="127" socket3="64976" socket4="21631" socket5="4855" refine_vnum="0" refine_set="0" magic_pct="0" specular="0" socket_pct="0" />
Item_list:
Codice:
6 ETC icon/item/forbici_magiche.tga
Item_desc:
Codice:
6 Forbici Magiche Dotate di anima propria, rinnovano il tuo look con qualche click.

Prego a chiunque voglia postare lo script su qualsiasi altro forum di aggiungere la fonte,grazie.

+1
Grazie a tutti