[EasyUO - REQ] Script x alzare da 0 a 100 MAGERY

[LegioN]

salve.. cerco uno script x EUO x macrare da 0 a 100 magery con lrc, indipendentemente da barca o camminando se lo avete datemelo perfavore..

grazie mille_

[elit]

;==================================
; Modifica per Magery
; Script Name: Auto Necro Land Trainer
; Author: Cogline (Snippets from Zen's Stealth Trainer, And Warlocke's Title Display)
; Version: 1.1
; Client Tested with: 4.0.2a
; EUO version tested with: 1.41
; Shard OSI / FS: FS (should work on OSI)
; Revision Date: 03/07/04
; Public Release: 03/07/04
; Purpose: Random Walking To Gain Necromancy and Spirit Speak
; Without The Need For A Boat.
;==================================


Update 03/09/04 - Added in mana check. Thanks again to Harris for that.

Update 03/08/04 - Added in Meditation Option for those of you who don't have much Int. Thanks Harris


;You Must Have "Enable Event Sysmessage" on to see the messages


initEvents
set %med true ;set this to false if you don't want to meditate
set %maxskill 1000 ;SET THIS TO YOUR CAP!
set %time_start #scnt
set %stepstaken 0
set %countdown 0
set %direction #random % 8
set %dirchange 0
set %walkfail 0
set %lastx #charPosX
set %lasty #charPosY
set %ReStealth_Timer #sCnt
set %quickwait 10
set %wait 15
set %mana #int



start:
gosub magery
gosub skill
gosub walk
gosub medcheck
wait 2s
goto start



sub walk
event sysmessage Walking
wait 1s
set %dirchange ( #random % 2 ) - 1
set %direction %direction + %dirchange
if %direction < 0
set %direction %direction + 8
if %direction > 7
set %direction %direction - 8
set %lastx #charPosX
set %lasty #charPosY
event macro 5 %direction
wait 5
event macro 5 %direction
wait 5
event macro 5 %direction
wait 5
event macro 5 %direction
wait %quickwait
; verify movement (sometimes char just faces new direction)
if #charPosX <> %lastx || #charPosY <> %lasty

{
set %stepstaken %stepstaken + 1
set %walkfail 0
set %interval #sCnt - %ReStealth_Timer
set %countdown 11 - %interval
wait %wait
}
else
{
set %walkfail %walkfail + 1
event macro 5 %direction
if #charPosX <> %lastx || #charPosY <> %lasty
{
set %stepstaken %stepstaken + 1
set %walkfail 0
set %interval #sCnt - %ReStealth_Timer
set %countdown 11 - %interval
wait %wait
}
if %walkfail > 3
goto blocked
}
return

blocked:
if %direction < 4
{
set %direction %direction + 4
}
else
{
set %direction %direction - 3
}
return



castspell:
goto wfm_loop

wfm_loop:
if #mana < %wfm_mananeeded
{

wait 2s
goto wfm_loop
}
event macro 15 %spell
wait 3s

wfm_loop2:
if #mana < 10
{
wait 2s
goto wfm_loop2
}
event Macro 13 32
wait 2s
return

castspell2:
goto wfm_loop2

wfm_loop2:
if #mana < %wfm_mananeeded
{
event sysmessage Meditating
wait 1s
event macro 13 46
wait 4s
scanjournal
if concentration in #journal
goto wfm_loop2
}
event macro 15 %spell
wait 3s
event macro 23 0
wait 1s
event Macro 13 32
wait 2s
return



sub skill
chooseskill magery
if %skill_start = N/A
{
set %skill_start #skill
set %start_major #skill / 10
set %start_minor #skill % 10
set %skStart %start_major , . . %start_minor

}
set %skill_major #skill / 10
set %skill_minor #skill % 10

set %delta_major ( #skill - %skill_start ) / 10
set %delta_minor ( #skill - %skill_start ) % 10
set %skCurrent %skill_major , . . %skill_minor
set %skDelta %delta_major , . . %delta_minor
set %deltaTime ( #scnt - %time_start ) / 60
setuotitle #charname Your Current Magery Skill Level Is %skCurrent And You Have Gained %skDelta
+ In %deltaTime minutes - Currently Casting %cast
return

sub magery
mageryloop:
if #skill < 300
{
display ok Please buy your magery skill up to 30.
halt
}
if #skill >= 300
{
set %spell 16 ;Bless
set %castat 5
set %target 1
set %wfm_mananeeded 9
set %cast Bless
}
if #skill >= 330

{
set %spell 25 ;Arc_Protection
set %castat 11
set %target 0
set %wfm_mananeeded 11
set %cast ArcProtection

}
if #skill >= 400
{
set %spell 35 ;Magic_Reflect
set %castat 23
set %wfm_mananeeded 14
set %cast MagicReflect
}
if #skill >= 620
{
set %spell 47 ;Reveal

set %castat 23
set %wfm_mananeeded 20
set %cast Reveal
}
if #skill >= 760
{
set %spell 53 ;Mass_Dispel

set %castat 23
set %wfm_mananeeded 40
set %cast Mass_Dispel
}
if #skill >= 900
{
set %spell 56 ;Earthquake
set %castat 23
set %wfm_mananeeded 50
set %cast Earthquake
}
if #skill = %maxskill
{
display ok Congratulations! You have reached %maxskill Magery!
halt
}
return


sub medcheck
if %med = true
goto castspell2
if %med = false
goto castspell





nn dirlo a nessuno

[Alex83FE]

in alternativa compri barca ti piazzi sulla rotta infinita fai andare la barca e casti a loop uno spell per ogni circolo dal 1° all'8°

[Eltazor]

sto utilizzando lo script ed ha funzionato fino a 76.0 fino a quando nn ha iniziato a castare mass dispel...però ho notato che da quando casta questa spell nn prendo neanche più un gain

ho cercato di capire cosa fosse e ho scoperto che il pratica castando mass dispel rimane a wait target e nn c'è nessun target per la spell, e quindi è come se nn la si castasse ^^

chi può aiutarmi?? magari inserendo il target su me stesso?

thnx in anticipo

[gelo80]

io ho aggiunto un click del mouse dopo la riga che casta la magia.
Devi cercare:

event macro 15 %spell
wait 3s

Dopo queste due righe aggiungi:

click #CHARPOSX #CHARPOSX dmc

Dove dmc sta per: Don't Move Cursor
Ci sono due punti nello script in cui viene eseguito il comando per castare la magia, la modifica la devi fare in tutti e due i punti. Io poi ho aumentato da 3s (secondi) a 4s il tempo di attesa prima di effettuare il click perchè a volte cliccava prima che il "mirono" fosse disponibile.
saluti

[Eltazor]

perfetto era proprio quello che cercavo thnx 1000

[Boydon]

Originally posted by Daktar il moro

Dopo queste due righe aggiungi:

click #CHARPOSX #CHARPOSX dmc

Non ho capito lo scopo di questo click.

Le coordinate di #charpox e #chaposy sono coordinate del mondo e non del monitor. Quindi a seconda di dove stai vai a fare dei click chissà dove...

Sto script è un po buggoso: se te vedi ci sono 2 label con lo stesso nome ( wfm_loop2) e poi quando si fanno operzioni di target bisogna sempre settare il #ltargetkind al valore corretto.

Questi sono 2 errorini che ho visto a occhio, poi magari ce ne sono altri...

Altra cosa di cui mi sono accorto: lo scanning del journal è un po inaffidabile visto che non tiene conto di possibili interferenze.

Andrebbe risistemato un pochettino.

[gelo80]

Originally posted by Boydon

Le coordinate di #charpox e #chaposy sono coordinate del mondo e non del monitor. Quindi a seconda di dove stai vai a fare dei click chissà dove...

Hai ragione...mi era venuto il dubbio...però lo script modificato così ha funzionato, quindi non mi ero preoccupato del perchè. A questo punto però non saprei quale combinazione di fattori ha fatto si che funzionasse, sono comunque arrivato a 100 di magery.

Effettivamente non è un granchè come script...però la maggior parte degli script per macrare magery usano la nave e mi ero stufato di scontrarmi in mezzo al mare con navi abbandonate ed ho optato per questo che alla fine il suo sporco lavoro lo ha fatto comunque.
saluti

[d0nk4_revenge]

ma xkè mi fa usare anke spirit speack o.O

[delarge]

A me ha abbassato di botto di 35 resspell mah

[danyeleid]

Mi sento buono, avevo deciso di non scriptare + gratuitamente -.-"

set %msg15sec The_world_will_save_in_15_seconds.
set %msgfinesave World_save_complete._The_entire_process_
set %msgright You_did_not_earn_the_right_to_loot_this_creature

;Main LOOP
while #true
      {
      gosub choosespell
      gosub %spell
      sleep 300
      while #mana < #maxmana
            {
            }
      }
;End of Main LOOP

;Subroutines

sub choosespell
chooseskill mage
if #skill >= 0 && #skill <= 100
set %spell weaken
if #skill > 100 && #skill <= 200
set %spell strength
if #skill > 200 && #skill <= 330
set %spell bless
if #skill > 330 && #skill <= 480
set %spell curse
if #skill > 480 && #skill <= 620
set %spell magicrefl
if #skill > 620 && #skill <= 760
set %spell reveal
if #skill > 760 && #skill <= 900
set %spell massdisp
if #skill > 900 && #skill <= 1200
set %spell earth
return
;Spells

sub weaken
event macro 15 7
target 3s
event macro 23 0
return

sub strength
event macro 15 15
target 3s
event macro 23 0
return

sub bless
event macro 15 16
target 3s
event macro 23 0
return

sub curse
event macro 15 26
target 3s
event macro 23 0
return

sub magicrefl
event macro 15 35
sleep 3000
return

sub reveal
event macro 15 47
target 4s
event macro 23 0
return

sub massdisp
event macro 15 53
target 4s
event macro 23 0
return

sub earth
event macro 15 56
sleep 4000
return
;Utility
sub checksave
scanjournal 1
set %j1 #journal
scanjournal 2
set %j2 #journal
scanjournal 3
set %j3 #journal
scanjournal 4
set %j4 #journal
scanjournal 5
set %j5 #journal
scanjournal 6
set %j6 #journal
scanjournal 7
set %j7 #journal
scanjournal 8
set %j8 #journal
scanjournal 9
set %j9 #journal
if %msg15sec in %j1 || %msg15sec in %j2 || %msg15sec in %j3  || %msg15sec in %j4 || %msg15sec in %j5  || %msg15sec in %j6 || %msg15sec in %j7 || %msg15sec in %j8 || %msg15sec in %j9
   {
   if %msgfinesave notin %j1 || %msgfinesave notin %j2 || %msgfinesave notin %j3  || %msgfinesave notin %j4 || %msgfinesave notin %j5  || %msgfinesave notin %j6 || %msgfinesave notin %j7 || %msgfinesave notin %j8 || %msgfinesave notin %j9%msgfinesave notin %j1 || %msgfinesave notin %j2 || %msgfinesave notin %j3  || %msgfinesave notin %j4 || %msgfinesave notin %j5  || %msgfinesave notin %j6 || %msgfinesave notin %j7 || %msgfinesave notin %j8 || %msgfinesave notin %j9
      {
      while %msgfinesave notin %j1 || %msgfinesave notin %j2
            {
            scanjournal 1
            set %j1 #journal
            scanjournal 2
            set %j2 #journal
            }
      wait 3s
      }
   }
return

:*
@elit:esistono le tag code per gli script