cahadeyelo

November 29, 2016

why my script keeps adding up points even there's no war in progress?

-	script	Siege Points	-1,{

OnPCLoginEvent:
	attachnpctimer ""+strcharinfo(0)+"";
	initnpctimer;
	end;
	
OnTimer60001:
	if(checkvending() >= 1) {
	dispbottom "The Siege Point(s) stopped because you were vending. Please relog if you wish to start again.";
	stopnpctimer;
	end;
	}
	getmapxy( .@map$, .@x, .@y, 0 );
	if(@map$ == .@map$ && @x == .@x && @y == .@y) {
	set @afk, @afk + 1;
	}
	else {
	set @afk, 0;
	}
	set @map$, .@map$; set @x, .@x; set @y, .@y;
	if(@afk == 5) {
	dispbottom "The Siege Point(s) stopped because you were idle for 5 minutes. Please relog if you wish to start again.";
	stopnpctimer;
	end;
	}

OnTimer60002:
	getmapxy( .@woe$, .@x, .@y, 0 );
	if( agitcheck() || .@woe$ == "prtg_cas01" ) {
	set SIEGEPOINTS,SIEGEPOINTS + 1;
	dispbottom "Gained : 1 Point(s). Total : "+ SIEGEPOINTS +" Siege Point(s).";
	}
	if( !agitcheck() || .@woe$ == "prtg_cas01" ) {
	stopnpctimer;
	end;
	}
	getmapxy( .@map$, .@x, .@y, 0 );
	if(.@map$ == "sec_pri") {
	dispbottom "The Siege Point(s) was disabled in Jail.";
	stopnpctimer;
	end;
	}
	if(@map$ == .@map$ && @x == .@x && @y == .@y) {
	set @afk, @afk + 1;
	stopnpctimer;
	initnpctimer;
	end;
	}
}

November 5, 2016

is that so...how sad

November 4, 2016

Why everytime we used the Card Remover, the compounded bound card will turned into non bounded?

prt_in,28,73,4	script	Wise Old Woman#0	78,{

	.@weight = 100 * Weight / MaxWeight;
	if (90 <= .@weight) {
	mes "[ Wise Old Woman ]";
	mes "You're currently at ^FF0000" + .@weight + "%^000000 of your maximum weight.";
	next;
	mes "[ Wise Old Woman ]";
	mes "Please remove some items before claiming it.";
	close; }
	getinventorylist;
	if( @inventorylist_count > 50 ){
	mes "[ Wise Old Woman ]";
	mes "Your inventory slot is getting full, please remove some items before claiming it.";
	close; }
	mes "[ Wise Old Woman ]";
	mes "Okay I'm going to remove the card(s) to your equipment now and you need a ^3355FFStar Crumb^000000, ^3355FFYellow Gemstone^000000 and ^3355FF100,000^000000z.";
	next;
	setarray .@indices[1], EQI_HEAD_TOP, EQI_ARMOR, EQI_HAND_L, EQI_HAND_R, EQI_GARMENT, EQI_SHOES, EQI_ACC_L, EQI_ACC_R, EQI_HEAD_MID, EQI_HEAD_LOW;
		for(set .@i,1; .@i<=10; set .@i,.@i+1) {
		if (getequipisequiped(.@indices[.@i])) {
			set .@menu$, .@menu$ + F_getpositionname(.@indices[.@i]) + " - [ " + getequipname(.@indices[.@i]) + " ]";
			set .@equipped,1;
		}
		set .@menu$, .@menu$ + ":";
	}
		set .@part, .@indices[ select(.@menu$) ];
		if(!getequipisequiped(.@part)) {
			mes "[ Wise Old Woman ]";
			mes "Young one... Your not wearing anything there that I can remove cards from.";
			close;
		}
		if(getequipcardcnt(.@part) == 0) {
			mes "[ Wise Old Woman ]";
			mes "Young one... There's no card(s) compounded on that item. I can do nothing with it, I'm afraid.";
			close;
		}
		set .@cardcount,getequipcardcnt(.@part);
	if ( countitem(1000) < 1  || countitem(715) < 1 ) { close; }
	if ( Zeny < 100000) { close; }
	delitem 1000,1;
	delitem 715,1;
	set Zeny,Zeny - 100000;
	successremovecards .@part;
	end;
}

October 23, 2016

i tried your codes, now it gives me error on line 10 and 20

-	script	orc_face	-1,{

OnInit:
	setitemscript 601,"{ if ( !@orc_face ) itemskill \"AL_TELEPORT\",1; }";
	setitemscript 602,"{ if ( !@orc_face ) itemskill \"AL_TELEPORT\",3; }";
	end;

OnPCKillEvent:
	if( baselevel < 175 || killedrid == getcharid(3) || getstatus( SC_ORCISH ) ) { end; }
	if( getcharip() == getcharip(name2rid(killedrid)) ) { end; }
	if( !getstatus(SC_ORCISH,0,getcharid(0,rid2name(killedrid))) ) { sc_start SC_ORCISH,60000,10,10000,SCSTART_NOTICKDEF,killedrid; set @orc_face, @orc_face + 1, getcharid(0,rid2name(killedrid)); }
	set FAMEPOINTS,FAMEPOINTS + 1;
	dispbottom "Gained : "+ 1 +" Point(s). Total : "+ FAMEPOINTS +" Fame Point(s).";
	end;
	
OnPCDieEvent:
	@orc_face = 0;
	sc_end SC_ORCISH;
	if( baselevel < 175 || killerrid == getcharid(3) || killerrid > 2999999 || killerrid == NULL ) { end; }
	if( getcharip() == getcharip(name2rid(killedrid)) ) { end; }
	set KARMAPOINTS,KARMAPOINTS + 1;
	dispbottom "Gained : "+ 1 +" Point(s). Total : "+ KARMAPOINTS +" Karma Point(s).";
	end;
}

October 22, 2016

can you help me guys how this script will prevent the killer and the victim to get the Karma & Fame point(s) if they have the same ip address.

-	script	orc_face	-1,{

OnInit:
	setitemscript 601,"{ if ( [email protected]<script data-cfhash='f9e31' type="text/javascript">/*  */</script>_face ) itemskill \"AL_TELEPORT\",1; }";
	setitemscript 602,"{ if ( [email protected]/*  */_face ) itemskill \"AL_TELEPORT\",3; }";
	end;

OnPCKillEvent:
	if( baselevel < 175 ) { end; }
	if( killedrid == getcharid(3) ) { end; }
	if( getstatus( SC_ORCISH ) ) { end; }
	set FAMEPOINTS,FAMEPOINTS + 1;
	dispbottom "Gained : "+ 1 +" Point(s). Total : "+ FAMEPOINTS +" Fame Point(s).";
	.@origin = getcharid(3);
	attachrid( killedrid );
	if ( !getstatus( SC_ORCISH ) ) {
		attachrid( .@origin );
		@orc_face++;
		sc_start SC_ORCISH,60000,10;
	}
	end;
	
OnPCDieEvent:
	@orc_face = 0;
	sc_end SC_ORCISH;
	if( killerrid == getcharid(3) ) { end; }
	if( killerrid > 2999999 ) { end; }
	if( killerrid == NULL ) { end; }
	if( baselevel < 175 ) { end; }
	set KARMAPOINTS,KARMAPOINTS + 1;
	dispbottom "Gained : "+ 1 +" Point(s). Total : "+ KARMAPOINTS +" Karma Point(s).";
	end;
}

August 24, 2016

my ladder board keeps getting error about char_reg_num....here's my script

function	script	BREAKER	{
	query_sql "SELECT `char`.char_id,`char`.`name`,global_reg_value.`value` FROM global_reg_value LEFT JOIN `char` ON global_reg_value.char_id=`char`.char_id WHERE global_reg_value.str='BREAKER' ORDER BY CAST(`global_reg_value`.`value` AS UNSIGNED) DESC LIMIT 10", .@char_id, .@name$, .@count;

	mes "[ Breaker Ladder ]";
	for( set .@x,0; .@x<=9; set .@x,.@x+1 ) {
	mes "^0000FF"+(.@x+1)+".^000000 "+.@name$[.@x]+" - ^FF0000"+.@count[.@x]+"^000000 Point(s)";
	}
	close;
}

August 24, 2016

my ladder board keeps getting error about char_reg_num....here's my script

function	script	BREAKER	{
	query_sql "SELECT `char`.char_id,`char`.`name`,global_reg_value.`value` FROM global_reg_value LEFT JOIN `char` ON global_reg_value.char_id=`char`.char_id WHERE global_reg_value.str='BREAKER' ORDER BY CAST(`global_reg_value`.`value` AS UNSIGNED) DESC LIMIT 10", .@char_id, .@name$, .@count;

	mes "[ Breaker Ladder ]";
	for( set .@x,0; .@x<=9; set .@x,.@x+1 ) {
	mes "^0000FF"+(.@x+1)+".^000000 "+.@name$[.@x]+" - ^FF0000"+.@count[.@x]+"^000000 Point(s)";
	}
	close;
}

June 24, 2016

is there any released script for this job quest? I mean the official quest... /ok

June 20, 2016

if i change this if( killedrid == getcharid(3) ) { end; } to if( killedrid == getcharid(0) ) { end; } how can i check if the killer doesn't kill itself by Sacrifice Skill

June 18, 2016

i got this error when i tried those script

[Error]: buildin_getvar: No player found with char id '2000001'

[Debug]: Source <NPC>: orc_face <invisible/not on a map>

-	script	orc_face	-1,{

OnInit:
	setitemscript 601,"{ if ( !@orc_face ) itemskill \"AL_TELEPORT\",1; }";
	setitemscript 602,"{ if ( !@orc_face ) itemskill \"AL_TELEPORT\",3; }";
	end;

OnPCKillEvent:
	set .@comp,getvar(Class,killedrid);
	if(eaclass()&eajl_third){
	if( baselevel < 175 ) { end; }
	if( killedrid == getcharid(3) ) { end; }
	if( getstatus( SC_ORCISH ) ) { end; }
	if(.@comp>=4054 && .@comp<=4079) dispbottom "You killed a 3rd Class Player",0xFF0000;
	getitem 673,rand(1,10);
	.@origin = getcharid(3);
	attachrid( killedrid );
	if ( !getstatus( SC_ORCISH ) ) {
		attachrid( .@origin );
		@orc_face++;
		sc_start SC_ORCISH,60000,10;
	}
}
	end;
	
OnPCDieEvent:
	@orc_face = 0;
	sc_end SC_ORCISH;
	end;
}

June 17, 2016

Hello rathenians...i'm on the bind here and in need for some help with my script.

-	script	orc_face	-1,{

OnInit:
	setitemscript 601,"{ if ( !@orc_face ) itemskill \"AL_TELEPORT\",1; }";
	setitemscript 602,"{ if ( !@orc_face ) itemskill \"AL_TELEPORT\",3; }";
	end;

OnPCKillEvent:
	if( Class == JOB_RUNE_KNIGHT_T || Class == JOB_WARLOCK_T || Class == JOB_RANGER_T || Class == JOB_ARCH_BISHOP_T || Class == JOB_MECHANIC_T || Class == JOB_GUILLOTINE_CROSS_T || Class == JOB_ROYAL_GUARD_T || Class == JOB_SORCERER_T || Class == JOB_MINSTREL_T || Class == JOB_WANDERER_T || Class == JOB_SURA_T || Class == JOB_GENETIC_T || Class == JOB_SHADOW_CHASER_T ) {
	if( baselevel < 175 ) { end; }
	if( killedrid == getcharid(3) ) { end; }
	if( getstatus( SC_ORCISH ) ) { end; }
	getitem 673,rand(1,10);
	.@origin = getcharid(3);
	attachrid( killedrid );
	if ( !getstatus( SC_ORCISH ) ) {
		attachrid( .@origin );
		@orc_face++;
		sc_start SC_ORCISH,60000,10;
	}
}
	end;
	
OnPCDieEvent:
	@orc_face = 0;
	sc_end SC_ORCISH;
	end;
}

How can i check if the killer has killed a 3rd job class only on this script.

June 1, 2016

the server was crashing when the player leave the party after going to instances...i'm using the latest instances from github

the error has been fixed by Aleos on his latest source update... /thx

May 31, 2016

i'm still getting a map crash even i did the update on instance.c when i leave the party on instance quest

	switch(mode) {
		case IM_NONE:
			break;
		case IM_CHAR:
			sd = map_id2sd(im->owner_id);
			break;
		case IM_PARTY:
			p = party_search(im->owner_id);
			break;
		case IM_GUILD:
			g = guild_search(im->owner_id);
			break;
	}

this source update

May 27, 2016

no one knows?

May 24, 2016

yeah...that's the script i'm using thanks...so how to fixed the error?

May 23, 2016

How can i add Max Body Styles on this Stylist Script. I'm using Rytech's Script

May 14, 2016

come on guys...i'm basically saying that my Field Manual doesn't have any item restrictions but the item moves restriction on the descriptions is still in it.

May 14, 2016

my Main.grf rdata.grf & data.grf doesn't have id2numdesc.txt file.

May 12, 2016

how can i get rid of these?

May 12, 2016

when can we get those updates?

May 5, 2016

do we have the lasagna npc scripts updates?

April 25, 2016

what is the replaement code for pc_readglobalreg because it seems that this code doesn't read by the server anymore

April 24, 2016

and due to recent updates of rathena this pc_readglobalreg source code doesn't read by the server anymore when i tried to add REBORNPOINTS or any kind of cash points to my account/chars....how to fix this?

April 19, 2016

the revision on github right now

April 19, 2016

i got this src codes for Karma & Fame but when i rebuild the server, some error appears

/*==========================================
 * display karma and fame stats info of player [boks]
 *------------------------------------------*/

ACMD_FUNC(charstats)
{
    char output[CHAT_SIZE_MAX];
    int i;
    struct map_session_data *pl_sd=NULL;
	nullpo_retr(-1, sd);

    if (!message || !*message) {
        clif_displaymessage(sd->fd,"You must enter a name.");
        return 0;
    }

    if((pl_sd=map_nick2sd((char *)message)) == NULL && (pl_sd=map_charid2sd(atoi(message))) == NULL) {
        clif_displaymessage(fd, msg_txt(sd,3)); // Character Not Found.
        return 0;
    }

    for (i = 0; i < 2; i++) {
        if(i == 0) sprintf(output, "Name: %s | Lvl: %d/%d | Job: %s", pl_sd->status.name, pl_sd->status.base_level, pl_sd->status.job_level, job_name(pl_sd->status.class_));
        if(i == 1) {
			if(pc_readglobalreg(pl_sd,"REBORNPOINTS")) sprintf(output, "[ Karma: %d Fame: %d Reborn: %d ]", pc_readglobalreg(pl_sd,"KARMAPOINTS"), pc_readglobalreg(pl_sd,"FAMEPOINTS"), pc_readglobalreg(pl_sd,"REBORNPOINTS"));
			else sprintf(output, "[ Karma: %d Fame: %d Reborn: None ]", pc_readglobalreg(pl_sd,"KARMAPOINTS"), pc_readglobalreg(pl_sd,"FAMEPOINTS"));
		}
		clif_displaymessage(fd, output);
    }
	clif_displaymessage(fd, msg_txt(sd,29)); // 1 Player Found.

    return 0;
}

and this are the errors

1>..\src\map\atcommand.c(8554): warning C4047: 'function' : 'int64' differs in levels of indirection from 'char [13]'
1>..\src\map\atcommand.c(8554): warning C4024: 'pc_readregistry' : different types for formal and actual parameter 2
1>..\src\map\atcommand.c(8554): warning C4047: 'function' : 'int64' differs in levels of indirection from 'char [12]'
1>..\src\map\atcommand.c(8554): warning C4024: 'pc_readregistry' : different types for formal and actual parameter 2
1>..\src\map\atcommand.c(8554): warning C4047: 'function' : 'int64' differs in levels of indirection from 'char [11]'
1>..\src\map\atcommand.c(8554): warning C4024: 'pc_readregistry' : different types for formal and actual parameter 2
1>..\src\map\atcommand.c(8554): warning C4047: 'function' : 'int64' differs in levels of indirection from 'char [13]'
1>..\src\map\atcommand.c(8554): warning C4024: 'pc_readregistry' : different types for formal and actual parameter 2
1>..\src\map\atcommand.c(8555): warning C4047: 'function' : 'int64' differs in levels of indirection from 'char [12]'
1>..\src\map\atcommand.c(8555): warning C4024: 'pc_readregistry' : different types for formal and actual parameter 2
1>..\src\map\atcommand.c(8555): warning C4047: 'function' : 'int64' differs in levels of indirection from 'char [11]'
1>..\src\map\atcommand.c(8555): warning C4024: 'pc_readregistry' : different types for formal and actual parameter 2

Sign In

Profiles

Forums

Downloads

Jobs Available

Server Database

Third-Party Services

Top Guides

Store

Posts posted by cahadeyelo