Ed ecco la versione dello script sopra senza la necessitą di una barca. Assicuratevi solo di avere libertą di movimento di 88 passi in direzione nord, poi 8 in direzione est, poi ancora 88 sud e infine 8 a ovest (tornando dunque alla posizione iniziale) senza incorrere in ostacoli. Consiglio Haven. Anche questo funziona solo con le Lap Harp.
codice:
;=================== ; Script Name: KaiserMusic&PeaceTrainer ; Author: Kaiser Souze ; Version: 1.0 ; Client Tested with: 4.0.11b ; EUO version tested with: 1.42 (00AA) ; Shard: Ultima Online Dreams ; Revision Date: 08-10-05 ; Public Release:11-01-03 ; Purpose: Trains Peacemaking and Musicianship ;*******MAIN**PROGRAM****** initEvents set %counter 0 SET %instruments QRF event macro 8 7 contpos 1000 700 set %Backpack #CONTID ;*** first-label *** rulla: chooseSkill musi set %skillValueMusicianship #skill chooseSkill peac set %skillValuePeacemaking #skill ;*** second-label *** cicla: msg guards$ gosub pacia wait 11s chooseSkill musi set %actualValueMusicianship #skill set %gainMusicianship %actualValueMusicianship - %skillValueMusicianship chooseSkill peac set %actualValuePeacemaking #skill set %gainPeacemaking %actualValuePeacemaking - %skillValuePeacemaking if %gainMusicianship < 3 && %gainPeacemaking < 3 { goto cicla } else { gosub changeGainZone goto rulla } halt ;SUBROUTINE:PACIA* sub pacia event macro 13 9 target 3s if what_instrument_shall_you_play in #sysMsg { findItem %instruments C_ , %Backpack set #lTargetID #FINDID event macro 22 0 } target 3s event macro 23 0 return ;SUBROUTINE:CHANGEGAINZONE* sub changeGainZone if %counter < 11 { set %newX #charPosX set %newY #charPosY - 8 set %counter %counter + 1 goto move } if %counter = 11 { set %newX #charPosX + 8 set %newY #charPosY set %counter %counter + 1 goto move } if %counter > 11 && %counter <> 23 { set %newX #charPosX set %newY #charPosY + 8 set %counter %counter + 1 goto move } if %counter = 23 { set %newX #charPosX - 8 set %newY #charPosY set %counter 0 goto move } ;*** third-label *** move: move %newX %newY 0 10s goto rulla return
Commenta