Free fights

void free_fights() {
    int i = 0;
    familiar f;
    string choice_adv;


    if (!to_boolean(get_property("_loveTunnelUsed")) || to_boolean(get_property("snojoAvailable")) || to_int(get_property("_machineTunnelsAdv")) < 5 || to_int(get_property("_witchessFights")) < 5) {

        free_fights_outfit();

        // L.O.V.E. tunnel
        if (!to_boolean(get_property("_loveTunnelUsed")) && to_boolean(get_property("loveTunnelAvailable"))) {
            visit_url("place.php?whichplace=town_wrong&action=townwrong_tunnel");
            run_choice(1);
            run_choice(1);
            visit_url("choice.php");
            // 1 = Eardigan, 2 = Epaulettes, 3 = Earring
            run_choice(3);
            run_choice(1);
            visit_url("choice.php");
            // 1 = Lovebotamy, 2 = Open Heart Surgery, 3 = Wandering Eye Surgery
            run_choice(2);
            run_choice(1);
            // 1 = Enamorang, 2 = Emotionizer, 3 = Extraterrestrial Chocolate, 4 = Echinacea Bouquet, 5 = Elephant, 6 = 2 pieces of toast
            run_choice(2);
        }

        choose_bjornify_familiar();
        // Snojo
        if (to_boolean(get_property("snojoAvailable"))) {
            while (to_int(get_property("_snojoFreeFights")) < 10 && i <= 15) {
                adv1($location[The X-32-F Combat Training Snowman], -1, "");
                i = i + 1;
            }
        }

        choose_bjornify_familiar();
        // Machine elf tunnels
        if (have_familiar($familiar[Machine Elf]) && to_int(get_property("_machineTunnelsAdv")) < 5){
            f = my_familiar();
            i = 0;
            use_familiar($familiar[Machine Elf]);
            while (to_int(get_property("_machineTunnelsAdv")) < 5 && i <= 15) {
                adv1($location[The Deep Machine Tunnels], -1, "");
                i = i + 1;
            }
            use_familiar(f);
        }

        choose_bjornify_familiar();
        // Witchess
        if(get_campground() contains $item[Witchess Set] && to_int(get_property("_witchessFights")) < 5) {
            i = 0;
            while(to_int(get_property("_witchessFights")) < 5 && i < 10) {
                // Witchess knight
                choice_adv = "1936";
                if (to_int(get_property("_witchessFights")) == 4 && have_skill($skill[Frigidalmatian])) {
                    // Witchess ox
                    if (use_skill(1, $skill[Frigidalmatian])) {
                        choice_adv = "1937";
                    }
                }
                visit_url("campground.php?action=witchess");
                run_choice(1);
                visit_url("choice.php?option=1&pwd="+my_hash()+"&whichchoice=1182&piece=" + choice_adv, false);
                run_combat();
                i = i + 1;
            }
        }
    }
}