Cod: Selectaţi tot

quest costume_rofl begin
    state start begin
        function get_real_hair_id(id)
            return ({
			[45001] = 5001,
			[45002] = 5001,
			[45003] = 5002,
			[45004] = 5002,
			[45005] = 5003,
			[45006] = 5003,
			[45007] = 5004,
			[45008] = 5004,
			[45009] = 5005,
			[45010] = 5005,
			[45011] = 5027,
			[45012] = 5027,
			[45013] = 5028,
			[45014] = 5029,
			[45015] = 5023,
			[45016] = 5023,
			[45017] = 5024,
			[45018] = 5024,
			[45019] = 5025,
			[45020] = 5025,
			[45021] = 5030,
			[45022] = 5030,
			[45023] = 5030,
			[45024] = 5030,
			[45025] = 5031,
			[45026] = 5031,
			[45027] = 5031,
			[45028] = 5031,
			[45029] = 5032,
			[45030] = 5032,
			[45031] = 5032,
			[45032] = 5032
            })[id]
            end
            
        when login begin			    
            if pc.getqf("use_costume") == 1 then
			cmdchat("costume_icon "..pc.getqf("costume_body"))
            end
            
            if pc.getqf("use_costume_hair") == 1 then
			local vnum = pc.getqf("hair_use_vnum")
			cmdchat("costume_hair "..vnum)
            end
            
            loop_timer("check_costume", 0.40)
			
        end
        
        when check_costume.timer begin
            if pc.getqf("use_costume") == 1 then
			local a = pc.getqf("costume_body")
			pc.set_part(PART_MAIN, a)
            end            
        end
        
        when 41001.use or 41002.use or 41003.use or 41004.use or 41005.use or 41006.use or 41007.use or 41008.use or 41009.use or 41090.use	or 41091.use or 41092.use or 41093.use or 41094.use	or 41095.use or 41096.use or 41097.use	or 41098.use or 41099.use 	or 41103.use 	or 41104.use 	or 41105.use 	or  45001.use or  45002.use or  45003.use or 45004.use or 45005.use or 45006.use or 45007.use or 45008.use or 45009.use or 45010.use or 45011.use or 45012.use  or 45013.use or 45014.use or 45015.use or 45016.use or 45017.use or 45018.use or 45019.use or 45020.use or 45021.use or 45022.use or 45023.use or 45024.use or 45025.use or 45026.use or 45027.use or 45028.use or 45029.use or 45030.use or 45031.use or 45032.use   begin

			 local vnum = item.get_vnum()
			 if vnum > 41000 and vnum < 41307 then
			 
				if pc.getqf("use_costume") == 1 then
					if vnum == pc.getqf("costume_body") then
						local a = pc.getqf("costume_body")
						pc.give_item2(a,1)
						pc.setqf("use_costume", 0)
						pc.setqf("costume_body", 0)
						local rüssi = pc.get_armor()
						local old = pc.getqf("costume_part_old")
						if rüssi == old then
							pc.set_part(PART_MAIN, old)
						else
							pc.set_part(PART_MAIN, rüssi)
						end
						cmdchat("costume_icon "..vnum)
					else
						local a = pc.getqf("costume_body")
						pc.give_item2(a)
						pc.setqf("costume_body", vnum)
						pc.remove_item(vnum,1)
						pc.set_part(PART_MAIN, vnum)
						cmdchat("costume_icon "..vnum)
					end
					
				elseif pc.getqf("use_costume") == 0 then
					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)
					pc.remove_item(vnum,1)
					cmdchat("costume_icon "..vnum)
				end
				
			elseif vnum > 45000 and vnum < 45135 then
				local vnum = item.get_vnum()
				local hair_vnum = costume_rofl.get_real_hair_id(vnum)
				
				if pc.getqf("use_costume_hair") == 0 then
					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.remove_item(vnum,1)
					
				elseif pc.getqf("use_costume_hair") == 1 then
				
					if 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
						local item = pc.getqf("hair_use_vnum")
						pc.give_item2(item,1)
						pc.setqf("hair_use_vnum", vnum)
						pc.set_part(PART_HAIR, hair_vnum)
						cmdchat("costume_hair "..vnum)
						pc.remove_item(vnum,1)
					end
				end		
			end
		end
	end
end

Cod: Selectaţi tot

quest costume_off_hair begin
	state start begin
		when login begin
			send_letter("Dezechipeaza Frizura")
		end
		
		when button or info begin
			if pc.getf("costume_rofl", "use_costume_hair") == 1 then
				local vnum = pc.getf("costume_rofl", "hair_use_vnum")
				pc.give_item2(vnum,1)
				cmdchat("costume_hair "..vnum)
				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)
			end
		end
	end
end

Cod: Selectaţi tot

-- // Quest zum ausziehen // --
quest costume_lite_2 begin
	state start begin
		when login begin
			send_letter("Dezechipeaza Costum")
		end
		
		when button or info begin
			if pc.getf("costume_rofl", "use_costume") == 1 then
				local vnum = pc.getf("costume_rofl", "costume_body")
				pc.give_item2(vnum,1)
				cmdchat("costume_icon "..vnum)
				pc.setf("costume_rofl", "use_costume", 0)
				pc.setf("costume_rofl", "costume_body", 0)
				local old = pc.getf("costume_rofl", "costume_part_old")
				local rüssi = pc.get_armor()
				if rüssi == old then
					pc.set_part(PART_MAIN, old)
				else
					pc.set_part(PART_MAIN, rüssi)
				end
			end
		end
	end
end