EttoreR |
|
| 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 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
|
| |