Jump to content

xmaniacx

Members
  • Posts

    110
  • Joined

  • Last visited

Posts posted by xmaniacx

  1. i would like to request a script where it announce a person name and what mvp she/he skill also if he/she obtains a 0.1% card mvp and nonmvp it would also announce. and also a mvp rank where it show the top 10 mvp killer :]

  2. thank you so much for fast reply, and the script on the right already contains the whole scenario on the scripts that's the whole script right there! from start map to end of the script that's all and ive already replace the mal_in02 for prontera and still could not find the mapindex "" i really dont know the problem plsss if anybody knows plsss help me.

  3. //By Skorm
    poring_c01,97,95,5 script Clone Battles 411,{
    set .npc$, "[Gregory]";
    //set @price,50;
    //getmapxy(.@map$,.@x,.@y,0);
    mes "(^000077Curret Top Rank Holder is "+$MaxName$+" at Round "+$MaxRound+"^000000)";
    mes .npc$;
    mes "Hello, Do you want to beat your self up?";
    if(getmapusers("force_3-1")!=0) { mes "Room Status: [^FF0000Occupied^000000]"; close; } else
    mes "Room Status: [^0000FFOpen^000000]";
    setcell "force_3-1",20,40,31,44,cell_walkable,0;
    setcell "force_3-1",62,6,193,55,cell_walkable,0;
    setcell "force_3-1",6,64,193,193,cell_walkable,0;
    switch(select("Sure.","Nah.")) {
    
    
    case 1:
    next;
    mes .npc$;
    mes "Ok the rules are quite simple Kill your clones before they kill you. ";
    mes "each round more clones will appear. ";
    mes "If you die your out.";
    next;
    set Round,1;
    set Rotation,0;
    warp "force_3-1",25,7;
    callfunc "Clone-Count";
    case 2:
    close;
    }
    OnNPCKillEvent:
    getmapxy(@map$,.@x,.@y,0);
    if((getmonsterinfo(killedrid,0)=="null") && (@map$ == "force_3-1")) {
    if(Anoun!=0) { end; } else
    atcommand "@effect 15";
    set Rotation,Rotation-1;
    if(Rotation==0) {
    getitem 7539,5;
    set Round,Round+1;
    callfunc "Clone-Count";
    } else {
    end;
    }
    } else {
    end;
    }
    }

    - script OnDeathWarp -1,{
    OnPCDieEvent:
    getmapxy(@map$,.@x,.@y,0);
    if(@map$ == "force_3-1") { sleep2 1; warp "prontera",156,191; dispbottom "You have lost..."; } else { end; }
    }
    
    function script Clone-Count {
    setArray .ClonesR[1],
    1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
    11, 12, 13, 14, 15, 16, 17, 18, 19, 20,
    1, 2, 4, 8, 16, 16, 17, 18, 19, 20,
    20, 20, 20, 20, 20, 20, 20, 20, 20, 40;
    setArray .Cevent[1],
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    0, 0, 0, 0, 0, 0, 0, 0, 0, 0;
    if(Rotation==.ClonesR[Round]) {
    end;
    } else {
    CallYes:
    if(Rotation==0) {
    set Anoun,1;
    set Rotation,Rotation+1;
    warp "force_3-1",25,7;
    killmonsterall "force_3-1";
    setcell "force_3-1",14,39,20,41,cell_walkable,0;
    setcell "force_3-1",14,41,15,44,cell_walkable,0;
    setcell "force_3-1",20,41,21,44,cell_walkable,0;
    setcell "force_3-1",29,7,28,11,cell_walkable,0;
    setcell "force_3-1",28,10,23,11,cell_walkable,0;
    setcell "force_3-1",23,7,22,11,cell_walkable,0;
    atcommand "@localbroadcast Round "+Round+""+@localbroadcast$;
    mapannounce "force_3-1","Round " + Round + "",bc_map | bc_blue;
    //Buffing System
    if(Round<=19) {atcommand "@effect 6"; sleep2 2000; percentheal 100,100; skilleffect 28,32000; sc_start SC_INCREASEAGI,500000,10; atcommand "@effect 43"+@effect$; sc_start SC_BLESSING,500000,10; skilleffect 34,32000; } else
    if(Round>=20) {atcommand "@effect 6"; atcommand "@effect 9"; sleep2 2000; percentheal 75,100; skilleffect 28,32000; sc_start SC_INCREASEAGI,500000,10; atcommand "@effect 43"+@effect$; sc_start SC_BLESSING,500000,10; skilleffect 34,32000; } else
    if(Round>=30 && Round<29) {atcommand "@effect 6"; atcommand "@effect 23"; atcommand "@effect 9"; sleep2 2000; percentheal 75,100; skilleffect 28,32000; } else
    if(Round>=40 && Round<39) {atcommand "@effect 6"; atcommand "@effect 23"; atcommand "@effect 60"; atcommand "@effect 9"; sleep2 2000; percentheal 50,100; skilleffect 28,32000; } else
    dispbottom "You have 7 seconds to buff.";
    atcommand "@effect 63";
    sleep2 3000;
    sleep2 1000;
    atcommand "@effect 63";
    sleep2 1000;
    dispbottom "4";
    sleep2 1000;
    dispbottom "3";
    sleep2 1000;
    dispbottom "2";
    sleep2 1000;
    dispbottom "1";
    sleep2 1000;
    dispbottom "GO!!";
    dispbottom "round " + Round + "";
    dispbottom "rotation " + Rotation + "";
    if(Round>$MaxRound) { set $MaxRound,Round; set $MaxName$,""+strcharinfo(0)+""; } else
    // if(Round==10) { announce ""+strcharinfo(0)+" has made it to round 10",bc_blue; } else
    // if(Round==12) { announce ""+strcharinfo(0)+" has made it to round 12",bc,0xD20000; } else
    // if(Round==14) { announce ""+strcharinfo(0)+" has made it to round 14",bc,0x99CC00; } else
    // if(Round==16) { announce ""+strcharinfo(0)+" has made it to round 16",bc,0x99CC00; } else
    // if(Round==18) { announce ""+strcharinfo(0)+" has made it to round 18",bc,0xBAB9B9; } else
    // if(Round==20) { announce ""+strcharinfo(0)+" has made it to round 20",bc,0xCC00FF; } else
    if(Round==20) { atcommand "@kamib Clone Battles: "+strcharinfo(0)+" has made it to Round "+Round+""+@kamib$; } else
    if(Round==25) { atcommand "@kamib Clone Battles: "+strcharinfo(0)+" has made it to Round "+Round+" How far can he go."+@kamib$; } else
    if(Round==30) { atcommand "@kamib Clone Battles: OMG "+strcharinfo(0)+" has made it to Round "+Round+" This person truly knows how to hurt them self. "+@kamib$; } else
    if(Round==35) { atcommand "@kamib Clone Battles: "+strcharinfo(0)+" has made it to Round "+Round+" There is no way you can ever beat me!!!! now DIE!! "+@kamib$; } else
    if(Round==40) { atcommand "@kamib Clone Battles: Nooo!! "+strcharinfo(0)+" has made it to Round "+Round+" and proven that he/she is a real Clone Battle Champion. "+@kamib$; } else
    setcell "force_3-1",14,39,20,41,cell_walkable,1;
    setcell "force_3-1",14,41,15,44,cell_walkable,1;
    setcell "force_3-1",20,41,21,44,cell_walkable,1;
    setcell "force_3-1",29,7,28,11,cell_walkable,1;
    setcell "force_3-1",28,10,23,11,cell_walkable,1;
    setcell "force_3-1",23,7,22,11,cell_walkable,1;
    goto CallYes;
    } else {
    set Rotation,Rotation+1;
    if(Anoun==1) {
    set Rotation,1;
    goto Skip;
    }
    Skip:
    if(Round>20) {
    set Anoun,0;
    // atcommand "@effect 16";
    set Rxcord,rand(9,42);
    set Rycord,rand(9,42);
    getmapxy(.@map$,.@x,.@y,0);
    clone "" + .@map$ + "",Rxcord,Rycord,"",getcharid(0),null,14261,0,0;
    if(Rotation!=.ClonesR[Round]) { callfunc "Clone-Count"; } else { end; }
    } else {
    set Anoun,0;
    // atcommand "@effect 16";
    getmapxy(.@map$,.@x,.@y,0);
    clone "" + .@map$ + "",17,44,"",getcharid(0),null,14261,0,0;
    if(Rotation!=.ClonesR[Round]) { callfunc "Clone-Count"; } else { end; }
    }
    }
    }
    }
    
    
    force_3-1 mapflag nowarp
    force_3-1 mapflag pvp

    post-3628-0-72297900-1333665751_thumb.png

  4. can some1 plss paste a dice event which if you are the only participant you dont win instead you get warped to pront... mostly dice event script here are "if your the only player who entered the event the npc prize show up and let you win automatically!

×
×
  • Create New...