help po: NPC script

[Overkill Gaming 0]

Mga sir,

baka pede maka hingi ng code or help kung paanu gawin:

1. Item vendor using POD (proof of donation) as currency.
2. Start item (one time rental 3 days, once per account) giver.

 

salamat advance.

[Mhalicot 392]

About sa no 1 question mo sapalagay ko eto makakatulong sayo,

Christmas Patch! Gift'o

prontera,153,152,1	trader	TestCustom2	952,{	OnInit:	tradertype(NST_CUSTOM);	sellitem Red_Potion; //change to POD name or ItemID	end;	/* allows currency to be Red_Potion */OnCountFunds:	setcurrency(countitem(Red_Potion));	end;/* receives @price (total cost) */OnPayFunds:	if( countitem(Red_Potion) < @price )		end;	delitem Red_Potion,@price;	purchaseok();	end;} 

 

experiment ka nalang.

 

tapos sa question 2 naman, eto baka makakuha ka ng idea dito

 

pwede ka gumamit ng

*rentitem <item id>,<time>;*rentitem "<item name>",<time>;

for example

prontera,150,150,6	script	Item Giver	100,{	if (getgmlevel() > 80)		set #claimed, 0;	if ( #claimed ) end; 	mes "[Juan Dela Cruz]";	mes "Hello "+strcharinfo(0)+", Welcome To YourRO";	mes "I'm the Item giver.";	mes "I only give 1 Item pack per Account";	next;	mes "[Juan Dela Cruz]";	mes "Please Choose";	next;	switch( select( "Strength:Intelligence:Dexterity" ) ) {	case 1: //rentitem <item id>,<time in seconds>		rentitem 1108,259200; // Blade 3days Rental.		break;			case 2: //rentitem <item id>,<time in seconds>		rentitem 1505,259200; // //Mace 3days Rental.		break;		case 3: //rentitem <item id>,<time in seconds>		rentitem 1208,259200; //Main Gauche 3days Rental.		break;			default: break;	}	set #claimed, 1;		close;OnInit:        waitingroom "Freebies Here!",0;end;}

[Overkill Gaming 0]

TY moss mhalicot!

additional lang po sana kung pede..
sir yung item giver mo na script is once per account?
at pede ba mag lagay for example rental item pero meron upgrade?
paanu po yun?

 

meron ako nakuha script somewhere while waiting sa reply niyo nag research na din ako ng konti. napa gana ko xa pero yun nga lang indi rental.
eto po yung script na nakita ko:

 

//-------------------------------//Start Item NPC//-------------------------------prontera,146,172,6	script	Freebies	721,{set .@n$, "[Seyra]";setarray .@rwd[0],2115,1,2357,1,2421,1,2524,1; // Rewards: <item id>,<item amount>query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`=" + getcharid(3) + "", .@lip$);if ( getd("$" + .@lip$ + "_NG") > 0 || #NewbieGift > 0){mes .@n$;mes "I'm sorry, the rewards are exclusively for new players.";close;}mes .@n$;mes "Welcome! Here are some free gifts"; mes "for newcomers:";for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);close2;set #NewbieGift, 1;setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )getitem .@rwd[.@i], .@rwd[.@i+1];end;OnInit:waitingroom "Newbie Gift!",0;end;}

 

pede po pa edit kung paanu (kung pede) rental item and meron ups?
salamat po. patulong nlng po sa noob...

 

EDIT:
sir sa script mo po eto ginawa ko.
ask ko lang po, saan pede ilagay jan yung quanity ng item or paano po change ang price ng item?
 

prontera,104,78,6	trader	Item Vendor	790,{	OnInit:	tradertype(NST_CUSTOM);	sellitem 2254;	sellitem 5074; //change to POD name or ItemID	end;	/* allows currency to be Red_Potion */OnCountFunds:	setcurrency(countitem(Donation_Card));	end;/* receives @price (total cost) */OnPayFunds:	if( countitem(Donation_Card) < @price )		end;	delitem Donation_Card,@price;	purchaseok();	end;} 

Edited June 22, 2014 by krayzie1027

[Mhalicot 392]

yes pwede, install mo lang yung rentitem2 sa plugins mo..

[Overkill Gaming 0]

kung installed na po. paanu po magiging syntax?
 

//-------------------------------//Start Item NPC//-------------------------------prontera,146,172,6	script	Freebies	721,{set .@n$, "[Seyra]";setarray .@rwd[0],2115,1,2357,1,2421,1,2524,1; // Rewards: <item id>,<item amount>query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`=" + getcharid(3) + "", .@lip$);if ( getd("$" + .@lip$ + "_NG") > 0 || #NewbieGift > 0){mes .@n$;mes "I'm sorry, the rewards are exclusively for new players.";close;}mes .@n$;mes "Welcome! Here are some free gifts"; mes "for newcomers:";for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);close2;set #NewbieGift, 1;setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )getitem .@rwd[.@i], .@rwd[.@i+1];end;OnInit:waitingroom "Newbie Gift!",0;end;}

paki enlighten po. ty