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(300ms); | |
| 79 | key(use); | |
| 80 | wait(1500ms); | |
| 81 | ||
| 82 | ||
| 83 | log(Depositando os itens!); | |
| 84 | for(#p,54,89); | |
| 85 | getslotitem(%#p%,&id,#stack); | |
| 86 | ifmatches(%&id%,%&itemid%); | |
| 87 | log(Pulou "ficha"!); | |
| 88 | next; | |
| 89 | endif; | |
| 90 | slotclick(%#p%,right,true); | |
| 91 | wait(120ms); | |
| 92 | next; | |
| 93 | ||
| 94 | wait(150ms); | |
| 95 | getslotitem(53,&id,#stack); | |
| 96 | if(%#stack%>0); | |
| 97 | #numerobaudep=#numerobaudep+1; | |
| 98 | //set(bauagain); | |
| 99 | endif; | |
| 100 | ||
| 101 | gui(); | |
| 102 | wait(1); | |
| 103 | - | if(!bauagain); |
| 103 | + | //if(!bauagain); |
| 104 | }$$ | |
| 105 | /home Cassinobaus | |
| 106 | $${
| |
| 107 | log("Chegou na home para sacarr:verificando bau: %#numerobauget%);
| |
| 108 | #auxbau=#numerobauget/10; | |
| 109 | #bxbau=#numerobauget-(#auxbau*10); | |
| 110 | look(%&rdire%); | |
| 111 | unset(bauagain); | |
| 112 | do(); | |
| 113 | #posx=%XPOS%; | |
| 114 | #posz=%ZPOS%; | |
| 115 | if(%#auxbau%=0); | |
| 116 | log(Chegou1); | |
| 117 | break; | |
| 118 | endif; | |
| 119 | do; | |
| 120 | keydown(LEFT); | |
| 121 | wait(10ms); | |
| 122 | keyup(LEFT); | |
| 123 | until((%XPOS%=%#posx%+2)|(%XPOS%=%#posx%-2)|(%ZPOS%=%#posz%+2)|(%ZPOS%=%#posz%- 2)); | |
| 124 | #auxbau=#auxbau-1; | |
| 125 | loop; | |
| 126 | ||
| 127 | if(%#bxbau%>4); | |
| 128 | do; | |
| 129 | keydown(RIGHT); | |
| 130 | wait(10ms); | |
| 131 | keyup(RIGHT); | |
| 132 | until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%- 1)); | |
| 133 | #bxbau=#bxbau-5; | |
| 134 | endif; | |
| 135 | ||
| 136 | if(%#bxbau%=0); | |
| 137 | look(,55); | |
| 138 | endif; | |
| 139 | ||
| 140 | if(%#bxbau%=1); | |
| 141 | look(,35); | |
| 142 | endif; | |
| 143 | ||
| 144 | if(%#bxbau%=2); | |
| 145 | look(,7); | |
| 146 | endif; | |
| 147 | ||
| 148 | if(%#bxbau%=3); | |
| 149 | look(,-24); | |
| 150 | endif; | |
| 151 | ||
| 152 | if(%#bxbau%=4); | |
| 153 | look(,-50); | |
| 154 | endif; | |
| 155 | ||
| 156 | wait(500ms); | |
| 157 | key(use); | |
| 158 | wait(300ms); | |
| 159 | ||
| 160 | getslotitem(53,&id,#stack); | |
| 161 | if(%#stack%=0); | |
| 162 | #numerobauget=#numerobauget+1; | |
| 163 | set(bauagain); | |
| 164 | else; | |
| 165 | for(#p,0,53); | |
| 166 | slotclick(%#p%,right,true); | |
| 167 | // getslotitem(#36,&id,#stack); | |
| 168 | // if(%#stack%>1); | |
| 169 | // break; | |
| 170 | // endif; | |
| 171 | wait(80ms); | |
| 172 | next; | |
| 173 | endif; | |
| 174 | ||
| 175 | wait(150ms); | |
| 176 | gui(); | |
| 177 | wait(1); | |
| 178 | //endif; | |
| 179 | - | if(!bauagain); |
| 179 | + | //if(!bauagain); |
| 180 | }$$ | |
| 181 | /home Cassino | |
| 182 | $${
| |
| 183 | wait(1); | |
| 184 | do(); | |
| 185 | key(attack); | |
| 186 | wait(100ms); | |
| 187 | while(%@#saida%=0); | |
| 188 | //endif; | |
| 189 | loop; | |
| 190 | ||
| 191 | ||
| 192 | ||
| 193 | endif; | |
| 194 | }$$ |
