Please Implement the Magic scroll, Mental Potion, etc. .

[Please Implement the Magic scroll, Mental Potion, etc. .]

edit!, my bad sorry!

[Add *pcblockattack *pcblockskill *pcblockchat *pcimmune script commands]

@@AnnieRuru how about this?

 

/** * pcblock <account_id>, <value>, <type> * <value>: 1 = on, 0 = off * <type> can be: *     0 = block move *     1 = block attack *     2 = block skill *     3 = block chat *     4 = immune attack **/BUILDIN(pcblock) {	int id, flag, type;	TBL_PC *sd = NULL;	id = script_getnum(st,2);	flag = script_getnum(st,3);	type = script_getnum(st,4);	if( id )		sd = map->id2sd(id);	else		sd = script->rid2sd(st);	switch( type ) {		case 0: sd->state.blockedmove = flag > 0; break;		case 1: sd->state.blockedattack = flag > 0; break;		case 2: sd->state.blockedskill = flag > 0; break;		case 3: sd->state.blockedchat = flag > 0; break;		case 4: sd->state.monster_ignore = flag > 0; break;	}	return true;}

BUILDIN_DEF(pcblock,"iii"),

[Mvp Ladder Game problem]

@@AnnieRuru welcome back!

[NPC - Random item]

:v edit!

[Is this possible?]

OnPCDieEvent:OnPCLoadMapEvent:heal 100,100;end;mapflag prontera loadevent

 

something like this :v

[Enabling HighJump on noteleport mapflag]

if( strcmp(map->list[src->m].name,"pvp_room") != 0 && map->list[src->m].flag.noteleport && !(map->list[src->m].flag.battleground || map_flag_gvg2(src->m)) ) {

[cannot use shadow jump and highjump on a pvp cell]

change sd->bl.m to src->m

[Top 10 PK Killers with lists of characters]

easy to make this script but that i told you, but more query :v with # account_base

 

secondly, select query in account_reg_number is not real time update

[Top 10 PK Killers with lists of characters]

becuz if you use account base, '#' sometimes may not produce correct character names since rid means  account id :v

[Top 10 zeny]

prontera,100,100,4	script	Zeny Ranking	100,{	mes "[Zeny Ranking]";	mes "Top " + .MaxShow + " richest in the server:";	query_sql "select `name`,`zeny` from `char` where `zeny` > 0 order by `zeny` desc limit " + .MaxShow + "", .@name$, .@zeny;	for( .@i = 0; .@i < getarraysize(.@zeny); .@i++ )		mes "~ [.@i + 1] ~ " + .@name$[.@i] + " | Zeny: " + .@zeny[.@i] + "";	close;OnInit:	.MaxShow = 5;	end;}

[Top 10 PK Killers with lists of characters]

Do not use # var for ranking list :v

[bAddItemHealRate]

Yes, it will recovery 20% more hp for Ygg berry if you equipped with this card

[[help] sp healing script]

@ firstly, in case you're using wrong function :v, do not work like a machine, just view code!

 

second, you want to make bonus script to add bonus to extract item id or to all healing sp items?

 

my code work to increase % sp healing for all healing items :v

 

bonus bAddItemSpRate,n;				Increases SP recovered by n% for healing items.

Update ver2 :v

 

bAddItemSpRate_v2.diff

 

bonus to extract item id:

 

bonus2 bAddItemSpRate,id,n;			Increases SP recovered by n% for item id/ig

[Increase monsters HP on map?]

@@Lord Ganja not test yet, test yourself :v, if work + rep to me!

 

mapzone_increase_max_mobhp_rate.diff

[Place effects on a map]

prontera,100,100,0	script	LahEffect	-1,{end;OnInit:	initnpctimer;	end;OnTimer5000:	misceffect EF_FIREWALL;	initnpctimer;	end;}

[[help] sp healing script]

:v +rep to me?bAddItemSpRate.diff

 

 

[Get Guild Level on Script]

or you can use my scriptcommand :v

 

BUILDIN(getguildlvl){	int guild_id;	struct guild* g;	guild_id = script_getnum(st,2);	if( ( g = guild->search(guild_id) ) != NULL )		script_pushint(st,g->guild_lv);	else		script_pushint(st,0);	return true;}

BUILDIN_DEF(getguildlvl, "i"),

Usage:

getguildlvl(guild_id)

[callshop/openshop pointing to a trader]

openshop("shopname"); 

 

:v

[Help needed to fix the source.]

line 6776

 

change to:

 

(int)timer->gettick()

[[Help] Lilith - Extra bonuses(from rA -> Herc)]

first error check again your full code, it's not my fault

 

second, not my fault again... it's another error in lower red line code

 

fix..

 

 

                if(extra_bonus[i].script)                    script->run(extra_bonus[i].script,0,sd->bl.id,0); 

 

[[Help] Lilith - Extra bonuses(from rA -> Herc)]

first error:

 

extra_bonus[count].script = script->parse(str, path, lines, 0, NULL); 

2nd:

            if(pc_readglobalreg(sd,script->add_str("extra_bonus")) && extra_bonus[pc_readglobalreg(sd,script->add_str("extra_bonus"))].script)               script->run(extra_bonus[pc_readglobalreg(sd,script->add_str("extra_bonus"))].script,0,sd->bl.id,0); 

 

[Help needed to fix the source.]

script.c

[Help needed to fix the source.]

fix, not test.. maybe missing 1~2 error, try to test yourself

 

script.c

pc.c

[Configurable Refiner]

@@KirieZ, yeah.. around look likes setarray like this one:

 

.@setarray .@safe[0],

0,

0,

0,

0,

safe5id,

safe6id,

safe7id,

safe8id,

safe9id,

safe10id;

[Configurable Refiner]

@@KirieZ i mean offical has some items Safe refine up to +5, +6, +7, +8, +9 ( like this: http://www.divine-pride.net/database/search )

 

eg:

 

your Saint Robe +5, want to up to + 6 without break? 

 

if you have Safe refine up to + 6 in inventory, when refine failed, it not break, consume 1 safe refine up to + 6.