Dovrei modificarlo per farle esplodere al contatto, solo che non ho idea di come modificarlo
settato cosi esplodono troppo presto, come posso fare? tnx
settato cosi esplodono troppo presto, come posso fare? tnx
codice:
;================================== ; Script Name: Tri-pot chunker (explode on contact) ; Author: Aahz ; Version: 1.2 ; Client Tested with: 4.0.2.a ; EUO version tested with: 1.42.0082 ; Shard OSI / FS: OSI ; Revision Date: June 1, 2004 ; Public Release: May 31, 2004 ; Purpose: Throws three explosion potions at a target, set to explode on contact, ; after you hit a designated hotkey ;================================== ;set this to the hotkey that you want to trigger the booms set %hotkey F12 ;set this to the message you want your character to say, to alert you to target your victim set %msg "" ;probably shouldn't mess with this, set to 4 will make them explode on you, 2 will not wait long enough set %wait1 3 ;At first, this was 10-12, but after further testing, 4 seems to work perfectly on my machine. set %wait2 4 ;LinesPerCycle set %lpc 100 ;================================== initevents tile init display ok Press %hotkey when ready. LinesPerCycle %lpc loop: gosub findboom gosub hotkey gosub boom gosub setwait gosub throw goto loop: sub findboom findloop: for %a 1 3 { finditem TUF set %pot , %a #findid ignoreitem #findid } if %pot1 = x goto findloop return sub hotkey hotkeyloop: onhotkey %hotkey goto startthrow goto hotkeyloop startthrow: msg $ %msg $ set #targcurs 1 targetloop: if #targcurs = 1 goto targetloop set %target #ltargetid return sub boom set %charposx #charposx set %charposy #charposy for %b 1 3 { wait %wait1 set #lobjectid %pot . %b event macro 17 target key esc } return sub setwait finditem %target if #finddist > 9 { set %wait3 %wait2 - 2 goto setwait } if #finddist > 7 set %wait3 %wait2 - 1 setwait: set %movewait %wait2 - 4 return sub throw if #charposx <> %charposx || #charposy <> %charposy wait %movewait else wait %wait3 for %c 1 3 { wait %wait1 set #lobjectid %pot . %c event macro 17 finditem %target if #finddist > 12 || #findkind = -1 || #finddist = N/A gosub abort set #ltargetid %target target event macro 22 } return sub abort set %tx #charposx + 3 set %ty #charposy + 3 set #lTargetX %tx set #lTargetY %ty set #lTargetZ #charposz set #lTargetKind 2 return
Commenta