Hell's Knights Guild

Script per macrare provocation

« Older   Newer »
  Share  
EttoreR
view post Posted on 27/7/2010, 21:23




Ecco un script per provocation

Si basa su due metodi da 30 a 80 vi farà castare 2 vortex dopo di che li provocherà uno contro l'altro

Dopo 80 vi fa provocare un vortex contro uno Yamadon. Per fare questo dovreste attirare uno yamadon (e già questo non è facile) portarlo vicino una riva, salire in barca solo voi (lo yamadon rimane a riva), mettersi a distanza e lanciare lo script. In automatico rileva lo yamadon e vi fa castare un vortex ed inizia a provocare

Personalmente ho trovato moooolto pericoloso il secondo metodo, alché posso dare suggerimenti per strategie alternative

Non richiede settaggi particolari

SPOILER (click to view)
CODICE
set %­target3 N/A
set %­x1 N/A
set %­y1 N/A
set %­x2 N/A
set %­y2 N/A
finditem NH G_8     ;yamadon type
if #findkind <> -1
{
  set %­target3 #findid
  event exmsg #findid 3 55 Yamadon trovato!
}
set %­instruments KRF_LQF_QRF_PRF_MQF_OQF_NRF_PGP
chooseskill provo
set #TARGCURS 1
if %­target3 = N/A
{
  msg Ora qui arriva
  event exmsg #charid 3 33 Posiziona il mirino sul tile dove evocare il primo vortex e premi ESC
  while %­x1 = N/A
  {
     onhotkey ESC
     {
        set %­x1 #cursorx
        set %­y1 #cursory
        event exmsg #charid 3 75 OK!
     }
     wait 2
  }
  set #TARGCURS 1
  event exmsg #charid 3 33 Posiziona il mirino sul tile dove evocare il secondo vortex e premi ESC
  while %­x2 = N/A
  {
     onhotkey ESC
     {
        set %­x2 #cursorx
        set %­y2 #cursory
        event exmsg #charid 3 75 OK!
     }
     wait 2
  }
}
else
{
  event exmsg #charid 3 33 Posiziona il mirino sul tile dove evocare i vortex e premi ESC
  while %­x1 = N/A
  {
     onhotkey ESC
     {
        set %­x1 #cursorx
        set %­y1 #cursory
        set %­x2 #cursorx
        set %­y2 #cursory
        event exmsg #charid 3 75 OK!
     }
     wait 2
  }
}
set #TARGCURS 0
gosub find_instrument
;**************************************
;**************************************
;**************************************
begin:
if #skill = #skillcap
{
   display Hai raggiunto il cap nella skill!
   halt
}
if #FOLLOWERS < 2
  gosub cast_vortex
set #LTARGETKIND 1
if %­target3 <> N/A
{
  for %­i 1 3
  {
     event macro 13 22
     set #ltargetid %­target . %­i
     target 20
     event macro 22
     if %­i = 3
        set #ltargetid %­target1
     else
        set #ltargetid %­target3
     target 20
     set %­jindex #jindex
     event macro 22
     gosub delay %­jindex
  }
}
else
{
  for %­i 1 2
  {
     event macro 13 22
     set #ltargetid %­target . %­i
     target 20
     event macro 22
     if %­i = 1
        set #ltargetid %­target2
     else
        set #ltargetid %­target1
     target 20
     set %­jindex #jindex
     event macro 22
     gosub delay %­jindex
  }
}
goto begin
;**************************************
;**************************************
;**************************************
sub delay
wait 10
for %counter %1 #jindex
{
  scanjournal %counter
  if your_music_fails in #journal || You_play_poorly in #journal
     wait 90
  if your_music_succeeds in #journal
     wait 190
  if the_instrument_played_its_last_tune in #journal || too_far_away in #journal
     gosub find_instrument
}
return
;**************************************
sub cast_vortex
while #FOLLOWERS < 2
{
  event macro 15 57
  target 100
  set %­time #SCNT + 5
  while #TARGCURS = 0
  {
     if %­time > #SCNT
        break
     wait 1
  }
  while #TARGCURS = 1
  {
     click %­x1 %­y1
     wait 1
  }
  wait 3
}
while #FOLLOWERS < 4
{
  gosub MANACHECK
  event macro 15 57
  target 100
  set %­time #SCNT + 5
  while #TARGCURS = 0
  {
     if %­time > #SCNT
        break
     wait 1
  }
  while #TARGCURS = 1
  {
     click %­x2 %­y2
     wait 1
  }
  wait 3
}
finditem YI_EG G_6
if #findkind <> -1
{
  for #findindex 1 #findcnt
     set %­target . #findindex #findid
}
return
;**************************************
sub find_instrument
finditem %­instruments C_ , #backpackid
if #findkind = -1
  halt
set #LOBJECTID #findid
wait 1
event macro 17
wait 10
return

;------------------------------------------------------------------------
;Checks mana and meditates if necessary
;------------------------------------------------------------------------
sub MANACHECK
if #mana < 40
{
TRYAGAIN:
if #mana = #maxMana
 goto MANALOOP
event macro 13 46
wait 15
scanjournal 1
If meditative in #journal
  goto MANALOOP
wait 11s
goto TRYAGAIN
MANALOOP:
   if #mana < #maxMana
    {
       wait 1
       goto MANALOOP
    }
}
return


Edited by EttoreR - 20/10/2010, 02:02
 
Top
chine'fuckin head
view post Posted on 28/7/2010, 08:29




mi dice di posizionare il mirino sul tile, ma il minirino nn mi esce
 
Top
EttoreR
view post Posted on 28/7/2010, 13:32




Riprova è un po' difettoso (è molto amatoriale come script)
 
Top
chine'fuckin head
view post Posted on 28/7/2010, 18:46




continua imperterrito a non darmi il mirino
 
Top
EttoreR
view post Posted on 29/7/2010, 11:39




Contattami in game che proviamo a farlo funzionare
 
Top
chine'fuckin head
view post Posted on 31/7/2010, 08:17




nada de nada 2 giorni che ci provo ma zero
 
Top
Tekkiru Masashi
view post Posted on 5/2/2011, 02:47




Ne ho postato uno anche io per provo, non avevo visto questo sorry...
 
Top
6 replies since 27/7/2010, 21:23   86 views
  Share