Private Sub Teste

Quibom Eu fazia um pouco mais que isso (com mais um zero) em meu druid

http://www.megaupload.com/?d=DDAJ6ZPZ Aki há um exemplo que eu fiz para um outro fórum em que eu participava, porém, perdi o código dele pois computador deu problemas e tive que formatar, perdendo todos os dados...

Deve ser algo ai nas configurações do seu VB.NET, aqui está funcionando normal...

Aham, seu PAI! Aham...

Hum, granolaaaaaaa

Pena que eu só jogo Point Blank

Quer de quantos meses? Quanto paga?

Use por conta e risco o Mage Bot Clique aqui ~ MediaFire (não, eu não hospedei) Clique aqui ~ VirusTotal (eu que fiz o scan) Ps: não aconselho a baixar, mas, se estiver muito precisando, use por conta e risco, não me responsabilizo por danos causados ao computador.

Mage Bot tem para a versão 8.00 Acho que é só...

Eu to zoando Matheus, axa que sou loco de comprar AC/DC com essa banda? WEUIWUEI

Melhor que AC/DC, certeza õ/ ( tem muito oque melhorar, porém achei legal ;p )

rsrsrsrs Verdade...

Guido mode ON.

Também não fui trollado... :coolface:

Disserto vo vir com 2 mãos no mouse? Não so alejado, tenho 3 dedos pra apertar os botões :coolface:

Os cara tao zuando hoje

FIADAPUTA Vim com uma mão só no mouse ¬¬'

Verei.

Pronto meu amigo... NumberOfMonsters = 3 /// Numero de monstros pra trocar arma StrongWeapon = 3324 /// ID da arma FORTE WearWeapon = 3304 /// ID da arma FRACA function GetItemFromOpenBackpack(ID: integer): TItem; var y: integer; begin Result := nil; for x := 0 to Self.Containers.Count - 1 do begin if x >= Self.Containers.Count then Break; for y := 0 to Self.Containers.Container[x].Count - 1 do begin if y >= Self.Containers.Container[x].Count then Break; if Self.Containers.Container[x].Item[y].ID = ID then begin Result := Self.Containers.Container[x].Item[y]; Exit; end; end; end; end; function CountMonstersBesideYou:Integer; begin Result := 0; UpdateWorld; for i := 0 to creatures.Count -1 do begin if i >= Creatures.Count then break for x := -1 to 1 do begin if x >= 2 then break for y := -1 to 1 do begin if y > 1 then break; if Creatures.Creature[i].NPC then if (Creatures.Creature[i].x = Self.X +x) and (Creatures.Creature[i].y = Self.y + y) and (Creatures.Creature[i].Z = Self.Z) then Result := Result + 1; end; end; end; end; while not terminated do begin UpdateWorld; if CountMonstersBesideYou >= NumberOfMonsters then begin if Self.RightHand.ID <> StrongWeapon then begin Boots := GetItemFromOpenBackpack(StrongWeapon); if Boots <> nil then Boots.MoveToBody(Self.RightHand,0); else Self.Displaytext('Strong Weapon werent found in open backpack!'); end; end; if CountMonstersBesideYou < NumberOfMonsters then begin if Self.RightHand.ID <> WearWeapon then begin Boots := GetItemFromOpenBackpack(WearWeapon); if Boots <> nil then Boots.MoveToBody(Self.RightHand,0); else Self.Displaytext('Wear Weapon werent found in open backpack!'); end; end; Ps: Testa porque eu não tenho NG, se funcionar REP++

Verdade...

Só sei que 2012 está chegando, ALELUIA !!!!!!!!!! Fim dessas modinhas escrotas ¬¬' <s>Roda roda vira, roda roda vem...</s>

Porque o rock brasileiro não volta como antigamente???

Conexão do Mega é lenta pracaralho

Que bom champs, mas eu tenho uma dúvida... Por que a hora do seu relógio está diferente a hora do teste realizado? oO ---------EDITED Site é 'ruim', varia a velocidade demais, recomendo http://www.speedtest.net/