PvPLoot

string decide_article(string to_check) {
    switch (char_at(to_lower_case(to_check),0)) {
        case ("a"):
        case ("e"):
        case ("i"):
        case ("o"):
        case ("u"):
        case ("y"):
            return "An ";
        default:
            return "A ";
    }
}

void reacquiring(string item_stolen) {
    int[item] reacquire;
    int price_limit;
    int max_item_price;
    item it = to_item(item_stolen);

    reacquire[$item[A Light that Never Goes Out]] = 1;
    reacquire[$item[amphibious tophat]] = 1;
    reacquire[$item[ancient turtle shell helmet]] = 1;
    reacquire[$item[ankleweights]] = 1;
    reacquire[$item[antimatter wad]] = 2;
    reacquire[$item[astronaut pants]] = 1;
    reacquire[$item[badger badge]] = 1;
    reacquire[$item[blackberry galoshes]] = 1;
    reacquire[$item[blue plastic oyster egg]] = 3;
    reacquire[$item[bone abacus]] = 1;
    reacquire[$item[Bram's choker]] = 1;
    reacquire[$item[brick of sand]] = 3;
    reacquire[$item[bubblewrap bottlecap turtleban]] = 1;
    reacquire[$item[bugbear beanie]] = 1;
    reacquire[$item[bugbear bungguard]] = 1;
    reacquire[$item[cane-mail pants]] = 1;
    reacquire[$item[choker of the ultragoth]] = 1;
    reacquire[$item[clownskin harness]] = 1;
    reacquire[$item[clown wig]] = 1;
    reacquire[$item[Colonel Mustard's Lonely Spades Club Jacket]] = 1;
    reacquire[$item[Corporal Fennel's Lonely Clubs Club Jacket]] = 1;
    reacquire[$item[cracker]] = 1;
    reacquire[$item[cup of infinite pencils]] = 1;
    reacquire[$item[eelskin pants]] = 1;
    reacquire[$item[eelskin hat]] = 1;
    reacquire[$item[Elmley shades]] = 1;
    reacquire[$item[eyepatch]] = 1;
    reacquire[$item[fetid feather]] = 3;
    reacquire[$item[filigreed hamethyst necklace]] = 1;
    reacquire[$item[frost flower]] = 1;
    reacquire[$item[furry halo]] = 1;
    reacquire[$item[General Sage's Lonely Diamonds Club Jacket]] = 1;
    reacquire[$item[giant gym membership card]] = 1;
    reacquire[$item[giant yellow hat]] = 1;
    reacquire[$item[groovy prism necklace]] = 1;
    reacquire[$item[guitar pick]] = 1;
    reacquire[$item[gym shorts]] = 1;
    reacquire[$item[Hairpiece on Fire]] = 1;
    reacquire[$item[Half a Purse]] = 1;
    reacquire[$item[Hand in Glove]] = 1;
    reacquire[$item[heavy metal sonata]] = 1;
    reacquire[$item[heavy metal thunderrr guitarrr]] = 1;
    reacquire[$item[high-energy mining laser]] = 1;
    reacquire[$item[hipposkin poncho]] = 1;
    reacquire[$item[hopping socks]] = 1;
    reacquire[$item[Knob Goblin elite helm]] = 1;
    reacquire[$item[Knob Goblin elite pants]] = 1;
    reacquire[$item[Knob Goblin elite polearm]] = 1;
    reacquire[$item[Lars the Cyberian]] = 1;
    reacquire[$item[leotarrrd]] = 1;
    reacquire[$item[letterman's jacket]] = 1;
    reacquire[$item[lynyrdskin breeches]] = 1;
    reacquire[$item[lynyrdskin tunic]] = 1;
    reacquire[$item[MagiMechTech NanoMechaMech]] = 1;
    reacquire[$item[Meat Tenderizer is Murder]] = 1;
    reacquire[$item[mer-kin breastplate]] = 1;
    reacquire[$item[mer-kin eyeglasses]] = 1;
    reacquire[$item[mer-kin gutgirdle]] = 1;
    reacquire[$item[mer-kin prayerbeads]] = 2;
    reacquire[$item[monster bait]] = 1;
    reacquire[$item[nasty rat mask]] = 1;
    reacquire[$item[non-stick pugil stick]] = 1;
    reacquire[$item[octopus's spade]] = 1;
    reacquire[$item[onion shurikens]] = 3;
    reacquire[$item[Ouija Board\, Ouija Board]] = 1;
    reacquire[$item[oven mitts]] = 1;
    reacquire[$item[panhandle panhandling hat]] = 1;
    reacquire[$item[polka-dot bow tie]] = 1;
    reacquire[$item[radiation-resistant helmet]] = 1;
    reacquire[$item[ring of conflict]] = 1;
    reacquire[$item[scale-mail underwear]] = 1;
    reacquire[$item[school spirit socket set]] = 1;
    reacquire[$item[sea chaps]] = 1;
    reacquire[$item[sea cowboy hat]] = 1;
    reacquire[$item[servo-assisted exo-pants]] = 1;
    reacquire[$item[Sheila Take a Crossbow]] = 1;
    reacquire[$item[sea salt scrubs]] = 1;
    reacquire[$item[shark jumper]] = 1;
    reacquire[$item[six-rainbow shield]] = 1;
    reacquire[$item[snailmail breeches]] = 1;
    reacquire[$item[snailmail coif]] = 1;
    reacquire[$item[snailmail hauberk]] = 1;
    reacquire[$item[space heater]] = 1;
    reacquire[$item[Space Tourist Phaser]] = 1;
    reacquire[$item[spangly mariachi pants]] = 1;
    reacquire[$item[spangly sombrero]] = 1;
    reacquire[$item[spiky turtle helmet]] = 1;
    reacquire[$item[sponge helmet]] = 1;
    reacquire[$item[spongy shield]] = 1;
    reacquire[$item[spork]] = 1;
    reacquire[$item[sprinkle-begging cup]] = 1;
    reacquire[$item[square sponge pants]] = 1;
    reacquire[$item[Staff of the Headmaster's Victuals]] = 1;
    reacquire[$item[staph of homophones]] = 1;
    reacquire[$item[star crossbow]] = 1;
    reacquire[$item[star hat]] = 1;
    reacquire[$item[sticky hand whip]] = 1;
    reacquire[$item[stone frisbee]] = 3;
    reacquire[$item[stuffed shoulder parrot]] = 1;
    reacquire[$item[swashbuckling pants]] = 1;
    reacquire[$item[sweatband]] = 1;
    reacquire[$item[teflon spatula]] = 1;
    reacquire[$item[tequila grenade]] = 3;
    reacquire[$item[tin snips]] = 1;
    reacquire[$item[Ultracolor™ shirt]] = 1;
    reacquire[$item[vampire pearl necklace]] = 1;
    reacquire[$item[velcro boots]] = 1;
    reacquire[$item[velcro paddle ball]] = 1;
    reacquire[$item[Vicar's Tutu]] = 1;
    reacquire[$item[vinyl boots]] = 1;
    reacquire[$item[vinyl shield]] = 1;
    reacquire[$item[white snakeskin duster]] = 1;
    reacquire[$item[wool sock]] = 1;
    reacquire[$item[Work is a Four Letter Sword]] = 1;
    reacquire[$item[wool sock]] = 1;
    // reacquire[$item[]] = 1;

    price_limit = to_int(get_property("autoBuyPriceLimit"));
    if (reacquire contains it) {
        if ((reacquire[it] - item_amount(it)) > 0) {
            max_item_price = ((historical_age(it) < 1)? historical_price(it) : mall_price(it))*1.1;
            if (max_item_price <= 100000 ) {
                set_property("autoBuyPriceLimit", to_string(max_item_price));
                print("Reacquiring " + reacquire[it] + " " + ((reacquire[it] > 1)? to_plural(it) : to_string(it)) + ".", "blue");
                if (it.tradeable) {
                    retrieve_item (reacquire[it] - item_amount(it), it);
                } else {
                    print("Is this even possible?", "red");
                }
                set_property("autoBuyPriceLimit", price_limit);
            } else {
                print(decide_article(to_string(it)) + to_string(it) + " is too expensive to reacquire.", "red");
            }
        }
    }
}

void main() {
    string pvp_string = visit_url("peevpee.php?place=logs");
    int firstOfMine = index_of(pvp_string, "view]</small></a><td><a href=" + "\"" + "showplayer.php?who=" + to_string(my_id())); //"
    string pattern = "Lost&nbsp;(.+?)<\\/small>";

    // If the first fight I initiated isn't in the first 100 figths, we want the bigger version of the archive
    if (firstOfMine == -1 && pvp_string.contains_text("Show More")) {
        pvp_string = visit_url("peevpee.php?place=logs&mevs=0&oldseason=0&showmore=1");
        firstOfMine = index_of(pvp_string, "view]</small></a><td><a href=" + "\"" + "showplayer.php?who=" + to_string(my_id())); //"
    }
    // We only want to search the string between the first [view] and the first fight I initiated.
    if (!(firstOfMine == -1)) {
        pvp_string = substring(pvp_string, index_of(pvp_string, "[view]"), firstOfMine);
    }

    /*string[boolean] test;
    test[true] = pvp_string;
    map_to_file(test, "test.txt");*/

    matcher items_lost = create_matcher(pattern, pvp_string);

    while (find(items_lost)) {
        print(decide_article(group(items_lost, 1)) + group(items_lost, 1) + " was stolen.", "green");
        reacquiring(group(items_lost, 1));
    }
}