Jump to content

Petey Pablo

Members
  • Posts

    569
  • Joined

  • Last visited

Posts posted by Petey Pablo

  1. 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;
    
    }

  2. Para sa tamang ip.

    whatismyip.org

    Kung ang client mo is Read data folder

    Maaring sa RO ng iyong kaibgan ay may clientinfo.html sa kanyang data folder.

    Need mo malaman un sakanya.

    Pero kung lahat ng kaibgan d mag connect check mo nlng ung pagkakalagay mo sa clientinfo.html

    at sa conf. files mo.

    @strikez14

    Kaya po nag iiba ang wan ip mo kc dynamic ip.

    Set mo po router mo sa static ip.

  3. Check mo to

    @ svn/src/common/mmo.h

    find:

    #ifndef PACKETVER

    //#define PACKETVER 20081126

    #define PACKETVER <client date here>

    #endif

    Then recompile

    or

    Check mo ung clientinfo.html mo at client.

    Kung client mo is Read data folder dapat ang clientinfo.html mo sa data folder sya.

    Tapos double check mo ip mo bka mali pagkakalagay.

×
×
  • Create New...