Advertisement
Guest User

MkbMacro

a guest
Nov 23rd, 2020
64
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.08 KB | None | 0 0
  1. $${
  2. TOGGLE(mkb_macro);
  3. IF(mkb_macro);
  4. LOG("&6(&fMacro&6) &aTroca de Itens entre MKBs &6(&2ON&6) &bby Chavez.");
  5. WAIT(1);
  6. ELSE;
  7. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  8. KEYUP(right);
  9. KEYUP(sneak);
  10. STOP;
  11. ENDIF;
  12. IF(config);
  13. LOG("&6(&fMacro&6) &bPressione &fCtrl &bse deseja &fReconfigurar &ba &fMacro&6.");
  14. SET(#cont,6);
  15. DO(7);
  16. ACHIEVEMENTGET("%#cont% segundos...","diamond");
  17. WAIT(500ms);
  18. IF(KEY_LCONTROL);
  19. WAIT(500ms);
  20. IF(KEY_LCONTROL);
  21. UNSET(config);
  22. SET(reset_baus);
  23. SET(homes);
  24. BREAK;
  25. ENDIF;
  26. WAIT(500ms);
  27. ENDIF;
  28. WAIT(500ms);
  29. DEC(#cont,1);
  30. LOOP;
  31. IF(config);
  32. LOG("&6(&fMacro&6) &bVocê não desejou &fReconfigurar &ba &fMacro &6!");
  33. ENDIF;
  34. ENDIF;
  35. IF(!config);
  36. UNSET(log);
  37. UNSET(marcar_pegar);
  38. UNSET(marcar_levar);
  39. IF(!config_padrao);
  40. SET(&pegar,"pegar"); //Coloque o Nome da home para pegar itens aqui;
  41. SET(&pegar_temp,"pegar_temp"); //Coloque o Nome da home temporária para pegar itens aqui;
  42. SET(&levar,"levar"); //Coloque o Nome da home para levar itens entre as áspas;
  43. SET(&levar_temp,"levar_temp"); //Coloque o Nome da home temporária para levar itens entre as áspas;
  44. SET(config_padrao);
  45. UNSET(reset_id);
  46. SET(pegar_cord_levar);
  47. SET(pegar_cord_pegar);
  48. ENDIF;
  49. IF((quest_baus)||(quest_homes)||(quest_temp)||(quest_id));
  50. LOG("");
  51. LOG("&6(&fMacro&6) &bDeseja Continuar &fconfigurando &ba &fMacro &6?");
  52. LOG("&6(&fMacro&6) &6[&f1&6] &bSim&6.");
  53. LOG("&6(&fMacro&6) &6[&f2&6] &bNão&6.");
  54. LOG("");
  55. PROMPT(#quest_continuar,$$?,"Se não desejar continuar configurando ,a configuração sera iniciada novamente.");
  56. IF(%#quest_continuar%=1);
  57. LOG("&6[&f1&6] &bSim&6.");
  58. SET(log);
  59. ELSEIF(%#quest_continuar%=2);
  60. LOG("&6[&f2&6] &bNão&6.");
  61. UNSET(log);
  62. UNSET(quest_baus);
  63. UNSET(quest_temp);
  64. UNSET(quest_homes);
  65. UNSET(quest_id);
  66. ELSE;
  67. LOG("&6(&fMacro&6) &cResposta Inválida &6!");
  68. WAIT(200ms);
  69. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  70. UNSET(mkb_macro);
  71. STOP;
  72. ENDIF;
  73. ENDIF;
  74. IF(!log);
  75. LOG("&6(&fMacro&6) &bIniciando &fConfiguração&6...");
  76. SET(log);
  77. WAIT(1);
  78. ENDIF;
  79. IF((reset_baus)&&(!quest_baus));
  80. LOG("");
  81. LOG("&6(&fMacro&6) &bDeseja &fResetar &bos &fBáus &6?");
  82. LOG("&6(&fMacro&6) &6[&f1&6] &bSim&6.");
  83. LOG("&6(&fMacro&6) &6[&f2&6] &bNão&6.");
  84. LOG("");
  85. PROMPT(#quest_baus,$$?,"Coloque 1 para sim ou 2 para não.");
  86. IF(%#quest_baus%=1);
  87. LOG("&6[&f1&6] &bSim&6.");
  88. SET(#bau,0);
  89. SET(#baus,0);
  90. SET(pegar_cord_levar);
  91. SET(pegar_cord_pegar);
  92. UNSET(pegar);
  93. ELSEIF(%#quest_baus%=2);
  94. LOG("&6[&f2&6] &bNão&6.");
  95. ELSE;
  96. LOG("&6(&fMacro&6) &cResposta Inválida &6!");
  97. WAIT(200ms);
  98. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  99. UNSET(mkb_macro);
  100. STOP;
  101. ENDIF;
  102. DO();
  103. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  104. SET(quest_baus);
  105. ENDIF;
  106. IF(!quest_temp);
  107. LOG("");
  108. LOG("&6(&fMacro&6) &bDeseja utilizar &fHomes &btemporárias &6?");
  109. LOG("&6(&fMacro&6) &6[&f1&6] &bSim&6.");
  110. LOG("&6(&fMacro&6) &6[&f2&6] &bNão&6.");
  111. LOG("");
  112. PROMPT(#quest_temp,$$?,"Coloque 1 para sim ou 2 para não.");
  113. IF(%#quest_temp%=1);
  114. LOG("&6[&f1&6] &bSim&6.");
  115. SET(temp);
  116. ELSEIF(%#quest_temp%=2);
  117. LOG("&6[&f2&6] &bNão&6.");
  118. UNSET(temp);
  119. ELSE;
  120. LOG("&6(&fMacro&6) &cResposta Inválida &6!");
  121. WAIT(200ms);
  122. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  123. UNSET(mkb_macro);
  124. STOP;
  125. ENDIF;
  126. DO();
  127. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  128. SET(quest_temp);
  129. ENDIF;
  130. IF(!quest_homes);
  131. DO();
  132. LOG("");
  133. LOG("&6(&fMacro&6) &bDeseja alterar alguma &fHome &6?");
  134. LOG("&6(&fMacro&6) &6[&f1&6] &bPara pegar &fItens &6(&f%&pegar%&6)");
  135. LOG("&6(&fMacro&6) &6[&f2&6] &bPara levar &fitens &6(&f%&levar%&6)");
  136. IF(temp);
  137. LOG("&6(&fMacro&6) &6[&f3&6] &fTemporária &bpara pegar &fItens &6(&f%&pegar_temp%&6)");
  138. LOG("&6(&fMacro&6) &6[&f4&6] &fTemporária &bpara levar &fitens &6(&f%&levar_temp%&6)");
  139. ENDIF;
  140. LOG("");
  141. PROMPT(#quest_homes,$$?,"Coloque 5 se você ja configurou ou se não deseja alterar nada!");
  142. IF(%#quest_homes%=1);
  143. LOG("&6[&f1&6] &fHome &bpara pegar &fItens&6.");
  144. WAIT(200ms);
  145. PROMPT(&pegar_p,$$?,"Coloque o Nome da Home para pegar Itens aqui (caso não queira mais alterar pressione ESC) !");
  146. IF(%&pegar_p%!="");
  147. LOG("&6[&f1&6] &f%&pegar_p%&6.");
  148. SET(&pegar,%&pegar_p%);
  149. ENDIF;
  150. DO();
  151. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  152. WAIT(1);
  153. ELSEIF(%#quest_homes%=2);
  154. LOG("&6[&f2&6] &fHome &bpara levar &fitens&6.");
  155. WAIT(200ms);
  156. PROMPT(&levar_p,$$?,"Coloque o Nome da Home para levar Itens aqui (caso não queira mais alterar pressione ESC) !");
  157. IF(%&levar_p%!="");
  158. LOG("&6[&f2&6] &f%&levar_p%&6.");
  159. SET(&levar,%&levar_p%);
  160. ENDIF;
  161. DO();
  162. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  163. WAIT(1);
  164. ELSEIF((%#quest_homes%=3)&&(temp));
  165. LOG("&6[&f3&6] &fHome temporária &bpara pegar &fItens&6.");
  166. WAIT(200ms);
  167. PROMPT(&pegar_temp_p,$$?,"Coloque o Nome da Home temporária para pegar Itens aqui (caso não queira mais alterar pressione ESC) !");
  168. IF(%&pegar_temp_p%!="");
  169. LOG("&6[&f1&6] &f%&pegar_temp_p%&6.");
  170. SET(&pegar_temp,%&pegar_temp_p%);
  171. ENDIF;
  172. DO();
  173. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  174. WAIT(1);
  175. ELSEIF((%#quest_homes%=4)&&(temp));
  176. LOG("&6[&f3&6] &fHome temporária &bpara levar &fItens&6.");
  177. WAIT(200ms);
  178. PROMPT(&levar_temp_p,$$?,"Coloque o Nome da Home temporária para levar Itens aqui (caso não queira mais alterar pressione ESC) !");
  179. IF(%&levar_temp_p%!="");
  180. LOG("&6[&f1&6] &f%&levar_temp_p%&6.");
  181. SET(&levar_temp,%&levar_temp_p%);
  182. ENDIF;
  183. DO();
  184. UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));
  185. WAIT(1);
  186. ELSEIF(%#quest_homes%=5);
  187. LOG("&6(&fMacro&6) &bNome das &fHomes &bsalvas &6!");
  188. SET(quest_homes);
  189. BREAK;
  190. ELSE;
  191. LOG("&6(&fMacro&6) &cResposta Inválida &6!");
  192. WAIT(200ms);
  193. UNSET(mkb_macro);
  194. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  195. STOP;
  196. ENDIF;
  197. LOOP;
  198. ENDIF;
  199. IF(!quest_id);
  200. LOG("");
  201. LOG("&6(&fMacro&6) &bSobre o&6(&bs&6) &fItens&6(&bs&6) &bque deseja transportar entre as &fMKBs&6.");
  202. LOG("&6(&fMacro&6) &6[&f1&6] &fItem &bespecifico&6.");
  203. LOG("&6(&fMacro&6) &6[&f2&6] &bTodos os &fItens &bque estiverem nos &fBáus&6.");
  204. IF(reset_id);
  205. LOG("&6(&fMacro&6) &6[&f3&6] &bContinuar com o antigo &fID&6.");
  206. ENDIF;
  207. LOG("");
  208. PROMPT(#itens_transport,$$?,"Coloque 1 caso queira transportar um Item em especifico ,2 caso queira transportar todos Itens que estiverem nos Báus ou 3 para continuar com o mesmo ID.");
  209. IF(%#itens_transport%=1);
  210. LOG("&6[&f1&6] &fItem &bespecifico&6.");
  211. UNSET(pegar_tudo);
  212. WAIT(200ms);
  213. LOG("&6(&fMacro&6) &bPressione &fEnter &bcom o &fItem &bdesejado na mão &6!");
  214. WAIT(1);
  215. DO();
  216. ACHIEVEMENTGET("Pegue o ID do Item.","diamond");
  217. WAIT(500ms);
  218. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  219. WAIT(500ms);
  220. IF((KEY_RETURN)||(KEY_NUMPADENTER));
  221. IF(%ITEM%!="air");
  222. SET(reset_id);
  223. SET(&item,"%ITEM%");
  224. ACHIEVEMENTGET("%ITEMNAME%","%&item%");
  225. LOG("&6(&fMacro&6) &fID &bsalvo &6!");
  226. WAIT(1);
  227. BREAK;
  228. ELSE;
  229. LOG("&6(&fMacro&6) &cVocê precisa estar com um &fItem na mão &6!");
  230. ACHIEVEMENTGET("Error...","skull");
  231. WAIT(1);
  232. ENDIF;
  233. ENDIF;
  234. WAIT(500ms);
  235. ENDIF;
  236. WAIT(500ms);
  237. UNTIL(KEY_LCONTROL);
  238. ELSEIF(%#itens_transport%=2);
  239. LOG("&6[&f2&6] &bTodos os &fItens &bque estiverem nos &fBáus&6.");
  240. SET(pegar_tudo);
  241. ELSEIF(%#itens_transport%=3);
  242. LOG("&6[&f3&6] &bContinuar com o antigo &fID&6.");
  243. ELSE;
  244. LOG("&6(&fMacro&6) &cResposta Inválida &6!");
  245. WAIT(200ms);
  246. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  247. UNSET(mkb_macro);
  248. STOP;
  249. ENDIF;
  250. SET(quest_id);
  251. ENDIF;
  252. UNSET(quest_baus);
  253. UNSET(quest_temp);
  254. UNSET(quest_homes);
  255. UNSET(quest_id);
  256. SET(config);
  257. WAIT(1);
  258. ENDIF;
  259. LOG("&6(&fMacro&6) &bTudo certo para iniciar &6!");
  260. WAIT(200ms);
  261. UNSET(fist);
  262. DO();
  263. ECHO("/spawn");
  264. DO(30);
  265. WAIT(270ms);
  266. IF((%XPOS%=0)&&(%ZPOS%=25));
  267. SET(fim);
  268. ENDIF;
  269. UNTIL(fim);
  270. UNTIL(fim);
  271. WAIT(500ms);
  272. UNSET(pegar);
  273. DO();
  274. IF(!pegar);
  275. SET(#x_pos,%XPOS%);
  276. SET(#z_pos,%ZPOS%);
  277. SET(#y_pos,%YPOS%);
  278. SET(#cont,0);
  279. UNSET(fim);
  280. ECHO("/home %&pegar%");
  281. DO();
  282. WAIT(200ms);
  283. GETIDREL(0,-1,-2,&bau);
  284. GETIDREL(0,0,-2,&bau2);
  285. GETIDREL(0,1,-2,&bau3);
  286. GETIDREL(0,2,-2,&bau4);
  287. GETIDREL(0,3,-2,&bau5);
  288. SET(&all_chest,"%&bau%-%&bau2%-%&bau3%-%&bau4%-%&bau5%");
  289. IF((%XPOS%!=%#x_pos%)||(%YPOS%!=%#z_pos%)||(%YPOS%!=%#y_pos%)&&(%XPOS%=%x_pos%)&&(%ZPOS%=%#z_pos%));
  290. IFMATCHES("%&all_chest%","(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest));
  291. SET(fim);
  292. ELSE;
  293. INC(#cont,1);
  294. ENDIF;
  295. ENDIF;
  296. IF(%#cont%=5);
  297. LOG("&6(&fMacro&6) &cAlgo aconteceu de errado &6!");
  298. WAIT(200ms);
  299. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  300. UNSET(mkb_macro);
  301. STOP;
  302. ENDIF;
  303. UNTIL(fim);
  304. WAIT(300ms);
  305. SET(#slots,0);
  306. DO();
  307. IF(pegar_cord_pegar);
  308. SET(#x_pegar,%XPOS%);
  309. UNSET(pegar_cord_pegar);
  310. ENDIF;
  311. IF((%#bau%>4)||(%XPOS%<%#x_pegar%));
  312. IF(%#bau%>4);
  313. SET(#bau,0);
  314. #final_pegar = %XPOS% + 1;
  315. #penult_pegar = %#final_pegar% - 1;
  316. ELSE;
  317. #final_pegar = %#x_pegar%;
  318. #penult_pegar = %#final_pegar% - 1;
  319. ENDIF;
  320. DO();
  321. LOOK(north);
  322. KEYDOWN(right);
  323. IF(%XPOS%=%#penult_pegar%);
  324. KEYDOWN(sneak);
  325. ENDIF;
  326. GETIDREL(0,1,-2,&verif);
  327. GETIDREL(0,-1,0,&verif2);
  328. IF((%&verif%!="chest")&&(%&verif%!="trapped_chest")||(%&verif2%="air"));
  329. LOG("&6(&fMacro&6) &cSua trap de báus chegou ao Fim&6!");
  330. WAIT(200ms);
  331. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  332. KEYUP(right);
  333. KEYUP(sneak);
  334. UNSET(mkb_macro);
  335. STOP;
  336. ENDIF;
  337. UNTIL((%XPOS%=%#final_pegar%)&&(%HITID%="chest")||(%HITID%="trapped_chest"));
  338. KEYUP(sneak);
  339. KEYUP(right);
  340. SET(marcar_pegar);
  341. SET(#x_pegar,%XPOS%);
  342. ENDIF;
  343. IF(%#bau%=0);
  344. LOOK(0,311);
  345. ENDIF;
  346. IF(%#bau%=1);
  347. LOOK(0,333);
  348. ENDIF;
  349. IF(%#bau%=2);
  350. LOOK(0,5);
  351. ENDIF;
  352. IF(%#bau%=3);
  353. LOOK(0,36);
  354. ENDIF;
  355. IF(%#bau%=4);
  356. LOOK(0,53);
  357. ENDIF;
  358. WAIT(300ms);
  359. UNSET(erro);
  360. UNSET(cheio);
  361. KEY(USE);
  362. WAIT(500ms);
  363. IF(%GUI%!="GUICHEST");
  364. DO(3);
  365. KEY(use);
  366. WAIT(500ms);
  367. UNTIL(%GUI%="GUICHEST");
  368. ENDIF;
  369. UNSAFE();
  370. FOR(#slot,0,53);
  371. GETSLOTITEM(%#slot%,&id);
  372. IF((%&id%=%&item%)||(pegar_tudo)&&(%&id%!="air"));
  373. SLOTCLICK(%#slot%,l,true);
  374. GETSLOTITEM(%#slot%,&id,#stack);
  375. WAIT(2t);
  376. INC(#slots,1);
  377. IF((%#stack%>0)||(%#slots%=36));
  378. SET(cheio);
  379. BREAK;
  380. ENDIF;
  381. ENDIF;
  382. NEXT;
  383. ENDUNSAFE;
  384. IF(!cheio);
  385. INC(#bau,1);
  386. ENDIF;
  387. IF(%GUI%!="GUICHEST");
  388. LOG("&6(&fMacro&6) &cAlgo aconteceu de &4errado &6!");
  389. WAIT(200ms);
  390. LOG("&6(&fMacro&6) &cTentando novamente&6...");
  391. ELSE;
  392. GUI();
  393. ENDIF;
  394. UNTIL(cheio);
  395. IF(temp);
  396. IF(marcar_pegar);
  397. WAIT(500ms);
  398. DO(2);
  399. LOOK(north);
  400. ECHO("/sethome %&pegar_temp%");
  401. WAIT(500ms);
  402. LOOP;
  403. UNSET(marcar_pegar);
  404. SET(&pegar,%&pegar_temp%);
  405. ENDIF;
  406. ENDIF;
  407. ELSE;
  408. SET(#x_pos,%XPOS%);
  409. SET(#z_pos,%ZPOS%);
  410. SET(#y_pos,%YPOS%);
  411. SET(#cont,0);
  412. UNSET(fim);
  413. ECHO("/home %&levar%");
  414. DO();
  415. WAIT(150ms);
  416. GETIDREL(0,-1,-2,&bau);
  417. GETIDREL(0,0,-2,&bau2);
  418. GETIDREL(0,1,-2,&bau3);
  419. GETIDREL(0,2,-2,&bau4);
  420. GETIDREL(0,3,-2,&bau5);
  421. SET(&all_chest,"%&bau%-%&bau2%-%&bau3%-%&bau4%-%&bau5%");
  422. IF((%XPOS%!=%#x_pos%)||(%YPOS%!=%#z_pos%)||(%YPOS%!=%#y_pos%)&&(%XPOS%=%x_pos%)&&(%ZPOS%=%#z_pos%));
  423. IFMATCHES("%&all_chest%","(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest)-(chest|trapped_chest));
  424. SET(fim);
  425. ELSE;
  426. INC(#cont,1);
  427. ENDIF;
  428. ENDIF;
  429. IF(%#cont%=3);
  430. LOG("&6(&fMacro&6) &cAlgo aconteceu de errado &6!");
  431. WAIT(200ms);
  432. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  433. UNSET(mkb_macro);
  434. STOP;
  435. ENDIF;
  436. UNTIL(fim);
  437. WAIT(300ms);
  438. DO();
  439. IF(pegar_cord_levar);
  440. SET(#x_levar,%XPOS%);
  441. UNSET(pegar_cord_levar);
  442. ENDIF;
  443. IF((%#baus%>4)||(%XPOS%<%#x_levar%));
  444. IF(%#baus%>4);
  445. SET(#baus,0);
  446. #final_levar = %XPOS% + 1;
  447. #penult_levar = %#final_levar% - 1;
  448. ELSE;
  449. #final_levar = %#x_levar%;
  450. #penult_levar = %#final_levar% - 1;
  451. ENDIF;
  452. DO();
  453. LOOK(north);
  454. KEYDOWN(right);
  455. IF(%XPOS%=%#penult_levar%);
  456. KEYDOWN(sneak);
  457. ENDIF;
  458. GETIDREL(0,1,-2,&verif);
  459. GETIDREL(0,-1,0,&verif2);
  460. IF((%&verif%!="chest")&&(%&verif%!="trapped_chest")||(%&verif2%="air"));
  461. LOG("&6(&fMacro&6) &cSua trap de báus chegou ao Fim&6!");
  462. WAIT(200ms);
  463. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  464. KEYUP(right);
  465. KEYUP(sneak);
  466. UNSET(mkb_macro);
  467. STOP;
  468. ENDIF;
  469. UNTIL((%XPOS%=%#final_levar%)&&(%HITID%="chest")||(%HITID%="trapped_chest"));
  470. KEYUP(sneak);
  471. KEYUP(right);
  472. SET(#x_levar,%XPOS%);
  473. SET(marcar_levar);
  474. ENDIF;
  475. IF(%#baus%=0);
  476. LOOK(0,311);
  477. ENDIF;
  478. IF(%#baus%=1);
  479. LOOK(0,333);
  480. ENDIF;
  481. IF(%#baus%=2);
  482. LOOK(0,5);
  483. ENDIF;
  484. IF(%#baus%=3);
  485. LOOK(0,36);
  486. ENDIF;
  487. IF(%#baus%=4);
  488. LOOK(0,53);
  489. ENDIF;
  490. WAIT(200ms);
  491. SET(vazio);
  492. KEY(USE);
  493. WAIT(500ms);
  494. IF(%GUI%!="GUICHEST");
  495. DO(3);
  496. KEY(use);
  497. WAIT(500ms);
  498. UNTIL(%GUI%="GUICHEST");
  499. ENDIF;
  500. UNSAFE();
  501. FOR(#slot,54,89);
  502. GETSLOTITEM(%#slot%,&id);
  503. IF((%&id%=%&item%)||(pegar_tudo)&&(%&id%!="air"));
  504. SLOTCLICK(%#slot%,l,true);
  505. GETSLOTITEM(%#slot%,&id,#stack);
  506. WAIT(2t);
  507. IF(%#stack%>0);
  508. UNSET(vazio);
  509. BREAK;
  510. ENDIF;
  511. ELSEIF(%&id%!="air");
  512. SLOTCLICK(%#slot%);
  513. WAIT(1t);
  514. SLOTCLICK(-999);
  515. WAIT(2t);
  516. ENDIF;
  517. NEXT;
  518. ENDUNSAFE;
  519. IF(!vazio);
  520. INC(#baus,1);
  521. ENDIF;
  522. IF(%GUI%!="GUICHEST");
  523. LOG("&6(&fMacro&6) &cAlgo aconteceu de &4errado &6!");
  524. WAIT(200ms);
  525. LOG("&6(&fMacro&6) &cTentando novamente&...6");
  526. UNSET(vazio);
  527. ELSE;
  528. GUI();
  529. ENDIF;
  530. UNTIL(vazio);
  531. IF(temp);
  532. IF(marcar_levar);
  533. WAIT(500ms);
  534. DO(2);
  535. LOOK(north);
  536. ECHO("/sethome %&levar_temp%");
  537. WAIT(500ms);
  538. LOOP;
  539. UNSET(marcar_levar);
  540. SET(&levar,%&levar_temp%);
  541. ENDIF;
  542. ENDIF;
  543. ENDIF;
  544. TOGGLE(pegar);
  545. LOOP;
  546. IF(error);
  547. LOG("&6(&fMacro&6) &cTroca de Itens entre MKBs &6(&4OFF&6) &bby Chavez.");
  548. UNSET(mkb_macro);
  549. STOP;
  550. ENDIF;
  551. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement