Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $${
- IF(rxoneto);
- Unset(rxoneto);
- log(off);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- stop();
- Else;
- Set(rxoneto);
- #trap = 1;
- #bau = 1;
- log(on);unset(@matar_fantasma);
- echo(/home fileira);
- wait(5);
- do;
- IF(%HUNGER% < 20);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- do;
- pick(carrot);
- key(use);
- until(%HUNGER% = 20);
- ENDIF;
- IF(%HEALTH%<19);
- #look = 0;
- do;
- unsafe();
- LOOK(%#look%,35);slot(2);
- if(%HIT% = "ENTITY");KEY(attack);
- WAIT(1ms);endif;
- inc(#look,25);
- if(%#look%>359);
- #look = 0;
- endif;
- endunsafe;
- until(@matar_fantasma);
- echo(/spawn);
- wait(2);
- look(,-90);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- do;
- pick(carrot);
- key(use);
- until(%HUNGER% = 20);
- do;until((%HUNGER% = 20) && (%HEALTH% = 20));
- unset(@matar_fantasma);
- ECHO(/home fileira);wait(5);
- ENDIF;
- echo(/delhome fileira);
- wait(500ms);
- echo(/sethome fileira);
- do;
- IF(%HUNGER% < 20);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- do;
- pick(carrot);
- key(use);
- until(%HUNGER% = 20);
- ENDIF;
- IF(%HEALTH%<19);
- #look = 0;
- do;
- unsafe();
- LOOK(%#look%,35);slot(2);
- if(%HIT% = "ENTITY");KEY(attack);
- WAIT(1ms);endif;
- inc(#look,25);
- if(%#look%>359);
- #look = 0;
- endif;
- endunsafe;
- until(@matar_fantasma);
- echo(/spawn);
- wait(2);
- look(,-90);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- do;
- pick(carrot);
- key(use);
- until(%HUNGER% = 20);
- do;until((%HUNGER% = 20) && (%HEALTH% = 20));
- unset(@matar_fantasma);
- ECHO(/home fileira);wait(5);
- ENDIF;
- look(SOUTH);
- look(,90);
- keydown(left);
- slot(1);
- key(attack);
- wait(15ms);
- if(%HITID% = "dirt");
- slot(3);
- key(use);
- endif;
- #x = %XPOS% + 1;
- getid(%#x%,%YPOS%,%ZPOS%,&id);
- until((%HITID%="stone_slab") && (%&id%="dirt"));
- keyup(left);
- do;
- IF(%HUNGER% < 20);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- do;
- pick(carrot);
- key(use);
- until(%HUNGER% = 20);
- ENDIF;
- IF(%HEALTH%<19);
- #look = 0;
- do;
- unsafe();
- LOOK(%#look%,35);slot(2);
- if(%HIT% = "ENTITY");KEY(attack);
- WAIT(1ms);endif;
- inc(#look,25);
- if(%#look%>359);
- #look = 0;
- endif;
- endunsafe;
- until(@matar_fantasma);
- echo(/spawn);
- wait(2);
- look(,-90);
- KEYUP(RIGHT);
- KEYUP(LEFT);
- KEYUP(SNEAK);
- do;
- pick(carrot);
- key(use);
- until(%HUNGER% = 20);
- do;until((%HUNGER% = 20) && (%HEALTH% = 20));
- unset(@matar_fantasma);
- ECHO(/home fileira);wait(5);
- ENDIF;
- look(SOUTH);
- look(,90);
- keydown(right);
- pick(carrot);
- key(use);
- wait(1ms);
- #x = %XPOS% - 1;
- getid(%#x%,%YPOS%,%ZPOS%,&id);
- until((%HITID%="stone_slab") && (%&id%="dirt"));
- keyup(right);
- gui(inventory);
- #inv_cheio=0;
- unsafe();
- for(#inv,9,44);
- getslotitem(%#inv%,&id,#stack);
- if(%#stack%!=0);
- inc(#inv_cheio);
- endif;
- next;
- endunsafe();
- gui();
- if(%#inv_cheio%>30);
- echo(/home bau%#trap%);wait(5);
- gui();
- do;
- ifmatches(%#bau%,1);wait(1);look(NORTH);look(-32,-25);wait(400ms);endif;
- ifmatches(%#bau%,2);wait(1);look(NORTH);look(0,-25);wait(400ms);endif;
- ifmatches(%#bau%,3);wait(1);look(NORTH);look(32,-25);wait(400ms);endif;
- ifmatches(%#bau%,4);wait(1);look(NORTH);look(-32,0);wait(400ms);endif;
- ifmatches(%#bau%,5);wait(1);look(NORTH);look(0,0);wait(400ms);endif;
- ifmatches(%#bau%,6);wait(1);look(NORTH);look(32,0);wait(400ms);endif;
- ifmatches(%#bau%,7);wait(1);look(NORTH);look(-32,30);wait(400ms;endif;
- ifmatches(%#bau%,8);wait(1);look(NORTH);look(0,30);wait(400ms);endif;
- ifmatches(%#bau%,9);wait(1);look(NORTH);look(32,30);wait(400ms);endif;
- do;key(use);wait(500ms);until(%GUI%="GUICHEST");wait(500ms);
- getslotitem(53,&id,#stack);
- if(%#stack% != 0);
- inc(#bau);gui();
- else;
- for(#guardar_bau,54,89);
- getslotitem(%#guardar_bau%,&id);
- ifmatches(%&id%,"carrot");
- slotclick(%#guardar_bau%,r,true);wait(100ms);
- endif;
- next;
- endif;
- gui();
- if(%#bau%>10);
- inc(#trap);
- #bau = 1=;
- echo(/home bau%#trap%);wait(5);gui();
- endif;
- gui(inventory);
- #guardar = 0;
- for(#inv_cenoura,9,44);
- getslotitem(%#inv_cenoura%,&id,#stack);
- ifmatches(%&id%,"carrot");
- inc(#guardar);
- endif;
- next;
- gui();
- until(%#guardar% = 0);
- ECHO(/home fileira);
- wait(5);
- endif;
- #z = %ZPOS%;
- do;
- keydown(sneak);
- keydown(forward);
- #zpos = %ZPOS% + 1;
- #ypos = %YPOS% - 1;
- GETID(%XPOS%,%#ypos%,%#zpos%,&id);
- until((%ZPOS% = %#z% + 1) || (%&id% = "dirt"));
- if(%&id% = "dirt");
- keyup(sneak);
- keyup(forward);
- echo(/home fileira1);wait(5);
- endif;
- keyup(sneak);
- keyup(forward);
- keydown(left);
- keydown(sneak);
- wait(1);
- keyup(left);
- keyup(sneak);
- loop;
- endif;
- }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement