[SOLVED] Ingame Realtime GMs Broadcast NPC

[Xtremist]

eA.ws Reference

SQL

create table hourly_announcer (
id tinyint(4) unsigned primary key,
message varchar(211)
) engine = myisam;

eA script

prontera,154,188,5 script announcera 100,{
if ( getgmlevel() < 99 ) end;
set [email protected], query_sql("select * from hourly_announcer order by id", [email protected], [email protected]$);
if ( [email protected] == 0 ) mes " ";
for ( set [email protected], 0; [email protected] < [email protected]; set [email protected], [email protected] +1 )
 mes "^FF0000"+ [email protected][[email protected]] +". ^000000"+ [email protected]$[[email protected]];
next;
set [email protected], select("1:2:3:4:5:6:7:8:9:test");
if ( [email protected] == 10 ) goto OnMinute00;
do {
 set [email protected], [email protected] +1 ;
 input getd("[email protected]"+ [email protected] +"$");
} while ( getstrlen( getd("[email protected]"+ [email protected] +"$") ) > 50 && [email protected] < 3 );
if ( [email protected]$ == " " )
 query_sql "delete from hourly_announcer where id = "+ [email protected];
else
 query_sql "replace into hourly_announcer values ( "+ [email protected] +", '"+ escape_sql([email protected]$) + escape_sql([email protected]$) + escape_sql([email protected]$) +"' )";
close;
OnMinute00:
announce "The Server Time is Now "+ gettime(3) + gettimestr(":%M %p",10), 16;
sleep 2500;
set [email protected], query_sql("select message from hourly_announcer order by id", [email protected]$);
for ( set [email protected], 0; [email protected] < [email protected]; set [email protected], [email protected] +1 ) {
 announce [email protected]$[[email protected]], 16;
 sleep 2500;
}
end;
}

Problem is :

While I use the "Test" the window remains there.

I m not getting how to get the close button on it.

More enhancement to this if possible

[Truly]

Just add a close2; in this spot (With minor edits ^^)

if ( [email protected] == 10 ) goto OnMinute00;

to

if ( [email protected] == 10 ) {
close2;
goto OnMinute00;
}

Edited November 28, 2011 by Truly