Files

47 lines
1.3 KiB
Plaintext
Executable File

say_title ( gameforge . hair . _011_sayTitle )
say ( gameforge . hair . _012_say )
say ( "" )
local vnum = input_number ( )
say_item_vnum ( vnum )
wait ( )
if hair . My_hair_item ( vnum , 1 ) == nil and hair . My_hair_item ( vnum - 1000 , 1 ) then
say ( "VNUM : " .. vnum .. gameforge . hair . _013_say )
return
end
local race = pc . get_race ( ) + 1
local start_index = hair . get_start_index_by_race ( race )
if vnum > 74000 then
for i = 0 , 20 begin
if start_index + i == vnum then
pc . set_part ( PART_HAIR , hair . My_hair_item ( vnum , 1 ) )
affect . remove_hair ( )
affect . add_hair ( hair . My_hair_item ( vnum , 2 ) , hair . My_hair_item ( vnum , 3 ) , hair . My_hair_item ( vnum , 4 ) )
pc . setqf ( "limit_time" , get_time ( ) + hair . My_hair_item ( vnum , 4 ) )
hair . leave_log ( vnum )
return
end
end
elseif vnum > 73000 and vnum <= 73762 then
local model = 0
start_index = start_index - 1000
for i = 0 , 12 begin
local index = start_index + i
if index == vnum then
if 1 == race then
model = vnum - 72000
elseif 2 == race then
model = vnum - 71250
elseif 3 == race then
model = vnum - 70500
elseif 4 == race then
model = vnum - 69750
end
if 0 ~= model then
pc . set_part ( PART_HAIR , model )
return
end
end
end
end
syschat ( gameforge . hair . _014_say )