use npc;
use os;
use uo;

var me := Self();
const EVID_SPEECH           := 0x0001;
EnableEvents( EVID_SPEECH, 12 );
var event;

program TamedAI()

	while (me)

		event := os::wait_for_event( 2 );
		if ( event )
			case (event.type)

				EVID_SPEECH:
	                             if (event.text["all come"])
		                          while( me )
                                              print("NPC LOOP");
                                              sleep(1);
		                          endwhile
	                             endif

			endcase
                event := 0;
		endif

	endwhile

endprogram