mirvines.txt

$${

//Tried to make formatting more reasonable
//Added more pick commands so fewer vines are punched
//Unbroke looking at chests
//Adjusted to fit actual edges of the field

#x1=12479;//this is where the farm ends (x)
#x2=12592;//this is where the farm stats (x)
#z1=515;//this is where the farm starts (z)
#z2=492;//this is where the farm ends (z)
//yaws
#north = 0;
#east = 90;
#south = 180;
#west = 270;

#next_vine_x=12591; //x2-1
#next_vine_z=500; //4th block to the left of the player (x), this represents the next row of vines

do();
	do();
		look(north);
		//wait(200ms);
		do()
			keydown(left);
		until(%XPOS%==%#next_vine_x%)

		inc(#next_vine_x,-1);//setting next column of vines
		keyup(left);
		wait(200ms);
		//clearing 1 column of vines func ###

		pick(shears);

		wait(150ms)
		look(0,35);
		do(12)
			key(attack);
		loop;

		pick(shears);
		wait(150ms)
		look(0,0);
		do(12)
			key(attack);
		loop;

		pick(shears);
		wait(150ms)
		look(0,-25);
		do(12)
			key(attack);
		loop;

		pick(shears);
		wait(150ms)
		look(0,-25);
		do(12)
			key(attack);
		loop;

		look(0,0);

	while(%XPOS%>%#x1%);

	inc(#next_vine_x,+2);//resetting next vine pos

	do()
		//looking to the other side of the farm
		look(south);
		do()
			keydown(left);
		until(%XPOS%==%#next_vine_x%);
		inc(#next_vine_x,+1);//setting next collmn of vines
		keyup(left);
		wait(200ms);
		//clearing 1 collumn of vines func ###

		pick(shears);
		look(180,35);
		do(12)
			key(attack);
		loop;

		pick(shears);
		wait(150ms)
		look(180,0);
		do(12)
			key(attack);
		loop;

		pick(shears);
		wait(150ms)
		look(180,-25);
		do(12)
			key(attack);
		loop;

		pick(shears);
		wait(150ms)
		look(180,-25);
		do(12)
			key(attack);
		loop;

		look(180,0);

	while(%XPOS%<%#x2%)

	inc(#next_vine_x,-2); //resetting next vine pos
	//

	do()
		keydown(forward);
	until(%ZPOS%==%#next_vine_z%);

	keyup(forward);
	inc(#next_vine_z,+4);//resetting next row of vines

 // Eat, eats every time we finish a row of vines
 &foods = "cookie rotten_flesh spider_eye fish rabbit mutton pumpkin_pie apple beef porkchop chicken poisonous_potato melon potato baked_potato cooked_chicken cooked_mutton mushroom_stew bread cooked_rabbit cooked_fished carrot cooked_porkchop cooked_beef golden_carrot golden_apple rabbit_stew"
	 if(%HUNGER% < 5);
		disconnect();
		stop();
	elseif(%HUNGER% < 20);
		&foods[] = split(" ",%&foods%);
		foreach(&foods,&cfood);
			pick("%&cfood%");
		next;
		wait(%#wait%ms);
		do(100);
			key(use);
		loop;
	endif;

    // Dump inventory
		log(Attempting to dump inventory);
        look(90,45);
        wait(100ms);
        key(use);
        wait(500ms);
        UNSAFE(0);
        for(#i,54,80);
            getslotitem(%#i%,&item);
            if("vine" == &item);
                slotclick(%#i%,1,true);
                wait(100ms);
            endif;
        next;
        ENDUNSAFE;
        gui();

until(%ZPOS%==%#z1%);
}$$