polserver/testsuite/pol/testpkgs/attack/ai_attack.src
Kevin Eady 2589457275
Attack when character (defender) unhides (#661)
* Implementation

* tests

* core changes
2024-07-13 18:28:50 +02:00

34 lines
708 B
Text

use uo;
use os;
use npc;
include "sysevent";
program enteredarea()
var me := self();
while ( me )
var ev := wait_for_event( 5 );
if ( ev )
if ( ev.type == SYSEVENT_DISENGAGED )
SetOpponent( 0 );
elseif ( ev.type == SYSEVENT_ENGAGED )
SetOpponent( ev.source );
if ( ev.sleep > 0 )
Sleep( ev.sleep ); // Sleep to set ready-swing.
endif
if ( ev.unhide )
var ev := struct{
type := "BEFORE_UNHIDE",
gameclock := ReadGameClock()
};
GetProcess( GetObjProperty( me, "#TestPid" ) ).SendEvent( ev );
me.hidden := 0;
endif
endif
endif
endwhile
endprogram