annuncio

Comprimi
Ancora nessun annuncio.

[EASYUO - Req] script raccolta bod

Comprimi
X
Comprimi
 
  • Pagina di 1
  • Filtro
  • Ora
  • Visualizza
Elimina tutto
nuovi messaggi
Precedente template Succ.
  • #1

    [EASYUO - Req] script raccolta bod

    salve a tutti tempo fa qui c'era uno script per la raccolta in automatico dei bod con tanto di spiegazione di un colaboratore trif! pls potete ripostarlo se qualcuno lo ha? tnx
    Tag: Nessuno
  • #2
    Ok premetto che questo script funziona solo con i client 4.0.X in quanto con i client successivi al momento di loggare col 2o pg la schermata diventa nera...se qualcuno ha volgia di aggiornarlo ben venga
    Edito per dire che dovete mettere tutti i pg alla locanda di umbra altrimenti non va la rail

    ;================================================= ====================
    ; Script Name: Prendi Bod
    ; Author: Mister X(add autorail and fix bug)
    ; Version: 0.5
    ; Server: UOD
    ; Public Release:19/04/06


    cicla:
    gosub logga 1
    gosub railup
    gosub prendibod
    gosub raildo
    gosub slogga
    gosub logga 2
    gosub railup
    gosub prendibod
    gosub raildo
    gosub slogga
    gosub logga 3
    gosub railup
    gosub prendibod
    gosub raildo
    gosub slogga
    gosub logga 4
    gosub railup
    gosub prendibod
    gosub raildo
    gosub slogga
    gosub logga 5
    gosub railup
    gosub prendibod
    gosub raildo
    gosub slogga
    goto cicla


    sub logga
    _Login:
    SET %cliccaX #CONTPOSX + 100
    SET %cliccaY #CONTPOSY + 87
    click %cliccaX %cliccaY
    wait 2s
    serverDown:
    click 615 453
    wait 10s
    if #CONTNAME = normal_gump && #CONTSIZE = 640_480
    {
    click 615 453
    wait 10s
    _rifine:
    if #CONTNAME = Login_gump
    {
    set %cliccaMakeLastY ( 150 + ( 40 * %1 ) - 25 )
    set %cliccaMakeLastX 360
    click %cliccaMakeLastX %cliccaMakeLastY d
    wait 10s
    }
    else
    {
    click 600 440
    wait 10s
    click 600 440
    wait 10s
    goto _Login
    }
    if #CONTNAME = Login_gump
    goto _rifine
    }
    else
    {
    click 319 350
    wait 60s
    GOTO serverDown
    }
    if #CONTNAME = waiting_gump
    {
    msg $
    wait 60s
    goto _Login
    }
    return



    sub railup

    event macro 32
    scanjournal 1
    if Always_Run_is_now_off. in #journal
    event macro 32


    set %rcnt 8
    set %rX1 2037
    set %rY1 1316
    set %rZ1 -85
    set %rX2 2043
    set %rY2 1316
    set %rZ2 -85
    set %rX3 2047
    set %rY3 1316
    set %rZ3 -90
    set %rX4 2052
    set %rY4 1318
    set %rZ4 -90
    set %rX5 2057
    set %rY5 1325
    set %rZ5 -90
    set %rX6 2065
    set %rY6 1327
    set %rZ6 -90
    set %rX7 2069
    set %rY7 1330
    set %rZ7 -82
    set %rX8 2070
    set %rY8 1332
    set %rZ8 -80


    gosub rail r 0 %rcnt off
    event sysmessage Porca miseria devo fare i Barbed !!!!

    sub specificrail
    set %_x %railname , x . %1
    set %_y %railname , y . %1
    set %_x % . %_x
    set %_y % . %_y
    move %_x %_y 0
    return

    sub rail
    set %railname %1
    set %start %2
    set %end %3
    set %dircheck %4
    set %xtrasub %5
    for %c %start %end
    {
    set %_x %railname , x . %c
    set %_y %railname , y . %c
    set %_x % . %_x
    set %_y % . %_y
    move %_x %_y 0 10s
    if %dircheck = on
    {
    set %d %railname , d . %c
    set %dp % . %d
    set %cdir %dp
    gosub set , %cdir
    }
    if %xtrasub <> n/a
    gosub %xtrasub
    if %raildebug <> N/A
    event sysmessage x: %_x y: %_y d: %dp xtra: %xtrasub
    }
    set %xtrasub n/a
    set %5 n/a
    return


    sub set0
    key pgup
    return
    sub set1
    key right
    return
    sub set2
    key pgdn
    return
    sub set3
    key down
    return
    sub set4
    key end
    return
    sub set5
    key left
    return
    sub set6
    key home
    return
    sub set7
    key up
    RETURN

    sub prendibod
    _riprendi:
    GOSUB CheckConn
    set %vendor DRLF
    finditem %vendor G_10
    wait 20
    if #findkind <> -1
    Exevent Popup #findid
    wait 20
    click 20 70
    wait 20
    if #CONTNAME = generic_gump && #CONTSIZE = 460_279
    {
    wait 20
    set %cliccaMakeLastX #CONTPOSX + 110
    set %cliccaMakeLastY #CONTPOSY + 250
    click %cliccaMakeLastX %cliccaMakeLastY
    return
    }
    return

    SUB CheckConn
    if #contname = waiting_gump && #contsize = 203_121
    {
    wait 60s
    ;Login
    SET %cliccaX #CONTPOSX + 100
    SET %cliccaY #CONTPOSY + 87
    click %cliccaX %cliccaY
    wait 2s
    serverDown:
    click 615 453
    wait 10s
    if #contname = normal_gump
    {
    click 615 453
    wait 10s
    click 615 453
    wait 10s
    }
    else
    {
    click 319 350
    wait 60s
    if #shard = UODreams
    {
    gosub slogga
    }
    GOTO serverDown
    }
    wait 60s
    set %LTime #time
    set %countLogout %countLogout + 1
    }
    RETURN

    sub raildo

    set %rcnt 6
    set %rX1 2070
    set %rY1 1332
    set %rZ1 -80
    set %rX2 2066
    set %rY2 1328
    set %rZ2 -89
    set %rX3 2058
    set %rY3 1321
    set %rZ3 -90
    set %rX4 2052
    set %rY4 1315
    set %rZ4 -90
    set %rX5 2046
    set %rY5 1315
    set %rZ5 -88
    set %rX6 2039
    set %rY6 1315
    set %rZ6 -84

    gosub rail r 0 %rcnt off
    event sysmessage Mo sloggo !!!

    sub specificrail
    set %_x %railname , x . %1
    set %_y %railname , y . %1
    set %_x % . %_x
    set %_y % . %_y
    move %_x %_y 0
    return

    sub rail
    set %railname %1
    set %start %2
    set %end %3
    set %dircheck %4
    set %xtrasub %5
    for %c %start %end
    {
    set %_x %railname , x . %c
    set %_y %railname , y . %c
    set %_x % . %_x
    set %_y % . %_y
    move %_x %_y 0 10s
    if %dircheck = on
    {
    set %d %railname , d . %c
    set %dp % . %d
    set %cdir %dp
    gosub set , %cdir
    }
    if %xtrasub <> n/a
    gosub %xtrasub
    if %raildebug <> N/A
    event sysmessage x: %_x y: %_y d: %dp xtra: %xtrasub
    }
    set %xtrasub n/a
    set %5 n/a
    return


    sub set0
    key pgup
    return
    sub set1
    key right
    return
    sub set2
    key pgdn
    return
    sub set3
    key down
    return
    sub set4
    key end
    return
    sub set5
    key left
    return
    sub set6
    key home
    return
    sub set7
    key up

    RETURN

    sub slogga
    _rifizz:
    event macro 8 1
    wait 20
    contpos 800 0
    wait 20
    click 1020 110
    wait 20
    if #contname = YesNo_gump && #contsize = 178_108
    {
    set %cliccaMakeLastX #CONTPOSX + 120
    set %cliccaMakeLastY #CONTPOSY + 85
    click %cliccaMakeLastX %cliccaMakeLastY
    if #contname = MainMenu_gump
    {
    wait 10s
    return
    }
    }
    goto _rifizz
    return
    Scoprire che Gennapat conosce in real Sir Cloud non ha prezzo
    Gioco solo a LoL

    Originariamente inviato da Nirvana
    mangiano monete e cagano lingotti, è ovvio, quando un drago si impegna caga anche tesori inimmaginabili, è per quello che in ogni grotta di un drago ci sono ricchezze di ogni genere, per esempio se gli dai da mangiare del carbone cagherà diamanti purissimi!

    Commenta

    • #3
      Originariamente inviato da Mime
      Ok premetto che questo script funziona solo con i client 4.0.X in quanto con i client successivi al momento di loggare col 2o pg la schermata diventa nera...se qualcuno ha volgia di aggiornarlo ben venga
      Edito per dire che dovete mettere tutti i pg alla locanda di umbra altrimenti non va la rail
      codice:
      ;=====================================================================
; Script Name: Prendi Bod
; Author: Mister X(add autorail and fix bug)
; Version: 0.5
; Server: UOD
; Public Release:19/04/06


cicla:
gosub logga 1
gosub railup
gosub prendibod
gosub raildo
gosub slogga
gosub logga 2
gosub railup
gosub prendibod
gosub raildo
gosub slogga
gosub logga 3
gosub railup
gosub prendibod
gosub raildo
gosub slogga
gosub logga 4
gosub railup
gosub prendibod
gosub raildo
gosub slogga
gosub logga 5
gosub railup
gosub prendibod
gosub raildo
gosub slogga
goto cicla


sub logga
		_Login:
		SET %cliccaX #CONTPOSX + 100
		SET %cliccaY #CONTPOSY + 87
		click %cliccaX %cliccaY
		wait 2s
		serverDown:
		click 615 453
		wait 10s
		if #CONTNAME = normal_gump && #CONTSIZE = 640_480
		{
			click 615 453
			wait 10s
      _rifine:
      if #CONTNAME = Login_gump
		  {
        set %cliccaMakeLastY ( 150 + ( 40 * %1 ) - 25 )
        set %cliccaMakeLastX 360
        click %cliccaMakeLastX %cliccaMakeLastY d
			  wait 10s
      }
      else
      {
       click 600 440
       wait 10s
       click 600 440
       wait 10s
       goto _Login
      }
      if #CONTNAME = Login_gump
      goto _rifine
    }
		else
		{
			click 319 350
			wait 60s
			GOTO serverDown
		}
    if #CONTNAME = waiting_gump
    {
     msg $
     wait 60s
     goto _Login
    }
return



sub railup

event macro 32
scanjournal 1
    if Always_Run_is_now_off. in #journal
    event macro 32


set %rcnt 8
set %rX1 2037
set %rY1 1316
set %rZ1 -85
set %rX2 2043
set %rY2 1316
set %rZ2 -85
set %rX3 2047
set %rY3 1316
set %rZ3 -90
set %rX4 2052
set %rY4 1318
set %rZ4 -90
set %rX5 2057
set %rY5 1325
set %rZ5 -90
set %rX6 2065
set %rY6 1327
set %rZ6 -90
set %rX7 2069
set %rY7 1330
set %rZ7 -82
set %rX8 2070
set %rY8 1332
set %rZ8 -80


gosub rail r 0 %rcnt off
event sysmessage Porca miseria devo fare i Barbed !!!!

sub specificrail
set %_x %railname , x . %1
set %_y %railname , y . %1
set %_x % . %_x
set %_y % . %_y
move %_x %_y 0
return

sub rail
set %railname %1
set %start %2
set %end %3
set %dircheck %4
set %xtrasub %5
for %c %start %end
{
set %_x %railname , x . %c
set %_y %railname , y . %c
set %_x % . %_x
set %_y % . %_y
move %_x %_y 0 10s
if %dircheck = on
{
set %d %railname , d . %c
set %dp % . %d
set %cdir %dp
gosub set , %cdir
}
if %xtrasub <> n/a
gosub %xtrasub
if %raildebug <> N/A
event sysmessage x: %_x y: %_y d: %dp xtra: %xtrasub
}
set %xtrasub n/a
set %5 n/a
return


sub set0
key pgup
return
sub set1
key right
return
sub set2
key pgdn
return
sub set3
key down
return
sub set4
key end
return
sub set5
key left
return
sub set6
key home
return
sub set7
key up
RETURN

sub prendibod
_riprendi:
GOSUB CheckConn
set %vendor DRLF
finditem %vendor G_10
wait 20
if #findkind <> -1
Exevent Popup #findid
wait 20
click 20 70
wait 20
if #CONTNAME = generic_gump && #CONTSIZE = 460_279
{
wait 20
set %cliccaMakeLastX #CONTPOSX + 110
set %cliccaMakeLastY #CONTPOSY + 250
click %cliccaMakeLastX %cliccaMakeLastY
return
}
return

SUB CheckConn
 if #contname = waiting_gump && #contsize = 203_121
{
 wait 60s
;Login
 SET %cliccaX #CONTPOSX + 100
 SET %cliccaY #CONTPOSY + 87
 click %cliccaX %cliccaY
 wait 2s
 serverDown:
 click 615 453
 wait 10s
  if #contname = normal_gump
 {
  click 615 453
  wait 10s
  click 615 453
  wait 10s
 }
 else
 {
  click 319 350
  wait 60s
     if #shard = UODreams
     {
        gosub slogga
     }
     GOTO serverDown
 }
 wait 60s
 set %LTime #time
 set %countLogout %countLogout + 1
}
RETURN

sub raildo

set %rcnt 6
set %rX1 2070
set %rY1 1332
set %rZ1 -80
set %rX2 2066
set %rY2 1328
set %rZ2 -89
set %rX3 2058
set %rY3 1321
set %rZ3 -90
set %rX4 2052
set %rY4 1315
set %rZ4 -90
set %rX5 2046
set %rY5 1315
set %rZ5 -88
set %rX6 2039
set %rY6 1315
set %rZ6 -84

gosub rail r 0 %rcnt off
event sysmessage Mo sloggo  !!!

sub specificrail
set %_x %railname , x . %1
set %_y %railname , y . %1
set %_x % . %_x
set %_y % . %_y
move %_x %_y 0
return

sub rail
set %railname %1
set %start %2
set %end %3
set %dircheck %4
set %xtrasub %5
for %c %start %end
{
set %_x %railname , x . %c
set %_y %railname , y . %c
set %_x % . %_x
set %_y % . %_y
move %_x %_y 0 10s
if %dircheck = on
{
set %d %railname , d . %c
set %dp % . %d
set %cdir %dp
gosub set , %cdir
}
if %xtrasub <> n/a
gosub %xtrasub
if %raildebug <> N/A
event sysmessage x: %_x y: %_y d: %dp xtra: %xtrasub
}
set %xtrasub n/a
set %5 n/a
return


sub set0
key pgup
return
sub set1
key right
return
sub set2
key pgdn
return
sub set3
key down
return
sub set4
key end
return
sub set5
key left
return
sub set6
key home
return
sub set7
key up

RETURN

sub slogga
   _rifizz:
   event macro 8 1
   wait 20
   contpos 800 0
   wait 20
   click 1020 110
   wait 20
   if #contname = YesNo_gump && #contsize = 178_108
   {
   set %cliccaMakeLastX #CONTPOSX + 120
   set %cliccaMakeLastY #CONTPOSY + 85
   click %cliccaMakeLastX %cliccaMakeLastY
   if #contname = MainMenu_gump
   {
   wait 10s
   return
   }
   }
   goto _rifizz
return
      Scusate l'OT ma suggerirei di usare la tag [CODE] che permette di fare una finestra scrollabile mille volte + comoda in quanto nn fa un post lungo un km..(vedi post mio)

      Commenta

      • #4
        noricum potresti spiegarmi brevemente come si usa dato ke in script ho 0?

        Commenta

        • #5
          Originariamente inviato da mordok
          noricum potresti spiegarmi brevemente come si usa dato ke in script ho 0?
          La tag code o lo script?
          La tag code basta che scrivete (code) *script* (/code),mettendo le parentesi quadre al posto di quelle tonde..Ma è una cosa del forum mica di EasyUO..Serve per non fare Post chilometrici...

          Commenta

          • #6
            Secondo me è molto meglio il raziel's bod gathering (o qualcosa del genere) lo trovate sul sito www.easyuo.com....

            Se non riuscite ad usare il Raziel o ne volete uno in italiano posso sempre crearlo io...
            Ultima modifica di Drael; 10-09-2006, 23:15.
            Slyon su Lost Paradise.
            Downfall, and it all falls down
            I fall from grace I got your taste

            Turn off your mind, unwind
            and see how high the cloudy sky

            Run away Run away
            Leave your lemon drop

            Soak it up Soak it up
            Won't you crush on me
            Boom Boom Satellites - Shut up and Explode | In cerca di un nuovo passatempo.

            Commenta

            • #7
              Sto usando quello di mister x... credevo ke il prblema della skermatanera fosse dovuto al fatto ke nn c'era nulla ke inserisse la password. Ho inserito una stringaper quello ma le cose nn cambiano... Qlkuno mi puo dare una mano?

              Gentilmente dedcatami da un compagno di classe che è venuto a casa mia a osservarmi morire a felucca!!
              Quando i pk fanno ooh
              Dammi la testa perkè mi lasci solo?
              Sai ke a felucca nn si può
              Senza teodebla nessuno
              Può divertirsi un poco
              Per la testa di teò
              Magari litigano un pò ah
              Ma almeno loro ad alta voce
              con il ditino si
              fanno la pace
              perché ogni cosa è nuova è una sorpresa
              e quando arriva teo
              i pk fanno oh
              un po’ di spasso

              RIT. Quando i pk fanno oooohohohohh
              che meraviglia che meraviglia
              Ma ke scemo vedi però, teò
              E si vergogna un po’
              Perché non dura un secondooooooo

              Commenta

              • #8
                Originariamente inviato da mordok
                salve a tutti tempo fa qui c'era uno script per la raccolta in automatico dei bod con tanto di spiegazione di un colaboratore trif! pls potete ripostarlo se qualcuno lo ha? tnx
                http://forum.gamesnet.it/showpost.ph...21&postcount=4

                Cmq mi chiamo Traif ^^"

                Lo script lo puoi prendere anche da www.easyuo.com

                Poi se vuoi mettici le sub per il save (purtroppo nn ho + la versione "vergine", ma solo quella con il mio user e pass quindi preferisco evitare di passarla, nn si sa mai) http://forum.gamesnet.it/showpost.ph...11&postcount=6

                Ed infine fai questa modifichina qui xke sennò non ti prende il bod ma apre il "Buy"

                http://forum.gamesnet.it/showpost.ph...12&postcount=7
                ICQ 716489911
                Discord Traif#4427

                Commenta

                • #9
                  Originariamente inviato da Traif
                  http://forum.gamesnet.it/showpost.ph...21&postcount=4

                  Cmq mi chiamo Traif ^^"

                  Lo script lo puoi prendere anche da www.easyuo.com

                  Poi se vuoi mettici le sub per il save (purtroppo nn ho + la versione "vergine", ma solo quella con il mio user e pass quindi preferisco evitare di passarla, nn si sa mai) http://forum.gamesnet.it/showpost.ph...11&postcount=6

                  Ed infine fai questa modifichina qui xke sennò non ti prende il bod ma apre il "Buy"

                  http://forum.gamesnet.it/showpost.ph...12&postcount=7
                  traif avrei bisogno del tuo aiuto per le trail...ho tentato di farle in tutti i modi ma non funzionano! mi dice di guardare se la ho messa nella stessa cartella dello script (cosa ke ho fatto) potresti postarne una ke va dalla inn di umbra al tailor e l'altra ke torna indietro? grrraaaaaaazie!!!!!

                  ah e magari spiegarmi anke dove devo metterle... tnk!

                  When WindBreakers ruled the World.
                  Come scaricare Ultima Online Automap funzionante

                  Commenta

                  Precedente template Succ.
                  Sto operando...
                  X