Autotrade Coupon or Go Premium account

[Jniko]

Good day!

Does anybody knows how to achieve this? 

or does anybody have a script for an NPC to convert a player_ID = 0 to player_ID = 1 for 12hours to enable Super Player privileges ?

 

Thank you!

[Cyro]

prontera,155,181,5	script	Sample#vip	4_F_KAFRA1,{

	OnTalk:
		if ( vip_status(0) ) {
			mes "You're VIP.";
		}
		else {
			mes "Buy VIP ?";
			
			.@i = select( 
				.vip_day[0] + " Days",
				.vip_day[1] + " Days",
				.vip_day[2] + " Days"
			) - 1;
			
			mes "VIP "+.vip_day[.@i]+" Days";
			mes "Cost: "+.vip_cashpoint[.@i]+" or "+.vip_pod[.@i]+"x "+getitemname( .pod_id );
			if ( select( "Pay by CashPoint","Pay by "+getitemname( .pod_id ) ) == 1 ) {
				if ( #CASHPOINTS < .vip_cashpoint[.@i] ) {
					mes "Not enough cash point. You got only "+#CASHPOINTS;
				}
				else {
					#CASHPOINTS -= .vip_cashpoint[.@i];
					vip_time ( .vip_day[.@i] * 1440 );
				}
			}
			else {
				if ( countitem( .pod_id ) < .vip_pod[.@i] ) {
					mes "Not enough "+getitemname( .pod_id )+". You got only "+countitem( .pod_id );
				}
				else {
					delitem .pod_id,.vip_pod[.@i];
					vip_time ( .vip_day[.@i] * 1440 );
				}
			}
		}
		close;
		
	OnCheck:
		if (vip_status(0)) {
			dispbottom "Expire Time : "+vip_status(3);
		}
		end;
		
	OnInit:
		.pod_id = 7179;
		
		setarray .vip_day,1,7,30;
		setarray .vip_cashpoint,4000,7000,10000;
		setarray .vip_pod,1,2,3;
		bindatcmd("vip", strnpcinfo(3)+"::OnTalk");
		bindatcmd("vipstatus", strnpcinfo(3)+"::OnCheck");
		end;
}

this script for 1,7,30 vip subscription, with commands @vip @vipstatus //credits to emistry 

2617,auto_trade_voucher,Voucher of autotrade,2,10000,,200,,,,,0xFFFFFFFF,7,2,,,,,,{ atcommand "@autotrade"; },{},{}

this is autotrade coupon 

Edited April 23, 2017 by Cyro

[Jniko]

On 4/24/2017 at 1:48 AM, Cyro said:

prontera,155,181,5	script	Sample#vip	4_F_KAFRA1,{

	OnTalk:
		if ( vip_status(0) ) {
			mes "You're VIP.";
		}
		else {
			mes "Buy VIP ?";
			
			.@i = select( 
				.vip_day[0] + " Days",
				.vip_day[1] + " Days",
				.vip_day[2] + " Days"
			) - 1;
			
			mes "VIP "+.vip_day[.@i]+" Days";
			mes "Cost: "+.vip_cashpoint[.@i]+" or "+.vip_pod[.@i]+"x "+getitemname( .pod_id );
			if ( select( "Pay by CashPoint","Pay by "+getitemname( .pod_id ) ) == 1 ) {
				if ( #CASHPOINTS < .vip_cashpoint[.@i] ) {
					mes "Not enough cash point. You got only "+#CASHPOINTS;
				}
				else {
					#CASHPOINTS -= .vip_cashpoint[.@i];
					vip_time ( .vip_day[.@i] * 1440 );
				}
			}
			else {
				if ( countitem( .pod_id ) < .vip_pod[.@i] ) {
					mes "Not enough "+getitemname( .pod_id )+". You got only "+countitem( .pod_id );
				}
				else {
					delitem .pod_id,.vip_pod[.@i];
					vip_time ( .vip_day[.@i] * 1440 );
				}
			}
		}
		close;
		
	OnCheck:
		if (vip_status(0)) {
			dispbottom "Expire Time : "+vip_status(3);
		}
		end;
		
	OnInit:
		.pod_id = 7179;
		
		setarray .vip_day,1,7,30;
		setarray .vip_cashpoint,4000,7000,10000;
		setarray .vip_pod,1,2,3;
		bindatcmd("vip", strnpcinfo(3)+"::OnTalk");
		bindatcmd("vipstatus", strnpcinfo(3)+"::OnCheck");
		end;
}

this script for 1,7,30 vip subscription, with commands @vip @vipstatus //credits to emistry 

2617,auto_trade_voucher,Voucher of autotrade,2,10000,,200,,,,,0xFFFFFFFF,7,2,,,,,,{ atcommand "@autotrade"; },{},{}

this is autotrade coupon 

Thank you again Cyro will try this tomorrow

[core]

On 4/23/2017 at 10:48 AM, Cyro said:

prontera,155,181,5	script	Sample#vip	4_F_KAFRA1,{

	OnTalk:
		if ( vip_status(0) ) {
			mes "You're VIP.";
		}
		else {
			mes "Buy VIP ?";
			
			.@i = select( 
				.vip_day[0] + " Days",
				.vip_day[1] + " Days",
				.vip_day[2] + " Days"
			) - 1;
			
			mes "VIP "+.vip_day[.@i]+" Days";
			mes "Cost: "+.vip_cashpoint[.@i]+" or "+.vip_pod[.@i]+"x "+getitemname( .pod_id );
			if ( select( "Pay by CashPoint","Pay by "+getitemname( .pod_id ) ) == 1 ) {
				if ( #CASHPOINTS < .vip_cashpoint[.@i] ) {
					mes "Not enough cash point. You got only "+#CASHPOINTS;
				}
				else {
					#CASHPOINTS -= .vip_cashpoint[.@i];
					vip_time ( .vip_day[.@i] * 1440 );
				}
			}
			else {
				if ( countitem( .pod_id ) < .vip_pod[.@i] ) {
					mes "Not enough "+getitemname( .pod_id )+". You got only "+countitem( .pod_id );
				}
				else {
					delitem .pod_id,.vip_pod[.@i];
					vip_time ( .vip_day[.@i] * 1440 );
				}
			}
		}
		close;
		
	OnCheck:
		if (vip_status(0)) {
			dispbottom "Expire Time : "+vip_status(3);
		}
		end;
		
	OnInit:
		.pod_id = 7179;
		
		setarray .vip_day,1,7,30;
		setarray .vip_cashpoint,4000,7000,10000;
		setarray .vip_pod,1,2,3;
		bindatcmd("vip", strnpcinfo(3)+"::OnTalk");
		bindatcmd("vipstatus", strnpcinfo(3)+"::OnCheck");
		end;
}

this script for 1,7,30 vip subscription, with commands @vip @vipstatus //credits to emistry 

2617,auto_trade_voucher,Voucher of autotrade,2,10000,,200,,,,,0xFFFFFFFF,7,2,,,,,,{ atcommand "@autotrade"; },{},{}

this is autotrade coupon 

sir where do i put this >>>>>

2617,auto_trade_voucher,Voucher of autotrade,2,10000,,200,,,,,0xFFFFFFFF,7,2,,,,,,{ atcommand "@autotrade"; },{},{}

[Cyro]

in your itemdb.txt

[core]

On 1/3/2018 at 11:49 AM, Cyro said:

in your itemdb.txt

not working sir @vip working but > @vipstatus   not working can buy but the status not working