Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // https://www.messenger.com/t/WDS.Denz
- prontera,155,181,5 script Thana Event 4_F_KAFRA1,{
- doevent "thana_main::OnTalk";
- }
- boss,51,43,5 script Thana Summoner 4_F_KAFRA1,{
- doevent "thana_main::OnSummon";
- }
- - script thana_main -1,{
- OnInit:
- .minute = 60;
- .map$ = "boss";
- setarray .required_nameid,501,502,503,504;
- setarray .required_amount,1,2,3,4;
- .required_nameid_size = getarraysize( .required_nameid );
- .npc_name$ = strnpcinfo(3);
- end;
- OnMinute00:
- if ( gettime(3) % 3 == 0 ) {
- .status = 1;
- announce "<Thana Event> available now.",bc_all;
- sleep ( .minute * 60000 );
- mapwarp .map$,"prontera",155,181;
- .party_id = 0;
- .status = 0;
- .password$ = "";
- sleep 3000;
- announce "<Thana Event> closed now.",bc_all;
- }
- end;
- OnTalk:
- .@party_id = getcharid(1);
- .@cid = getcharid(0);
- if ( !.@party_id ) {
- mes "You dont have party.";
- }
- else if ( .@cid != getpartyleader( .@party_id,2 ) ) {
- mes "You're not party leader.";
- }
- else if ( .password$ != "" && .party_id == .@party_id ) {
- input .@password$;
- if ( .@password$ == .password$ ) {
- warp .map$,0,0;
- }
- else {
- mes "Invalid password.";
- }
- }
- else if ( getmapusers( .map$ ) > 0 ) {
- mes "Another party already entered.";
- }
- else {
- .party_id = .@party_id;
- .can_summon = 1;
- mes "Enter Password for the room.";
- input .password$;
- warp .map$,0,0;
- }
- close;
- OnSummon:
- .@party_id = getcharid(1);
- .@cid = getcharid(0);
- if ( !.@party_id ) {
- mes "You dont have party.";
- }
- else if ( .@cid != getpartyleader( .@party_id,2 ) ) {
- mes "You're not party leader.";
- }
- else if ( !.can_summon ) {
- mes "You cant summon more than once.";
- }
- else {
- mes "Required item:";
- for ( .@i = 0; .@i < .required_nameid_size; .@i++ ) {
- mes "> "+.required_amount[.@i]+"x "+getitemname( .required_nameid[.@i] );
- if ( countitem( .required_nameid[.@i] ) < .required_amount[.@i] )
- .@fail++;
- }
- if ( !.@fail )
- if ( select( "Summon","Cancel" ) == 1 ) {
- for ( .@i = 0; .@i < .required_nameid_size; .@i++ )
- delitem .required_nameid[.@i], .required_amount[.@i];
- monster .map$,0,0,"--ja--",1708,1,.npc_name$+"::OnKill";
- .can_summon = 0;
- }
- }
- close;
- OnKill:
- awake .npc_name$;
- end;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement