Code:
quest costume_rofl begin state start beginfunction get_real_hair_id(id)return({[45003]=5002,[45004]=5002,[45005]=5003,[45006]=5003,[45007]=5004,[45008]=5004,[45009]=5005,[45010]=5005};)[id]endwhen login beginif pc.getqf("hair_use_vnum")==1then cmdchat("costume_hair "..pc.getqf("hair_use_vnum"))endif pc.getqf("use_costume")==1then cmdchat("costume_icon "..pc.getqf("costume_body"))end
loop_timer("check_costume",0.40)endwhen check_costume.timer beginif pc.getqf("use_costume")==1thenlocal a = pc.getqf("costume_body") pc.set_part(PART_MAIN, a)endendwhen41003.useor41004.useor41005.useor41006.useor41007.useor41008.useor41009.useor41010.useor41011.useor41012.useor41013.useor41014.u seor41015.useor41016.useor41017.useor41018.useor41019.useor41020.useor41021.useor41022.useor41023.useor41024.useor41025.useor41026.useor4102 7.useor41028.useor45003.useor45004.useor45005.useor45006.useor45007.useor45008.useor45009.useor45010.usebeginlocal vnum = item.get_vnum()if vnum >41002and vnum <41029thenif pc.getqf("use_costume")==1thenif vnum == pc.getqf("costume_body")then pc.setqf("use_costume",0) pc.setqf("costume_body",0)local old = pc.getqf("costume_part_old") pc.set_part(PART_MAIN, old) cmdchat("costume_icon "..vnum)else pc.setqf("costume_body", vnum) pc.set_part(PART_MAIN, vnum) cmdchat("costume_icon "..vnum)end
elseif pc.getqf("use_costume")==0then pc.setqf("use_costume",1)local old = pc.get_part(PART_MAIN) pc.setqf("costume_part_old", old) pc.set_part(PART_MAIN, vnum) pc.setqf("costume_body", vnum) cmdchat("costume_icon "..vnum) pc.setqf("costume_vnum", vnum) pc.removeitem(vnum)end
elseif vnum >45002and vnum <45011thenlocal vnum = item.get_vnum()local hair_vnum = costume_rofl.get_real_hair_id(vnum)if pc.getqf("use_costume_hair")==0then pc.setqf("old_hair_costume", pc.get_part(PART_HAIR)) pc.setqf("use_costume_hair",1) pc.setqf("hair_use_vnum", vnum) pc.set_part(PART_HAIR, hair_vnum) cmdchat("costume_hair "..vnum) pc.setqf("costume_vnum", vnum) pc.removeitem(vnum)
elseif pc.getqf("use_costume_hair")==1thenif vnum == pc.getqf("hair_use_vnum")then pc.setqf("use_costume_hair",0) pc.setqf("hair_use_vnum",0) pc.set_part(PART_HAIR, pc.getqf("old_hair_costume")) pc.setqf("old_hair_costume",0) cmdchat("costume_hair "..vnum)else pc.setqf("hair_use_vnum", vnum) pc.set_part(PART_HAIR, hair_vnum) cmdchat("costume_hair "..vnum)endendendendendend

quest costume_off_hair begin state start begin when login begin send_letter("costume_lite_hair") end
when button or info begin if pc.getf("costume_rofl", "use_costume_hair") == 1 then pc.setf("costume_rofl", "use_costume_hair", 0) pc.setf("costume_rofl", "hair_use_vnum", 0) local old_hair = pc.getf("costume_rofl", "old_hair_costume") pc.set_part(PART_HAIR, old_hair) pc.setf("costume_rofl", "old_hair_costume", 0) pc.giveitem2(pc.getqf("costume_vnum"), 1) pc.setqf("costume_vnum", 0) cmdchat("costume_hair 0") end end endend

quest costume_lite_2 begin state start begin when login begin send_letter("costume_lite") end
when button or info begin if pc.getf("costume_rofl", "use_costume") == 1 then pc.setf("costume_rofl", "use_costume", 0) pc.setf("costume_rofl", "costume_body", 0) local old = pc.getf("costume_rofl", "costume_part_old") pc.set_part(PART_MAIN, old) pc.giveitem2(pc.getqf("costume_vnum"), 1) pc.setqf("costume_vnum", 0) cmdchat("costume_icon 0") end end endend