temp script

/* List of blocks for reference:
~ Clearing existing timers
~ Setting new timers
~ Foodstuffs
~ L O V Etc.
~ Familiar stuff
~ Assorted buffs (KGB, etc.)
~ Synthesis, kind of
~ S P L E E N
~ Fixed terminal
~ The horribleness that is macros with putty / black box and stuff.
~ Barf adventuring
*/
print("Added a wait() command in case you remember something to do right after starting the script.");

wait(10);

cli_execute("/aa barf farming");

if(get_property("_digitize_timers_set") != "true") {

if (have_effect($effect[timer 1]) >= 1) {
   cli_execute("/shrug timer 1");
}

if (have_effect($effect[timer 2]) >= 1) {
   cli_execute("/shrug timer 2");
}

if (have_effect($effect[timer 3]) >= 1) {
   cli_execute("/shrug timer 3");
}

if (have_effect($effect[timer 1]) == 0) {
   cli_execute("/timer 95");
}

if (have_effect($effect[timer 2]) == 0) {
   cli_execute("/timer 190");
}

if (have_effect($effect[timer 3]) == 0) {
   cli_execute("/shrug timer 330");
}

set_property("_digitize_timers_set","true");
}

// This script assumes you have the associated combat script saved as a macro. It will not work otherwise
// This script assumes that you have the correct potion buffs turned on as a mood, bc it doesn't do them itself.

// First, we want to do eating and drinking, so we want to eat all of the thanksgiving food
void acquire_to_price(int qty, item it, int price)
{
    // Reimplement acquire to check item price before buying
    int missing_qt = qty - item_amount(it);
    if (missing_qt > 0)
    {
        buy(missing_qt, it, price);
    }
}
int count;

// Food setup

if(get_property("_food_setup_complete") != "true") {

// First, we need to make sure we acquire and consume the relevant food
acquire_to_price(1, $item[candied sweet potatoes] , 10000);
acquire_to_price(1, $item[green bean casserole] , 10000);
acquire_to_price(1, $item[baked stuffing] , 10000);
acquire_to_price(1, $item[cranberry cylinder] , 10000);
acquire_to_price(1, $item[thanksgiving turkey] , 10000);
acquire_to_price(1, $item[mince pie] , 10000);
acquire_to_price(1, $item[mashed potatoes] , 10000);
acquire_to_price(1, $item[warm gravy] , 10000);
acquire_to_price(1, $item[bread roll] , 10000);
cli_execute("acquire candied sweet potatoes");
cli_execute("acquire green bean casserole");
cli_execute("acquire baked stuffing");
cli_execute("acquire cranberry cylinder");
cli_execute("acquire thanksgiving turkey");
cli_execute("acquire mince pie");
cli_execute("acquire mashed potatoes");
cli_execute("acquire warm gravy");
cli_execute("acquire bread roll");
// Prep for overeating
cli_execute("equip pantsgiving");
cli_execute("acquire 3 mayodiol");
cli_execute("acquire 5 mayozapine");

cli_execute("use 2 milk of mag");
cli_execute("use mayozapine");
cli_execute("eat candied sweet potatoes");
cli_execute("use mayozapine");
cli_execute("eat green bean casserole");
cli_execute("use mayozapine");
cli_execute("eat baked stuffing");
cli_execute("use mayozapine");
cli_execute("eat cranberry cylinder");
cli_execute("use mayozapine");
cli_execute("eat thanksgiving turkey");
cli_execute("use mayodiol");
cli_execute("eat mince pie");
cli_execute("use mayodiol");
cli_execute("eat mashed potatoes");
cli_execute("use mayodiol");
cli_execute("eat warm gravy");
cli_execute("use mayozapine");
cli_execute("eat bread roll");

set_property("_food_setup_complete","true");
}

// LOV Esetup

if(!get_property("_loveTunnelUsed").to_boolean()){

	cli_execute("/cast * party favor");
    visit_url("place.php?whichplace=town_wrong&action=townwrong_tunnel");
    visit_url("choice.php?whichchoice=1222&option=1&pwd");
    visit_url("choice.php?whichchoice=1223&option=2&pwd");
    visit_url("choice.php?whichchoice=1224&option=3&pwd");
    visit_url("choice.php?whichchoice=1225&option=2&pwd");
    visit_url("choice.php?whichchoice=1226&option=2&pwd");
    visit_url("choice.php?whichchoice=1227&option=2&pwd");
    visit_url("choice.php?whichchoice=1228&option=1&pwd");
    cli_execute("/cast * party favor");
}

// Clan fortune teller
if(get_property("_clanFortuneBuffUsed") == "false") {
cli_execute("fortune buff meat");
}

while(get_property("_kgbClicksUsed").to_int() < 22) {
cli_execute("briefcase b meat");
}

while(get_property("_sourceTerminalEnhanceUses").to_int() < 3) {
cli_execute("terminal enhance meat");
}

cli_execute("terminal educate digitize");
cli_execute("terminal educate extract");

// Use the Buy!Sell! Buff for the first time
if(have_effect($effect[Buy! Sell! Buy! Sell!]) == 0){
cli_execute("use Uncle Greenspan's Bathroom Finance Guide");
}

cli_execute("use bittycar meatcar");

// Familiar setup

if(get_property("_familiar_setup_complete") != "true") {

cli_execute("familiar cornbeefadon");
cli_execute("acquire box of familiar jacks");
cli_execute("use box of familiar jacks"); // Acquires the amulet coin

cli_execute("familiar robortender");
cli_execute("use moveable feast");
cli_execute("equip amulet coin");
cli_execute("acquire newark");
cli_execute("acquire single entendre");
cli_execute("acquire feliz navidad");
cli_execute("acquire hell in a bucket");
cli_execute("robo feliz navidad, newark, single entendre, hell in a bucket");
cli_execute("mummery meat");

set_property("_familiar_setup_complete","true");
}

cli_execute("familiar reanimator");

// Do the equipment
cli_execute("equip crumpled felt fedora");
cli_execute("equip buddy bjorn");
cli_execute("bjornify golden monkey");
cli_execute("equip haiku katana");
cli_execute("equip half a Purse");
cli_execute("equip pantsgiving");
cli_execute("equip acc1 mafia pointer finger ring");
cli_execute("equip acc2 cheap sunglasses");
cli_execute("equip acc3 belt of Loathing");

// Sweet synthesis
if(get_property("_spleen_synthesized").to_int() != 12) {
repeat {
cli_execute("synthesize swizzler, milk stud");
set_property("_spleen_synthesized",get_property("_spleen_synthesized").to_int() + 1);
}
until(get_property("_spleen_synthesized").to_int() == 12);
}

cli_execute("use 3 mojo filter");
cli_execute("chew 6 handful of smithereen");

// Ensure that we have opened the box of raindoh
cli_execute ("closet put * 4-d camera");
cli_execute("acquire 1 4-d camera");
 /* AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
// Do the fax for embezzler
if (get_property("_photocopyUsed")=="false" && can_faxbot($monster[Knob Goblin Embezzler])) {
     faxbot($monster[Knob Goblin Embezzler]);
     visit_url("clan_viplounge.php?preaction=receivefax&whichfloor=2", true);
     cli_execute("use photocopied");
}
// Set back to normal fam
cli_execute("familiar robortender");
cli_execute("equip amulet coin");

count = 0;
while(count < 5)
{
    cli_execute("use box full of monster");
    count += 1;
}
cli_execute("closet put black box");
cli_execute("use shaking 4-d camera");
// Now there are no free fights intended here, so we should have spent 5 box turns, 1 camera turn, 1 fax turn, for 7 turns with pantsgiving on so far.

AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA */

cli_execute("familiar robortender");
cli_execute("equip amulet coin");

repeat {
    if (mp_cost($skill[summon party favor]) < my_mp())
    {
        cli_execute("cast summon party favor");
    }
    if (have_effect($effect[Buy! Sell! Buy! Sell!]) == 0)
    {
        // TODO we could do some dumb stuff with the black box to force the 200% to occur then
        cli_execute("use Uncle Greenspan's Bathroom Finance Guide");
    }

    if (my_fullness() < fullness_limit())
    {
        cli_execute("acquire Mayozapine");
        cli_execute("use Mayozapine");
        cli_execute("acquire jumping horseradish");
        cli_execute("eat jumping horseradish");
    }
    if (my_fullness() == 17)
    {
        cli_execute("equip great wolf pants");
    }
	if (have_effect($effect[timer 1]) == 0)
    {
       cli_execute("/timer 999");
    }
	if (have_effect($effect[timer 2]) == 0)
    {
       cli_execute("/timer 999");
    }
	if (have_effect($effect[timer 3]) == 0)
    {
       cli_execute("/timer 999");
    }
    adventure(1, $location[Barf Mountain]);
	set_property("_this_is_terrible",get_property("_this_is_terrible").to_int() + 1);
	}
until(get_property("_this_is_terrible").to_int() == 330 );