[Release: Extended Vending 2.0]

MY  BADDD !!
this happend when you try to remove bound item check



so please guys !!
DON'T EVER NEVER remove the code
they make everything nice with this code

[Euphy healer script]

Change this :

On 5/15/2021 at 11:51 AM, DK77 said:

if ( countitem ( 30000 ) | countitem ( 30002 ) | countitem ( 30003 ) | countitem ( 30004 ) ) {

To this :

if ( countitem(30000) > 0 || countitem(30002) > 0 || countitem(30003) > 0 || countitem(30004) > 0 ) {

 

[GRF: GRF Editor]

hello, I need support

I got error when I try to open my ragnarok with encrypted grf

---------------------------
GRF Encryption - File not found
---------------------------
The client executable is invalid. Encryption feature will be disabled.

Error code : 0x02.
---------------------------
OK   
---------------------------

I play at pc (OS : Win 7 )  normal then I change to my laptop (OS: Win 10) become error

Thank you before

EDITED : already fix, personal issue

[how to add black list item on card trader]

card_trader.txt

or

Change this :

	if (@sold_nameid[.@i] > 4000 && @sold_nameid[.@i] < 32000) {

To this :

	if (@sold_nameid[.@i] > 4000 && @sold_nameid[.@i] < 4454) {

 

[Npc with preview]

 

 

[kill 10 poring prize 10 coin]

prontera,0,0,0,0	monster	Poring	1002,50,0,0,"poringprize::OnMobDead"

-	script	poringprize	-1,{

OnMobDead:
	#poring_kill = #poring_kill + 1;
	if ( #poring_kill == 10 ) {
		getitem 677,1;
		#poring_kill = 0;
	}
	end;
}

 

[buildin_getmapxy: fatal error ! player not attached! problem while putting MVP room]

use the latest one

https://github.com/rathena/rathena/blob/master/npc/custom/etc/mvp_room.txt

[Costume Enchant NPC not working]

Change this :

if(.@c >= getarraysize(.enchant_slot)) close;

To this :

if(.@c > getarraysize(.enchant_slot)) close;

 

[remove mvp in mvp rooms]

On 4/29/2021 at 11:14 PM, Mitosky said:

Yes, but when I do, the script crashes

https://github.com/rathena/rathena/blob/master/npc/custom/etc/mvp_room.txt

 

you can setting at

	set .@menu[2], 1;	// Turn MVP Summoning On/Off
	set .@menu[3], 1;	// Turn Mini boss Summoning On/Off

0 = Off
1 = On

[putting how many bloody branch to trade instead of one by one]

turbo_room,99,113,4	script	Build Manager	930,{
	mes "[ Build Manager ]";
	mes "1x Bloody Branch";
	mes "  > 100 Dead Branch";
	mes "  > 100.000 Zeny";
	mes "^FFFFFF_^000000";
	mes "How many you want exchange ?";
	input .@ammount;
	next;
	if(countitem(604) < (100*.@ammount) || Zeny < (100000*.@ammount) || .@ammount < 1) {
		mes "[ Build Manager ]";
		mes "Not enough requirements";
		close;
	}
	mes "[ Build Manager ]";
	mes "Here you go";
	delitem 604,(100*.@ammount);
	set Zeny,Zeny-(100000*.@ammount);
	getitem 12103,(1*.@ammount);
	end;
}

 

[Global Script Base Luk str gives dmg and heal power]

 

[Freebies Gepard unique ID that can choose STR/DEX/AGI/VIT/LUK/INT]

On 4/10/2021 at 7:54 PM, DevilSupremeRO said:

query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`= '" + getcharid(3) + "'", .@lip$);

change with :

Quote

query_sql ("SELECT `last_unique_id` FROM `login` WHERE `account_id`= '" + getcharid(3) + "'", .@lip$);

 

[champ room]

 

 

[hourly points kafra points bug]

this not bug
#KAFRAPOINTS is another name of Free Cash

you can use another name like #hourlypoints

[Script npc quest error]

31 minutes ago, ManokStreZ said:

already did, but all item become together with Headgears, You can try script im using 

 

// Shop 2
	Add(2,5137,1,0,0,5141,5,7047,100,7166,50,7038,20,978,1);
// Shop 3
	Add(3,5389,1,0,0,5043,5,7568,150,969,10);

 

[Script npc quest error]

20 hours ago, ManokStreZ said:

Thanks a lot, dont know setting there

can you help me again ? i try make same script but for middle, i just change the item, everything fine no error,  but the item still headgear not middle.
where should i change ?

for middle

"Eden Weapons",	// Shop Named 1
"Middle";	// Shop Named 2

don't forget also

// Quest items -- do NOT use a reward item more than once!
Add(<shop ID>,<reward ID>,<reward amount>,<Zeny cost>,<point cost>,<required item ID>,<required item amount>{,...});

 

[Script npc quest error]

		"Eden Weapons";	// Shop Named 1

 

[Only new character will participate on Events]

Try this :

Quote

prontera,140,178,5	script	Race-To-99	100,{
	if ($ItemGive == 100) {
		npctalk "Sorry, all rewards has been taken!";
		end;
	}
	if (BaseLevel < 99 && JobLevel < 70) {
		npctalk "Sorry, Only Base Lv 99 & Job Lv 70 can claim the reward !";
		end;
	}
	if (getreward == 2) {
		npctalk "Sorry, Nothing for you!";
		end;
	}
	if (getreward == 1) {
		announce "Congratulations! "+strcharinfo(0)+" has claimed his reward for Race to 99 Event", bc_all;
		getitem 501, 100;
		++$ItemGive;
		getreward = 2;
		announce "There are "+(100 - $ItemGive)+" rewards left to give!", bc_all;
		end;
	}
	npctalk "Race To 99 !!";
end;
OnPCLoginEvent:
	if (BaseLevel == 1 && JobLevel == 1 && BaseJob == Job_Novice) {
		set getreward,1;
	}
end;
}

 

 

[Preview item on NPC]

https://github.com/rathena/rathena/blob/master/npc/custom/quests/quest_shop.txt

[Add payment costume npc]

Try this :

// -------------------------------------------------------------------------------
// 	Script Name : Headgear to Costume converter >> Costume to Headgear converter
// -------------------------------------------------------------------------------
// Description :
// - Allows a user to convert the equipped headgear (on Top, Mid or Low) into a
//   costume item. It will remove any card and refine of the Item.
// - Allows a user to restore the equipped costume headgear (on Top, Mid or Low)
//   into its original form. It will not return any card or refine of the item.
// -------------------------------------------------------------------------------
function	script	costume	{
	.@npc_name$ = getarg(0);
// ======================================================================
	.@requirement = 7399;		// Item ID Requirement
// ======================================================================
	disable_items;
	mes "["+ .@npc_name$ +"]";
	mes "Here you can convert your headgears into a Costume Headgear or restore to its Original form.";
	next;

	switch(select("I want to convert.:I want to restore.:No thanks.")) {
	case 1:
		setarray .@indices[1], EQI_HEAD_TOP, EQI_HEAD_MID, EQI_HEAD_LOW;
		for (.@i = 1; .@i<=3; ++.@i) {
			if (getequipisequiped(.@indices[.@i])) {
				.@menu$ = .@menu$ + F_getpositionname(.@indices[.@i]) + "-[" + getequipname(.@indices[.@i]) + "]";
				.@equipped = 1;
			}
			.@menu$ = .@menu$ + ":";
		}

		if (.@equipped == 0) {
			mes "["+ .@npc_name$ +"]";
			mes "You need to wear headgears that I can costume...";
			close;
		}

		mes "["+ .@npc_name$ +"]";
		mes "Please select what to convert.";
		mes "Remember, cards and refine will be removed.";
		next;

		.@part = .@indices[ select(.@menu$) ];
		if (!getequipisequiped(.@part)) {
			mes "["+ .@npc_name$ +"]";
			mes "You're not wearing anything there...";
			close;
		}

		mes "["+ .@npc_name$ +"]";
		mes "You want to Costume your " + getitemname(getequipid(.@part)) + "?";
		next;

		if (select("Yes, proceed:No, sorry.") == 2) {
			mes "["+ .@npc_name$ + "]";
			mes "Need some time to think about it, huh?";
			mes "Alright, I can understand.";
			close;
		}
		if ( countitem(.@requirement) < 1 ) {
			mes "["+ .@npc_name$ + "]";
			mes "You need "+getitemname(.@requirement);
			end;
		}
		delitem .@requirement,1;
		costume .@part,1; // Convert the Headgear

		mes "["+ .@npc_name$ +"]";
		mes "Done, enjoy your costume headgear.";
		close;
	case 2:
		setarray .@indices[1], EQI_COSTUME_HEAD_TOP, EQI_COSTUME_HEAD_MID, EQI_COSTUME_HEAD_LOW;
		for (.@i = 1; .@i<=3; ++.@i) {
			if (getequipisequiped(.@indices[.@i])) {
				.@menu$ = .@menu$ + F_getpositionname(.@indices$[.@i]) + "-[" + getequipname(.@indices[.@i]) + "]";
				.@equipped = 1;
			}
			.@menu$ = .@menu$ + ":";
		}

		if (.@equipped == 0) {
			mes "["+ .@npc_name$ +"]";
			mes "You need to wear costumed headgears that I can restore...";
			close;
		}

		mes "["+ .@npc_name$ +"]";
		mes "Please select what to restore.";
		mes "Remember, I will only restore it back without refine and cards.";
		next;

		.@part = .@indices[ select(.@menu$) ];
		if (!getequipisequiped(.@part)) {
			mes "["+ .@npc_name$ +"]";
			mes "You're not wearing anything there...";
			close;
		}

		if (isequippedcnt(getequipid(.@part)) > 1) {
			mes "["+ .@npc_name$ +"]";
			mes "You're wearing too many of the same headgear!";
			mes "How am I supposed to know which one to restore?";
			mes "See me when you have one equipped.";
			close;
		}

		if (countitem(getequipid(.@part)) > 1) {
			mes "["+ .@npc_name$ +"]";
			mes "You have another " + getitemname(getequipid(.@part)) + " with you.";
			mes "Put it away before restoring.";
			close;
		}

		mes "[" + .@npc_name$ + "]";
		mes "You want to restore your " + getitemname(getequipid(.@part)) + "?";
		next;

		if (select("Yes, proceed:No, sorry.") == 2) {
			mes "["+ .@npc_name$ +"]";
			mes "Need some time to think about it, huh?";
			mes "Alright, I can understand.";
			close;
		}
		if ( countitem(.@requirement) < 1 ) {
			mes "["+ .@npc_name$ + "]";
			mes "You need "+getitemname(.@requirement);
			end;
		}
		delitem .@requirement,1;
		// Restore headgear by recreating
		a = getequipid(.@part);
		delitem a,1;
		getitem a,1;

		mes "["+ .@npc_name$ +"]";
		mes "Done, enjoy your restored headgear.";
		close;
	case 3:
		mes "["+ .@npc_name$ +"]";
		mes "Very well. Return at once if you seek my services.";
		close;
	}
}

// ---------------------------------------------------------------------------
// Add more lines to put your npc on different cities (adjust name if desired)
// ---------------------------------------------------------------------------
prontera,159,181,5	script	Costume Clown#1	715,{ callfunc "costume","Costume Clown",0; end; }

 

[Editing Active time on this NPC]

Change this :

On 2/9/2021 at 9:18 PM, AHMADSHIDQI said:

L_start:
OnClock2000: // everyday 8pm starts

To this :

Quote

L_start:
OnTue2000: // Start Every Tuesday 8 p.m
OnFri2000: // Start Every Friday 8 p.m
OnSun2000: // Start Every Sunday 8 p.m

 

Change this :

On 2/9/2021 at 9:18 PM, AHMADSHIDQI said:

L_end:
OnClock2030: // everyday 8:30pm ends

To this :

Quote

L_end:
OnTue2030: // Finish Every Tuesday 8.30 p.m
OnFri2030: // Finish Every Friday 8.30 p.m
OnSun2030: // Finish Every Sunday 8.30 p.m

 

[Instant JOB Class Changer Ex from Rune Knight to Warlock etc.]

 

and remove this line 

Quote

if( ClassHelper == 1|| #ClassHelper == 1 ) end;

 

[Mail script?]

17 hours ago, IvanD said:

not even an npc shows up

 

Remove this line :

// RODEX makes these NPCs useless
-	script	RodexMailBoxInit	-1,{
	end;

OnInit:
	if( PACKETVER >= 20150513 ){
		unloadnpc "MailBox";
	}
	end;

 

[Stylist Limit]

 	if (vip_status(1)){
	setarray .@max[1],450,50,80;
	} else {
	setarray .@max[1],150,20,30;
        }

[Costume signer script]

https://github.com/rathena/rathena/blob/master/npc/custom/item_signer.txt

 

Change :

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;

To :

setarray .@indices[1],EQI_COSTUME_HEAD_TOP, EQI_COSTUME_HEAD_MID, EQI_COSTUME_HEAD_LOW, EQI_COSTUME_GARMENT;

 

On 12/21/2020 at 5:23 AM, IvanD said:

(and 24 hours rental/expiration)

hmm, I'm not sure you can use this one