KRL big se é mo preguicoso eu so procurei isso no google ja achei pqp http://forum.craftlandia.com.br/ipb/index.php?/topic/491695-busca-de-livros-no-warp-tesouro/ ai seu tetudo
$${ if(tesouro); unset(tesouro); log(""); log(&d[&3MACRO&d] &5Pega &1Livro &4Desligado); log(&d[&3MACRO&d] &6Obrigado por usar!!!); log(""); KEYUP(FORWARD); KEYUP(BACK); KEYUP(RIGHT); KEYUP(LEFT); keyup(jump); stop; else; set(tesouro); log(""); log(&d[&3MACRO&d] &5Pega &1Livro &2Ligado); log(&d[&3MACRO&d] &fDesenvolvido por Marini (Region 2.0)); log(""); wait(200ms); #timepot = 0; prompt(#xpost,$$?,Qual a coordenada no X?); prompt(#zpost,$$?,Qual a coordenada no Z?); prompt(&pot8,$$?,Voce ira tomar POT de velocidade I de 8 minutos? (S p/sim | N p/nao)); if(%HUNGER%<8); slot(9); wait(100ms); do(45); key(use); wait(0.00000001ms); loop; endif; if((%&pot8%="S")||(%&pot8%="s")); slot(8); do(45); wait(0.00000001ms); key(use); loop; endif; if((%&pot8%="S")||(%&pot8%="s")); CALCYAWTO(%#xpost%,%#zpost%,#yaw,#distance); #ab=%#distance%*100; #t=%#ab%/720; log(""); log(&6O tempo previsto para chegar a coordenada é: &3%#t% &4Segundos); log(""); else; CALCYAWTO(%#xpost%,%#zpost%,#yaw,#distance); #ab=%#distance%*100; #t=%#ab%/695; log(""); log(&6O tempo previsto para chegar a coordenada é: &3%#t% &4Segundos); log(""); endif; do; CALCYAWTO(%#xpost%,%#zpost%,#yaw,#distance) #h=%#yaw%+180; look(%#h%,60); inc(#timepot); keydown(jump); keydown(sprint); keydown(forward); if((%&pot8%="S")||(%&pot8%="s")); if(%#timepot%=9600); slot(8); do(45); wait(0.00000001ms); key(use); loop; #timepot = 0; endif; endif; if(%HUNGER%<8); slot(9); wait(100ms); do(45); key(use); wait(0.00000001ms); loop; endif; if(%HITID%="fence"); keydown(left); wait(2500ms); keyup(left); endif; until(%#distance%=0); keyup(forward); keyup(sprint); keyup(jump); CALCYAWTO(%#xpost%,%#zpost%,#yaw,#distance) #h=%#yaw%+180; look(%#h%,60); keydown(forward); until(%#distance%=0); keyup(forward); endif; }$$