Jump to content
  • 0

R> Cash points exchanger to pods newbie here


gyroguevarra

Question


  • Group:  Members
  • Topic Count:  55
  • Topics Per Day:  0.01
  • Content Count:  107
  • Reputation:   1
  • Joined:  09/17/13
  • Last Seen:  

1pod = 2000cash points

cash to pod

pod to cash

Link to comment
Share on other sites

9 answers to this question

Recommended Posts


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  66
  • Reputation:   1
  • Joined:  06/06/12
  • Last Seen:  


// 1 Pod = 2k Cash Point

// 2k Cash Point = 1 Pod

prontera,120,120,4 script POD 100,{

mes "[Trader]";

mes "You currently have ^ff0000"+#CASHPOINTS+"^000000 Cash Points";

menu "Exchange Proof of Donation to Cash Point", L_PODS, "Exchange Cash Point to Proof of Donation", L_Point, "Cancel", L_Cancel;

L_PODS:

next;

mes "[Trader]";

mes "How many you want to exchange?";

mes "^ff0000Note^000000: 1 Proof of Donation currently 2000 Cash Point";

input .@count;

if (.@count == 0) close;

if (countitem(7179) < .@count*1) goto L_Noitem;

delitem 7179,.@count*1;

set #CASHPOINTS, #CASHPOINTS + ( .@count*2000 );

close;

L_Point:

next;

mes "[Trader]";

mes "How many you want to exchange?";

mes "^ff0000Note^000000: 2000 Cash Point currently 1 Proof of Donation";

input .@count;

if (.@count == 0) close;

if (#CASHPOINTS < .@count*1) goto L_Nopoint;

set #CASHPOINTS, #CASHPOINTS - ( .@count*2000 );

getitem 7179,.@count*1;

close;

L_Nopoint:

next;

mes "[Trader]";

mes "Sorry you dont have enough of Cash Point";

close;

L_Noitem:

next;

mes "[Trader]";

mes "Sorry you dont have enough of Proof of Donation";

close;

L_Cancel:

mes "[Trader]";

mes "No problem, Come back again";

close;

end;

}

Edited by Yoga
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  200
  • Reputation:   1
  • Joined:  09/25/13
  • Last Seen:  

// 1 Pod = 2k Cash Point
// 2k Cash Point = 1 Pod
prontera,120,120,4	script	POD	100,{
mes "[Trader]";
mes "You currently have ^ff0000"+#CASHPOINTS+"^000000 Cash Points";
menu "Exchange Proof of Donation to Cash Point", L_PODS, "Exchange Cash Point to Proof of Donation", L_Point, "Cancel", L_Cancel;

L_PODS:
next;
	mes "[Trader]";
	mes "How many you want to exchange?";
	mes "^ff0000Note^000000: 1 Proof of Donation currently 2000 Cash Point";
	input .@count;
	if (.@count == 0) close;
	if (countitem(7179) < .@count*1) goto L_Noitem;
	delitem 7179,.@count*1;
	set #CASHPOINTS, #CASHPOINTS + ( .@count*2000 );

	close;
		
L_Point:
next;
	mes "[Trader]";
	mes "How many you want to exchange?";
	mes "^ff0000Note^000000: 2000 Cash Point currently 1 Proof of Donation";
	input .@count;
	if (.@count == 0) close;
	if (#CASHPOINTS < .@count*1) goto L_Nopoint;
	set #CASHPOINTS, #CASHPOINTS - ( .@count*2000 );
	getitem 7179,.@count*1;
	close;

L_Nopoint:
next;
	mes "[Trader]";
	mes "Sorry you dont have enough of Cash Point";
close;

L_Noitem:
next;
	mes "[Trader]";
	mes "Sorry you dont have enough of Proof of Donation";
close;
	
L_Cancel:
	mes "[Trader]";
	mes "No problem, Come back again";
close;
end;
}

Tested already? Working?

Can i request, can i request sir ? how about

1 POD = 1,000 pcs (9524)  // 9524 is the item ID

Thanks in advance /no1

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  50
  • Topics Per Day:  0.01
  • Content Count:  1702
  • Reputation:   238
  • Joined:  09/05/12
  • Last Seen:  

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  66
  • Reputation:   1
  • Joined:  06/06/12
  • Last Seen:  


prontera,120,130,4 script POD 100,{

mes "[Trader]";

mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+"";

menu "Exchange "+getitemname(7179)+" to "+getitemname(9524)+"", L_PODS, "Nevermind", L_Cancel;

L_PODS:

next;

mes "[Trader]";

mes "How many you want to exchange?";

mes "^ff0000Note^000000: 1 "+getitemname(7179)+" currently 1000 "+getitemname(9524)+"";

input .@count;

if (.@count == 0) close;

if (countitem(7179) < .@count*1) goto L_Noitem;

delitem 7179,.@count*1;

getitem 9524,.@count*1000;

close;

L_Noitem:

next;

mes "[Trader]";

mes "You dont have enough "+getitemname(7179)+"";

close;

L_Cancel:

mes "[Trader]";

mes "Come back anytime!";

close;

end;

}

Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  200
  • Reputation:   1
  • Joined:  09/25/13
  • Last Seen:  

prontera,120,130,4	script	POD	100,{
mes "[Trader]"; 
mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+"";
menu "Exchange "+getitemname(7179)+" to "+getitemname(9524)+"", L_PODS, "Nevermind", L_Cancel;

L_PODS:
next;
	mes "[Trader]";
	mes "How many you want to exchange?";
	mes "^ff0000Note^000000: 1 "+getitemname(7179)+" currently 1000 "+getitemname(9524)+"";
	input .@count;
	if (.@count == 0) close;
	if (countitem(7179) < .@count*1) goto L_Noitem;
	delitem 7179,.@count*1;
	getitem 9524,.@count*1000;
	close;
	
L_Noitem:
next;
	mes "[Trader]";
	mes "You dont have enough "+getitemname(7179)+"";
	close;
L_Cancel:
	mes "[Trader]";
	mes "Come back anytime!";
	close;
end;
}

 

OMG sorry my bad,

Can you reverse it sir?

It will exchange 1,000 pcs (9524) into 1 Proof of Donation       // vice-versa

SO SORRY!

 

bump bump bump

Edited by GM Montoy
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  13
  • Topics Per Day:  0.00
  • Content Count:  66
  • Reputation:   1
  • Joined:  06/06/12
  • Last Seen:  


prontera,120,130,4 script POD 100,{

mes "[Trader]";

mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+"";

menu "Exchange "+getitemname(9524)+" to "+getitemname(7179)+"", L_PODS, "Nevermind", L_Cancel;

L_PODS:

next;

mes "[Trader]";

mes "How many you want to exchange?";

mes "^ff0000Note^000000: 1000 "+getitemname(9524)+" currently 1 "+getitemname(7179)+"";

input .@count;

if (.@count == 0) close;

if (countitem(9524) < .@count*1000) goto L_Noitem;

delitem 9524,.@count*1000;

getitem 7179,.@count*1;

close;

L_Noitem:

next;

mes "[Trader]";

mes "[ ^ff0000X^000000 ] Insulfficient "+getitemname(9524)+"";

close;

L_Cancel:

mes "[Trader]";

mes "Come back anytime!";

close;

end;

}

Edited by Yoga
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  200
  • Reputation:   1
  • Joined:  09/25/13
  • Last Seen:  

Thanks YOGA, it works like a charm :3


Last request please,

Can you please add a special effects when they convert?

where to add this on the script

 

specialeffect2 248;

 

prontera,147,157,5    script    BC - PODS    100,{
mes "[Trader]";
mes "You currently have ^ff0000"+countitem(9524)+"^000000 "+getitemname(9524)+"";
menu "Convert ^ff0000"+getitemname(9524)+"^000000 to ^ff0000"+getitemname(7179)+"^000000", L_PODS, "Nevermind", L_Cancel;

L_PODS:
next;
    mes "[Trader]";
    mes "How many you want to exchange?";
    mes "^ff0000Note^000000: 1,000 "+getitemname(9524)+" is 1 "+getitemname(7179)+"";
    input .@count;
    if (.@count == 0) close;
    if (countitem(9524) < .@count*1000) goto L_Noitem;
    delitem 9524,.@count*1000;
    getitem 7179,.@count*1;
    close;
    
L_Noitem:
next;
    mes "[Trader]";
    mes "[ ^ff0000X^000000 ] Insufficient "+getitemname(9524)+"";
    close;
L_Cancel:
    mes "[Trader]";
    mes "Feel free to use my service anytime!";
    close;
end;
}
Edited by GM Montoy
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  24
  • Topics Per Day:  0.01
  • Content Count:  151
  • Reputation:   5
  • Joined:  11/09/12
  • Last Seen:  

if (countitem(9524) < .@count*1000) goto L_Noitem;
    delitem 9524,.@count*1000;
    getitem 7179,.@count*1;

after the "getitem 7179,.@count*1;

if (countitem(9524) < .@count*1000) goto L_Noitem;
delitem 9524,.@count*1000;
getitem 7179,.@count*1;
specialeffect2 248; 
close;
Edited by Dynasty
Link to comment
Share on other sites


  • Group:  Members
  • Topic Count:  69
  • Topics Per Day:  0.02
  • Content Count:  200
  • Reputation:   1
  • Joined:  09/25/13
  • Last Seen:  

if (countitem(9524) < .@count*1000) goto L_Noitem;
    delitem 9524,.@count*1000;
    getitem 7179,.@count*1;

after the "getitem 7179,.@count*1;

if (countitem(9524) < .@count*1000) goto L_Noitem;
delitem 9524,.@count*1000;
getitem 7179,.@count*1;
specialeffect2 248; 
close;

Thanks

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...