Jaanva


Usuario
Que Necesitamos?

Primeramente necesitamos tener el LegitBot abierto en nuestra PC.
Luego un personaje de nivel 30 a mas, con PET Y ITEM POUCH.


Que hace?

Sirve para botear en las minas en Ardentill, otro termino sirve para sacar ores.

Como usarlo?

Comprar los tickets de "MINERIA" en la tienda de Ardentill, entrar a la mina y empezar a usar el Script.

Código:
Set @i 0


Function Mine(x,y)
  If Global.Map = 910001000 Then
  Else
      Teleport x y
      Sleep 1000
      Sendkey 32
      Sleep 4500
      For i=1,4,1
          Sendkey 90
          Sleep 400
      EndFor
      Sleep 2500
  EndIf
EndFunction


Start:
Mine 170 505
Mine 370 505
Mine 520 505
Mine 800 505
Mine 950 505
Mine 1100 505
Mine 1410 505
Mine 200 205
Mine 340 205
Mine 530 205
Mine 760 205
Mine 970 205
Mine 1150 205
Mine 1300 145
Mine 1470 145
Mine 440 -35
Mine 570 -35
Mine 720 -35
Mine 1060 -35
Goto @Start

Si alguien puede mejorarlo se lo agradeceria mucho, ya que no tengo tiempo para modificarlo. Si encuentran la manera de que recoja sin pet agradezco la informacion y la añadire de inmediato.

Saludos.





Invito a todo aquel que tenga otros scripts a publicarlos y asi compartir con la comunidad.
Dom 12 Ago - 18:42     editar
           

lDenkizzl


Usuario
buen scrip janva
se mina solo cierto?
Lun 13 Ago - 8:57     editar
           

blasix1992


Usuario
si alguien sabe como hacer para sacar estos famosos scrip que me diga porfavor se los pido me remil serviria gracias
Lun 13 Ago - 9:23     editar
           

gransadico


Usuario
y como funcion pliz copio todo Set @i 0 Function Mine(x,y) If Global.Map = 910001000 Then Else Teleport x y Sleep 1000 Sendkey 32 Sleep 4500 For i=1,4,1 Sendkey 90 Sleep 400 EndFor Sleep 2500 EndIf EndFunction Start: Mine 170 505 Mine 370 505 Mine 520 505 Mine 800 505 Mine 950 505 Mine 1100 505 Mine 1410 505 Mine 200 205 Mine 340 205 Mine 530 205 Mine 760 205 Mine 970 205 Mine 1150 205 Mine 1300 145 Mine 1470 145 Mine 440 -35 Mine 570 -35 Mine 720 -35 Mine 1060 -35 Goto @Start y no hace nada se queda sigue parado
Lun 13 Ago - 9:54     editar
           

gransadico


Usuario
Set @i 0
Function Mine(x,y)
If Global.Map = 910001000 Then
Else
Teleport x y
Sleep 1000
Sendkey 32
Sleep 4500
For i=1,4,1
Sendkey 90
Sleep 400
EndFor
Sleep 2500
EndIf
EndFunction
Start:
Mine 170 505
Mine 370 505
Mine 520 505
Mine 800 505
Mine 950 505
Mine 1100 505
Mine 1410 505
Mine 200 205
Mine 340 205
Mine 530 205
Mine 760 205
Mine 970 205
Mine 1150 205
Mine 1300 145
Mine 1470 145
Mine 440 -35
Mine 570 -35
Mine 720 -35
Mine 1060 -35
Goto @Start lo puse de esta forma y solo se letrasporta pliz alguien q me duga como hacer para q saque los ores
Lun 13 Ago - 10:01     editar
           

Jaanva


Usuario
Pon la tecla "NPC" en la tecla "Z"
Lun 13 Ago - 10:31     editar
           

gransadico


Usuario
@Jaanva escribió:Pon la tecla "NPC" en la tecla "Z"
la decier la tecla (NPC) TE REFIERES ALA Q ESTA EN LA PECLA DEL ESPASIO NO ya lo hice pero no recoje las ores alguna ayuda
Lun 13 Ago - 10:51     editar
           

Ed!


드래곤
Prueba esta:

Set @i 0


Function Mine(x,y)
Teleport x y
Sleep 1000
Sendkey 32
Sleep 4500
For i=1,4,1
Sendkey 90
Sleep 400
EndFor
Sleep 2500
EndFunction


Start:
Mine 170 505
Mine 370 505
Mine 520 505
Mine 800 505
Mine 950 505
Mine 1100 505
Mine 1410 505
Mine 200 205
Mine 340 205
Mine 530 205
Mine 760 205
Mine 970 205
Mine 1150 205
Mine 1300 145
Mine 1470 145
Mine 440 -35
Mine 570 -35
Mine 720 -35
Mine 1060 -35
Goto @Start
Lun 13 Ago - 10:58     editar
           

gransadico


Usuario
gracias por finnnnnnnnnn ya esta recogiendo el ore
Lun 13 Ago - 11:27     editar