Jump to content

emperiumtest

Petey Pablo
 Share

Recommended Posts

Petey Pablo Poring

Petey Pablo

Posted
  • Group:  Members
  • Topic Count:  152
  • Topics Per Day:  0.03
  • Content Count:  569
  • Reputation:   11
  • Joined:  11/24/11
  • Last Seen:  
Posted

Paano po mag disable ng mga MVP BOSS sa map? Help po.

pvp_n_4-5 mapflag restricted 7
prontera,146,189,5 script Emperium Breaker Test 884,{

set @time, $empbrk_record;
set @m, @time / 60000;
set @time, @time - (@m * 60000);
set @s, @time /1000;
set @time, @time - (@s * 1000);

mes "[Emperium Breaker Test]";
mes "Official Record by ^5050A0"+$empbrk_record$+"^000000";
mes " ^000080"+@m+"^000000m ^000080"+@s+"^000000s ^000080"+@time+"^000000ms";

set @time, empbrk_record;
set @m, @time / 60000;
set @time, @time - (@m * 60000);
set @s, @time /1000;
set @time, @time - (@s * 1000);
mes "Your Own Record:";
mes " ^000080"+@m+"^000000m ^000080"+@s+"^000000s ^000080"+@time+"^000000ms";

mes "Would you like to try a new record?";
next;
if (getgmlevel()==99) { menu "Standard Menu",-,"Reset",L_reset,"Reset Rooms",L_emptyrooms,"Exit",L_exit;}
menu "Yes",-,"No",L_exit,"Reset",L_resc;
cleararray .arena$[0],"",4;
mes "[Emperium Breaker Test]";
if (getareausers("pvp_n_4-5",94,128,105,139)) mes "Emp n° ^0000DF1 ^FF0000 Busy^000000";
else{ mes "Room ^0000DF1 ^00A000 Free^000000";  set .arena$[0],"^0000DFEmperium^000000";}
if (getareausers("pvp_n_4-5",60,94,71,105)) mes "Emp n° ^B05D002 ^FF0000 Busy^000000";
else{ mes "Room ^B05D002 ^00A000 Free^000000"; set .arena$[1],"^B05D00Emperium^000000";}
if (getareausers("pvp_n_4-5",94,60,105,71)) mes "Emp n° ^B00FB03 ^FF0000 Busy^000000";
else{ mes "Room ^90AF003 ^00A000 Free^000000"; set .arena$[2],"^90AF00Emperium^000000";}
if (getareausers("pvp_n_4-5",128,94,139,105)) mes "Emp n° ^50AF004 ^FF0000 Busy^000000";
else{ mes "Room ^500F004 ^00A000 Free^000000"; set .arena$[3],"^500F00Emperium^000000";}
next;
getmapxy(@mpempbrk$,@empbrkx,@empbrky,0,strcharinfo(0));
switch (select(.arena$[0],.arena$[1],.arena$[2],.arena$[3],"Esci")){

case 1:
if (getareausers("pvp_n_4-5",60,94,71,105) == 0){
if($@someonegotin1 > 0){ mes "Room is now BUSY"; close;}
set $@someonegotin1, 1;
warp "pvp_n_4-5",99,128;
killmonster "pvp_n_4-5","EmpBrk#1::OnThisMobDeath";
initnpctimer "EmpBrk#1";}
break;

case 2:
if (getareausers("pvp_n_4-5",60,94,71,105) == 0){  
if($@someonegotin2 > 0){ mes "Room is now BUSY"; close;}
set $@someonegotin2, 1;	
warp "pvp_n_4-5",68,99;
killmonster "pvp_n_4-5","EmpBrk#2::OnThisMobDeath";
initnpctimer "EmpBrk#2";}
break;
case 3:
if (getareausers("pvp_n_4-5",94,60,105,71) == 0){  
if($@someonegotin3 > 0){ mes "Room is now BUSY"; close;}
set $@someonegotin3, 1;	
warp "pvp_n_4-5",100,68;
killmonster "pvp_n_4-5","EmpBrk#3::OnThisMobDeath";
initnpctimer "EmpBrk#3";}
break;
case 4:
if (getareausers("pvp_n_4-5",128,94,139,105) == 0){
if($@someonegotin4 > 0){ mes "Room is now BUSY"; close;}
set $@someonegotin4, 1;	  
warp "pvp_n_4-5",130,99;
killmonster "pvp_n_4-5","EmpBrk#4::OnThisMobDeath";
initnpctimer "EmpBrk#4";}
break;

default:
close;

}
sc_end SC_ALL;
close;
L_reset:
mes "[Emperium Breaker Test]";
mes "Are you sure to reset official record ?";
menu "Yes",-,"No",L_exit;
set $empbrk_record, 0;
set $empbrk_record$, "";
close;
L_resc:
mes "[Emperium Breaker Test]";
mes "Are you suere to rest your record?";
menu "Yes",-,"No",L_exit;
set empbrk_record, 0;
L_emptyrooms:
set $@someonegotin1, 0;
set $@someonegotin2, 0;
set $@someonegotin3, 0;
set $@someonegotin4, 0;
close;
L_exit:
close;  

}
- script EmpBrk#1 -1,{
OnTimer3000:
if (.end == 1) {	warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 0;
}
end;  

OnTimer5000:
set .x1,94;
set .y1,128;
set .x2,105;
set .y2,139;
set .xe,100;
set .ye,134;

areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Let's ready to break the Emperium",0;
set $@someonegotin1, 0;
end;

OnTimer7000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",0;
end;
OnTimer8000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",0;
end;
OnTimer9000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",0;
end;
OnTimer10000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",0;
end;
OnTimer11000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",0;
end;
OnTimer12000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",0;
monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#1::OnThisMobDeath";
end;
OnTimer1200000:
warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 1;
end;
OnThisMobDeath:
stopnpctimer "EmpBrk#1";
set .time, getnpctimer(0,"EmpBrk#1");
set .time, .time - 12000;
if (.time < empbrk_record || empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",0;
	set empbrk_record, .time;

}
if (.time < $empbrk_record || $empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Official Record!!!",0;
announce strcharinfo(0)+" is now the NO. 1 Emperium Breaker!!",0;
	set $empbrk_record, .time;
	set $empbrk_record$,strcharinfo(0);
}
set .m, .time / 60000;
set .time, .time - (.m * 60000);
set .s, .time /1000;
set .time, .time - (.s * 1000);
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.time+"ms",0;
set .end,1;
set .charid,getcharid(0);
initnpctimer;
end;
}
pvp_n_4-5,99,125,0 script EmpBrk#1_touch -1,2,1,{
OnTouch:
killmonster "pvp_n_4-5","EmpBrk#1::OnThisMobDeath";
mes "[Emperium Breaker Test]";
mes "You cannot exit from small sqare.";
close2;
set $@someonegotin1, 0;
	warp @mpempbrk$,@empbrkx,@empbrky;
close;

}
- script EmpBrk#2 -1,{

OnTimer3000:
if (.end == 1) {	warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 0;
}
end;

OnTimer5000:
set .x1,60;
set .y1,94;
set .x2,71;
set .y2,105;
set .xe,65;
set .ye,99;

areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Let's ready to break the Emperium",0;
set $@someonegotin2, 0;
end;

OnTimer7000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",0;
end;
OnTimer8000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",0;
end;
OnTimer9000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",0;
end;
OnTimer10000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",0;
end;
OnTimer11000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",0;
end;
OnTimer12000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",0;
monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#2::OnThisMobDeath";
end;
OnTimer1200000:
warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 1;
end;
OnThisMobDeath:
stopnpctimer "EmpBrk#2";
set .time, getnpctimer(0,"EmpBrk#2");
set .time, .time - 12000;
if (.time < empbrk_record || empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",0;
	set empbrk_record, .time;

}
if (.time < $empbrk_record || $empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Official Record!!!",0;
announce strcharinfo(0)+" is now the NO. 1 Emperium Breaker!!",0;
	set $empbrk_record, .time;
	set $empbrk_record$,strcharinfo(0);
}
set .m, .time / 60000;
set .time, .time - (.m * 60000);
set .s, .time /1000;
set .time, .time - (.s * 1000);
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.time+"ms",0;
set .end,1;
set .charid,getcharid(0);
initnpctimer;
end;
}
pvp_n_4-5,74,99,0 script EmpBrk#2_touch -1,1,2,{
OnTouch:
killmonster "pvp_n_4-5","EmpBrk#2::OnThisMobDeath";
mes "[Emperium Breaker Test]";
mes "You cannot exit from small sqare.";
close2;
set $@someonegotin2, 0;
	warp @mpempbrk$,@empbrkx,@empbrky;
close;

}
- script EmpBrk#3 -1,{
OnTimer3000:
if (.end == 1) {	warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 0;
}
end;  

OnTimer5000:
set .x1,94;
set .y1,60;
set .x2,105;
set .y2,71;
set .xe,99;
set .ye,65;

areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Let's ready to break the Emperium",0;
set $@someonegotin3, 0;
end;

OnTimer7000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",0;
end;
OnTimer8000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",0;
end;
OnTimer9000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",0;
end;
OnTimer10000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",0;
end;
OnTimer11000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",0;
end;
OnTimer12000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",0;
monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#3::OnThisMobDeath";
end;
OnTimer1200000:
warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 1;
end;
OnThisMobDeath:
stopnpctimer "EmpBrk#3";
set .time, getnpctimer(0,"EmpBrk#3");
set .time, .time - 12000;
if (.time < empbrk_record || empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",0;
	set empbrk_record, .time;

}
if (.time < $empbrk_record || $empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Official Record!!!",0;
announce strcharinfo(0)+" is now the NO. 1 Emperium Breaker!!",0;
	set $empbrk_record, .time;
	set $empbrk_record$,strcharinfo(0);
}
set .m, .time / 60000;
set .time, .time - (.m * 60000);
set .s, .time /1000;
set .time, .time - (.s * 1000);
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.time+"ms",0;
set .end,1;
set .charid,getcharid(0);
initnpctimer;
end;
}
pvp_n_4-5,100,74,0 script EmpBrk#3_touch -1,2,1,{
OnTouch:
killmonster "pvp_n_4-5","EmpBrk#3::OnThisMobDeath";
mes "[Emperium Breaker Test]";
mes "You cannot exit from small sqare.";
close2;
set $@someonegotin3, 0;
	warp @mpempbrk$,@empbrkx,@empbrky;
close;

}

- script EmpBrk#4 -1,{
OnTimer3000:
if (.end == 1) {	warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 0;
}
end;  

OnTimer5000:
set .x1,128;
set .y1,94;
set .x2,139;
set .y2,105;
set .xe,134;
set .ye,99;

areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Let's ready to break the Emperium",0;
set $@someonegotin4, 0;
end;

OnTimer7000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"5",0;
end;
OnTimer8000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"4",0;
end;
OnTimer9000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"3",0;
end;
OnTimer10000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"2",0;
end;
OnTimer11000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"1",0;
end;
OnTimer12000:
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"GO!!!",0;
monster "pvp_n_4-5",.xe,.ye,"Emperium",1288,1,"EmpBrk#4::OnThisMobDeath";
end;
OnTimer1200000:
warpchar "prontera",150,172,.charid;
stopnpctimer;
set .end, 1;
end;
OnThisMobDeath:
stopnpctimer "EmpBrk#4";
set .time, getnpctimer(0,"EmpBrk#4");
set .time, .time - 12000;
if (.time < empbrk_record || empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Own Record!!!",0;
	set empbrk_record, .time;

}
if (.time < $empbrk_record || $empbrk_record == 0)
{
	areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"New Official Record!!!",0;
announce strcharinfo(0)+" is now the NO. 1 Emperium Breaker!!",0;
	set $empbrk_record, .time;
	set $empbrk_record$,strcharinfo(0);
}
set .m, .time / 60000;
set .time, .time - (.m * 60000);
set .s, .time /1000;
set .time, .time - (.s * 1000);
areaannounce "pvp_n_4-5",.x1,.y1,.x2,.y2,"Your time is "+.m+"m "+.s+"s "+.time+"ms",0;
set .end,1;
set .charid,getcharid(0);
initnpctimer;
end;
}
pvp_n_4-5,125,100,0 script EmpBrk#4_touch -1,1,2,{
OnTouch:
killmonster "pvp_n_4-5","EmpBrk#4::OnThisMobDeath";
mes "[Emperium Breaker Test]";
mes "You cannot exit from small sqare.";
close2;
set $@someonegotin4, 0;
	warp @mpempbrk$,@empbrkx,@empbrky;
close;

}

Link to comment
Share on other sites
Petey Pablo Poring

Petey Pablo

Posted
  • Group:  Members
  • Topic Count:  152
  • Topics Per Day:  0.03
  • Content Count:  569
  • Reputation:   11
  • Joined:  11/24/11
  • Last Seen:  
  • Author
Posted

@Orc Lord

Sir mga MVP BOSS po. D po equip. xD

Link to comment
Share on other sites
Orc Lord Poring

Orc Lord

Posted
  • Group:  Members
  • Topic Count:  12
  • Topics Per Day:  0.00
  • Content Count:  56
  • Reputation:   8
  • Joined:  11/10/11
  • Last Seen:  
Posted

yup gumagana nga yan, have you tried it?

Link to comment
Share on other sites
  • 3 weeks later...
JayPee Poring

JayPee

Posted
  • Group:  Members
  • Topic Count:  47
  • Topics Per Day:  0.01
  • Content Count:  633
  • Reputation:   78
  • Joined:  11/14/11
  • Last Seen:  
Posted

tingnan mo dun sa npc/mobs/dungeon ata un

Link to comment
Share on other sites
KeiKun Poring

KeiKun

Posted
  • Group:  Members
  • Topic Count:  31
  • Topics Per Day:  0.01
  • Content Count:  967
  • Reputation:   53
  • Joined:  11/13/11
  • Last Seen:  
Posted

Hi TS

the Problem Might be Script Conflict

MvP found @ pvp_n_4-5

is due to script

svn/npc/custom/MVP_arena/arena_mvp.txt

Link to comment
Share on other sites
Magnetix Santa Poring

Magnetix

Posted
  • Group:  Members
  • Topic Count:  6
  • Topics Per Day:  0.00
  • Content Count:  439
  • Reputation:   29
  • Joined:  12/08/11
  • Last Seen:  
Posted

Disable mo nlng ang MVP_Arena pra magamit mo map.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to topic listing
×
×
  • Create New...