Advertisement
Guest User

Untitled

a guest
Sep 15th, 2019
101
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.19 KB | None | 0 0
  1. $${
  2. if(abb);
  3. unset(abb);
  4. log(&6&lDesligando macro de abóbora);
  5. stop();
  6. else;
  7. set(abb);
  8. #nbau=1;
  9. log(&a&lLigando macro de abóbora);
  10. do;
  11. PROMPT(#nfil,$$?,Começar de qual fileira?);
  12. PROMPT(#film,$$?,Terminar em qual fileira?{número da última});
  13. do;
  14. echo(/home f%#nfil%);
  15. wait(4);
  16. #zp=%ZPOS%;
  17. #xp=%XPOS%;
  18. look(180,0);
  19. do;
  20. #ant=0;
  21. do;
  22. look(180,0);
  23. inc(#ant);
  24. keydown(forward);
  25. if(%#ant%=150);
  26. log(&6&lParece que você bugou);
  27. wait(1);
  28. keyup(forward);
  29. echo(/spawn);
  30. wait(4);
  31. inc(#nfil);
  32. if(%#nfil%=%#film%+1);
  33. #nfil=1;
  34. endif;
  35. echo(/home f%#nfil%);
  36. wait(4);
  37. #zp=%ZPOS%;
  38. #xp=%XPOS%;
  39. endif;
  40. until(%ZPOS%=%#zp%+2);
  41. inc(#zp,2);
  42. keyup(forward);
  43. GETIDREL(0,0,+1,#id1,#d1);
  44. GETIDREL(0,0,+2,#id2,#d2);
  45. GETIDREL(-1,0,+1,#id3,#d3);
  46. GETIDREL(-1,0,+2,#id4,#d4);
  47. if(%#id1%=86);
  48. look(165,50);
  49. wait(50ms);
  50. if(%HITID%!=104);
  51. do;
  52. key(attack);
  53. until(%HITID%!=86);
  54. endif;
  55. endif;
  56. wait(100ms);
  57. if(%#id2%=86);
  58. look(165,30);
  59. wait(50ms);
  60. if(%HITID%!=104);
  61. do;
  62. key(attack);
  63. until(%HITID%!=86);
  64. endif;
  65. endif;
  66. wait(100ms);
  67. if(%#id3%=86);
  68. look(190,50);
  69. wait(50ms);
  70. if(%HITID%!=104);
  71. do;
  72. key(attack);
  73. until(%HITID%!=86);
  74. endif;
  75. endif;
  76. wait(100ms);
  77. if(%#id4%=86);
  78. look(190,30);
  79. wait(50ms);
  80. if(%HITID%!=104);
  81. do;
  82. key(attack);
  83. until(%HITID%!=86);
  84. endif;
  85. endif;
  86. until((%#id1%=5)|(%#id2%=5)|(%#id3%=5)|(%#id4%=5));
  87.  
  88. inc(#nfil);
  89. if(%#nfil%=%#film%+1);
  90. #nfil=1;
  91. endif;
  92. gui(inventory);
  93. wait(100ms);
  94. getslotitem(27,#idi,#di);
  95. gui();
  96. if(%#idi%!=0);
  97. log(&a&lGuardando);
  98. echo(/home abaus);
  99.  
  100.  
  101. wait(4);
  102. do;
  103. do;
  104. log(a);
  105. log(%#nbau%);
  106. if(%#nbau%=1);
  107. look(West);
  108. look(+62,30);
  109. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  110. endif;
  111. if(%#nbau%=2);
  112. look(West);
  113. look(+62,20);
  114. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  115. endif;
  116. if(%#nbau%=3);
  117. look(West);
  118. look(+62,+0);
  119. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  120. endif;
  121. if(%#nbau%=4);
  122. look(West);
  123. look(+62,-10);
  124. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  125. endif;
  126. if(%#nbau%=5);
  127. look(West);
  128. look(+62,-25);
  129. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  130. endif;
  131. if(%#nbau%=6);
  132. look(West);
  133. look(+52,40);
  134. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  135. endif;
  136. if(%#nbau%=7);
  137. look(West);
  138. look(+52,20);
  139. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  140. endif;
  141. if(%#nbau%=8);
  142. look(West);
  143. look(+52,+0);
  144. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  145. endif;
  146. if(%#nbau%=9);
  147. look(West);
  148. look(+52,-20);
  149. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  150. endif;
  151. if(%#nbau%=10);
  152. look(West);
  153. look(+52,-32);
  154. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  155. endif;
  156. if(%#nbau%=11);
  157. look(West);
  158. look(+32,50);
  159. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  160. endif;
  161. if(%#nbau%=12);
  162. look(West);
  163. look(+32,25);
  164. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  165. endif;
  166. if(%#nbau%=13);
  167. look(West);
  168. look(+32,0);
  169. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  170. endif;
  171. if(%#nbau%=14);
  172. look(West);
  173. look(+32,-25);
  174. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  175. endif;
  176. if(%#nbau%=15);
  177. look(West);
  178. look(+32,-40);
  179. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  180. endif;
  181. if(%#nbau%=16);
  182. look(West);
  183. look(+0,55);
  184. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  185. endif;
  186. if(%#nbau%=17);
  187. look(West);
  188. look(+0,+32);
  189. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  190. endif;
  191. if(%#nbau%=18);
  192. look(West);
  193. look(+0,+0);
  194. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  195. endif;
  196. if(%#nbau%=19);
  197. look(West);
  198. look(+0,-30);
  199. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  200. endif;
  201. if(%#nbau%=20);
  202. look(West);
  203. look(+0,-48);
  204. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  205. endif;
  206. if(%#nbau%=21);
  207. look(West);
  208. look(-32,50);
  209. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  210. endif;
  211. if(%#nbau%=22);
  212. look(West);
  213. look(-32,25);
  214. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  215. endif;
  216. if(%#nbau%=23);
  217. look(West);
  218. look(-32,0);
  219. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  220. endif;
  221. if(%#nbau%=24);
  222. look(West);
  223. look(-32,-25);
  224. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  225. endif;
  226. if(%#nbau%=25);
  227. look(West);
  228. look(-32,-40);
  229. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  230. endif;
  231. if(%#nbau%=26);
  232. look(West);
  233. look(-50,40);
  234. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  235. endif;
  236. if(%#nbau%=27);
  237. look(West);
  238. look(-50,24);
  239. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  240. endif;
  241. if(%#nbau%=28);
  242. look(West);
  243. look(-50,0);
  244. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  245. endif;
  246. if(%#nbau%=29);
  247. look(West);
  248. look(-50,-20);
  249. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  250. endif;
  251. if(%#nbau%=30);
  252. look(West);
  253. look(-50,-34);
  254. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  255. endif;
  256. if(%#nbau%=31);
  257. look(West);
  258. look(-61,32);
  259. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  260. endif;
  261. if(%#nbau%=32);
  262. look(West);
  263. look(-61,20);
  264. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  265. endif;
  266. if(%#nbau%=33);
  267. look(West);
  268. look(-61,0);
  269. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  270. endif;
  271. if(%#nbau%=34);
  272. look(West);
  273. look(-61,-15);
  274. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  275. endif;
  276. if(%#nbau%=35);
  277. look(West);
  278. look(-61,-26);
  279. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  280. endif;
  281. if(%#nbau%=36);
  282. look(East);
  283. look(-61,32);
  284. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  285. endif;
  286. if(%#nbau%=37);
  287. look(East);
  288. look(-61,20);
  289. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  290. endif;
  291. if(%#nbau%=38);
  292. look(East);
  293. look(-61,0);
  294. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  295. endif;
  296. if(%#nbau%=39);
  297. look(East);
  298. look(-61,-15);
  299. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  300. endif;
  301. if(%#nbau%=40);
  302. look(East);
  303. look(-61,-26);
  304. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  305. endif;
  306. if(%#nbau%=41);
  307. look(East);
  308. look(-50,40);
  309. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  310. endif;
  311. if(%#nbau%=42);
  312. look(East);
  313. look(-50,24);
  314. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  315. endif;
  316. if(%#nbau%=43);
  317. look(East);
  318. look(-50,0);
  319. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  320. endif;
  321. if(%#nbau%=44);
  322. look(East);
  323. look(-50,-20);
  324. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  325. endif;
  326. if(%#nbau%=45);
  327. look(East);
  328. look(-50,-34);
  329. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  330. endif;
  331. if(%#nbau%=46);
  332. look(East);
  333. look(-32,50);
  334. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  335. endif;
  336. if(%#nbau%=47);
  337. look(East);
  338. look(-32,25);
  339. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  340. endif;
  341. if(%#nbau%=48);
  342. look(East);
  343. look(-32,0);
  344. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  345. endif;
  346. if(%#nbau%=49);
  347. look(East);
  348. look(-32,-25);
  349. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  350. endif;
  351. if(%#nbau%=50);
  352. look(East);
  353. look(-32,-40);
  354. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  355. endif;
  356. if(%#nbau%=51);
  357. look(East);
  358. look(+0,55);
  359. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  360. endif;
  361. if(%#nbau%=52);
  362. look(East);
  363. look(+0,+32);
  364. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  365. endif;
  366. if(%#nbau%=53);
  367. look(East);
  368. look(+0,+0);
  369. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  370. endif;
  371. if(%#nbau%=54);
  372. look(East);
  373. look(+0,-30);
  374. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  375. endif;
  376. if(%#nbau%=55);
  377. look(East);
  378. look(+0,-48);
  379. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  380. endif;
  381. if(%#nbau%=56);
  382. look(East);
  383. look(+32,50);
  384. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  385. endif;
  386. if(%#nbau%=57);
  387. look(East);
  388. look(+32,25);
  389. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  390. endif;
  391. if(%#nbau%=58);
  392. look(East);
  393. look(+32,0);
  394. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  395. endif;
  396. if(%#nbau%=59);
  397. look(East);
  398. look(+32,-25);
  399. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  400. endif;
  401. if(%#nbau%=60);
  402. look(East);
  403. look(+32,-40);
  404. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  405. endif;
  406. if(%#nbau%=61);
  407. look(East);
  408. look(+52,40);
  409. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  410. endif;
  411. if(%#nbau%=62);
  412. look(East);
  413. look(+52,20);
  414. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  415. endif;
  416. if(%#nbau%=63);
  417. look(East);
  418. look(+52,+0);
  419. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  420. endif;
  421. if(%#nbau%=64);
  422. look(East);
  423. look(+52,-20);
  424. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  425. endif;
  426. if(%#nbau%=65);
  427. look(East);
  428. look(+52,-32);
  429. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  430. endif;
  431. if(%#nbau%=66);
  432. look(East);
  433. look(+62,30);
  434. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  435. endif;
  436. if(%#nbau%=67);
  437. look(East);
  438. look(+62,20);
  439. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  440. endif;
  441. if(%#nbau%=68);
  442. look(East);
  443. look(+62,+0);
  444. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  445. endif;
  446. if(%#nbau%=69);
  447. look(East);
  448. look(+62,-10);
  449. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  450. endif;
  451. if(%#nbau%=70);
  452. look(East);
  453. look(+62,-25);
  454. log("&a&l[Macro]&e Bau %#nbau% &1- [&6&lAbóbora]");
  455. endif;
  456. wait(500ms);
  457. key(use);
  458. wait(1);
  459. ifmatches(%GUI%,guichest);
  460. #abc=1;
  461. else;
  462. #abc=0;
  463. endif;
  464. until(%#abc%=1);
  465. log(oi);
  466. getslotitem(53,#id0,#s);
  467. if(%#id0%!=0);
  468. inc(#nbau);
  469. gui();
  470. #vazio=0;
  471. log(k);
  472. if(%#nbau%=71);
  473. #nbau=1;
  474. endif;
  475. else;
  476. #vazio=1;
  477. endif;
  478. log(%#vazio%);
  479. until(%#vazio%=1);
  480. for(#click,54,87);
  481. slotclick(%#click%,l,true);
  482. wait(50ms);
  483. next;
  484. getslotitem(53,#id);
  485. wait(300ms);
  486. gui();
  487. log(b);
  488. if(%#id%=0);
  489. ir=1;
  490. log(c);
  491. else;
  492. #ir=0;
  493. log(d);
  494. inc(#nbau);
  495. if(%#nbau%=71);
  496. #nbau=1;
  497. endif;
  498. endif;
  499. until(#ir=1);
  500. loop;
  501. endif;
  502. loop;
  503. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement