Jump to content

LOOLP - OFF

Members
  • Posts

    233
  • Joined

  • Last visited

  • Days Won

    4

Posts posted by LOOLP - OFF

  1.  
    Would anyone have a version of Cell PvP or some diff that made the effect of some cells become battlefield [pvp]?
    
    I used the version Cell PvP 1.7, it worked, but had some bugs for example .. In the common PvP arena, the quantitative score and the time in the arena, was blinking nonstop ..
    
    Thank you very much for the contribution.
    
     
  2. Completing the script : @BeWan
    prontera,154,179,4	script	summoner	100,{
    
    if( countitem(512) > 500){
    	delitem 512,500;
    	monster "prontera", 0, 0, "Poring", 1005, 1, strnpcinfo(0) + "::OnMobKilled";
    	monster "prontera", 0, 0, "Poring", 1115, 1, strnpcinfo(0) + "::OnMobKilled";
    	end;
    }else{
    	mes "sorry you need 500 apple to summon";
    }
    
    OnMobKilled:
    set @amount, rand(1,5); //quantity of different items
    set @whatItem, rand(0,.@size); //Which item was chosen
    set @amountItem, rand(1,10); //Quantity of item you will receive
    
    for (i = 0; i < @amount; i++) {
    getitem @whatItem, @amountItem;
    }
    end;
    
    OnInit:
    setarray .@listItens[0],500,501,502,503,504,505,506,507; //Itens
    .@size = getarraysize(.@listItens); //Size Array Itens
    end;
    }

     

  3. Nova geração dos rag private BR ? Onde os dev não pesquisa e não sabe o basico  xD

    Alterar nome/descrição visualmente falando = vai no patch/system/ dependendo de como foi a configuração do hexed  itemInfo.lua ou .lub

    Para uma classe apenas utilizar vai no seu DB onde esta o item, seja pre RE ou RE, encontra a ID do item e olha a formatação padrão do itemDB
    // ID,AegisName,Name,Type,Buy,Sell,Weight,ATK,DEF,Range,Slots,Job,Class,Gender,Loc,wLV,eLV[:maxLevel],Refineable,View,{ Script },{ OnEquip_Script },{ OnUnequip_Script }

    Algumas alterações de localização do item, classe, sexo emfim .. "Job,Class,Gender,Loc,"

     

    Reputa se ajudei ?

    • Love 1
  4. // Restrict character deletion by BaseLevel
    // 0: no restriction (players can delete characters of any level)
    // -X: you can't delete chars with BaseLevel <= X
    // Y: you can't delete chars with BaseLevel >= Y
    // e.g. char_del_level: 80 (players can't delete characters with 80+ BaseLevel)
    char_del_level: 0
     
    // Amount of time in seconds by which the character deletion is delayed.
    // Default: 86400 (24 hours)
    // NOTE: Requires client 2010-08-03aragexeRE or newer.
    char_del_delay: 5
     
    // Restrict character deletion by email address or birthdate.
    // This restricts players from changing the langtype and deleting characters.
    // Defaults based on client date.
    // 1: Email address
    // 2: Birthdate
    // 3: Email address or Birthdate
    // IMPORTANT!
    // - This config only works for clients that send 0x0068 or 0x01fb for delete request.
    // - Use langtype 1 for newer clients (2013+), to use 0x01fb.
    // - Clients that are not using 0x0068 or 0x01fb, only use birthdate (YYMMDD) as default.
    char_del_option: 1
     
    // Restrict character deletion as long as he is still in a party or guild
    // 0: No restriction is applied
    // 1: Character cannot be deleted as long as he remains in a party
    // 2: Character cannot be deleted as long as he remains in a guild
    // 3: Character cannot be deleted as long as he remains in a party or guild(default)

    char_del_restriction: 0

     

    Quote

    Use email for delet ... wait time and delet.

     

  5. Quote

    db/re/skill_db

    490,9,8,1,-1,0x60,0,10,1:2:3:4:5:6:7:8:9:10,yes,0,0,0,misc,0,0x0,    CR_ACIDDEMONSTRATION,Acid Demonstration

    Quote

    src/map/battle.cpp

    #ifdef RENEWAL
        // forced to neutral skills [helvetica]
        // skills forced to neutral gain benefits from weapon element
        // but final damage is considered "neutral" and resistances are applied again
        switch (skill_id) {
            case MC_CARTREVOLUTION:
            case MO_INVESTIGATE:
            case CR_ACIDDEMONSTRATION:
            case SR_GATEOFHELL:
            case GN_FIRE_EXPANSION_ACID:
            case KO_BAKURETSU:
            //case NC_MAGMA_ERUPTION:
                // Forced to neutral element
                wd.damage = battle_attr_fix(src, target, wd.damage, ELE_NEUTRAL, tstatus->def_ele, tstatus->ele_lv);
                break;

    Alter to

    #ifdef RENEWAL
        // forced to neutral skills [helvetica]
        // skills forced to neutral gain benefits from weapon element
        // but final damage is considered "neutral" and resistances are applied again
        switch (skill_id) {
            case MC_CARTREVOLUTION:
            case MO_INVESTIGATE:
            case SR_GATEOFHELL:
            case GN_FIRE_EXPANSION_ACID:
            case KO_BAKURETSU:
            //case NC_MAGMA_ERUPTION:
                // Forced to neutral element
                wd.damage = battle_attr_fix(src, target, wd.damage, ELE_NEUTRAL, tstatus->def_ele, tstatus->ele_lv);
                break;

    and recompile xD
    Give me Reputation if helped u

  6. Just put all files in the data folder, or apply the corresponding grf with the application correctly in data.ini
    
    Apply weeMapCache to .dat to get the corresponding cells to walk or not.
    
    If the grf has complete or the files inside the data folder .. Everything goes well.
    
    Remember to recompile after changing .dat
    db / re or pre-re / map_cache.dat
    
     

     

  7. //===== eAthena Script =======================================
    //= Poring Event
    //===== By: ==================================================
    //= Wild Karrd, alexx
    //===== Current Version: =====================================
    //= 3.0
    //===== Compatible With: =====================================
    //= eAthena 12426
    //===== Description: =========================================
    //= Find correct poring Event
    //===== Additional Comments: =================================
    //= 3.0 Bug fixed and totaly modified [alexx]
    //============================================================
    
    
    -    script    poring_event_on    -1,{
    OnMinute00:
        enablenpc "Poring Catcher";
        announce "It's time to catch Porings!",bc_all;
        set $@EventEnd,0;
        set $@Wrong,-3;
        sleep ( 60 * 60000 ); // How long before hide again
        if ($@EventEnd == 0) {
            disablenpc "Poring Catcher";
            announce "You're late. Catch Porings event is over...",bc_all,0xF49AC1;
            set $@EventEnd,1;
        }
        end;
    }
    
    prontera,156,126,4    script    Poring Catcher    909,{
    
    OnTouch:
        mes "[^2E3192Poring Catcher^000000]";
        mes "Hellooo, "+strcharinfo(0)+"! I like to catch porings very much. It's fun!";
        next;
        menu "I wanna too!",L_check,"Tell me more?",L_info,"I'm leaving... Bye.",L_bye;
        close;
        
    
    
    Check1:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF081808^000000";
        input .@pass$;
            if (.@pass$ == "081808") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check2:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF070786^000000";
        input .@pass$;
            if (.@pass$ == "070786") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check3:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF081887^000000";
        input .@pass$;
            if (.@pass$ == "070786") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check4:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF0102350^000000";
        input .@pass$;
            if (.@pass$ == "102350") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check5:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FFsjrh^000000";
        input .@pass$;
            if (.@pass$ == "sjrh") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check6:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FFtgd4^000000";
        input .@pass$;
            if (.@pass$ == "tgd4") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check7:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF678e^000000";
        input .@pass$;
            if (.@pass$ == "678e") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check8:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FFegf3^000000";
        input .@pass$;
            if (.@pass$ == "egf3") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check9:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF76he^000000";
        input .@pass$;
            if (.@pass$ == "76he") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    Check10:
        mes "Please Enter The Code Below To Prove That You Are Human:";
        mes "^0000FF59ej^000000";
        input .@pass$;
            if (.@pass$ == "59ej") goto Confirm;
        mes "It seems you input the wrong code, Please try again";
        set @Wrong,1;
        close;
    
    L_check:
        mes "[^2E3192Poring Catcher^000000]";
        mes "I'm sorry but before you enter, You must prove to me that you are human...";
        next;
        set @rand,rand(1,10);
        if ( @rand == 1 ) goto Check1;
        if ( @rand == 2 ) goto Check2;
        if ( @rand == 3 ) goto Check3;
        if ( @rand == 4 ) goto Check4;
        if ( @rand == 5 ) goto Check5;
        if ( @rand == 6 ) goto Check6;
        if ( @rand == 7 ) goto Check7;
        if ( @rand == 8 ) goto Check8;
        if ( @rand == 9 ) goto Check9;
        if ( @rand == 10 ) goto Check10;
        end;
    
    Confirm:
        next;
        mes "[^2E3192Poring Catcher^000000]";
        mes "Have fun!";
        next;
        if ($@EventEnd == 1)
        {
            atcommand "@broadcast Hi I'm a Poring catcher Bugger, Report me to a GM please";
            warp "prontera.gat",155,174;
        }
        else {
        
        if ($@PoringsSummoned == 0) {
            initnpctimer;
            donpcevent "Poringsummoner::OnSummon";
            set $@PoringsSummoned,1;
        }
        warp "poring_w01",100,100;
        end;
        }
    
    OnTimer600000:
        stopnpctimer;
        disablenpc "Poring Catcher";
        killmonster "poring_w01","All";
        set $@PoringsSummoned,0;
        mapwarp "poring_w01","prontera",137,234;
        announce "You're late. Catch Porings event is over...",bc_all,0xF49AC1;
        set $@EventEnd,1;
        end;
    
    L_info:
        mes "[^2E3192Poring Catcher^000000]";
        mes "There are 100 different porings at the field.";
        mes "But only one of them is real, you have to find him.";
        mes "You will be rewarded with the coin and some present if be lucky.";
        mes "Goood luuck!";
        close;
    
    L_coin:
        callsub S_BonusReward;
        end;
    
    L_bug:
        atcommand "@broadcast Hi I'm a Poring catcher Bugger, Report me to a GM please";
        atcommand "@broadcast Hi I'm a Poring catcher Bugger, Report me to a GM please";
        close;
    
    L_bye:
        mes "[^2E3192Poring Catcher^000000]";
        mes "Bye-bye!";
        close;
    
    OnInit:
        disablenpc "Poring Catcher";
        set $@PoringsSummoned,0;
        end;
    
    OnWarp:
        initnpctimer;
        enablenpc "Poring Catcher";
        donpcevent "Poringsummoner::OnSummon";
        end;
    
    }
    
    -    script    Poringsummoner    -1,{
    
    OnSummon:
        initnpctimer;
    OnTimer1000:
        mapannounce "poring_w01","5    ...",1;
        end;
    OnTimer2000:
        mapannounce "poring_w01","4    ...",1;
        end;
    OnTimer3000:
        mapannounce "poring_w01","3    ...",1;
        end;
    OnTimer4000:
        mapannounce "poring_w01","2    ...",1;
        end;
    OnTimer5000:
        mapannounce "poring_w01","1    ...",1;
        end;
    OnTimer6000:
        stopnpctimer;
        mapannounce "poring_w01","LET'S GO!",1;
        areamonster "poring_w01",84,119,121,90,"Poring",1002,1,"poringwin::OnMobKilledWin";
        areamonster "poring_w01",84,119,121,90,"Pouring",1002,20,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Proing",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poiring",1002,20,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poing",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"I am not Poring",1002,5,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Gniriop",1002,1,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poring",1113,1,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poring",1062,1,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Poriiing",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"PoriNg",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Porong",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"P0ring",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Por1ng",1002,10,"poringlose::OnMobKilled";
        areamonster "poring_w01",84,119,121,90,"Porng",1002,1,"poringlose::OnMobKilled";
        end;
    
    }
    
    -    script    poringwin    -1,{
    
    OnMobKilledWin:
        dispbottom "Congratulations. You've got me.";
        set .@PoringItemVar,rand(10);
        if (.@PoringItemVar == 9) {
            getitem 25092,5;
        }
        if (.@PoringItemVar >= 4 && .@PoringItemVar < 9) {
            getitem 25092,5;
        }
        getitem 25092,5;
        killmonster "poring_w01","All";
        warp "prontera",137,234;
        end;
    
    }
    
    -    script    poringlose    -1,{
    
    OnMobKilled:
        dispbottom "Wahaha, you are looser!";
        percentheal -100,-100;
        sleep 1000;
        warp "prontera",137,234;
        end;
    
    }
    
    poring_w01    mapflag    nopenalty
    poring_w01    mapflag    noloot
    poring_w01    mapflag    noskill
    poring_w01    mapflag    nowarpto
    poring_w01    mapflag    nowarp
    poring_w01    mapflag    noteleport
    poring_w01    mapflag    nomemo
    poring_w01    mapflag    nosave    SavePoint
    poring_w01    mapflag    nobranch

     

  8. If you want to go deeper than hiding the function of rodex, a way to force the error when sending message ...
    I'll leave in code, an example restriction for maps .. but you can change it according to mapflags or as you wish.

     

    Quote

    Index: src/map/mail.c
    ===================================================================

     enum mail_attach_result mail_setitem(struct map_session_data *sd, short idx, uint32 amount) {
    +
    +    if(map[sd->bl.m].flag.nowarpto || map[sd->bl.m].flag.nowarp)
    +        return MAIL_ATTACH_ERROR;
    +
         if( pc_istrading(sd) )
             return MAIL_ATTACH_ERROR;

     

×
×
  • Create New...