كويست تغيير الشخصية

quest change_race begin

    state start begin

        when 40004.use begin

            say ( " هل تريد تغير شخصيتك " )

            say ( " سوف تفقد مهاراتك " )

            say_title ( " يجب ان تخلع عتادك: " )

            say_red ( " عليك ازالة كل ما يتعلق بي شخصيتك " )

            say_red ( " قم بتسجيل الخروج _ومن ثم تسجيل الدخول من جديد " )

            say_red ( " حتى تتغير الشخصية " )

            say ( "" )

            local main_set = select ( "نعم" , "لا" )

            if main_set == 1 then

                say ( " أختر شخصيتك الجديدة " )

                local race = select ("محارب","نينجا","سورا","شامان","إغلاق")

            if race == 1 then

                    local sexwar = select ("ذكر","انثى")

                if sexwar == 1 then

                    pc.polymorph("4")

                    pc.change_sex()

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                elseif sexwar == 2 then

                    pc.polymorph("4")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.polymorph("1")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                    end

                elseif race == 2 then

                    local sexninja = select ("ذكر","انثى")

                    if sexninja == 2 then

                    pc.polymorph("5")

                    pc.change_sex()

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                elseif sexninja == 1 then

                    pc.polymorph("5")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.polymorph("1")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                    end

                elseif race == 3 then

                    local sexsura = select ("ذكر","انثى")

                    if sexsura == 1 then

                    pc.polymorph("6")

                    pc.change_sex()

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                elseif sexsura == 2 then

                    pc.polymorph("6")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.polymorph("1")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                    end

                elseif race == 4 then

                    local sexsham = select ("ذكر","انثى")

                    if sexsham == 2 then

                    pc.polymorph("7")

                    pc.change_sex()

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                elseif sexsham == 1 then

                    pc.polymorph("7")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.polymorph("1")

                    pc.change_sex()

                    pc.polymorph("20032")

                    pc.setqf("clear", 0)

                    pc.clear_skill()

                    pc.set_skill_group(0)

                    set_quest_state("skill_group","run")

                    --  pc.removeitem(400009, 1)

                    pc.set_part(PART_HAIR, 0)

                    end

        elseif race == 5 then

                    return

                end

            end

        end

    end

end