SHOW:
|
|
- or go back to the newest paste.
| 1 | $${
| |
| 2 | #maxbausdep=20; | |
| 3 | #maxbausget=20; | |
| 4 | if(getxu); | |
| 5 | unset(getxu); | |
| 6 | log(&5 parou a macro de cassino); | |
| 7 | stop(); | |
| 8 | else; | |
| 9 | set(getxu); | |
| 10 | &itemid=spawn_egg; | |
| 11 | #numerobaudep=0; | |
| 12 | #numerobauget=0; | |
| 13 | #auxbau=0; | |
| 14 | #bxbau=0; | |
| 15 | #numeroBauGet=0; | |
| 16 | do(); | |
| 17 | @#saida=0; | |
| 18 | }$$ | |
| 19 | /home Cassinobaus | |
| 20 | $${
| |
| 21 | wait(5); | |
| 22 | &dire=%DIRECTION%; | |
| 23 | &rdire=%DIRECTION%; | |
| 24 | ifmatches(%&dire%,N);&dire=NORTH;;&rdire=SOUTH;endif; | |
| 25 | ifmatches(%&dire%,S);&dire=SOUTH;;&rdire=NORTH;endif; | |
| 26 | ifmatches(%&dire%,E);&dire=EAST;;&rdire=WEST;endif; | |
| 27 | ifmatches(%&dire%,W);&dire=WEST;&rdire=EAST;endif; | |
| 28 | ||
| 29 | log("Chegou na home para depositar:verificando bau: %#numerobaudep%);
| |
| 30 | #auxbau=#numerobaudep/10; | |
| 31 | #bxbau=#numerobaudep-(#auxbau*10); | |
| 32 | look(%&dire%); | |
| 33 | unset(bauagain); | |
| 34 | do(); | |
| 35 | #posx=%XPOS%; | |
| 36 | #posz=%ZPOS%; | |
| 37 | if(%#auxbau%=0); | |
| 38 | log(Chegou1); | |
| 39 | break; | |
| 40 | endif; | |
| 41 | do; | |
| 42 | keydown(RIGHT); | |
| 43 | wait(10ms); | |
| 44 | keyup(RIGHT); | |
| 45 | until((%XPOS%=%#posx%+2)|(%XPOS%=%#posx%-2)|(%ZPOS%=%#posz%+2)|(%ZPOS%=%#posz%- 2)); | |
| 46 | #auxbau=#auxbau-1; | |
| 47 | loop; | |
| 48 | ||
| 49 | if(%#bxbau%>4); | |
| 50 | do; | |
| 51 | keydown(RIGHT); | |
| 52 | wait(10ms); | |
| 53 | keyup(RIGHT); | |
| 54 | until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%- 1)); | |
| 55 | #bxbau=#bxbau-5; | |
| 56 | endif; | |
| 57 | ||
| 58 | if(%#bxbau%=0); | |
| 59 | look(,55); | |
| 60 | endif; | |
| 61 | ||
| 62 | if(%#bxbau%=1); | |
| 63 | look(,35); | |
| 64 | endif; | |
| 65 | ||
| 66 | if(%#bxbau%=2); | |
| 67 | look(,7); | |
| 68 | endif; | |
| 69 | ||
| 70 | if(%#bxbau%=3); | |
| 71 | look(,-24); | |
| 72 | endif; | |
| 73 | ||
| 74 | if(%#bxbau%=4); | |
| 75 | look(,-50); | |
| 76 | endif; | |
| 77 | ||
| 78 | wait(500ms); | |
| 79 | key(use); | |
| 80 | wait(300ms); | |
| 81 | ||
| 82 | ||
| 83 | log(Depositando os itens!); | |
| 84 | for(#p,54,89); | |
| 85 | getslotitem(%#p%,&id,#stack); | |
| 86 | ifmatches(%&id%,%&itemid%); | |
| 87 | next; | |
| 88 | endif; | |
| 89 | slotclick(%#p%,right,true); | |
| 90 | wait(80ms); | |
| 91 | next; | |
| 92 | ||
| 93 | wait(150ms); | |
| 94 | getslotitem(53,&id,#stack); | |
| 95 | if(%#stack%>0); | |
| 96 | #numerobaudep=#numerobaudep+1; | |
| 97 | set(bauagain); | |
| 98 | endif; | |
| 99 | ||
| 100 | gui(); | |
| 101 | wait(1); | |
| 102 | if(!bauagain); | |
| 103 | }$$ | |
| 104 | /home Cassinobaus | |
| 105 | $${
| |
| 106 | log("Chegou na home para sacarr:verificando bau: %#numerobauget%);
| |
| 107 | #auxbau=#numerobauget/10; | |
| 108 | #bxbau=#numerobauget-(#auxbau*10); | |
| 109 | look(%&rdire%); | |
| 110 | unset(bauagain); | |
| 111 | do(); | |
| 112 | #posx=%XPOS%; | |
| 113 | #posz=%ZPOS%; | |
| 114 | if(%#auxbau%=0); | |
| 115 | log(Chegou1); | |
| 116 | break; | |
| 117 | endif; | |
| 118 | do; | |
| 119 | keydown(LEFT); | |
| 120 | wait(10ms); | |
| 121 | keyup(LEFT); | |
| 122 | until((%XPOS%=%#posx%+2)|(%XPOS%=%#posx%-2)|(%ZPOS%=%#posz%+2)|(%ZPOS%=%#posz%- 2)); | |
| 123 | #auxbau=#auxbau-1; | |
| 124 | loop; | |
| 125 | ||
| 126 | if(%#bxbau%>4); | |
| 127 | do; | |
| 128 | keydown(RIGHT); | |
| 129 | wait(10ms); | |
| 130 | keyup(RIGHT); | |
| 131 | until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%- 1)); | |
| 132 | #bxbau=#bxbau-5; | |
| 133 | endif; | |
| 134 | ||
| 135 | if(%#bxbau%=0); | |
| 136 | look(,55); | |
| 137 | endif; | |
| 138 | ||
| 139 | if(%#bxbau%=1); | |
| 140 | look(,35); | |
| 141 | endif; | |
| 142 | ||
| 143 | if(%#bxbau%=2); | |
| 144 | look(,7); | |
| 145 | endif; | |
| 146 | ||
| 147 | if(%#bxbau%=3); | |
| 148 | look(,-24); | |
| 149 | endif; | |
| 150 | ||
| 151 | if(%#bxbau%=4); | |
| 152 | look(,-50); | |
| 153 | endif; | |
| 154 | ||
| 155 | wait(500ms); | |
| 156 | key(use); | |
| 157 | wait(300ms); | |
| 158 | ||
| 159 | getslotitem(53,&id,#stack); | |
| 160 | if(%#stack%=0); | |
| 161 | #numerobauget=#numerobauget+1; | |
| 162 | set(bauagain); | |
| 163 | else; | |
| 164 | for(#p,0,53); | |
| 165 | slotclick(%#p%,right,true); | |
| 166 | // getslotitem(#36,&id,#stack); | |
| 167 | // if(%#stack%>1); | |
| 168 | // break; | |
| 169 | // endif; | |
| 170 | wait(80ms); | |
| 171 | next; | |
| 172 | endif; | |
| 173 | ||
| 174 | wait(150ms); | |
| 175 | gui(); | |
| 176 | wait(1); | |
| 177 | endif; | |
| 178 | if(!bauagain); | |
| 179 | }$$ | |
| 180 | /home Cassino | |
| 181 | $${
| |
| 182 | wait(1); | |
| 183 | do(); | |
| 184 | key(attack); | |
| 185 | wait(100ms); | |
| 186 | while(%@#saida%=0); | |
| 187 | endif; | |
| 188 | loop; | |
| 189 | ||
| 190 | ||
| 191 | ||
| 192 | endif; | |
| 193 | }$$ |
