Macro bowredfix 0.3 VIP e NÃO-VIP

$${

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
\\          Variaveis editaveis            \\
	SET(#idinho_delayjogarlixo,"50");
	SET(#idinho_delaycomprar,"800");
\\                                         \\
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
\\        Veriaveis nao editaveis          \\
	SET(#idinho_slotclickunbug,"9");
	SET(#idinho_slotclickunbug2,"36");
	SET(#idinho_slotrep,"1");
	SET(#idinho_slotclicklixo,"36");
	SET(#idinho_arcorepor,"12");
	SET(#idinho_repetirloop,"1");
\\                                         \\
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

SET(&version,"&40.3&7");IF(macroreparcorep);LOG(&6[Macro]&7[BowRedFix%&version%]&6[VIP e NÃO-VIP] &c(Desligada) &8&o#iDinhoBR);KEYUP(sneak);IF(%#idinho_arcosreparados%=0);SET(&acb,"/");SET(&edg,"g");ECHO(%&acb%%&edg% &6macro &7bowredfix%&version% &c(desligada) &6vip e nao vip by @idinhobr);ENDIF;IF(%#idinho_arcosreparados%!=0);
ECHO(%&acb%%&edg% &6%#idinho_arcosreparados% arcos reparados com a macro &7bowredfix%&version% &6by @idinhobr);#idinho_arcosreparados=0;ENDIF;UNSET(macroreparcorep);STOP;ELSE;LOG(&6[Macro]&7[BowRedFix%&version%]&6[VIP e NÃO-VIP] &a(Ligada) &8&o#iDinhoBR);ECHO(%&acb%%&edg% &6macro &7bowredfix%&version% &a(ligada) &6vip e nao vip by @idinhobr);SET(macroreparcorep);

PROMPT(#idinho_delay,$$?,Quantos segundos você demora para teleportar? se é igual 0\, só aperte enter!);

	DO;
	 GUI(inventory);
	  GETSLOTITEM(9,#stack);
	   IF(%#stack%=0);
	    ECHO("/home clinhas");
	     WAIT(%#idinho_delay%);
	      WAIT(1);
		   GUI(inventory);

		   DO;
		    LOOK(,90);
		     SLOTCLICK(%#idinho_slotclickunbug%,l,true);
		      WAIT(150MS);
		       INC(#idinho_slotclickunbug);
		   UNTIL(%#idinho_slotclickunbug%=12);

		   SET(#idinho_slotclickunbug,"9");

		   ECHO("/menuloja off");
		   ECHO("/esconder");

		   DO;
		    LOOK(SOUTH);
		    LOOK(,-1);
		     KEYDOWN(sneak);
		      GUI(inventory);
		       WAIT(%#idinho_delaycomprar%MS);
		        KEY(use);
		         GETSLOTITEM(38,#stack);
		   UNTIL(%#stack%>=1);

		   KEYUP(sneak);

		   KEYDOWN(back);
		    WAIT(500MS);
		     KEYUP(back);

		  DO;
		   WAIT(150MS);
		    SLOTCLICK(%#idinho_slotclickunbug2%,l,true)
		     WAIT(150MS);
		      INC(#idinho_slotclickunbug2);
		  UNTIL(%#idinho_slotclickunbug2%=39);

		  SET(#idinho_slotclickunbug2,"36");
		  ENDIF;

		  ECHO("/home carcosred");
		   WAIT(%#idinho_delay%);
		    WAIT(1);

		    ECHO("/menuloja off");
		    ECHO("/esconder");

		    DO;
			 LOOK(east);
			  LOOK(,-1);
		       KEYDOWN(sneak);
		        GUI(inventory);
		         WAIT(%#idinho_delaycomprar%MS);
			      KEY(use);
			       GETSLOTITEM(33,#stack);
		    UNTIL(%#stack%>=1);

			KEYUP(sneak);

		    ECHO("/home fixarcosred");
		     WAIT(%#idinho_delay%);
		      WAIT(1);

			  DO;
			   DO;
			    LOOK(,90);
			     SLOT(%#idinho_slotrep%);
			      IF(%ITEM%!=261);
				   INC(#idinho_slotrep);
				  ENDIF;
				   SLOT(%#idinho_slotrep%);
				   IF(%ITEM%=261);
			        DO;
			         KEY(use);
				      WAIT(200MS);
					   INC(#idinho_unbugvisualarco);
					    LOOK(,90);
						 GUI;

					     IF(%#idinho_unbugvisualarco%=20);
						  LOOK(south);
						   LOOK(,22);
						    WAIT(1);
						     KEY(use);
							  WAIT(1);
							   GUI;
							    SET(#idinho_unbugvisualarco,"1");
						 ENDIF;

			        UNTIL(%DURABILITY%>350);
				    ENDIF;

				   SET(#idinho_unbugvisualarco,"1");
				   INC(#idinho_arcosreparados);
				   INC(#idinho_slotrep);
			   UNTIL(%#idinho_slotrep%>9);

			   SET(#idinho_slotrep,"1");

			   LOOK(north);
			    LOOK(,-1);

			     GUI(inventory);
				  FOR(#itens,36,44);
				   GETSLOTITEM(%#itens%,#id);
				    IF(%#id%!=387);
				     WAIT(%#idinho_slotclicklixo%MS);
				      SLOTCLICK(%#itens%,l,false);
					   WAIT(%#idinho_slotclicklixo%MS);
					    SLOTCLICK(-999);
				    ELSE;
				    ENDIF;
				  NEXT;
			    IF(%#idinho_repetirloop%<4);
			     DO;
			      SLOTCLICK(%#idinho_arcorepor%,l,true);
			       WAIT(25MS);
				    INC(#idinho_arcorepor);
			     UNTIL(%#idinho_arcorepor%>33);
			    ENDIF;

			    SET(#idinho_arcorepor,"12");

			    INC(#idinho_repetirloop);

			  UNTIL(%#idinho_repetirloop%=5);

			  SET(#idinho_repetirloop,"1");
			  INC(#idinho_arcosreparados,-5);

			  LOOK(south);
			   LOOK(,22);
			    WAIT(600MS);
			     KEY(use);
				  WAIT(600MS);
			       FOR(#itens,54,89);
			        GETSLOTITEM(%#itens%,#id);

			        IF(%#id%=387);
			         WAIT(75MS);
				      SLOTCLICK(%#itens%,l,true);
			        ELSE;
			        ENDIF;
			       NEXT;

	LOOP;
ENDIF;
}$$