PvP Points System

DevKira · October 5, 2019

Hello, I just need a little help about my script. I just get this script here also in rAthena. (credits)

NOTE: I WANT TO ENABLE THIS PVP POINTS TO WOE/PVP MAPS.

-> Enabled WoE Castles

-> Enabled PvP Maps

-    shop    custom_seller2    -1,501:500
1@ghvy,120,94,3    script    PvP Points Dealer    100,{
    mes "[PvP Points Dealer]";
    mes "I will sell you items for PvP points.";
    mes "Each time you kill a player on "+.map$+" you'll get 1 PvP point to spend here!";
    next;
    mes "[PvP Points Dealer]";
    mes "You currently have [^0000ff"+pvp_points+"^000000] PvP points to spend.";
    callshop "custom_seller2",1;
    npcshopattach "custom_seller2";
    end;
    
OnBuyItem:
    for(set .@i,0; .@i<getarraysize(.customs); set .@i,.@i+1) {
        for(set .@d,0; .@d<getarraysize(@bought_nameid); set .@d,.@d+1) {
            if(@bought_nameid[.@d]==.customs[.@i]) {
                if(checkweight(@bought_nameid[.@d],@bought_quantity[.@d])) {
                    if(pvp_points >= .Price[.@i]*@bought_quantity[.@d]) {
                        set pvp_points, pvp_points - .Price[.@i]*@bought_quantity[.@d];
                        getitem @bought_nameid[.@d],@bought_quantity[.@d];
                    } else dispbottom "You don't have enough PvP points to purchase that item.";
                } else dispbottom "Purchasing these items will put you over the weight limit!";
            }
        }
    }
    deletearray @bought_quantity, getarraysize(@bought_quantity);
    deletearray @bought_nameid, getarraysize(@bought_nameid);
    close;

OnPCKillEvent:
    if( strcharinfo(3) != .map$ ) end;
    copyarray( @killed$[1], @killed$[0], .saved_l-1 );
    @killed$ = ""+killedrid;
    if( countstr( implode( @killed$, "|" ), ""+killedrid, 0 ) <= .rstrk_l ) {
        pvp_points++;
        dispbottom "You've gained 1 PvP Point. Total = "+pvp_points+" PvP Points.";
    }
    end;
    
    
OnInit:
    set .map$, "pvpwait","ra_koe";
    set .saved_l, 3; //Length of saved ids can be up to 127.
    set .rstrk_l, 2; //Level of restriction.
    setarray .customs[0],  12103, 607, 678; // Enter the ID of customs here...
    setarray .Price[0],    20   , 40 , 300; // Price for each custom here...
    npcshopitem "custom_seller2", 0  ,   0; // Don't touch any coding beyond here..
    for( set .i,0; .customs[.i]; set .i,.i+1 )
        npcshopadditem "custom_seller2",.customs[.i],.Price[.i];
    end;
}

Edited October 7, 2019 by Emistry
codebox

Gerzzie · October 5, 2019

Spoiler

OnInit:
set .map$, "pvpwait","ra_koe","prontera";

DevKira · October 5, 2019

41 minutes ago, Gerzzie said:

Hide contents

OnInit:
set .map$, "pvpwait","ra_koe","prontera";

I already tried that, but its not working.

Chun3 · October 6, 2019


OnPCKillEvent:
getmapxy,
if map != pvp maps end

DevKira · October 6, 2019

1 hour ago, Chun3 said:



OnPCKillEvent:
getmapxy,
if map != pvp maps end

How? I didn't get this,.

Chun3 · October 6, 2019

https://github.com/rathena/rathena/blob/master/doc/script_commands.txt

OnPCKillEvent:
getmapxy @map$,@x,@y,0;
            if ( @map$ == "woemap01" || @map$ == "pvpmap01" ) {
copyarray( @killed$[1], @killed$[0], .saved_l-1 );
   @killed$ = ""+killedrid;
   if( countstr( implode( @killed$, "|" ), ""+killedrid, 0 ) <= .rstrk_l ) {
       pvp_points++;
       dispbottom "You've gained 1 PvP Point. Total = "+pvp_points+" PvP Points.";
   }
}
   end;

Edited October 6, 2019 by Chun3

DevKira · October 6, 2019

i'll try this now wait;

Hi, @Chun3

it's not working.

Chun3 · October 6, 2019



-    shop    custom_seller2    -1,501:500
1@ghvy,120,94,3    script    PvP Points Dealer    100,{
    mes "[PvP Points Dealer]";
    mes "I will sell you items for PvP points.";
    next;
    mes "[PvP Points Dealer]";
    mes "You currently have [^0000ff"+pvp_points+"^000000] PvP points to spend.";
    callshop "custom_seller2",1;
    npcshopattach "custom_seller2";
    end;
    
OnBuyItem:
    for(set .@i,0; .@i<getarraysize(.customs); set .@i,.@i+1) {
        for(set .@d,0; .@d<getarraysize(@bought_nameid); set .@d,.@d+1) {
            if(@bought_nameid[.@d]==.customs[.@i]) {
                if(checkweight(@bought_nameid[.@d],@bought_quantity[.@d])) {
                    if(pvp_points >= .Price[.@i]*@bought_quantity[.@d]) {
                        set pvp_points, pvp_points - .Price[.@i]*@bought_quantity[.@d];
                        getitem @bought_nameid[.@d],@bought_quantity[.@d];
                    } else dispbottom "You don't have enough PvP points to purchase that item.";
                } else dispbottom "Purchasing these items will put you over the weight limit!";
            }
        }
    }
    deletearray @bought_quantity, getarraysize(@bought_quantity);
    deletearray @bought_nameid, getarraysize(@bought_nameid);
    close;

OnPCKillEvent:
getmapxy @map$,@x,@y,0;
 if ( (@map$ != "woemap01") || (@map$ != "pvpmap01") ) end;  //Put here the maps you WISH to work the points.
    copyarray( @killed$[1], @killed$[0], .saved_l-1 );
    @killed$ = ""+killedrid;
    if( countstr( implode( @killed$, "|" ), ""+killedrid, 0 ) <= .rstrk_l ) {
        pvp_points++;
        dispbottom "You've gained 1 PvP Point. Total = "+pvp_points+" PvP Points.";
    }
    end;
    
    
OnInit:
    set .saved_l, 3; //Length of saved ids can be up to 127.
    set .rstrk_l, 2; //Level of restriction.
    setarray .customs[0],  12103, 607, 678; // Enter the ID of customs here...
    setarray .Price[0],    20   , 40 , 300; // Price for each custom here...
    npcshopitem "custom_seller2", 0  ,   0; // Don't touch any coding beyond here..
    for( set .i,0; .customs[.i]; set .i,.i+1 )
        npcshopadditem "custom_seller2",.customs[.i],.Price[.i];
    end;
}

DevKira · October 6, 2019

5 minutes ago, Chun3 said:



-    shop    custom_seller2    -1,501:500
1@ghvy,120,94,3    script    PvP Points Dealer    100,{
    mes "[PvP Points Dealer]";
    mes "I will sell you items for PvP points.";
    next;
    mes "[PvP Points Dealer]";
    mes "You currently have [^0000ff"+pvp_points+"^000000] PvP points to spend.";
    callshop "custom_seller2",1;
    npcshopattach "custom_seller2";
    end;
    
OnBuyItem:
    for(set .@i,0; .@i<getarraysize(.customs); set .@i,.@i+1) {
        for(set .@d,0; .@d<getarraysize(@bought_nameid); set .@d,.@d+1) {
            if(@bought_nameid[.@d]==.customs[.@i]) {
                if(checkweight(@bought_nameid[.@d],@bought_quantity[.@d])) {
                    if(pvp_points >= .Price[.@i]*@bought_quantity[.@d]) {
                        set pvp_points, pvp_points - .Price[.@i]*@bought_quantity[.@d];
                        getitem @bought_nameid[.@d],@bought_quantity[.@d];
                    } else dispbottom "You don't have enough PvP points to purchase that item.";
                } else dispbottom "Purchasing these items will put you over the weight limit!";
            }
        }
    }
    deletearray @bought_quantity, getarraysize(@bought_quantity);
    deletearray @bought_nameid, getarraysize(@bought_nameid);
    close;

OnPCKillEvent:
getmapxy @map$,@x,@y,0;
 if ( (@map$ != "woemap01") || (@map$ != "pvpmap01") ) end;  //Put here the maps you WISH to work the points.
    copyarray( @killed$[1], @killed$[0], .saved_l-1 );
    @killed$ = ""+killedrid;
    if( countstr( implode( @killed$, "|" ), ""+killedrid, 0 ) <= .rstrk_l ) {
        pvp_points++;
        dispbottom "You've gained 1 PvP Point. Total = "+pvp_points+" PvP Points.";
    }
    end;
    
    
OnInit:
    set .saved_l, 3; //Length of saved ids can be up to 127.
    set .rstrk_l, 2; //Level of restriction.
    setarray .customs[0],  12103, 607, 678; // Enter the ID of customs here...
    setarray .Price[0],    20   , 40 , 300; // Price for each custom here...
    npcshopitem "custom_seller2", 0  ,   0; // Don't touch any coding beyond here..
    for( set .i,0; .customs[.i]; set .i,.i+1 )
        npcshopadditem "custom_seller2",.customs[.i],.Price[.i];
    end;
}

It's still not working bro.

Chun3 · October 6, 2019

Dude, are u changing

if ( (@map$ != "woemap01") || (@map$ != "pvpmap01") ) end;

DevKira · October 6, 2019

yes.

I will change this map to

Map Names:

prtg_cas01

prtg_cas02

prtg_cas03

prtg_cas04

prtg_cas05

ra_koe

pvpwait

Chun3 · October 6, 2019

its working normal here

are u putting the <tabs> on the header?

DevKira · October 6, 2019

Yes, i'm putting tabs on the header.

Can you put my map so i can just copy and paste.

here's the map i want

prtg_cas01

pvpwait

ra_koe

Chun3 · October 6, 2019

-	shop	custom_seller2	-1,501:500
prontera,120,94,3	script	ehuq	100,{
    mes "[PvP Points Dealer]";
    mes "I will sell you items for PvP points.";
    next;
    mes "[PvP Points Dealer]";
    mes "You currently have [^0000ff"+pvp_points+"^000000] PvP points to spend.";
    callshop "custom_seller2",1;
    npcshopattach "custom_seller2";
    end;
    
OnBuyItem:
    for(set .@i,0; .@i<getarraysize(.customs); set .@i,.@i+1) {
        for(set .@d,0; .@d<getarraysize(@bought_nameid); set .@d,.@d+1) {
            if(@bought_nameid[.@d]==.customs[.@i]) {
                if(checkweight(@bought_nameid[.@d],@bought_quantity[.@d])) {
                    if(pvp_points >= .Price[.@i]*@bought_quantity[.@d]) {
                        set pvp_points, pvp_points - .Price[.@i]*@bought_quantity[.@d];
                        getitem @bought_nameid[.@d],@bought_quantity[.@d];
                    } else dispbottom "You don't have enough PvP points to purchase that item.";
                } else dispbottom "Purchasing these items will put you over the weight limit!";
            }
        }
    }
    deletearray @bought_quantity, getarraysize(@bought_quantity);
    deletearray @bought_nameid, getarraysize(@bought_nameid);
    close;

OnPCKillEvent:
getmapxy @map$,@x,@y,0;
 if ( (@map$ != "prontera") || (@map$ != "pvpwait") || (@map$ != "ra_koe") ) {end;}   //Put here the maps you WISH to work the points.
       set pvp_points,  pvp_points+1;
        dispbottom "You've gained 1 PvP Point. Total = "+pvp_points+" PvP Points.";
    end;
    
    
OnInit:
    setarray .customs[0],  12103, 607, 678; // Enter the ID of customs here...
    setarray .Price[0],    20   , 40 , 300; // Price for each custom here...
    npcshopitem "custom_seller2", 0  ,   0; // Don't touch any coding beyond here..
    for( set .i,0; .customs[.i]; set .i,.i+1 )
        npcshopadditem "custom_seller2",.customs[.i],.Price[.i];
    end;
}

image.png.690be2ccbf6faab7d97f1d1f8e07a896.png

DevKira · October 6, 2019

I will try again. Thank you.

Thanks for the time and effort. I really really appreciate it dude. Wait let me try it.

Chun3 · October 6, 2019

That map u have, ra_koe, can u send a pic?

DevKira · October 6, 2019

ok wait

still not working

hmmmm

Chun3 · October 6, 2019

Sorry, a logic problem.

OnPCKillEvent:
getmapxy @map$,@x,@y,0;
 if ( (@map$ == "prtg_cas01") || (@map$ == "pvpwait") || (@map$ == "ra_koe") ) {  
       set pvp_points,  pvp_points+1;
        dispbottom "You've gained 1 PvP Point. Total = "+pvp_points+" PvP Points.";
}
    end;

DevKira · October 6, 2019

still not working image.png.adab4ff62e4357ba248fb8011d0db331.png ..

CAN YOU DO TEAMVIEWER?

DevKira · October 6, 2019

Thanks, @Chun3!!! Commend this man!!!

100% Helpful

Emistry · October 7, 2019

if you're asking to make this script to work for ALL pvp and gvg maps

then change this

OnPCKillEvent:
    if( strcharinfo(3) != .map$ ) end;

into this

OnPCKillEvent:
	.@map$ = strcharinfo(3);
	if (!getmapflag(.@map$, mf_pvp) && !getmapflag(.@map$, mf_gvg)) end;

Chun3 · October 6, 2019

send id by pm

Solved.

Sign In

PvP Points System

Question

DevKira

21 answers to this question

Recommended Posts

Gerzzie

DevKira

Chun3

DevKira

Chun3

DevKira

Chun3

DevKira

Chun3

DevKira

Chun3

DevKira

Chun3

DevKira

Chun3

DevKira

Chun3

DevKira

DevKira

Emistry

Chun3

Join the conversation

Recently Browsing 0 members

Docs

Get Started

Github

Community

My Account